This routine ANDs two items of data.
Specification
01 data-name-1 (Arbitrary item of data.) 01 data-name-2 (Arbitrary item of data.) 01 data-length PIC S9(9) COMP-5. 01 status-code PIC S9(4) COMP-5.
CALL "CBL_AND"
USING data-name-1
data-name-2
BY VALUE data-length
RETURNING status-code.Interface
Specifies an item of data to be ANDed.
Specifies the other item of data to be ANDed. The result is stored in this area.
Specifies the length of data-name-1 and data-name-2.
Return code
The return code is set in the status-code specified in the RETURNING clause.
0: Successful
Other than 0: Failure