Procedure Modules › Dynamic Sequential File Processing (CULLUS01) › How to Use CULLUS01

How to Use CULLUS01

To invoke CULLUS01:

First—Define a dummy buffer area equal to the length of the retrieved record.

• For non-database runs, use the MB= option on an additional INPUT parameter or specify an alphanumeric work field that has the length of the retrieved record.
• For database runs, use one INPUT parameter that includes the extra storage requirement in the record size specification.

Second—Define fields in the dummy buffer area by using REC parameters.

Third—Define a 1-character alphanumeric work field to contain user instructions and CULLUS01 return values. Valid contents of this field are listed as follows under task-v.

Fourth—Issue a CALL to CULLUS01 in type 7 logic:

Col

2
▼
RPT-nn7sss CALL US01 (result-v task-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.
• Result-v (ARG1) requires the name of the field that receives the retrieved record.
• Task-v (ARG2) requires the name of a 1-character alphanumeric work field to hold user instructions and CULLUS01 return values:

Fifth—Test return values in type 7 logic.

Sixth—Define the external sequential file in the CULP2 step of the CA Culprit job control language (JCL):