In the CL below, PGMA is not reading the path built by OPNQRYF. Instead it is reading physical file JRNFL.
How can I get my PGMA to use the OPNQRYF created path (without using CPYFRMQRYF due to large record volume)
Thanks!
clof jrnfl
OVRDBF FILE(JRNFL) SHARE(*YES)
OPNQRYF FILE((JOESD *FIRST *ONLY) (JRNTEMPLAT *FIRST +
*ONLY)) FORMAT(JRNFL) JORDER(*FILE) +
MAPFLD((JOESD '1/joesd' *CALC *N *N +
*CALC)) OPNID(JRNFL)
call PGMA
clof jrnfl
COBOL PGMA file def:
select JRNFL assign to database-JRNFL.
______________________________________________________________________
This outbound email has been scanned for all viruses by the MessageLabs Skyscan service.
For more information please visit
http://www.symanteccloud.com
______________________________________________________________________
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact
[javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.