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