IBM SC34-6814-04 User Manual

Page 389

Advertising
background image

[PROGRAM_LENGTH(name4),]
[PROGRAM_TYPE(NOT_APPLIC|PRIVATE|SHARED|TYPE_ANY),]
[PROGRAM_USAGE(APPLICATION|NUCLEUS),]
[PROGRAM_USE_COUNT(name4),]
[PROGRAM_USER_COUNT(name4),]
[REMOTE_DEFINITION(LOCAL|REMOTE),]
[REMOTE_PROGID(name8),]
[REMOTE_SYSID(name4),]
[REMOTE_TRANID(name4),]
[SPECIFIED_AMODE(24|31|AMODE_ANY|AMODE_NOT_SPECIFIED),]
[SPECIFIED_RMODE(24|RMODE_ANY|RMODE_NOT_SPECIFIED),]
RESPONSE(name1 | *),
REASON(name1 | *)]

This command is threadsafe.

ACCESS(CICS|NONE|READ_ONLY|USER)

returns a value indicating the type of storage into which the program has been
loaded.

CICS

CICS-key

NONE The program has not been loaded

READ_ONLY

Readonly

USER User-key

APIST(CICSAPI|OPENAPI)

returns a value indicating the API attribute of the installed program definition.

CICSAPI

The program is restricted to use of the CICS permitted application
programming interfaces only.

OPENAPI

The program is not restricted to use of the CICS permitted application
programming interfaces only. It must be coded to threadsafe standards
and defined with CONCURRENCY(THREADSAFE).

AVAIL_STATUS(DISABLED|ENABLED)

returns a value indicating whether the program can be used—that is, whether or
not it has been enabled.

CEDF_STATUS(CEDF|NOCEDF|NOT_APPLIC)

returns the EDF status of the program.

CEDF When the program is running under the control of the CICS execution

diagnostic facility (EDF), EDF diagnostic screens are displayed.

NOCEDF

EDF diagnostic screens are not displayed.

NOT_APPLIC

Not applicable. This is a mapset, partitionset, or a remote program.

CONCURRENCY(QUASIRENT|THREADSAFE)

returns a value indicating the concurrency attribute of the installed program
definition.

QUASIRENT

The program is defined as being quasi-reentrant, and is able to run only
under the CICS QR TCB.

Chapter 3. The user exit programming interface (XPI)

367

|
|

|
|
|

|
|
|
|

|
|
|

|
|
|

Advertising