9=M# ...[??? TOPFCA SECT FILE FGN 20 DOC
 9=X6    #MAC  TOPFCA
 9?BQ    [ THIS MACRO SEARCHES FOR THE RING ELEMENT OF THE TOP FILE OPEN TO THE  
 9?WB    [ CURRENT ACTIVITY AND GIVES A POINTER TO IT IN %A  
 9#B2          SMO      FX2  
 9#TL    #ACC   %A   
 9**=    #SKI
 9*SW          LDX   %A FILERING            [FOR %A AN ACCUMUALTOR   
 9B#G    #ACC %A 
 9BS6    (   
 9C?Q          LDX   0  FILERING            [FOR %A NOT AN ACCUMULATOR   
 9CRB          STO   0  %A   
 9D?2    )   
 9DQL    #NOR