(defrecord Order [broker side qty ticker price])

(def an-order (Order. "brokername" "BUY" "1.0" "AAPL"  "200.00")

(defn create-order [xc-uri order]
   (POST (str xc-uri "/orders")
           {:params { :broker order.broker
                      :side order.side
                      :qty order.qty
                      :ticker order.ticker
                      :price order.price }
            :handler handler
            :error-handler ajax-error-handler
            :format :json
            :keywords? true }))


(create-order local-uri an-order)