SQL Stored Procedure

[mk]

Hallo zusammen,

ich suche gerade eine Möglichkeit einen Fehler
( eine Bedingung ) im SQL abzufangen.

Create procedure MK/prc_atest    (
INOUT IO_CODE CHAR(5) ,           
INOUT IO_MSG  CHAR(132) ,         
IN ADBACTION  CHAR(3 )            
                        )         
LANGUAGE SQL                      
SPECIFIC MK/prc_atest             
..
..

Begin                            
                                 
DECLARE ASQLMSG  CHAR(32740)   ; 
DECLARE SQLCODE  INTEGER       ; 
DECLARE SQLSTATE CHAR(5)       ; 

if ( aDbaction =  'GO')   THEN                      
                                                    
                                                    
-- CALL QCMDEXC('dltf  mk/stpsum', 000000015.00000);
       --drop table mk/stpsum  ;                         
       --if ( SQLSTATE = '42704') then                   
       --  set io_code =  'y999' ;                       
       --End if;                                         
   create table mk/stpsum                    
    as(  select grp as GRPSUM,               
         dec( sum(QTY) , 10 , 0) as SumQty , 
         dec( sum(AMT) , 10 , 2) as SumAMt   
    FROM mk/stp GROUP BY grp)                
    with  data   ;                           
                                             
  set IO_Code='001'   ;                      
 return 0  ;                                                  
End if;                                                       
                                                              
                                                              
  set io_code =  'xxxx' ;                                     
  set io_Msg  = 'aDbAction code ' concat adbaction concat '=';
                                                              
END  ;                                                        
                                                              
COMMENT ON SPECIFIC PROCEDURE MK/prc_atest                    
IS 'SQL Procedure MK/prc_atest  ' ; 

Mit dieser SQL Prozedur soll die Tabelle mk/stpsum ( später weitere Tabellen )
erstellt werden.

Ich muss die Tabellen vorher Löschen
Also eine Drop Table verwenden.
Der Drop Table läuft auf eine Exception wenn die Tabelle schon da ist.

Damit das Programm weiterläuft muss diese
Bedingung abgefangen werden.
Weiß jemand wie das geht ?

Gruß
Michael

[andreaspr@aon.at]

Create procedure MK/prc_atest    (
INOUT IO_CODE CHAR(5) ,           
INOUT IO_MSG  CHAR(132) ,         
IN ADBACTION  CHAR(3 )            
                        )         
LANGUAGE SQL                      
SPECIFIC MK/prc_atest             
..
..

Begin 
DECLARE CONTINUE HANDLER FOR 2
SQLSTATE '23505';

(Wobei 23505 für den zu ersetzenden Code steht)
oder

DECLARE CONTINUE HANDLER FOR SQLEXCEPTION 1
SET vsqlcode = SQLCODE;

lg Andreas

[B.Hauser]

Ein Continue Handler ist der richtige Weg.
Es gibt allerdings auch die Quick und Dirty-Lösung, nämlich, dass man prüft ob die Tabelle in der Catalog View SYSTABLES vorhanden ist.
Ist sie vorhanden, dann Löschen ansonsten nicht.

Declare isFound Integer;
....

Set isFound = 0;

Select 1 into isFound
From SysTables
Where     System_Table_Name   = 'STPSUM'
      and System_Table_Schema = 'MK';

If isFound = 1 Then Drop Table MK/STPSUM;
End If;

Birgitta

[mk]

Hallo zusammen

so klappt es:

...
...                                                
DECLARE CONTINUE HANDLER FOR SQLEXCEPTION       
  Begin                                         
   set IO_Code=SQLCODE ;                        
  End;
...
..
 drop table mk/stpsum  ;                      
    set IO_Code='001'   ;                     
    set io_Msg  = 'table delete ' ;           
                                              
 create table mk/stpsum                       
    as(  select grp as GRPSUM,                
          dec( sum(QTY) , 10 , 0) as SumQty , 
          dec( sum(AMT) , 10 , 2) as SumAMt   
     FROM mk/stp GROUP BY grp)                
     with  data   ;                           
                                              
    set IO_Code='002'   ;                     
    set io_Msg  = 'table erstellt ' ; 

Dieses Forum und die fachliche Kompetenz ist einfach Spitze

Vielen Dank