PROC setup_installation_process, setip (
  family_name, fn: name = $required
  user_name, un: name = $required
  status)

    create_variable ignore_status k=status
    create_variable local_status k=status


  WHEN any_fault DO
    display_value osv$status o=$response
  WHENEND


  create_family family_name=$value(family_name) family_user_administrator=$value(user_name) ..
        status=local_status
  EXIT_PROC WITH local_status WHEN NOT local_status.normal

  put_line 'change_job_attribute_default login_family='//$string($value(family_name)) ..
        o=$system.prologs_and_epilogs.system_initiation_prolog.$eoi

  change_job_attribute_default login_family=$value(family_name)

  change_terminal_environment configuration_file_access=on fn=$value(family_name) un=$value(user_name)

  copy_file i=$system.mainframe.configuration ..
        o=$system.site_os_maintenance.deadstart_commands.physical_configuration

  detach_file $system.mainframe.configuration status=ignore_status
  detach_file $system.site_os_maintenance.deadstart_commands.physical_configuration status=ignore_status

  create_file_permit f=$system.manuals.site_analyst_examples g=user fn=$value(family_name) ..
        u=$value(user_name)
  create_file_permit f=$system.manuals.examples_files.site_analyst_source_library ..
        g=user fn=$value(family_name) u=$value(user_name)


PROCEND setup_installation_process

