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
 
Numeric Check

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS
View previous topic :: :: View next topic  
Author Message
rinkubhat

New User


Joined: 13 Sep 2005
Posts: 35
Location: India

PostPosted: Fri May 27, 2011 6:33 pm    Post subject: Numeric Check
Reply with quote

I have a 8 byte alpha numeric field in the map . I want to allow only numeric and numeric fields with spaces .
e.g I can allow 082,__082.
0_82 not allowed.
Here _ represents spaces.
Back to top
View user's profile Send private message

Bill O'Boyle

CICS Moderator


Joined: 14 Jan 2008
Posts: 2504
Location: Atlanta, Georgia, USA

PostPosted: Fri May 27, 2011 6:39 pm    Post subject: Reply to: Numeric Check
Reply with quote

Review the PICIN and PICOUT keywords on the DFHMDF definition.

They might do the trick, with some modification.

Bill
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8200
Location: East Dubuque, Illinois, USA

PostPosted: Fri May 27, 2011 8:12 pm    Post subject:
Reply with quote

Since you did not explain very precisely what you want, it's hard to provide a response. Are you wanting to generate an error message when you have invalid data in the field? Do you want to just get rid of the invalid data in the field? Are you wanting to check each byte separately? Can there be a sign in the field?

Either EXEC CICS BIF DEEDIT or reference modification would do what you want, depending upon exactly what you're attempting to achieve.
Back to top
View user's profile Send private message
Gautam512

Active User


Joined: 05 Oct 2005
Posts: 309
Location: Vizag / US

PostPosted: Wed Jul 06, 2011 3:03 am    Post subject:
Reply with quote

hi,

the only way i see is, define the field as alpha-numneric and validate the fields once you receive the map in the program...

let me know if you found a better solution, it helps us to learn as well....

thanks
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8200
Location: East Dubuque, Illinois, USA

PostPosted: Wed Jul 06, 2011 3:06 am    Post subject:
Reply with quote

Gautam512, after 5 1/2 weeks with no further response, do you really expect to get anything from the o/p?
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 -> CICS All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts File Aid tool to compare numeric data balaji81_k Compuware & Other Tools 2 Tue Sep 26, 2017 3:35 am
No new posts Remove leading spaces from numeric field rexx77 SYNCSORT 6 Wed Sep 06, 2017 2:15 am
No new posts Return a Non Numeric value from REXX Learncoholic CLIST & REXX 3 Fri Sep 01, 2017 8:33 pm
No new posts Select numeric portion from CHAR data... balaji81_k DB2 6 Sat Aug 19, 2017 1:51 am
No new posts ALPHABETIC check in COBOL vidyaa COBOL Programming 8 Thu Aug 17, 2017 7:13 pm

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