PROCEDURE administer_security_audit, admsa (
  scope, s: key
      (job, j)
      (system, s)
    keyend = system
  status)

  IF $file($system.audit.osf$audit_library permanent) THEN

" Call the utility via its program description.

    $system.audit.osf$audit_library.administer_security_audit_pd scope=scope
    include_file file=$command_of_caller utility=administer_security_audit
    QUIT
  ELSE
    EXIT procedure WITH $status(false, 'SF', sfe$audit_not_installed)
  IFEND

PROCEND administer_security_audit
