|
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.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 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.