#include "ve2700.h" TOOLBAR "Toolbar" 0 0 0 2 #include ENDPAGE PAGE "Ricerca listino padre" 0 2 0 0 GROUPBOX DLG_NULL 78 4 BEGIN PROMPT 0 0 "@bDati listino padre" END LIST DLG_NULL 1 7 BEGIN PROMPT 100 100 "" ITEM "L|Listino" FLAGS "D" FIELD TIPO KEY 1 END STRING F_FATHCATVEN 2 BEGIN PROMPT 1 1 "Cat. ven. " FLAGS "U" KEY 1 USE CVE INPUT CODTAB F_FATHCATVEN DISPLAY "Cat." CODTAB DISPLAY "Descrizione@50" S0 OUTPUT F_FATHCATVEN CODTAB OUTPUT F_FATHDESVEN S0 CHECKTYPE FORCED END STRING F_FATHDESVEN 50 BEGIN PROMPT 18 1 "" USE CVE KEY 2 INPUT S0 F_FATHDESVEN DISPLAY "Descrizione@50" S0 DISPLAY "Cat." CODTAB COPY OUTPUT F_FATHCATVEN CHECKTYPE NORMAL END STRING F_FATHCODLIS 3 BEGIN PROMPT 1 2 "Listino " FLAGS "B" END STRING F_FATHDESLIS 50 BEGIN PROMPT 18 2 "" FLAGS "D" END ENDPAGE ENDMASK