Is there a simple way in HLASM to determine if a byte can be consider 
"printable", assuming the standard EBCDIC code page of CP-37 or IBM-1047? I 
would guess that the simpliest way is to have a 256 byte table and use the byte 
as an index. If the byte value is, for example, not zero (or the other way 
around), then the byte is printable. Then just populate that table "by hand". 
Is there a macro buried somewhere which has this information in it?

What I'm doing is writing a subroutine to "encode" a string. If the byte is 
"printable", just move it into the output buffer. If it is not "printable", 
then output a three byte sequence: %hh where hh is the hex encoding. Or is 
there a better encoding method? I want "printable" so that I can output the 
data which I'm getting from an ISQUERY result. The RNAME (and QNAME) __may__ 
have "unprintable" characters in them. Or even characters which are 
"printable", but which I want encoded, such as a blank, for other reasons (such 
as parsing). And I want it simple to decode. Which, to me, means a fixed length 
string. None of the HTML stuff like & and <.

John McKown
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

9151 Boulevard 26 * N. Richland Hills * TX 76010
(817) 255-3225 phone *
[email protected] * www.HealthMarkets.com

Confidentiality Notice: This e-mail message may contain confidential or 
proprietary information. If you are not the intended recipient, please contact 
the sender by reply e-mail and destroy all copies of the original message. 
HealthMarkets(r) is the brand name for products underwritten and issued by the 
insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance 
Company(r), Mid-West National Life Insurance Company of TennesseeSM and The 
MEGA Life and Health Insurance Company.SM

Reply via email to