#include "batbgaz.h" TOOLBAR "" 0 20 0 2 #include ENDPAGE PAGE "Gruppi Aziendali" -1 -1 78 7 STRING F_TABGAZ_CODTAB 4 BEGIN PROMPT 2 1 "Codice " FIELD CODTAB HELP "Inserire il codice del gruppo aziendale" USE GAZ CHECKTYPE REQUIRED INPUT CODTAB F_TABGAZ_CODTAB DISPLAY "Codice" CODTAB DISPLAY "Descrizione@30" S0 OUTPUT F_TABGAZ_CODTAB CODTAB OUTPUT F_TABGAZ_DESCR S0 KEY 1 FLAGS "U" END STRING F_TABGAZ_DESCR 30 BEGIN PROMPT 2 3 "Denominazione " FIELD S0 HELP "Inserire la denominazione del gruppo aziendale" USE GAZ KEY 2 CHECKTYPE REQUIRED INPUT S0 F_TABGAZ_DESCR DISPLAY "Descrizione@30" S0 DISPLAY "Codice" CODTAB COPY OUTPUT F_TABGAZ_CODTAB KEY 2 END ENDPAGE ENDMASK