RE: SQL problems SQLSTATE 42601 - 104 on Execute Immediate

[Tommy.Holden@xxxxxxxxxxxxxxxxxxxxx]

Could it be that the LCDSCM field is only 23 bytes long and you are 
comparing a 23 byte constant with 17 chars on the substring? (just 
speculating)



From:   "Koester, Michael" <mkoester@xxxxxxxxxxxxx>
To:     RPG programming on the IBM i / System i <rpg400-l@xxxxxxxxxxxx>, 
Date:   02/13/2012 04:34 PM
Subject:        RE: SQL problems SQLSTATE 42601 - 104 on Execute Immediate
Sent by:        rpg400-l-bounces@xxxxxxxxxxxx



Thanks Carel, but I don't think that's it.  (It may have displayed 
differently in your email client, but there is definitely a space between 
the close-quote and WHERE, and the same is true at the AND.)

-- Michael

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] 
On Behalf Of Carel Teijgeler
Sent: Monday, February 13, 2012 5:31 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: Re: SQL problems SQLSTATE 42601 - 104 on Execute Immediate

Looks like a missing space before the WHERE and a missing space before the
ANDs.

Regards,
Carel Teijgeler

*********** REPLY SEPARATOR  ***********

On 13-2-2012 at 22:19 Koester, Michael wrote:

> I was testing an sql Execute Immediate that has been in Production for a
> while now, and found that it was failing with SQLSTATE= 42601 and SQLCODE
> = -104.  Seems like there's a syntax error, but when I copy the statement
> from the host variable, and paste it into interactive sql (strsql), it
> updates the record just fine.
>
> The statement is:
>       EXEC SQL
>         EXECUTE IMMEDIATE :UpdateSQL;
>
> The value of UpdateSQL (as copied directly from the variable value in
> debug) is:
> UPDATE PLTLCD   SET LCDSCM = 'ADSL Dynamic 0004780533            ' WHERE
> substr(LCDSCM, 6, 23) ='Dynamic 0004780533     ' AND LCDSTY = 'ADSL ' AND
> LCDSTS <> 'D'  WITH NC 
>
> Is there anything about that statement that would behave differently in
> the Execute Immediate environment?
>
> This is failing on v7.1 -- I believe we're up-to-date on PTFs. 
> It's probably me -- can someone enlighten me?
>
> Thanks.
> Michael Koester
>
> DataEast
> Weare, NH
>
> -- 
> This is the RPG programming on the IBM i / System i (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.
>
>
>
> -----
> Geen virus gevonden in dit bericht.
> Gecontroleerd door AVG - www.avg.com
> Versie: 10.0.1382 / Virusdatabase: 2112/4807 - datum van uitgifte:
02/13/12