PROC deactivate_network_file_access, deanfa (
    status)

  create_variable nav$status kind=status

  deactivate_system_task network_file_access status=nav$status

  IF nav$status.normal THEN
    display_value 'Network file access deactivated.'
  ELSE
    EXIT_PROC with nav$status
  IFEND

  delete_system_task name=network_file_access status=nav$status

  IF NOT nav$status.normal THEN
    EXIT_PROC with nav$status
  IFEND

PROCEND deactivate_network_file_access
