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 clause

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

New User


Joined: 07 Feb 2006
Posts: 1
Location: Hyderabad

PostPosted: Tue Feb 14, 2006 7:22 pm    Post subject: numeric clause
Reply with quote

i have a small doubt,plz validate the following statements

01 A PIC X(05).
01 A-NUM REDEFINES A PIC 9(05).


IF A-NUM NUMERIC
PERFORM X-PARA
ELSE
PERFORM Y-PARA.


PLZ validate the above statements,whether numeric can be used here or not???if not when numeric can be used???
explain with some examples..


thanks
katakam.
Back to top
View user's profile Send private message

Owen

New User


Joined: 07 Jul 2005
Posts: 1
Location: Germany

PostPosted: Tue Feb 14, 2006 7:56 pm    Post subject: Re: numeric clause
Reply with quote

Just say IF A NUMERIC. Then you know if A-NUM is valid.
Back to top
View user's profile Send private message
raghunathns

Active User


Joined: 08 Dec 2005
Posts: 127
Location: rochester

PostPosted: Thu Feb 16, 2006 7:55 pm    Post subject: Re: numeric clause
Reply with quote

what owen said is correct.

we check the filed which can store char or num ie. alphanumeric filed. so we check whether the numeric data present in the field.

what is the point in checking filed already defined as numeric.
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 Sort numeric fields with trailing spaces sancraig16 SYNCSORT 7 Tue Apr 03, 2018 1:21 am
No new posts Query to compare 2 values of 1 column... Poha Eater DB2 13 Fri Mar 09, 2018 10:45 am
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 Date in where clause - Windows Karthikeyan Subbarayan DB2 9 Wed Nov 15, 2017 9:07 pm
No new posts File Aid tool to compare numeric data balaji81_k Compuware & Other Tools 2 Tue Sep 26, 2017 3:35 am

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