×
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.
Jeff,
Note that you could include the fixed-format code in a copybook, and simply
do a /copy or /include for the copybook (which can itself be indented, if
you wish - the '/copy' doesn't need to start at column 7). All code in
copybooks is fixed-format by default.
This isn't any 'easier' or 'better' than dropping out to fixed-format, but
it's probably neater, e.g. rather than this:
/free
if ...
if ...
for ...
...
/end-free
CL1 EXSR SUBR01
/free
endfor;
endif;
endif;
/end-free
you could have this:
/free
if ...
if ...
for ...
...
/copy qrpglesrc,subr01
endfor;
endif;
endif;
/end-free
and in your copybook, just have the following:
CL1 EXSR SUBR01
Just a thought...
Rory
On 1/24/2013 2:12 PM, Jeff Young wrote:
Thank to everyone that responded.
It appears that (as I presumed) in order to implement this, I indeed must
break out of /free mode to set a CLx spec to indicate the start of RPG
Cycle Total Time processing. After this statement, I can resume /free
mode
for all other logic and it will be part of the total cycle.
Thanks again.
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
