RE: Embed one IFS file in another

I am opening both files using O_TEXTDATA in the oflag.  I am not getting
any error message - it's just that the data from the file using the
codepage of 37 is garbled.  I was able to get around it by using the CPY
command and copying the file with the 37 codepage to another file -
using 819 in the TOCODEPAGE parameter.  I can then use this new file and
everything's fine.  I was just hoping to be able to elimiate the extra
step.

Dave

> ----------
> From:         bvining@VNET.IBM.COM[SMTP:bvining@VNET.IBM.COM]
> Sent:         Thursday, September 03, 1998 1:20 PM
> To:   MIDRANGE-L@midrange.com
> Subject:      Embed one IFS file in another
> 
> Dave,
> 
> Are you getting an error message or incorrect data when attempting to
> append the data from the first file to the second?  I would have
> thought
> that opening the two files in text mode (that is, turning on
> Integrated
> File System File Code Page to/from Job CCSID conversion via O_TEXTDATA
> of oflag) would have done the trick.
> 
> Bruce Vining
> 
> >
> >I have a situation where I want to append one IFS file to another and
> >the two files have different code pages (one is 37 and the other is
> >819).  I want to read from the one file (that has a code page of 37)
> and
> >append to the other file (the one that has 819).  I am using ILE RPG
> >with the open(), read(), and write() API's.  I have successfully done
> >this when the code pages of the two files are identical.
> >
> >Any ideas?
> >
> >Thanks,
> >Dave
> >
> 
> +---
> | This is the Midrange System Mailing List!
> | To submit a new message, send your mail to MIDRANGE-L@midrange.com.
> | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
> | To unsubscribe from this list send email to
> MIDRANGE-L-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator:
> david@midrange.com
> +---
> 
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---