RE: sql insert

["Wilt, Charles" <CWilt@xxxxxxxxxxxx>]

c/exec SQL
c+  whenever SQLERROR continue
c/end-exec


The above ignores all errors.  You can also get a little fancier, by doing a 
GOTO MyErrorHandler and using the /exec SQL GET DIAGNOSTIC CONDIDTION statement 
to find out exactly what the error(s) were.

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@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of Eckenrod, Larry
> Sent: Thursday, April 21, 2005 2:01 PM
> To: 'rpg400-l@xxxxxxxxxxxx'
> Subject: sql insert
> 
> 
> I am trying to insert records into a 400 file which has the 
> UNIQUE keyword.
> I am inserting using a select statement which will generate 
> duplicates. The
> way it is currently working the insertion stops after the 
> first duplicate
> key error. Is there any way to have it keep on going. There 
> are more records
> that I need to have inserted.
> 
> .00                                            
> .01 c/EXEC SQL                                 
> .02 c+ SET TRANSACTION ISOLATION LEVEL NC      
> .03 c/END-EXEC                                 
> .04                                            
> .00 c/Exec SQL                                 
> .00 c+ insert into testle/ltpbetalde           
> .00 c+ select * from fsgenfil/ltpbeta          
> .00 c/end-exec                                 
> .00                                            
> 
> Larry Eckenrod
> 
> 
> -- 
> 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.
> 
>