RE: SQL multiple selects

Jeff,

You need the quotes in embedded SQL if you are specifying the actual
value in the statement, just like STRSQL.

D @SQLByCat       C     'Select * from dmitmmst +
D                        Where (WHSLC between +
D                        ? and ?) and +
D                        CATCD1 = ''E'' +
D                        Order By SAQYR desc'

However, you're not doing that.  You are using parameter markers and
like I mentioned in my first post the precompiler/SQL runtime interprets
the values correctly.

HTH, 

Charles Wilt
--
iSeries Systems Administrator / Developer
Mitsubishi Electric Automotive America
ph: 513-573-4343
fax: 513-398-1121
  

-----Original Message-----
From: rpg400-l-bounces+cwilt=meaa.mea.com@xxxxxxxxxxxx 
[mailto:rpg400-l-bounces+cwilt=meaa.mea.com@xxxxxxxxxxxx] On 
Behalf Of Jeff Crosby
Sent: Tuesday, September 05, 2006 10:14 AM
To: 'RPG programming on the AS400 / iSeries'
Subject: RE: SQL multiple selects

Check the SQLCOD or SQLSTT after each SQL-statement.

I failed to mention that I am doing error checking, but I 
went through your
suggestion in debug anyway.  SQLCOD and SQLSTT stay at 0 
until the first
fetch.  Then SQLCOD = 000000100 and SQLSTT = 02000.  Both 
mean no more data.

Try to move off the '' around the catalog value.

Oh my goodness that did it!  You mean one doesn't put the 
quotes around
character values in embedded SQL?  When I try it without 
quotes in STRSQL it
tells me "Column E not in specified tables."

-- 
Jeff Crosby
Dilgard Frozen Foods, Inc.
P.O. Box 13369
Ft. Wayne, IN 46868-3369
260-422-7531

The opinions expressed are my own and not necessarily the 
opinion of my
company.  Unless I say so.


-- 
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.