Re: Test request (for Enter;prise COBOL)

DD (and Charles who didn't post here),
Thank you for running the test for me. I am sorry that my original
source code had errors in it. I do hope to have a compiler available again
in the near future to avoid making such requests (at least with compiler
errors) in the future.

<docdwarf@xxxxxxxxx> wrote in message news:i1iabs$3is$1@xxxxxxxxxxxxxxxxxxxx
In article <Bc0%n.467592$Up1.103262@xxxxxxxxxxxxxxxxxxxxxxxxxxx>,
Bill Klein <wmklein@xxxxxxxxxxxxxxxxxxxxx> wrote:
Which statements got the "IGYPS8233" message? The last 3 MOVE statements?

Statements 28, 30 and 32 (which, for reasons of clarity, were called
'28.13, 30.13, 32.13) and are, respectively:

000028 002900 Move Elem1 (anInd) to Recv

000030 003100 Move Elem2 (anInd) to Recv.

000032 003300 Move Elem3 (anInd) to Recv

The message, in its entirety, reads:

=>000028.13 IGYPS8233 Index-name does not appear in "INDEXED BY" phrase
for the table: nonconforming nonstandard, IBM extension to ANS/ISO 1985.

I will update the source code, but if you want to try for a clean
(cleaner?)
compile, fix the spelling of "function" from "funtion" before
CURRENT-DATE.
That seems to be what those other messages are about.

You have no idea, Mr Klein, how supremely motivated I am to fix up someone
else's code that I've downloaded twice and compiled a half-dozen times in
order to discover nuances of this sort of subtlety.

DD

[top posted, nothing new here]

<docdwarf@xxxxxxxxx> wrote in message
news:i1hsq5$so4$1@xxxxxxxxxxxxxxxxxxxx
In article <e6__n.647735$Hq1.36925@xxxxxxxxxxxxxxxxxxxxxxxxxxx>,
Bill Klein <wmklein@xxxxxxxxxxxxxxxxxxxxx> wrote:
As I say, I don't have a compiler available at the moment. Sorry about
the
"typo" compiler errors. I think (hope) I have fixed them atll in the
(updated) version at:
http://home.comcast.net/~wmklein/IBM/TestInd.CBL

Let me know if there are still some that I need to fix.

All righty... the first compile gave another bunch o' stuff but I think
you said you were interested in FIPS errors, of which there was one:

28.13 IGYPS8233 Index-name does not appear in "INDEXED BY" phrase

Is this sufficient meat or shall I get back to things like

000023 002400 Compute Num = Function Integer

==000023==> IGYPS2288-E Too many arguments were specified for function
"INTEGER"

000024 002500 (Funtion Current-Date (6:1))

==000024==> IGYPS2121-S "FUNTION" was not defined as a data-name.

==000024==> IGYPS2121-S "CURRENT-DATE" was not defined as a data-name.

==000024==> IGYPS2070-E Expected a right parenthesis, but found ":"

... et and cetera?


<docdwarf@xxxxxxxxx> wrote in message
news:i1hm47$mlr$1@xxxxxxxxxxxxxxxxxxxx
In article <SUP_n.575383$vr1.32401@xxxxxxxxxxxxxxxxxxxxxxxxxxx>,
Bill Klein <wmklein@xxxxxxxxxxxxxxxxxxxxx> wrote:
I don't have current access to an IBM Enterprise COBOL compiler
(either
V3.x
or V4.x). If someone who has could try to compile the program in this
ntoe
with FLAG(I,I) and FLAGSTD(H) turned on, I would be interested in what
FIPS
messages you get.

Well... how about this'un, for starters:

000022 002300 Move All "abcdefghijklmnopqrstuvwxyzABCDE
(etc)

==000022==> IGYPS0009-E "MOVE" should not begin in area "A".

Kind of hard to go on from there... but what's Life without Struggle?

Changing that line to fit in between Ye Olde Marginse yielded:

000002 000300 Program-Id. TestInd..

==000002==> IGYDS0001-W A blank was missing before character "." (etc)

==000002==> IGYDS1089-S ". " was invalid.

... and changing the double-period/full stop in *that* line yielded:

000024 002400 to aTable Table1 Table2 Stable3

==000024==> IGYPS2121-S "STABLE3" was not defined as a data-name.

... and that which I was told thrice is true.

DD











.

Relevant Pages

  • Re: Dumb Question 2: Start syntax
    ... COBOL V4. ... > That compiler was originally written for ISAM not even VSAM (and also supports ... > Bill Klein ... > wmklein ix.netcom.com ...
    (comp.lang.cobol)
  • Re: Validating input file
    ... can be either line sequential or record sequential - depending the compiler ... Bill Klein ... wmklein ix.netcom.com ...
    (comp.lang.cobol)
  • Re: Treeviews
    ... Both are extensions and the compiler is telling you that they are NOT Standard. ... Bill Klein ... > source program and the ... > directives in the program ...
    (comp.lang.cobol)
  • Re: Obsolete elements of COBOL language
    ... > There is a REAL difference between compiler errors and informational errors. ... > If your instructor doesn't understand this, ... > Bill Klein ...
    (comp.lang.cobol)
  • Re: GPL vs non-GPL device drivers
    ... shipped the source code of the modified POP server. ... given you the compiler he compiled it with, ... Actually, if memory serves, when you license a work under the GPL, part of the ... a derivative work" the claim is invalid - because, as it has been shown, a ...
    (Linux-Kernel)