campo-sirio/cg/cg7100p.uml

64 lines
1020 B
Plaintext
Raw Normal View History

#include "cg7100.h"
PAGE "Lista movimenti stati a fiscalita' agevolata" -1 -1 78 8
NUMBER F_CODDITTA 5
BEGIN
PROMPT 1 1 "Ditta "
FLAGS "FRD"
USE LF_NDITTE KEY 1
CHECKTYPE REQUIRED
INPUT CODDITTA F_CODDITTA
DISPLAY "Codice" CODDITTA
DISPLAY "Ragione sociale @50" RAGSOC
OUTPUT F_CODDITTA CODDITTA
OUTPUT F_RAGSOC RAGSOC
END
STRING F_RAGSOC 50
BEGIN
PROMPT 15 1 ""
FLAGS "D"
END
DATE F_DATASTAMPA
BEGIN
PROMPT 1 2 "Data stampa "
HELP "Data in cui viene effettuata la stampa"
FLAGS "A"
FIELD #DATASTAMPA
END
LIST F_P_TIPOELENCO 9
BEGIN
PROMPT 1 3 "Tipo elenco "
HELP "Indicare cosa includere nella stampa"
ITEM "C|Clienti"
ITEM "F|Fornitori"
FIELD #TIPOELENCO
END
DATE F_DATAINI
BEGIN
PROMPT 1 5 "Movimenti dalla data "
HELP "Data da cui iniziare la stampa"
FIELD #DATAINI
END
DATE F_DATAFIN
BEGIN
PROMPT 38 5 "alla data "
HELP "Data fino a cui eseguire la stampa"
FIELD #DATAFIN
END
ENDPAGE
TOOLBAR "topbar" 0 0 0 2
#include <printbar.h>
ENDPAGE
ENDMASK