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

**Defined in:** [[george:source:ACCESSMACROS|ACCESSMACROS]]

**Used in:** [[george:source:BMFIXIT864|BMFIXIT864]], [[george:source:GETDIRX860|GETDIRX860]], [[george:source:LISTDIR867|LISTDIR867]], [[george:source:LOCATE84|LOCATE84]]

<code - NEXTENT.mac.txt>
 #*HB ...[??? NEXTENT SECT FILE FGN 19 DOC   
 #DF6    #MAC  NEXTENT   
 #DYQ    [     THIS  MACRO EXPECTS A DIRECTORY OPEN AT LEVEL %A, POSITIONED ON   
 #FDB    [     A NAME RECORD,AND IT EXPECTS A FILE/ENT BLOCK FOR THIS ENTRY TO   
 #FY2    [     BE IN THE ACTIVITY CHAIN. 
 #GCL          MHUNTW   1,FILE,ENT   
 #GX=    #SKI  K6ACCESS>99$99
 #HBW    (   
 #HWG          BPZ   1  M1NEXTENT
 #JB6    M2NEXTENT   
 #JTQ          GEOERR   1,NEXTENT!   
 #K*B    M1NEXTENT   
 #KT2    )   
 #L#L          LDEX  2  ECOPS(1) 
 #LS=          ADX   2  ENUSE(1) 
 #M?W          LDN   0  #1000
 #MRG          ANDX  0  EINF2(1) 
 #N?6          BZE   0  M3NEXTENT
 #NQQ          ADN   2  1
 #P=B    M3NEXTENT   
 #PQ2          SKIP     %A,1(2)  
 #Q9L          BZE   3  M4NEXTENT
 #QP=    #SKI  K6ACCESS>99$99
 #R8W    (   
 #RNG          LDEX  0  EREC-A1(3)   
 #S86          SBN   0  FRDE 
 #SMQ          BNZ   0  M2NEXTENT
 #T7B          LDX   0  ERES-A1(3)   
 #TM2          BNZ   0  M2NEXTENT
 #W6L    )   
 #WL=    M4NEXTENT   
 #X5W    #NOR
</code>