#include "ba3200.h" TOOLBAR "topbar" 0 0 0 2 #include ENDPAGE PAGE "Stampa Uffici Imposte Dirette" 0 2 0 0 NUMBER F_INIZIO1 3 BEGIN PROMPT 2 1 "Da codice " USE %UID INPUT CODTAB F_INIZIO1 DISPLAY "Codice" CODTAB DISPLAY "Descrizione@40" S0 OUTPUT F_INIZIO1 CODTAB FIELD FROM GROUP 1 FLAGS "RZ" END NUMBER F_FINE1 3 BEGIN PROMPT 20 1 "A codice " COPY USE F_INIZIO1 INPUT CODTAB F_FINE1 COPY DISPLAY F_INIZIO1 OUTPUT F_FINE1 CODTAB GROUP 2 FIELD TO FLAGS "RZ" END ENDPAGE ENDMASK