×
The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.
Hi, this is from the reference book page 353.
Ffile1 if e disk
Ffile2 o e disk
D ds1 e ds extname(file1) prefix('':2)
D qualified
D ds2 e ds extname(file2) prefix('':2)
D qualified
/free
read file1 ds1; // Read into data structure
eval-corr ds2 = ds1; // Assign fields with same name
write file2 ds2; // Write from data structure
/end-free
I'm getting two errors : RNF5063 on the write, the file mustn't be an externally described file, RNF7595 position 1 of ds1 doesn't contain a subfield for the format.
I thought you needed to specify if the ds1 in factor 2 was used for input or output.
Anyone know what's wrong?
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.
midrange.com
