#include "ba9b00.h" TOOLBAR "topbar" 0 0 0 2 #include ENDPAGE PAGE "Riga Selezione categoria economica" -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 CVE INPUT CODTAB S_DA DISPLAY "Codice vendita" CODTAB DISPLAY "Descrizione@30" S0 OUTPUT S_DA CODTAB END STRING S_A 3 BEGIN PROMPT 2 6 "A " COPY USE S_DA INPUT CODTAB S_A COPY DISPLAY S_DA OUTPUT S_A CODTAB NUM_EXPR (#S_A=="")||(#S_A>=#S_DA) FLAGS "U" WARNING "Il limite superiore deve essere maggiore di quello inferiroe" END STRING S_FIELD 25 BEGIN PROMPT 2 8 "Nome campo" FLAGS "D" END ENDPAGE ENDMASK