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

How to code the below cobol coding in EasyTrieve
IBM Mainframe Forums -> CA Products
Post new topic   Reply to topic Quick References
View previous topic :: View next topic  
Author Message
ujwalavenu
Currently Banned
New User


Joined: 07 Feb 2006
Posts: 7
Location: Hyderabad
PostPosted: Tue Oct 10, 2006 8:56 am
 Reply with quote
Hi,

How to code the below cobol coding in EasyTrieve.

Code:
IF WS-APPL-TYPE = 'RA' OR 'DS'
    DISPLAY 'VALID TYPE'
ELSE
    DISPLAY 'INVALID TYPE'
END-IF


Thanks and Regards.
Back to top
View user's profile Send private message
guptae

Moderator


Joined: 14 Oct 2005
Posts: 1209
Location: Bangalore,India
PostPosted: Tue Oct 10, 2006 9:50 am
 Reply with quote
Hi There,


U can code like this. It should work

Code:
IF WS-APPL-TYPE = 'RA' OR WS-APPL-TYPE = 'DS'
     DISPLAY 'VALID TYPE'
ELSE
     DISPLAY 'INVALID TYPE'
END-IF
Back to top
View user's profile Send private message
ihatesugar
Warnings : 1
New User


Joined: 22 Oct 2006
Posts: 43
PostPosted: Thu Oct 26, 2006 3:13 pm
 Reply with quote
IF WS-APPL-TYPE = 'RA' 'DS'
DISPLAY 'VALID TYPE'
ELSE
DISPLAY 'INVALID TYPE'
END-IF

works the same!!!!1
Back to top
View user's profile Send private message
View previous topic : : View next topic  
Post new topic   Reply to topic All times are GMT + 6 Hours
Forum Index -> CA Products

 

Similar Topics
Topic Forum Replies
No new posts IBM IMU Utility for Easytrieve Code t... IBM Tools 0
No new posts Big Five Personality Test in COBOL - ... COBOL Programming 0
No new posts I wrote a Hallmark Movie Plot Generat... COBOL Programming 0
No new posts COBOL Text Adventure Engine for TK4- ... COBOL Programming 0
No new posts Cobcalc: An Algebraic Expression Eval... COBOL Programming 10
Search our Forums:


Back to Top
IBMMainframes.com is not an official and/or affiliated with IBM® in anyway
Board Rules | FAQ | Downloads | Wiki | SiteMap | Contact Us