SPOOL exit 096 (server selection)

This system exit enables SPOOL administration (TSOS or PRINT-SERVICE-ADM) to select specific servers by means of combining the appropriate selection criteria. The selection may be tied to an individual decision table stipulating, for example, that the jobs of user A with paper format A are to be directed to server X, while the jobs of user A with paper format B are to go to server B, and so on.

Exit 096 must be started on the client.

When changes are made to the server list, care should be taken that consistency is not impaired. The server selected by the SPOOL administrator must be contained in the server list passed to the exit. The SPOOL administrator can ensure that this the case by:

• placing the requested server at the first position in the list and keeping all the other servers

• placing the requested server at the first position in the list and setting the number of available servers in the list to 1.

The following information is passed to the exit routine:
R1 = A (EX096 parameter area)

The return codes are entered in the standard header:

dd	cc	bb	aa

A return code concerning execution of EX096 is passed in the standard header:

aa=maincode1
bb=maincode2
cc=subcode1
dd=subcode2

X'aa'	Meaning
00	Exit processed without errors
01	Exit processed without errors

 

DSECT

A DSECT/CSECT for the parameter area can be created using the EX096 macro. “prefix” must not be longer than 3 characters.

         EX096 D
SVSEXPL  DSECT ,             SERVER SELECTION EXIT P/L
E96EXBEG DS    0H
         FHDR  MF=(C,E96),EQUATES=NO
         DS    0A
E96FHE   DS    0XL8            0   GENERAL PARAMETER AREA HEADER
*
E96IFID  DS    0A              0   INTERFACE IDENTIFIER
E96FCTU  DS    AL2             0   FUNCTION UNIT NUMBER
*                                  BIT 15    HEADER FLAG BIT,
*                                  MUST BE RESET UNTIL FURTHER NOTICE
*                                  BIT 14-12 UNUSED, MUST BE RESET
*                                  BIT 11-0  REAL FUNCTION UNIT NUMBER
E96FCT   DS    AL1             2   FUNCTION NUMBER
E96FCTV  DS    AL1             3   FUNCTION INTERFACE VERSION NUMBER
*
E96RET   DS    0A              4   GENERAL RETURN CODE
E96SRET  DS    0AL2            4   SUB RETURN CODE
E96SR2   DS    AL1             4   SUB RETURN CODE 2
E96SR1   DS    AL1             5   SUB RETURN CODE 1
E96MRET  DS    0AL2            6   MAIN RETURN CODE
E96MR2   DS    AL1             6   MAIN RETURN CODE 2
E96MR1   DS    AL1             7   MAIN RETURN CODE 1
E96FHL   EQU   8               8   GENERAL OPERAND LIST HEADER LENGTH
*
* 
*   EQUATES FOR EXIT RETURN INFORMATION IN &P.RET 
* 
E96EXNOK EQU   1                        EXIT NOK
E96EXOK  EQU   0                        EXIT OK
E96SCBAD DC    A(0)                    ADDRESS OF SCB 
E96SVLAD DC    A(0)                    ADDRESS OF SERVER LIST
         DS    CL12                    RESERVED FOR EXTENTION 
E96PLLEN EQU   *-E96EXBEG              LENGTH OF THE PARAMETER LIST 
         SPACE 3 
E96SVL   DSECT ,             SERVER LIST DESCRIPTION 
E96SV#   DS    F                       SERVERS# 
E96SVSZ  DS    F                       SIZE 
E96SV    DS    0XL20                   SERVER(SERVERS#) (1 ENTRY) 
E96SVN   DS    CL8                     NAME 
E96APR#  DS    FL4                     PRINTERS#
E96DT    DS    XL8                     DEVICE_TYPES