|
Barbara, Can you show an example of the syntax used to access a subfield within a particular structure variable? For example, some languages would use dot notation as follows: RNF_Data.NetType = "A" Data.NetType = "B" How does it work in the future RPG version? Regards, John Taylor Canada ----- Original Message ----- From: <bmorris@ca.ibm.com> To: <RPG400-L@midrange.com> Sent: Wednesday, January 10, 2001 07:29 Subject: Re: C like Data Structure Definitions? > > >Date: Tue, 09 Jan 2001 15:28:39 -0800 > >From: Jim Langston <jimlangston@conexfreight.com> > > ... > >I am using in a copy source a data structure called RNF_Data. > > > >D RNF_Data DS > >D NetType 1A Inz( *Loval ) > > ... > >D NetNumber 10U 0 Inz( 0 ) > >D 95A Inz( *LoVal ) > > > >I tried, in my RPG module, to do this, but to no avail: > >D Data DS Like(RNF_Data) > >which wouldn't even let me type that in (Like not allowed on DS line) > > > >how can I do what I want to do without having to declare this same > structure > >twice? I do not want RNF_Data to be a public variable. I want to have 2, > >or more, different structures with the same structure type. Neither will > >be visible to the other (one in my module, one in my program). > > Jim, what you want will probably be supported in the next release after > V4R5. I say "probably" because nothing is certain until it's announced > yet. You will probably be able to code something like this: > > D RNF_Data DS Qualified > D NetType 1A Inz( *Loval ) > ... > D NetNumber 10U 0 Inz( 0 ) > D 95A Inz( *LoVal ) > > D Data DS LikeDS(RNF_Data) > > Currently, all you can do is create a physical file with the layout you > want, and use externally-described data structures. > > Barbara Morris > > > +--- > | This is the RPG/400 Mailing List! > | To submit a new message, send your mail to RPG400-L@midrange.com. > | To subscribe to this list send email to RPG400-L-SUB@midrange.com. > | To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com. > | Questions should be directed to the list owner/operator: david@midrange.com > +--- > +--- | This is the RPG/400 Mailing List! | To submit a new message, send your mail to RPG400-L@midrange.com. | To subscribe to this list send email to RPG400-L-SUB@midrange.com. | To unsubscribe from this list send email to RPG400-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-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.