10.2 CBL

This routine obtains logical equivalence of two items of data.

Specification

Parameter data definition

01 data-name-1  (Arbitrary item of data.)
01 data-name-2  (Arbitrary item of data.)
01 data-length  PIC 9(9) COMP-5.
01 status-code  PIC S9(4) COMP-5.

Calling format

CALL "CBL_EQ"
    USING data-name-1
          data-name-2
    BY VALUE data-length
    RETURNING status-code.

Interface

data-name-1: Specifies an item of data to obtain logical equivalence.

data-name-2: Specifies the other item of data to obtain logical equivalence. The result is stored in this area.

data-length: 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.

status-code

0: Successful
Other than 0: Failure

10.2 CBL_EQ