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

**Defined in:** [[george:source:RING-MACROS|RING-MACROS]]

**Used in:** [[george:source:CONTXCOD60|CONTXCOD60]], [[george:source:INCEOT865|INCEOT865]], [[george:source:LIBREQCA867|LIBREQCA867]], [[george:source:LOADERR70|LOADERR70]], [[george:source:LOADFIN860|LOADFIN860]], [[george:source:LOADPROG865|LOADPROG865]], [[george:source:RETURN867|RETURN867]], [[george:source:SAVEFILE860|SAVEFILE860]], [[george:source:SJOPEN863|SJOPEN863]]

<code - CHANGEFILE.mac.txt>
 F298 ...[??? CHANGEFI SECT FILE FGN 20 DOC  
 F2F2    #   
 F2YL    # THIS MACRO CHANGES A FILE OF GIVEN LEVEL TO CURRENT ACTIVITY TO   
 F3D=    # A GIVEN LEVEL OF A SPECIFIED ACTIVITY.
 F3XW    #   
 F4CG    #MAC           CHANGEFILE   
 F4X6    #ACC  %A
 F5BQ    #SKI
 F5WB    (   
 F6B2          SMO      FX2  
 F6TL          STO   %A ACOMMUNE3
 F7*=    )   
 F7SW    #ACC  %A
 F8#G    (   
 F8S6          LDX   0  %A   
 F9?Q          SMO      FX2  
 F9RB          STO   0  ACOMMUNE3
 F=?2    )   
 F=QL    #STR           %B   
 F?==    #SKI
 F?PW    (   
 F#9G          SMO      FX2  
 F#P6          STOZ     ACOMMUNE2
 F*8Q    )   
 F*NB    #STR           %B   
 FB82    (   
 FBML          LDN   0  %B   
 FC7=          SMO      FX2  
 FCLW          STO   0  ACOMMUNE2
 FD6G    )   
 FDL6    #STR           %C   
 FF5Q    #SKI
 FFKB    (   
 FG52          SMO      FX2  
 FGJL          STOZ     ACOMMUNE1
 FH4=    )   
 FHHW    #STR           %C   
 FJ3G    (   
 FJH6          LDN   0  %C   
 FK2Q          SMO      FX2  
 FKGB          STO   0  ACOMMUNE1
 FL22    )   
 FLFL          DOWN     CHANFILE,1   
 FL^=    #NOR
</code>