Re: SQL - data conversion required (SQL7919)

["rick baird" <rick.baird@xxxxxxxxx>]

Thanks Birgitta.

You're right of course, but I'm just curious why signed needs to be
'converted' to packed.  and why that information is so important that
a message should be sent to the job.

Rick

On 4/18/06, HauserSSS <Hauser@xxxxxxxxxxxxxxx> wrote:
> Hi Rick,
>
> in RPG all zoned fields and binary fields that are not datastructure
> subfields are converted into packed fields by the compiler. This was
> implementent in times when storage was expensive and never changed.
>
> If you use an external datastructure to hold your reference fields (instead
> of or additional to defining the file in the F-Specs), your reference fields
> get not converted and consequently and S1ENTDT gets defined as zoned. (NO
> type conversion will be required!)
>
> Mit freundlichen Gruessen / Best regards
>
> Birgitta
>
> "Shoot for the moon, even if you miss, you'll land among the stars."
> (Les Brown)
>
> -----Ursprungliche Nachricht-----
> Von: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx]Im Auftrag von rick baird
> Gesendet: Dienstag, 18. April 2006 02:10
> An: RPG programming on the AS400 / iSeries
> Betreff: Re: SQL - data conversion required (SQL7919)
>
>
> Matt,
>
> that sounds reasonable to me, and you're right, I'm sure the compiler
> defined the field as packed, but it just seems odd that it would have
> to do conversion from 8S to 8P.
>
> Thanks,
>
> Rick
>
> On 4/17/06, Tyler, Matt <mattt@xxxxxxxxxxxxxx> wrote:
> > More than likely the compiler defined S1ENTDT as packed.  Change the DS
> > to be 8S 0 for this field and see if it goes away.  Also, check the
> > compile listing to see if S1ENTDT is indeed packed.
> >
> > Thanks, Matt
> >
> >
> >
> > -----Original Message-----
> > From: rpg400-l-bounces@xxxxxxxxxxxx
> > [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of rick baird
> > Sent: Monday, April 17, 2006 2:05 PM
> > To: RPG programming on the AS400 / iSeries
> > Subject: Re: SQL - data conversion required (SQL7919)
> >
> > FYI, the reason code is   -- Reason 2 - host variable S1ENTDT is a
> > numeric type that is different than the type of the value being
> > retrieved.
> >
> > The FIENTD is defined as 8S 0 (via a physical file)
> >
> > On 4/17/06, rick baird <rick.baird@xxxxxxxxx> wrote:
> > > I have a multirow fetch into a qualified multi occurance DS - code as
> > follows.
> > >
> > > I'm getting an SQL7919, data conversion required, on S1ENTDT even
> > > though I defined it 'like' the field I'm fetching.  It's not a hard
> > > error, but I noticed it in my joblog when testing the program in
> > > debug.
> > >
> > > any ideas?
> > >
> > > d s1DS            ds                  dim(15)      qualified
> > > d S1STYL                              like(FISTYL)
> > > d S1COLR                              like(FICOLR)
> > > d S1LOGO                              like(FILOGO)
> > > d S1CMT1                              like(FICMT1)
> > > d S1CMT2                              like(FICMT2)
> > > d S1ENTDT                             like(FIENTD)
> > > d S1EXPDT                             like(FIEXPD)
> > > d S1USER                              like(FIUSER)
> > > d S1REAS                              like(FIREAS)
> > > d S1STAT                              like(FISTAT)
> > > <snip>
> > > c/exec sql
> > > c+
> > > c+             declare  c1      scroll cursor
> > > c+                 for
> > > c+              select  FISTYL,
> > > c+                      FICOLR,
> > > c+                      FILOGO,
> > > c+                      FICMT1,
> > > c+                      FICMT2,
> > > c+                      FIENTD,
> > > c+                      FIEXPD,
> > > c+                      FIUSER,
> > > c+                      FIREAS,
> > > c+                      FISTAT
> > > c+                from  BLOFPDP
> > > c+               where  FISTYL = :C1STYL
> > > c+            order by  FISTYL, FICOLR, FILOGO
> > > c+        optimize for  15 rows
> > > c+
> > > c/end-exec
> > >
> >
> > --
> >
> > This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
> > list
> > To post a message email: RPG400-L@xxxxxxxxxxxx
> > To subscribe, unsubscribe, or change list options,
> > visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> > or email: RPG400-L-request@xxxxxxxxxxxx
> > Before posting, please take a moment to review the archives
> > at http://archive.midrange.com/rpg400-l.
> >
> >
> > --
> > This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
> > To post a message email: RPG400-L@xxxxxxxxxxxx
> > To subscribe, unsubscribe, or change list options,
> > visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> > or email: RPG400-L-request@xxxxxxxxxxxx
> > Before posting, please take a moment to review the archives
> > at http://archive.midrange.com/rpg400-l.
> >
> >
>
> --
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>
>
>
> --
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>
>