#include "cgstver.h" TOOLBAR "topbar" 0 0 0 2 #include ENDPAGE PAGE "Stampa tabella versamenti ed interessi IVA " 0 2 0 0 NUMBER F_INIZIO1 4 BEGIN PROMPT 2 1 "Da anno " FLAGS "ZR" FIELD FROM[1,4] USE %VER KEY 1 INPUT CODTAB[1,4] F_INIZIO1 DISPLAY "Anno esercizio@23" CODTAB[1,4] DISPLAY "Mese esercizio@23" CODTAB[5,6] OUTPUT F_INIZIO1 CODTAB[1,4] OUTPUT F_INIZIO2 CODTAB[5,6] GROUP 1 END NUMBER F_INIZIO2 2 BEGIN PROMPT 25 1 "Mese " FLAGS "ZR" FIELD TO[5,6] COPY USE F_INIZIO1 INPUT CODTAB[1,4] F_INIZIO1 INPUT CODTAB[5,6] F_INIZIO2 COPY DISPLAY F_INIZIO1 COPY OUTPUT F_INIZIO1 GROUP 1 END NUMBER F_FINE1 4 BEGIN PROMPT 2 2 "Ad anno " FLAGS "ZR" FIELD TO[1,4] COPY USE F_INIZIO1 INPUT CODTAB[1,4] F_FINE1 COPY DISPLAY F_INIZIO1 OUTPUT F_FINE1 CODTAB[1,4] OUTPUT F_FINE2 CODTAB[5,6] GROUP 2 END NUMBER F_FINE2 2 BEGIN PROMPT 25 2 "Mese " FLAGS "ZR" FIELD TO[5,6] COPY USE F_INIZIO1 INPUT CODTAB[1,4] F_FINE1 INPUT CODTAB[5,6] F_FINE2 COPY DISPLAY F_INIZIO1 COPY OUTPUT F_FINE1 GROUP 2 END ENDPAGE ENDMASK