#include "ba9b00.h" TOOLBAR "topbar" 0 0 0 2 #include ENDPAGE PAGE "Riga Selezione Listino" -1 -1 78 19 STRING S_DESCR 25 BEGIN PROMPT 2 2 "Campo" FLAGS "D" END STRING S_DA 3 BEGIN PROMPT 2 4 "Da " FLAGS "U" USE LF_CONDV INPUT TIPO "L" INPUT CATVEN "" INPUT COD S_DA DISPLAY "Codice" COD DISPLAY "Descrizione@50" DESCR OUTPUT S_DA COD END STRING S_A 3 BEGIN PROMPT 2 6 "A " COPY USE S_DA INPUT TIPO "L" INPUT CATVEN "" INPUT COD S_A COPY DISPLAY S_DA OUTPUT S_A COD STR_EXPR (#S_A=="")||(#S_A>=#S_DA) WARNING "Il limite superiore deve essere maggiore di quello inferiore" END STRING S_FIELD 25 BEGIN PROMPT 2 8 "Nome campo" FLAGS "D" END ENDPAGE ENDMASK