WSMTXCA ConsultarComprobante

Este método permite recuperar íntegramente todos los datos archivados por AFIP para un número de comprobante dado.

Acepta 3 parámetros:

• • Punto de Venta.

  • Tipo de Comprobante.

  • Número de Comprobante.

Y devuelve verdadero (si el comprobante existe en lo servidores de AFIP) junto con todos los datos asociados al comprobante. Los datos se leen en:

• • Las propiedades de respuesta (fxResultadoCAE y demás) propias del método AutorizarComprobante.

  • La propiedad fxResultadoTipoAutorizacion para indicar si fue un comprobante autorizado con CAE o CAE anticipado.

  • Y además todos los datos (totales, netos, alícuotas, observaciones, productos facturados, etc.) en las mismas propiedades donde habitualmente se cargan para el método AutorizarComprobante).

Por ejemplo la propiedad fxImporteTotal contendrá el importe total usado (y archivado por AFIP) al autorizar el comprobante.

En caso de devolver falso el motivo del error puede leerse en la lista general de errores.

ejemplo visual basic (instalador 94.40) o superior

Dim fe As New WSAFIPFE.Factura

dim bResultado as boolean

If fe.iniciar(0, "cuit emisor", "ruta y archivo pfx", " ") Then

fe.ArchivoCertificadoPassword = ""

If fe.fxObtenerTicketAcceso() Then

fe.FxQRArchivo = "d:\mixqr.bmp"

fe.FxQRFormato = 1

fe.FxQRResolucion = 5

fe.FxQRTolerancia = 0

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

bResultado = fe.fxConsultarComprobanteS(puntoventa, tipocomprobante, "numero")

if fe.ultimomensajeerror = "" then

msgbox "CAE consultado: "+fe.fxrespuestaCAE

msgbox "Total: "+str(fe.fxImporteTOTAL)

else

MsgBox("fallo consulta: " + fe.UltimoMensajeError)

end if

else

MsgBox("Fallo acceso: " + fe.UltimoMensajeError)

End If

Else

MsgBox("Fallo iniciar: " + fe.UltimoMensajeError)

End If