CHANGE

(GIN Macro)

Defined in: MACRO COMPRO

Used in: MESSB, MESSCB, MESSCF, MESSH, WTSTAT867

CHANGE.mac.txt

 CMPS ...[??? CHANGE SECT CENT FGN 21 DOC
 CM^L    #MAC  CHANGE
 CNF=    #MEN  VERBCLAS  
 CNYW          4H%A  
 CPDG    #DEF  0?=0  
 CPY6    #DEF  20?=34?+0]&#37777777  
 CQCQ          8HVERBCLAS
 CQXB    #SKI  20?/#1000000<14-14
 CRC2    #DEF  0?=20?/#1000000+34?+K90VERBCLAS-1]
 CRWL    #SKI  20?/#1000000>13-13
 CSB=    (   
 CSTW    #END
 CT*G    #MEND VCLASTWO  
 CTT6    #DEF  0?=20?/#1000000+34?+K90VCLASTWO-14]   
 CW#Q    )   
 CWSB ...      XFBDSKPA %A,CHANGE
 CX#2    #SKI  21?   
 CXRL    (   
 CY?=    #STR  #,%B  
 CYQW    #DEF  20?=CTX%B+CTX%C+CTX%D+CTX%E+CTX%F+CTX%G+CTX%H+CTX%I+CTX%J+CTX%K   
 C^=G    #STR  #,%B  
 C^Q6    #STR
 D29Q    #DEF  20?=%B
 D2PB    #DEF  0?=0?+4   
 D392    #DEF  MFORBID=34?+0?+0]$20? 
 D3NL          +MFORBID  
 D48=    #FRE  MFORBID   
 D4MW    )   
 D57G    #END
 D5M6    #NOR