[Componente] No logro imprimir en la TM-T900FA

[vrgoldin]

Buenas noches.
Es la primera vez que ingreso a un foro por ayuda. hasta ahora siempre había podido resolver los temas.
El tema es que no puedo hacer que una T900FA imprima desde NetCobol.

Ya tengo una pantalla funcionando desde hace mucho con TM-U220 funcionando de esta forma que muestra abajo, pero cuando quiero registrar el OCX en Custom Controls no me deja un me da un error diciendo "This is not a custon controls file"

 ENVIRONMENT     DIVISION.
 DATA            DIVISION.
 WORKING-STORAGE SECTION.
 01 ReturnValue        PIC S9(9) COMP-5 VALUE 0.
 01 Comando            PIC X VALUE  X"39".
 01 DataField1         PIC X VALUE  X"58".
 01 DataField2         PIC X VALUE  X"50".
 
 01 Cantidad           PIC S9(9) COMP-5 VALUE 0.
 01 ReturnString       PIC X(12).
 01 Variable           PIC 9(3).
 PROCEDURE       DIVISION.
     INVOKE              CmTipo "ClearList".
     INVOKE EpsonFPHostControl1 "OpenPort"                       RETURNING ReturnValue.
     INVOKE EpsonFPHostControl1 "AddDataField" USING Comando     RETURNING ReturnValue.
     INVOKE EpsonFPHostControl1 "AddDataField" USING DataField1  RETURNING ReturnValue.
     INVOKE EpsonFPHostControl1 "AddDataField" USING DataField2  RETURNING ReturnValue.
     INVOKE EpsonFPHostControl1 "SendCommand"                    RETURNING ReturnValue.
     call "Busy".
     MOVE "ExtraFieldsCount" OF EpsonFPHostControl1 TO Cantidad.
     PERFORM VARYING Variable  FROM 1 BY 1 UNTIL Variable  > Cantidad
     INVOKE EpsonFPHostControl1 "GetExtraField" USING Variable   RETURNING ReturnString
     INVOKE CmTipo "AddString" USING ReturnString
     MOVE 1 TO "ListIndex"     OF CmTipo
     END-PERFORM
     INVOKE EpsonFPHostControl1 "ClosePort"                      RETURNING ReturnValue.

Alquien me puede orientar de como hacer un simple Cierre Z o Cierre X para entender como funciona este protocolo?

O bien incorporando alguna DLL al proyecto y algún ejemplo de como invocar los métodos?

Desde ya muchas gracias.

[Kuk]

❞ cuando quiero registrar el OCX en Custom Controls no me deja un me da un error diciendo "This is not a custon controls file"

Esto quiere decir que la OCX no es válida. Mira a ver la documentación, aveces el control ActiveX viene cone xtensión DLL.

[fastpho]

Para la Impresora Fiscal Epson TM-T900FA son los controladores de nueva generacion lo que tenias
desarrollado para la Epson tmu-200 no te va ha servir hay nuevas librerias te recomiendo
entrar a la pagina de epson argentina para que bajes los nuevos drivers
Suerte

---------- Post añadido : 23:46 ---------- Post anterior : 22:32 ----------

[Sintaxis] Manejo OCX impresora Fiscal Epson nueva generación - COBOL Foro