Re: RPG integer vs SQL integer.

I believe that SQL integer fields are defined as 9,0.
-sjl


wrote in message news:mailman.1234.1405971393.8590.midrange-l@xxxxxxxxxxxx...

Adding title line...

I've got a stored procedure wrapper for a program.
CREATE PROCEDURE ROUTINES/GDSSYS002
(INOUT sysasp INT ,
INOUT pctsysasp INT,
INOUT PctPerm INT ,
INOUT PctTemp INT )
LANGUAGE RPGLE
NOT DETERMINISTIC
CONTAINS SQL

Been working great. However, first time we ran it against a 22TB machine.


Message ID . . . . . . : MCH1210 Severity . . . . . . . : 40
Message type . . . . . : Escape
Date sent . . . . . . : 07/21/14 Time sent . . . . . . : 14:57:27

Message . . . . : Receiver value too small to hold result.

Is there a difference between 10i0 in RPG and
(INOUT sysasp INT , in SQL?

Very simple RPG program
D GDSSYS002 PI
D SysAsp 10i 0
D PctSysAsp 10i 0
D PctPerm 10i 0
D PctTemp 10i 0
/free
reset SysAsp;
reset PctSysAsp;
qwcrssts(ssts0200:%len(ssts0200):'SSTS0200':'*NO':ERRC0100);
Select;
When ExceptionId=*blanks; // OK
SysAsp=ssts0200.SysAsp;
PctSysAsp=ssts0200.PctSysAsp;
PctPerm=ssts0200.PctPerm;
PctTemp=ssts0200.PctTemp;
Other;
dsply ExceptionId;
EndSl;
*inlr=*on;
return;
/end-free



In debug mode:

SysAsp=ssts0200.SysAsp;
SYSASP = 22500008


Rob Berendt