Gracias Rui Pinto (Rapinto)
COBOL Foro
Foro dedicado a COBOL, a la Programación y a la Informática.
Retroceder   COBOL Foro > IDE-s y compiladores COBOL > Fujitsu COBOL > PowerCOBOL (ActiveX, v4 - v11)
PowerCOBOL (ActiveX, v4 - v11) Versiones del IDE basadas en ActiveX
Noticias y Avisos
Otros temas que te pueden interesar
Tema Autor Foro Respuestas Último post
[Aporte] Manejo de control CmListView (Grid) Josber Cocina PowerCOBOL 17 24 de septiembre de 2019 16:04
[Sintaxis] Ayuda con libreria epson InterfaceEpsonNF.dll drvedia1981 PowerCOBOL (ActiveX, v4 - v11) 2 24 de noviembre de 2017 02:05
[Compilador] Error de generación del reporte de Crash JuanJuan77 PowerCOBOL (ActiveX, v4 - v11) 2 7 de julio de 2017 21:02
[Información] Utilización de OCX impresora fiscal en RM/Cobol 7 mainero RM/COBOL 3 29 de junio de 2017 22:34
Motocicletas de nueva generación Kuk Espacio "Offtop" 0 24 de diciembre de 2016 15:24
Respuesta
 
Herramientas

  #61
Antiguo 12 de febrero de 2019, 18:55
IDENTIFICATION DIVISION
panzaverde
Acabo de llegar...
ENVIRONMENT DIVISION
Avatar de panzaverde
DATA DIVISION
Forero desde (Registrado)julio 2017
Argentina
UbicaciónCapital Federal
Última Actividad25.09.2019 17:00
PROCEDURE DIVISION
PostsPosts: 8
Ha dicho GraciasEnviado: 2
Ha recibido agradecimientosRecibido: 1
Mejores respuestasSoluiones: 0
ReputaciónReputación: 0
panzaverde is an unknown quantity at this point
Predeterminado Consulta sobre version PowerCobol

Hola, estoy trabajando con PowerCobol v3, y queria saber si funciona el EpsonFiscalDriver.DLL con esta version.
He copiado los ejemplos que ustedes han posteado, e instalado la .DLL y creado el cobol85.cbr con los metodos y propiedades, referenciados a "=EpsonFiscalDriver" enlazado con el nombre dl form principal, pero al ejecutar me da un error de ejecucion y no me devuelve codigo alguno. Cancela "pgm.exe dejo de funcionar. Cerrar el programa".
Desde ya muchas gracias.
Saludos.
Alberto
panzaverde no ha iniciado sesión   Responder Con Cita
  #62
Antiguo 12 de febrero de 2019, 21:05
IDENTIFICATION DIVISION
Kuk
Administrador
ENVIRONMENT DIVISION
Avatar de Kuk
DATA DIVISION
Forero desde (Registrado)enero 2015
España
UbicaciónMadrid
Edad34 años
Última Actividad17.10.2019 15:47
PROCEDURE DIVISION
PostsPosts: 1.417
Ha dicho GraciasEnviado: 318
Ha recibido agradecimientosRecibido: 540
Mejores respuestasSoluiones: 87
ReputaciónReputación: 10
Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road
Predeterminado

Cita del post de panzaverde Ver Mensaje
"=EpsonFiscalDriver"
¿No era EpsonFiscalDriver.dll?

Revisalo todo bien, porque por lo visto a la gente le ha funcionado. Y el mecanismo de usar una DLL vía COBOL85.CBR no ha evolucionado desde la v3, que yo sepa.


NORMAS DEL FORO - obligatorias de conocer para TODOS.
¿Te han ayudado? NO TE OLVIDES de darle a
¿Quieres dirigirte a alguien en tu post? Notifícale Pinchando en su Nick:

Kuk no ha iniciado sesión   Responder Con Cita
  #63
Antiguo 13 de febrero de 2019, 17:31
IDENTIFICATION DIVISION
panzaverde
Acabo de llegar...
ENVIRONMENT DIVISION
Avatar de panzaverde
DATA DIVISION
Forero desde (Registrado)julio 2017
Argentina
UbicaciónCapital Federal
Última Actividad25.09.2019 17:00
PROCEDURE DIVISION
PostsPosts: 8
Ha dicho GraciasEnviado: 2
Ha recibido agradecimientosRecibido: 1
Mejores respuestasSoluiones: 0
ReputaciónReputación: 0
panzaverde is an unknown quantity at this point
Predeterminado

Gracias Kuk, por la respuesta.
Como te comente, copie los post de Uds, rutina, definiciones.
La definición de cobol85.cbr yo me equivoque al pasarte la pregunta, lo copie un posteo de Fastpho
Código:
[SHEET1.ENTRY]
AddDataField=EpsonFiscalDriver.DLL
ClosePort=EpsonFiscalDriver.DLL", etc, eso por un lado.
Por otra parte puede ser que la opción "returning" no este soportada por la version v3.

El manual explica
Código COBOL:
  1.         [Format 1] ON OVERFLOW phrase
  2.          CALL [WITH STDCALL LINKAGE]
  3.                   [BY REFERENCE] {identifier-2} …
  4.          USING BY CONTENT … …
  5.                    BY VALUE { identifier-3} …]
  6.               [ON OVERFLOW imperative-statement-1]
  7.               [END-CALL]

Desde ya muchas gracias.
Saludos Alberto.
panzaverde no ha iniciado sesión   Responder Con Cita
  #64
Antiguo 13 de febrero de 2019, 22:15
IDENTIFICATION DIVISION
Kuk
Administrador
ENVIRONMENT DIVISION
Avatar de Kuk
DATA DIVISION
Forero desde (Registrado)enero 2015
España
UbicaciónMadrid
Edad34 años
Última Actividad17.10.2019 15:47
PROCEDURE DIVISION
PostsPosts: 1.417
Ha dicho GraciasEnviado: 318
Ha recibido agradecimientosRecibido: 540
Mejores respuestasSoluiones: 87
ReputaciónReputación: 10
Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road
Predeterminado

panzaverde, efectivamente, creo recordar que RETURNING no existe en Power v3. Pero lo que devuelve el returning en otras versiones, en Power v3 lo tienes en el campo reservado PROGRAM-STATUS.

¿Tu Form se llama SHEET1? Si es otro nombre, no va a funcionar. Debes poner [nombre_de_tu_form.ENTRY]


NORMAS DEL FORO - obligatorias de conocer para TODOS.
¿Te han ayudado? NO TE OLVIDES de darle a
¿Quieres dirigirte a alguien en tu post? Notifícale Pinchando en su Nick:

Kuk no ha iniciado sesión   Responder Con Cita
Ha dicho Gracias : 1
panzaverde (27 de febrero de 2019)
  #65
Antiguo 14 de febrero de 2019, 01:14
IDENTIFICATION DIVISION
panzaverde
Acabo de llegar...
ENVIRONMENT DIVISION
Avatar de panzaverde
DATA DIVISION
Forero desde (Registrado)julio 2017
Argentina
UbicaciónCapital Federal
Última Actividad25.09.2019 17:00
PROCEDURE DIVISION
PostsPosts: 8
Ha dicho GraciasEnviado: 2
Ha recibido agradecimientosRecibido: 1
Mejores respuestasSoluiones: 0
ReputaciónReputación: 0
panzaverde is an unknown quantity at this point
Predeterminado

Muchas gracias Kuk por la respuesta. Probe el PROGRAM-STATUS y me devuelve el valor del campo enviado o no devuelve nada.
Voy a seguir investigando un poco mas y seguramente te molestare nuevamente.
Saludos Alberto.

---------- Post añadido : 21:14 ---------- Post anterior : 21:10 ----------

Kuk me olvidaba, el form principal se llama "SHEET1".
Gracias.
panzaverde no ha iniciado sesión   Responder Con Cita
  #66
Antiguo 18 de marzo de 2019, 21:34
IDENTIFICATION DIVISION
rodolfo
Acabo de llegar...
ENVIRONMENT DIVISION
Avatar de rodolfo
DATA DIVISION
Forero desde (Registrado)marzo 2019
Argentina
UbicaciónMendoza
Última Actividad08.04.2019 01:27
PROCEDURE DIVISION
PostsPosts: 4
Ha dicho GraciasEnviado: 0
Ha recibido agradecimientosRecibido: 0
Mejores respuestasSoluiones: 0
ReputaciónReputación: 0
rodolfo is an unknown quantity at this point
Predeterminado Ejemplo impresión ticket en TM-T900FA

Buenas tardes, estoy utilizando epsonFiscalDriver.dll y puedo imprimir Cierre X/Z, pero con la impresión de un ticket llego hasta la impresión de ítem, no toma el pago, a pesar que utilizó los parámetros tal como figuran en https://files.support.epson.com/pdf/...anual_revc.pdf, página 150.
La secuencia utilizada de comandos es:

Establecer protocolo (1)
Establecer velocidad
Establecer puerto
Abrir puerto
Abrir ticket
Item
Pago
Cerrar ticket
Cerrar puerto

Agradecería algún ejemplo puntual.
rodolfo no ha iniciado sesión   Responder Con Cita
  #67
Antiguo 19 de marzo de 2019, 19:21
IDENTIFICATION DIVISION
Kuk
Administrador
ENVIRONMENT DIVISION
Avatar de Kuk
DATA DIVISION
Forero desde (Registrado)enero 2015
España
UbicaciónMadrid
Edad34 años
Última Actividad17.10.2019 15:47
PROCEDURE DIVISION
PostsPosts: 1.417
Ha dicho GraciasEnviado: 318
Ha recibido agradecimientosRecibido: 540
Mejores respuestasSoluiones: 87
ReputaciónReputación: 10
Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road
Predeterminado

rodolfo, ¿qué modelo de impresora es?


NORMAS DEL FORO - obligatorias de conocer para TODOS.
¿Te han ayudado? NO TE OLVIDES de darle a
¿Quieres dirigirte a alguien en tu post? Notifícale Pinchando en su Nick:

Kuk no ha iniciado sesión   Responder Con Cita
  #68
Antiguo 20 de marzo de 2019, 14:18
IDENTIFICATION DIVISION
rodolfo
Acabo de llegar...
ENVIRONMENT DIVISION
Avatar de rodolfo
DATA DIVISION
Forero desde (Registrado)marzo 2019
Argentina
UbicaciónMendoza
Última Actividad08.04.2019 01:27
PROCEDURE DIVISION
PostsPosts: 4
Ha dicho GraciasEnviado: 0
Ha recibido agradecimientosRecibido: 0
Mejores respuestasSoluiones: 0
ReputaciónReputación: 0
rodolfo is an unknown quantity at this point
Predeterminado

Cita del post de Kuk Ver Mensaje
rodolfo, ¿qué modelo de impresora es?
Buen día, es una TM-T900FA.
rodolfo no ha iniciado sesión   Responder Con Cita
  #69
Antiguo 21 de marzo de 2019, 15:29
IDENTIFICATION DIVISION
fastpho
Novato Junior
ENVIRONMENT DIVISION
Avatar de fastpho
DATA DIVISION
Forero desde (Registrado)diciembre 2016
Argentina
UbicaciónMendoza
Edad49 años
Última Actividad17.10.2019 15:30
PROCEDURE DIVISION
PostsPosts: 71
Ha dicho GraciasEnviado: 41
Ha recibido agradecimientosRecibido: 23
Mejores respuestasSoluiones: 4
ReputaciónReputación: 5
fastpho is an unknown quantity at this point fastpho is an unknown quantity at this point fastpho is an unknown quantity at this point
Predeterminado

rodolfo Para realizar el pago primero fijate el importe que estas enviando sea mayor al valor del item de todas maneras sin realizar el pago con el comando cerrar te lo deberia hacer sin el pago
fastpho no ha iniciado sesión   Responder Con Cita
  #70
Antiguo 2 de abril de 2019, 02:18
IDENTIFICATION DIVISION
rodolfo
Acabo de llegar...
ENVIRONMENT DIVISION
Avatar de rodolfo
DATA DIVISION
Forero desde (Registrado)marzo 2019
Argentina
UbicaciónMendoza
Última Actividad08.04.2019 01:27
PROCEDURE DIVISION
PostsPosts: 4
Ha dicho GraciasEnviado: 0
Ha recibido agradecimientosRecibido: 0
Mejores respuestasSoluiones: 0
ReputaciónReputación: 0
rodolfo is an unknown quantity at this point
Predeterminado Devolución de ítem

Gracias por responder, ya logro imprimir un comprobante completo, lo que no puedo es imprimir una devolución dentro de un ticket, según la documentación es:

Código:
EnviarComando("0A02|0001|||||Item devuelto|Cantidad|PrecioUnitario|AlicuotaIVA|||||||")
No logro que imprima dicha línea, las otras correspondientes a venta de ítem, si lo hace.
Y el importe total del ítem devuelto lo suma como pago EFECTIVO en vez de restarlo del total de pagos.
Desde ya muchas gracias.
Saludos.
rodolfo no ha iniciado sesión   Responder Con Cita
Respuesta

Tags
argentina , epson , fiscal , impresora , ocx


Usuarios activos actualmente viendo este tema: 1 (0 miembros y 1 visitantes)
 
Herramientas

Derechos de Publicación
No puedes publicar nuevos temas
No puedes publicar posts/responder
No puedes adjuntar archivos
No puedes editar tus posts

BB code is habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado



La franja horaria es GMT +1. Ahora son las 07:16.
Powered by: vBulletin, Versión 3.8.7
Derechos de Autor ©2000 - 2019, Jelsoft Enterprises Ltd.