Subject: | |
From: | |
Reply To: | Rao, Raghu |
Date: | Thu, 5 May 2005 12:05:23 -0400 |
Content-Type: | text/plain |
Parts/Attachments: |
|
|
Hi,
In cobol, is there any way that I get the redefined value from character
value into a proper numeric value ?
For Ex:
*************
01 WS-A PIC X(04).
01 WS-B redefines WS-A pic 9(04).
02 WS-C pic 9(04).
...
MOVE 3 TO WS-A.
MOVE WS-B TO WS-C.
..
DISPLAY " A:" WS-A ":"
DISPLAY " B:" WS-B ":"
DISPLAY " C:" WS-C ":"
Results are
A:3 :
B:3 :
C:3000:
I want the results to be:
--------------------------------
A:3 :
B:0003:
C:3:
Thanks.
Raghu Rao
Confidentiality Notice:
The information contained in this electronic message is intended for the exclusive use of the individual or entity named above and may contain privileged or confidential information.
If the reader of this message is not the intended recipient or the employee or agent responsible to deliver it to the intended recipient, you are hereby notified that dissemination, distribution or copying of this information is prohibited.
If you have received this communication in error, please notify the sender immediately by telephone and destroy the copies you received.
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
|
|
|