IFS read files

["Gary Kuznitz " <docfxit@xxxxxxxxxxxx>]

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