RE: SQL Whenver

[MWalter@xxxxxxxxxxxxxxx]

Gerry,

Tried that already. Still doesn't work.


Thanks,

Mark


Mark Walter
Sr. Programmer/Analyst
Hanover Wire Cloth a div of CCX, Inc.
mwalter@hanoverwire.com
http://www.hanoverwire.com
717.637.3795 Ext.3040
/"\
\ /
 X
/ \



                                                                                
                                                                     
                    "Tucker Gerry"                                              
                                                                     
                    <Gerry.Tucker@techni        To:     "RPG programming on the 
AS400 / iSeries" <rpg400-l@midrange.com>                             
                    color.com>                  cc:                             
                                                                     
                    Sent by:                    Subject:     RE: SQL Whenver    
                                                                     
                    rpg400-l-bounces@mid                                        
                                                                     
                    range.com                                                   
                                                                     
                                                                                
                                                                     
                                                                                
                                                                     
                    01/13/2003 10:18 AM                                         
                                                                     
                    Please respond to                                           
                                                                     
                    RPG programming on                                          
                                                                     
                    the AS400 / iSeries                                         
                                                                     
                                                                                
                                                                     
                                                                                
                                                                     




You need to place a colon before the label ERRHNDLR in you SQL statement,
i.e:

c/exec sql
c+ WHENEVER SQLERROR GOTO :ERRHNDLR
c/end-exec

Regards,

Gerry Tucker
Senior Analyst Programmer
Technicolor Distribution Services
Wembley, U.K.

"All my life I wanted to be somebody.
Now I see that I should have been more specific."





>-----Original Message-----
>From: MWalter@hanoverwire.com [mailto:MWalter@hanoverwire.com]
>Sent: 13 January 2003 14:50
>To: rpg400-l@midrange.com
>Subject: SQL Whenver
>
>
>Hello all,
>
>Could someone let me in on the secret of using WHENEVER
>SQLERROR in a RPGLE
>subprocedure. I have the following code:
>
>     c/exec sql
>     c+ WHENEVER SQLERROR GOTO ERRHNDLR
>     c/end-exec
>
>      .... Stuff that builds a data structure
>
>c    c     ERRHNDLR      TAG
>c    c                   eval      errorId = 'HWC0215'
>     c                   eval      datacount = 0
>     c                   return    *null
>
>
>When I try to compile I get  a RNF7030 on the ERRHNDLR and an RNF7043
>(Target is not a label) error.
>
>Thanks,
>
>Mark
>
>
>Mark Walter
>Sr. Programmer/Analyst
>Hanover Wire Cloth a div of CCX, Inc.
>mwalter@hanoverwire.com
>http://www.hanoverwire.com
>717.637.3795 Ext.3040
>/"\
>\ /
> X
>/ \
>
>
>_______________________________________________
>This is the RPG programming on the AS400 / iSeries (RPG400-L)
>mailing list
>To post a message email: RPG400-L@midrange.com
>To subscribe, unsubscribe, or change list options,
>visit: http://lists.midrange.com/mailman/listinfo.cgi/rpg400-l
>or email: RPG400-L-request@midrange.com
>Before posting, please take a moment to review the archives
>at http://archive.midrange.com/rpg400-l.
>

_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo.cgi/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.