1999-10-22 10:00:18 +00:00
|
|
|
#include "ve6400a.h"
|
|
|
|
|
2008-06-06 14:02:50 +00:00
|
|
|
TOOLBAR "" 0 0 0 2
|
|
|
|
|
2007-03-16 13:33:09 +00:00
|
|
|
BUTTON DLG_PRINT 10 2
|
1999-10-22 10:00:18 +00:00
|
|
|
BEGIN
|
2008-06-06 14:02:50 +00:00
|
|
|
PROMPT -14 -1 ""
|
|
|
|
END
|
|
|
|
|
|
|
|
BUTTON DLG_INFO 10 2
|
|
|
|
BEGIN
|
|
|
|
PROMPT -24 -11 ""
|
|
|
|
END
|
|
|
|
|
|
|
|
BUTTON DLG_HELP 10 2
|
|
|
|
BEGIN
|
|
|
|
PROMPT -34 -11 ""
|
|
|
|
END
|
1999-10-22 10:00:18 +00:00
|
|
|
|
|
|
|
BUTTON DLG_QUIT 10 2
|
|
|
|
BEGIN
|
2008-06-06 14:02:50 +00:00
|
|
|
PROMPT -44 -1 ""
|
|
|
|
END
|
1999-10-22 10:00:18 +00:00
|
|
|
|
|
|
|
ENDPAGE
|
|
|
|
|
2008-06-06 14:02:50 +00:00
|
|
|
PAGE "Scontrino" 0 0 0 0
|
1999-10-22 10:00:18 +00:00
|
|
|
|
|
|
|
LIST F_REGISTRATORE 5 20
|
|
|
|
BEGIN
|
|
|
|
PROMPT 1 1 "Registratore di cassa "
|
|
|
|
ITEM "ER400|ER 400 SMART"
|
|
|
|
ITEM "ER325|ER 325 IC"
|
2000-05-05 15:25:49 +00:00
|
|
|
ITEM "SCR|SCR"
|
1999-10-22 10:00:18 +00:00
|
|
|
END
|
|
|
|
|
|
|
|
STRING F_COFI 16
|
|
|
|
BEGIN
|
|
|
|
PROMPT 1 2 "Codice Fiscale o Partita IVA cliente "
|
|
|
|
FLAGS "U"
|
|
|
|
END
|
|
|
|
|
|
|
|
SPREADSHEET F_SHEET
|
|
|
|
BEGIN
|
|
|
|
PROMPT 0 3 ""
|
|
|
|
ITEM "Articolo@20"
|
|
|
|
ITEM "Descrizione@20"
|
|
|
|
ITEM "Quantita'"
|
|
|
|
ITEM "Prezzo@15"
|
|
|
|
ITEM "Reparto"
|
|
|
|
END
|
|
|
|
|
|
|
|
ENDPAGE
|
|
|
|
|
|
|
|
PAGE "Opzioni" -1 -1 78 18
|
|
|
|
|
|
|
|
STRING F_SALUTI 50
|
|
|
|
BEGIN
|
|
|
|
PROMPT 1 1 "Messaggio di saluto "
|
|
|
|
FLAGS "_"
|
|
|
|
END
|
|
|
|
|
2007-09-17 15:33:04 +00:00
|
|
|
BOOLEAN F_DOPPIOZERO
|
|
|
|
BEGIN
|
|
|
|
PROMPT 1 3 "Gestione 'corretta' della stampa degli importi interi (senza decimali)"
|
|
|
|
END
|
|
|
|
|
1999-10-22 10:00:18 +00:00
|
|
|
ENDPAGE
|
|
|
|
|
|
|
|
ENDMASK
|
|
|
|
|
|
|
|
PAGE "Riga Scontrino" -1 -1 40 10
|
|
|
|
|
|
|
|
STRING F_CODART 20
|
|
|
|
BEGIN
|
|
|
|
PROMPT 1 1 "Articolo "
|
|
|
|
USE LF_ANAMAG
|
|
|
|
INPUT CODART F_CODART
|
|
|
|
DISPLAY "Codice@20" CODART
|
|
|
|
DISPLAY "Descrizione@50" DESCR
|
|
|
|
OUTPUT F_CODART CODART
|
|
|
|
OUTPUT F_DESCART DESCR
|
2007-03-16 13:33:09 +00:00
|
|
|
OUTPUT F_REPARTO REPARTO
|
1999-10-22 10:00:18 +00:00
|
|
|
CHECKTYPE REQUIRED
|
|
|
|
ADD RUN ve2 -3
|
|
|
|
END
|
|
|
|
|
|
|
|
STRING F_DESCART 50 20
|
|
|
|
BEGIN
|
|
|
|
PROMPT 1 2 "Descrizione "
|
|
|
|
USE LF_ANAMAG KEY 2
|
|
|
|
INPUT DESCR F_DESCART
|
|
|
|
DISPLAY "Descrizione@50" DESCR
|
|
|
|
DISPLAY "Codice@20" CODART
|
|
|
|
COPY OUTPUT F_CODART
|
|
|
|
CHECKTYPE REQUIRED
|
|
|
|
ADD RUN ve2 -3
|
|
|
|
END
|
|
|
|
|
|
|
|
NUMBER F_QTA 15 5
|
|
|
|
BEGIN
|
|
|
|
PROMPT 1 3 "Quantita' "
|
|
|
|
PICTURE ".5"
|
|
|
|
END
|
|
|
|
|
2007-03-16 13:33:09 +00:00
|
|
|
CURRENCY F_PREZZO
|
1999-10-22 10:00:18 +00:00
|
|
|
BEGIN
|
|
|
|
PROMPT 1 4 "Prezzo "
|
|
|
|
PICTURE "."
|
|
|
|
END
|
|
|
|
|
|
|
|
NUMBER F_REPARTO 2
|
|
|
|
BEGIN
|
|
|
|
PROMPT 1 5 "Reparto "
|
|
|
|
END
|
|
|
|
|
|
|
|
BUTTON DLG_OK 10 2
|
|
|
|
BEGIN
|
|
|
|
PROMPT -13 -1 ""
|
|
|
|
END
|
|
|
|
|
|
|
|
BUTTON DLG_DELREC 10 2
|
|
|
|
BEGIN
|
|
|
|
PROMPT -23 -1 ""
|
|
|
|
END
|
|
|
|
|
|
|
|
BUTTON DLG_CANCEL 10 2
|
|
|
|
BEGIN
|
|
|
|
PROMPT -33 -1 ""
|
|
|
|
END
|
|
|
|
|
|
|
|
ENDPAGE
|
|
|
|
|
|
|
|
ENDMASK
|