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

SET verb error


IBM Mainframe Forums -> COBOL Programming
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
mcmillan

Site Admin


Joined: 18 May 2003
Posts: 1210
Location: India

PostPosted: Fri Jul 04, 2003 10:34 am
Reply with quote

DEAR,

You can't set a condition code directly to FALSE. COBOL diesn't have this facility.

But you can SET TO TRUE.

SET <condituion> TO TRUE will works well.
Back to top
View user's profile Send private message
mmwife

Super Moderator


Joined: 30 May 2003
Posts: 1592

PostPosted: Sun Jul 06, 2003 1:54 am
Reply with quote

If you have a condition set up as:

05 my-cond1 pic x value 'F'.
88 file-is-open value 'O'.

You can add another 88 level:

88 file-is-not-open value 'N'.

Then set file-is-not-open to true.

You could do something similar with false but you'd have to make each "false" unique, e.g. false-1, false-2, etc. Method 1 is better, IMHO.
Back to top
View user's profile Send private message
a_rajesh1221

New User


Joined: 13 Dec 2005
Posts: 1
Location: Hyderabad

PostPosted: Mon Aug 28, 2006 3:35 pm
Reply with quote

Can u give a detailed example of how to use SET verb with REDEFINES clause?



mmwife wrote:
If you have a condition set up as:

05 my-cond1 pic x value 'F'.
88 file-is-open value 'O'.

You can add another 88 level:

88 file-is-not-open value 'N'.

Then set file-is-not-open to true.

You could do something similar with false but you'd have to make each "false" unique, e.g. false-1, false-2, etc. Method 1 is better, IMHO.
Back to top
View user's profile Send private message
cobolunni

Active User


Joined: 07 Aug 2006
Posts: 127
Location: kerala,india

PostPosted: Mon Aug 28, 2006 4:12 pm
Reply with quote

you can find detail description of redefine clause at http://publibfp.boulder.ibm.com/cgi-bin/bookmgr/BOOKS/IGY3LR00/5.3.12?DT=20011206182158

also you can find details of set verb at http://publibfp.boulder.ibm.com/cgi-bin/bookmgr/BOOKS/IGY3LR00/6.2.33?DT=20011206182158
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 -> COBOL Programming

 


Similar Topics
Topic Forum Replies
No new posts Error to read log with rexx CLIST & REXX 11
No new posts Error when install DB2 DB2 2
No new posts CLIST - Virtual storage allocation error CLIST & REXX 5
No new posts Error while running web tool kit REXX... CLIST & REXX 5
No new posts Getting Error while trying to establi... DB2 3
Search our Forums:

Back to Top