Re: IFS read files

["Gary Kuznitz " <docfxit@xxxxxxxxxxxx>]

Thank you for the reply.

On 25 Sep 2010 at 7:32, Dennis (Dennis Lovelady <rpg400-l@xxxxxxxxxxxx>) commented 
about RE: IFS read files:

> When you compile your program, it might be good for you to specify
> option(*SECLVL) on the compile command, so that additional information will
> be provided for errors until you get a feel for them.  
I tried that.  What I see  in the compiled listing is:
Errors were found during the binding step. See the job log for more information. 
  In the Job Log I get:
CPD5D02 No definition was found for reference READLINE 
In Work with Objects:
IFSTEXTR4   *SRVPGM   QGPL        RPGLE       IFS Text file service progr
IFSTEXTR4   *MODULE   QGPL        RPGLE       Read and write streem files
 
In the program with the error I have:
c                   dow       readline(fd: %addr(line): %size(line))>=0 
QGPL is in *libl during the compile

In IFSTEXTR4:
 P readline        B                   export    
 D readline        PI            10I 0           
 D   fd                          10I 0 value     
 D   text                          *   value     
 D   maxlen                      10I 0 value     
 
 D readline        PR            10I 0        
 D   fd                          10I 0 value  
 D   text                          *   value  
 D   maxlen                      10I 0 value  
                                                                       

> If you call here for
> help, it would be good to provide the error message ID (RNFxxxx) and the
> source line (at a minimum) that caused the error.
>
> In this case, I can guess that the system's telling you that you're trying
> to reference a procedure called READLINE and you have not provided a
> prototype for that procedure.

Is there anything else I need to do to get the program to see  readline ?

Thank you,

Gary Kuznitz

> Dennis Lovelady
> http://www.linkedin.com/in/dennislovelady
> --
> "Money is what you'd get on beautifully without if only other people weren't
> so crazy about it."
>         -- Margaret Case Harriman 
>
>
> > I'm getting an error saying:
> > Definition not found for symbol 'READLINE'
> >
> > I'm not sure what I am doing wrong.
> >
> > What I need to do is read all records in all files in /tmp on the IFS.
> >
> > I have created the service program IFSTEXTR4 Read and write streem
> > files to IFS
> > from:
> > www.scottklement.com/rpg/ifs_ebook/textwriting.html
> > www.scottklement.com/rpg/ifs_ebook/textreading.html
> >
> > Then I used the example CH7ReadDir from:
> > www.scottklement.com/rpg/ifs_ebook/ch7readdir.html
> >
> > And added the read file subroutine called showfile to it.
> > From:
> > www.scottklement.com/rpg/ifs_ebook/ch5test.html
> >
> > When I compile it the error I get is:
> > Definition not found for symbol 'READLINE'
> >
> > If someone likes I can paste the code so you can look at it.
> >
> > Thank you,
> >
> > Gary
> >
> > --
> > 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.
>
>
> -- 
> 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.