[Home] [Help]
42: l_change_order_type_id NUMBER;
43: l_application_id NUMBER;
44: l_attr_group_id_tbl FND_TABLE_OF_NUMBER;
45: l_pkdata EGO_COL_NAME_VALUE_PAIR_ARRAY;
46: l_uda_output_obj inv_ebi_eco_output_obj;
47: l_output_status inv_ebi_output_status;
48:
49: CURSOR c_attr_group_id IS
50:
54:
55: BEGIN
56: x_return_status := FND_API.g_ret_sts_success;
57: l_output_status := inv_ebi_output_status(fnd_api.g_ret_sts_success,NULL,NULL,NULL);
58: l_uda_output_obj := inv_ebi_eco_output_obj(NULL,NULL,NULL,NULL,l_output_status,NULL,NULL);
59:
60: IF(p_change_id IS NOT NULL ) THEN
61:
62: IF c_attr_group_id%ISOPEN THEN
157:
158: l_application_id NUMBER;
159: l_attr_group_id_tbl FND_TABLE_OF_NUMBER;
160: l_pkdata EGO_COL_NAME_VALUE_PAIR_ARRAY;
161: l_uda_output_obj inv_ebi_eco_output_obj;
162: l_output_status inv_ebi_output_status;
163: l_structure_type_id NUMBER;
164: l_bill_sequence_id NUMBER;
165:
186:
187: BEGIN
188: x_return_status := FND_API.g_ret_sts_success;
189: l_output_status := inv_ebi_output_status(fnd_api.g_ret_sts_success,NULL,NULL,NULL);
190: l_uda_output_obj := inv_ebi_eco_output_obj(NULL,NULL,NULL,NULL,l_output_status,NULL,NULL);
191:
192: IF( p_assembly_item_id IS NOT NULL AND
193: p_organization_id IS NOT NULL) THEN
194:
310: l_attr_group_count NUMBER :=0;
311: l_application_id NUMBER;
312: l_attr_group_id_tbl FND_TABLE_OF_NUMBER;
313: l_pkdata EGO_COL_NAME_VALUE_PAIR_ARRAY;
314: l_uda_output_obj inv_ebi_eco_output_obj;
315: l_output_status inv_ebi_output_status;
316: l_structure_type_id NUMBER;
317: l_bill_sequence_id NUMBER;
318: l_component_item_id NUMBER;
352:
353: BEGIN
354: x_return_status := FND_API.g_ret_sts_success;
355: l_output_status := inv_ebi_output_status(fnd_api.g_ret_sts_success,NULL,NULL,NULL);
356: l_uda_output_obj := inv_ebi_eco_output_obj(NULL,NULL,NULL,NULL,l_output_status,NULL,NULL);
357:
358: IF( p_revised_item_id IS NOT NULL AND
359: p_organization_id IS NOT NULL) THEN
360:
482: p_component_item IN inv_ebi_rev_comp_obj
483: ,p_from_sequence_id IN NUMBER
484: ,p_reference_org_id IN NUMBER
485: ,x_component_item OUT NOCOPY inv_ebi_rev_comp_obj
486: ,x_out OUT NOCOPY inv_ebi_eco_output_obj
487: ) IS
488:
489: CURSOR c_comp_sequence_id
490: IS
587: l_sub_comp_count NUMBER := 1;
588: l_output_status inv_ebi_output_status;
589: BEGIN
590: l_output_status := inv_ebi_output_status(fnd_api.g_ret_sts_success,NULL,NULL,NULL);
591: x_out := inv_ebi_eco_output_obj(NULL,NULL,NULL,NULL,l_output_status,NULL,NULL);
592: INV_EBI_UTIL.debug_line('STEP: 10 START INSIDE INV_EBI_CHANGE_ORDER_HELPER.prepare_substitute_components');
593: OPEN c_comp_sequence_id;
594: FETCH c_comp_sequence_id INTO l_component_sequence_id;
595: CLOSE c_comp_sequence_id;
760: p_component_item IN inv_ebi_rev_comp_obj
761: ,p_from_sequence_id IN NUMBER
762: ,p_reference_org_id IN NUMBER
763: ,x_component_item OUT NOCOPY inv_ebi_rev_comp_obj
764: ,x_out OUT NOCOPY inv_ebi_eco_output_obj
765: ) IS
766:
767: CURSOR c_comp_sequence_id
768: IS
855: l_output_status inv_ebi_output_status;
856:
857: BEGIN
858: l_output_status := inv_ebi_output_status(fnd_api.g_ret_sts_success,NULL,NULL,NULL);
859: x_out := inv_ebi_eco_output_obj(NULL,NULL,NULL,NULL,l_output_status,NULL,NULL);
860: INV_EBI_UTIL.debug_line('STEP: 10 START INSIDE INV_EBI_CHANGE_ORDER_HELPER.prepare_reference_designators');
861: OPEN c_comp_sequence_id;
862: FETCH c_comp_sequence_id INTO l_component_sequence_id;
863: CLOSE c_comp_sequence_id;
1025: ,p_view_scope IN VARCHAR2 := 'ALL'
1026: ,p_implementation_scope IN VARCHAR2 := 'ALL'
1027: ,p_as_of_date IN DATE
1028: ,x_revised_item OUT NOCOPY inv_ebi_revised_item_obj
1029: ,x_out OUT NOCOPY inv_ebi_eco_output_obj
1030: ) IS
1031: l_unit_assembly VARCHAR2(1);
1032: l_bom_item_type NUMBER;
1033: l_base_item_flag NUMBER;
1235: l_revised_comp_count NUMBER := 1;
1236: l_output_status inv_ebi_output_status;
1237: BEGIN
1238: l_output_status := inv_ebi_output_status(fnd_api.g_ret_sts_success,NULL,NULL,NULL);
1239: x_out := inv_ebi_eco_output_obj(NULL,NULL,NULL,NULL,l_output_status,NULL,NULL);
1240: INV_EBI_UTIL.debug_line('STEP: 10 START INSIDE INV_EBI_CHANGE_ORDER_HELPER.prepare_component_items');
1241: IF (bom_eamutil.enabled = 'Y'
1242: AND bom_eamutil.serial_effective_item (item_id => p_from_item_id,
1243: org_id => p_reference_org_id
1663: ************************************************************************************/
1664: PROCEDURE process_replicate_bom(
1665: p_eco_obj IN inv_ebi_eco_obj
1666: ,x_eco_obj OUT NOCOPY inv_ebi_eco_obj
1667: ,x_out OUT NOCOPY inv_ebi_eco_output_obj
1668: ) IS
1669: l_revised_item inv_ebi_revised_item_obj;
1670: l_revised_item1 inv_ebi_revised_item_obj;
1671: l_context_org_bom_exists VARCHAR2(1) := FND_API.g_false;
1694:
1695: BEGIN
1696: SAVEPOINT process_replicate_bom_save_pnt;
1697: l_output_status := inv_ebi_output_status(fnd_api.g_ret_sts_success,NULL,NULL,NULL);
1698: x_out := inv_ebi_eco_output_obj(NULL,NULL,NULL,NULL,l_output_status,NULL,NULL);
1699: INV_EBI_UTIL.debug_line('STEP: 10 START INSIDE INV_EBI_CHANGE_ORDER_HELPER.process_replicate_bom');
1700: l_context_org_code:= p_eco_obj.eco_change_order_type.organization_code;
1701: l_eco_obj := p_eco_obj;
1702:
1881: ,p_object_name IN VARCHAR2
1882: ,p_data_level IN VARCHAR2
1883: ,p_pk_column_name_value_pairs IN EGO_COL_NAME_VALUE_PAIR_ARRAY
1884: ,p_class_code_name_value_pairs IN EGO_COL_NAME_VALUE_PAIR_ARRAY
1885: ,x_uda_output_obj OUT NOCOPY inv_ebi_eco_output_obj
1886: )
1887: IS
1888: l_attributes_row_table ego_user_attr_row_table;
1889: l_attributes_data_table ego_user_attr_data_table;
1894: BEGIN
1895: SAVEPOINT inv_ebi_process_uda_save_pnt;
1896: l_uda_out := inv_ebi_uda_output_obj(NULL,NULL);
1897: l_output_status := inv_ebi_output_status(fnd_api.g_ret_sts_success,NULL,NULL,NULL);
1898: x_uda_output_obj := inv_ebi_eco_output_obj(NULL,NULL,NULL,NULL,l_output_status,NULL,l_uda_out);
1899:
1900: --To convert inv_ebi uda objects to ego uda compatible objects
1901: INV_EBI_UTIL.transform_uda (
1902: p_uda_input_obj => p_uda_input_obj
2007: ,p_alternate_bom_code IN VARCHAR2
2008: ,p_revised_item_name IN VARCHAR2
2009: ,p_component_tbl IN inv_ebi_rev_comp_tbl
2010: ,p_structure_header IN inv_ebi_structure_header_obj
2011: ,x_out OUT NOCOPY inv_ebi_eco_output_obj
2012: )IS
2013: l_pkdata ego_col_name_value_pair_array;
2014: l_pkcode ego_col_name_value_pair_array;
2015: l_bill_sequence_id NUMBER;
2029: SAVEPOINT inv_ebi_chg_order_uda_save_pnt;
2030:
2031: l_uda_out := inv_ebi_uda_output_obj(NULL,NULL);
2032: l_output_status := inv_ebi_output_status(fnd_api.g_ret_sts_success,NULL,NULL,NULL);
2033: x_out := inv_ebi_eco_output_obj(NULL,NULL,NULL,NULL,l_output_status,NULL,NULL);
2034:
2035: Error_Handler.initialize;
2036: IF(p_organization_code IS NOT NULL) THEN
2037:
2734: ,p_change_order IN inv_ebi_change_order_obj
2735: ,p_revision_type_tbl IN inv_ebi_eco_revision_tbl
2736: ,p_revised_item_type_tbl IN inv_ebi_revised_item_tbl
2737: ,p_name_val_list IN inv_ebi_name_value_list
2738: ,x_out OUT NOCOPY inv_ebi_eco_output_obj
2739: ) IS
2740: l_eco_rec ENG_ECO_PUB.eco_rec_type;
2741: l_eco_revision_tbl ENG_ECO_PUB.eco_revision_tbl_type;
2742: l_revised_item_tbl ENG_ECO_PUB.revised_item_tbl_type;
2787: SAVEPOINT inv_ebi_proc_eco_save_pnt;
2788: INV_EBI_UTIL.debug_line('STEP: 10 START INSIDE INV_EBI_CHANGE_ORDER_HELPER.process_eco');
2789:
2790: l_output_status := inv_ebi_output_status(fnd_api.g_ret_sts_success,NULL,NULL,NULL);
2791: x_out := inv_ebi_eco_output_obj(NULL,NULL,NULL,NULL,l_output_status,NULL,NULL);
2792:
2793: l_pk_col_name_val_pairs := INV_EBI_ITEM_HELPER.inv_ebi_name_value_pair_tbl();
2794: l_pk_col_name_val_pairs.EXTEND(1);
2795: l_pk_col_name_val_pairs(1).name := 'organization_code';
3838: p_assembly_item_name IN VARCHAR2,
3839: p_organization_code IN VARCHAR2,
3840: p_alternate_bom_code IN VARCHAR2,
3841: p_component_item_tbl IN inv_ebi_rev_comp_tbl,
3842: x_out OUT NOCOPY inv_ebi_eco_output_obj
3843: ) IS
3844: l_common_orgs inv_ebi_org_tbl;
3845: l_output_status inv_ebi_output_status;
3846: l_count NUMBER;
3846: l_count NUMBER;
3847: BEGIN
3848: SAVEPOINT inv_ebi_common_orgs_save_pnt;
3849: l_output_status := inv_ebi_output_status(fnd_api.g_ret_sts_success,NULL,NULL,NULL);
3850: x_out := inv_ebi_eco_output_obj(NULL,NULL,NULL,NULL,l_output_status,NULL,NULL);
3851: l_common_orgs := inv_ebi_org_tbl();
3852:
3853: --Get the list of orgs to which particular bom is commoned
3854: get_common_bom_orgs(
3942: ,p_alternate_bom_code IN VARCHAR2
3943: ,p_structure_header IN inv_ebi_structure_header_obj
3944: ,p_component_item_tbl IN inv_ebi_rev_comp_tbl
3945: ,p_name_val_list IN inv_ebi_name_value_list
3946: ,x_out OUT NOCOPY inv_ebi_eco_output_obj
3947: )
3948: IS
3949: l_bom_header_rec bom_bo_pub.bom_head_rec_type;
3950: l_bom_revision_tbl bom_bo_pub.bom_revision_tbl_type;
3958: BEGIN
3959: SAVEPOINT inv_ebi_proc_bom_save_pnt;
3960:
3961: l_output_status := inv_ebi_output_status(fnd_api.g_ret_sts_success,NULL,NULL,NULL);
3962: x_out := inv_ebi_eco_output_obj(NULL,NULL,NULL,NULL,l_output_status,NULL,NULL);
3963: INV_EBI_UTIL.debug_line('STEP: 10 START INSIDE INV_EBI_CHANGE_ORDER_HELPER.process_structure_header');
3964:
3965: l_is_bom_exists := is_bom_exists(
3966: p_item_number => p_assembly_item_name,