(dosync
      (ensure (:balance srcAcct))
           (if (>= @(:balance srcAcct) amnt)
            (do
                ; update the balance refs of both bank accounts
                (alter (:balance srcAcct) - amnt)
                (commute (:balance dstAcct) + amnt)
                (str tid " OK"))
            (str tid " ERR")))))