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

**Defined in:** [[george:source:MACROS_HL|MACROS HL]]

**Used in:** [[george:source:ABANDON867|ABANDON867]], [[george:source:CHTAB|CHTAB]], [[george:source:CONNECT867|CONNECT867]], [[george:source:INKS|INKS]], [[george:source:SCHEDJOB867|SCHEDJOB867]]

<code - UNSAVE.mac.txt>
 22FL ...[??? UNSAVE SECT CENT FGN 5 DOC 
 22^=    #   
 23DW    #           UNSAVE MACRO
 23YG    #           RESTORES A JOB HELD IN A FILE WITH LOCAL NAME EQUAL TO THAT 
 24D6    #           OF THE JOB NAME A USER NAME THE SAME AS THE OWNER OF THE
 24XQ    #           JOB AND A LANGUAGE CODE OF B1B1 
 254Y ...#           THE FIRST PARAMETER IS A WORD CONTAINING THE JOB NUMBER 
 25=6 ...#   
 25C# ...#           FOR SHARED FILESTORE, THERE IS A SECOND PARAMETER INDICATING
 25JG ...#           WHERE THE JOB IS TO BE UNSAVED (IE 'A' OR 'B' MACHINE)  
 25PN ...#   
 25X2    #   
 26BL    #MAC           UNSAVE   
 26C3 ...      FSHCODE  AORB 
 26CD ...(   
 26CT ...#STR  %B
 26D= ...(   
 26DM ...#ACC  %B
 26F4 ...(   
 26FF ...#STR  A,%B  
 26FW ...(   
 26G? ...#STR  B,%B  
 26GN ...!     PARAMETER B IS NOT RECOGNISED 
 26H5 ...#STR  B,%B  
 26HG ...#STR
 26HX ...      LDN   0  1
 26J# ...)   
 26JP ...#STR  A,%B  
 26K6 ...#STR
 26KH ...      LDN   0  0
 26KY ...      SMO      FX2  
 26L* ...      STO   0  ACOMMUNE2
 26LQ ...)   
 26M7 ...#ACC  %B
 26MJ ...#SKI
 26M^ ...(   
 26NB ...      SMO      FX2  
 26NR ...      STO   %B ACOMMUNE2
 26P8 ...)   
 26PK ...)   
 26Q2 ...#STR  %B
 26QC ...#STR
 26QS ...(   
 26R9 ...      NGN   0  1
 26RL ...      SMO      FX2  
 26S3 ...      STO   0  ACOMMUNE2
 26SD ...)   
 26ST ...)   
 26W=          LDX   0  %A   
 27*W          SMO      FX2  
 27TG          STO   0  ACOMMUNE1
 28*6          DOWN     UNSAVE,1 
 28SQ    #NOR
</code>