#include "cg3500.h" PAGE "Riepilogo Gruppi/Conti" -1 -1 71 16 NUMBER F_CODDITTA 5 BEGIN PROMPT 2 1 "Ditta " FLAGS "FRD" USE LF_NDITTE 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 2 2 "Ragione sociale " FLAGS "D" END DATE F_DATASTAMPA BEGIN PROMPT 43 1 "Data di stampa " HELP "Data in cui effettuare la stampa" FLAGS "A" END NUMBER F_ANNO 4 BEGIN PROMPT 2 3 "Esercizio " HELP "Codice esercizio di cui effettuare la stampa" FLAGS "RZ" USE ESC INPUT CODTAB F_ANNO DISPLAY "Codice" CODTAB DISPLAY "Data inizio esercizio" D0 DISPLAY "Data fine esercizio" D1 OUTPUT F_ANNO CODTAB CHECKTYPE REQUIRED WARNING "Il codice esercizio deve essere presente nella tabella degli esercizi" ADD RUN cg0 -5 esc END RADIOBUTTON F_STAMPA 1 30 BEGIN PROMPT 2 5 "Scelta stampa " HELP "Indicare il grado di riepilogo" ITEM "1|Stampa riepilogo conti" ITEM "2|Stampa riepilogo gruppi" END RADIOBUTTON F_RICHIESTA 1 44 BEGIN PROMPT 2 9 "Richiesta stampa " HELP "Indicare il tipo di movimenti da stampare" ITEM "1|Stampa progressivi attuali" ITEM "2|Stampa progressivi movimenti eliminati" END ENDPAGE TOOLBAR "topbar" 0 0 0 2 #include ENDPAGE ENDMASK