[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