How to Use CULLUS12

To invoke CULLUS12:

First—Define the input date:
- On a REC parameter, if the date is part of an input record
- On a work field, if the value is supplied during the CULPRIT run

Second—Issue one or more calls to CULLUS12 in type 7 logic:

Col
2
▼
RPT-nn7sss CALL (input-field-v date-type-qv input-format-code-qv
                 output-format-code-qv output-field-v)

Rpt-nn, coded in columns 2 and 3, specifies a 2-digit number in the range 00 through 99 that identifies the CULPRIT report.
Sss, coded in columns 5 through 7, specifies a 3-digit number indicating the sequence number of the type 7 parameter.
Input-field-v (ARG1) requires the name of the field containing the date.
Date-type-qv (ARG2), enclosed in single quotation marks, requires an alphanumeric literal to define the data type of the input field (ARG1):

The literal...	The data type...
'Z'	8-byte alphanumeric or zoned decimal
'P'	8-byte packed decimal

Input-format-code-qv (ARG3), enclosed in single quotation marks, requires the name of a 3-character alphanumeric work field or alphanumeric literal that defines the format of input-field-v (ARG1):

Output-format-code-qv (ARG4), enclosed in single quotation marks, requires the name of a 3-character alphanumeric work field or alphanumeric literal that specifies the date format for output-field-v (ARG5). Valid format codes appear above.
Output-field-v (ARG5) requires the name of an 8-byte packed decimal work field that receives the converted date.