|
I liked David Morris' suggestion of the #IFDEF or #IFNDEF compiler directives. A fallout benefit is that we could now make our RPG code portable. :) > -----Original Message----- > From: Colin Williams [SMTP:Williamsc@technocrats.co.uk] > Sent: Wednesday, May 19, 1999 1:47 AM > To: 'MIDRANGE-L@midrange.com' > Subject: RE: Basing Pointers > > Ok, another idea, how about letting you declare the basing pointer > outside of the DS, so allowing you to redefine the > data structure as BASED eg: > > /COPY contains: > DSAPIdatastructure > Subfield1 1 2 > Subfield2 3 4 > > then within the main source member: > > DSAPIdatastructure BASED(Ptr1) > > This would still be at compile time, but would mean that you would not > have to make any changes to your /COPY > > -----Original Message----- > From: Jon.Paris@halinfo.it [mailto:Jon.Paris@halinfo.it] > Sent: Wednesday, May 19, 1999 4:45 AM > To: MIDRANGE-L@midrange.com > Subject: Basing Pointers > > > > > >> Another alternative may be to define the DS both ways and use some > like /IF > DEFINED(USEBASED)... /ELSE... ENDIF. This would not affect existing > code, and > the documentation would not need a lot of changing. > > Good idea David - I agree that for multi-DS members they can't just > leave off > the first line. The reason I didn't suggest conditional compilation > directives > is I'm not sure how many releases back they expect the includes to > cover > and it > was only introduced in V3R7. > > > +--- > | This is the Midrange System Mailing List! > | To submit a new message, send your mail to MIDRANGE-L@midrange.com. > | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com. > | To unsubscribe from this list send email to > MIDRANGE-L-UNSUB@midrange.com. > | Questions should be directed to the list owner/operator: > david@midrange.com > +--- > +--- > | This is the Midrange System Mailing List! > | To submit a new message, send your mail to MIDRANGE-L@midrange.com. > | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com. > | To unsubscribe from this list send email to > MIDRANGE-L-UNSUB@midrange.com. > | Questions should be directed to the list owner/operator: > david@midrange.com > +--- +--- | This is the Midrange System Mailing List! | To submit a new message, send your mail to MIDRANGE-L@midrange.com. | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com. | To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com. | Questions should be directed to the list owner/operator: david@midrange.com +---
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.