[Info-vax] Calling $CREPRC in COBOL
Bill Gunshannon
bill.gunshannon at gmail.com
Fri Jun 10 14:27:54 EDT 2022
On 6/10/22 14:16, Craig A. Berry wrote:
> On 6/10/22 12:39 PM, VAXman- at SendSpamHere.ORG wrote:
>> 10 ENQ-TYPE PIC X(1) VALUE EXTERNAL PQL$_ENQLM.
>> ..............^
>> %COBOL-E-EXTREFVAL, VALUE EXTERNAL clause ignored - valid only on COMP
>> data-item
>>
>> How do you put PQL$ items in to a COBOL "byte"?
>
> I never knew much COBOL and haven't looked at any in decades, but I
> would think for a one-byte integer it would be "PIC 9(1)" rather than
> "PIC X(1)".
PIC X(1) would be more likely to be a byte than PIC 9(1) as
PIC 9(1) is one decimal digit and PIC X(1) is one character.
But neither is correct.
bill
More information about the Info-vax
mailing list