*** empty log message ***

diff --git a/allParam/ora/oraParam.pc b/allParam/ora/oraParam.pc
index f05ea410dce77905676f3c8c7b279f251f4c0bbc..bb4722f0febc0b95ad8b597018e38342c7e41b3a 100644 (file)
--- a/allParam/ora/oraParam.pc
+++ b/allParam/ora/oraParam.pc
@@ -27,6 +27,8 @@ int conSetupParam(Param *my, const char *setup)
        if(setup != NULL) {
                my->setup = malloc(strlen(setup) + 1);
                strcpy(my->setup, setup);
+       } else {
+               my->setup = NULL;
        }
        my->specParam = malloc(sizeof(OraParam));
        ((OraParam *) (my->specParam))->user = "daq_oper@db-hades.gsi.de";
@@ -262,7 +264,11 @@ int Param_storeInt(const Param *my, const char *name, const char *idx, unsigned
 
        EXEC SQL CONNECT :un IDENTIFIED BY :pw;
 
-       EXEC SQL EXECUTE daq.store_param.store_param_int ( :sqlsetup, :sqlname, :sqlidx, :value );
+       EXEC SQL EXECUTE
+               BEGIN
+                       daq.store_param.store_param_int ( :sqlsetup, :sqlname, :sqlidx, :value );
+               END;
+       END-EXEC;
 
        EXEC SQL COMMIT RELEASE;
        return 0;
@@ -304,8 +310,11 @@ int Param_storeString(const Param *my, const char *name, const char *idx, const
 
        EXEC SQL CONNECT :un IDENTIFIED BY :pw;
 
-       EXEC SQL EXECUTE daq.store_param.store_param_string ( :sqlsetup, :sqlname, :sqlidx, :value );
-
+       EXEC SQL EXECUTE
+               BEGIN
+                       daq.store_param.store_param_string ( :sqlsetup, :sqlname, :sqlidx, :value );
+               END;
+       END-EXEC;
        EXEC SQL COMMIT RELEASE;
        return 0;
 }