anchor.diff:  		     :accessor list-of-invoices)
      (name :initarg :name
   	 :accessor show-name)))
  +
  +(defclass show-db ()
  +  ((contact :initarg :contact
  +	    :accessor db-contact
  +	    :col-type :text)
  +   (phone-number :initarg :phone-number
  +		 :accessor db-phone-number
  +		 :col-type :text)
  +   (name :initarg :name
  +	 :accessor db-show-name
  +	 :col-type :text))
  +  (:metaclass mito:dao-table-class))
   
   (defclass invoice ()
     ((id-num :initarg :id-num
  
positive.code: 	     :initform '())
     (returned-qty :initarg :returned-qty
  		 :accessor item-returned-qty)
     (notes :initarg :notes
  	  :accessor item-notes
  	  :initform '())
     (returned-on :initarg :returned-on
  		:accessor item-returned-on)))
  
  (defclass user ()
    ((name :initarg :name
  
negative.code: 	 (description (hunchentoot:post-parameter "input-item-description"))
  	 (price (hunchentoot:post-parameter "input-item-price"))
  	 (qty (hunchentoot:post-parameter "input-item-qty"))
  	 (image (hunchentoot:post-parameter "image-data"))
  	 (set-name (invoice-set-name invoice)))
      
      (mito:create-dao 'item-db :description description
  		     :quantity qty
  		     :price price
  		     :invoice-db (mito:find-dao 'invoice-db :set-name set-name))
      
  
      (push (make-instance 'item :description description
  			 :quantity qty
  			 :price price
  