Como facturar por lotes - Bit Ingeniería

La facturación por lotes se implementa acumulando en un proceso iterativo la carga de facturas. Una vez realizada esta carga se le informa a AFIP y posteriormente se procesan los resultados comprobante por comprobante. En caso de recibir un comprobante con error, y este rechazado, el resto de los que le suceden no son procesados.

El algoritmo para realizarse queda ejemplificado en Visual Basic en el siguiente código:

        wsfev1.CUIT = 20939802593#  ' Cuit del vendedor
        wsfev1.URL = URLWSW
        If wsfev1.login("certificado.crt", "clave.key", URLWSAA) Then
            If Not wsfev1.RecuperaLastCMP(PtoVta, TipoComp, nro) Then
                MsgBox (wsfev1.ErrorDesc)
            Else
                wsfev1.Reset
                For i = 0 To cantidadComprobantes - 1
                    nro = nro + 1
                    wsfev1.AgregaFactura 1, 80, 30707219072#, nro, nro, FechaComp, 121, 0, 100, 0, "", "", "", "PES", 1
                    wsfev1.AgregaIVA 5, 100, 21 ' Ver Excel de referencias de codigos AFIP
                Next
                If wsfev1.Autorizar(PtoVta, TipoComp) Then
                    For i = 0 To cantidadComprobantes - 1
                        wsfev1.AutorizarRespuesta i, CAE, Vencimiento, Resultado, Reproceso
                        If Resultado = "A" Then
                            ' Guardo CAE
                        Else
                            ' Error procesando
                            Exit For
                        End If
                    Next
                Else
                    MsgBox wsfev1.ErrorDesc
                End If
            End If
        Else
            MsgBox wsfev1.ErrorDesc
        End If

Tutorial FEAFIP