Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

EVALUATE AND LEVEL 88

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

New User


Joined: 11 Dec 2005
Posts: 12
Location: Lima-Per?

PostPosted: Fri Aug 18, 2006 10:46 pm    Post subject: EVALUATE AND LEVEL 88
Reply with quote

hi guys!!!!
What is error?

Code:

. . .
WORKING-STORAGE SECTION.
01 CANDIDATE-CODE         PIC X.
             88 A-VOTE-FOR-BUSH     VALUE 'W'.
             88 A-VOTE-FOR-GORE     VALUE 'G'.
             88 A-VOTE-FOR-NADER    VALUE 'N'.
             88 A-VOTE-FOR-BUCHANAN VALUE 'B'.
. . .

PROCEDURE DIVISION.
     EVALUATE TRUE
               WHEN A-VOTE-FOR-GORE      MOVE 1 TO CANDIDATE-SUB
               WHEN A-VOTE-FOR-BUSH      MOVE 2 TO CANDIDATE-SUB
               WHEN A-VOTE-FOR-NADER     MOVE 3 TO CANDIDATE-SUB
               WHEN A-VOTE-FOR-BUCHANAN  MOVE 4 TO CANDIDATE-SUB
     END-EVALUATE.
. . .



ERROR:
Code:

The selection object at position 1 in the "WHEN" phrase did not match the type of the corresponding selection subject in the "EVALUATE" statement.  The selection was discarded.
Back to top
View user's profile Send private message

ovasquez

New User


Joined: 11 Dec 2005
Posts: 12
Location: Lima-Per?

PostPosted: Fri Aug 18, 2006 10:48 pm    Post subject:
Reply with quote

COMPILER:
IBM COBOL for OS/390 & VM 2.1.2
Back to top
View user's profile Send private message
DavidatK

Active Member


Joined: 22 Nov 2005
Posts: 700
Location: Troy, Michigan USA

PostPosted: Sat Aug 19, 2006 3:03 am    Post subject: Re: EVALUATE AND LEVEL 88
Reply with quote

Are you making fun of our political and electoral system? icon_question.gif icon_razz.gif icon_biggrin.gif (It's not very difficult to, is it?)

It didn't look like anything was wrong with your code, so I compiled and executed it. No Problem with E-COBOL.

Dave
Back to top
View user's profile Send private message
ovasquez

New User


Joined: 11 Dec 2005
Posts: 12
Location: Lima-Per?

PostPosted: Sat Aug 19, 2006 4:38 am    Post subject:
Reply with quote

icon_razz.gif ,not is only a program test....
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 Syncsort TPF Level Majid Hussain SYNCSORT 2 Wed Apr 13, 2016 2:22 am
No new posts Need a logic to validate the data in ... sandeep kumar302 COBOL Programming 17 Mon Feb 01, 2016 3:30 pm
No new posts DB2 10.1 Share level locking and Sele... Mary Lewis DB2 1 Wed Apr 15, 2015 9:51 pm
No new posts CICS SE Level Openings in Accenture enikhilk Mainframe Jobs 0 Mon Sep 01, 2014 6:39 pm
No new posts 88 level variable logic not working sandeep kumar302 COBOL Programming 19 Thu Jul 31, 2014 10:59 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us