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

**Defined in:** [[george:source:MACROS_RME10|MACROS RME10]]

**Used in:** [[george:source:CLOSEMT867|CLOSEMT867]], [[george:source:LIBREQCA867|LIBREQCA867]], [[george:source:LIBSEC867|LIBSEC867]], [[george:source:NEWA867|NEWA867]], [[george:source:NEWOWN865|NEWOWN865]], [[george:source:RENAMAG864|RENAMAG864]], [[george:source:RENAMDIR|RENAMDIR]], [[george:source:RETURNIT867|RETURNIT867]]

<code - SSCOR.mac.txt>
 9P#4 ...[??? SSCOR SECT FILE FGN 4 DOC  
 9PHW    #     MACRO TO DECREASE THE COUNT OF REQUESTERS 
 9Q3G    #     %B USED IN CASE OF FUTURE ENHANCEMENTS
 9QH6    #MAC  SSCOR 
 9R2Q          LDX   0  5+%A 
 9RGB          ANDN  0  #7777
 9S22          BNZ   0  M0SSC
 9SFL          GEOERR   1,SERCOR 
 9S^=    M0SSC SBN   0  1
 9TDW          DSA   0  5+%A 
 9TYG    #NOR
</code>