Re: Embedded SQL problem

Hello,

@all
Declaring the qcraneSub variable as sqlvar or varchar works also

Thanks you all for responding.

-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxx> On Behalf Of
j.beckeringh@xxxxxxxxxxxxxxxxxxxxxxxxxx
Sent: woensdag 31 oktober 2018 12:01
To: RPG programming on the IBM i (AS/400 and iSeries)
<rpg400-l@xxxxxxxxxxxx>
Subject: Re: Embedded SQL problem

Danny,

Because in the first version you pass a fixed length variable, containing
spaces after the 'interesting' part and in the second version you pass a
trimmed literal, which is automatically cast to a variable length string.

Define qcranesub as varchar(12) and you should be alright..


Joep Beckeringh
Software Architect
Pantheon Automatisering B.V.
Heerenveen

"Danny Rodius" <danny.rodius@xxxxxxxxx>

31-10-2018 11:33

Embedded SQL problem

Hi All,



Have a problem in understanding why one method is working and another

not.

Try to declare a cursor with a select .. When field like ...



Fields: craneSub char(10) & qcraneSub char(12)



The two versions

1. Not working



qcraneSub = '%' + %trim(craneSub) + '%';

exec sql

declare c1 cursor for

select *

from AKA0REP

where a0xhcd = :qcraneID and

a0jxce like :qcraneSub;



2. Working



exec sql

declare c1 cursor for

select *

from AKA0REP

where a0xhcd = :qcraneID and

a0jxce like '%' concat trim(:craneSub) concat '%';



Anyone an idea why the first option is not working?



Danny

--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link:
http://amzn.to/2dEadiD

--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: http://amzn.to/2dEadiD