Display COMP-3 values in readable form

hsk · New User Joined: 28 Nov 2006 Posts: 69 Location: India

I have 3 question,

1. IF we view a file containing COMP-3 values, the values are not in readable form. Can a REXX exec read and display those values? How?

2. I have 10 byte record with combination of COMP-3 values,Numeric Values in different layouts.
i.e. for one layout first 6 bytes may contain comp3 value while other layout may have 8bytes ...etc.
Can i read each byte and check whether it's comp3 value or normal numeric value which is readable!

3. Using PULL we can get data from user,
Can i ask user to press any key and perform task depending on his response,
e.g. Suppose i have a rexx to view one GDG.
The rexx will look something like this,

William Thompson · Posted: Tue Feb 13, 2007 4:12 pm

If you had bothered th search this forum for comp-3 you would have found this http://ibmmainframes.com/viewtopic.php?t=17235&highlight=comp3

hsk · New User Joined: 28 Nov 2006 Posts: 69 Location: India

Thanks,but
That i have seen already
2nd question is Imp.

The record in input file is AAAA 00000100.
The numeric part 00000100 is comp 3 so when i open the file in 3.4 and read i am not able to see the value as 00000100 .....
If my rexx is reading value from file word by word, how it will understand whether it's comp value or normal char value. Or there is know way rexx can understand that ?

I want my rexx to convert only 2nd word (in this case) and not 1st

William Thompson · Posted: Tue Feb 13, 2007 5:33 pm

If you look byte for byte, X'F0' thru X'F9' would be display and X'00' thru X'99' could be comp-3 and X'0F' thru X'9F' or X'0C' thru X'9C' would indicate the sign end of the field.

hsk · New User Joined: 28 Nov 2006 Posts: 69 Location: India

Ok .... gr8,
About the 3rd question?
Is it possible to accept 'key' from user?

dick scherrer · Posted: Wed Feb 14, 2007 9:16 am

Hello,

If you change the keyboard mapping in the 3270 emulator you're using, you could map the up/down arrows to emulate pf7/pf8. Rather than that, i'd suggest teaching the users to use pfkeys that you provide. Some folks also map PageUp and PageDown to pf7&8.

You should be able to scroll via pfkeys (you don't have to use pf7/pf8). Keep in mind that the directional arrow keys are (typically) not interrupt keys but merely move the cursor on the screen.