RPG IFS & codepage

OK this is driving me nuts.

I have a program that creates a file on the IFS.  The file looks fine on the 
AS/400 using WRKLNK & displaying the file.  The file is an XML document (very 
simple).

XML on iSeries IFS:
<XML>
 <AUTHOR>Tommy Holden </AUTHOR>
</XML>

If I connect a mapped drive to the IFS folder open using notepad and it's all 
gibberish:
LçÔÓn@LÁäãÈÖÙnã-

I'm using codepage 37 to create the file.
          fd = Open( %TrimR(FileName)
                   : O_CREAT+O_TRUNC+O_RDWR+O_CODEPAGE+O_TEXTDATA
                   : S_IRUSR+S_IWUSR+S_IXUSR+
                     S_IRGRP+S_IWGRP+S_IXGRP+
                     S_IROTH+S_IXGRP:37);         

The IFS file reflects the codepage :
                                                  
 Coded character set ID . . . . . . . . :   37    
 Hidden file  . . . . . . . . . . . . . :   No    
 PC system file . . . . . . . . . . . . :   No    
 Read only  . . . . . . . . . . . . . . :   No    
                                                  
I've tried other codepages with the same results.  I'm hoping this is just 
something stupid I'm doing.  Any ideas?


Thanks,
Tommy Holden