|
<snip>
/IF NOT DEFINED(copybook-name)
/DEFINE(copybook-name)
copybook data goes here
/ENDIF
</snip>
You know, that may even look cleaner that what we currently are doing. Our
main programs have:
/If not defined(JOBI0200)
/INCLUDE ROUTINES/QAPISRC,JOBI0200
/EndIf
When they simply could have
/INCLUDE ROUTINES/QAPISRC,JOBI0200
And then the member JOBI0200 could have:
/If not defined(JOBI0200)
// ... all the stuff that JOBI0200 currently has...
/EndIf
And we wouldn't have to retrofit our current main programs.
And if someone wrote a main program and forgot the /IF they wouldn't get
burned.
Rob Berendt
As an Amazon Associate we earn from qualifying purchases.
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.