La Web del Programador: Comunidad de Programadores
 
    Pregunta:  5364 - POLE DISPLAY Y CASH DRAWER
Autor:  Herbert Munguia
Hola necesito abrir una cash drawer y usar un pole display el pole display lo puedo ver pero no puedo reiniciarlo a la primera posicion necesito ayuda.

  Respuesta:  Victor Alexander Andrade Parra
El cajon monedero se abre imprimiendo una sarta precisa de caracteres encaso de que este conectado a una impresora

prueba con esto :

IF FILE("C:\CAJON.TXT")
ERASE C:\cajon.txt
ENDIF
SET CONSOLE OFF
SET DEVICE TO FILE C:\cajon.txt
@ 00,00 SAY CHR(27)+CHR(112)+CHR(0)+CHR(20)+;
CHR(80)
SET DEVICE TO SCREEN
SET HEADING OFF
TYPE C:\cajon.txt TO lpt1

Si no tiene pruebe creando un .bat que contenga esto :
type "cualquier caracter" > COM# donde # es el numero del puerto a donde esta llegando el cajon

para el pole puede utilizar los siguiente
arch = FOPEN('COM2',12)
nuevo1 = STR(billete,9,2) && Billete variable
nuevo2 = STR(wcambio,9,2) && wcambio variable
= FWRITE(arch,CHR(10))
= FWRITE(arch,CHR(13))
= FWRITE(arch,'RECIBIDO ')
= FWRITE(arch,nuevo1,11)
= FWRITE(arch,CHR(18)+CHR(10))
= FWRITE(arch,CHR(13))
= FWRITE(arch,'CAMBIO')
= FWRITE(arch,nuevo2,11)
= FCLOSE(arch)

Cuando se utiliza los com seriales debe inicializarlos en el autoexec