RE: Embedded SQL in RPGLE pgm

commitment control issue??

add "with nc" to your statement & see if that helps...

Thanks,
Tommy Holden


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of RPower@xxxxxxxxxx
Sent: Thursday, August 04, 2005 12:40 PM
To: RPG programming on the AS400 / iSeries
Subject: RE: Embedded SQL in RPGLE pgm


Ok, what I have is this now:
           updateStatemnt = 'UPDATE WPUSCHEDLE SET '
                          + %Trim(ctrName) + '='
                          + %Char(retField) + ', '
                          + %Trim(numName) + '='
                          + %Char(retField) + ' WHERE ('
                          + %Trim(dateName) + '='
                          + %Char(inPickupDate) + ') AND (WPUAREA='''
                          + Wcgararea + ''')';
      /End-Free
     C/Exec Sql
     C+ PREPARE mainUpdate From :updateStatemnt
     C/End-Exec
     C/Exec Sql
     C+ EXECUTE mainUpdate Using :updateStatemnt
     C/End-Exec

but it doesn't seem to be working.  What am I missing?

Ron Power
Programmer
Information Services
City Of St. John's, NL
P.O. Box 908
St. John's, NL
A1C 5M2
709-576-8132
rpower@xxxxxxxxxx
http://www.stjohns.ca/
___________________________________________________________________________
Success is going from failure to failure without a loss of enthusiasm. - 
Sir Winston Churchill




"Fisher, Don" <dfisher@xxxxxxxxxxxxx> 
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
2005/08/04 02:07 PM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
"'RPG programming on the AS400 / iSeries'" <rpg400-l@xxxxxxxxxxxx>
cc

Subject
RE: Embedded SQL in RPGLE pgm






After the PREPARE, use EXECUTE as follows:
C/Exec SQL EXECUTE mainSelect using :mainStatement

If you want to update the file, change "Select * from" to "Update" and add
the appropriate SET clauses.

Hope that helps. 

Donald R. Fisher, III
Project Manager
Roomstore Furniture Company
(804) 784-7600 extension 2124
DFisher@xxxxxxxxxxxxx

<clip>
     * Prepare Select Statement
     C/Exec Sql
     C+ Prepare mainSelect From :mainStatement
     C/End-Exec 

So I'd just build my updateStatement and how would the C/ and C+ 
statements
work?
<clip>