55 lines
673 B
Plaintext
55 lines
673 B
Plaintext
|
#include "vd1100.h"
|
||
|
|
||
|
TOOLBAR "" 0 20 0 2
|
||
|
|
||
|
BUTTON DLG_PRINT 10 2
|
||
|
BEGIN
|
||
|
PROMPT -12 -1 ""
|
||
|
END
|
||
|
|
||
|
BUTTON DLG_QUIT 10 2
|
||
|
BEGIN
|
||
|
PROMPT -22 -1 ""
|
||
|
END
|
||
|
|
||
|
ENDPAGE
|
||
|
|
||
|
PAGE "Parametri stampa" 1 1 60 14
|
||
|
|
||
|
STRING F_CODCASSA 3
|
||
|
BEGIN
|
||
|
PROMPT 2 2 "Cassa "
|
||
|
USE CAS
|
||
|
INPUT CODTAB F_CODCASSA
|
||
|
DISPLAY "Codice" CODTAB
|
||
|
DISPLAY "Descrizione @50" S0
|
||
|
OUTPUT F_CODCASSA CODTAB
|
||
|
OUTPUT F_CASSA_DESCR S0
|
||
|
FIELD CODCASSA
|
||
|
CHECKTYPE REQUIRED
|
||
|
FLAGS "UZDG"
|
||
|
END
|
||
|
|
||
|
STRING F_CASSA_DESCR 50
|
||
|
BEGIN
|
||
|
PROMPT 15 2 ""
|
||
|
FLAGS "D"
|
||
|
END
|
||
|
|
||
|
DATE F_DATA
|
||
|
BEGIN
|
||
|
PROMPT 2 3 "Data "
|
||
|
FLAGS "A"
|
||
|
FIELD DATA
|
||
|
END
|
||
|
|
||
|
STRING F_REPORT 256 56
|
||
|
BEGIN
|
||
|
PROMPT 2 5 "Report "
|
||
|
FLAGS "B"
|
||
|
END
|
||
|
|
||
|
ENDPAGE
|
||
|
|
||
|
ENDMASK
|