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

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

**Used in:** [[george:source:BCAST867|BCAST867]], [[george:source:CDCIPB864|CDCIPB864]], [[george:source:CONIPB8|CONIPB8]], [[george:source:FINISHB867|FINISHB867]], [[george:source:IPBINB867|IPBINB867]], [[george:source:IPBOUT867|IPBOUT867]], [[george:source:JAMSWAP865|JAMSWAP865]], [[george:source:PROCONTX867|PROCONTX867]], [[george:source:SAVEJOB865|SAVEJOB865]]

<code - UNQUEUE.mac.txt>
 5T?# ...[??? UNQUEUE SECT CENT FGN 32 DOC   
 5TH6    #MAC  UNQUEUE   
 5W2Q          LDN   0  0
 5WGB          DSA   0  ATYPE(2)            [CLEAR WAITING STYLE 
 5X22          LDX   0  CHAINADD(2)  
 5XFL          SMO      BACKCHAN(2)  
 5X^=          STO   0  0                   [REMOVE THIS ACTIVITY FROM THE QUEUE 
 5YDW          LDX   0  BACKCHAN(2)         [OR LIST, WHICHEVER ITS ON   
 5YYG          SMO      CHAINADD(2)  
 5^D6          STO   0  1
 5^XQ          STOZ     BACKCHAN(2)         [NOT DOUBLY CHAINED  
 62CB    #NOR
</code>