RE: Stupid question

[JFeador@xxxxxxxxxx]

I may be reading more into this than I should, correct me if I'm wrong, but
the error message that he's getting is indicating that his reference field
isn't in the source, which I assume has nothing to do with the presence (or
not) of the Subfile's Control record... Does it?

* CPD5238      30* * * * 1   E NMessageF. .E.X.P:A NNo valid recordRfound in
source.




Jerry L. Feador
Sr. Programmer/Analyst
Kia Motors America, Inc.
(949) 595-5810



-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[ mailto:rpg400-l-bounces@xxxxxxxxxxxx
<mailto:rpg400-l-bounces@xxxxxxxxxxxx> ]On Behalf Of Tony Carolla
Sent: Friday, November 19, 2004 1:54 PM
To: RPG programming on the AS400 / iSeries
Subject: Re: Stupid question


Don't you need a subfile control record also (SFLCTL)?  If you need an
example of a subfile control rec, I can post one.


On Fri, 19 Nov 2004 13:49:40 -0800 (PST), Douglas W. Palme
<dpalme@xxxxxxxxxxxxxxxxxxxxx> wrote:
> I am trying to create a subfile DDS
>
> A very simple one at thatâ.displays ONE FRIGGIN FIELD:
>
> Here is the DDS code:
>
>  FMT DP
.....AAN01N02N03T.Name++++++RLen++TDpBLinPosFunctions+++++++++++++++++++++++
++++
>         *************** Beginning of data
****************************************************************************
***********
> 0001.00      A                                      REF(RECNOTES)
041119
> 0002.00      A          R RECSFL                    SFL
041119
> 0003.00      A            NOTES         75A     4  1
041119
>         ****************** End of data
****************************************************************************
**************
>
> When I compile I get the following error message:
>
>      200                  R RECSFL                    SFL
>      300                    NOTES         75A  O  4  1
75            1       1
>  * CPD5238      30* * * * 1   E NMessageF. .E.X.P:A NNo valid recordRfound
in source.
>   5722SS1 V5R2M0  020719                  Data Description
DPALMES/RECNOTESSF      11/19/04 16:45:32        Page    3
>                                            Message Summary
>      Total          Informational          Warning        Error
Severe
>                         (0-9)              (10-19)       (20-29)
(30-99)
>          1                 0                    0             0
1
>
> I have no idea what I have wrong.
>
> Suggestions?
>
> Douglas
>
> --
> 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
<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
<http://archive.midrange.com/rpg400-l> .
>
>
>


--
"Enter any 11-digit prime number to continue..."

--
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
<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
<http://archive.midrange.com/rpg400-l> .