#include "ba9b00.h" TOOLBAR "topbar" 0 0 0 2 #include ENDPAGE PAGE "Riga Selezione spedizione" -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 " USE %MSP INPUT CODTAB S_DA DISPLAY "Codice modalita'" CODTAB DISPLAY "Descrizione@50" 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) 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