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

**Defined in:** [[george:source:MACROS_MACB|MACROS MACB]]

**Used in:** [[george:source:BLOGNAL865|BLOGNAL865]], [[george:source:DOMONOP867|DOMONOP867]], [[george:source:LOGANAL864|LOGANAL864]], [[george:source:SETJOBQ867|SETJOBQ867]]

<code - SPRIVON.mac.txt>
 627J ...[??? SPRIVON SECT CENT FGN 2 DOC
 62CB    #   
 62X2    #     PROGRAM PRIVILEGE MACROS  
 63BL    #     THESE MACROS ACCESS THE JPRIV WORD IN THE JOB BLOCK   
 63W=    #              (AND ASSUME NO MORE THAN 12 PROGRAM PRIVILEGES CAN EXIST)
 64*W    #MAC  SPRIVON                  [MACRO TO TURN ON THE SPECIFIED PROGRAM  
 64TG          LDN   0  %A              [PRIVILEGE (%A) IN THE JOB BLOCK POINTED 
 65*6          ORS   0  JPRIV(%B)       [TO BY %B
 65SQ    #NOR
</code>