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