COBOL Error Message Assist (MVS)

From: Gonzo (ckhamel1961.nospam_at_yahoo.com)
Date: 02/22/04

  • Next message: Gonzo: "Re: DISPLAY" 
    Date: Sun, 22 Feb 2004 08:03:10 GMT

    Hi, folks...

    Wondering if someone has run across this message before... system is MVS,
    running "IBM ENTERPRISE COBOL FOR Z/OS AND OS/390 3.2.0":

    IGYAS5125-U THE COMPILATION WAS TERMINATED DUE TO A COMPILER ERROR IN
    PHASE ID: "IGYCASM1".
    IGYAS5092-U OVERFLOW OCCURRED ON TABLE "TRQB".

    My error diagnosis says it's an "unrecoverable" error, please contact a
    system programmer or IBM support.

    I have those options available to me on Monday, but I've got a lot of the
    weekend left to finish up a bunch of coding. I suspect it may have something
    to do with the number of statements in the program (about 700,000 lines). My
    COBOL references say it has a limitation of 999,999 lines, so I'm more
    suspicious of maybe another limiatation that's not obvious to me. Compiled
    program size is just over 1 meg, so I don't think I'm in trouble there. I've
    got a large number of I-level errors and a few W-level statements, but no
    E-level or S-level error statements. Been compiling/running fine today until
    I just added a fairly large copybook in the procedure division.

    Current compiler options in effect:
    NOADATA
    NOADV
      APOST
      ARITH(COMPAT)
      AWO
      BUFSIZE(23476)
    NOCICS
      CODEPAGE(1140)
    NOCOMPILE(S)
    NOCURRENCY
      DATA(31)
    NODATEPROC
    NODBCS
    NODECK
    NODIAGTRUNC
    NODLL
    NODUMP
      DYNAM
    NOEXIT
    NOEXPORTALL
      FASTSRT
      FLAG(I,E)
    NOFLAGSTD
      INTDATE(ANSI)
      LANGUAGE(UE)
      LIB
      LINECOUNT(80)
    NOLIST
      MAP
    NONAME
      NSYMBOL(DBCS)
    NONUMBER
      NUMPROC(MIG)
      OBJECT
      OFFSET
    NOOPTIMIZE
      OUTDD(SYSOUT)
      PGMNAME(COMPAT)
      RENT
      RMODE(AUTO)
      SEQUENCE
      SIZE(MAX)
      SOURCE
      SPACE(1)
    NOSQL
    NOSSRANGE
      TERM
    NOTEST
    NOTHREAD
      TRUNC(OPT)
    NOVBREF
    NOWORD
      XREF(FULL)
      YEARWINDOW(1900)
      ZWB
    ----------------------

    TIA. 

    -- 
Gonzo  -  yes, the one with the curly nose...
Remove '.nospam' in address for email
  • Next message: Gonzo: "Re: DISPLAY"
    • Quantcast