 
 (defn update-optional-info
   [request]
-  (let [code (Integer/parseInt (:code (:route-params request)))
+  (let [code (Long/parseLong (:code (:route-params request)))
         keywordized-req-body (clj-walk/keywordize-keys (:body request))
         resp (db/update-optional-info code keywordized-req-body)]
     (if (= resp "AWS_ERROR")


(defn update-rsvp
  [request]
  (let [code (Integer/parseInt (:code (:route-params request)))
        user-response (:response (clj-walk/keywordize-keys (:body request)))
        resp (db/update-rsvp-status code user-response)]
    (if (= resp "AWS_ERROR")


(defn update-metadata
  [request]
  (let [code (Long/parseLong (:code (:route-params request)))
        keywordized-req-body (clj-walk/keywordize-keys (:body request))
        resp (db/update-invitee-metadata code keywordized-req-body)]
    (if (= resp "AWS_ERROR")
