CBL_IMP
Does a logical IMPLIES between the bits of two data items.
Syntax:
call "CBL_IMP" using source
target
by value length
Parameters:
|
Using call prototype (see Library Routines - Key) |
Picture (32-bit systems) |
source |
cblt-x1-compx |
Any data item. |
target |
cblt-x1-compx |
Any data item. |
length |
cblt-os-size |
Numeric literal or pic x(4) comp-5. |
On Entry:
source |
One of the data items to IMPLIES. |
target |
The other data item to IMPLIES. |
length |
The number of bytes of source and target to IMPLIES. Positions in target
beyond this are unchanged. |
On Exit:
Comments:
The routine starts at the left-hand end of source and target and IMPLIES
the bits together, storing the result in target. The truth table for this
is:
source |
target |
result |
0 |
0 |
1 |
0 |
1 |
1 |
1 |
0 |
0 |
1 |
1 |
1 |
See Also: