hola. tengo que enviar al impresor fiscal item venta, así como me indica el ejemplo.:
Código CPP:
IFOpBegin("ItemVenta")
Drv.IFOpParamSet("Descripcion", "Item de prueba")
Drv.IFOpParamFloatSet("Precio", 1.2345)
Drv.IFOpParamFloatSet("IVA", 21.0)
Drv.IFOpParamSet("CodigoProducto", "7791234567898")
ahora en COBOL esta bien la sintaxis como la hago ? porque no me tira error, pero no me imprime ningun dato.
todo en cero. Y descripción espacio en blanco.
así envio por ejemplo el importe
No se si el error estara en la sintaxis del Call.
Código COBOL:
MOVE 'IFOpParamFloatSet' TO FUNCION.
MOVE 225.22 TO PARAMETRO-PRECIO3.
CALL FUNCION WITH STDCALL USING BY REFERENCE PARAMETRO-PRECIO1 PARAMETRO-PRECIO2
PARAMETRO-PRECIO3 RETURNING RESPUESTA-IMPRESOR.
working
01 PARAMETRO-PRECIO1 PIC X(6) VALUE 'Precio'.
01 PARAMETRO-PRECIO2 PIC X(2) VALUE ", ".
01 PARAMETRO-PRECIO3 PIC 99999.99 VALUE ZEROS.
Perdón por molestar, le agradecería mucho me puedan ayudar a resolverlo.
saludos...
|
|