Buen dia amigos : Les cuento un poco de cero , la empresa Epson Argentina provee una ocx para
comunicarte con la impresora fiscal , posee comandos para enviarle a la impresora para que haga algo ... Por ejemplo hay un comando que es para saber el estado de la impresora que puede ser fiscal o estado de hardware del impresor los datos hay que mandarlos en hexadecimal cuando ejecuto el comando la fiscal me da el siguiente error : el frame con contiene el minimo aceptado
He bajado un soft que monitorea los datos enviados y comparando con un programa que funciona
en visual comparo lo que yo envio y lo que envia el otro soft y aca les dejo las diferencias:
Código:
06 02 99 00 01 1C 00 00 03 30 30 42 42 bien el de visual
06 02 FF 00 1C 00 03 30 31 32 30 mal mi soft
Código COBOL:
WORKING-STORAGE SECTION.
01 ReturnDEValue PIC S9(9) COMP-5 VALUE 0.
01 LINEA-ESTADO.
03 Comando PIC X VALUE X"00".
03 Comandobis PIC X VALUE X"01".
01 LINEA-EXTRA.
03 DataField1 PIC X VALUE X"00".
03 DataField2 PIC X VALUE X"00".
*01 ReturnString PIC X(12).
*01 Variable PIC 9(3).
PROCEDURE DIVISION.
* abre el puerto
INVOKE EpsonFPHostControl1 "OpenPort" RETURNING ReturnDEValue.
* dato a enviar al impresor
INVOKE EpsonFPHostControl1 "AddDataField" USING LINEA-ESTADO RETURNING ReturnDEValue.
* dato a enviar al impresor
INVOKE EpsonFPHostControl1 "AddDataField" USING LINEA-EXTRA RETURNING ReturnDEValue.
* aca envia el paquete de datos
INVOKE EpsonFPHostControl1 "SendCommand" RETURNING ReturnDEValue.