RE: (no subject) -- RPG400-L

Thanks.....  I've also received another email that showed me I need to ask
these guys a few more questions on what exactly they expect to see.



-----Original Message-----
From: Bruce Vining [mailto:bvining@us.ibm.com]
Sent: Monday, July 22, 2002 2:09 PM
To: rpg400-l@midrange.com
Subject: Re: (no subject)




The International Application Development manual provides information on

many, many code pages.  In 850 (PC Multilingual) x'AA' is the NOT sign,

which would correspond to x'5F' in 37 (USA/Canada).



Note that there are many ASCII and EBCDIC code pages.  Another "ascii"

would be 819 (ISO 8859-1) where NOT is x'AC'; another EBCDIC would be 273

(Germany) and x'BA'; but most likely x'5F' is what you're looking for.  (To

play it safe, if you do a DSPFD of your RPG source file what is displayed

for CCSID?  If 37, the x'5F')



Bruce









                      "Luebbert, Kevin M."

                      <KMLuebbert@magellan        To:
"'rpg400-l@midrange.com'" <rpg400-l@midrange.com>

                      health.com>                 cc:

                      Sent by:                    Subject:  (no subject)

                      rpg400-l-admin@midra

                      nge.com





                      07/22/2002 01:57 PM

                      Please respond to

                      rpg400-l











I've a project spec that states



"the symbol preceding "CNTRI' is a "NOT' sign (shows a zero or O with a

line

through it) which is Hex AA"



I coded this in my rpg program as



 <<...OLE_Obj...>>

D   HEXAA                                    S

1             INZ(X'AA')



I team this up with a constant defined as CNTRI defined as prefix1



 <<...OLE_Obj...>>

C                                                          EVAL

BEG = HEXAA + PREFIX1



I was given "sample" output of what the client current receives now and the

hex character appears to be a lower case a with an underscore.   My D spec

translates to an inverted exclamation mark.  Someone mentioned that they

may

be different because one is ASCII and one EPSIDC ......



Is there a table(s) somewhere that I can look and verify that 'AA' is truly

what I want?  Apparently they don't have the redbooks or any other viable

resource materials here.





_______________________________________________

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.













_______________________________________________

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.