Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Convert String value to Numeric Value

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX
View previous topic :: :: View next topic  
Author Message
rajesh_mbt

New User


Joined: 27 Mar 2006
Posts: 95
Location: India

PostPosted: Wed Jun 21, 2006 11:55 am    Post subject: Convert String value to Numeric Value
Reply with quote

Can any one help me for the following question.

I want to remove the character value from input field to output field.
Example. A contains 10:20:22(Time) -Input field.
I want to remove the colon from A field and the result should be 102022.

Please let me know is there any function to acheive this.
Back to top
View user's profile Send private message

superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4650
Location: Raleigh, NC, USA

PostPosted: Wed Jun 21, 2006 6:00 pm    Post subject: Re: Convert String value to Numeric Value
Reply with quote

In REXX (you didn't specify what language) you can use a combination of two functions: TRANSLATE (translate the colon to a space) and SPACE (to remove the resulting spaces):

/* REXX */
STR = TIME()
SAY STR
STR = SPACE(TRANSLATE(STR,'',':'),0)
SAY STR
Back to top
View user's profile Send private message
Marso

REXX Moderator


Joined: 13 Mar 2006
Posts: 1275
Location: Israel

PostPosted: Wed Jun 21, 2006 6:29 pm    Post subject:
Reply with quote

I wanted to say that but as I am late here is another possibility (less efficient I think):

/* REXX */
STR = TIME()
SAY STR
PARSE VAR STR HH ':' MM ':' SS
STR = HH || MM || SS
SAY STR
Back to top
View user's profile Send private message
rajesh_mbt

New User


Joined: 27 Mar 2006
Posts: 95
Location: India

PostPosted: Thu Jun 22, 2006 11:26 am    Post subject:
Reply with quote

Moderator / Marso

This is working fine.... Thanks a lot for your help icon_smile.gif
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 -> CLIST & REXX All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Sort numeric fields with trailing spaces sancraig16 SYNCSORT 7 Tue Apr 03, 2018 1:21 am
No new posts Find & Replace string in CA-SORT mrgnndhmk CA Products 1 Fri Mar 30, 2018 12:58 am
No new posts Find a string in PS file opened in br... mukkas CLIST & REXX 3 Sat Feb 24, 2018 2:15 pm
No new posts Moving a COMP-3 Variable to a Numeric... ajayachander COBOL Programming 2 Thu Dec 14, 2017 5:46 pm
No new posts Can EDCICONV convert EBCDIC to ASCII... natt.sut IBM Tools 3 Fri Nov 17, 2017 8:46 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us