Re: Using SQL UDF in SQLRPGLE program gets decimal data error

Actually,

 EVAL fromdate:x
    00000     F2F0F0F2 F0...... ........ ........   - 20020

would be consistent with
 FROMDATE          P(8,0)
not
 FROMDATE          S(8,0)

So maybe it's simply the compiler listing that's wrong?  The intermediate
source in QTEMP shows ELDATE as zoned:

 D  SQL_00011             65     72S 0    ELDATE
 D  SQL_00012             73     76S 0    ELTIMI

C                   EVAL      ELDATE = SQL_00011
C                   EVAL      ELTIMI = SQL_00012

and ELDATE itself is in the externally-defined data structure, which
presumably uses the external format, which is zoned-decimal.  If I compile
from the intermediate QTEMP source, the compile listing shows:


Peter Dow
Dow Software Services, Inc.
909 793-9050 voice
909 522-3214 cellular
909 793-4480 fax

----- Original Message -----
From: "Alexei Pytel" <pytel@us.ibm.com>
Sent: Thursday, September 19, 2002 6:08 PM
Subject: Re: Using SQL UDF in SQLRPGLE program gets decimal data error


>
> EVAL fromdate:x
>    00000     F2F0F0F2 F0...... ........ ........   - 20020
>
> This is consistent with
> FROMDATE          S(8,0)      - 8 packed decimal digits require 5 bytes -
> this is what debugger shows you.
>
> Now the difference between RPGLE and SQLRPGLE - I can only speculate that
> SQL precompiler injects something, which changes the interpretation of
some
> variables.
> You may check the output of SQL precompiler - by default it goes to
> QTEMP/QSQLTEMP1.