Embedded Files
Debe usar fechas del dia. El ejemplo por simplicidad no hace validaciones y no usa decimales. Para el modo prueba no es necesario archivo de licencia.
cCuit = 'aqui cuit del emisor sin separador'
nModo = 0
cResultado = ''
tipocomprobante = 1
puntoventa = 1
cLicencia = 'prueba.lic'
cCertificado = 'ruta y nombre del certificado tipo *.pfx'
xResultado = ?Ole{'Iniciar('&nModo&', '&CLIP(cCuit)&','&CLIP(cCertificado)&','&CLIP(cLicencia)&')'}
cResultado = ?Ole{'UltimoMensajeError'}
message(cresultado,'mensaje vacio si no hay errores',icon:hand)
xResultado = ?Ole{'f1ObtenerTicketAcceso()'}
cResultado = ?Ole{'UltimoMensajeError'}
message(cresultado,'mensaje vacio si no hay errores',icon:hand)
?Ole{'F1CabeceraCantReg'} = 1
?Ole{'F1CabeceraPtoVta'} = 4
?Ole{'F1CabeceraCbteTipo'} = 1
?Ole{'f1Indice'} = 0
?Ole{'F1DetalleConcepto'} = 1
?Ole{'F1DetalleDocTipo'} = 80
?Ole{'F1DetalleDocNro'} = '20111111112'
?Ole{'F1DetalleCbteDesde'} = 1
?Ole{'F1DetalleCbteHasta'} = 1
?Ole{'F1DetalleCbteFch'} = '20100915'
?Ole{'F1DetalleImpTotal'} = 18405
?Ole{'F1DetalleImpTotalConc'} = 0
?Ole{'F1DetalleImpNeto'} = 15000
?Ole{'F1DetalleImpOpEx'} = 0
?Ole{'F1DetalleImpTrib'} = 780
?Ole{'F1DetalleImpIva'} = 2625
?Ole{'F1DetalleFchServDesde'} = '20100915'
?Ole{'F1DetalleFchServHasta'} = '20100915'
?Ole{'F1DetalleFchVtoPago'} = '20100915'
?Ole{'F1DetalleMonId'} = 'PES'
?Ole{'F1DetalleMonCotiz'} = 1
?Ole{'F1DetalleTributoItemCantidad '} = 1
?Ole{'f1IndiceItem'} = 0
?Ole{'F1DetalleTributoId'} = 3
?Ole{'F1DetalleTributoDesc '} = 'Impuesto Municipal Matanza'
?Ole{'F1DetalleTributoBaseImp'} = 15000
?Ole{'F1DetalleTributoAlic'} = 52
?Ole{'F1DetalleTributoImporte'} = 7800
?Ole{'F1DetalleIvaItemCantidad'} = 2
?Ole{'f1IndiceItem'} = 0
?Ole{'F1DetalleIvaId'} = 5
?Ole{'F1DetalleIvaBaseImp'} = 1000
?Ole{'F1DetalleIvaImporte'} = 2100
?Ole{'f1IndiceItem'} = 1
?Ole{'F1DetalleIvaId'} = 4
?Ole{'F1DetalleIvaBaseImp'} = 5000
?Ole{'F1DetalleIvaImporte'} =525
?Ole{'F1DetalleCbtesAsocItemCantidad'} =0
?Ole{'F1DetalleOpcionalItemCantidad'} =0
?Ole{'ArchivoXMLRecibido'} = 'c:\recibido.xml'
?Ole{'ArchivoXMLEnviado'} = 'c:\enviado.xml'
xResultado = ?Ole{'F1CAESolicitar()'}
cResultado = ?Ole{'UltimoMensajeError'}
message(cresultado,'mensaje vacio si no hay errores',icon:hand)
cResultado = ?Ole{'F1RespuestaResultado'}
message(cresultado,'resultado global de la operacion',icon:hand)
cResultado = ?Ole{'F1RespuestaReProceso'}
message(cresultado,'es reproceso?',icon:hand)
cResultado = ?Ole{'f1ErrorMsg1'}
message(cresultado,'error generico global',icon:hand)
?Ole{'f1Indice'} = 0
cResultado = ?Ole{'F1RespuestaDetalleObservacionMsg1'}
message(cresultado,'error detallado',icon:hand)
cResultado = ?Ole{'F1RespuestaDetalleCae'}
message(cresultado,'CAE',icon:hand)
Ante cualquier duda consultar al soporte técnico.
Page updated
Google Sites
Report abuse