?? NEWTITLE := 'NOS/VE :  ADVANCED ACCESS METHOD, RING 2DD' ??
MODULE amm$static_data;
?? RIGHT := 110 ??

{ PURPOSE:
{   This Module contains static variable declarations used by AM.

?? NEWTITLE := 'Global Declarations Referenced By This Module', EJECT ??
?? PUSH (LISTEXT := ON) ??
*copyc oss$job_paged_literal
*copyc amt$attribute_names
?? POP ??
?? OLDTITLE ??
?? NEWTITLE := 'Global Declarations Referenced By This Module', EJECT ??

{NOTE: does not support whole range of amt$file_attribute_keys. Why?

  VAR
    amv$attribute_names: [XDCL, READ, oss$job_paged_literal] amt$attribute_names := [

{amc$access_level .............. = 001} 'ACCESS_LEVEL                   ',
{amc$access_mode ............... = 002} 'ACCESS_MODE                    ',
{amc$application_info .......... = 003} 'APPLICATION_INFORMATION        ',
{amc$average_record_length ..... = 004} 'AVERAGE_RECORD_LENGTH          ',
{amc$block_type ................ = 005} 'BLOCK_TYPE                     ',
{amc$character_conversion ...... = 006} 'CHARACTER_CONVERSION           ',
{amc$clear_space ............... = 007} 'CLEAR_SPACE                    ',
{amc$collate_table ............. = 008} 'COLLATE_TABLE                  ',
{amc$collate_table_name ........ = 009} 'COLLATE_TABLE_NAME             ',
{............................... = 010} '                               ',
{............................... = 011} '                               ',
{amc$data_padding .............. = 012} 'DATA_PADDING                   ',
{amc$embedded_key .............. = 013} 'EMBEDDED_KEY                   ',
{amc$error_exit_name ........... = 014} 'ERROR_EXIT_NAME                ',
{amc$error_exit_procedure ...... = 015} 'ERROR_EXIT_PROCEDURE           ',
{amc$error_limit ............... = 016} 'ERROR_LIMIT                    ',
{amc$error_options ............. = 017} 'ERROR_OPTIONS                  ',
{amc$estimated_record_count .... = 018} 'ESTIMATED_RECORD_COUNT         ',
{amc$file_access_procedure ..... = 019} 'FILE_ACCESS_PROCEDURE          ',
{amc$file_contents ............. = 020} 'FILE_CONTENTS                  ',
{amc$file_length ............... = 021} 'SIZE                           ',
{amc$file_limit ................ = 022} 'FILE_LIMIT                     ',
{............................... = 023} '                               ',
{amc$file_organization ......... = 024} 'FILE_ORGANIZATION              ',
{amc$file_processor ............ = 025} 'FILE_PROCESSOR                 ',
{amc$file_structure ............ = 026} 'FILE_STRUCTURE                 ',
{amc$forced_write .............. = 027} 'FORCED_WRITE                   ',
{amc$global_access_mode ........ = 028} 'GLOBAL_ACCESS_MODE             ',
{amc$global_file_address ....... = 029} 'GLOBAL_FILE_ADDRESS            ',
{amc$global_file_position ...... = 030} 'GLOBAL_FILE_POSITION           ',
{amc$global_file_name .......... = 031} 'GLOBAL_FILE_NAME               ',
{amc$global_share_mode ......... = 032} 'GLOBAL_SHARE_MODE              ',
{amc$index_levels .............. = 033} 'INDEX_LEVELS                   ',
{amc$index_padding ............. = 034} 'INDEX_PADDING                  ',
{amc$internal_code ............. = 035} 'INTERNAL_CODE                  ',
{amc$key_length ................ = 036} 'KEY_LENGTH                     ',
{amc$key_position .............. = 037} 'KEY_POSITION                   ',
{amc$key_type .................. = 038} 'KEY_TYPE                       ',
{amc$label_exit_name ........... = 039} 'LABEL_EXIT_NAME                ',
{amc$label_exit_procedure ...... = 040} 'LABEL_EXIT_PROCEDURE           ',
{amc$label_options ............. = 041} 'LABEL_OPTIONS                  ',
{amc$label_type ................ = 042} 'LABEL_TYPE                     ',
{............................... = 043} '                               ',
{amc$line_number ............... = 044} 'LINE_NUMBER                    ',
{amc$max_block_length .......... = 045} 'MAX_BLOCK_LENGTH               ',
{amc$max_record_length ......... = 046} 'MAX_RECORD_LENGTH              ',
{amc$message_control ........... = 047} 'MESSAGE_CONTROL                ',
{amc$min_block_length .......... = 048} 'MIN_BLOCK_LENGTH               ',
{amc$min_record_length ......... = 049} 'MIN_RECORD_LENGTH              ',
{amc$null_attribute ............ = 050} 'NULL_ATTRIBUTE                 ',
{amc$open_position ............. = 051} 'OPEN_POSITION                  ',
{amc$padding_character ......... = 052} 'PADDING_CHARACTER              ',
{amc$page_format ............... = 053} 'PAGE_FORMAT                    ',
{amc$page_length ............... = 054} 'PAGE_LENGTH                    ',
{amc$page_width ................ = 055} 'PAGE_WIDTH                     ',
{amc$permanent_file ............ = 056} 'PERMANENT_FILE                 ',
{amc$preset_value .............. = 057} 'PRESET_VALUE                   ',
{............................... = 058} '                               ',
{amc$record_limit .............. = 059} 'RECORD_LIMIT                   ',
{amc$record_type ............... = 060} 'RECORD_TYPE                    ',
{amc$records_per_block ......... = 061} 'RECORDS_PER_BLOCK              ',
{amc$return_option ............. = 062} 'RETURN_OPTION                  ',
{amc$ring_attributes ........... = 063} 'RING_ATTRIBUTES                ',
{amc$statement_identifier ...... = 064} 'STATEMENT_IDENTIFIER           ',
{............................... = 065} '                               ',
{amc$user_info ................. = 066} 'USER_INFORMATION               ',
{amc$vertical_print_density .... = 067} 'VERTICAL_PRINT_DENSITY         ',
{amc$compression_procedure_name  = 068} 'COMPRESSION_PROCEDURE_NAME     ',
{amc$dynamic_home_block_space .. = 069} 'DYNAMIC_HOME_BLOCK_SPACE       ',
{amc$hashing_procedure_name .... = 070} 'HASHING_PROCEDURE_NAME         ',
{amc$initial_home_block_count .. = 071} 'INITIAL_HOME_BLOCK_COUNT       ',
{amc$loading_factor ............ = 072} 'LOADING_FACTOR                 ',
{amc$lock_expiration_time ...... = 073} 'LOCK_EXPIRATION_TIME           ',
{amc$logging_options ........... = 074} 'LOGGING_OPTIONS                ',
{amc$log_residence ............. = 075} 'LOG_RESIDENCE                  ',
{............................... = xxx} '                               '];

?? OLDTITLE ??
MODEND amm$static_data;
