RPG + IFS

I have an RPG program that needs to read an IFS file. The IFS file is
created using the PASE touch command, and no CCSID number is specified.
When I go into WRKLNK to the file and use option #8, it shows CCSID of
819. However, when I enter option #2 on the file then take F15, it shows a
CCSID of 500. When I display the file in WRKLNK using option 5, the data
looks fine and I can read it.

When I look at the file in ACS, it shows as "garbage" whether or not I
view as a UTF-8 file.

When I run a SQL statement using qsys2.ifs_read, I also see garbage.

When I attempt to read it in with RPG, I still see garbage. In the RPG
program, I use the _C_IFS_FGETS procedure to read the IFS file. The field
that is defined to receive the data is defined with CCSID(819). It still
shows as garbage.

What do I need to do to have RPG be able to "see" the data in this IFS
file in the same format as WRKLNK option #5?

I have a feeling this has something to do with the file being created by
TOUCH, but am not sure.

Any ideas?

Thank you,

Doug



"CONFIDENTIALITY NOTICE: This e-mail transmission (and/or the attachments accompanying it) contain confidential information belonging to the sender. The information is intended only for the use of the intended recipient. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or the taking of any action in reliance on the contents of the information is strictly prohibited. Any unauthorized interception of this transmission is illegal under the law. If you have received this transmission in error, please promptly notify the sender by reply e-mail, and then destroy all copies of the transmission."