|
Scott, Do you know the EBCDIC to ASCII table instead of QASCII? Mike ----- Original Message ----- From: "Scott Klement" <klemscot@klements.com> To: <rpg400-l@midrange.com> Sent: Thursday, October 31, 2002 3:42 PM Subject: Re: EBCDIC - ASCII translation problems with the ! character > > This is a feature of (or perhaps "problem with") the QEBCDIC translation > table. > > Either use the iconv() API to go from codepage to codepage, or try the > QTCPEBC table instead of QEBCDIC. Or create your own translation > table with the CRTTBL command... > > On Thu, 31 Oct 2002, Mike Silvers wrote: > > > I am having problems in the translation of the ! character. Here is the > > scenario: > > > > I have an ASCII file on the IFS. I read the file into an RPG variable and > > translate the ASCII character to EBCDIC using the following call: > > > > * > > * Translate from ASCII to EBCDIC > > * > > C Eval pworkfld = %Len(%Trimr($$Html32K)) > > C Call 'QDCXLATE' > > C Parm pWorkFld > > C Parm $$Html32K > > C Parm AtoETable > > C Parm XLateLib > > > > The AtoETable is a constant with the value QEBCDIC and the XLateLib is a > > constant with the value *LIBL. > > > > The variable $$Html32K then contains EBCDIC characters. There is one > > character at this point that was a problem. The exclamation point (!) was > > translated incorrectly to a | character. I do a an XLate to change the | > > character back to a !. I then do some manipulation of the file. After the > > manipulation, I convert the EBCDIC characters to ASCII characters using the > > following call: > > > > * > > * Translate from EBCDIC to ASCII > > * > > C Eval pworkfld = %Len(%Trimr($$Html32K)) > > C Call 'QDCXLATE' > > C Parm pWorkFld > > C Parm $$Html32K > > C Parm EtoATable > > C Parm XLateLib > > > > The EtoATable is a constant with the value QASCII. > > > > When I look at the file using a text editor, the ! character was converted > > to a ] character. > > > > Any ideas on how to prevent the translation problem? > > > > _______________________________________________ > This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list > To post a message email: RPG400-L@midrange.com > To subscribe, unsubscribe, or change list options, > visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l > or email: RPG400-L-request@midrange.com > Before posting, please take a moment to review the archives > at http://archive.midrange.com/rpg400-l. > >
As an Amazon Associate we earn from qualifying purchases.
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.