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
 

 

Unstring - Cobol

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

New User


Joined: 29 Jun 2005
Posts: 13
Location: USA

PostPosted: Tue Oct 06, 2009 11:42 am    Post subject: Unstring - Cobol
Reply with quote

Can you tell me UNSTRING command for the below requirement?

Input: 5,00,000
Output: 500000

Requirement: remove the commas.

I have used the below code. my output is showing as 5 00 000. i am getting spaces. I have to delete this as well.

UNSTRING WS-STRING-INT-1
DELIMITED BY ','
INTO WS-STRING-INT-2
END-UNSTRING

please help me.
Back to top
View user's profile Send private message

Raghu navaikulam

Active User


Joined: 27 Sep 2008
Posts: 186
Location: chennai

PostPosted: Tue Oct 06, 2009 1:06 pm    Post subject: Reply to: Unstring - Cobol
Reply with quote

Hi rmaruri

Please provide the picture clause of the 2 variables
WS-STRING-INT-1
WS-STRING-INT-2.

Regards
Raghunath
Back to top
View user's profile Send private message
donevin

New User


Joined: 07 Jun 2005
Posts: 70
Location: South Africa

PostPosted: Tue Oct 06, 2009 1:54 pm    Post subject:
Reply with quote

If you want the numeric value of the string, 'cause it seems to me that's what you want, you can get it this way :

Code:
COMPUTE WS-STRING-INT-2 =                           
                FUNCTION NUMVAL-C (WS-STRING-INT-1).


but keep in mind that WS-STRING-INT-2 must be numeric. If you want the string value, move the numeric value to the string field again.
Back to top
View user's profile Send private message
rmaruri

New User


Joined: 29 Jun 2005
Posts: 13
Location: USA

PostPosted: Wed Oct 07, 2009 3:01 pm    Post subject:
Reply with quote

It worked. Thanks a lot donevin.
Back to top
View user's profile Send private message
donevin

New User


Joined: 07 Jun 2005
Posts: 70
Location: South Africa

PostPosted: Wed Oct 07, 2009 3:49 pm    Post subject:
Reply with quote

You're welcome. I have received lotsa help on the forums so I'm very glad I can give some back.
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
This topic is locked: you cannot edit posts or make replies. Full Time COBOL Software Development ... shally Mainframe Jobs 0 Fri Jan 20, 2017 5:24 am
This topic is locked: you cannot edit posts or make replies. COBOL Software Development Lead at Fi... shally Mainframe Jobs 0 Fri Jan 20, 2017 5:21 am
No new posts Executing OO COBOL program invoking J... Virendra Shambharkar COBOL Programming 2 Tue Jan 10, 2017 6:37 pm
No new posts OO COBOL compile error Virendra Shambharkar COBOL Programming 3 Tue Jan 10, 2017 6:05 pm
No new posts Need Suggestion on COBOL program vickey_dw COBOL Programming 5 Thu Jan 05, 2017 10:55 pm


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