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