How to Use CULLUS64

To invoke CULLUS64:

First—Access the database and identify the subschema by using the DB and SS= options of the INPUT parameter.

Second—Identify the route through the dictionary by using the PATH parameter.

Third—Define a numeric work field to hold the key to the user-defined attribute.

Fourth—Define a subscripted alphanumeric work field to hold the user-defined attributes.

Fifth—If you do not use literals, code alphanumeric work fields for:

Sixth—Issue a CALL to CULLUS64 from type 7 logic:

Col
2
▼
RPTnn7sss CALL US64 (action-code-qv entity-type-qv comment-next-key-qv
                      comm-next-id-v table-value-v)

Rpt-nn, coded in columns 2 and 3, specifies a 2-digit number in the range 00 through 99 that identifies the CA Culprit report.
Sss, coded in columns 5 through 7, specifies a 3-digit number indicating the sequence number of the type 7 parameter.
Action-code-qv (ARG1) requires an alphanumeric work field or 1-character alphanumeric literal, enclosed in single quotation marks, to specify the action to take:

Code...	Action taken...
'0'	Create the table
'1'	Read the table

Entity-type-qv (ARG2) requires an alphanumeric work field or 20-character alphanumeric literal, enclosed in single quotation marks, to indicate the class associated with the attribute and provide access to the entry. The valid classes are:
```
SYSTEM       PROGRAM           MODULE
FILE         RECORD            ELEMENT
USER         ATTRIBUTE         CLASS
MESSAGE      TASK              QUEUE
DESTINATION  LOGICAL-TERMINAL  PHYSICAL-TERMINAL
LINE         PANEL             MAP
```
Comment-nest-key-qv (ARG3) requires an alphanumeric work field or 1-character alphanumeric literal, enclosed in single quotation marks, to indicate the type of attribute. Valid attribute codes are listed below under ARG4.
Comm-nest-id-v (ARG4) requires an 8-byte numeric work field to provide a key to the user-defined attribute. Valid key formats are listed below:

Attribute type...	Attribute code...	Key format...
Comment	'C'	CMT-ID-nnn
Nest	'N'	NEST-ID-nnn

Table-value-v (ARG5) requires a 40-character alphanumeric work field to send table updates or receive table data.