Re: Embedded SQL question

[Alan Shore <AlanShore@xxxxxxxx>]

Any reason why you are doing this in embedded SQL and not an SQL session
(STRSQL)?
Anyway, to answer your question, insert the following before your SQL
statements

C/EXEC SQL
C+ SET OPTION COMMIT = *NONE
C/END-EXEC

By inserting this command, you are telling the system to make the changes
permanent as soon as the Commit statement is completed.

Alan



                                                                       
             Michael Jacobsen                                          
             <MJacobsen@first-                                         
             online.com>                                                To
             Sent by:                  rpg400-l@xxxxxxxxxxxx           
             rpg400-l-bounces@                                          cc
             midrange.com                                              
                                                                   Subject
                                       Embedded SQL question           
             09/19/2005 11:30                                          
             AM                                                        
                                                                       
                                                                       
             Please respond to                                         
              RPG programming                                          
              on the AS400 /                                           
                  iSeries                                              
             <rpg400-l@midrang                                         
                  e.com>                                               
                                                                       
                                                                       




I am trying to update multiple rows in a externally described file using
embedded SQL.  This is the entire sqlrpgle program.  It compiles and
completes successfully, but I am not seeing any changes in the file.  Am I
leaving something out?  According to all examples I have seen, this should
be all I need.


Filename    UF   E           K Disk

C/Exec SQL
C+            Update Filename
C+               Set Field1 = 0
C+               Where Field2 = 2005243
C/End-Exec

C                   Eval      *InLr = *On


Thanks,

Mike

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