RE: More problems w/passing data structures as parameters

["Whiteman, Greg" <Greg.Whiteman@xxxxxxxxxxxxxxxx>]

I believe you need to define ItemInfoDS as a datastructure and not a
standalone field.
D ItemInfoDS      DS                   LikeDS(ItemInfo)   

Greg Whiteman



-----Original Message-----
From: THarteau@xxxxxxxxxxxxxxxxxx [mailto:THarteau@xxxxxxxxxxxxxxxxxx]
Sent: Wednesday, October 01, 2003 10:39 AM
To: RPG programming on the AS400 / iSeries
Subject: Re: More problems w/passing data structures as parameters



Hi,
      I had used likeDS, but it doesn't like it. (I am using SEU)
 ItemInfoDS      S                   LikeDS(ItemInfo)      gets the error

LIKE keyword is expected but not found; definition is ignored.
 Message ID . . . . . . :   RNF3438
 Message . . . . :   LIKE keyword is expected but not found; definition is
   ignored.
 Cause . . . . . :   The LIKE keyword is required when the Field-Length
entry
   (positions 33 - 39) is blank or contains a leading plus or minus sign.
The
   definition is ignored.
 Recovery  . . . :   Specify keyword LIKE or correct the Field-Length
entry.
   Compile again.

I can't get out of SEU with the LikeDS.

<===================================================>

Terri Harteau
****************
"There's no point in being grown up if you can't be childish sometimes."
- Dr. Who
****************






_______________________________________________
This is the RPG programming on the AS400 / iSeries (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.