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

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

**Used in:** [[george:source:IPBPM84|IPBPM84]]

<code - PMSUB.mac.txt>
 4K^G    #   
 4LF6    # THIS MACRO SUBTRACTS 1 FROM THE SYSTEM OVERLOAD COUNT IF NECESSARY
 4LYQ    #   
 4MDB    #MAC  PMSUB                        [THIS MACRO IS USED IN SEGMENT IPBPM 
 4MY2          BNZ   0  M1   
 4NCL          LDX   0  PMCOUNT  
 4NX=          BZE   0  %A   
 4PBW          LDN   0  1
 4PWG          SBS   0  PMCOUNT  
 4QB6          BRN      %A   
 4QTQ    M1  
 4R*B    #NOR
</code>