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