Re: Overlaying a DS Array In a LIKEREC DS

On 01/07/2010, at 11:35 AM, Eftimios Pantzopoulos wrote:

12 d c ds likerec(rctldef)
13 d array likeds(ctlds) dim(20)
======> aa bbbbbb
*RNF3703 20 a 000117 The subfield or parameter definition is not
within a group.
*RNF3601 20 b 000117 Keyword is not allowed for a field definitio
ignored.

My guess is that LIKEREC is messing things up. The error message implies that the previous DS has somehow been terminated (as if another stand-alone definition had been inserted) and the 'array' field is not being recognised as part of that DS and therefore is being treated as a stand-alone field. That seems like a defect to me so perhaps you are missing PTFs or a maybe PMR is in order?

Perhaps:

d c DS qualified
d rec likerec(rctldef)
d array likeds(ctlds) dim(20)
d overlay(c.rec.kpro1v)

would work. Not tested so usual caveats apply.

I'd still do it with a based array though. Much simpler.

Regards,
Simon Coulter.
--------------------------------------------------------------------
FlyByNight Software OS/400, i5/OS Technical Specialists

http://www.flybynight.com.au/
Phone: +61 2 6657 8251 Mobile: +61 0411 091 400 /"\
Fax: +61 2 6657 8251 \ /
X
ASCII Ribbon campaign against HTML E-Mail / \
--------------------------------------------------------------------