#include TOOLBAR "" 0 20 0 2 #include ENDPAGE PAGE "Tabella Note Documento" -1 -1 78 8 STRING F_CODICE 2 BEGIN PROMPT 4 2 "Codice " FIELD CODTAB FLAGS "U" KEY 1 USE %NDO INPUT CODTAB F_CODICE DISPLAY "Codice" CODTAB DISPLAY "Descrizione @30" S0 OUTPUT F_CODICE CODTAB OUTPUT F_DESCR S0 CHECKTYPE REQUIRED END STRING F_DESCR 30 BEGIN PROMPT 4 4 "Descrizione " FIELD LF_TABCOM->S0 KEY 2 USE %NDO KEY 2 INPUT CODTAB F_CODICE INPUT S0 F_DESCR DISPLAY "Descrizione @30" S0 DISPLAY "Codice" CODTAB OUTPUT F_CODICE CODTAB OUTPUT F_DESCR S0 CHECKTYPE REQUIRED END ENDPAGE ENDMASK