× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



I thought the REF was to reference the physical or logical file I was pulling 
the data from? is that not the case?


Tony Carolla <carolla@xxxxxxxxx> wrote ..
> Well, he's got no fields referenced to the reference file also.  I
> wouldn't use the REF without actually referencing a field in the file.
> 
> 
> On Fri, 19 Nov 2004 14:06:19 -0800, jfeador@xxxxxxxxxx
> <jfeador@xxxxxxxxxx> wrote:
> > 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> .
> > 
> > 
> > 
> > 
> > --
> > 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.
> > 
> > 
> 
> 
> -- 
> "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
> 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 thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 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.