XTABLE gBWxWHENBENUTZER0 BEGIN DECLARE SECTION END DECLARE SECTION WHENEVER SQLERROR GO TO error PREPARE STMT INTO :sqlda FROM :sqlString DESCRIBE STMT INTO :sql WHENEVER SQLERROR CONTINUE BEGIN DECLARE SECTION END DECLARE SECTION WHENEVER SQLERROR GO TO error PREPARE STMT INTO :sql FROM :sqlSt DECLARE c1 CURSOR FOR STMT OPEN c1 USING DESCRIPTOR :sql FETCH c1 USING DESCRIPTOR :sql WHENEVER SQLERROR CONTINUE CLOSE c1 BEGIN DECLARE SECTION END DECLARE SECTION WHENEVER SQLERROR GO TO error PREPARE c1 FROM :sqlSave EXECUTE c1 USING DESCRIPTOR :sql WHENEVER SQLERROR CONTINUE WHENEVER SQLERROR GO TO error FETCH c1 USING DESCRIPTOR :sql WHENEVER SQLERROR CONTINUE WHENEVER SQLERROR GO TO error COMMIT WHENEVER SQLERROR CONTINUE WHENEVER SQLERROR GO TO error ROLLBACK WHENEVER SQLERROR CONTINUE WHENEVER SQLERROR GO TO error BEGIN DECLARE SECTION END DECLARE SECTION EXECUTE IMMEDIATE :sqlLock WHENEVER SQLERROR CONTINUE sqlString sqlSt sqlSave sqlLock