Avoid aborting a transaction that has been deadlocked; and

make readlocks exclusive

diff --git a/server/qrtn.qc b/server/qrtn.qc
index 56be528b2639a59820cb2d72a8d2a44313db8aad..12bbfa1d7013bbae91597a5b369ee4a23f53d653 100644 (file)
--- a/server/qrtn.qc
+++ b/server/qrtn.qc
@@ -69,6 +69,7 @@ int sms_open_database()
        
     /* open the database */
 ##  ingres sms
+##  set lockmode session where readlock = exclusive
     return ingres_errno;
 }
 
@@ -308,7 +309,9 @@ out:
                fflush(journal);
            }
        } else {
-##          abort              /* it never happened */
+           if (status != SMS_DEADLOCK) {
+##             abort           /* it never happened */
+           }
        }
     }