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

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

**Used in:** [[george:source:READFAIL866|READFAIL866]], [[george:source:SETPC867|SETPC867]], [[george:source:WSPERIS867|WSPERIS867]]

<code - TOPFCBV.mac.txt>
 9X7J ...[??? TOPFCBV SECT FILE FGN 20 DOC   
 9XCB    #MAC  TOPFCBV   
 9XX2    #     GIVES  PTR  TO  FCB  OF TOP FILE OPEN TO ACTIVITY POINTED TO BY   
 9YBL    #     %B
 9YW=     MOD LDX %A FILERING,%B 
 9^*W          PSTAC  %A,%A  
 9^TG          BFCBX  %A,%A  
 =2*6    #NOR
</code>