View previous topic :: View next topic
|
Author |
Message |
Pankaj Gupta Currently Banned New User
Joined: 07 May 2008 Posts: 50 Location: Bangalore
|
|
|
|
I am writing cobol programs which it is not compiling. It is a problem with the statement EVALUATE. So I am told that here we are using something called OSVS cobols which does not recognise EVALUATE. But I think the compiler is made compatible backwards so that it will always be compiling the newest cobol languages so there must be some other problem why it will not recognise EVALUATE.
Thank you for your help. |
|
Back to top |
|
|
Craq Giegerich
Senior Member
Joined: 19 May 2007 Posts: 1512 Location: Virginia, USA
|
|
|
|
Show us the COBOL code and the error messages. |
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
without attending to your comment about backwards compatibility, which made no sense:
what error are you receiving on your compile listing? |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
Hello,
Quote: |
so there must be some other problem why it will not recognise EVALUATE. |
We're still waiting for your code and error messages. . . |
|
Back to top |
|
|
Pankaj Gupta Currently Banned New User
Joined: 07 May 2008 Posts: 50 Location: Bangalore
|
|
|
|
I have attaching my code and the compiling problems: |
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
Pankaj Gupta,
I apologize. I thought that I was the only one working at shops with antique op-systems.
you are stuck. you need to use a nested if (or a GOTO ON - sorry, that was intended as a joke.) |
|
Back to top |
|
|
Pankaj Gupta Currently Banned New User
Joined: 07 May 2008 Posts: 50 Location: Bangalore
|
|
|
|
Thank you very much sir, but why am I having to use a nested if and not an evaluate? Evaluate is in the fine manual and I think I have coded it correctly.
Thank you again. |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
Hello,
Please post the info from the top of the compile - it will show the version of the compiler you are using.
It is possible that you have a manual that is more current than the compiler that is actually on your system. It might also be that the compiler on your system is missing some updates. Is ther any chance that your jcl is using an obsolete compile proc/jcl - if an old compiler was still on the system, but not to be used any more, it might still be executable and could cause your problem.
Are you you using "your own" compile jcl or is your compile job generated for you?
I'd suggest you talk with others on your project and/or the people who support the compiler and make sure you are using the correct libraries, names, parms, etc.
When you post data, code, jcl, etc, please use the "Code" tag and not attach a screen shot. The screen shot wastes a lot of space and is much harder to read. You can copy/paste from your screen to the Reply Panel. |
|
Back to top |
|
|
CICS Guy
Senior Member
Joined: 18 Jul 2007 Posts: 2146 Location: At my coffee table
|
|
|
|
Pankaj Gupta wrote: |
but why am I having to use a nested if and not an evaluate? Evaluate is in the fine manual and I think I have coded it correctly. |
Highlight, copy and paste the top two (head) lines of your compiler listing
Backward compatable does not mean new features will work with old compilers, but the old code will work with new compilers....... |
|
Back to top |
|
|
Pankaj Gupta Currently Banned New User
Joined: 07 May 2008 Posts: 50 Location: Bangalore
|
|
|
|
Now I am told we must not be using the EVALUATES. I do not know why this is being but we must not be using. I think it would be better to fix the problem but this must be for systems programmers not the cobols programmers.
So thank you for all your helpful. |
|
Back to top |
|
|
mmwife
Super Moderator
Joined: 30 May 2003 Posts: 1592
|
|
|
|
Oh well, I wonder what compiler he was using? |
|
Back to top |
|
|
CICS Guy
Senior Member
Joined: 18 Jul 2007 Posts: 2146 Location: At my coffee table
|
|
|
|
A compiler that has options that disallow certain verbs from being used by lowly application programmers? |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6250 Location: Mumbai, India
|
|
|
|
Quote: |
Oh well, I wonder what compiler he was using? |
And how many such "arrangements" he is going to make, there had been enough enhancements in the COBOL functions, how many of them his system programmer are going to deny. |
|
Back to top |
|
|
Pankaj Gupta Currently Banned New User
Joined: 07 May 2008 Posts: 50 Location: Bangalore
|
|
|
|
This question still is troubling to me but I am thinking I have a fine plan to solve what it is happening.
If I can be xpediting the compiler while it is compiling my program then I will be seeing at what point it is when the compiler does not liking my EVALUATE statement. This is being a dark shot but I am thinking it will work if I can locate where is a compile listing for the compiling program.
If someone would be kind to please elaborate on where exactly which system library the listings are being then I can solve this strange mystery for all and once.
Thank you all very much. |
|
Back to top |
|
|
Douglas Wilder
Active User
Joined: 28 Nov 2006 Posts: 305 Location: Deerfield IL
|
|
|
|
The error messages you already showed us are from the compile listing (like IKF1227I-I), this comes out of the SYSPRINT DD of the compile step. We just need to see the first few lines of that listing. For example my compile listing starts with:
Code: |
PP 5655-G53 IBM Enterprise COBOL for z/OS 3.3.1 |
What does yours say? This would let us know what compiler you are using and we could see if that compiler can use the command you would like to use. |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
Hello,
If my memory is still active, i believe the IKF messages are from the old COBOL II compiler. |
|
Back to top |
|
|
|