Re: Problem with non QUALIFIED DS

[Stuart Rowe <rowestu@xxxxxxxxx>]

David
With the declarations you provided, Parm is already qualified.  The likeds()
keyword qualifies always.  IIRC, you can't even put qualified with likeds.
 Look for references to the Parm variable or anything like Parm.MyField.

Somewhere at the bottom of the compile listing you should be able to tell
where the collision occurred.  Are these collisions declared anywhere else?
 I fail to see how Parm.MyField would conflict with MyField.

Anyhow,

If the Parm structure is just to be passed somewhere, as in

Parm = MyDS;
someFunction( Parm );
MyDS = Parm;

then you might be able to get around your issue quickly by declaring Parm
like( MyDS ) rather than likeds( MyDS ).  This results in a character field
the size of MyDS, not a data structure (so S instead of DS).  Depends on the
prototype of whatever you're passing it to of course but it usually works
out as long as you do not need to refer to parts of Parm.

Cheap way out, I know, but he sounds busy. :)

Stu



On Wed, Sep 23, 2009 at 09:21, David FOXWELL <David.FOXWELL@xxxxxxxxx>wrote:

> Hi,
>
> I've just added a prototype via a copybook in my module and it won't
> compile because it now has several fields defined more than once.
>
> I discover that I now have 2 prototypes copied in, each one with a data
> structure parameter declared like so :
>
> D Parm                     likeds (myds)
> D MyDS       E DS     extname( myfile)
>
> Several field names exist in both the external files. Each time, the person
> that wrote the prototype did not qualify the DS.
>
> Also, the DS MyDS is being fed in the procedure by reference to the field
> name then MyDS is copied to the parameter :
>
> MyField ='Agatha'
> Parm = MyDS
>
> where MyField is declared in the DDS of myFile.
>
>
> It would seem that I must modify the source of at least one of the modules
> using qualified names. I thought, if I just put QUALIFIED after the MyDS
> declaration, the source would no longer recompile and I would instantly find
> the names of the zones to qualify. This is not so. However, I'm presuming
> that now MyDS stays empty.
>
> Any thoughts on this? I'm not looking forward to taking time out to correct
> this, test it, etc. Maybe there's a work around?
>
>
>
>
>
> --
> This is the RPG programming on the IBM i / System i (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.