#include "batbais.h" TOOLBAR "" 0 20 0 2 #include ENDPAGE PAGE "Codici attivita' ISTAT" -1 -1 78 7 STRING FLD_TABAIS_CODTAB 5 BEGIN PROMPT 2 1 "Codice " FIELD LF_TABCOM->CODTAB HELP "Codice dell'attivita'" USE %AIS CHECKTYPE REQUIRED INPUT CODTAB FLD_TABAIS_CODTAB DISPLAY "Codice" CODTAB DISPLAY "Descrizione@50" S0 OUTPUT FLD_TABAIS_CODTAB CODTAB OUTPUT FLD_TABAIS_S0 S0 KEY 1 FLAGS "UZ" END STRING FLD_TABAIS_S0 40 BEGIN PROMPT 2 3 "Descrizione " FIELD LF_TABCOM->S0 HELP "Descrizione dell'attivita'" USE %AIS KEY 2 CHECKTYPE REQUIRED INPUT S0 FLD_TABAIS_S0 DISPLAY "Descrizione@50" S0 DISPLAY "Codice" CODTAB COPY OUTPUT FLD_TABAIS_CODTAB KEY 2 WARNING "Manca la descrizione" END ENDPAGE ENDMASK