muchas gracias. Fasthpo
Algo parecido estaba probando ayer. y probé con tu ejemplo.
Yo lo estoy enviando, luego de comando Pago y antes de Cerrar el documento.
Cuando envío numero de cola, no cancela comprobante pero no imprime nada.
Enviándolo como (IntSet) me tira error. respuesta impresor.
si lo envío como ParamSet no tira error respuesta-impresor, pero tampoco imprime nada.
Código COBOL:
MOVE "IFOpBegin" to FUNCION3.
CALL FUNCION3 WITH STDCALL USING BY CONTENT PARAMETRO-ENCABEZADO RETURNING RESPUESTA-IMPRESOR.
*** numero-cola.
MOVE spaces TO FUNCION3.
* MOVE "IFOpParamIntSet" TO FUNCION3.
MOVE "IFOpParamSet"TO FUNCION3.
MOVE 11 TO Valor-ECNumero.
CALL FUNCION3 WITH STDCALL USING BY CONTENT TITULO-ECNumero
BY VALUE Valor-ECNumero
returning Respuesta-Impresor.
if respuesta-impresor = 0 move "error-cola" to pow-text of error-cod-cola.
**... texto-cola
MOVE spaces TO FUNCION.
MOVE "IFOpParamSet" TO FUNCION.
* MOVE SPACES TO Valor-ECTexto.
MOVE 2 TO H-CODIGO.
MOVE "Osvaldo Linea .11 " TO H-NOMBRE.
MOVE 3 TO H-NUMERO.
MOVE HEADER-11 TO Valor-ECTexto.
CALL FUNCION WITH STDCALL USING BY REFERENCE TITULO-ECTexto
BY REFERENCE Valor-ECTexto
returning Respuesta-Impresor.
if respuesta-impresor = 0 move "error-texto-cola" to pow-text of error-tex-cola.