2429: Procedure copy_Comp_User_Attrs(p_src_comp_seq_id IN NUMBER,
2430: p_dest_comp_seq_id IN NUMBER,
2431: x_Return_Status OUT NOCOPY VARCHAR2)
2432: IS
2433: l_dest_pk_col_name_val_pairs EGO_COL_NAME_VALUE_PAIR_ARRAY;
2434: l_src_pk_col_name_val_pairs EGO_COL_NAME_VALUE_PAIR_ARRAY;
2435: l_new_str_type EGO_COL_NAME_VALUE_PAIR_ARRAY;
2436: l_bill_seq_id NUMBER;
2437: l_errorcode NUMBER;
2430: p_dest_comp_seq_id IN NUMBER,
2431: x_Return_Status OUT NOCOPY VARCHAR2)
2432: IS
2433: l_dest_pk_col_name_val_pairs EGO_COL_NAME_VALUE_PAIR_ARRAY;
2434: l_src_pk_col_name_val_pairs EGO_COL_NAME_VALUE_PAIR_ARRAY;
2435: l_new_str_type EGO_COL_NAME_VALUE_PAIR_ARRAY;
2436: l_bill_seq_id NUMBER;
2437: l_errorcode NUMBER;
2438: l_msg_data VARCHAR2(100);
2431: x_Return_Status OUT NOCOPY VARCHAR2)
2432: IS
2433: l_dest_pk_col_name_val_pairs EGO_COL_NAME_VALUE_PAIR_ARRAY;
2434: l_src_pk_col_name_val_pairs EGO_COL_NAME_VALUE_PAIR_ARRAY;
2435: l_new_str_type EGO_COL_NAME_VALUE_PAIR_ARRAY;
2436: l_bill_seq_id NUMBER;
2437: l_errorcode NUMBER;
2438: l_msg_data VARCHAR2(100);
2439: l_msg_count NUMBER := 0;
2440: --l_return_status VARCHAR2(1);
2441: l_str_type NUMBER;
2442: l_data_level_name_comp VARCHAR2(30) := 'COMPONENTS_LEVEL';
2443: l_data_level_id_comp NUMBER;
2444: l_old_dtlevel_col_value_pairs EGO_COL_NAME_VALUE_PAIR_ARRAY;
2445: l_new_dtlevel_col_value_pairs EGO_COL_NAME_VALUE_PAIR_ARRAY;
2446:
2447:
2448: Cursor get_bill_seq_id(p_comp_sequence_id Number)
2441: l_str_type NUMBER;
2442: l_data_level_name_comp VARCHAR2(30) := 'COMPONENTS_LEVEL';
2443: l_data_level_id_comp NUMBER;
2444: l_old_dtlevel_col_value_pairs EGO_COL_NAME_VALUE_PAIR_ARRAY;
2445: l_new_dtlevel_col_value_pairs EGO_COL_NAME_VALUE_PAIR_ARRAY;
2446:
2447:
2448: Cursor get_bill_seq_id(p_comp_sequence_id Number)
2449: IS
2476: FOR c_comp_level IN C_DATA_LEVEL(l_data_level_name_comp) LOOP
2477: l_data_level_id_comp := c_comp_level.DATA_LEVEL_ID;
2478: END LOOP;
2479:
2480: l_src_pk_col_name_val_pairs := EGO_COL_NAME_VALUE_PAIR_ARRAY(EGO_COL_NAME_VALUE_PAIR_OBJ( 'COMPONENT_SEQUENCE_ID' , to_char(p_src_comp_seq_id))
2481: ,EGO_COL_NAME_VALUE_PAIR_OBJ( 'BILL_SEQUENCE_ID' , to_char(l_bill_seq_id)) );
2482: l_dest_pk_col_name_val_pairs := EGO_COL_NAME_VALUE_PAIR_ARRAY(EGO_COL_NAME_VALUE_PAIR_OBJ( 'COMPONENT_SEQUENCE_ID' , to_char(p_dest_comp_seq_id)),
2483: EGO_COL_NAME_VALUE_PAIR_OBJ( 'BILL_SEQUENCE_ID' , to_char(l_bill_seq_id)) );
2484: l_new_str_type := EGO_COL_NAME_VALUE_PAIR_ARRAY(EGO_COL_NAME_VALUE_PAIR_OBJ( 'STRUCTURE_TYPE_ID', TO_CHAR(l_str_type)));
2478: END LOOP;
2479:
2480: l_src_pk_col_name_val_pairs := EGO_COL_NAME_VALUE_PAIR_ARRAY(EGO_COL_NAME_VALUE_PAIR_OBJ( 'COMPONENT_SEQUENCE_ID' , to_char(p_src_comp_seq_id))
2481: ,EGO_COL_NAME_VALUE_PAIR_OBJ( 'BILL_SEQUENCE_ID' , to_char(l_bill_seq_id)) );
2482: l_dest_pk_col_name_val_pairs := EGO_COL_NAME_VALUE_PAIR_ARRAY(EGO_COL_NAME_VALUE_PAIR_OBJ( 'COMPONENT_SEQUENCE_ID' , to_char(p_dest_comp_seq_id)),
2483: EGO_COL_NAME_VALUE_PAIR_OBJ( 'BILL_SEQUENCE_ID' , to_char(l_bill_seq_id)) );
2484: l_new_str_type := EGO_COL_NAME_VALUE_PAIR_ARRAY(EGO_COL_NAME_VALUE_PAIR_OBJ( 'STRUCTURE_TYPE_ID', TO_CHAR(l_str_type)));
2485: l_old_dtlevel_col_value_pairs := EGO_COL_NAME_VALUE_PAIR_ARRAY(EGO_COL_NAME_VALUE_PAIR_OBJ( 'CONTEXT_ID', ''));
2486: l_new_dtlevel_col_value_pairs := EGO_COL_NAME_VALUE_PAIR_ARRAY(EGO_COL_NAME_VALUE_PAIR_OBJ( 'CONTEXT_ID', ''));
2480: l_src_pk_col_name_val_pairs := EGO_COL_NAME_VALUE_PAIR_ARRAY(EGO_COL_NAME_VALUE_PAIR_OBJ( 'COMPONENT_SEQUENCE_ID' , to_char(p_src_comp_seq_id))
2481: ,EGO_COL_NAME_VALUE_PAIR_OBJ( 'BILL_SEQUENCE_ID' , to_char(l_bill_seq_id)) );
2482: l_dest_pk_col_name_val_pairs := EGO_COL_NAME_VALUE_PAIR_ARRAY(EGO_COL_NAME_VALUE_PAIR_OBJ( 'COMPONENT_SEQUENCE_ID' , to_char(p_dest_comp_seq_id)),
2483: EGO_COL_NAME_VALUE_PAIR_OBJ( 'BILL_SEQUENCE_ID' , to_char(l_bill_seq_id)) );
2484: l_new_str_type := EGO_COL_NAME_VALUE_PAIR_ARRAY(EGO_COL_NAME_VALUE_PAIR_OBJ( 'STRUCTURE_TYPE_ID', TO_CHAR(l_str_type)));
2485: l_old_dtlevel_col_value_pairs := EGO_COL_NAME_VALUE_PAIR_ARRAY(EGO_COL_NAME_VALUE_PAIR_OBJ( 'CONTEXT_ID', ''));
2486: l_new_dtlevel_col_value_pairs := EGO_COL_NAME_VALUE_PAIR_ARRAY(EGO_COL_NAME_VALUE_PAIR_OBJ( 'CONTEXT_ID', ''));
2487: /*
2488: EGO_USER_ATTRS_DATA_PUB.Copy_User_Attrs_Data(
2481: ,EGO_COL_NAME_VALUE_PAIR_OBJ( 'BILL_SEQUENCE_ID' , to_char(l_bill_seq_id)) );
2482: l_dest_pk_col_name_val_pairs := EGO_COL_NAME_VALUE_PAIR_ARRAY(EGO_COL_NAME_VALUE_PAIR_OBJ( 'COMPONENT_SEQUENCE_ID' , to_char(p_dest_comp_seq_id)),
2483: EGO_COL_NAME_VALUE_PAIR_OBJ( 'BILL_SEQUENCE_ID' , to_char(l_bill_seq_id)) );
2484: l_new_str_type := EGO_COL_NAME_VALUE_PAIR_ARRAY(EGO_COL_NAME_VALUE_PAIR_OBJ( 'STRUCTURE_TYPE_ID', TO_CHAR(l_str_type)));
2485: l_old_dtlevel_col_value_pairs := EGO_COL_NAME_VALUE_PAIR_ARRAY(EGO_COL_NAME_VALUE_PAIR_OBJ( 'CONTEXT_ID', ''));
2486: l_new_dtlevel_col_value_pairs := EGO_COL_NAME_VALUE_PAIR_ARRAY(EGO_COL_NAME_VALUE_PAIR_OBJ( 'CONTEXT_ID', ''));
2487: /*
2488: EGO_USER_ATTRS_DATA_PUB.Copy_User_Attrs_Data(
2489: p_api_version => 1.0
2482: l_dest_pk_col_name_val_pairs := EGO_COL_NAME_VALUE_PAIR_ARRAY(EGO_COL_NAME_VALUE_PAIR_OBJ( 'COMPONENT_SEQUENCE_ID' , to_char(p_dest_comp_seq_id)),
2483: EGO_COL_NAME_VALUE_PAIR_OBJ( 'BILL_SEQUENCE_ID' , to_char(l_bill_seq_id)) );
2484: l_new_str_type := EGO_COL_NAME_VALUE_PAIR_ARRAY(EGO_COL_NAME_VALUE_PAIR_OBJ( 'STRUCTURE_TYPE_ID', TO_CHAR(l_str_type)));
2485: l_old_dtlevel_col_value_pairs := EGO_COL_NAME_VALUE_PAIR_ARRAY(EGO_COL_NAME_VALUE_PAIR_OBJ( 'CONTEXT_ID', ''));
2486: l_new_dtlevel_col_value_pairs := EGO_COL_NAME_VALUE_PAIR_ARRAY(EGO_COL_NAME_VALUE_PAIR_OBJ( 'CONTEXT_ID', ''));
2487: /*
2488: EGO_USER_ATTRS_DATA_PUB.Copy_User_Attrs_Data(
2489: p_api_version => 1.0
2490: ,p_application_id => 702
3115: l_msg_count NUMBER;
3116: l_msg_data VARCHAR2(2000);
3117: l_failed_row_id_list VARCHAR2(2000);
3118:
3119: l_pk_column_name_value_pairs EGO_COL_NAME_VALUE_PAIR_ARRAY;
3120: l_class_code_name_value_pairs EGO_COL_NAME_VALUE_PAIR_ARRAY;
3121: l_data_level_values EGO_COL_NAME_VALUE_PAIR_ARRAY;
3122:
3123: l_object_name VARCHAR2(50);
3116: l_msg_data VARCHAR2(2000);
3117: l_failed_row_id_list VARCHAR2(2000);
3118:
3119: l_pk_column_name_value_pairs EGO_COL_NAME_VALUE_PAIR_ARRAY;
3120: l_class_code_name_value_pairs EGO_COL_NAME_VALUE_PAIR_ARRAY;
3121: l_data_level_values EGO_COL_NAME_VALUE_PAIR_ARRAY;
3122:
3123: l_object_name VARCHAR2(50);
3124: l_application_id NUMBER;
3117: l_failed_row_id_list VARCHAR2(2000);
3118:
3119: l_pk_column_name_value_pairs EGO_COL_NAME_VALUE_PAIR_ARRAY;
3120: l_class_code_name_value_pairs EGO_COL_NAME_VALUE_PAIR_ARRAY;
3121: l_data_level_values EGO_COL_NAME_VALUE_PAIR_ARRAY;
3122:
3123: l_object_name VARCHAR2(50);
3124: l_application_id NUMBER;
3125: l_additional_class_Code_list VARCHAR2(32000);
3146: IF p_object_name = 'BOM_STRUCTURE' THEN
3147: l_object_name := 'BOM_STRUCTURE';
3148: l_attribute_group_type := 'BOM_STRUCTUREMGMT_GROUP';
3149:
3150: l_pk_column_name_value_pairs := EGO_COL_NAME_VALUE_PAIR_ARRAY
3151: ( EGO_COL_NAME_VALUE_PAIR_OBJ('BILL_SEQUENCE_ID', p_bill_sequence_id));
3152:
3153: l_class_code_name_value_pairs := EGO_COL_NAME_VALUE_PAIR_ARRAY
3154: (EGO_COL_NAME_VALUE_PAIR_OBJ('STRUCTURE_TYPE_ID', p_structure_type_id));
3149:
3150: l_pk_column_name_value_pairs := EGO_COL_NAME_VALUE_PAIR_ARRAY
3151: ( EGO_COL_NAME_VALUE_PAIR_OBJ('BILL_SEQUENCE_ID', p_bill_sequence_id));
3152:
3153: l_class_code_name_value_pairs := EGO_COL_NAME_VALUE_PAIR_ARRAY
3154: (EGO_COL_NAME_VALUE_PAIR_OBJ('STRUCTURE_TYPE_ID', p_structure_type_id));
3155:
3156: ELSIF p_object_name = 'BOM_COMPONENTS' THEN
3157: l_object_name := 'BOM_COMPONENTS';
3155:
3156: ELSIF p_object_name = 'BOM_COMPONENTS' THEN
3157: l_object_name := 'BOM_COMPONENTS';
3158: l_attribute_group_type := 'BOM_COMPONENTMGMT_GROUP';
3159: l_pk_column_name_value_pairs := EGO_COL_NAME_VALUE_PAIR_ARRAY
3160: ( EGO_COL_NAME_VALUE_PAIR_OBJ('COMPONENT_SEQUENCE_ID', p_component_sequence_id)
3161: , EGO_COL_NAME_VALUE_PAIR_OBJ('BILL_SEQUENCE_ID', p_bill_sequence_id));
3162:
3163: l_class_code_name_value_pairs := EGO_COL_NAME_VALUE_PAIR_ARRAY
3159: l_pk_column_name_value_pairs := EGO_COL_NAME_VALUE_PAIR_ARRAY
3160: ( EGO_COL_NAME_VALUE_PAIR_OBJ('COMPONENT_SEQUENCE_ID', p_component_sequence_id)
3161: , EGO_COL_NAME_VALUE_PAIR_OBJ('BILL_SEQUENCE_ID', p_bill_sequence_id));
3162:
3163: l_class_code_name_value_pairs := EGO_COL_NAME_VALUE_PAIR_ARRAY
3164: (EGO_COL_NAME_VALUE_PAIR_OBJ('STRUCTURE_TYPE_ID', p_structure_type_id));
3165:
3166: --EMTAPIA: Start support for data levels in component udas
3167: l_data_level := 'COMPONENTS_LEVEL';