Procedure Modules › Moving Fields to an Input Buffer Area (CULLUS43) › How to Use CULLUS43

How to Use CULLUS43

To invoke CULLUS43:

1. Define the field to be moved by using a REC parameter (input field) or a work field parameter.
2. Define a dummy buffer area to receive the data.
   • For non-database runs, use the MB= option on an additional INPUT parameter.
   • For database runs, use one INPUT parameter that includes the extra storage requirement in the record size specification.

     To build a table, code REC parameters that define multiply-occurring data groups.

3. Issue a CALL to CULLUS43 from type 7 logic:

   width=80
   Col
   2
   ▼
   RPT-nn7sss CALL US43 (field-name resutl-v length-vn)
   

   • 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.
   • Field-name (ARG1) requires the name of the input or work field that is to be moved.
   • Result-v (ARG2) requires the name of the receiving field.
   • Length-vn (ARG3) requires a numeric literal or the name of an 8-byte packed decimal work field whose value equals the number of characters moved.