I found the answer.

I was trying to move the value 10 into a variable defined thusly:

         05  DATAFILE-CCN-8        pic 9(1) value zeroes.

Thanks to all for your responses.

-----Original Message-----
From: Shawn Gordon [mailto:[log in to unmask]]
Sent: Friday, March 23, 2001 7:30 AM
To: EBEN YONG
Subject: Re: [HP3000-L] COBOL debugging question


At 03:57 PM 3/22/2001, you wrote:
>Hello,
>
>I've noticed that there are instances where it is very easy to pinpoint the
>source of a program abend:
>
>HPDEBUG Intrinsic at: 147.00282304 cob_trap.print_message+$5ec
>$$$$ Trap occurred at: _start+$a0, at Stmt    #59
>      PC=292.000057d8 _start+$a0
>* 0) SP=41842330 RP=292.00000000
>      (end of NM stack)
>$$$$ The variable 6 >   5 (limit)
>============================================================
>
>In the above example, the abend occurred at Statement #59.  Recompiling the
>program yields this very clearly:
>
>  00059 EY010322 028008    move 7 to x(y)
>
>However, when faced with an HPDEBUG message like the one below, how do I
>read the Trap message to pinpoint the location of the error?
>
>HPDEBUG Intrinsic at: 104.0026d304 cob_trap.print_message+$5ec
>$$$$ Trap occurred at: screen$008$+$3ed4, at ????
>      PC=3bb.0006530c screen$008$+$3ed4
>* 0) SP=418529f0 RP=3bb.00000000
>      (end of NM stack)
>$$$$ The variable 10 >   9 (limit)
>
>Thanks,
>
>Eben Yong
>Health Plan of San Mateo

in this case it is obvious that you are trying to add to many values to a
table that has a limit of 9.  Adding a debug trace to the program and
running it will tell you what code you are in, it appears that you have
BOUNDS enabled on the $CONTROL line.  You know how to use the DEBUGGING
section in COBOL?

Regards,

Shawn Gordon
President
theKompany.com
www.thekompany.com
949-713-3276