anchor.diff:    price quantity description invoices-on picture shows-on returned-on)
     
   (defun save-data ()
  -  (let* ((saved-list (mapcar #'lambda (x)
  -			     (mapcar #'lambda (y)
  -				     (conspack:encode-object (invoice-item-list y)))
  -			     *GLOBAL-INVOICE-LIST*)))
  +  (let* ((saved-list (mapcar #'conspack:encode-object (invoice-item-list (car *GLOBAL-INVOICE-LIST*)))))
  +			    
           
       (with-open-file (out "caps.db"
   			 :direction :output
  
positive.code: 						     (invoice-item-list invoice))))
    (redirect "/setthemcookies")))
  
  ;;;Standard check in page that displays a table of shows with invoices
  (define-easy-handler (checkinlist :uri "/checkinlist") ()
    (standard-page (:title "Check in list")
  
negative.code: 						  :value (item-description item))
  					  (:input :type "hidden" :name "item-qty" :id "item-qty"
  						  :value (item-quantity item))
  					  (:button :type "submit" :class "red darken-4 btn-floating waves-effect waves-light" (:i :class "material-icons" "check_circle"))			        
  			       (:a :class "right red darken-4 btn-floating activator" (:i :class "material-icons" "arrow_upward"))))
  			   
  			      (:div :class "card-reveal"
  				    (:span :class "card-title grey-text text-darken-4"
  					   "Check in specific qty" (:i :class "material-icons right" "close"))
  				    (:form :action (concatenate 'string "/partial-check-in?qty=" (item-quantity item) "&desc=" (item-description item) "&price=" (item-price item))
  					   :method "POST"
  					   (:p :class "range-field"
  					       (:input :id "ranged" :name "ranged" :type "range" :min "0" :max (item-quantity item) :oninput "this.form.rangedName.value=this.value"))
  					       (:input :class "left" :type "number" :name "rangedName" :min "0" :max (item-quantity item) :value (item-quantity item) :oninput "this.form.ranged.value=this.value")
  					       
  					   (:button :type "submit"  :class "right red darken-4 btn-floating" (:i :class "material-icons" "arrow_downward")))))))))))
       
  			  (:script :src "plugins/search.js")))
          
  