PROCEDURE manage_application_definitions, manad (
  status)

  VAR
    command_table: file = $local//$name($unique)
    ignore_status: status
  VAREND

COLLECT_TEXT o=command_table
  command n=(define_btf)    p=rap$define_btf
  command n=(define_btfs)   p=rap$define_btfs
  command n=(define_c_socket) p=rap$define_c_socket
  command n=(define_desktop_environment) p=rap$define_desktop_environment
  command n=(define_drje)   p=rap$define_drje
  command n=(define_ftp)    p=rap$define_ftp
  command n=(define_ftps)   p=rap$define_ftps
  command n=(define_ipc_applications)    p=rap$define_ipc_applications
  command n=(define_lpd)    p=rap$define_lpd
  command n=(define_lpds)   p=rap$define_lpds
  command n=(define_name_resolver) p=rap$define_name_resolver
  command n=(define_nqs)    p=rap$define_nqs
  command n=(define_nfs_time_servers)    p=rap$define_nfs_time_servers
  command n=(define_ntf)    p=rap$define_ntf
  command n=(define_opentf) p=rap$define_opentf
  command n=(define_opes)   p=rap$define_opes
  command n=(define_orasrv) p=rap$define_orasrv
  command n=(define_orasrvs) p=rap$define_orasrvs
  command n=(define_ptf)    p=rap$define_ptf
  command n=(define_qtf)    p=rap$define_qtf
  command n=(define_qtfs)   p=rap$define_qtfs
  command n=(define_rexec)  p=rap$define_rexec
  command n=(define_rexecs) p=rap$define_rexecs
  command n=(define_rlm)    p=rap$define_rlm
  command n=(define_scf)    p=rap$define_scf
  command n=(define_scfs)   p=rap$define_scfs
  command n=(define_smtp)   p=rap$define_smtp
  command n=(define_smtps)  p=rap$define_smtps
  command n=(define_tcp_daytime_server) p=rap$define_tcp_daytime_server
  command n=(define_tcp_time_server) p=rap$define_tcp_time_server
  command n=(define_tftp)   p=rap$define_tftp
  command n=(define_tftps)  p=rap$define_tftps
  command n=(define_udp_daytime_server) p=rap$define_udp_daytime_server
  command n=(define_udp_time_server) p=rap$define_udp_time_server
  command n=(define_unnamed_tcp_application) p=rap$define_unnamed_tcp_appl
  command n=(define_unnamed_udp_application) p=rap$define_unnamed_udp_appl
  command n=(define_5744_interface)          p=rap$define_5744_interface
"
  command n=(delete_btf)    p=rap$delete_btf
  command n=(delete_btfs)   p=rap$delete_btfs
  command n=(delete_c_socket) p=rap$delete_c_socket
  command n=(delete_desktop_environment)     p=rap$delete_desktop_environment
  command n=(delete_drje)   p=rap$delete_drje
  command n=(delete_ftp)    p=rap$delete_ftp
  command n=(delete_ftps)   p=rap$delete_ftps
  command n=(delete_ipc_applications)    p=rap$delete_ipc_applications
  command n=(delete_lpd)    p=rap$delete_lpd
  command n=(delete_lpds)   p=rap$delete_lpds
  command n=(delete_name_resolver) p=rap$delete_name_resolver
  command n=(delete_nqs)    p=rap$delete_nqs
  command n=(delete_nfs_time_servers) p=rap$delete_nfs_time_servers
  command n=(delete_ntf)    p=rap$delete_ntf
  command n=(delete_opentf) p=rap$delete_opentf
  command n=(delete_opes)   p=rap$delete_opes
  command n=(delete_orasrv) p=rap$delete_orasrv
  command n=(delete_orasrvs) p=rap$delete_orasrvs
  command n=(delete_ptf)    p=rap$delete_ptf
  command n=(delete_qtf)    p=rap$delete_qtf
  command n=(delete_qtfs)   p=rap$delete_qtfs
  command n=(delete_rexec)  p=rap$delete_rexec
  command n=(delete_rexecs) p=rap$delete_rexecs
  command n=(delete_rlm)    p=rap$delete_rlm
  command n=(delete_scf)    p=rap$delete_scf
  command n=(delete_scfs)   p=rap$delete_scfs
  command n=(delete_smtp)   p=rap$delete_smtp
  command n=(delete_smtps)  p=rap$delete_smtps
  command n=(delete_tcp_daytime_server) p=rap$delete_tcp_daytime_server
  command n=(delete_tcp_time_server) p=rap$delete_tcp_time_server
  command n=(delete_tftp)   p=rap$delete_tftp
  command n=(delete_tftps)  p=rap$delete_tftps
  command n=(delete_udp_daytime_server) p=rap$delete_udp_daytime_server
  command n=(delete_udp_time_server) p=rap$delete_udp_time_server
  command n=(delete_unnamed_tcp_application) p=rap$delete_unnamed_tcp_appl
  command n=(delete_unnamed_udp_application) p=rap$delete_unnamed_udp_appl
  command n=(quit, qui)     p=rap$quit_manad
  command n=(delete_5744_interface)          p=rap$delete_5744_interface
TABLEND
**

  UTILITY n=manage_application_definitions p='manad' ..
        l=$system.software_maintenance.raf$library ..
        t=command_table

    $system.include_file f=$command_of_caller u=$utility(name)
    $system.delete_file f=command_table status=ignore_status

  UTILITYEND

PROCEND manage_application_definitions
