RE: source line # in a dump for an SQLRPGLE pgm

["DeLong, Eric" <EDeLong@xxxxxxxxxxxxxxx>]

Rich,

A couple of minor points...

Adding Option(*SRCSTMT) to your control spec will use SEU line numbers.
This would require the program to be recompiled though.  As to the "target
too small", the only thing that occurs to me is the SQL precompilers
treatment of integer data types that was been discussed recently.  It seems
that integer data in the PF is declared as 9B 0 by the SQL precompiler,
instead of 10i 0.  The effect is to make 999999999 (nine 9's) the largest
value that can be assigned to the field.  You might try the EXTBININT
keyword on the control spec, though this doesn't seem to help with the SQL
precompiler problem....


Eric DeLong
Sally Beauty Company
MIS-Sr. Programmer/Analyst
940-898-7863 or ext. 1863



-----Original Message-----
From: rich herdman [mailto:rherdman@columbus.rr.com]
Sent: Monday, March 18, 2002 9:00 AM
To: midrange-l@midrange.com
Subject: source line # in a dump for an SQLRPGLE pgm


Help!!!

I have a fairly long-running RPG program that had a 'The target for a
numeric operation
is too small to hold the result" message over the weekend.  The program is
an SQLRPGLE
program (no modules or anything - just a regular RPG 4 pgm w/ some embedded
SQL).  It
is running on a system running V5R1.  However, the object was originally
compiled under
V4R3 and has run every weekend since 03/05/2000 with no problems.

Anyways, I dumped the program to get the statement # that it blew up on.
The problem is that
I don't think the line number is right.  The statement in error is 804, and
the program is only
642 lines long.  In the compile listing, line 804 refers to a READE
statement on a file.

First question: is it even possible to get a 'target too small' on a READE?
The program does not
redefine any if the fields in that file and the file has not been modifed.

Secondly, how can I get the line # it actually blew up on?  Should I
recompile it under V5R1 and
let it run until it blows up again and hope I get the right number this
time?



Rich Herdman
email: rherdman@columbus.rr.com
www:  http://home.columbus.rr.com/herdman/

"It never does to leave a live Dragon out
of the equation." - Bilbo Baggins, 'The Hobbit'


_______________________________________________
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/midrange-l
or email: MIDRANGE-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.