× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.





It sounds like your code page setting is causing some issues.

I had the same problem before.

To get around it, I did the following:



 fd=unlink(%trim(filename));                           
 flags=O_RDWR+O_CREAT+O_TRUNC+O_TEXTDATA+O_CODEPAGE;   
 mode=S_IRWXU+S_IRWXG+S_IROTH+S_IXOTH;                 
 codepage=819;  // 437                                 
 fd=open(%trim(filename):flags:mode:codepage);         
 callp close(fd);                                      
 flags=O_RDWR+O_TEXTDATA;                              
 fd=open(%trim(filename):flags);                       



This seemed to get me around the issue with garbage in the file. (The idea came from something someone else mentioned somewhere along the line..)



Jay





----- Original Message -----


From: "John Allen" <jallen@xxxxxxxxxxx>
To: RPG400-L@xxxxxxxxxxxx
Sent: Thursday, May 31, 2012 12:19:37 PM
Subject: Attempting to write to IFS andmissing turkish characters

I am attempting to write/create a txt file directly into the IFS the file contains Turkish characters

 

I have a copy of Scotts great and very helpful IFS eBook (Thank you very much Scott)

 

This file contains turkish characters such as ÜŞ

It appears using code 1026 these characters are Hex 7F and Hex 7C

 

For my test I did the following:

1)      Modified Scotts program CH5ASCII that creates and writes some simple text to a text file

2)      Changed the code that creates a new file to specify code page 1026 rather than 819

3)      Output some text including a Hex 7F7C

 

Runs fine, but when the file is opened from the 400 (EDTF) I see a “@  I was expecting to see ÜŞ

When I open it with Notepad I see jibberish Ä…™@Ö¤¢‰•k%%É@“–¥…@£ˆ…@¦

 

Obviously there is something I am missing

 

Anybody know what I am doing wrong?

 

Thanks

 

John

 

 

 

 


  _____  

I am using the Free version of SPAMfighter <http://www.spamfighter.com/len> .
SPAMfighter has removed 3429 of my spam emails to date.

Do you have a slow PC? <http://www.spamfighter.com/SLOW-PCfighter?cid=sigen>  Try free scan!

As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.