| View previous topic :: View next topic |
| Author |
Message |
Cogito-Ergo-Sum
Advanced
Joined: 15 Dec 2002
Posts: 637
Topics: 43
Location: Bengaluru, INDIA
|
 Posted: Tue Sep 26, 2006 4:31 pm Post subject: COBOL Comments |
 |
|
Hi,
Without using any external help, can you say what is the 'problem' with the below text which you might see in a COBOL program ?
| Code: |
*
*This EVALUATE block will test the various types of ITEM-CODE.
*It is expected that, this program will recieve only 4 of the
*10 possible item codes. Thus, it would be extremely rare that
*control would goto the WHEN OTHER part .
|
8)
_________________
ALL opinions are welcome.
Debugging tip:
When you have eliminated all which is impossible, then whatever remains, however improbable, must be the truth.
-- Sherlock Holmes. |
|
| Back to top |
|
 |
kolusu
Site Admin
Joined: 26 Nov 2002
Posts: 12378
Topics: 75
Location: San Jose
|
| Posted: Tue Sep 26, 2006 5:28 pm Post subject: |
|
|
Cogito-Ergo-Sum,
I don't think it will compile. just a hunch on the 4th line (*control is reserved word)
kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu |
|
| Back to top |
|
|
Cogito-Ergo-Sum
Advanced
Joined: 15 Dec 2002
Posts: 637
Topics: 43
Location: Bengaluru, INDIA
|
| Posted: Wed Sep 27, 2006 12:36 am Post subject: |
|
|
Brilliant, Kolusu !
That is the problem with the above comments. !!
_________________
ALL opinions are welcome.
Debugging tip:
When you have eliminated all which is impossible, then whatever remains, however improbable, must be the truth.
-- Sherlock Holmes. |
|
| Back to top |
|
|
kraj
Beginner
Joined: 15 Apr 2004
Posts: 8
Topics: 2
|
| Posted: Mon Oct 02, 2006 10:13 am Post subject: Comment |
|
|
Kolusu, Cogito,
When I tried to compile using Control , itwent through. It didn't come up with any error.
thanks.
Kraj.
Note: I am working inUnisys 2200 systemusing Cobol.
* 02/02/06 Local version .only for my testing
*CONTROL RAJ |
|
| Back to top |
|
|
|
|
|
FAQ
Search
Quick Manuals
Register
Profile
Log in to check your private messages
Log in
