anchor.diff:  				     :name "item-quantity" :id "item-quantity")
   			     (:input :type "hidden" :value ,invoice
   				     :name "invoice" :id "invoice")
  -			     (:button :type "submit" :class "btn btn-default btn-sm btn-danger" "Remove"))))))))
  +			     (if (string= (item-returned-on item) "")
  +				 (htm (:button :type "submit" :class "btn btn-default btn-sm btn-danger" "Remove"))
  +				 (htm (:button :type "submit" :class "btn btn-sm btn-danger disabled" :disabled "true" "Already Checked In")))))))))) ;;;Force remove option may be necessary due to this
   	  (:script "$(\"#itemlist\").DataTable();")))))
   	  
        
  
positive.code:     
  	   (:div :class "box" :id "write-up-box"
  		 
  		 (:div :class "box-header" :id "box-picture"
  		       (:center (:img :id "input-picture" :src ,image :class "img-responsive"
  				      :width "40%" :height "40%" :name ,image)))
  		 (:div :class  "box-body" 
  
negative.code: 
  (defmacro standard-invoice-writing (&key show set contact pic-num)
    `(with-html-output (*standard-output* nil :indent t)
       (:div :class "box box-info" :id "invoice-writing-box"
  	   (:div :class "box-body"
  		 (:ul :class "list-group"
  		      (:li :class "list-group-item list-group-item-success" ,show)
  