View previous topic :: View next topic
|
Author |
Message |
ananthapradeep
New User
Joined: 24 May 2006 Posts: 1
|
|
|
|
HI,
In cobol :
77 a pic 9(4) value '2456'
77 b pic 9(4) comp.
MOVE a to b
Is it possibe to move the data to comp variable? |
|
Back to top |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008 Posts: 8696 Location: Dubuque, Iowa, USA
|
|
|
|
1) These lines won't compile -- you cannot have PIC 9 value ' '. Either remove the quotes from the VALUE clause or make A PIC X instead.
2) I changed A PIC 9(4) to A PIC X(4) and compiled a test program. The MOVE works just fine. As long as the value is numeric, there's no problem with the MOVE. |
|
Back to top |
|
|
mmwife
Super Moderator
Joined: 30 May 2003 Posts: 1592
|
|
|
|
If you change your code to the following:
Code: |
77 a pic 9(4) value 2456.
77 b pic 9(4) comp.
MOVE a to b |
Field b will contain:
The hex equiv of a decimal 2456. |
|
Back to top |
|
|
|