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

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

**Used in:** [[george:source:LOGOUT867|LOGOUT867]]

<code - CLEANEND.mac.txt>
 =WCJ ...[??? CLEANEND SECT CENT FGN 21 DOC  
 =WMB    [   
 =X72    [ THIS MACRO CLEANS UP TO LEVEL ZERO (USED IN LOGOUT)   
 =XLL    [     AND SETS CPLEV ACCORDINGLY.   
 =Y6=    #MAC  CLEANEND  
 =YKW          LDX   2  FX2  
 =^5G          STOZ     CPLEV(2) 
 =^K6          LDCT  0  #010 
 ?24Q          STO   0  EXT+3(2) 
 ?2JB          DOWN     CLEAN,1  
 ?2MG ...      MHUNTW   2,CPB,CALAS  
 ?2QL ...      NGN   0  1
 ?2TQ ...      STO   0  APARAFIR(2)  
 ?2YW ...      LDX   2  FX2  
 ?342    #NOR
</code>