Abrir Caja registradora

456 views
Skip to first unread message

glad...@gmail.com

unread,
Jun 7, 2013, 4:58:58 PM6/7/13
to publice...@googlegroups.com
Buenas tardes querido foro necesito su ayuda llevo varias semanas buscando abrir la caja registradora pero sin imprimir estoy programando en visual foxpro 9.0 en prg.
ayuda porfavor.. Una opción en el menu que ponga abrir la caja y esta se abra.
Estoy utilizando el siguiente codigo para cuando se imprime pero no me funciona sera problema de la caja o esta mal el siguiente codigo, esta conectada al puerto usb

Set Device to Print        
    SET Console Off
    SET Printer On
    ??? Chr(27) + Chr(112) + Chr(48) &&& Estos son los caracteres que abren la caja de dinero
    ? ' '
    SET Print Off
    SET Console On
    SET Printer To    

Gracias por la ayuda
Gladys

Saul Piña Hernandez

unread,
Jun 7, 2013, 6:27:34 PM6/7/13
to publice...@googlegroups.com
Saludos!  no sé si debo cambiar la secuencia de escape para cada caja, pero siempre he utilizado esta y funciona perfecto, sea cual sea el cajon de dinero, si gustas intentar:

en un boton de un formulario, en el evento click tengo esto:

pr56=MESSAGEBOX("Desea Abrir el Cajon de Dinero?",4+32,"Atención")
IF pr56=6
SET PRINTER TO LPT1
*??? " "
*??? " "
*??? " "
??? CHR(27)+CHR(112)+CHR(48)+CHR(55)+CHR(121)
SET PRINTER TO
ELSE
ENDIF

suerte!

xor...@hotmail.com

unread,
Jun 8, 2013, 12:26:41 AM6/8/13
to publice...@googlegroups.com
y que pasara si la impresora es usb, ahora como se le hace??

Saul Piña Hernandez

unread,
Jun 8, 2013, 7:11:12 AM6/8/13
to publice...@googlegroups.com
a mi me ha funcionado sea lpt1, usb, etc. solo intentalo, total a lo mejor y funciona...
Reply all
Reply to author
Forward
0 new messages