HP3000-L Archives

August 2000, Week 1

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
"Karman, Al" <[log in to unmask]>
Reply To:
Karman, Al
Date:
Thu, 3 Aug 2000 16:17:20 -0500
Content-Type:
text/plain
Parts/Attachments:
text/plain (80 lines)
Ken says:

By the way, periods are not necessary after each individual COBOL statement

And indenting nested IF's isn't necessary, either.  Both could be attributed
to ease of readability.

Al Karman
IT Consultant
US Freightways
[log in to unmask]
773.824.2284


-----Original Message-----
From: Ken Hirsch [mailto:[log in to unmask]]
Sent: Thursday, August 03, 2000 4:14 PM
To: [log in to unmask]
Subject: Re: MicroFocus Cobol compile problem


I believe MF COBOL uses "INSPECT" rather than "EXAMINE".  The compiler is
taking "EXAMINE" to be the name of a paragaph.

By the way, periods are not necessary after each individual COBOL statement



----- Original Message -----
From: "Chipurnoi, Scott (SSC)" <[log in to unmask]>
To: <[log in to unmask]>
Sent: Thursday, August 03, 2000 4:34 PM
Subject: MicroFocus Cobol compile problem


> I am posting this to the list as I was unable to help a friend resolve a
> Cobol compile problem.  He is converting some programs from HP3000's Cobol
> to MicroFocus Cobol for use on the 9000.  He is getting the following
> compile error.
>
> * Compiling cyb99gls.cob
>    204     EXAMINE DEBIT-AMT REPLACING ALL ' ' BY '0'.
> *   9-S***********
> **
> **    '.' missing
> * Total Messages:     1
> * Unrecoverable :     0                    Severe  :     1
> * Errors        :     0                    Warnings:     0
> * Informational :     0                    Flags   :     0
> * Data:        1568     Code:        1143
> cob: error(s) in compilation: cyb99gls.cob
> Compile Not Sucessful for cyb99gls.cob
>
> The portion of code that is not compiling is:
>
> 050000 ACCUM-TOTALS.
> RS980213
> 050005     IF DEBIT-AMT    = SPACES
> RS980213
> 050010          GO TO ACCUM-CR.
> RS980213
> 050015     EXAMINE DEBIT-AMT REPLACING ALL ' ' BY '0'.
>
> 050020     MOVE DR-DOLLARS TO WK-DOLLARS.
> RS980213
> 050025     MOVE DR-CENTS TO WK-CENTS.
> RS980213
> 050030     ADD WK-AMOUNT-9 TO TOT-DR.
> RS980213
>
> The compile says it is failing due to a '.' missing, but it looks like it
is
> there at the end of the "EXAMINE" statement in the code.
> Having never used MicroFocus, I don't know if there are problems, to tell
> him about, in going from HP's Cobol to Microfocus.
> Has anyone come across something like this?
>
> TIA.
>

ATOM RSS1 RSS2