anchor.diff:  		       (:ul :class "nav navbar-nav"
   			    (:li (:a :href "/dashboard" "Timeline"))
   			    (:li (:a :href (concatenate 'string "/profile/" (cookie-in "current-user"))  "Profile"))
  -			    (:li (:a :href "/write-order" "Write Order")))
  +			    (:li (:a :href "/write-order" "Write Order"))
  +			    (:li (:a :href "/check-in-order" "Check-in Order")))
   		       (:ul :class "nav navbar-nav navbar-right"
   			    (:li (:a :href "/signout" "Sign out"))
   			    (:li (:a :href "/checkinlist" "Check In"))))))))
  -(defmacro test-sidebar ()
  -  `(with-html-output (*standard-output* nil :indent t)
  -     (:div :id "nav-side-menu"
  -	   (:div :class "brand" "RILEY")
  -	   (:i :class "fa fa-bars fa-2x toggle-btn" :data-toggle "collapse"
  -	       :data-target "menu-content")
  -	   (:div :class "menu-list"
  -		 (:ul :id "menu-content" :class "menu-content collapse out"
  -		      (:li (:a :href "#"
  -			       (:i :class "fa fa-dashboard fa-lg") "Dashboard"))
  -		      (:li :data-toggle "collapse" :data-target "#writeorder" :class "collapsed active"
  -			   (:a :href "#" (:i :class "fa fa-gift fa-lg") "UI Elements" (:span :class "arrow"))))))))
   
   (defmacro standard-dashboard (&key messages)
     `(with-html-output (*standard-output* nil :indent t)
  
positive.code: 	  (invoice-item-list invoice)))
    (redirect "/setthemcookies"))
  
  (define-easy-handler (remove-item :uri "/removeitem") ()
    (let* ((invoice (find-invoice-from-cookie (cookie-in "current-invoice")))
  	 (item (hunchentoot:post-parameter "item"))
  
negative.code:     (standard-dashboard :messages (standard-global-messages)))
    (redirect "/login"))))
  
  ;;;This function needs to be redone.  Currently it takes the post parameters of the item
  ;;;associated with an invoice and finds which item it is in the itemlist;  current date needs to be fixed
  (define-easy-handler (check-in-item :uri "/check-in-item") ()
    (let* ((invoice (find-invoice-from-cookie (cookie-in "current-invoice")))
  	 (item-desc (hunchentoot:post-parameter "item-desc"))
  