|
Bob, The field 'FileName' is defined in the prototype for the sub procedure. When I typed the original email, I should have taken into consideration the 'text wrapping' that could take place by email programs. > /Free > /Copy EXPRDPGM/QRPGSRC,PROTSP (contains PR for > sub-procedure) > > /End-Free > (field > 'FileName' defined here also ) Should be: // Include prototypes // (contains PR for sub-procedure) // (field 'FileName' defined here also) /Free /Copy EXPRDPGM/QRPGSRC,PROTSP /End-Free D AdjCst PI 10S 4 D Prt# Like(PtPrt#) D CYMD 8S 0 D FileName 20A Some calcs here.... Tim Kredlo
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.