D\Prototype for calling List Spooled File API QUSLSPL

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

D QUSLSPL

C

 

 

'QUSLSPL'

 

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

D\Type definition for the SPLFð2ðð format.

 

D\\\\\\\

 

 

 

 

 

D\NOTE: The following type definition only defines the fixed

D\

portion of the format. Any varying length field will

D\

have to be defined by the user.

 

 

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

DQUSSPLKI

DS

 

1ðð

BASED(LSTPTR2)

 

D\

 

 

 

 

Qus LSPL Key Info

D QUSLFIRð2

 

1

4B ð

 

 

D\

 

 

 

 

Len Field Info Retd

D QUSKFFFRðð

 

5

8B ð

 

 

D\

 

 

 

 

Key Field for Field Retd

D QUSTODð2

 

9

9

 

 

D\

 

 

 

 

Type of Data

D QUSR3ðð

 

12

 

 

D\

 

 

 

 

Reserv3

 

D QUSDLð2

 

13

16B ð

 

 

D\

 

 

 

 

Data Length

D\QUSDATAð8

 

17

17

 

 

D\

 

 

 

 

 

 

D\

 

 

 

Varying length

 

D\QUSERVED34

 

18

18

 

 

D\

 

 

 

 

 

 

D\

 

 

 

Varying length

 

DQUSFð2ðð

DS

 

 

BASED(LSTPTR)

 

D\

 

 

 

 

Qus SPLFð2ðð

D QUSNBRFRðð

 

1

4B ð

 

 

D\

 

 

 

 

Num Fields Retd

D\QUSKIðð

 

 

18

 

 

D\ QUSLFIRð3

 

5

8B ð

 

 

D\ QUSKFFFRð1

 

9

12B ð

 

 

D\ QUSTODð3

 

13

13

 

 

D\ QUSR3ð1

 

14

16

 

 

D\ QUSDLð3

 

17

2ðB ð

 

 

D\ QUSDATAð9

 

21

21

 

 

D\ QUSERVED35

 

22

22

 

 

D\

 

 

 

 

 

 

D\

 

 

 

Varying length

 

C\

 

 

 

 

 

 

C\ Start of mainline

 

 

 

 

C\

 

 

 

 

 

 

C\

 

 

 

 

 

 

C\ Set Error Code structure to use exceptions

 

C\

 

 

 

 

 

 

C

 

 

Z-ADD

ð

QUSBPRV

.1/

C\

 

 

 

 

 

 

C\ Create a User Space for the List generated by QUSLSPL

C\

 

 

 

 

 

 

C

 

 

CALL

'QUSCRTUS'

.2/

C

 

 

PARM

 

SPC_NAME

 

C

 

 

PARM

'QUSLSPL

' EXT_ATTR

C

 

 

PARM

 

SPC_SIZE

 

C

 

 

PARM

 

SPC_INIT

 

C

 

 

PARM

'\ALL'

SPC_AUT

B-44System API Programming V4R1

Page 322
Image 322
IBM Version 4 Dqussplki, BASEDLSTPTR2, QUSERVED34, QUSERVED35, Call Quscrtus Parm Spcname, Extattr Parm Spcsize Spcinit