     [ombs.db.payment :as dbpay]
     [ombs.validate :as isvalid]
     [ombs.funcs :refer [parse-int]]
+    [ombs.handler.pages :as pages]
     [noir.session :as sess]
     [noir.response :refer [redirect] ]
     ))

      (dbpay/debit-payment uid eid (dbpay/get-debt uname ename date)) 
      (if (db/can-finish? ename date) 
        (finish ename date)))) 
  (redirect "/user")) ; go to user page in any case

(defn pay-part [{ename :event-name date :date parts :parts :as params}]
  "Add participation of current user and selected event(given as param from 
  post). Parts in params is count of parts, that user want to pay"
  (println "call pay-parts with: " ename " " date " '" parts "'")
  (let [uname (sess/get :username)
        uid (db/get-uid uname)
        eid (db/get-eid ename date)

(defn pay [{ename :event-name date :date :as params}]
  "Add participation of current user and selected event(given as param from 
  post). Parts in params is count of parts, that user want to pay"
  (let [uname (sess/get :username)
        uid (db/get-uid uname)
        eid (db/get-eid ename date)]
