Re: C like Data Structure Definitions?

[Jim Langston <jimlangston@xxxxxxxxxxxxxxxx>]

Yes, but now they're global variables, which I don't want.

Both my program and my module could see the other's data.

Regards,

Jim Langston

Chris Bipes wrote:
> 
> Try using occur(2).  Now you have two copies of the DS.
> 
> Christopher K. Bipes    mailto:ChrisB@Cross-Check.com
> Sr. Programmer/Analyst  mailto:Chris_Bipes@Yahoo.com
> CrossCheck, Inc.        http://www.cross-check.com
> 6119 State Farm Drive   Phone: 707 586-0551 x 1102
> Rohnert Park CA  94928  Fax: 707 586-1884
> 
> If consistency is the hobgoblin of little minds, only geniuses work here.
> Karen Herbelin - Readers Digest 3/2000
> 
> -----Original Message-----
> From: Jim Langston [mailto:jimlangston@conexfreight.com]
> Sent: Tuesday, January 09, 2001 3:29 PM
> To: RPG400-L@midrange.com
> Subject: C like Data Structure Definitions?
> 
> In the C language,  you can create a data structure, called a
> structure, then declare variables to use this structure.  Something
> like:
> 
> Struct  MyStruct {
>    Int      MyInt;
>    Long     MyLongInt;
>    Char[10] MyString;
>    };
> 
> MyStruct MyNewStruct;
> MyStruct MyNewStruct2;
> 
> (I may have the syntax wrong on that last one, it might be
> Struct MyStruct MyNewStruct; )
> 
> which means I now have two structures, MyNewStruct and MyNewStruct2 with
> the same definitions.  I want to do something similar in RPG, can I?
> 
> I am using in a copy source a data structure called RNF_Data.
> 
> D RNF_Data        DS
> D  NetType                       1A   Inz( *Loval )
> D  NetFile                      10A   Inz( *Loval )
> D  NetLib                       10A   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).
> 
> Regards,
> 
> Jim Langston
> +---
> | 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
+---