anchor.diff:          ; Handle this condition
      
         (clsql:sql-database-data-error (condition)
  -	  (if (equal (clsql:sql-error-error-id condition) 2006 ) (progn
  +	  (if (equal (clsql:sql-error-error-id condition) 2013 ) (progn
   								   (stop-das) 
   								   (start-das)
   ;								   (clsql:reconnect :database *dod-db-instance*)
  
positive.code: 		 (cl-who:str (format nil "Request Date: ~A" reqdate))))
        (:div :class "row"
  	    (:div :class "col-xs-12"
  		(cl-who:str (format nil "Payment Mode: ~A" payment-mode))))
  	(if (equal cust-type "GUEST") 
  	    (cl-who:htm (:div :class "row"
  			      (:div :class "col-xs-12"
  
negative.code: 
  				       ))))))  
      (clsql:sql-database-data-error (condition)
        (if (equal (clsql:sql-error-error-id condition) 2013 ) (progn
  							       (stop-das) 
  							       (start-das)
  							       (hunchentoot:redirect "/hhub/customer-login.html"))))))
  