The Sample Extract Programs - IBM SC34-6814-04 Customization Manual

Workarea Ptr
Back translated command Ptr
List name Ptr
Group name Ptr
Object type Ptr
Object name Ptr
Keyword name Ptr
Keyword length Ptr
Keyword Value Ptr
Note: Fields not set with a pointer value contain a null value.

The sample EXTRACT programs

There are three CICS-supplied sample programs that can be invoked during
DFHCSDUP EXTRACT processing. Two of these are provided in COBOL, PL/I, and
assembler language, and the third is provided in COBOL only. They are outlined in
Table 48.
816
Customization Guide
8 Keyword detail call
10 Object end call
12 Group end call
14 List end call
16 Final call.
This is the address of a field containing the address of a fullword to be used by
the user application to store the address of any user-acquired work area.
The address of a fullword that contains the address of a 75-byte area of storage
that contains the EXTRACT command that is being processed.
The address of an 8-byte field that identifies the RDO list from which the current
object is taken. This value is set only on the 'list start' and 'list end' calls.
The address of an 8-byte field that identifies the RDO group from which the
current object is taken. This value is set on the 'group start', 'group end', 'object
start', 'object end', and 'keyword' calls.
The address of a 12-byte field that identifies the type of object (such as
TRANSACTION, PROGRAM, and so on), and is set only on the 'object start',
'object end', and 'keyword' calls.
The address of an 8-byte field that contains the name of the object, and is set
only on the 'object start', 'object end', and 'keyword' calls.
The address of a 12-byte field that contains the name of the keyword being
processed, and is set only on 'keyword' calls.
The address of a halfword field that contains the length of the value associated
with the keyword, and is set only on 'keyword' calls.
The address of the storage area that contains the value associated with the
keyword, and is set only on 'keyword' calls.
Table 48. Sample EXTRACT user programs for the DFHCSDUP utility program
Program Languages
names
DFH$CRFA Assembler
DFH0CRFC COBOL PL/I
DFH$CRFP
Description
Produces a cross-reference listing of the resource
definitions defined in the group or list you specify on the
EXTRACT command.