anchor.diff:  	   (: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 "+91" :tabindex "3"  :required T ))) 
  +			     (: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" ))))
  
positive.code: ;; -*- mode: common-lisp; coding: utf-8 -*-
  (in-package :hhub)
  (clsql:file-enable-sql-reader-syntax)
  
  
  
  
negative.code:       (with-standard-customer-page "Shopping cart finalize"
  	(:div :class "row"
  	      (:div :class "col-xs-12"
  		    (cl-who:str (format nil "Order Date: ~A" odate))))
        (:div :class "row"
  	    (:div :class "col-xs-12"
  		 (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"
  				    (:h4 (cl-who:str (format nil "Phone: ~A" phone)))))
  			;;If email is given by the guest customer during shopping
  			(when (> (length email) 0)
  			  (cl-who:htm (:div :class "row"
  					    (:div :class "col-xs-12"
  						  (cl-who:str (format nil "Email: ~A" email))))))
  			;; Shipping address
  			(:div :class "row"
  			      (:div :class "col-xs-12"
  				    (cl-who:str (format nil "Shipping Address: ~A, ~A, ~A, ~A" shipaddress shipcity shipstate shipzipcode))))
  					
  			;; billing address
  			(when (not billsameasshipchecked)
  			  (cl-who:htm
  			   (:div :class "row"
  			      (:div :class "col-xs-12"
  				    (cl-who:str (format nil "Billing Address: ~A, ~A, ~A, ~A" billaddress billcity billstate billzipcode))))))
  			
  						
  			;; GST Number and Organization
  			(when (and claimitcchecked (> (length gstnumber) 0))
  			  (cl-who:htm
  			   (:div :class "row"
  			      (:div :class "col-xs-12"
  				    (cl-who:str (format nil "GST Number: ~A/" gstnumber))
  				    (cl-who:str (format nil "GST Organization: ~A" gstorgname))
  				    ))))
  
  			))
  			
  
        (:div :class "row"
  	    (:div :class "col-xs-12"
  