D\

 

 

(Copied Into Program)

 

C\

 

 

 

 

 

 

C\APIs Used: QUSCRTUS - Create User Space

 

 

 

C\

QSYLOBJP - List Objects That Adopt Owner Authority

C\

QUSROBJD - Retrieve Object Description

 

 

C\

QUSPTRUS - Retrieve Pointer to User Space

 

C\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

H

 

 

 

 

 

 

C\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

C\

 

 

 

 

 

 

D/COPY QSYSINC/QRPGLESRC,QUSEC

 

 

 

 

 

D\

 

 

 

 

 

 

DSPC_NAME

S

INZ('ADOPTS

QTEMP

')

DSPC_SIZE

S

9B ð INZ(1)

 

 

 

DSPC_INIT

S

1

INZ(X'ðð')

 

 

 

DLSTPTR

S

\

 

 

 

 

DSPCPTR

S

\

 

 

 

 

DARR

S

1

BASED(LSTPTR) DIM(32767)

 

DRCVVAR

S

8

 

 

 

 

DRCVVARSIZ

S

9B ð INZ(%SIZE(RCVVAR))

 

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

D\

 

 

 

 

 

 

D\ The following QUSGEN include is copied into this progra￿m so

 

D\ that it can be declared as BASED on SPCPTR

(shown at .21/

 

D\ in the incorrect and correct programs on pages

 

 

D\ 9-37 and 9-45, respectively)

 

 

 

 

 

D\

 

 

 

 

 

 

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

D\

 

 

 

 

 

 

D\\\ START HEADER FILE SPECIFICATIONS \\\\\\\\\\\\\\\\\\\\\\\\\\\\

D\

 

 

 

 

 

 

D\Header File Name: H/QUSGEN

 

 

 

 

 

D\

 

 

 

 

 

 

D\Descriptive Name: Format structures for User Space for I￿LE/C

 

D\

 

 

 

 

 

 

D\

 

 

 

 

 

 

D\5763-SS1

(C) Copyright IBM Corp.

1994, 1994

 

 

 

D\All rights reserved.

 

 

 

 

 

D\US Government Users Restricted Rights -

 

 

 

D\Use, duplication or disclosure restricted

 

 

 

D\by GSA ADP Schedule Contract with IBM Corp.

 

 

 

D\

 

 

 

 

 

 

D\Description: Contains the Generic Record format header￿s

 

D\

for the user space.

 

 

 

 

 

D\

 

 

 

 

 

 

D\Header Files Included: none.

 

 

 

 

 

D\

 

 

 

 

 

 

D\Macros List: none.

 

 

 

 

 

D\

 

 

 

 

 

 

D\Structure List: Qus_Generic_Header_ð1ðð

 

 

 

D\

Qus_Generic_Header_ð3ðð

 

 

 

D\

 

 

 

 

 

 

D\Function Prototype List: none.

D\

D\Change Activity:

D\

D\CFD List:

D\

9-44System API Programming V4R1

Page 250
Image 250
IBM Version 4 manual 9B ð INZ1