Abrir cajón de dinero

655 views
Skip to first unread message

Henry Interiano

unread,
Aug 20, 2020, 3:01:33 PM8/20/20
to 'mpulla' via Comunidad de Visual Foxpro en Español

Hola a todos

Necesito abrir el cajón de dinero sin imprimir, he intentado en enviando comando Epson

@$,$ say CHR(27)+CHR(112)+CHR(0)+CHR(0)+CHR(255)

Pero aun si imprime

En la preferencias de la impresora hay una opción para abrir el cajón y no imprime nada y eso es lo que quiero hacer desde de VFP

 

Gracias

 

 

Enviado desde Correo para Windows 10

 


Libre de virus. www.avg.com

Víctor Hugo Espínola Domínguez

unread,
Aug 20, 2020, 3:30:45 PM8/20/20
to publice...@googlegroups.com
Prueba usando ??? en vez de @ say

Saludos,
Víctor.
Lambaré - Paraguay.



--
Visita el Blog de la Comunidad Visual FoxPro en Español: http://comunidadvfp.blogspot.com
---
Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.
Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/0C9F3024-E392-444C-B819-10F3DA606D5A%40hxcore.ol.

RICARDO RAUL MOSNA

unread,
Aug 20, 2020, 4:03:31 PM8/20/20
to publice...@googlegroups.com
hola buenas tardes
espero te sirva esto

   SET CONSOLE OFF
   SET PRINTER ON
   SET DEVICE TO PRINTER
   SET PRINTER TO LPT1
   SET CONSOLE OFF
   SET PRINTER ON
   SET DEVICE TO PRINTER
   j=1
   @ j, 5 SAY ''
   ?? CHR(27)+'d'+CHR(0)
   ?? CHR(27)+'m'+CHR(0)
   ?? CHR(27)+'p'+'0'+'100'+CHR(0)
   
      *--
      SET CONSOLE ON
      SET PRINTER OFF
      SET DEVICE TO SCREEN
   
   
 
   WAIT WIND 'APERTURA DE CAJA'

--

Dsan

unread,
Aug 20, 2020, 5:14:11 PM8/20/20
to publice...@googlegroups.com
Yo no uso nada mas que esto y me abren los cajones de moneda conectado el cable del cajon monedero al puerto RJ 11 que está debajo de la impresora y listo con esto

Set Printer To LPT1 && Default
??? Chr(27)+Chr(112)+Chr(48)+Chr(55)+Chr(121)



--

Carton Jeston

unread,
Aug 20, 2020, 5:59:36 PM8/20/20
to Comunidad de Visual Foxpro en Español
Ampliando lo anterior

lcprinter=GETPRINTER() && selecciona impresora y coge nombre
SET PRINTER TO NAME lcprinter    && es el nombre de la impresora de windows que hemos seleccionado
??? chr(1)+chr(2)+chr(3)+chr(4)+chr5()

y ahora lo importante:

Los codigos de apertura de cajon cambian de una impresora a otra, incluso cuando no tienes los codigos especificos de una impresora, los codigos de otra impresora del mismo fabricante puede valer.

Esto es lo normal en los cajones que van conectados a la impresora de tiquets tipo epson, bixolon, etc. Ya impresoras paralelo o serie puede ser otra cosa.

INTERNATIONAL SOFTWARE SYSTEMS - INSYSOFT

unread,
Aug 20, 2020, 6:14:29 PM8/20/20
to publice...@googlegroups.com
Hola Henry..
Yo genero una instrucción en un archivo .bat que le llamo abrir.bat  y en el código del programa le invoco así
como ejemplo :


IF !gccajon=.f.
    run abrir.bat
ENDIF


 insertar esta instrucción en el archivo llamado abrir.bat

echo " " > com1

Espero sea de gran ayuda. tengo este software trabajando en 3500 almacenes y en todos funciona bien. 


--
Visita el Blog de la Comunidad Visual FoxPro en Español: http://comunidadvfp.blogspot.com
---
Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.

Carton Jeston

unread,
Aug 21, 2020, 12:29:18 AM8/21/20
to Comunidad de Visual Foxpro en Español
Como ya es Viernes, solo me queda añadir a la informacion, este metodo que solo hay que usar como ultimo recurso...

robo-de-un-banco-36267305.jpg


Valentin Fernandez

unread,
Aug 21, 2020, 7:56:04 AM8/21/20
to publice...@googlegroups.com
Muy bueno

El jue., 20 ago. 2020 a las 23:29, Carton Jeston (<carton...@gmail.com>) escribió:
Como ya es Viernes, solo me queda añadir a la informacion, este metodo que solo hay que usar como ultimo recurso...

robo-de-un-banco-36267305.jpg


--
Visita el Blog de la Comunidad Visual FoxPro en Español: http://comunidadvfp.blogspot.com
---
Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.


--

Atentamente:
Valentín Fernández

Ricardo Soldini

unread,
Aug 21, 2020, 8:13:03 PM8/21/20
to Comunidad de Visual Foxpro en Español
A mi me funciona esto
   
set printer to default && Direcciono para el puero serie com1.
    ???chr(27)+chr(112)+chr(0)    &&IMPULSO DE APERTURA DE CAJA
    set printer to && Limpio com1 y vuelvo a impresora predeterminada.
    ???'----------------------------------------' && Imprimo una raya.
    ???chr(10) && Avance.
    set printer to && abre cajón
Reply all
Reply to author
Forward
0 new messages