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

**Defined in:** [[george:source:MACROS_RJH|MACROS RJH]]

**Used in:** [[george:source:CONNECTA867|CONNECTA867]], [[george:source:LOGOUT867|LOGOUT867]], [[george:source:SAVEJOB865|SAVEJOB865]], [[george:source:UNSAVE867|UNSAVE867]]

<code - FJOBLOCK.mac.txt>
 37*# ...[??? FJOBLOCK SECT CENT FGN 71 DOC  
 37K6    #     THIS MACRO FREES THE SPEC JOBLOCK AND UPDATES THE WORDS IN THE
 384Q    #     1ST BLOCK IN THE JOB QUEUE. ITS PARAMETER IS A POINTER TO THE 
 38JB    #     JOBLOCK AND MUST BE A MODIFIER
 3942    #MAC  FJOBLOCK  
 39HL          FREECORE %A   
 3=3=    #NOR
</code>