anchor.diff:        (:div :class  "col-xs-12 col-sm-4 col-md-4 col-lg-4"  :align "right" 
   	    (:h2 (:span :class "label label-default" (cl-who:str (format nil "Total = Rs ~$" total))))))
         (:hr)
  -      (cl-who:str (display-as-tiles todaysorders 'vendor-order-card ))))))
  +      (cl-who:str (display-as-tiles todaysorders 'vendor-order-card "order-box" ))))))
   
   
    
  
positive.code:       (progn 
  	(hunchentoot:remove-session hunchentoot:*session*)
  	;;(deleteHHUBBusinessSession (hunchentoot:session-value :login-vendor-business-session-id)) 
  	(if company-website (hunchentoot:redirect (format nil "http://~A" company-website)) 
  					;else
  	    (hunchentoot:redirect (hunchentoot:redirect "/index.html"))))))
  
  
  
  
negative.code: 	  (:h3 "Welcome " (cl-who:str (format nil "~A" (get-login-vendor-name))))
  	  (:hr)
  	  (:form :class "form-venorders" :method "POST" :action "dodvendindex"
  		 (with-html-div-row :style "display: none"
  		       (:div :class "btn-group" :role "group" :aria-label "..."
  			     (:button  :name "btnpendord" :type "submit" :class "btn btn-default active" "Orders" )
  			     (:button  :name "btnordcomp" :type "submit" :class "btn btn-default" "Completed Orders")))
  					; (:hr)
  					(with-html-div-row :style "display: none"
  					      (:div :class "col-sm-12 col-xs-12 col-md-12 col-lg-12" 
  						    (:input :type "text" :name "reqdate" :placeholder "yyyy/mm/dd")
  						    (:button :class "btn btn-primary" :type "submit" :name "btnordprd" "Get Orders by Products")
  