#include "ca1600a.h" TOOLBAR "topbar" 0 0 0 2 #include ENDPAGE PAGE "Stampa commesse" 0 2 0 0 GROUPBOX DLG_NULL 77 6 BEGIN PROMPT 2 1 "@bDa commessa" END GROUPBOX DLG_NULL 77 6 BEGIN PROMPT 2 7 "@bA commessa" END GROUPBOX DLG_NULL 77 7 BEGIN PROMPT 2 13 "@bParametri" END NUMBER F_ANNO 4 BEGIN PROMPT 3 14 "Anno " USE ESC INPUT CODTAB F_ANNO DISPLAY "Codice Esercizio" CODTAB DISPLAY "Data inizio esercizio" D0 DISPLAY "Data fine esercizio " D1 OUTPUT F_ANNO CODTAB CHECKTYPE NORMAL FLAGS "RZ" ADD NONE END DATE F_DADATA BEGIN PROMPT 17 14 "Da data inizio " END DATE F_ADATA BEGIN PROMPT 48 14 "A data fine " END STRING F_REPORT 20 BEGIN PROMPT 2 -1 "Report alternativo " RSELECT "ca1600a" CHECKTYPE NORMAL END ENDPAGE ENDMASK