XSFCB [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: XSFCB)}}
====== XSFCB ======
(GIN Macro)

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

**Used in:** 

<code - XSFCB.mac.txt>
 #?SN ...[??? XSFCB SECT FILE FGN 20 DOC 
 ##4G    #MAC  XSFCB 
 ##J6    [ THIS IS THE REDEFINED SFCB MACRO WHICH GIVES A POINTER IN %B TO THE   
 #*3Q    [ FCB OF THE FILE OPEN AT LEVEL %A TO THE CURRENT ACTIVITY  
 #*HB          SFSTACK  %A,%B               [TO GIVE %B-> TO FCA IN STACK BLOCK  
 #B32     MOD ADX %B FBACKPOINT,%B          [%B -> FSTACK
 #BGL     MOD LDX %B BPTR,%B                [%B -> FCB   
 #C2=     MOD LDX 0 ATYPE,%B                [= FCB?  
 #CFW          SBX   0  FILEPLUSFCB  
 #C^G          BZE   0  M1XSFCB  
 #DF6    #SKI  K6ALLGEO  
 #DYQ          GEOERR   1,FCB MISS   
 #FDB    M1XSFCB 
 #FY2    #NOR
</code>