PROC deactivate_ntf_mail (
  status : var of status = $optional
  )


*IF $variable(rav$proc_doc,declared)<>'UNKNOWN'

"   This request deactivates NTF_MAIL system task.
*IFEND


  create_variable local_status k=status


  deactivate_system_task task_name=ntf_mail_client status=local_status
  EXIT_PROC WITH local_status WHEN NOT local_status.normal

PROCEND deactivate_ntf_mail
