Thank you. I'm not crazy. <g>

Charles


-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf 
Of Peter Vels
Sent: Thursday, October 1, 2020 3:00 PM
To: [email protected]
Subject: Re: Strange COBOL 6.2/3 problem: BASIS/COPYLOC/PDS fails

I can reproduce this with: PP 5655-EC6 IBM Enterprise COBOL for z/OS  6.1.0
P180612

Peter

On Fri, 2 Oct 2020 at 00:46, Charles Mills <[email protected]> wrote:

> It appears to me that COBOL 6.2 or 6.3 fails a BASIS statement if there is
> any COPYLOC in effect and SYSLIB is a PDS, but not if SYSLIB is a PDSE.
>
> The error is IGYLI0053-U   A library read error occurred during "BASIS"
> processing.  No member was found or there was a bad block.
>
> //S1     EXEC PGM=IGYCRCTL,PARM='COPYLOC(MYUNIX,PATH("valid.unix.path")'
> //SYSLIB DD   DSN=PDS(E) containing GCOPYA,DISP=SHR
> //SYSIN  DD   *
>            BASIS GCOPYA
> /*
> // remaining COBOL compile JCL
>
> Above works if SYSLIB is a PDSE but fails if it is a PDS. Works either way
> if you remove the COPYLOC. COPY seems to work okay; only BASIS seems to
> fail.
>
> Just tried a COPYLOC with a DSN rather than a PATH and it still fails.
>
> Would be curious what others think or if anyone wanted to try to duplicate.
> This is in Dallas so no ability to open a PMR.
>
> Charles
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [email protected] with the message: INFO IBM-MAIN
>

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to