RE: Compile error

Hans (and Buck),

Thanks for the help!

but.....

Since I changed to 'LikeRec' it seems I can no longer overlay the data
structure with the array.
(This part worked fine when I used 'ExtName'.)

Code:
D SoRecP          DS    LikeRec(OPENSORP:*Input)        
D  SoArry                       Overlay(SoRecP:1)               
D                               Dim(128)                        
D                               Like(A1)

Compile errors:
        D  SoArry                             Overlay(SoRecP:1)       
*RNF3703 20 a      008300  The subfield or parameter definition is not
specified within a group.                                         
*RNF3601 20 b      008300  Keyword is not allowed for a field
definition; keyword ignored.


It seems the compiler thinks that SoRecP is now a field rather than a
data structure.

I'm confused!

?????

TIA

Tim


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Hans
Sent: Friday, July 18, 2003 11:21 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: Re: Compile error


Tim Kredlo wrote:
> Please help!
> 
> I am trying to read an externally described file and automatically 
> place the retrieved record into a local data structure.
> 
> The following code generates this compile error:
> *RNF5155 20      1 The Result-Field operand is not allowed for
specified
> operation.
> 
> I found this in the Websphere RPG manual for the READ command: 
> "READ{(EN)} name {data-structure}" "If name refers to an 
> externally-described file or a record format from an externally 
> described file, the data structure must be a data structure defined 
> with EXTNAME(...:*INPUT) or LIKEREC(...:*INPUT)." and believe I am 
> doing this in the first 'D' spec listed below.
> 
> Can anyone help tell me what I am doing wrong here?

The documentation is incorrect. With a result data structure on an
operation 
to an externally described file, the name must be a record name. 
Furthermore, the data structure must be defined using LIKEREC, to ensure

that the data structure matches the record.

That's the case for V5R2. In a future release, we plan on relaxing these

rules.

Cheers! Hans

_______________________________________________
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.