CHANGE [ICL George 3]

This page is read only. You can view the source, but not change it. Ask your administrator if you think this is wrong.

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

**Defined in:** [[george:source:MACRO_COMPRO|MACRO COMPRO]]

**Used in:** [[george:source:MESSB|MESSB]], [[george:source:MESSCB|MESSCB]], [[george:source:MESSCF|MESSCF]], [[george:source:MESSH|MESSH]], [[george:source:WTSTAT867|WTSTAT867]]

<code - 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
</code>