anchor.diff:  :documentation "List all the business objects"
   (with-opr-session-check 
     (let ((busobjs (hhub-get-cached-bus-objects)))
  -    (with-standard-admin-page (:title "Business Objects ...")
  +    (with-standard-admin-page "Business Objects ..."
   			      (IAM-security-page-header)
   			      (:div :class "row"
   				    (:div :class "col-md-12" (:h4 "Business Objects")))
  
positive.code: :documentation "List all the business transactions" 
  (with-opr-session-check 
    (let ((bustrans (hhub-get-cached-transactions)))
      (with-standard-admin-page (:title "Business Transactions...")
  			      (IAM-security-page-header)
  			      (:div :class "row"
  				    (:div :class "col-md-12" 
  
negative.code: 		  (with-html-form "form-addcompany" "hhubnewcompreqemailaction"
  		    (:img :class "profile-img" :src "/img/logo.png" :alt "")
  		    (:div :class "form-group"
  			  (:input :class "form-control" :name "cmpname" :maxlength "30"  :value "" :required T  :placeholder "Enter Store Name ( max 30 characters) " :type "text" ))
  		    (:div :class "form-group"
  			  (:label :for "cmpaddress")
  			  (:textarea :class "form-control" :name "cmpaddress"  :placeholder "Enter Address ( max 400 characters) " :required T  :rows "5" :onkeyup "countChar(this, 400)" "" ))
  