View previous topic :: View next topic
|
Author |
Message |
mighty
New User
Joined: 21 May 2008 Posts: 26 Location: chennai
|
|
|
|
how to move alphanumeric values to comp-3?
Here is my requirement
01 A-ACCT-NBR PIC S9(10) COMP-3.
01 B-ACCT-NBR PIC X(10)
VALUE SPACES.
MOVE B-ACCT-NBR TO A-ACCT-NBR |
|
Back to top |
|
|
shankar.v
Active User
Joined: 25 Jun 2007 Posts: 196 Location: Bangalore
|
|
Back to top |
|
|
Bharath Bhat
Active User
Joined: 20 Mar 2008 Posts: 283 Location: chennai
|
|
|
|
Quote: |
how to move alphanumeric values to comp-3? |
What are you trying to achieve? What is the need for you to do that?
You can use redefines. |
|
Back to top |
|
|
aishwarya_20
New User
Joined: 19 Nov 2008 Posts: 57 Location: pune
|
|
|
|
Either you can use REDEFINES clause or you can declare another variable which is numeric. Then first move COMP-3 value to numeric and numeric to alphanumeric. This should work. |
|
Back to top |
|
|
|