Re: Embedded SQL question

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.