Re: EBCDIC - ASCII translation problems with the ! character

I would recommend you to find out, which ASCII code page is used in IFS and
which EBCDIC code page is used in your job.
And then use iconv() API to convert from one code page to another.

    Alexei Pytel
always speaking for myself


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.