{{htmlmetatags>metatag-description:(ICL George 3 and George 4 GIN macro: VALIDAT)}}
====== VALIDAT ======
(GIN Macro)

**Defined in:** [[george:source:MACROS_SJ|MACROS SJ]]

**Used in:** 

<code - VALIDAT.mac.txt>
 29FJ ...[   
 29LQ ...[   
 29S2 ...[??? VALIDAT SECT FILE FGN 24 DOC   
 2*9B    #MAC           VALIDAT  
 2*?K ...[VALIDAT IS USE TO RECURSIVELY VALIDATE INDIVIDUAL PARAM, IT IS THE 
 2**S ...[BODY OF THE MACRO VALIDATE 
 2*D3 ...[IF THE PARAMET CAUSES A COMPILATION ERROR THEN THE MACRO IS LEFT   
 2*G= ...[WITH 20?NON ZERO   
 2*JF ...[ENTRY PARAMETR IS 20V :- NUMBER OF PARAMS. TO VALIDATE 
 2*LN ...[%A,%B ETC. ARE TO BE VALIDATED 
 2*P2    #SKI           %A+0*0              [SKIPS IF %A SET OR NULL 
 2B8L    #SKI                               [ONLY GETS HERE IF ERROR 
 2BN=    (   
 2C7W    #DEF           20?=20?-1           [COUNT OF REMAINING PARAMETERS   
 2CMG    #SKI           20?                 [SKIP IF NONE LEFT   
 2D76     VALIDAT %B,%C,%D,%E,%F 
 2DLQ    )   
 2F6B    #NOR
</code>