Hi Amanda,
In the compile listing, look to see how large the subfields in data structure PARTICIPANT_Template are. It looks like you have several data structures defined within it.
If PARTICIPANT_Template sums to 65535 then you can only have a dim of 1. If it is smaller than 65535 divide that number into 65535. The whole number you will be tne number of array elements you can use.
For example...
if PARTICIPANT_Template is 512 then 65535/512 = 127.998. You can have 127 elements in array PARTICIPANT not 128. 128 * 512 is 65536.
if PARTICIPANT_Template is 20489 then 65535/20489 = 3.2. You can have 3 elements in array PARTICIPANT not 4. 4 * 20489 is 81958.
HTH.
Gary Monnier
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Amanda Paul
Sent: Thursday, July 05, 2012 6:07 AM
To: RPG programming on the IBM i / System i
Subject: RNF7301
Hello
I get
*RNF7301 30 3003213+ Position (1-24065910) of subfield PARTICIPANT in data
structure PARTICIPAN... is greater than length of data
structure (65535).
can someone explain where Iam wrong?
d PARTICIPANTS_Template...
d ds qualified based(dummy_ptr)
d PARTICIPANT likeds(PARTICIPANT_Template) dim(999)
d
d PARTICIPANT_Template...
d ds qualified based(dummy_ptr)
d name likeds(name_Template)
d gender 1a
d dateofbirth 8p 0
d residentsince 4p 0
d maritalstatus 1a
d relationship 1a
d fulltimeoccupation...
d 2a
d parttimeoccupation...
d 2a
d transactiontype...
d 2a
d specialrestrictionsimposed...
d likeds(specialrestrictionssimposed_Template)
d criminals likeds(criminals_Template)
--
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.
midrange.com
