Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

move alphanumeric values to comp-3

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
mighty

New User


Joined: 21 May 2008
Posts: 22
Location: chennai

PostPosted: Wed Feb 18, 2009 12:17 pm    Post subject: move alphanumeric values to comp-3
Reply with quote

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
View user's profile Send private message

shankar.v

Active User


Joined: 25 Jun 2007
Posts: 196
Location: Bangalore

PostPosted: Wed Feb 18, 2009 1:44 pm    Post subject:
Reply with quote

mighty,

Please refer the below link.

http://ibmmainframes.com/viewtopic.php?t=38051

Thanks,
Shankar.
Back to top
View user's profile Send private message
Bharath Bhat

Active User


Joined: 20 Mar 2008
Posts: 283
Location: chennai

PostPosted: Wed Feb 18, 2009 1:59 pm    Post subject:
Reply with quote

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
View user's profile Send private message
aishwarya_20

New User


Joined: 19 Nov 2008
Posts: 57
Location: pune

PostPosted: Wed Feb 18, 2009 2:41 pm    Post subject:
Reply with quote

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
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts SQL query to run through list of valu... Ni3-db2 DB2 14 Wed Dec 14, 2016 9:52 am
This topic is locked: you cannot edit posts or make replies. How to move a long alphanumeric data ... lind sh COBOL Programming 8 Mon Dec 05, 2016 7:51 pm
No new posts Overlaying one set of charater values... Kevin Lindsley SYNCSORT 7 Sat Nov 05, 2016 3:21 am
No new posts Low values Results from VARCHAR FORMAT balaji81_k DB2 10 Thu Oct 20, 2016 1:18 am
No new posts Protection Exception while move 0 to ... Kevin Vaz CICS 10 Tue Oct 18, 2016 4:19 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us