anchor.diff:  
   	   (setf (slot-value temp-customer 'name) custname)
   	   (setf (slot-value temp-customer 'address) shipaddress)
  +	   (setf (slot-value temp-customer 'city) shipcity)
  +	   (setf (slot-value temp-customer 'state) shipstate)
  +	   (setf (slot-value temp-customer 'zipcode) shipzipcode)
   	   (setf (slot-value temp-customer 'phone) phone)
   	   (setf (slot-value temp-customer 'email) email)
   	   	   
  
positive.code: 				   (:div :class "form-group" (:label :for "zipcode" "Pincode" )
  					 (:input :class "form-control" :type "text" :class "form-control" :inputmode "numeric" :maxlength "6" :id "billzipcode" :name "billzipcode" :tabindex "8" :placeholder "Pincode" ))
  				   (:div :class "form-group" (:label :for "city" "City" )
  					 (:input :class "form-control" :type "text" :class "form-control" :name "billcity" :id "billcity"  :placeholder "City"  ))
  				   (:div :class "form-group" (:label :for "state" "State" )
  					 (:input :class "form-control" :type "text" :class "form-control" :name "billstate" :id "billstate" :placeholder "State"  ))))))
  	
  	   
  	   (:div :class "row"
  
negative.code: 	   (:div :class "row"
  		 (:div :class "col-xs-12 col-sm-12 col-md-6 col-lg-6"
  		       (:div :class "form-group" (:label :for "phone" "Phone" )
  			     (:input :class "form-control" :type "text" :class "form-control" :name "phone" :placeholder "Mobile Phone (+919999999999) " :tabindex "3" :maxlength "13"  :required T )))
  			      
  		 (:div :class "col-xs-12 col-sm-12 col-md-6 col-lg-6"
  		       (:div :class "form-group" (:label :for "email" "Email" )
  			     (:input :class "form-control" :type "email" :class "form-control" :name "email" :placeholder "Email" :data-error "That email address is invalid" :tabindex "4" ))))
  