× 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.


  1.  Home
  2. RPG400-L
  3. October 2003

RE: Variable file names

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 thread ...
Replies:
Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2025 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.