Ejemplo consultar comprobante turismo

Este ejemplo operativo para el WSCT de comprobante T muestra como consultar un comprobante ya autorizado.

Debe usarse el instalador 44.60 o superior.

El nombre y ubicación de todos los campos devueltos por el servidor pueden ser vistos en el archivo XML recibido.

En el proyecto en visual basic, agregar una referencia al objeto WSAFIPFE y ejecutar el código desde un botón.

En este ejemplo se hace uso del método "tLeerPropiedad" para simplificar la carga de datos y evitar la saturación de propiedades

Dim fe As New WSAFIPFE.Factura

Dim bresultado As Boolean = True

If fe.iniciar(0, "cuit", "certificado *.pfx cuit", "") Then

rem fe.forzarCertificadoSSL(True)

fe.ArchivoXMLEnviado = "d:\tenvio.xml"

fe.ArchivoXMLRecibido = "d:\trecibo.xml"

fe.ArchivoCertificadoPassword = ""

If fe.tObtenerTicketAcceso() Then

bresultado = fe.tconsultarComprobanteTipoPVentaNro(1, 195, "1")

If fe.UltimoMensajeError = "" And fe.tErrorDescripcion1 = "" Then

MsgBox("CAE " + fe.tLeerPropiedad("tconsultarComprobanteTipoPVentaNro", "comprobante.codigoautorizacion", "", 0, 0))

Else

MsgBox("error general" + fe.UltimoMensajeError)

MsgBox("error servidor " + fe.tErrorDescripcion1)

End If

Else

MsgBox("fallo acceso " + fe.UltimoMensajeError)

End If

Else

MsgBox("fallo iniciar " + fe.UltimoMensajeError)

End If