×

Good News Everybody!

The new search engine is LIVE!

Please report any problems to david (at) midrange.com.




You can use the fixed length Char(12) variable, you just have to pad your
value with '%' instead of spaces. That is kind of a pain though.

On Wed, Oct 31, 2018 at 1:54 PM Danny Rodius <danny.rodius@xxxxxxxxx> wrote:

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


As an Amazon Associate we earn from qualifying purchases.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2026 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.