IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

IS NUMERIC function in Easytrieve


IBM Mainframe Forums -> CA Products
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
pecram24

New User


Joined: 12 Oct 2009
Posts: 35
Location: Chennai

PostPosted: Fri Oct 07, 2011 6:39 pm
Reply with quote

Hi,


Is there any way to check whether a variable is Numeric or not n easytrieve

Thanks in advance
Back to top
View user's profile Send private message
Bill Woodger

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix

PostPosted: Fri Oct 07, 2011 6:45 pm
Reply with quote

Not really a Cobol question. There is a forum for CA products. Look there later after one of the kind moderators moves it for you.

The answer is yes. NUMERIC. Check it in you manual.
Back to top
View user's profile Send private message
pecram24

New User


Joined: 12 Oct 2009
Posts: 35
Location: Chennai

PostPosted: Fri Oct 07, 2011 6:47 pm
Reply with quote

Hi Bill ,


thanks for the reply.. i couldn't find anything like that.. if you have any reference for that can u plz share it here...
Back to top
View user's profile Send private message
Bill O'Boyle

CICS Moderator


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

PostPosted: Fri Oct 07, 2011 6:47 pm
Reply with quote

I'm sure this is defined somewhere in the Easytrieve documentation.

Ask the keeper of your Product documents for access.

Mr. Bill
Back to top
View user's profile Send private message
Bill Woodger

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix

PostPosted: Fri Oct 07, 2011 6:56 pm
Reply with quote

Mr Bill is right. It certainly is in the documentation.

Code:
IF fieldname NUMERIC
     do some processing
END-IF


Try it. Then find it in your manual.

If you still have difficulty, try to find it in the manual again*.

*Look for Field Class Condition

EDIT: There is a hint in this post on where to look in the manual, if you experiment with the presentation of topics here...
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix

PostPosted: Fri Oct 07, 2011 7:39 pm
Reply with quote

Hello,

From the manual:
Code:
JOB INPUT PERSNL NAME MYPROG FINISH FINISH-PROC
IF PAY-GROSS NOT NUMERIC
   DISPLAY EMP# ' PERSONNEL RECORD IS DAMAGED'
   GOTO JOB
ELSE-IF PAY-GROSS > 500.00
   XMAS-BONUS = PAY-GROSS * 1.03
ELSE
   XMAS-BONUS = PAY-GROSS * 1.05
END-IF


If your organization is licensed to use the product, all of the material may be downloaded free from CA Support.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> CA Products

 


Similar Topics
Topic Forum Replies
No new posts Issues Converting From ZD to Signed N... DFSORT/ICETOOL 4
No new posts Calling an Open C library function in... CICS 1
No new posts DATE2 function SYNCSORT 15
No new posts Help on PL/I jsonPutValue function PL/I & Assembler 8
No new posts how to use Tso outtrap external function All Other Mainframe Topics 8
Search our Forums:

Back to Top