Syntax:

 

Valid <abValues>

 

Sample:

 

 

      @ 10,10 BROWSE Browse_1                                                ;

            WIDTH 610                                                        ;

            HEIGHT 390                                                       ;    

            HEADERS { 'Code' , 'First Name' , 'Last Name' } ;

            WIDTHS { 150 , 150 , 150 } ;

            WORKAREA Test ;

            FIELDS { 'Test->Code' , 'Test->First' , 'Test->Last' } ;

            VALUE 1 ;

            EDIT ;

            VALID { { || MemVar.Test.Code <= 1000 } , { || !Empty(MemVar.Test.First) } , { || !Empty(MemVar.Test.Last) } } ;

            VALIDMESSAGES { 'Code Range: 0-1000', 'First Name Cannot Be Empty', Nil }