D\

 

 

 

 

Varying length

D\QUSARRAYðð

 

2ð2

DIM(ðððð1)

D\ QUSEPNð1

 

 

OVERLAY(QUSARRAYðð:ðððð1)

D\ QUSFNð9

 

 

8

OVERLAY(QUSARRAYðð:ððð21)

D\ QUSMEPðð

 

 

9B ð

OVERLAY(QUSARRAYðð:ððð29)

D\ QUSNBREPðð

 

 

9B ð

OVERLAY(QUSARRAYðð:ððð33)

D\ QUSADðð

 

 

1

OVERLAY(QUSARRAYðð:ððð37)

D\ QUSACCðð

 

 

1

OVERLAY(QUSARRAYðð:ððð38)

D\ QUSREPðð

 

 

1

OVERLAY(QUSARRAYðð:ððð39)

D\ QUSPNAPðð

 

 

OVERLAY(QUSARRAYðð:ððð4ð)

D\ QUSPLAPðð

 

 

OVERLAY(QUSARRAYðð:ððð5ð)

D\ QUSPFAðð

 

 

8

OVERLAY(QUSARRAYðð:ððð6ð)

D\ QUSPNRPðð

 

 

OVERLAY(QUSARRAYðð:ððð68)

D\ QUSPLRPðð

 

 

OVERLAY(QUSARRAYðð:ððð78)

D\ QUSPFRð1

 

 

8

OVERLAY(QUSARRAYðð:ððð88)

D\ QUSPNRIðð

 

 

OVERLAY(QUSARRAYðð:ððð96)

D\ QUSPLRIðð

 

 

OVERLAY(QUSARRAYðð:ðð1ð6)

D\ QUSPFRð2

 

 

8

OVERLAY(QUSARRAYðð:ðð116)

D\ QUSDIðð

 

 

1

OVERLAY(QUSARRAYðð:ðð124)

D\ QUSDMFILðð

 

 

OVERLAY(QUSARRAYðð:ðð125)

D\ QUSDMLIBðð

 

 

OVERLAY(QUSARRAYðð:ðð135)

D\ QUSDMIðð

 

 

7

OVERLAY(QUSARRAYðð:ðð145)

D\ QUSTDðð

 

 

OVERLAY(QUSARRAYðð:ðð152)

D\ QUSERVEDð5

 

 

1

OVERLAY(QUSARRAYðð:ðð2ð2)

D\

 

 

 

 

 

D\

 

 

 

 

Varying length

D\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

D\Format structure for the EXTIð2ðð Format for the

D\QusRetrieveExitInformation API.

 

D\\\\

 

 

 

 

\\\

D\NOTE: This structure only defines fixed fields. Any varyi￿ng

D\

length or repeating field will have to be defined by

D\

the user.

 

 

 

 

D\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

DQUSð2ððE

DS

 

 

BASED(INFSPCPTR)

D\

 

 

 

 

Qus EXTIð2ðð Entry

D QUSONE

 

1

4B ð

 

D\

 

 

 

 

Offset Next Entry

D QUSEPNð2

 

5

24

 

D\

 

 

 

 

Exit Point Name

D QUSFN1ð

 

25

32

 

D\

 

 

 

 

Format Name

D QUSREPð1

 

33

33

 

D\

 

 

 

 

Registered Exit Pt

D QUSCE

 

34

34

 

D\

 

 

 

 

Complete Entry

D QUSERVEDð6

 

35

36

 

D\

 

 

 

 

Reserved

D QUSPGMN

 

37

4ðB ð

 

D\

 

 

 

 

Program Number

D QUSPGMNðð

 

41

 

D\

 

 

 

 

Program Name

D QUSPGML

 

51

 

D\

 

 

 

 

Program Library

D QUSDC

 

61

64B ð

 

D\

 

 

 

 

Data CCSID

D QUSOED

 

65

68B ð

 

D\

 

 

 

 

Offset Exit Data

 

 

 

Appendix

B. Original Examples in Additional BLanguages-79

Page 357
Image 357
IBM Version 4 manual Qusone, Qusce, Quspgmn, Quspgml, Qusdc, Qusoed