1. 15 to 27 position field was declared as S9(10)V9(3) (not COMP or COMP3)
2. 28 to 41 position field was declared as S9(10)V9(4) (not COMP or COMP3)
3. 42 to 54 position field was declared as S9(10)V9(3) (not COMP or COMP3)
4. 55 to 68 position field was declared as S9(10)V9(4) (not COMP or COMP3)
So, we don't know the exact value in these positions due to it stored in PD or any other format. I want to see exact values for these positions by giving the macro name on command prompt whether the file is open. We need to give the command with parameters in command prompt like...
If it Packed decimal to Decimal ---> Command ===> PDTDC 15,14 (or) PDTDC (15,14)
If it Binary to decimal ---> Command ===> BFTDC 15,14 (or) BFTDC (15,14)
Here PDTDC is the Rexx program name and 15, 14 are parameters which 15 tell the starting of the position and 14 is length of the field. So that from the position it should convert the data to readable format and display it on same position in a file or display the popup temporally (for reference purpose).
We know that we are able to see the exact value by using File-aid. For this we copy the corresponding file layout from the program and store in a member. By using this member we can able to see in File-id. But here I want to eliminate this process like copy the layout and store in a member and open the File-aid...etc. I want just by giving the macro name on command prompt to refer the value at the moment.
Please let me know the process to write this code.
Joined: 26 Apr 2004 Posts: 4652 Location: Raleigh, NC, USA
OK. What have you got, where are you stuck, what specifically can we help with? Offhand, I don't think there's any part of this that hasn't been discussed before and other topics.