How to Use CULLUS35

To invoke CULLUS35:

First—Define the input or work field to be interpreted.

Second—Issue a CALL to CULLUS35 from type 7 logic:

Col
2
▼
RPT-nn7sss CALL US35 (field-name length-vn result-v
     representation-length-n start-position-a bit-count-n)

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 to be interpreted.
Length-vn (ARG2) requires a numeric literal or the name of an 8-byte packed decimal work field specifying the length of the field being interpreted (field-name).
Result-v (ARG3) requires the name of a receiving field large enough to accommodate the bit settings for the entire input field. The length of result-v depends on whether 2 or 3 positions are used for bit representation, as described below in representation-length-n.
Representation-length-n (ARG4) requires the name of a field containing a value that specifies whether 2 or 3 positions are used for each bit representation:

Bit representation	Result field size
2-positions (00,01)	23 X length-vn
3-positions (000,001)	31 X length-vn

Start-position-a (ARG5) requires the name of a field that specifies the byte position where bit conversion begins. Start-position-a applies only to fields having multiple bytes. The default is 0.
Bit-count-n (ARG6) is an optional argument using 0 or 1 as a numeric literal or the name of an 8-byte packed decimal field containing a 0 or 1 to specify the manner in which bits are counted. The default is 0.
```
0 counts bits as 00 01 02 03 04 05 06 07.
1 counts bits as 01 02 03 04 05 06 07 08.
```