Re: More Stream File and DBCS issues...

Kevin,

I am goingn to be working with the client tonight to debug,
but before we got the from and to ccsid's right and that
working for plain text conversions, nothing worked.  The sO
and sI characters were gone (or converted wrongly).

Now that we have that fixed, plain text works fine and sI
and sO chars are there.  Without them, opening the document
in word does not ask what encoding to use, and doesn't
work.  When they are there, it asks for the proper encoding
and works great.

Now for this portion that isn't working is converting the
text to PDF again.  At first the replacement subprocedure
wasn't working and trashing the data.  With Barbara's help,
that seems to be fine, but no sI or sO chars.

So, we are going to go through it in debug and see what's
going on, and compare the resulting hex values with the two
docs.  At least things between the sO and sI chars I would
assume would be the same hex value sets.


On Tue, 7 Nov 2006 08:00:27 +1100 
 Kevin Wright <Kevin.Wright@xxxxxxxxxxxx> wrote:

Hi Brad,

EBCDIC needs sO and sI bytes to signal start and end of
DBCS, well shift out
of single byte and shift back in to single byte :)

ASCII does not need these flags.

Could it be that this is the "problem" you are seeing? 

Regards,

Kevin W. 

-----Original Message-----
From: Brad Stone [mailto:brad@xxxxxxxxxxxx]
Sent: Tuesday, 7 November 2006 2:44 AM
To: RPG programming on the AS400 / iSeries
Subject: Re: More Stream File and DBCS issues...


On Fri, 03 Nov 2006 12:54:41 -0500
 Barbara Morris <bmorris@xxxxxxxxxx> wrote:

A fairly easy way to handle this is to do the

processing

in ucs2.  (At
least, it's easy, if your string doesn't have more

than

16383 total
characters, since that's the maximum number of UCS2
characters that RPG
supports.)

D lparen     c              %ucs2('(')
D rparen     c              %ucs2(')')
D apos       c              %ucs2('''')
D string     s      16383c  varying
   string = %ucs2(charstring);
   --- use all the same code as you had before 
   ---   p = %scan(lparen : string);  etc
   charstring = %char(string);

Thanks again for this, Barbara.  It seems to have

gotten me

one step further.

The only issue I'm having now is it seems the sI and sO
characters are either getting replaced or not

transferred

properly, but I need to find out where that is

happening.

It seems to be happening in the WRITE to the stream

file.

Brad
www.bvstools.com
-- 

This is the RPG programming on the AS400 / iSeries

(RPG400-L) 

mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit:

http://lists.midrange.com/mailman/listinfo/rpg400-l

or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the

archives

at http://archive.midrange.com/rpg400-l.

-- 
This is the RPG programming on the AS400 / iSeries
(RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit:
http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the
archives
at http://archive.midrange.com/rpg400-l.

Bradley V. Stone
BVS.Tools
www.bvstools.com