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

**Defined in:** [[george:source:MACROS_HFD8|MACROS HFD8]]

**Used in:** [[george:source:GETON867|GETON867]], [[george:source:GETONA867|GETONA867]], [[george:source:LIBCOM867|LIBCOM867]], [[george:source:NETOFLNE867|NETOFLNE867]], [[george:source:NEWDIR867|NEWDIR867]], [[george:source:USERDIR842|USERDIR842]]

<code - JFREZFCB.mac.txt>
 6BL2 ...[??? JFREZFCB SECT FILE FGN 22 DOC  
 6CK= ...#MAC  JFREZFCB  
 6D4W ...[   
 6DJG ...[  %A=POINTER TO FCB.   
 6F46 ...[  %B=LABEL TO JUMP TO IF FILE IS USER-FROZEN AND USER MAY NOT  
 6FHQ ...[     ACCESS IT. SETS A SUITABLE ERROR REPLY,OR OK IF DOES NOT  
 6G3B ...[     JUMP. 
 6GH2 ...      JBC      MJFREZFCB,%A,BFUSERFREZ  
 6GL6 ...#STR  %C
 6GP= ...      DOWN     USEREXCP,2   
 6GSB ...#STR  %C
 6GXG ...#SKI
 6H2L ...      DOWN     USEREXCP,1   
 6HG= ...      BRN      %B   
 6H^W ...MJFREZFCB   
 6JFG ...#NOR
</code>