
{ Account field - Account Epilog

  CONST
    avc$account_epilog_default = '$NULL',
    avc$account_epilog_description = 'File containing the account epilog.';

  VAR
    avc$account_epilog_chg_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['CHANGE_ACCOUNT_EPILOG', 'CHAAE'],
    avc$account_epilog_dis_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['DISPLAY_ACCOUNT_EPILOG', 'DISAE'];

{ Account field - Account Prolog

  CONST
    avc$account_prolog_default = '$NULL',
    avc$account_prolog_description = 'File containing the account prolog.';

  VAR
    avc$account_prolog_chg_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['CHANGE_ACCOUNT_PROLOG', 'CHAAP'],
    avc$account_prolog_dis_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['DISPLAY_ACCOUNT_PROLOG', 'DISAP'];

{ Member field - Account Administration

  CONST
    avc$account_admin_default = FALSE,
    avc$account_admin_description =
          'Allows the member to perform account administration functions.';

{ Member field - Project Administration

  CONST
    avc$project_admin_default = FALSE,
    avc$project_admin_description =
          'Allows the member to perform project administration functions.';

{ Member field - User Administration

  CONST
    avc$user_admin_acct_descr =
          'Allows the member to create, change, display, and delete users.',
    avc$user_admin_default = FALSE,
    avc$user_admin_proj_descr =
          'Allows the member to create, change, display, and delete users.';

{ Project field - Project Epilog

  CONST
    avc$project_epilog_default = '$NULL',
    avc$project_epilog_description = 'File containing the project epilog.';

  VAR
    avc$project_epilog_chg_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['CHANGE_PROJECT_EPILOG', 'CHAPE'],
    avc$project_epilog_dis_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['DISPLAY_PROJECT_EPILOG', 'DISPE'];

{ Project field - Project Prolog

  CONST
    avc$project_prolog_default = '$NULL',
    avc$project_prolog_description = 'File containing the project prolog.';

  VAR
    avc$project_prolog_chg_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['CHANGE_PROJECT_PROLOG', 'CHAPP'],
    avc$project_prolog_dis_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['DISPLAY_PROJECT_PROLOG', 'DISPP'];

{ User field - Accounting Administration

  CONST
    avc$accounting_admin_default = FALSE,
    avc$accounting_admin_descr =
          'Allows the user to perform accounting administration functions.';

{ User field - Application Administration

  CONST
    avc$application_admin_default = FALSE,
    avc$application_admin_descr =
          'Allows the user to perform application administration functions.';

{ User field - Configuration Administration

  CONST
    avc$configuration_admin_default = FALSE,
    avc$configuration_admin_descr =
          'Allows the user to manipulate configuration parameters.';

{ User field - CPU Time Limit

  CONST
    avc$cpu_job_limits_apply_def = TRUE,
    avc$cpu_limit_name_default = avc$cp_time_limit_name,
    avc$cpu_time_limit_description =
          'Limits the combined job and monitor CPU seconds.',
    avc$cpu_tot_lim_stops_login_def = TRUE,
    avc$cpu_total_limit_applies_def = FALSE,
    avc$maximum_cpu_default = sfc$unlimited,
    avc$minimum_cpu_default = 1;

  VAR
    avc$cpu_time_limit_chg_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['CHANGE_CPU_TIME_LIMIT', 'CHACTL'],
    avc$cpu_time_limit_dis_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['DISPLAY_CPU_TIME_LIMIT', 'DISCTL'];

{ User field - Creation Account Project

  CONST
    avc$creation_acct_proj_descr = 'Execution account and project of the a' CAT
          'dministrator who created the user.';

  VAR
    avc$creation_acct_proj_chg_cmd: [STATIC, READ, oss$job_paged_literal]
          array [1 .. 2] of ost$name := ['CHANGE_CREATION_ACCOUNT_PROJECT',
          'CHACAP'],
    avc$creation_acct_proj_dis_cmd: [STATIC, READ, oss$job_paged_literal]
          array [1 .. 2] of ost$name := ['DISPLAY_CREATION_ACCT_PROJ',
          'DISCAP'];

{ User field - Default Account Project

  CONST
    avc$default_account_default = 'NONE                           ',
    avc$default_acct_proj_descr = 'Default login account and project.',
    avc$default_project_default = 'NONE                           ';

  VAR
    avc$default_acct_proj_chg_cmd: [STATIC, READ, oss$job_paged_literal]
          array [1 .. 2] of ost$name := ['CHANGE_DEFAULT_ACCOUNT_PROJECT',
          'CHADAP'],
    avc$default_acct_proj_dis_cmd: [STATIC, READ, oss$job_paged_literal]
          array [1 .. 2] of ost$name := ['DISPLAY_DEFAULT_ACCOUNT_PROJECT',
          'DISDAP'];

{ User field - Dual State Link Attribute

  CONST
    avc$link_attrib_charge_descr =
          'Default account for interstate communication.',
    avc$link_attrib_family_descr =
          'Default family for interstate communication.',
    avc$link_attrib_password_descr =
          'Default password for interstate communication.',
    avc$link_attrib_project_descr =
          'Default project for interstate communication.',
    avc$link_attrib_user_descr = 'Default user for interstate communication.',
    avc$link_attribute_maximum_size = 31,
    avc$link_attribute_minimum_size = 0;

  VAR
    avc$link_attribute_default: [STATIC, READ, oss$job_paged_literal]
          ost$string := [0, ''],
    avc$link_attrib_charge_chg_cmd: [STATIC, READ, oss$job_paged_literal]
          array [1 .. 2] of ost$name := ['CHANGE_LINK_ATTRIBUTE_CHARGE',
          'CHALAC'],
    avc$link_attrib_family_chg_cmd: [STATIC, READ, oss$job_paged_literal]
          array [1 .. 2] of ost$name := ['CHANGE_LINK_ATTRIBUTE_FAMILY',
          'CHALAF'],
    avc$link_attrib_pw_chg_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['CHANGE_LINK_ATTRIBUTE_PASSWORD',
          'CHALAPW'],
    avc$link_attrib_project_chg_cmd: [STATIC, READ, oss$job_paged_literal]
          array [1 .. 2] of ost$name := ['CHANGE_LINK_ATTRIBUTE_PROJECT',
          'CHALAP'],
    avc$link_attrib_user_chg_cmd: [STATIC, READ,
          oss$job_paged_literal] array [1 .. 2] of ost$name :=
          ['CHANGE_LINK_ATTRIBUTE_USER', 'CHALAU'],
    avc$link_attrib_charge_dis_cmd: [STATIC, READ, oss$job_paged_literal]
          array [1 .. 2] of ost$name := ['DISPLAY_LINK_ATTRIBUTE_CHARGE',
          'DISLAC'],
    avc$link_attrib_family_dis_cmd: [STATIC, READ, oss$job_paged_literal]
          array [1 .. 2] of ost$name := ['DISPLAY_LINK_ATTRIBUTE_FAMILY',
          'DISLAF'],
    avc$link_attrib_pw_dis_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['DISPLAY_LINK_ATTRIBUTE_PASSWORD',
          'DISLAPW'],
    avc$link_attrib_project_dis_cmd: [STATIC, READ, oss$job_paged_literal]
          array [1 .. 2] of ost$name := ['DISPLAY_LINK_ATTRIBUTE_PROJECT',
          'DISLAP'],
    avc$link_attrib_user_dis_cmd: [STATIC, READ,
          oss$job_paged_literal] array [1 .. 2] of ost$name :=
          ['DISPLAY_LINK_ATTRIBUTE_USER', 'DISLAU'];

{ User field - Dual State Prompt

  CONST
    avc$dual_state_prompt_default = FALSE,
    avc$dual_state_prompt_descr = 'Forces prompting for account and projec' CAT
          't during a dual state login.';

{ User field - Engineering Administration

  CONST
    avc$engineering_operation_def = FALSE,
    avc$engineering_operation_descr =
          'Allow the user to perform system maintenance functions.';

{ User field - Explicit Remote File

  CONST
    avc$explicit_remote_file_def = TRUE,
    avc$explicit_remote_file_descr = 'Allows the user to transfer remote f' CAT
          'iles using the MANAGE_REMOTE_FILE utility.';

{ User field - Family Administration

  CONST
    avc$family_admin_default = FALSE,
    avc$family_admin_description =
          'Allows the user to perform family administration functions.';

{ User field - Implicit remote file

  CONST
    avc$implicit_remote_file_def = TRUE,
    avc$implicit_remote_file_descr =
          'Allows the user to transfer remote files using implicit routing.';

{ User field - Job Class

  CONST
    avc$$sys_$sys_job_class_bat_def = 'BATCH                          ',
    avc$$sys_$sys_job_class_def = 'ALL                            ',
    avc$$sys_$sys_job_class_int_def = 'INTERACTIVE                    ',
    avc$$sys_user_job_class_bat_def = 'NONE                           ',
    avc$$sys_user_job_class_def = 'NONE                           ',
    avc$$sys_user_job_class_int_def = 'NONE                           ',
    avc$batch_job_class_default = 'BATCH                          ',
    avc$interactive_job_class_def = 'INTERACTIVE                    ',
    avc$job_class_description =
          'Defines the user''s available and default job classes.';

  VAR
    avc$common_job_class_defaults: [STATIC, READ, oss$job_paged_literal]
          array [1 .. 3] of ost$name := ['BATCH', 'INTERACTIVE',
          'SYSTEM_DEFAULT'],
    avc$job_class_chg_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 3] of ost$name := ['CHANGE_JOB_CLASS', 'CHANGE_JOB_CLASSES',
          'CHAJC'],
    avc$job_class_defaults: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 3] of ost$name := ['BATCH', 'INTERACTIVE', 'SYSTEM_DEFAULT'],
    avc$job_class_dis_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 3] of ost$name := ['DISPLAY_JOB_CLASS', 'DISPLAY_JOB_CLASSES',
          'DISJC'];

{ User field - Job destination usages.

  CONST
    avc$jdu_min_number_of_names = 1,
    avc$jdu_max_number_of_names = 256,
    avc$job_dest_usages_descr =
          'Allows the user access to the specified job destination usages.';

  VAR
    avc$job_destination_usages_def: [STATIC, READ, oss$job_paged_literal]
          array [1 .. 5] of ost$name := ['NTF', 'QTF', 'VE', 'VE_LOCAL',
          'VE_QTF'],
    avc$job_dest_usages_names_def: [STATIC, READ, oss$job_paged_literal]
          array [1 .. 1] of ost$name := ['NONE'],
    avc$job_dest_usages_chg_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['CHANGE_JOB_DESTINATION_USAGES', 'CHAJDU'],
    avc$job_dest_usages_dis_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['DISPLAY_JOB_DESTINATION_USAGES', 'DISJDU'];

{ User field - Login Password

  CONST
    avc$login_password_description =
          'Contains the user''s login password information.';

  VAR
    avc$exp_chg_interval_default: [STATIC, READ, oss$job_paged_literal]
          pmt$time_increment := [0, 0, 0, 0, 0, 0, 0],
    avc$exp_interval_default: [STATIC, READ, oss$job_paged_literal]
          pmt$time_increment := [0, 0, avc$unlimited_exp_interval, 0, 0, 0, 0],
    avc$exp_warning_default: [STATIC, READ, oss$job_paged_literal]
          pmt$time_increment := [0, 0, avc$unlimited_exp_interval, 0, 0, 0, 0],
    avc$expiration_date_default: [STATIC, READ, oss$job_paged_literal]
          ost$date_time := [avc$no_expiration_date, 12, 31, 23, 59, 59, 999],
    avc$login_pass_attribute_def: [STATIC, READ,
          oss$job_paged_literal] array [1 .. 1] of ost$name := ['NONE'],
    avc$login_password_chg_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['CHANGE_LOGIN_PASSWORD', 'CHALPW'],
    avc$login_password_default: [STATIC, READ, oss$job_paged_literal]
          avt$login_password := [FALSE, 'PLEASE_CHANGE_THIS_PASSWORD_NOW'],
    avc$login_password_dis_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['DISPLAY_LOGIN_PASSWORD', 'DISLPW'],
    avc$max_exp_interval_default: [STATIC, READ, oss$job_paged_literal]
          pmt$time_increment := [0, 0, avc$unlimited_exp_interval, 0, 0, 0, 0];

{ User field - Magnetic Tape Limit

  CONST
    avc$mt_limit_name_default = avc$magnetic_tape_limit_name,
    avc$mt_job_limits_apply_def = TRUE,
    avc$mt_tot_lim_stops_login_def = TRUE,
    avc$mt_total_limit_applies_def = FALSE,
    avc$magnetic_tape_min_default = 0,
    avc$magnetic_tape_limit_default = sfc$unlimited,
    avc$magnetic_tape_max_default = sfc$unlimited,
    avc$magnetic_tape_limit_descr =
          'Limits the number of tapes that a user''s job may have mounted ' CAT
          'concurrently.';

  VAR
    avc$magnetic_tape_limit_chg_cmd: [STATIC, READ, oss$job_paged_literal]
          array [1 .. 2] of ost$name := ['CHANGE_MAGNETIC_TAPE_LIMIT',
          'CHAMTL'],
    avc$magnetic_tape_limit_dis_cmd: [STATIC, READ, oss$job_paged_literal]
          array [1 .. 2] of ost$name := ['DISPLAY_MAGNETIC_TAPE_LIMIT',
          'DISMTL'];

{ User field - MAIL/VE Administration

  CONST
    avc$mailve_administration_descr =
          'Controls the level of access of the user to MAILVE.',
    avc$mailve_max_number_of_names = 1,
    avc$mailve_min_number_of_names = 1;

  VAR
    avc$$sys_$sys_mailve_admin_def: [STATIC, READ, oss$job_paged_literal]
          array [1 .. 1] of ost$name := ['ANALYST'],
    avc$mailve_admin_chg_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['CHANGE_MAILVE_ADMINISTRATION', 'CHAMA'],
    avc$mailve_admin_dis_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['DISPLAY_MAILVE_ADMINISTRATION', 'DISMA'],
    avc$mailve_admin_names_def: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 1] of ost$name := ['NONE'],
    avc$mailve_common_names_def: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 4] of ost$name := ['ANALYST', 'SYSTEM', 'FAMILY', 'SELF'];

{ User field - MAIL/VE Distribution List Limit

  CONST
    avc$mailve_dist_list_limit_def = 25,
    avc$mailve_dist_list_limit_desc =
          'Limits the number of MAILVE distribution lists.',
    avc$mailve_dist_list_max_def = 256,
    avc$mailve_dist_list_min_def = 0;

  VAR
    avc$mailve_dist_list_chg_cmd: [STATIC, READ,
          oss$job_paged_literal] array [1 .. 2] of ost$name :=
          ['CHANGE_MAILVE_DIST_LIST_LIMIT', 'CHAMDLL'],
    avc$mailve_dist_list_dis_cmd: [STATIC, READ,
          oss$job_paged_literal] array [1 .. 2] of ost$name :=
          ['DISPLAY_MAILVE_DIST_LIST_LIMIT', 'DISMDLL'];

{ User field - MAIL/VE Mailbox Limit

  CONST
    avc$mailve_mailbox_lim_max_def = 256,
    avc$mailve_mailbox_lim_min_def = 0,
    avc$mailve_mailbox_limit_def = 1,
    avc$mailve_mailbox_limit_descr = 'Limits the number of MAILVE mailboxes.';

  VAR
    avc$mailve_mailbox_lim_chg_cmd: [STATIC, READ, oss$job_paged_literal]
          array [1 .. 2] of ost$name := ['CHANGE_MAILVE_MAILBOX_LIMIT',
          'CHAMML'],
    avc$mailve_mailbox_lim_dis_cmd: [STATIC, READ, oss$job_paged_literal]
          array [1 .. 2] of ost$name := ['DISPLAY_MAILVE_MAILBOX_LIMIT',
          'DISMML'];

{ User field - MAIL/VE Retention Limit

  CONST
    avc$mailve_retention_limit_def = 14,
    avc$mailve_retention_limit_desc =
          'Specifies the maximum retention period for a MAILVE mailbox.',
    avc$mailve_retention_max_def = sfc$unlimited,
    avc$mailve_retention_min_def = 1;

  VAR
    avc$mailve_retention_chg_cmd: [STATIC, READ,
          oss$job_paged_literal] array [1 .. 2] of ost$name :=
          ['CHANGE_MAILVE_RETENTION_LIMIT', 'CHAMRL'],
    avc$mailve_retention_dis_cmd: [STATIC, READ,
          oss$job_paged_literal] array [1 .. 2] of ost$name :=
          ['DISPLAY_MAILVE_RETENTION_LIMIT', 'DISMRL'];

{ User field - Network Application Management

  CONST
    avc$network_applic_mgmt_def = FALSE,
    avc$network_applic_mgmt_descr =
          'Allows the user to access the MANAGE_NETWORK_APPLICATION utility.';

{ User field - Network Operation

  CONST
    avc$network_operation_default = FALSE,
    avc$network_operation_descr =
          'Allows the user to access the CDCNET NETWORK_OPERATOR utility.';

{ User field - NTF Operation

  CONST
    avc$ntf_operation_default = FALSE,
    avc$ntf_operation_description =
          'Allows the user to access the OPERATE_NTF utility.';

{ User field - Output destination usages.

  CONST
    avc$odu_min_number_of_names = 1,
    avc$odu_max_number_of_names = 256,
    avc$output_dest_usages_descr =
          'Allows the user access to the specified output destination usages.';

  VAR
    avc$output_dest_usages_def: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 5] of ost$name := ['DUAL_STATE', 'NTF', 'PRIVATE', 'PUBLIC',
          'QTF'],
    avc$output_dest_usage_names_def: [STATIC, READ, oss$job_paged_literal]
          array [1 .. 1] of ost$name := ['NONE'],
    avc$output_dest_usages_chg_cmd: [STATIC, READ, oss$job_paged_literal]
          array [1 .. 2] of ost$name := ['CHANGE_OUTPUT_DEST_USAGES',
          'CHAODU'],
    avc$output_dest_usages_dis_cmd: [STATIC, READ, oss$job_paged_literal]
          array [1 .. 2] of ost$name := ['DISPLAY_OUTPUT_DEST_USAGES',
          'DISODU'];

{ User field - Permanent File Space Limit

  CONST
    avc$maximum_pfs_default = sfc$unlimited,
    avc$minimum_pfs_default = 0,
    avc$perm_file_space_limit_descr =
          'Limits the number of bytes of permanent file space.',
    avc$pfs_job_limits_apply_def = FALSE,
    avc$pfs_limit_name_default = avc$pfs_limit_name,
    avc$pfs_tot_lim_stops_login_def = FALSE,
    avc$pfs_total_limit_applies_def = TRUE;

  VAR
    avc$perm_file_space_chg_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['CHANGE_PERM_FILE_SPACE_LIMIT', 'CHAPFSL'],
    avc$perm_file_space_dis_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['DISPLAY_PERM_FILE_SPACE_LIMIT', 'DISPFSL'];

{ User field - Permit Level

  CONST
    avc$permit_level_default = 'PUBLIC                         ',
    avc$permit_level_description =
          'Controls the user''s permit creation domain.',
    avc$pl_max_number_of_names = 1,
    avc$pl_min_number_of_names = 1;

  VAR
    avc$permit_level_chg_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['CHANGE_PERMIT_LEVEL', 'CHAPL'],
    avc$permit_level_dis_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['DISPLAY_PERMIT_LEVEL', 'DISPL'],
    avc$permit_level_names_def: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 1] of ost$name := ['PUBLIC'],
    avc$permit_level_com_names_def: [STATIC, READ, oss$job_paged_literal]
          array [1 .. 6] of ost$name := ['PUBLIC', 'FAMILY', 'ACCOUNT',
          'PROJECT', 'USER', 'OWNER'];

{ User field - Removable Media Access

  CONST
    avc$removable_media_access_desc =
          'Allows the user access to the specified removable media.';

  VAR
    avc$$sys_$sys_rma_default: [STATIC, READ, oss$job_paged_literal]
          array [1 .. 1] of avt$labeled_names :=
          [[^avc$$sys_rma_groups_default, ^avc$$sys_rma_access_modes_def]],
    avc$$sys_rma_groups_default: [STATIC, READ, oss$job_paged_literal]
          ost$name := 'ALL',
    avc$$sys_rma_access_modes_def: [STATIC, READ, oss$job_paged_literal]
          array [1 .. 1] of ost$name := ['ALL'],
    avc$rma_groups_default: [STATIC, READ, oss$job_paged_literal]
          ost$name := 'NONE',
    avc$rma_access_modes_default: [STATIC, READ, oss$job_paged_literal]
          array [1 .. 1] of ost$name := ['NONE'],
    avc$removable_media_access_def: [STATIC, READ, oss$job_paged_literal]
          array [1 .. 1] of avt$labeled_names :=
          [[^avc$rma_groups_default, ^avc$rma_access_modes_default]],
    avc$rma_valid_groups_default: [STATIC, READ, oss$job_paged_literal]
          array [1 .. 1] of ost$name := ['NONE'],
    avc$rma_valid_access_modes_def: [STATIC, READ, oss$job_paged_literal]
          array [1 .. 1] of ost$name := ['NONE'],
    avc$rma_change_commands: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['CHANGE_REMOVABLE_MEDIA_ACCESS', 'CHARMA'],
    avc$rma_display_commands: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['DISPLAY_REMOVABLE_MEDIA_ACCESS', 'DISRMA'];

{ User field - Removable Media Operation

  CONST
    avc$removable_media_oper_def = FALSE,
    avc$removable_media_oper_descr = 'Allows the user to operate removable' CAT
          ' media peripherals.';

{ User field - Removable Media Administration

  CONST
    avc$removable_media_admin_def = FALSE,
    avc$removable_media_admin_descr = 'Allows the user to operate and admin' CAT
          'ister removable media peripherals.';

{ User field - Ring Privileges

  CONST
    avc$$sys_$sys_minimum_ring_def = osc$sj_ring_1,
    avc$$sys_$sys_nominal_ring_def = osc$user_ring,
    avc$minimum_ring_default = osc$user_ring,
    avc$nominal_ring_default = osc$user_ring,
    avc$ring_privilege_description =
          'Defines the user''s nominal and minimum rings.';

  VAR
    avc$ring_privilege_chg_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 3] of ost$name := ['CHANGE_RING_PRIVILEGE',
          'CHANGE_RING_PRIVILEGES', 'CHARP'],
    avc$ring_privilege_dis_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 3] of ost$name := ['DISPLAY_RING_PRIVILEGE',
          'DISPLAY_RING_PRIVILEGES', 'DISRP'];

{ User field - Scheduling Administration

  CONST
    avc$scheduling_admin_default = FALSE,
    avc$scheduling_admin_descr =
          'Allows the user to perform scheduling administration functions.';

{ User field - SRU Limit

  CONST
    avc$maximum_sru_default = sfc$unlimited,
    avc$minimum_sru_default = 1,
    avc$sru_job_limits_apply_def = TRUE,
    avc$sru_limit_description =
          'Limits the number of system resource units (SRUs).',
    avc$sru_limit_name_default = avc$sru_limit_name,
    avc$sru_tot_lim_stops_login_def = TRUE,
    avc$sru_total_limit_applies_def = FALSE;

  VAR
    avc$sru_limit_chg_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['CHANGE_SRU_LIMIT', 'CHASL'],
    avc$sru_limit_dis_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['DISPLAY_SRU_LIMIT', 'DISSL'];

{ User field - Station Operation

  CONST
    avc$station_operation_default = FALSE,
    avc$station_operation_descr =
          'Allows the user to access the OPERATE_STATION utility.';

{ User field - System Administration

  CONST
    avc$system_admin_default = FALSE,
    avc$system_admin_description =
          'Allows the user to perform system administration functions.';

{ User field - System Displays

  CONST
    avc$system_displays_default = FALSE,
    avc$system_displays_description = 'Allows the user to display informat' CAT
          'ion relevant to system operation.';

{ User field - System Operation

  CONST
    avc$system_operation_default = FALSE,
    avc$system_operation_descr =
          'Allows the user to perform actions relevant to system operation.';

{ User field - Task Limit

  CONST
    avc$default_task_default = 20,
    avc$maximum_task_default = 256,
    avc$minimum_task_default = 3,
    avc$tas_tot_lim_stops_login_def = TRUE,
    avc$tas_total_limit_applies_def = FALSE,
    avc$task_job_limits_apply_def = TRUE,
    avc$task_limit_description = 'Limits the number of concurrent tasks.',
    avc$task_limit_name_default = avc$task_limit_name;

  VAR
    avc$task_limit_chg_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['CHANGE_TASK_LIMIT', 'CHATL'],
    avc$task_limit_dis_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['DISPLAY_TASK_LIMIT', 'DISTL'];


{ User field - Temporary File Space Limit

  CONST
    avc$tfs_limit_name_default = avc$tfs_limit_name,
    avc$tfs_job_limits_apply_def = TRUE,
    avc$tfs_total_limit_applies_def = FALSE,
    avc$tfs_tot_lim_stops_login_def = TRUE,
    avc$minimum_tfs_default = 0,
    avc$maximum_tfs_default = sfc$unlimited,
    avc$temp_file_space_limit_descr =
          'Limits the number of bytes of temporary file space.';

  VAR
    avc$temp_file_space_chg_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['CHANGE_TEMP_FILE_SPACE_LIMIT', 'CHATFSL'],
    avc$temp_file_space_dis_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['DISPLAY_TEMP_FILE_SPACE_LIMIT', 'DISTFSL'];

{ User field - Terminal Timeout Limit

  CONST
    avc$terminal_timeout_min_def = 1,
    avc$terminal_timeout_limit_def = sfc$unlimited,
    avc$terminal_timeout_max_def = sfc$unlimited,
    avc$terminal_timeout_limit_desc =
          'Limits the number of minutes an interactive job may be inactive' CAT
          ' before a timeout disconnect of the job will occur.';

  VAR
    avc$terminal_timeout_chg_cmd: [STATIC, READ,
          oss$job_paged_literal] array [1 .. 2] of ost$name :=
          ['CHANGE_TERMINAL_TIMEOUT_LIMIT', 'CHATTL'],
    avc$terminal_timeout_dis_cmd: [STATIC, READ,
          oss$job_paged_literal] array [1 .. 2] of ost$name :=
          ['DISPLAY_TERMINAL_TIMEOUT_LIMIT', 'DISTTL'];

{ User field - Timesharing

  CONST
    avc$timesharing_default = TRUE,
    avc$timesharing_description =
          'Allows the user to access the system in interactive mode.';

{ User field - User Epilog

  CONST
    avc$$sys_$sys_epilog_default = '$NULL',
    avc$$sys_user_epilog_default = '$NULL',
    avc$user_epilog_default = '$USER.EPILOG',
    avc$user_epilog_description = 'File containing the user epilog.';

  VAR
    avc$user_epilog_chg_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['CHANGE_USER_EPILOG', 'CHAUE'],
    avc$user_epilog_dis_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['DISPLAY_USER_EPILOG', 'DISUE'];

{ User field - User Prolog

  CONST
    avc$$sys_$sys_prolog_default = '$NULL',
    avc$$sys_user_prolog_default = '$NULL',
    avc$user_prolog_default = '$USER.PROLOG',
    avc$user_prolog_description = 'File containing the user prolog.';

  VAR
    avc$user_prolog_chg_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['CHANGE_USER_PROLOG', 'CHAUP'],
    avc$user_prolog_dis_cmd: [STATIC, READ, oss$job_paged_literal] array
          [1 .. 2] of ost$name := ['DISPLAY_USER_PROLOG', 'DISUP'];

{ Capability definition values

  CONST
    avc$$sys_$sys_capability_def = TRUE,
    avc$$sys_user_capability_def = FALSE,
    avc$cap_cmd_table_field_name = 'CAPABILITY                     ';

{ Validation file command table processor names.

  CONST
    avc$change_acct_proj_command = 'AVP$CHANGE_ACCT_PROJ_COMMAND   ',
    avc$change_accum_limit_command = 'AVP$CHANGE_ACCUM_LIMIT_COMMAND ',
    avc$change_capability_command = 'AVP$CHANGE_CAPABILITY_COMMAND  ',
    avc$change_date_time_command = 'AVP$CHANGE_DATE_TIME_COMMAND   ',
    avc$change_file_command = 'AVP$CHANGE_FILE_COMMAND        ',
    avc$change_integer_command = 'AVP$CHANGE_INTEGER_COMMAND     ',
    avc$change_job_class_command = 'AVP$CHANGE_JOB_CLASS_COMMAND   ',
    avc$change_labeled_names_cmd = 'AVP$CHANGE_LABELED_NAMES_CMD   ',
    avc$change_limit_command = 'AVP$CHANGE_LIMIT_COMMAND       ',
    avc$change_login_password_cmd = 'AVP$CHANGE_LOGIN_PASSWORD_CMD  ',
    avc$change_name_command = 'AVP$CHANGE_NAME_COMMAND        ',
    avc$change_real_command = 'AVP$CHANGE_REAL_COMMAND        ',
    avc$change_restriction_command = 'AVP$CHANGE_RESTRICTION_COMMAND ',
    avc$change_ring_privilege_cmd = 'AVP$CHANGE_RING_PRIVILEGE_CMD  ',
    avc$change_string_command = 'AVP$CHANGE_STRING_COMMAND      ',
    avc$display_acct_proj_command = 'AVP$DISPLAY_ACCT_PROJ_COMMAND  ',
    avc$display_field_description = 'AVP$DISPLAY_FIELD_DESCRIPTION  ',
    avc$display_field_names = 'AVP$DISPLAY_FIELD_NAMES        ',
    avc$display_field_value = 'AVP$DISPLAY_FIELD_VALUE        ',
    avc$end_subutility_command = 'AVP$END_SUBUTILITY_COMMAND     ';

{ Command table entry procedure names for standard commands.

  VAR
    avc$end_change_user_commands: [STATIC, READ,
          oss$job_paged_literal] array [1 .. 4] of ost$name :=
          ['END_CHANGE_USER', 'ENDCU', 'QUIT', 'QUI'],
    avc$end_change_acct_commands: [STATIC, READ,
          oss$job_paged_literal] array [1 .. 4] of ost$name :=
          ['END_CHANGE_ACCOUNT', 'ENDCA', 'QUIT', 'QUI'],
    avc$end_change_acct_mem_cmds: [STATIC, READ,
          oss$job_paged_literal] array [1 .. 4] of ost$name :=
          ['END_CHANGE_ACCOUNT_MEMBER', 'ENDCAM', 'QUIT', 'QUI'],
    avc$end_change_proj_commands: [STATIC, READ,
          oss$job_paged_literal] array [1 .. 4] of ost$name :=
          ['END_CHANGE_PROJECT', 'ENDCP', 'QUIT', 'QUI'],
    avc$end_change_proj_mem_cmds: [STATIC, READ,
          oss$job_paged_literal] array [1 .. 4] of ost$name :=
          ['END_CHANGE_PROJECT_MEMBER', 'ENDCPM', 'QUIT', 'QUI'],
    avc$display_field_descr_cmds: [STATIC, READ,
          oss$job_paged_literal] array [1 .. 3] of ost$name :=
          ['DISPLAY_FIELD_DESCRIPTION', 'DISPLAY_FIELD_DESCRIPTIONS', 'DISFD'],
    avc$display_field_names_cmds: [STATIC, READ,
          oss$job_paged_literal] array [1 .. 2] of ost$name :=
          ['DISPLAY_FIELD_NAMES', 'DISFN'],
    avc$change_capability_commands: [STATIC, READ, oss$job_paged_literal]
          array [1 .. 3] of ost$name := ['CHANGE_CAPABILITY',
          'CHANGE_CAPABILITIES', 'CHAC'],
    avc$display_capability_commands: [STATIC, READ, oss$job_paged_literal]
          array [1 .. 3] of ost$name := ['DISPLAY_CAPABILITY',
          'DISPLAY_CAPABILITIES', 'DISC'];

*copyc avc$system_defined_limit_names
*copyc avc$unlimited_exp_interval
*copyc avc$no_expiration_date
*copyc avt$login_password
*copyc avt$name_list_size
*copyc sft$counter
*copyc ost$date_time
*copyc osd$virtual_address
*copyc oss$job_paged_literal
*copyc ost$name
*copyc pmt$time_increment
