! ********************************************************************************************************************************
!  Created:  3-JAN-2006 15:37:15 by OpenVMS SDL EV1-31     
!  Source:   3-JAN-2006 15:37:15 CDD$ALPHA_72:[CODE]CDDTAGS.SDL;1 
! ********************************************************************************************************************************
 
!*** MODULE CDDTAGS IDENT V7.0-03590 ***
! ----------------------------------------------------------------------------
! 
!  Copyright Oracle Corporation 1988, 2004.  All Rights Reserved.
! 
! ----------------------------------------------------------------------------
! 
!   FACILITY:
! 
!       Oracle CDD Repository - NAD
! 
!   ABSTRACT:
! 
! 	This module defines tag values and constants used to build the 
! 	buffers that describe metadata to NAD.  These definitions are 
! 	public.
! 
! ------------------------------------------------------------------------------
! 
! ~
!    Longword tag values to distinguish the types of buffers.
! ~
literal cdd$k_metadata_buf_dsc = 2818049;
literal cdd$k_directory_info_dsc = 2818050;
literal cdd$k_dictionary_within_query = 2818051;
literal cdd$k_metadata_change = 2818052;
literal cdd$k_message_buf_dsc = 2818053;
literal cdd$k_protocol_definition = 2818054;
literal cdd$k_edit_string_dsc = 2818055;
literal cdd$k_text_buffer_dsc = 2818056;
literal cdd$k_validation_dsc = 2818057;
literal cdd$k_acl_dsc = 2818058;
literal cdd$k_version_buf_dsc = 2818059;
literal cdd$k_msgarg_buf_dsc = 2818060;
literal cdd$k_expression_buf_dsc = 2818146;
! +
!  the following are additional legal values for datatype subtype, but
!  are not stored as buffers
! -
!  Never change this!!! Must be same as VMS DSC$K_DTYPE_W;
literal cdd$k_dtype_smallint = 7;
!  Never change this!!! Must be same as VMS DSC$K_DTYPE_L;
literal cdd$k_dtype_longint = 8;
!  Never change this!!! Must be same as VMS DSC$K_DTYPE_B;
literal cdd$k_dtype_boolean = 6;
!  Never change this!!! Must be same as VMS DSC$K_DTYPE_ADT
literal cdd$k_dtype_vmstime = 35;
literal cdd$k_dtype_datetime = 2818147;
!  Never change this!!! Must be same as VMS DSC$K_DTYPE_F;
literal cdd$k_dtype_float = 10;
!  Never change this!!! Must be same as VMS DSC$K_DTYPE_D;
literal cdd$k_dtype_double = 27;
!  Never change this!!! Must be same as VMS DSC$K_DTYPE_T;
literal cdd$k_dtype_stringdsc = 14;
!  The following 2 should be the same, elmid should be replaced by Elementid
literal cdd$k_dtype_elementid = 2818149;
literal cdd$k_dtype_elmid = 2818149;
literal cdd$k_dtype_argspec = 2818150;
literal cdd$k_dtype_list = 2818151;
literal cdd$k_dtype_scan = 2818152;
literal cdd$k_dtype_string = 2818153;
literal cdd$k_dtype_notice = 2818155;
literal cdd$k_dtype_memblock = 2818156;
literal cdd$k_dtype_unspecified = 2818157;
literal cdd$k_dtr_field_tree_buffer = 9240577;
! ~
!    Metadata buffer tokens.
! ~
literal cdd$k_buf_low = 1;
literal cdd$k_begin = 1;
literal cdd$k_entity = 2;
literal cdd$k_attribute_list = 3;
literal cdd$k_attribute = 4;
literal cdd$k_attribute_protocol = 4;
literal cdd$k_end = 5;
literal cdd$k_relationship_list = 6;
literal cdd$k_relationship = 7;
literal cdd$k_eoc = 8;
!  missing
literal cdd$k_all_attributes = 10;
literal cdd$k_all = 11;
literal cdd$k_all_relationships = 12;
literal cdd$k_using = 13;
!  missing
literal cdd$k_directory_name = 15;
literal cdd$k_relationship_protocol = 16;
!  missing
literal cdd$k_entity_protocol = 18;
!  missing
literal cdd$k_literal = 20;
literal cdd$k_query = 21;
literal cdd$k_structure = 22;
literal cdd$k_member_list = 23;
!  <missing>
literal cdd$k_missing = 25;
literal cdd$k_not_valid = 26;
!  <missing>
!  <missing>
literal cdd$k_element_handle = 29;
literal cdd$k_type = 30;
literal cdd$k_start_element_hndl = 31;
literal cdd$k_within_exp = 32;
literal cdd$k_attribute_change = 33;
literal cdd$k_sub_object_change = 34;
literal cdd$k_attribute_modify = 35;
literal cdd$k_attribute_remove = 36;
literal cdd$k_remove_relationship = 37;
literal cdd$k_create_relationship = 38;
!  missing
!  missing
literal cdd$k_attributes_used = 41;
literal cdd$k_relationships_owned = 42;
literal cdd$k_relationship_members = 43;
literal cdd$k_required = 44;
literal cdd$k_ordering = 45;
literal cdd$k_message_list = 46;
literal cdd$k_message = 47;
!  missing
!  missing
!  missing
!  missing
literal cdd$k_no_owner_no_member = 53;
literal cdd$k_owning_relationship = 54;
literal cdd$k_owned_by_relationship = 55;
literal cdd$k_modify = 57;
literal cdd$k_define = 58;
literal cdd$k_delete = 59;
literal cdd$k_drop_attributes = 60;
literal cdd$k_drop_members = 61;
literal cdd$k_drop_relationships = 62;
literal cdd$k_optional = 63;
literal cdd$k_no_order = 64;
literal cdd$k_owned_by_relationship_all = 65;
literal cdd$k_owning_relationship_all = 66;
!  missing
!  missing
literal cdd$k_text_segment = 69;
literal cdd$k_validation_protocol = 70;
literal cdd$k_validations_used = 71;
literal cdd$k_drop_validations = 72;
literal cdd$k_validation_rule = 73;
literal cdd$k_validation_query = 74;
literal cdd$k_call_back = 75;
literal cdd$k_action = 76;
literal cdd$k_filename = 77;
literal cdd$k_routine_name = 78;
literal cdd$k_argument_list = 79;
literal cdd$k_argument = 80;
literal cdd$k_session_handle = 81;
literal cdd$k_entity_handle = 82;
literal cdd$k_value_list = 83;
literal cdd$k_op_low = 84;
literal cdd$k_relop_low = 84;
literal cdd$k_eql = 84;
literal cdd$k_neq = 85;
literal cdd$k_gtr = 86;
literal cdd$k_geq = 87;
literal cdd$k_lss = 88;
literal cdd$k_leq = 89;
literal cdd$k_relop_high = 89;
literal cdd$k_eql_one = 90;
literal cdd$k_not = 91;
literal cdd$k_and = 92;
literal cdd$k_or = 93;
literal cdd$k_xor = 94;
literal cdd$k_alphabetic = 95;
literal cdd$k_exists = 96;
literal cdd$k_unique = 97;
literal cdd$k_op_high = 97;
literal cdd$k_protocol_name = 99;
literal cdd$k_define_label = 100;
literal cdd$k_reference_label = 101;
literal cdd$k_no_member = 102;
literal cdd$k_element = 103;
literal cdd$k_directory_name_list = 104;
literal cdd$k_default_name = 105;
literal cdd$k_related_name = 106;
literal cdd$k_size = 107;
literal cdd$k_dictionary_type = 108;
literal cdd$k_cdd = 109;
literal cdd$k_nad = 110;
literal cdd$k_error = 111;
literal cdd$k_prior_version = 112;
literal cdd$k_next_version = 113;
literal cdd$k_first_version = 114;
literal cdd$k_last_version = 115;
literal cdd$k_ods_version_list = 116;
literal cdd$k_ods_name = 117;
literal cdd$k_ods_version = 118;
literal cdd$k_cddplus_version = 119;
literal cdd$k_protection = 120;
literal cdd$k_noprotection = 121;
literal cdd$k_msgarg = 122;
literal cdd$k_msgarg_name = 123;
literal cdd$k_msgarg_datatype = 124;
literal cdd$k_msgarg_accesstype = 125;
literal cdd$k_msgarg_end = 126;
literal cdd$k_owning_closure = 127;
literal cdd$k_owned_by_closure = 128;
literal cdd$k_message_value = 129;
literal cdd$k_directory_name_list1 = 130;
literal cdd$k_buf_high = 130;
! ~
!    These literals are ORed together to provide the action parameter 
!    for the NAD$CLEAR_MESSAGES call.
! ~
literal cdd$m_clear_local = 1;
literal cdd$m_clear_up = 2;
literal cdd$m_clear_down = 4;
! ~
!    These literals are used to provide the direction parameter
!    for the NAD$INTEGRATE_RDB_DATABASES call.
! ~
literal cdd$k_update_database = 1;
literal cdd$k_update_dictionary = 2;
! ~
!    Datatype values.  NAD attributes may have 'unstructured' values;
!    and they may not be asserted; and therefore 'missing'.  The 
!    following values are used just as dsc$k_dtype_xxx would be used.
! ~
literal cdd$k_dtype_unstructured = 1;
!  dsc$k_dtype_v;
!   
!   Control values for delete.
!       
literal cdd$k_all_children = 1;
literal cdd$k_current = 2;
!   
!   Control values for force_messages
!       
literal cdd$k_force_erase = 1;
literal cdd$k_force_modify = 2;
!   
!   Possible message actions as stored on the relationship.
! 
literal cdd$k_success = 1;
literal cdd$k_signal = 2;
literal cdd$k_block = 3;
!   
!   Message types as returned in the message buffer.
! 
literal cdd$k_msg_cleared = 0;
literal cdd$k_possibly_invalid = 1;
literal cdd$k_invalid = 26;
literal cdd$k_child_usage = 2;
literal cdd$k_related_to_invalid = 3;
literal cdd$k_msg_new_version = 4;
! ~
!    Longword tag values for entity types.
! ~
literal cdd$k_any = 0;
literal cdd$k_ent_any = 0;
literal cdd$k_rel_any = 0;
literal cdd$k_att_curr = 0;
!   
!   Lengths of buffer portions.
! 
literal cdd$k_tag_size = 4;
literal cdd$k_header_size = 13;
literal cdd$k_terminator_size = 1;
literal cdd$k_element_def_size = 13;
! 
!    Types of NAD access.
! 
!    Protection bit definitions.  These are applied to the value of the 
!    CDD$K_ATT_ACL attribute.
! 
!    These bits are the same as in Rdb/VMS and SHOULD NOT BE CHANGED!
! 
literal cdd$k_low_priv = 0;
literal cdd$k_read_priv = 0;
literal cdd$k_write_priv = 1;
literal cdd$k_modify_priv = 2;
literal cdd$k_erase_priv = 3;
literal cdd$k_show_priv = 4;
literal cdd$k_define_priv = 5;
literal cdd$k_change_priv = 6;
literal cdd$k_delete_priv = 7;
literal cdd$k_control_priv = 8;
literal cdd$k_oper_priv = 9;
literal cdd$k_admin_priv = 10;
literal cdd$k_max_priv = 10;
literal cdd$k_high_priv = 10;
literal cdd$m_read_priv = 1;
literal cdd$m_write_priv = 2;
literal cdd$m_modify_priv = 4;
literal cdd$m_erase_priv = 8;
literal cdd$m_show_priv = 16;
literal cdd$m_define_priv = 32;
literal cdd$m_change_priv = 64;
literal cdd$m_delete_priv = 128;
literal cdd$m_control_priv = 256;
literal cdd$m_oper_priv = 512;
literal cdd$m_admin_priv = 1024;
literal cdd$m_all_priv = 2047;
! 
!    Default protection type tags:
!    These tags describe the the type of default protection acl to build.
!    They are passed as a parameter to NAD$$BUILD_DEFAULT_ACL.
! 
literal cdd$k_user_protocol_acl = 0;
literal cdd$k_database_acl = 1;
literal cdd$k_system_protocol_acl = 2;
literal cdd$k_protocol_acl = 3;
literal cdd$k_user_acl = 4;
! 
!  Validation action tags
! 
literal cdd$k_warn = 0;
literal cdd$k_fail = 2;
! 
!  Validation apply tags
! 
literal cdd$k_str = 1;
literal cdd$k_mod = 2;
literal cdd$k_str_mod = 3;
literal cdd$k_del = 4;
literal cdd$k_str_del = 5;
literal cdd$k_mod_del = 6;
literal cdd$k_str_mod_del = 7;
literal cdd$k_val_new = 1;
literal cdd$k_val_setprop = 2;
literal cdd$k_val_free = 4;
literal cdd$k_val_reserve = 8;
literal cdd$k_val_replace = 16;
literal cdd$k_val_new_prot = 32;
literal cdd$k_val_setprop_prot = 64;
! 
!  Validation when tags
! 
literal cdd$k_val_start = 1;
literal cdd$k_val_end = 2;
! 
!  Validation interface tags (these tags are ORed with the when tags
!  to determine when to execute a validation
! 
literal cdd$k_val_ci = 4;
literal cdd$k_val_mcs = 8;
literal cdd$k_val_ci_mcs = 12;
! 
!  Verify/Fix flags
! 
literal cdd$k_vf_fix = 0;
literal cdd$m_vf_fix = 1;
literal cdd$k_vf_log = 1;
literal cdd$m_vf_log = 2;
literal cdd$k_vf_location = 2;
literal cdd$m_vf_location = 4;
literal cdd$k_vf_ext_ref = 3;
literal cdd$m_vf_ext_ref = 8;
literal cdd$k_vf_out_ref = 4;
literal cdd$m_vf_out_ref = 16;
literal cdd$k_vf_xdb_rel = 5;
literal cdd$m_vf_xdb_rel = 32;
literal cdd$k_vf_orphans = 6;
literal cdd$m_vf_orphans = 64;
literal cdd$k_vf_names = 7;
literal cdd$m_vf_names = 128;
literal cdd$k_vf_recovery = 8;
literal cdd$m_vf_recovery = 256;
literal cdd$k_vf_shrink = 9;
literal cdd$m_vf_shrink = 512;
literal cdd$k_vf_rebuild = 10;
literal cdd$m_vf_rebuild = 1024;
literal cdd$k_vf_size = 10;
literal cdd$m_vf_size = 1024;
! 
!  Delete dictionary flag.
! 
literal cdd$k_check = 0;
literal cdd$k_nocheck = 1;
! +
!    Edit string buffer word tokens.
! -
literal cdd$k_edit_str_alphabetic = 1;
literal cdd$k_edit_str_am_pm = 2;
literal cdd$k_edit_str_any_char = 3;
literal cdd$k_edit_str_comma = 4;
literal cdd$k_edit_str_day_number = 5;
literal cdd$k_edit_str_decimal_digit = 6;
literal cdd$k_edit_str_decimal_point = 7;
literal cdd$k_edit_str_encoded_minus = 8;
literal cdd$k_edit_str_encoded_plus = 9;
literal cdd$k_edit_str_encoded_sign = 10;
literal cdd$k_edit_str_exponent = 11;
literal cdd$k_edit_str_float_currency = 12;
literal cdd$k_edit_str_floating_minus = 13;
literal cdd$k_edit_str_floating_plus = 14;
literal cdd$k_edit_str_floating_sign = 15;
literal cdd$k_edit_str_float_blank_supr = 16;
literal cdd$k_edit_str_float_0_replace = 17;
literal cdd$k_edit_str_fraction_second = 18;
literal cdd$k_edit_str_hex_digit = 19;
literal cdd$k_edit_str_hour_12 = 20;
literal cdd$k_edit_str_hour_24 = 21;
literal cdd$k_edit_str_julian_digit = 22;
literal cdd$k_edit_str_literal = 23;
literal cdd$k_edit_str_logical_char = 24;
literal cdd$k_edit_str_long_text = 25;
literal cdd$k_edit_str_lowercase = 26;
literal cdd$k_edit_str_minus_literal = 27;
literal cdd$k_edit_str_minus_paren = 28;
literal cdd$k_edit_str_minute = 29;
literal cdd$k_edit_str_missng_separator = 30;
literal cdd$k_edit_str_month_name = 31;
literal cdd$k_edit_str_month_number = 32;
literal cdd$k_edit_str_octal_digit = 33;
literal cdd$k_edit_str_repeator = 34;
literal cdd$k_edit_str_repeat_count = 35;
literal cdd$k_edit_str_second = 36;
literal cdd$k_edit_str_uppercase = 37;
literal cdd$k_edit_str_weekday_name = 38;
literal cdd$k_edit_str_year = 39;
literal cdd$k_edit_str_literal_brackets = 40;
! +
!  J-CDD$I18N/A : add cdd$k_edit_str_literal_brackets
! 
!                               <note>
!       Do NOT write commnet at end of line. *.R32 will be searched
!       for another purpose. Then "!" can not be parsed.
! -
literal cdd$k_edit_str_end = 0;
literal cdd$k_edit_str_min = 1;
literal cdd$k_edit_str_max = 40;
! +
!   J-CDD$I18N/A : Character_set ID/Based on DEC STD 169
! -
literal cdd$k_charset_dec_mcs = 0;
literal cdd$k_charset_dec_kanji = 96;
literal cdd$k_charset_dec_hanzi = 97;
literal cdd$k_charset_dec_korean = 98;
literal cdd$k_charset_dec_hanyu = 99;
literal cdd$k_charset_dec_sicgcc = 100;
! +
!    Expression buffer word tokens.
! -
literal cdd$k_exp_low = 0;
literal cdd$k_exp_end = 0;
literal cdd$k_exp_abs = 1;
literal cdd$k_exp_add = 2;
literal cdd$k_exp_all = 3;
literal cdd$k_exp_and = 4;
literal cdd$k_exp_any = 5;
literal cdd$k_exp_ascending = 6;
literal cdd$k_exp_ask = 7;
literal cdd$k_exp_asl = 8;
literal cdd$k_exp_asr = 9;
literal cdd$k_exp_as2 = 10;
literal cdd$k_exp_avg = 11;
literal cdd$k_exp_boolean = 12;
literal cdd$k_exp_collection = 13;
literal cdd$k_exp_con = 14;
literal cdd$k_exp_cond = 15;
literal cdd$k_exp_context = 16;
literal cdd$k_exp_cot = 17;
literal cdd$k_exp_count = 18;
literal cdd$k_exp_co2 = 19;
literal cdd$k_exp_co3 = 20;
literal cdd$k_exp_dbkey = 21;
literal cdd$k_exp_descending = 22;
literal cdd$k_exp_div = 23;
literal cdd$k_exp_domain = 24;
literal cdd$k_exp_element_name = 25;
literal cdd$k_exp_else = 26;
literal cdd$k_exp_eql = 27;
literal cdd$k_exp_exp = 28;
literal cdd$k_exp_fac = 29;
literal cdd$k_exp_field = 30;
literal cdd$k_exp_first = 31;
literal cdd$k_exp_from = 32;
literal cdd$k_exp_function = 33;
literal cdd$k_exp_function_file = 34;
literal cdd$k_exp_function_name = 35;
literal cdd$k_exp_geq = 36;
literal cdd$k_exp_gtr = 37;
literal cdd$k_exp_if = 38;
literal cdd$k_exp_int = 39;
literal cdd$k_exp_leq = 40;
literal cdd$k_exp_list = 41;
literal cdd$k_exp_literal = 42;
literal cdd$k_exp_lss = 43;
literal cdd$k_exp_matches = 44;
literal cdd$k_exp_max = 45;
literal cdd$k_exp_min = 46;
literal cdd$k_exp_mis = 47;
literal cdd$k_exp_mod = 48;
literal cdd$k_exp_mul = 49;
literal cdd$k_exp_neg = 50;
literal cdd$k_exp_neq = 51;
literal cdd$k_exp_not = 52;
literal cdd$k_exp_ones_cmp = 53;
literal cdd$k_exp_or = 54;
literal cdd$k_exp_rct = 55;
literal cdd$k_exp_record = 56;
literal cdd$k_exp_reduce = 57;
literal cdd$k_exp_relation = 58;
literal cdd$k_exp_relation_id = 59;
literal cdd$k_exp_rse = 60;
literal cdd$k_exp_rnd = 61;
literal cdd$k_exp_rtt = 62;
literal cdd$k_exp_sdv = 63;
literal cdd$k_exp_sgn = 64;
literal cdd$k_exp_sort = 65;
literal cdd$k_exp_sqrt = 66;
literal cdd$k_exp_stw = 67;
literal cdd$k_exp_sub = 68;
literal cdd$k_exp_table = 69;
literal cdd$k_exp_then = 70;
literal cdd$k_exp_ttl = 71;
literal cdd$k_exp_unq = 72;
literal cdd$k_exp_via = 73;
literal cdd$k_exp_xor = 74;
literal cdd$k_exp_field_segment = 75;
literal cdd$k_exp_cross = 76;
literal cdd$k_exp_edit_str = 77;
literal cdd$k_exp_format = 78;
literal cdd$k_exp_over = 79;
literal cdd$k_exp_table_name = 80;
literal cdd$k_exp_vtb = 81;
literal cdd$k_exp_element_id = 82;
literal cdd$k_exp_substring = 83;
literal cdd$k_exp_variable = 84;
literal cdd$k_exp_agg_count = 85;
literal cdd$k_exp_agg_average = 86;
literal cdd$k_exp_agg_max = 87;
literal cdd$k_exp_agg_min = 88;
literal cdd$k_exp_agg_total = 89;
literal cdd$k_exp_project = 90;
literal cdd$k_exp_group_value = 91;
literal cdd$k_exp_merge = 92;
literal cdd$k_exp_aggregate = 93;
literal cdd$k_exp_group_by = 94;
literal cdd$k_exp_map = 95;
literal cdd$k_exp_map_field = 96;
literal cdd$k_exp_between = 97;
literal cdd$k_exp_array_subscript = 98;
literal cdd$k_exp_member = 99;
literal cdd$k_exp_owner = 100;
literal cdd$k_exp_within = 101;
literal cdd$k_exp_set_name = 102;
literal cdd$k_exp_array_subscript_list = 103;
literal cdd$k_exp_case_sensitive = 104;
literal cdd$k_exp_alphabetic = 105;
literal cdd$k_exp_alphabetic_lower = 106;
literal cdd$k_exp_alphabetic_upper = 107;
literal cdd$k_exp_empty_field = 108;
literal cdd$k_exp_full_field = 109;
literal cdd$k_exp_numeric = 110;
literal cdd$k_exp_user = 111;
literal cdd$k_exp_otherwise = 112;
literal cdd$k_exp_control_bits = 113;
literal cdd$k_exp_null = 114;
literal cdd$k_exp_any2 = 115;
literal cdd$k_exp_like = 116;
literal cdd$k_exp_rdb_all = 117;
literal cdd$k_exp_timestamp = 118;
literal cdd$k_exp_substring2 = 119;
literal cdd$k_exp_foreign_con = 120;
literal cdd$k_exp_foreign_ref = 121;
literal cdd$k_exp_primary_con = 122;
literal cdd$k_exp_unique_con = 123;
literal cdd$k_exp_not_null_con = 124;
literal cdd$k_exp_current_time = 125;
literal cdd$k_exp_current_date = 126;
literal cdd$k_exp_substring3 = 127;
literal cdd$k_exp_translate_lower = 128;
literal cdd$k_exp_translate_upper = 129;
literal cdd$k_exp_translate = 130;
literal cdd$k_exp_cast = 131;
literal cdd$k_exp_extract = 132;
literal cdd$k_exp_octet_length = 133;
literal cdd$k_exp_character_length = 134;
literal cdd$k_exp_current_user = 135;
literal cdd$k_exp_session_user = 136;
literal cdd$k_exp_system_user = 137;
literal cdd$k_exp_translation_name = 138;
literal cdd$k_exp_extract_year = 139;
literal cdd$k_exp_extract_month = 140;
literal cdd$k_exp_extract_day = 141;
literal cdd$k_exp_extract_hour = 142;
literal cdd$k_exp_extract_minute = 143;
literal cdd$k_exp_extract_second = 144;
literal cdd$k_exp_extract_weekday = 145;
literal cdd$k_exp_extract_julian = 146;
literal cdd$k_exp_cast_datatype = 147;
literal cdd$k_exp_cast_field_name = 148;
literal cdd$k_exp_descriptor = 149;
literal cdd$k_exp_trim = 150;
literal cdd$k_exp_trim_both = 151;
literal cdd$k_exp_trim_leading = 152;
literal cdd$k_exp_trim_trailing = 153;
literal cdd$k_exp_trim_char_expression = 154;
literal cdd$k_exp_position = 155;
literal cdd$k_exp_position_from_exp = 156;
literal cdd$k_exp_external_literal = 157;
literal cdd$k_exp_case = 158;
literal cdd$k_exp_when = 159;
literal cdd$k_exp_high = 159;