63 lines
852 B
Plaintext
Executable File
63 lines
852 B
Plaintext
Executable File
#include "cg6900a.h"
|
|
|
|
PAGE "Invio contabilita'" -1 -1 76 11
|
|
|
|
NUMBER F_DITTAINV 5
|
|
BEGIN
|
|
PROMPT 2 1 "Codice ditta inviante "
|
|
FLAGS "Z"
|
|
CHECKTYPE REQUIRED
|
|
END
|
|
|
|
STRING F_RAGSOC 50
|
|
BEGIN
|
|
PROMPT 2 2 "Ragione sociale "
|
|
FLAGS "D"
|
|
END
|
|
|
|
NUMBER F_NUMULINV 3
|
|
BEGIN
|
|
PROMPT 2 4 "Numero ultimo invio "
|
|
FLAGS "R"
|
|
END
|
|
|
|
DATE F_DATAULIN
|
|
BEGIN
|
|
PROMPT 44 4 "Data ultimo invio "
|
|
END
|
|
|
|
STRING F_STATO 1
|
|
BEGIN
|
|
PROMPT 2 5 "Stato ultimo invio "
|
|
END
|
|
|
|
STRING F_USELAB 1
|
|
BEGIN
|
|
PROMPT 27 5 ""
|
|
END
|
|
|
|
STRING F_CHIAVE 15
|
|
BEGIN
|
|
PROMPT 30 5 ""
|
|
END
|
|
|
|
DATE F_DATALIM
|
|
BEGIN
|
|
PROMPT 2 7 "Data limite invio "
|
|
CHECKTYPE REQUIRED
|
|
END
|
|
|
|
BUTTON DLG_OK 9 2
|
|
BEGIN
|
|
PROMPT -12 -1 ""
|
|
END
|
|
|
|
BUTTON DLG_QUIT 9 2
|
|
BEGIN
|
|
PROMPT -22 -1 ""
|
|
END
|
|
|
|
ENDPAGE
|
|
|
|
ENDMASK
|