D QUSMLIB 11
D\ Message Library
D QUSMI 21 27
D\ Message Id
D\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
D\Format structure for the Exit Program Selection Criteria of the
D\QusRetrieveExitInformation API.
D\\\\ \\\
D\NOTE: This structure only defines fixed fields. Any varying
D\ length or repeating field will have to be defined by
D\ the user.
D\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
DQUSSE DS
D\ Qus Select Entry
D QUSSEðð 1 4B ð
D\ Size Entry
D QUSCO 5 8B ð
D\ Comp Operator
D QUSSPD 9 12B ð
D\ Start Pgm Data
D QUSLCD 13 16B ð
D\ Length Comp Data
D\QUSCD 17 17
D\
D\ Varying length
DQUSS DS
D\ Qus Selcrtr
D QUSNBRSC 1 4B ð
D\ Number Sel Criteria
D\QUSARRAY 17 DIM(ðððð1)
D\ QUSSEð1 9B ð OVERLAY(QUSARRAY:ðððð1)
D\ QUSCOðð 9B ð OVERLAY(QUSARRAY:ðððð5)
D\ QUSSPDðð 9B ð OVERLAY(QUSARRAY:ðððð9)
D\ QUSLCDðð 9B ð OVERLAY(QUSARRAY:ððð13)
D\ QUSCDðð 1 OVERLAY(QUSARRAY:ððð17)
D\
D\ Varying length
D\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
D\Format Structure for the Program Data. This structure has
D\set up to facilitate COBOL and RPG pointer basing.
D\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
DQUSPGMD DS
D\ Qus Program Data
D QUSDATAð1 1 1
D\ Varying length
D\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
D\Format structure for the EXTIð1ðð Format for the
D\QusRetrieveExitInformation API.
D\\\\ \\\
D\NOTE: This structure only defines fixed fields. Any varying
D\ length or repeating field will have to be defined by
D\ the user.
D\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
DQUSð1ððE DS BASED(INFSPCPTR)
D\ Qus EXTIð1ðð Entry
D QUSEPNðð 1
D\ Exit Point Name
D QUSFNð8 21 28
Appendix B. Original Examples in Additional Languages B-77