diff --git a/src/clj/auto_ap/server.clj b/src/clj/auto_ap/server.clj
index dc086600..c3143575 100644
--- a/src/clj/auto_ap/server.clj
+++ b/src/clj/auto_ap/server.clj
@@ -63,7 +63,7 @@
     (.setHandler server stats-handler))
   (.setStopAtShutdown server true))
 
-(mount/defstate port :start (Integer/parseInt (or (env :port) "3000")))
+(mount/defstate port :start (Integer/parseInt (str (or (env :port) "3000"))))
 
 (mount/defstate jetty
   :start (run-jetty app {:port port
diff --git a/src/clj/auto_ap/ssr/pos/sales_summaries.clj b/src/clj/auto_ap/ssr/pos/sales_summaries.clj
index 88241c93..45988b07 100644
--- a/src/clj/auto_ap/ssr/pos/sales_summaries.clj
+++ b/src/clj/auto_ap/ssr/pos/sales_summaries.clj
@@ -721,7 +721,8 @@
                          :current-account-id current-account-id}))))
 
 (defn save-item-account [request]
-  (let [{:keys [field-name-prefix client-id]} (:params request)
+  (let [field-name-prefix (get-in request [:params "field-name-prefix"])
+        client-id (get-in request [:params "client-id"])
         account-input-name (str field-name-prefix "[ledger-mapped/account]")
         account-id-str (get-in request [:form-params account-input-name])
         account-id (when (and account-id-str (not= account-id-str ""))