anchor.diff:  (defun dod-controller-abac-security ()
     (let ((policies (hhub-get-cached-auth-policies)))
       (with-opr-session-check 
  -      (with-standard-admin-page (:title "Welcome to Highrisehub")
  +      (with-standard-admin-page "Welcome to Highrisehub"
   	(iam-security-page-header)
   	(:hr)
   	(:div :class "row"
  
positive.code: :documentation "List all the business objects"
  (with-opr-session-check 
    (let ((abacsubjects (select-abac-subject-by-company (get-login-company))))
      (with-standard-admin-page (:title "Business Personas ...")
  			      (IAM-security-page-header)
        (:div :class "row"
  	    (:div :class "col-md-12" (:h4 "Business Personas")))
  
negative.code: 	(hunchentoot:create-regex-dispatcher "^/hhub/delcomp" 'dod-controller-delete-company)
  	(hunchentoot:create-regex-dispatcher "^/hhub/journal-entry-added" 'dod-controller-journal-entry-added)
          (hunchentoot:create-regex-dispatcher "^/hhub/account-added" 'dod-controller-account-added)
  	(hunchentoot:create-regex-dispatcher "^/hhub/sadmincreateusers" 'com-hhub-transaction-sadmin-create-users)
  	(hunchentoot:create-regex-dispatcher "^/hhub/list-accounts" 'dod-controller-list-accounts)
  	(hunchentoot:create-regex-dispatcher "^/hhub/listattributes" 'dod-controller-list-attrs)
  	(hunchentoot:create-regex-dispatcher "^/hhub/dbreset.html" 'dod-controller-dbreset-page)
  