Página 5 de 11 PrimerPrimer 1 2 3 4 5 6 7 8 9 10 11 ÚltimoÚltimo
Resultados 41 al 50 de 102

Tema: Manejo OCX impresora Fiscal Epson nueva generación

  1. #41
      Gran amigo y Guru de COBOL
    Avatar de Rapinto

    Registrado
    febrero de 2015
    Ubicación
    Porto
    Mensajes
    246
    Última visita
    29.01.2018

    Agradecimientos
     
    Recibidos
    226
    Enviados
    19

    Citaciones y menciones
     
    Mentioned
    5 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    0 Post(s)
    Poder de Reputación
    17
    Activista del Foro / Point Value: 0 Agradecimientos / Point Value: 0 Guru de los Gurus / Point Value: 0

    Predeterminado

    fastpho,

    Não será necessário utilizar:
    COBOL Código:
    1. * define na Working
    2. 01  WSRESULT PIC S9(009)   COMP-5.
    3.  
    4. CALL FUNC WITH  STDCALL  USING BY REFERENCE CODIGO-CmImpresor
    5.                                         RETURNING WSRESULT.
    Espero que resolva.
    Un saludo,
    Rui Pinto

    0 Not allowed!

  2. #42
      Administrador
    Avatar de Kuk

    Registrado
    enero de 2015
    Ubicación
    Madrid
    Edad
    38
    Mensajes
    2,153
    Última visita
    Ayer a las 23:07

    Agradecimientos
     
    Recibidos
    954
    Enviados
    826

    Citaciones y menciones
     
    Mentioned
    70 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    15 Post(s)
    Poder de Reputación
    10

    Predeterminado

    @fastpho, mirando el prototipo C de la función, vemos:

    CPP Código:
    1. int getPrinterStatus( void )

    int - es el Integer, equivalente a PIC S9(9) COMP-5 y es lo que la función devuelve.
    void - quiere decir NADA, o sea que no hay parámetros a pasar para esta función.

    Ahora, viendo cómo lo haces tú:

    COBOL Código:
    1. CALL FUNC WITH  STDCALL  USING BY REFERENCE CODIGO-CmImpresor.

    Le estás pasando un puntero (la dirección del campo CODIGO-CmImpresor) y por el contrario no recibes el valor Integer que devuelve dicha función.

    La forma correcta de llamarla sería:

    COBOL Código:
    1. CALL FUNC WITH  STDCALL RETURNING CODIGO-CmImpresor.

    0 Not allowed!
    ¿Te han ayudado? NO TE OLVIDES de darle al botón
    ¿Quieres dirigirte a alguien en tu post? Notifícale con una mención, tienes 2 opciones:
    1. Haciendo clic en el icono al lado de su nick
    2. Haciendo clic en el botón en el editor y escribiendo su nick.

  3. #43
      Senior
    Avatar de fastpho

    Registrado
    diciembre de 2016
    Ubicación
    Mendoza
    Edad
    52
    Mensajes
    287
    Última visita
    18.01.2023

    Agradecimientos
     
    Recibidos
    189
    Enviados
    178

    Citaciones y menciones
     
    Mentioned
    32 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    8 Post(s)
    Poder de Reputación
    20
    Concurso: Primer puesto / Point Value: 0

    Predeterminado

    Gracias Kuk y Rui voy a probar y despues cuento como me fue

    ---------- Post añadido : 13:29 ---------- Post anterior : 13:24 ----------

    Funciona de las dos maneras Gracias Kuk y Rui
    COBOL Código:
    1.      CALL FUNC WITH  STDCALL  USING BY REFERENCE CODIGO-CmImpresor returning CODIGO-CmImpresor.
    2.      CALL FUNC WITH  STDCALL RETURNING CODIGO-CmImpresor.          

    0 Not allowed!

  4. #44
      Acabo de llegar...
    L

    Registrado
    diciembre de 2017
    Ubicación
    El Trebol
    Edad
    57
    Mensajes
    8
    Última visita
    02.01.2023

    Agradecimientos
     
    Recibidos
    5
    Enviados
    8

    Citaciones y menciones
     
    Mentioned
    4 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    0 Post(s)
    Poder de Reputación
    0

    Predeterminado

    @Kuk, Hola.. Necesito hacer funcionar la impresora EPSON TM 900 nueva generación y no encuentro la forma de usar la OCX o la DLL.. Vi en el foro que la están usando.. me pueden ayudar x favor?

    Gracias...

    0 Not allowed!

  5. #45
      Super Moderador
    Avatar de Josber

    Registrado
    febrero de 2015
    Ubicación
    Alicante
    Mensajes
    738
    Última visita
    Ayer a las 21:52

    Agradecimientos
     
    Recibidos
    405
    Enviados
    333

    Citaciones y menciones
     
    Mentioned
    65 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    8 Post(s)
    Poder de Reputación
    35
    Activista del Foro / Point Value: 0 Agradecimientos / Point Value: 0

    Predeterminado

    @Laura, Kuk, no está usándo ese controlador, supongo que por que aquí en España, fiscalmente no es obligatorio, el que te tendría que ayudar es @fastpho, que parece ser que ha conseguido ponerlo en marcha. Lo único que ha hecho Kuk y otros, y no es poco, es ayudar con un problema.

    Un saludo.-

    0 Not allowed!

  6. #46
      Administrador
    Avatar de Kuk

    Registrado
    enero de 2015
    Ubicación
    Madrid
    Edad
    38
    Mensajes
    2,153
    Última visita
    Ayer a las 23:07

    Agradecimientos
     
    Recibidos
    954
    Enviados
    826

    Citaciones y menciones
     
    Mentioned
    70 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    15 Post(s)
    Poder de Reputación
    10

    Predeterminado

    @Laura, como ha dicho @Josber, yo no las uso. Pero dinos qué problema tienes, técnicamente te podremos ayudar.

    0 Not allowed!
    ¿Te han ayudado? NO TE OLVIDES de darle al botón
    ¿Quieres dirigirte a alguien en tu post? Notifícale con una mención, tienes 2 opciones:
    1. Haciendo clic en el icono al lado de su nick
    2. Haciendo clic en el botón en el editor y escribiendo su nick.

  7. #47
      Senior
    Avatar de fastpho

    Registrado
    diciembre de 2016
    Ubicación
    Mendoza
    Edad
    52
    Mensajes
    287
    Última visita
    18.01.2023

    Agradecimientos
     
    Recibidos
    189
    Enviados
    178

    Citaciones y menciones
     
    Mentioned
    32 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    8 Post(s)
    Poder de Reputación
    20
    Concurso: Primer puesto / Point Value: 0

    Predeterminado

    @Laura, Hola Laura , tendrias que bajar desde la pagina web de epson argentina , yo logre hacerla andar yo estoy utilizando EpsonFiscalDriver.DLL para facturar y sacar informes
    bajatelos y te ayudo
    Suerte

    0 Not allowed!

  8. #48
      Acabo de llegar...
    L

    Registrado
    diciembre de 2017
    Ubicación
    El Trebol
    Edad
    57
    Mensajes
    8
    Última visita
    02.01.2023

    Agradecimientos
     
    Recibidos
    5
    Enviados
    8

    Citaciones y menciones
     
    Mentioned
    4 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    0 Post(s)
    Poder de Reputación
    0

    Predeterminado

    Hola.. buenísimo.. yo tengo la DLL (EpsonFiscalInterface.DLL) y la OCX (comEsponFiscalDriver.OCX) q me enviaron de Espon, incluso fui a un curso pero no supieron decirme como usarlas en el Fujitsu. La OCX intento incluirla como un Custom Control pero pero me sale una leyenda This is not a custom control file.. Podés pasarme los códigos para incluir la DLL? NO encuentro la forma.. Muchísimas gracias..

    ---------- Post añadido : 16:07 ---------- Post anterior : 15:59 ----------

    Gracias.. Te cuento rápido mi problema. Espon provee una DLL para la impresora fiscal para lenguaje de alto nivel y también una OCX para lenguaje de bajo nivel.. No se como utilizar la DLL en el Fujitsu y así utilizarla. Tampoco puedo incluir la OCX como custom control porq me dice This is not a custom control file y tampoco conozco otra forma de utilizarla. Fui a un curso en Espon y no hay nadie q desarrolle en Fijitsu, somos pocos y entonces no tienen las respuestas para ayudarnos.

    0 Not allowed!

  9. #49
      Senior
    Avatar de fastpho

    Registrado
    diciembre de 2016
    Ubicación
    Mendoza
    Edad
    52
    Mensajes
    287
    Última visita
    18.01.2023

    Agradecimientos
     
    Recibidos
    189
    Enviados
    178

    Citaciones y menciones
     
    Mentioned
    32 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    8 Post(s)
    Poder de Reputación
    20
    Concurso: Primer puesto / Point Value: 0

    Predeterminado

    @Laura, Si lees bien el problema en paginas anteriores en el foro la ocx no funciona con pwc y como te dije tenes que usar la libreria EpsonFiscalDriver.DLL que funciona muy bien.
    Tenes que copiar tal libreria donde compile tu programa y en el archivo cobol85.cbr incluir las llamadas de las funciones que necesitas te paso unas lineas de programa y lo que debe incluir
    el archivo cobol85.cbr


    Lineas de Cobol85.cbr
    CODE Código:
    1. [TPV.ENTRY]
    2. AddDataField=EpsonFiscalDriver.DLL
    3. ClosePort=EpsonFiscalDriver.DLL
    4. GetAPIVersion=EpsonFiscalDriver.DLL
    5. GetExtraField=EpsonFiscalDriver.DLL
    6. GetReceivedFrame=EpsonFiscalDriver.DLL
    7. GetSentFrame=EpsonFiscalDriver.DLL
    8. OpenPort=EpsonFiscalDriver.DLL
    9. Purge=EpsonFiscalDriver.DLL
    10. SendCommand=EpsonFiscalDriver.DLL
    11. getBaudRate=EpsonFiscalDriver.DLL
    12. getComPort=EpsonFiscalDriver.DLL
    13. getExtraFieldCount=EpsonFiscalDriver.DLL
    14. getFiscalStatus=EpsonFiscalDriver.DLL
    15. getLastError=EpsonFiscalDriver.DLL
    16. getPrinterStatus=EpsonFiscalDriver.DLL
    17. getProtocolType=EpsonFiscalDriver.DLL
    18. getReturnCode=EpsonFiscalDriver.DLL
    19. getState=EpsonFiscalDriver.DLL
    20. setBaudRate=EpsonFiscalDriver.DLL
    21. setComPort=EpsonFiscalDriver.DLL
    22. setProtocolType=EpsonFiscalDriver.DLL
    23. setComPort=EpsonFiscalDriver.DLL
    24. setLog=EpsonFiscalDriver.DLL

    Lineas de Programa:
    COBOL Código:
    1.      MOVE "GetAPIVersion" TO FUNC-EPSON-LIB.
    2.      CALL FUNC-EPSON-LIB WITH  STDCALL  USING BY REFERENCE VERSION.  
    3. ***    set log
    4. **    move spaces       to FUNC-EPSON-LIB.
    5. **    MOVE "SetLog" TO FUNC-EPSON-LIB.
    6. **    MOVE "./" TO InBuffer.
    7. **    MOVE 0 TO BufferLen.
    8. **    CALL FUNC-EPSON-LIB WITH  STDCALL  USING BY REFERENCE   InBuffer
    9. ** *                                  BY VALUE  BufferLen
    10. **    COM SET      
    11.      move spaces       TO FUNC-EPSON-LIB.
    12.      MOVE "setComPort" TO FUNC-EPSON-LIB.
    13.      MOVE 1            TO sPort *> activamos COM1
    14.      CALL FUNC-EPSON-LIB WITH  STDCALL   USING BY VALUE sPort.
    15. **    BAUDIOS SET    
    16.      MOVE spaces       TO FUNC-EPSON-LIB.
    17.      MOVE "setBaudRate" TO FUNC-EPSON-LIB.
    18.      move 9600          TO sBaudio *> set baudios
    19.      CALL FUNC-EPSON-LIB WITH  STDCALL   USING BY VALUE sBaudio.
    20. **    MOVE spaces       TO FUNC-EPSON-LIB.
    21. **    MOVE "getBaudRate" TO FUNC-EPSON-LIB.
    22. **         CALL FUNC-EPSON-LIB WITH  STDCALL   USING BY REFERENCE sBaudio.
    23. **    DISPLAY sBaudio
    24. **    PROTOCOL SET
    25.      move spaces       TO FUNC-EPSON-LIB.
    26.      MOVE "setProtocolType" TO FUNC-EPSON-LIB.
    27.      MOVE 1                 TO SProtocol.
    28.      CALL FUNC-EPSON-LIB WITH  STDCALL   USING BY VALUE SProtocol.
    29. *> OPEN  PORT.
    30.      move spaces       TO FUNC-EPSON-LIB.
    31.      MOVE "OpenPort"   TO FUNC-EPSON-LIB.
    32.      CALL FUNC-EPSON-LIB WITH  STDCALL  USING BY REFERENCE VERSION.
    33.        
    34.      move spaces       TO FUNC-EPSON-LIB.
    35.      MOVE "getLastError" TO FUNC-EPSON-LIB.
    36.      CALL FUNC-EPSON-LIB WITH  STDCALL RETURNING  iError.          
    37.      IF iError = 0  then MOVE "ok" to "Text" OF CmCOMUNICACION.
    38.      IF iError = 1  then MOVE "Puerto ocupado" to  "Text" OF CmCOMUNICACION.
    39.      IF iError = 2  then MOVE "Puerto invalido" to "Text" OF CmCOMUNICACION.
    40.      IF iError = 10  then MOVE "Error de escritura verifique el impresor" to "Text" OF CmCOMUNICACION.
    41. **    display    iError
    42. *    
    43. *
    44. *    MOVE "ClosePort"   TO FUNC-EPSON-LIB.
    45. *    CALL FUNC-EPSON-LIB WITH  STDCALL  USING BY REFERENCE VERSION.
    46. *      
    47.  

    0 Not allowed!

  10. #50
      Acabo de llegar...
    L

    Registrado
    diciembre de 2017
    Ubicación
    El Trebol
    Edad
    57
    Mensajes
    8
    Última visita
    02.01.2023

    Agradecimientos
     
    Recibidos
    5
    Enviados
    8

    Citaciones y menciones
     
    Mentioned
    4 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    0 Post(s)
    Poder de Reputación
    0

    Predeterminado

    Estuve probando con un ejemplo q pusieron justamente con lo de "setComPort" y copié la DLL en mi release pero cuando lo ejecuto me da error, como q no reconoce el setComPort, lo moví a la variable también.. pero con éste ejemplo q vos me pusiste voy a seguir probando mañana. Muchas gracias.. ojalá también pueda ayudar en algo..

    0 Not allowed!

Página 5 de 11 PrimerPrimer 1 2 3 4 5 6 7 8 9 10 11 ÚltimoÚltimo

Información de Tema

Usuarios Viendo este Tema

Actualmente hay 3 usuarios viendo este tema. (0 miembros y 3 visitantes)

Temas Similares

  1. [Sintaxis] Ayuda con libreria epson InterfaceEpsonNF.dll
    Por drvedia1981 en el foro PowerCOBOL (ActiveX, v4 - v11)
    Respuestas: 3
    Último Mensaje: 01.02.2022, 14:34
  2. [Aporte] Manejo de control CmListView (Grid)
    Por Josber en el foro Cocina PowerCOBOL
    Respuestas: 27
    Último Mensaje: 18.11.2019, 10:16
  3. [Compilador] Error de generación del reporte de Crash
    Por JuanJuan77 en el foro PowerCOBOL (ActiveX, v4 - v11)
    Respuestas: 2
    Último Mensaje: 07.07.2017, 23:02
  4. [Información] Utilización de OCX impresora fiscal en RM/Cobol 7
    Por mainero en el foro RM/COBOL
    Respuestas: 3
    Último Mensaje: 30.06.2017, 00:34
  5. Motocicletas de nueva generación
    Por Kuk en el foro Espacio "Offtop"
    Respuestas: 0
    Último Mensaje: 24.12.2016, 16:24

Etiquetas para este Tema

Marcadores

Marcadores

Permisos de Publicación

  • No puedes crear nuevos temas
  • No puedes responder temas
  • No puedes subir archivos adjuntos
  • No puedes editar tus mensajes
  •