RE: Strange SQL

Mark,

Just a stab in the dark here, but I think you should check the CCSID for
file B. I suspect that DB2 must internally convert the joined files into a
common code page, but can't figure out how to translate file B. However, you
indicate that the join did work, which indicates that any required
translation must have worked..... Hmmmmm.

Eric DeLong
Sally Beauty Company
MIS-Sr. Programmer/Analyst
940-898-7863 or ext. 1863



-----Original Message-----
From: MWalter@hanoverwire.com [mailto:MWalter@hanoverwire.com]
Sent: Wednesday, September 12, 2001 9:56 AM
To: rpg400-l@midrange.com; rpgiv@yahoogroups.com
Subject: Strange SQL


Hello all,

I am trying to create a dynamic sql statement in an ILE RPG Module. When I
execute the statement:

SELECT a.itnbr, b.itdsc, a.edate, a.itcls, b.itcls, b.lstum, a.price,
b.unmsr FROM hwoei6.Prcmst a LEFT OUTER JOIN amflib.Itemasa b ON a.itnbr
 = b.itnbr WHERE cusno =   206800 ORDER BY a.itnbr
(the tables are not qualified in the RPG Program. Libl is used)

from the Program, all columns returned from the secondary file are returned
in HEX therefore not being included into the program. but when I run the
statement using interactive SQL, it works fine. I copied the statement into
the SQL Script tool in OpsNav, it also returns hex for the b file. The
really funny thing is if I change the amflib qualifier, which is a test
environment, to amfliba, which is a live environment, the statement
executes fine in the OpsNav tool.

I'm lost here,


Thanks,

Mark


Mark Walter
Sr. Programmer/Analyst
Hanover Wire Cloth a div of CCX, Inc.
mwalter@hanoverwire.com
http://www.hanoverwire.com
717.637.3795 Ext.3040

_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.