|
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.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 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.