[Home] [Help]
18: l_output_status inv_ebi_output_status;
19: BEGIN
20: l_output_status := inv_ebi_output_status(fnd_api.g_ret_sts_success,NULL,NULL,NULL);
21: x_out := inv_ebi_item_output_obj(NULL,NULL,NULL,NULL,l_output_status,NULL,NULL,NULL,NULL,NULL,NULL);
22: INV_EBI_UTIL.debug_line('STEP 10: START INSIDE INV_EBI_CHANGE_ORDER_PUB.populate_item_attributes');
23: IF(p_revised_item.item IS NOT NULL ) THEN
24: x_item := p_revised_item.item;
25: ELSE
26: l_main_item_obj := inv_ebi_item_main_obj(fnd_api.g_miss_num,fnd_api.g_miss_char,
71: NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL);
72: END IF;
73: IF(x_item.main_obj_type.item_number IS NULL OR x_item.main_obj_type.item_number = fnd_api.g_miss_char )THEN
74: x_item.main_obj_type.item_number := p_revised_item.revised_item_name;
75: INV_EBI_UTIL.debug_line('STEP 20: ITEM NUMBER: '|| x_item.main_obj_type.item_number);
76: END IF;
77: IF(x_item.main_obj_type.organization_id IS NULL OR x_item.main_obj_type.organization_id = fnd_api.g_miss_num )THEN
78: IF((p_change_order_obj.organization_id IS NULL
79: OR p_change_order_obj.organization_id = fnd_api.g_miss_num)
86: x_item.main_obj_type.organization_id := INV_EBI_ITEM_HELPER.value_to_id(
87: p_pk_col_name_val_pairs => l_pk_col_name_val_pairs
88: ,p_entity_name => INV_EBI_ITEM_HELPER.G_ORGANIZATION
89: );
90: INV_EBI_UTIL.debug_line('STEP 30: ORG ID: '|| x_item.main_obj_type.organization_id);
91: l_pk_col_name_val_pairs.TRIM(1);
92: IF (x_item.main_obj_type.organization_id IS NULL) THEN
93: FND_MESSAGE.set_name('INV','INV_EBI_ORG_CODE_INVALID');
94: FND_MESSAGE.set_token('COL_VALUE', p_change_order_obj.organization_code);
102:
103: IF(x_item.main_obj_type.init_msg_list IS NULL OR x_item.main_obj_type.init_msg_list = fnd_api.g_miss_char )THEN
104: x_item.main_obj_type.init_msg_list := FND_API.G_TRUE;
105: END IF;
106: INV_EBI_UTIL.debug_line('STEP 40: END INSIDE INV_EBI_CHANGE_ORDER_PUB.populate_item_attributes STATUS: '||x_out.output_status.return_status);
107: EXCEPTION
108: WHEN FND_API.g_exc_error THEN
109: x_out.output_status.return_status := FND_API.g_ret_sts_error;
110: IF(x_out.output_status.msg_data IS NULL) THEN
145: l_pk_col_name_val_pairs INV_EBI_ITEM_HELPER.inv_ebi_name_value_pair_tbl;
146:
147: BEGIN
148: SAVEPOINT inv_ebi_engg_item_save_pnt;
149: INV_EBI_UTIL.debug_line('STEP 10: START INSIDE INV_EBI_CHANGE_ORDER_PUB.transfer_engg_item_mfg');
150: l_output_status := inv_ebi_output_status(fnd_api.g_ret_sts_success,NULL,NULL,NULL);
151: x_out := inv_ebi_eco_output_obj(NULL,NULL,NULL,NULL,l_output_status,NULL,NULL);
152:
153: IF(p_item.main_obj_type.inventory_item_id IS NULL OR
158: l_pk_col_name_val_pairs(1).name := 'concatenated_segments';
159: l_pk_col_name_val_pairs(1).value := p_item.main_obj_type.item_number;
160: l_pk_col_name_val_pairs(2).name := 'organization_id';
161: l_pk_col_name_val_pairs(2).value := p_item.main_obj_type.organization_id;
162: INV_EBI_UTIL.debug_line('STEP 20: ITEM NUMBER: '|| p_item.main_obj_type.item_number || ' ORG ID: '|| p_item.main_obj_type.organization_id);
163: l_inventory_item_id := INV_EBI_ITEM_HELPER.value_to_id(
164: p_pk_col_name_val_pairs => l_pk_col_name_val_pairs
165: ,p_entity_name => INV_EBI_ITEM_HELPER.G_INVENTORY_ITEM
166: );
163: l_inventory_item_id := INV_EBI_ITEM_HELPER.value_to_id(
164: p_pk_col_name_val_pairs => l_pk_col_name_val_pairs
165: ,p_entity_name => INV_EBI_ITEM_HELPER.G_INVENTORY_ITEM
166: );
167: INV_EBI_UTIL.debug_line('STEP 30: INV ITEM ID '|| l_inventory_item_id);
168: l_pk_col_name_val_pairs.TRIM(2);
169: IF (l_inventory_item_id IS NULL ) THEN
170: FND_MESSAGE.set_name('INV','INV_EBI_ITEM_INVALID');
171: FND_MESSAGE.set_token('COL_VALUE', p_item.main_obj_type.item_number);
219: ELSE
220: l_designator_option := 3;
221: l_alt_bom_designator := p_alt_bom_designator;
222: END IF;
223: INV_EBI_UTIL.debug_line('STEP 40: BEFORE CALLING ENG_BOM_RTG_TRANSFER_PKG.eng_bom_rtg_transfer');
224: ENG_BOM_RTG_TRANSFER_PKG.eng_bom_rtg_transfer(
225: x_org_id => p_item.main_obj_type.organization_id,
226: x_eng_item_id => l_inventory_item_id,
227: x_mfg_item_id => l_inventory_item_id,
261: x_implemented_only => NULL,
262: x_commit => FALSE
263: );
264: END IF;
265: INV_EBI_UTIL.debug_line('STEP 50: AFTER CALLING ENG_BOM_RTG_TRANSFER_PKG.eng_bom_rtg_transfer');
266: END IF;
267: INV_EBI_UTIL.debug_line('STEP 60: END INSIDE INV_EBI_CHANGE_ORDER_PUB.transfer_engg_item_mfg STATUS: '|| x_out.output_status.return_status);
268: EXCEPTION
269: WHEN FND_API.g_exc_unexpected_error THEN
263: );
264: END IF;
265: INV_EBI_UTIL.debug_line('STEP 50: AFTER CALLING ENG_BOM_RTG_TRANSFER_PKG.eng_bom_rtg_transfer');
266: END IF;
267: INV_EBI_UTIL.debug_line('STEP 60: END INSIDE INV_EBI_CHANGE_ORDER_PUB.transfer_engg_item_mfg STATUS: '|| x_out.output_status.return_status);
268: EXCEPTION
269: WHEN FND_API.g_exc_unexpected_error THEN
270: ROLLBACK TO inv_ebi_engg_item_save_pnt;
271: x_out.output_status.return_status := FND_API.g_ret_sts_unexp_error;
321: l_output_status inv_ebi_output_status;
322: BEGIN
323: l_output_status := inv_ebi_output_status(fnd_api.g_ret_sts_success,NULL,NULL,NULL);
324: x_out := inv_ebi_eco_output_obj(NULL,NULL,NULL,NULL,l_output_status,NULL,NULL);
325: INV_EBI_UTIL.debug_line('STEP 10: START INSIDE INV_EBI_CHANGE_ORDER_PUB.validate_component_items ORG CODE: '|| p_organization_code);
326: l_pk_col_name_val_pairs := INV_EBI_ITEM_HELPER.inv_ebi_name_value_pair_tbl();
327: l_pk_col_name_val_pairs.EXTEND(1);
328: l_pk_col_name_val_pairs(1).name := 'organization_code';
329: l_pk_col_name_val_pairs(1).value := p_organization_code;
330: l_organization_id := INV_EBI_ITEM_HELPER.value_to_id(
331: p_pk_col_name_val_pairs => l_pk_col_name_val_pairs
332: ,p_entity_name => INV_EBI_ITEM_HELPER.G_ORGANIZATION
333: );
334: INV_EBI_UTIL.debug_line('STEP 20: ORG ID: '|| l_organization_id);
335: IF (l_organization_id IS NULL) THEN
336: FND_MESSAGE.set_name('INV','INV_EBI_ORG_CODE_INVALID');
337: FND_MESSAGE.set_token('COL_VALUE',p_organization_code);
338: FND_MSG_PUB.add;
337: FND_MESSAGE.set_token('COL_VALUE',p_organization_code);
338: FND_MSG_PUB.add;
339: RAISE FND_API.g_exc_error;
340: END IF;
341: l_is_master_org := INV_EBI_UTIL.is_master_org(l_organization_id);
342: IF(p_component_item_tbl IS NOT NULL AND p_component_item_tbl.COUNT > 0) THEN
343: FOR i IN 1.. p_component_item_tbl.COUNT LOOP
344: IF(p_component_item_tbl(i).transaction_type = INV_EBI_ITEM_PUB.g_otype_create ) THEN
345: l_component_item_name := p_component_item_tbl(i).component_item_name;
342: IF(p_component_item_tbl IS NOT NULL AND p_component_item_tbl.COUNT > 0) THEN
343: FOR i IN 1.. p_component_item_tbl.COUNT LOOP
344: IF(p_component_item_tbl(i).transaction_type = INV_EBI_ITEM_PUB.g_otype_create ) THEN
345: l_component_item_name := p_component_item_tbl(i).component_item_name;
346: INV_EBI_UTIL.debug_line('STEP 30: COMP ITEM NAME: '|| l_component_item_name);
347: l_is_component_item_exists := INV_EBI_ITEM_HELPER.is_item_exists(
348: p_organization_id => l_organization_id
349: ,p_item_number => l_component_item_name
350: );
356: END IF;
357: END IF;
358: END LOOP;
359: END IF;
360: INV_EBI_UTIL.debug_line('STEP 40: END INSIDE INV_EBI_CHANGE_ORDER_PUB.validate_component_items STATUS: '|| x_out.output_status.return_status);
361: EXCEPTION
362: WHEN FND_API.g_exc_error THEN
363: x_out.output_status.return_status := FND_API.g_ret_sts_error;
364: IF(x_out.output_status.msg_data IS NULL) THEN
395: l_pk_col_name_val_pairs INV_EBI_ITEM_HELPER.inv_ebi_name_value_pair_tbl;
396: l_item_output inv_ebi_item_output_obj;
397:
398: BEGIN
399: INV_EBI_UTIL.debug_line('STEP 10: START INSIDE INV_EBI_CHANGE_ORDER_PUB.validate_item');
400: INV_EBI_UTIL.debug_line('STEP 20: ITEM NUMBER TO VALIDATE : '|| p_item.main_obj_type.item_number ||
401: ' ORGANIZATION ID : '|| p_item.main_obj_type.organization_id);
402: l_output_status := inv_ebi_output_status(fnd_api.g_ret_sts_success,NULL,NULL,NULL);
403: x_out := inv_ebi_item_output_obj(NULL,NULL,NULL,NULL,l_output_status,NULL,NULL,NULL,NULL,NULL,NULL);
396: l_item_output inv_ebi_item_output_obj;
397:
398: BEGIN
399: INV_EBI_UTIL.debug_line('STEP 10: START INSIDE INV_EBI_CHANGE_ORDER_PUB.validate_item');
400: INV_EBI_UTIL.debug_line('STEP 20: ITEM NUMBER TO VALIDATE : '|| p_item.main_obj_type.item_number ||
401: ' ORGANIZATION ID : '|| p_item.main_obj_type.organization_id);
402: l_output_status := inv_ebi_output_status(fnd_api.g_ret_sts_success,NULL,NULL,NULL);
403: x_out := inv_ebi_item_output_obj(NULL,NULL,NULL,NULL,l_output_status,NULL,NULL,NULL,NULL,NULL,NULL);
404: l_pk_col_name_val_pairs := INV_EBI_ITEM_HELPER.inv_ebi_name_value_pair_tbl();
413: we should error out */
414:
415: IF(p_item.main_obj_type.organization_id IS NOT NULL AND p_item.main_obj_type.organization_id <> FND_API.g_miss_num) THEN
416:
417: IF(INV_EBI_UTIL.is_master_org(
418: p_organization_id => p_item.main_obj_type.organization_id
419: ) = FND_API.g_true) THEN
420:
421: IF( p_item.main_obj_type.item_catalog_group_id IS NOT NULL
454: END IF;
455: END IF;
456: END IF;
457: END IF; --End of Bug 8299853
458: INV_EBI_UTIL.debug_line('STEP 30: BEFORE CALLING INV_EBI_ITEM_PUB.validate_item');
459: INV_EBI_ITEM_PUB.validate_item (
460: p_transaction_type => l_transaction_type
461: ,p_item => p_item
462: ,x_out => l_item_output
460: p_transaction_type => l_transaction_type
461: ,p_item => p_item
462: ,x_out => l_item_output
463: ) ;
464: INV_EBI_UTIL.debug_line('STEP 40: AFTER CALLING INV_EBI_ITEM_PUB.validate_item RETURN STATUS: '|| l_item_output.output_status.return_status);
465: IF(l_item_output.output_status.return_status <> FND_API.g_ret_sts_success) THEN
466: RAISE FND_API.g_exc_unexpected_error;
467: END IF;
468: END IF;
465: IF(l_item_output.output_status.return_status <> FND_API.g_ret_sts_success) THEN
466: RAISE FND_API.g_exc_unexpected_error;
467: END IF;
468: END IF;
469: INV_EBI_UTIL.debug_line('STEP 50: END CALLING INV_EBI_CHANGE_ORDER_PUB.validate_item RETURN STATUS: '|| x_out.output_status.return_status);
470: EXCEPTION
471: WHEN FND_API.g_exc_unexpected_error THEN
472: x_out.output_status.return_status := FND_API.g_ret_sts_unexp_error;
473: IF(x_out.output_status.msg_data IS NULL) THEN
510: l_revised_item_type_tbl inv_ebi_revitem_output_obj_tbl;
511: l_ouid NUMBER;
512: l_operating_unit VARCHAR2(240);
513: BEGIN
514: INV_EBI_UTIL.debug_line('STEP 10: START INSIDE INV_EBI_CHANGE_ORDER_PUB.populate_revised_items_out');
515: INV_EBI_UTIL.debug_line('STEP 20: ECO: '|| p_change_order.eco_name || ' ORG CODE: '|| p_change_order.organization_code);
516: l_pk_col_name_val_pairs := INV_EBI_ITEM_HELPER.inv_ebi_name_value_pair_tbl();
517: l_revised_item_type_tbl := inv_ebi_revitem_output_obj_tbl();
518: l_pk_col_name_val_pairs.EXTEND(1);
511: l_ouid NUMBER;
512: l_operating_unit VARCHAR2(240);
513: BEGIN
514: INV_EBI_UTIL.debug_line('STEP 10: START INSIDE INV_EBI_CHANGE_ORDER_PUB.populate_revised_items_out');
515: INV_EBI_UTIL.debug_line('STEP 20: ECO: '|| p_change_order.eco_name || ' ORG CODE: '|| p_change_order.organization_code);
516: l_pk_col_name_val_pairs := INV_EBI_ITEM_HELPER.inv_ebi_name_value_pair_tbl();
517: l_revised_item_type_tbl := inv_ebi_revitem_output_obj_tbl();
518: l_pk_col_name_val_pairs.EXTEND(1);
519: l_pk_col_name_val_pairs(1).name := 'organization_code';
523: p_pk_col_name_val_pairs => l_pk_col_name_val_pairs
524: ,p_entity_name => INV_EBI_ITEM_HELPER.G_ORGANIZATION
525: );
526: l_pk_col_name_val_pairs.TRIM(1);
527: INV_EBI_UTIL.debug_line('STEP 30: BEFORE CALLING INV_EBI_ITEM_HELPER.get_Operating_unit ORG ID: '|| l_organization_id);
528: INV_EBI_ITEM_HELPER.get_Operating_unit
529: (p_oranization_id => l_organization_id
530: ,x_operating_unit => l_operating_unit
531: ,x_ouid => l_ouid
529: (p_oranization_id => l_organization_id
530: ,x_operating_unit => l_operating_unit
531: ,x_ouid => l_ouid
532: );
533: INV_EBI_UTIL.debug_line('STEP 40: AFTER CALLING INV_EBI_ITEM_HELPER.get_Operating_unit OPERATING UNIT: '|| l_operating_unit);
534: IF(p_revised_item_type_tbl IS NOT NULL AND p_revised_item_type_tbl.COUNT > 0) THEN
535: FOR i IN 1..p_revised_item_type_tbl.COUNT
536: LOOP
537: l_revised_item_type_tbl.extend();
581: END IF;
582: END LOOP;
583: END IF;
584: x_revised_item_type_tbl := l_revised_item_type_tbl;
585: INV_EBI_UTIL.debug_line('STEP 50: END INSIDE INV_EBI_CHANGE_ORDER_PUB.populate_revised_items_out');
586: END populate_revised_items_out;
587:
588: /************************************************************************************
589: -- API name : get_eco
610: l_revised_item_tbl inv_ebi_revised_item_tbl;
611: l_revised_item_obj inv_ebi_revised_item_obj;
612: l_only_status_info VARCHAR2(1):= fnd_api.g_false;
613: BEGIN
614: INV_EBI_UTIL.debug_line('STEP 10: START INSIDE INV_EBI_CHANGE_ORDER_PUB.get_eco ');
615: INV_EBI_UTIL.debug_line('STEP 20: CHANGE ID: '|| p_change_id);
616: x_return_status := FND_API.G_RET_STS_SUCCESS;
617: l_eco_change_order_obj := inv_ebi_change_order_obj(
618: NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL
611: l_revised_item_obj inv_ebi_revised_item_obj;
612: l_only_status_info VARCHAR2(1):= fnd_api.g_false;
613: BEGIN
614: INV_EBI_UTIL.debug_line('STEP 10: START INSIDE INV_EBI_CHANGE_ORDER_PUB.get_eco ');
615: INV_EBI_UTIL.debug_line('STEP 20: CHANGE ID: '|| p_change_id);
616: x_return_status := FND_API.G_RET_STS_SUCCESS;
617: l_eco_change_order_obj := inv_ebi_change_order_obj(
618: NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL
619: ,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL
635: ,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL
636: ,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL
637: ,NULL,NULL,NULL,NULL
638: );
639: INV_EBI_UTIL.debug_line('STEP 30: BEFORE CALLING INV_EBI_CHANGE_ORDER_HELPER.get_eco');
640: INV_EBI_CHANGE_ORDER_HELPER.get_eco (
641: p_change_id => p_change_id
642: ,p_last_update_status => p_last_update_status
643: ,p_revised_item_sequence_id => p_revised_item_sequence_id
646: ,x_return_status => l_return_status
647: ,x_msg_count => l_msg_count
648: ,x_msg_data => l_msg_data
649: );
650: INV_EBI_UTIL.debug_line('STEP 40: END CALLING INV_EBI_CHANGE_ORDER_HELPER.get_eco RETURN STATUS: '||l_return_status);
651: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
652: RAISE FND_API.g_exc_unexpected_error;
653: END IF;
654: IF p_name_val_list.name_value_table IS NOT NULL THEN
671: x_eco_obj := inv_ebi_eco_obj(l_eco_change_order_obj,NULL,l_revised_item_tbl,NULL);
672: ELSE
673: x_eco_obj := l_eco_obj;
674: END IF;
675: INV_EBI_UTIL.debug_line('STEP 50: END INSIDE INV_EBI_CHANGE_ORDER_PUB.get_eco STATUS: '|| x_return_status);
676: EXCEPTION
677: WHEN FND_API.g_exc_unexpected_error THEN
678: x_return_status := FND_API.g_ret_sts_error;
679: IF(x_msg_data IS NULL) THEN
1054: l_name_val_list := p_name_val_list;
1055: /* --BUG 8712091
1056: IF l_name_val_list.name_value_table IS NOT NULL AND l_name_val_list.name_value_table.COUNT>0
1057: THEN
1058: INV_EBI_UTIL.set_apps_context(l_name_val_list.name_value_table);
1059: END IF;
1060: */
1061: x_return_status := FND_API.G_RET_STS_SUCCESS;
1062: l_mult_org_chg_id_tbl := inv_ebi_change_id_obj_tbl();
1063: l_mult_org_chg_id_temp := inv_ebi_change_id_obj_tbl();
1064:
1065: INV_EBI_ITEM_HELPER.set_server_time_zone;
1066:
1067: INV_EBI_UTIL.setup();
1068:
1069: INV_EBI_UTIL.debug_line('STEP 10: START INSIDE INV_EBI_CHANGE_ORDER_PUB.get_eco_list_attr');
1070: INV_EBI_UTIL.debug_line( ' **************** Apps Context Details ****************' );
1071: INV_EBI_UTIL.debug_line(' User Id: ' || FND_GLOBAL.USER_ID || '; Responsibility Application id: ' ||
1065: INV_EBI_ITEM_HELPER.set_server_time_zone;
1066:
1067: INV_EBI_UTIL.setup();
1068:
1069: INV_EBI_UTIL.debug_line('STEP 10: START INSIDE INV_EBI_CHANGE_ORDER_PUB.get_eco_list_attr');
1070: INV_EBI_UTIL.debug_line( ' **************** Apps Context Details ****************' );
1071: INV_EBI_UTIL.debug_line(' User Id: ' || FND_GLOBAL.USER_ID || '; Responsibility Application id: ' ||
1072: FND_GLOBAL.RESP_APPL_ID || '; Responsibility Id: ' || FND_GLOBAL.RESP_ID ||
1073: '; Security Group id: '|| FND_GLOBAL.SECURITY_GROUP_ID ||'; User Lang: '|| USERENV('LANG') );
1066:
1067: INV_EBI_UTIL.setup();
1068:
1069: INV_EBI_UTIL.debug_line('STEP 10: START INSIDE INV_EBI_CHANGE_ORDER_PUB.get_eco_list_attr');
1070: INV_EBI_UTIL.debug_line( ' **************** Apps Context Details ****************' );
1071: INV_EBI_UTIL.debug_line(' User Id: ' || FND_GLOBAL.USER_ID || '; Responsibility Application id: ' ||
1072: FND_GLOBAL.RESP_APPL_ID || '; Responsibility Id: ' || FND_GLOBAL.RESP_ID ||
1073: '; Security Group id: '|| FND_GLOBAL.SECURITY_GROUP_ID ||'; User Lang: '|| USERENV('LANG') );
1074: INV_EBI_UTIL.debug_line( ' **************** End of Apps Context ****************' );
1067: INV_EBI_UTIL.setup();
1068:
1069: INV_EBI_UTIL.debug_line('STEP 10: START INSIDE INV_EBI_CHANGE_ORDER_PUB.get_eco_list_attr');
1070: INV_EBI_UTIL.debug_line( ' **************** Apps Context Details ****************' );
1071: INV_EBI_UTIL.debug_line(' User Id: ' || FND_GLOBAL.USER_ID || '; Responsibility Application id: ' ||
1072: FND_GLOBAL.RESP_APPL_ID || '; Responsibility Id: ' || FND_GLOBAL.RESP_ID ||
1073: '; Security Group id: '|| FND_GLOBAL.SECURITY_GROUP_ID ||'; User Lang: '|| USERENV('LANG') );
1074: INV_EBI_UTIL.debug_line( ' **************** End of Apps Context ****************' );
1075:
1070: INV_EBI_UTIL.debug_line( ' **************** Apps Context Details ****************' );
1071: INV_EBI_UTIL.debug_line(' User Id: ' || FND_GLOBAL.USER_ID || '; Responsibility Application id: ' ||
1072: FND_GLOBAL.RESP_APPL_ID || '; Responsibility Id: ' || FND_GLOBAL.RESP_ID ||
1073: '; Security Group id: '|| FND_GLOBAL.SECURITY_GROUP_ID ||'; User Lang: '|| USERENV('LANG') );
1074: INV_EBI_UTIL.debug_line( ' **************** End of Apps Context ****************' );
1075:
1076: --Start of Bug 13874263
1077: IF l_name_val_list.name_value_table IS NOT NULL THEN
1078: FOR i in l_name_val_list.name_value_table.FIRST..l_name_val_list.name_value_table.LAST LOOP
1085: IF(l_get_multiorg_change IS NULL OR l_get_multiorg_change = fnd_api.g_miss_char) THEN
1086: l_get_multiorg_change := INV_EBI_FLAGS.G_INCLUDE_MULTIORG_CHANGE;
1087: END IF;
1088: --End of Bug 13874263
1089: INV_EBI_UTIL.debug_line( 'Get Multi Org Change Details ' || l_get_multiorg_change);
1090:
1091: IF(l_get_multiorg_change = FND_API.G_TRUE) THEN -- added if condition for bug 13874263
1092: IF p_change_lst IS NOT NULL AND p_change_lst.COUNT > 0 THEN
1093: FOR i in 1..p_change_lst.COUNT LOOP
1110: ELSE -- else block added for bug 13874263
1111: l_eco_output_tbl_lst := inv_ebi_change_id_obj_tbl();
1112: l_eco_output_tbl_lst := p_change_lst;
1113: END IF;
1114: INV_EBI_UTIL.debug_line( 'Size of Change id table ' || l_eco_output_tbl_lst.COUNT);
1115:
1116: IF (l_eco_output_tbl_lst IS NOT NULL) THEN
1117: INV_EBI_UTIL.debug_line('STEP 20: BEFORE CALLING INV_EBI_CHANGE_ORDER_HELPER.get_eco ');
1118: FOR l_cnt_cid IN 1..l_eco_output_tbl_lst.COUNT LOOP
1113: END IF;
1114: INV_EBI_UTIL.debug_line( 'Size of Change id table ' || l_eco_output_tbl_lst.COUNT);
1115:
1116: IF (l_eco_output_tbl_lst IS NOT NULL) THEN
1117: INV_EBI_UTIL.debug_line('STEP 20: BEFORE CALLING INV_EBI_CHANGE_ORDER_HELPER.get_eco ');
1118: FOR l_cnt_cid IN 1..l_eco_output_tbl_lst.COUNT LOOP
1119: INV_EBI_CHANGE_ORDER_HELPER.get_eco (
1120: p_change_id => l_eco_output_tbl_lst(l_cnt_cid).change_id
1121: ,p_last_update_status => l_eco_output_tbl_lst(l_cnt_cid).last_update_status
1146: END LOOP;
1147: IF (l_ovrflw_msg='Y') AND SUBSTR(x_msg_data,length(x_msg_data)-2) <> '...' THEN
1148: x_msg_data :=x_msg_data||' , '||'...';
1149: END IF;
1150: INV_EBI_UTIL.debug_line('STEP 30: END CALLING INV_EBI_CHANGE_ORDER_HELPER.get_eco STATUS: '|| l_return_status);
1151: END IF;
1152:
1153: IF (l_eco_obj_tbl IS NOT NULL AND l_eco_obj_tbl.COUNT > 0) THEN
1154: x_eco_lst_obj := l_eco_obj_tbl;
1155: Convert_date_str_eco(p_eco_lst_obj => l_eco_obj_tbl
1156: ,x_eco_lst_obj => x_eco_lst_obj);
1157: END IF;
1158:
1159: INV_EBI_UTIL.debug_line('STEP 40: END INSIDE INV_EBI_CHANGE_ORDER_PUB.get_eco_list_attr STATUS: '|| x_return_status);
1160:
1161: INV_EBI_UTIL.wrapup;
1162:
1163: EXCEPTION
1157: END IF;
1158:
1159: INV_EBI_UTIL.debug_line('STEP 40: END INSIDE INV_EBI_CHANGE_ORDER_PUB.get_eco_list_attr STATUS: '|| x_return_status);
1160:
1161: INV_EBI_UTIL.wrapup;
1162:
1163: EXCEPTION
1164: WHEN OTHERS THEN
1165: x_return_status := FND_API.G_RET_STS_ERROR;
1220:
1221: l_output_status := inv_ebi_output_status(fnd_api.g_ret_sts_success,NULL,NULL,NULL);
1222: x_out := inv_ebi_item_output_obj(NULL,NULL,NULL,NULL,l_output_status,NULL,NULL,NULL,NULL,NULL,NULL);
1223:
1224: INV_EBI_UTIL.debug_line('STEP 10: START INSIDE INV_EBI_CHANGE_ORDER_PUB.process_change_order_items');
1225:
1226: x_update_item_tbl := inv_ebi_item_attr_tbl();
1227:
1228: x_update_item_tbl := p_update_item_tbl;
1234: FOR i IN 1 .. l_eco_obj.eco_revised_item_type.COUNT
1235: LOOP
1236:
1237: --To populate item attributes from revised item values.
1238: INV_EBI_UTIL.debug_line('STEP 20: BEFORE CALLING INV_EBI_CHANGE_ORDER_PUB.populate_item_attributes FOR ' || ' ECO : ' || l_eco_obj.eco_change_order_type.eco_name ||
1239: ' ORG CODE : '|| l_eco_obj.eco_change_order_type.organization_code || ' REVISED ITEM : '||l_eco_obj.eco_revised_item_type(i).revised_item_name );
1240: populate_item_attributes(
1241: p_change_order_obj => l_eco_obj.eco_change_order_type
1242: ,p_revised_item => l_eco_obj.eco_revised_item_type(i)
1242: ,p_revised_item => l_eco_obj.eco_revised_item_type(i)
1243: ,x_item => l_item
1244: ,x_out => l_item_output_obj
1245: );
1246: INV_EBI_UTIL.debug_line('STEP 30: END CALLING INV_EBI_CHANGE_ORDER_PUB.populate_item_attributes STATUS: '|| l_item_output_obj.output_status.return_status);
1247:
1248: IF (l_item_output_obj.output_status.return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1249: x_out.output_status.msg_data := l_item_output_obj.output_status.msg_data;
1250: x_out.output_status.msg_count := l_item_output_obj.output_status.msg_count;
1250: x_out.output_status.msg_count := l_item_output_obj.output_status.msg_count;
1251: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1252:
1253: END IF;
1254: INV_EBI_UTIL.debug_line('STEP 40: BEFORE CALLING INV_EBI_CHANGE_ORDER_PUB.populate_item_ids');
1255:
1256: INV_EBI_ITEM_HELPER.populate_item_ids(
1257: p_item => l_item
1258: ,x_out => l_item_output_obj
1257: p_item => l_item
1258: ,x_out => l_item_output_obj
1259: ,x_item => l_eco_obj.eco_revised_item_type(i).item
1260: );
1261: INV_EBI_UTIL.debug_line('STEP 50: AFTER CALLING INV_EBI_CHANGE_ORDER_PUB.populate_item_ids STATUS: '|| l_item_output_obj.output_status.return_status);
1262: IF (l_item_output_obj.output_status.return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1263: x_out.output_status.msg_data := l_item_output_obj.output_status.msg_data;
1264: x_out.output_status.msg_count := l_item_output_obj.output_status.msg_count;
1265: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1265: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1266: END IF;
1267:
1268:
1269: INV_EBI_UTIL.debug_line('STEP 60: START CALLING INV_EBI_CHANGE_ORDER_PUB.validate_item');
1270:
1271: validate_item(
1272: p_item => l_item
1273: ,x_out => l_item_output_obj
1272: p_item => l_item
1273: ,x_out => l_item_output_obj
1274: );
1275:
1276: INV_EBI_UTIL.debug_line('STEP 70: END CALLING INV_EBI_CHANGE_ORDER_PUB.validate_item STATUS: '|| l_item_output_obj.output_status.return_status);
1277:
1278: IF (l_item_output_obj.output_status.return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1279: x_out.output_status.msg_data := l_item_output_obj.output_status.msg_data;
1280: x_out.output_status.msg_count := l_item_output_obj.output_status.msg_count;
1314: IF(INV_EBI_CHANGE_ORDER_HELPER.is_child_org (
1315: p_organization_id => l_eco_obj.eco_revised_item_type(i).item.main_obj_type.organization_id
1316: ) = fnd_api.g_true) THEN
1317:
1318: l_master_org := INV_EBI_UTIL.get_master_organization(
1319: p_organization_id => l_eco_obj.eco_revised_item_type(i).item.main_obj_type.organization_id
1320: );
1321:
1322: l_inventory_item_id := INV_EBI_ITEM_HELPER.get_inventory_item_id (
1328: p_inventory_item_id => l_inventory_item_id,
1329: p_organization_id => l_master_org,
1330: p_date => sysdate
1331: );
1332: INV_EBI_UTIL.debug_line('STEP 80: MASTER ORG: '|| l_master_org || 'INV ITEM ID: '||l_inventory_item_id || 'CURRENT REVISION: '|| l_current_revision);
1333: IF(l_current_revision = l_eco_obj.eco_revised_item_type(i).new_revised_item_revision ) THEN
1334:
1335: l_eco_obj.eco_revised_item_type(i).item.main_obj_type.revision_code := fnd_api.g_miss_char;
1336:
1349: END IF;
1350:
1351: --call Create New Production Item API .This will also process existing item information.
1352:
1353: INV_EBI_UTIL.debug_line('STEP 90: BEFORE CALLING INV_EBI_ITEM_HELPER.sync_item');
1354: INV_EBI_ITEM_HELPER.sync_item(
1355: p_commit => FND_API.g_false
1356: ,p_operation => INV_EBI_ITEM_PUB.g_otype_create
1357: ,p_item => l_eco_obj.eco_revised_item_type(i).item
1357: ,p_item => l_eco_obj.eco_revised_item_type(i).item
1358: ,x_out => l_item_output_obj
1359: );
1360:
1361: INV_EBI_UTIL.debug_line('STEP 100: END CALLING INV_EBI_ITEM_HELPER.sync_item STATUS: '|| l_item_output_obj.output_status.return_status);
1362:
1363: l_item_count := l_item_count + 1;
1364:
1365: IF (l_item_output_obj.output_status.return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1388:
1389: FETCH c_effectivity_date INTO l_revision;
1390: CLOSE c_effectivity_date;
1391:
1392: INV_EBI_UTIL.debug_line('STEP 110: START update mtl_item_revisions_b');
1393:
1394: UPDATE mtl_item_revisions_b
1395: SET
1396: implementation_date = sysdate,
1403: inventory_item_id = l_item_output_obj.inventory_item_id AND
1404: organization_id = l_item_output_obj.organization_id AND
1405: revision = l_revision;
1406:
1407: INV_EBI_UTIL.debug_line('STEP 120: END update mtl_item_revisions_b');
1408: END IF;
1409:
1410: ELSE
1411: x_update_item_tbl.EXTEND(1);
1416: x_update_item_tbl(l_update_item_count) := INV_EBI_GET_ITEM_OUTPUT_OBJ(NULL,NULL,NULL,NULL);
1417: x_update_item_tbl(l_update_item_count).item_obj := l_eco_obj.eco_revised_item_type(i).item;
1418:
1419: --Transfer Engg Item to Manufacturing
1420: INV_EBI_UTIL.debug_line('STEP 130: BEFORE CALLING transfer_engg_item_mfg');
1421: transfer_engg_item_mfg(
1422: p_item => l_eco_obj.eco_revised_item_type(i).item
1423: ,p_alt_bom_designator => l_eco_obj.eco_revised_item_type(i).alternate_bom_code
1424: ,x_out => l_eco_output_obj
1423: ,p_alt_bom_designator => l_eco_obj.eco_revised_item_type(i).alternate_bom_code
1424: ,x_out => l_eco_output_obj
1425: );
1426:
1427: INV_EBI_UTIL.debug_line('STEP 140: AFTER CALLING transfer_engg_item_mfg STATUS: '||l_eco_output_obj.output_status.return_status);
1428:
1429: IF (l_eco_output_obj.output_status.return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1430: x_out.output_status.msg_data := l_eco_output_obj.output_status.msg_data;
1431: x_out.output_status.msg_count := l_eco_output_obj.output_status.msg_count;
1439: IF FND_API.to_boolean(p_commit) THEN
1440: COMMIT;
1441: END IF;
1442:
1443: INV_EBI_UTIL.debug_line('STEP 150: END INSIDE INV_EBI_CHANGE_ORDER_PUB.process_change_order_items STATUS: '|| x_out.output_status.return_status);
1444:
1445:
1446: EXCEPTION
1447: WHEN FND_API.g_exc_unexpected_error THEN
1454: x_out.output_status.return_status := FND_API.g_ret_sts_unexp_error;
1455:
1456: IF(x_out.output_status.msg_data IS NULL) THEN
1457:
1458: x_out.output_status.error_table := INV_EBI_UTIL.get_error_table();
1459:
1460: IF (x_out.output_status.error_table IS NOT NULL AND x_out.output_status.error_table.COUNT > 0) THEN
1461:
1462: x_out.output_status.msg_data := INV_EBI_UTIL.get_error_table_msgtxt(x_out.output_status.error_table);
1458: x_out.output_status.error_table := INV_EBI_UTIL.get_error_table();
1459:
1460: IF (x_out.output_status.error_table IS NOT NULL AND x_out.output_status.error_table.COUNT > 0) THEN
1461:
1462: x_out.output_status.msg_data := INV_EBI_UTIL.get_error_table_msgtxt(x_out.output_status.error_table);
1463:
1464: IF(x_out.output_status.msg_data IS NULL) THEN
1465: FND_MSG_PUB.count_and_get(
1466: p_encoded => FND_API.g_false
1478: CLOSE c_effectivity_date;
1479: END IF;
1480:
1481: x_out.output_status.return_status := FND_API.g_ret_sts_unexp_error;
1482: x_out.output_status.error_table := INV_EBI_UTIL.get_error_table();
1483:
1484: IF (x_out.output_status.error_table IS NOT NULL AND x_out.output_status.error_table.COUNT > 0) THEN
1485: x_out.output_status.msg_data := INV_EBI_UTIL.get_error_table_msgtxt(x_out.output_status.error_table);
1486: END IF;
1481: x_out.output_status.return_status := FND_API.g_ret_sts_unexp_error;
1482: x_out.output_status.error_table := INV_EBI_UTIL.get_error_table();
1483:
1484: IF (x_out.output_status.error_table IS NOT NULL AND x_out.output_status.error_table.COUNT > 0) THEN
1485: x_out.output_status.msg_data := INV_EBI_UTIL.get_error_table_msgtxt(x_out.output_status.error_table);
1486: END IF;
1487:
1488: IF (x_out.output_status.msg_data IS NOT NULL) THEN
1489: x_out.output_status.msg_data := x_out.output_status.msg_data||' -> INV_EBI_CHANGE_ORDER_PUB.process_change_order_items ';
1510:
1511: BEGIN
1512: SAVEPOINT inv_ebi_proc_upd_item_save_pnt;
1513: FND_MSG_PUB.initialize;
1514: INV_EBI_UTIL.debug_line('STEP 10: START INSIDE INV_EBI_CHANGE_ORDER_PUB.process_update_items');
1515: l_output_status := inv_ebi_output_status(fnd_api.g_ret_sts_success,NULL,NULL,NULL);
1516: x_out := inv_ebi_item_output_obj(NULL,NULL,NULL,NULL,l_output_status,NULL,NULL,NULL,NULL,NULL,NULL);
1517:
1518: IF(p_update_item_tbl IS NOT NULL AND p_update_item_tbl.COUNT > 0) THEN
1518: IF(p_update_item_tbl IS NOT NULL AND p_update_item_tbl.COUNT > 0) THEN
1519:
1520: FOR i IN 1..p_update_item_tbl.COUNT LOOP
1521:
1522: INV_EBI_UTIL.debug_line('STEP 20: BEFORE CALLING INV_EBI_ITEM_HELPER.sync_item');
1523:
1524: INV_EBI_ITEM_HELPER.sync_item(
1525: p_commit => FND_API.g_false
1526: ,p_operation => INV_EBI_ITEM_PUB.g_otype_update
1526: ,p_operation => INV_EBI_ITEM_PUB.g_otype_update
1527: ,p_item => p_update_item_tbl(i).item_obj
1528: ,x_out => x_out
1529: );
1530: INV_EBI_UTIL.debug_line('STEP 30: AFTER CALLING INV_EBI_ITEM_HELPER.sync_item for item updation STATUS: '|| x_out.output_status.return_status);
1531: IF (x_out.output_status.return_status <> fnd_api.g_ret_sts_success) THEN
1532: x_out.item_number := p_update_item_tbl(i).item_obj.main_obj_type.item_number;
1533: x_out.organization_code := p_update_item_tbl(i).item_obj.main_obj_type.organization_code;
1534: RAISE fnd_api.g_exc_unexpected_error;
1534: RAISE fnd_api.g_exc_unexpected_error;
1535: END IF;
1536: END LOOP;
1537: END IF;
1538: INV_EBI_UTIL.debug_line('STEP 40: END INSIDE INV_EBI_CHANGE_ORDER_PUB.process_update_items');
1539: EXCEPTION
1540: WHEN FND_API.g_exc_unexpected_error THEN
1541: ROLLBACK TO inv_ebi_proc_upd_item_save_pnt;
1542: x_out.output_status.return_status := FND_API.g_ret_sts_unexp_error;
1541: ROLLBACK TO inv_ebi_proc_upd_item_save_pnt;
1542: x_out.output_status.return_status := FND_API.g_ret_sts_unexp_error;
1543: IF(x_out.output_status.msg_data IS NULL) THEN
1544:
1545: x_out.output_status.error_table := INV_EBI_UTIL.get_error_table();
1546:
1547: IF (x_out.output_status.error_table IS NOT NULL AND x_out.output_status.error_table.COUNT > 0) THEN
1548:
1549: x_out.output_status.msg_data := INV_EBI_UTIL.get_error_table_msgtxt(x_out.output_status.error_table);
1545: x_out.output_status.error_table := INV_EBI_UTIL.get_error_table();
1546:
1547: IF (x_out.output_status.error_table IS NOT NULL AND x_out.output_status.error_table.COUNT > 0) THEN
1548:
1549: x_out.output_status.msg_data := INV_EBI_UTIL.get_error_table_msgtxt(x_out.output_status.error_table);
1550:
1551: IF(x_out.output_status.msg_data IS NULL) THEN
1552: FND_MSG_PUB.count_and_get(
1553: p_encoded => FND_API.g_false
1561: WHEN OTHERS THEN
1562: ROLLBACK TO inv_ebi_proc_upd_item_save_pnt;
1563: x_out.output_status.return_status := FND_API.g_ret_sts_unexp_error;
1564:
1565: x_out.output_status.error_table := INV_EBI_UTIL.get_error_table();
1566:
1567: IF (x_out.output_status.error_table IS NOT NULL AND x_out.output_status.error_table.COUNT > 0) THEN
1568: x_out.output_status.msg_data := INV_EBI_UTIL.get_error_table_msgtxt(x_out.output_status.error_table);
1569: END IF;
1564:
1565: x_out.output_status.error_table := INV_EBI_UTIL.get_error_table();
1566:
1567: IF (x_out.output_status.error_table IS NOT NULL AND x_out.output_status.error_table.COUNT > 0) THEN
1568: x_out.output_status.msg_data := INV_EBI_UTIL.get_error_table_msgtxt(x_out.output_status.error_table);
1569: END IF;
1570:
1571: IF (x_out.output_status.msg_data IS NOT NULL) THEN
1572: x_out.output_status.msg_data := x_out.output_status.msg_data||' -> INV_EBI_CHANGE_ORDER_PUB.process_update_items ';
1623: l_replicate_bom_org_tbl := FND_TABLE_OF_VARCHAR2_30();
1624: l_common_eco_tbl := FND_TABLE_OF_VARCHAR2_30();
1625: l_replicate_bom_eco_tbl := FND_TABLE_OF_VARCHAR2_30();
1626: x_eco_obj_list := inv_ebi_eco_obj_tbl();
1627: INV_EBI_UTIL.debug_line('STEP 10: START INSIDE INV_EBI_CHANGE_ORDER_PUB.process_bom');
1628: IF(p_eco_obj_list IS NOT NULL AND p_eco_obj_list.COUNT > 0) THEN
1629: x_eco_obj_list.EXTEND(p_eco_obj_list.COUNT);
1630:
1631: FOR i in 1..p_eco_obj_list.count
1650: AND l_eco_obj.eco_revised_item_type(j).structure_header.common_assembly_item_name <> fnd_api.g_miss_char
1651: AND l_eco_obj.eco_revised_item_type(j).structure_header.common_organization_code IS NOT NULL
1652: AND l_eco_obj.eco_revised_item_type(j).structure_header.common_organization_code <> fnd_api.g_miss_char
1653: ) THEN
1654: INV_EBI_UTIL.debug_line('STEP 20: Commoning Needed '||' ECO NAME: '|| l_eco_obj.eco_change_order_type.eco_name ||
1655: 'ORG CODE : '|| l_eco_obj.eco_change_order_type.organization_code);
1656: l_common_assy_item_tbl.EXTEND(1);
1657: l_common_org_tbl.EXTEND(1);
1658: l_common_eco_tbl.EXTEND(1);
1680: p_alternate_bom_code => l_eco_obj.eco_revised_item_type(j).alternate_bom_code
1681: );
1682:
1683: IF(l_is_bom_exists = FND_API.g_false) THEN
1684: INV_EBI_UTIL.debug_line('STEP 30: Replication Needed');
1685: l_replicate_bom_tbl.EXTEND(1);
1686: l_replicate_bom_org_tbl.EXTEND(1);
1687: l_replicate_bom_eco_tbl.EXTEND(1);
1688: l_replicate_bom_cnt := l_replicate_bom_cnt+1;
1689:
1690: l_replicate_bom_org_tbl(l_replicate_bom_cnt) := l_eco_obj.eco_change_order_type.organization_code;
1691: l_replicate_bom_eco_tbl(l_replicate_bom_cnt) := l_eco_obj.eco_change_order_type.eco_name;
1692:
1693: INV_EBI_UTIL.debug_line('STEP 40: BEFORE CALLING INV_EBI_CHANGE_ORDER_HELPER.transform_replicate_bom_info');
1694: INV_EBI_CHANGE_ORDER_HELPER.transform_replicate_bom_info(
1695: p_eco_obj_list => p_eco_obj_list
1696: ,p_revised_item_obj => l_eco_obj.eco_revised_item_type(j)
1697: ,x_revised_item_obj => l_eco_obj.eco_revised_item_type(j)
1696: ,p_revised_item_obj => l_eco_obj.eco_revised_item_type(j)
1697: ,x_revised_item_obj => l_eco_obj.eco_revised_item_type(j)
1698: ,x_out => l_out
1699: );
1700: INV_EBI_UTIL.debug_line('STEP 50: AFTER CALLING INV_EBI_CHANGE_ORDER_HELPER.transform_replicate_bom_info STATUS: '|| l_out.output_status.return_status);
1701: IF(l_out.output_status.return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1702: x_out.change_notice := l_eco_obj.eco_change_order_type.eco_name;
1703: x_out.organization_code := l_eco_obj.eco_change_order_type.organization_code;
1704: x_out.output_status.msg_data := l_out.output_status.msg_data;
1717: IF( l_common_bom_found = FND_API.g_false
1718: AND l_replicate_bom_found = FND_API.g_false
1719: AND l_eco_obj.eco_revised_item_type(j).structure_header IS NOT NULL) THEN
1720:
1721: INV_EBI_UTIL.debug_line('STEP 60: BEFORE CALLING INV_EBI_CHANGE_ORDER_HELPER.process_structure_header ' ||
1722: ' FOR Normal BOM '||' REVISED ITEM NAME: '|| l_eco_obj.eco_revised_item_type(j).revised_item_name);
1723: INV_EBI_CHANGE_ORDER_HELPER.process_structure_header(
1724: p_commit => FND_API.g_false
1725: ,p_organization_code => l_eco_obj.eco_change_order_type.organization_code
1729: ,p_component_item_tbl => l_eco_obj.eco_revised_item_type(j).component_item_tbl -- Bug 7192021
1730: ,p_name_val_list => inv_ebi_name_value_list(l_eco_obj.name_value_tbl)
1731: ,x_out => l_out
1732: );
1733: INV_EBI_UTIL.debug_line('STEP 70: AFTER CALLING INV_EBI_CHANGE_ORDER_HELPER.process_structure_header STATUS: '|| l_out.output_status.return_status);
1734: IF(l_out.output_status.return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1735: x_out.change_notice := l_eco_obj.eco_change_order_type.eco_name;
1736: x_out.organization_code := l_eco_obj.eco_change_order_type.organization_code;
1737: x_out.output_status.msg_data := l_out.output_status.msg_data;
1756:
1757: END IF;
1758:
1759: END LOOP;
1760: INV_EBI_UTIL.debug_line('STEP 80: BEFORE CALLING INV_EBI_CHANGE_ORDER_HELPER.process_structure_header '|| 'FOR COMMON BOM '||
1761: ' REVISED ITEM NAME: '|| l_common_assy_item_tbl(l_common_assy_item_cnt).revised_item_name ||
1762: ' COMMON ORG CODE: '|| l_common_assy_item_tbl(l_common_assy_item_cnt).structure_header.common_organization_code ||
1763: ' COMMON ASSY ITEM NAME: '|| l_common_assy_item_tbl(l_common_assy_item_cnt).structure_header.common_assembly_item_name);
1764: INV_EBI_CHANGE_ORDER_HELPER.process_structure_header(
1770: ,p_component_item_tbl => l_common_assy_item_tbl(l_common_assy_item_cnt).component_item_tbl -- Bug 7192021
1771: ,p_name_val_list => inv_ebi_name_value_list(l_name_value_tbl)
1772: ,x_out => l_out
1773: );
1774: INV_EBI_UTIL.debug_line('STEP 90: AFTER CALLING INV_EBI_CHANGE_ORDER_HELPER.process_structure_header '
1775: || 'FOR COMMON BOM STATUS: '|| l_out.output_status.return_status);
1776: IF(l_out.output_status.return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1777: x_out.change_notice := l_common_eco_tbl(l_common_assy_item_cnt);
1778: x_out.organization_code := l_common_org_tbl(l_common_assy_item_cnt);
1802: END LOOP;
1803: END IF;
1804: END LOOP;
1805:
1806: INV_EBI_UTIL.debug_line('STEP 100: BEFORE CALLING INV_EBI_CHANGE_ORDER_HELPER.process_replicate_bom '
1807: || 'FOR REPLICATE BOM ');
1808: INV_EBI_CHANGE_ORDER_HELPER.process_replicate_bom(
1809: p_organization_code => l_replicate_bom_org_tbl(l_replicate_bom_cnt)
1810: ,p_revised_item_obj => l_replicate_bom_tbl(l_replicate_bom_cnt)
1811: ,p_name_value_tbl => l_name_value_tbl
1812: ,x_revised_item_obj => l_replicate_bom_item_obj
1813: ,x_out => l_out
1814: );
1815: INV_EBI_UTIL.debug_line('STEP 110: AFTER CALLING INV_EBI_CHANGE_ORDER_HELPER.process_replicate_bom ' ||
1816: ' FOR REPLICATE BOM STATUS: '|| l_out.output_status.return_status);
1817:
1818: x_eco_obj_list(l_eco_idx).eco_revised_item_type(l_item_idx) := l_replicate_bom_item_obj;
1819:
1828: RAISE FND_API.g_exc_unexpected_error;
1829: END IF;
1830:
1831: IF(l_replicate_bom_tbl(l_replicate_bom_cnt).structure_header IS NOT NULL) THEN
1832: INV_EBI_UTIL.debug_line('STEP 120: BEFORE CALLING INV_EBI_CHANGE_ORDER_HELPER.process_structure_header ' ||
1833: ' FOR REPLICATE BOM '||' REVISED ITEM NAME: '|| l_replicate_bom_tbl(l_replicate_bom_cnt).revised_item_name ||
1834: ' COMMON ASSY ITEM NAME: '|| l_replicate_bom_tbl(l_replicate_bom_cnt).structure_header.common_assembly_item_name ||
1835: ' COMMON ORG CODE: '|| l_replicate_bom_tbl(l_replicate_bom_cnt).structure_header.common_organization_code);
1836: INV_EBI_CHANGE_ORDER_HELPER.process_structure_header(
1843: ,p_name_val_list => inv_ebi_name_value_list(l_name_value_tbl)
1844: ,x_out => l_out
1845: );
1846:
1847: INV_EBI_UTIL.debug_line('STEP 130: AFTER CALLING INV_EBI_CHANGE_ORDER_HELPER.process_structure_header STATUS: '|| l_out.output_status.return_status);
1848:
1849: IF(l_out.output_status.return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1850:
1851: x_out.change_notice := l_replicate_bom_eco_tbl(l_replicate_bom_cnt);
1857: END IF;
1858: END IF;
1859: END LOOP;
1860: END IF;
1861: INV_EBI_UTIL.debug_line('STEP 140: END OF INV_EBI_CHANGE_ORDER_PUB.process_bom STATUS: '|| x_out.output_status.return_status);
1862: IF FND_API.to_boolean(p_commit) THEN
1863: COMMIT;
1864: END IF;
1865:
1870: x_out.output_status.return_status := FND_API.g_ret_sts_unexp_error;
1871:
1872: IF(x_out.output_status.msg_data IS NULL) THEN
1873:
1874: x_out.output_status.error_table := INV_EBI_UTIL.get_error_table();
1875:
1876: IF (x_out.output_status.error_table IS NOT NULL AND x_out.output_status.error_table.COUNT > 0) THEN
1877:
1878: x_out.output_status.msg_data := INV_EBI_UTIL.get_error_table_msgtxt(x_out.output_status.error_table);
1874: x_out.output_status.error_table := INV_EBI_UTIL.get_error_table();
1875:
1876: IF (x_out.output_status.error_table IS NOT NULL AND x_out.output_status.error_table.COUNT > 0) THEN
1877:
1878: x_out.output_status.msg_data := INV_EBI_UTIL.get_error_table_msgtxt(x_out.output_status.error_table);
1879:
1880: IF(x_out.output_status.msg_data IS NULL) THEN
1881: FND_MSG_PUB.count_and_get(
1882: p_encoded => FND_API.g_false
1891: WHEN OTHERS THEN
1892: ROLLBACK TO inv_ebi_process_bom_save_pnt;
1893: x_out.output_status.return_status := FND_API.g_ret_sts_unexp_error;
1894:
1895: x_out.output_status.error_table := INV_EBI_UTIL.get_error_table();
1896:
1897: IF (x_out.output_status.error_table IS NOT NULL AND
1898: x_out.output_status.error_table.COUNT > 0) THEN
1899:
1896:
1897: IF (x_out.output_status.error_table IS NOT NULL AND
1898: x_out.output_status.error_table.COUNT > 0) THEN
1899:
1900: x_out.output_status.msg_data := INV_EBI_UTIL.get_error_table_msgtxt(x_out.output_status.error_table);
1901: END IF;
1902:
1903: IF (x_out.output_status.msg_data IS NOT NULL) THEN
1904: x_out.output_status.msg_data := x_out.output_status.msg_data||' -> INV_EBI_CHANGE_ORDER_PUB.process_bom ';
1947: BEGIN
1948: SAVEPOINT inv_ebi_chg_order_save_pnt;
1949: FND_MSG_PUB.initialize;
1950:
1951: INV_EBI_UTIL.debug_line('STEP 10: START INSIDE INV_EBI_CHANGE_ORDER_PUB.process_change_order' );
1952: INV_EBI_UTIL.debug_line('STEP 20: CHANGE NOTICE: '|| p_eco_obj.eco_change_order_type.eco_name ||
1953: ' ORG CODE: '|| p_eco_obj.eco_change_order_type.organization_code );
1954: l_uda_output := inv_ebi_uda_output_obj(NULL,NULL);
1955: l_output_status := inv_ebi_output_status(fnd_api.g_ret_sts_success,NULL,NULL,NULL);
1948: SAVEPOINT inv_ebi_chg_order_save_pnt;
1949: FND_MSG_PUB.initialize;
1950:
1951: INV_EBI_UTIL.debug_line('STEP 10: START INSIDE INV_EBI_CHANGE_ORDER_PUB.process_change_order' );
1952: INV_EBI_UTIL.debug_line('STEP 20: CHANGE NOTICE: '|| p_eco_obj.eco_change_order_type.eco_name ||
1953: ' ORG CODE: '|| p_eco_obj.eco_change_order_type.organization_code );
1954: l_uda_output := inv_ebi_uda_output_obj(NULL,NULL);
1955: l_output_status := inv_ebi_output_status(fnd_api.g_ret_sts_success,NULL,NULL,NULL);
1956: x_out := inv_ebi_eco_output_obj(NULL,NULL,NULL,NULL,l_output_status,NULL,NULL);
1958: l_revitem_output_tbl := inv_ebi_revitem_output_obj_tbl();
1959:
1960: bom_globals.set_bo_identifier(bom_globals.g_eco_bo);
1961:
1962: INV_EBI_UTIL.debug_line('STEP 30: START CALLING INV_EBI_CHANGE_ORDER_HELPER.process_eco');
1963: INV_EBI_CHANGE_ORDER_HELPER.process_eco(
1964: p_commit => FND_API.g_false
1965: ,p_change_order => p_eco_obj.eco_change_order_type
1966: ,p_revision_type_tbl => p_eco_obj.eco_revision_type
1967: ,p_revised_item_type_tbl => p_eco_obj.eco_revised_item_type
1968: ,p_name_val_list => inv_ebi_name_value_list(p_eco_obj.name_value_tbl)
1969: ,x_out => l_out
1970: );
1971: INV_EBI_UTIL.debug_line('STEP 40: AFTER CALLING INV_EBI_CHANGE_ORDER_HELPER.process_eco STATUS: '|| l_out.output_status.return_status);
1972: IF (l_out.output_status.return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1973: x_out.output_status.msg_data := l_out.output_status.msg_data;
1974: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1975: END IF;
2024: (NOT l_is_plmwf_Set ) AND
2025: (l_status_code > l_curr_status_code) ) THEN
2026: --Bug 6833363
2027:
2028: INV_EBI_UTIL.debug_line('STEP 50: START CALLING ENG_CHANGE_LIFECYCLE_UTIL.Change_Phase');
2029: ENG_CHANGE_LIFECYCLE_UTIL.Change_Phase(
2030: p_api_version => 1.0
2031: ,p_commit => FND_API.g_false
2032: ,p_object_name => 'ENG_CHANGE'
2036: ,x_return_status => l_out.output_status.return_status
2037: ,x_msg_count => l_out.output_status.msg_count
2038: ,x_msg_data => l_out.output_status.msg_data
2039: );
2040: INV_EBI_UTIL.debug_line('STEP 60: AFTER CALLING ENG_CHANGE_LIFECYCLE_UTIL.Change_Phase STATUS: '|| l_out.output_status.return_status);
2041: IF (l_out.output_status.return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2042: x_out.output_status.msg_data := l_out.output_status.msg_data;
2043: x_out.output_status.msg_data := x_out.output_status.msg_data || ' -> ECO Name:' || l_change_notice || ' -> Org Code: ' || l_organization_code;
2044: RAISE FND_API.g_exc_unexpected_error;
2045: END IF;
2046: END IF;
2047:
2048: --Processing of Udas
2049: IF (INV_EBI_UTIL.is_pim_installed) THEN
2050: IF ((p_eco_obj.eco_change_order_type IS NOT NULL AND p_eco_obj.eco_change_order_type.change_order_uda IS NOT NULL)
2051: AND p_eco_obj.eco_change_order_type.change_order_uda.attribute_group_tbl.COUNT > 0) THEN
2052: IF ((p_eco_obj.eco_change_order_type.eco_name IS NOT NULL)
2053: AND (p_eco_obj.eco_change_order_type.organization_id IS NULL OR p_eco_obj.eco_change_order_type.organization_id =FND_API.g_miss_num)
2066: l_pkcode.extend();
2067: l_pkcode(1) := ego_col_name_value_pair_obj('CHANGE_TYPE_ID',l_change_order_type_id);
2068:
2069: --To process Change order header udas
2070: INV_EBI_UTIL.debug_line('STEP 70: BEFORE CALLING INV_EBI_CHANGE_ORDER_HELPER.process_uda');
2071: INV_EBI_CHANGE_ORDER_HELPER.process_uda(
2072: p_uda_input_obj => p_eco_obj.eco_change_order_type.change_order_uda
2073: ,p_commit => fnd_api.g_false
2074: ,p_object_name => 'ENG_CHANGE'
2076: ,p_pk_column_name_value_pairs => l_pkdata
2077: ,p_class_code_name_value_pairs => l_pkcode
2078: ,x_uda_output_obj => l_out
2079: );
2080: INV_EBI_UTIL.debug_line('STEP 80: AFTER CALLING INV_EBI_CHANGE_ORDER_HELPER.process_uda STATUS: '|| l_out.output_status.return_status);
2081: END IF;
2082: IF(l_out.output_status.return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2083: x_out.output_status.msg_data := l_out.output_status.msg_data;
2084: RAISE fnd_api.g_exc_unexpected_error;
2099: l_inventory_item_id := INV_EBI_ITEM_HELPER.get_inventory_item_id (
2100: p_organization_id => l_organization_id
2101: ,p_item_number => p_eco_obj.eco_revised_item_type(i).revised_item_name
2102: );
2103: INV_EBI_UTIL.debug_line('STEP 90: START CALLING INV_EBI_ITEM_HELPER.process_item_uda'||'INV ITEM ID: '||l_inventory_item_id ||
2104: 'ORG ID: '||l_organization_id|| 'CATALOG GROUP ID: '||p_eco_obj.eco_revised_item_type(i).item.main_obj_type.item_catalog_group_id ||
2105: 'REVISED ITEM REVISION: '||p_eco_obj.eco_revised_item_type(i).new_revised_item_revision);
2106: INV_EBI_ITEM_HELPER.process_item_uda(
2107: p_api_version => l_api_version
2113: ,p_uda_input_obj => p_eco_obj.eco_revised_item_type(i).item.uda_type
2114: ,p_commit => fnd_api.g_false
2115: ,x_uda_output_obj => l_item_output
2116: );
2117: INV_EBI_UTIL.debug_line('STEP 100: AFTER CALLING INV_EBI_ITEM_HELPER.process_item_uda STATUS: '|| l_item_output.output_status.return_status);
2118: END IF;
2119:
2120: IF (l_item_output.output_status.return_status <> FND_API.g_ret_sts_success) THEN
2121: x_out.output_status.return_status := l_item_output.output_status.msg_data;
2124:
2125: l_uda_output := inv_ebi_uda_output_obj(l_item_output.uda_output.failed_row_id_list,l_item_output.uda_output.errorcode);*/
2126:
2127: -- To process Component level udas and structure header level udas
2128: INV_EBI_UTIL.debug_line('STEP 90: START CALLING INV_EBI_CHANGE_ORDER_HELPER.process_change_order_uda');
2129: INV_EBI_CHANGE_ORDER_HELPER.process_change_order_uda(
2130: p_commit => FND_API.g_false
2131: ,p_organization_code => p_eco_obj.eco_change_order_type.organization_code
2132: ,p_eco_name => p_eco_obj.eco_change_order_type.eco_name
2135: ,p_component_tbl => p_eco_obj.eco_revised_item_type(i).component_item_tbl
2136: ,p_structure_header => p_eco_obj.eco_revised_item_type(i).structure_header
2137: ,x_out => l_out
2138: );
2139: INV_EBI_UTIL.debug_line('STEP 100: AFTER CALLING INV_EBI_CHANGE_ORDER_HELPER.process_change_order_uda STATUS: '|| l_out.output_status.return_status);
2140: IF (l_out.output_status.return_status <> FND_API.g_ret_sts_success) THEN
2141: x_out.output_status.msg_data := l_out.output_status.msg_data;
2142: RAISE FND_API.g_exc_unexpected_error;
2143: END IF;
2145: END IF;
2146: l_uda_output := inv_ebi_uda_output_obj(l_out.uda_output.failed_row_id_list,l_out.uda_output.errorcode);
2147: END IF;
2148: --End of Udas processing
2149: INV_EBI_UTIL.debug_line('STEP 110: END Processing UDAS');
2150: x_out := inv_ebi_eco_output_obj( l_change_notice,l_change_id,l_organization_id,l_organization_code,
2151: l_out.output_status,NULL,l_uda_output);
2152:
2153: IF FND_API.to_boolean(p_commit) THEN
2152:
2153: IF FND_API.to_boolean(p_commit) THEN
2154: COMMIT;
2155: END IF;
2156: INV_EBI_UTIL.debug_line('STEP 120: END INSIDE INV_EBI_CHANGE_ORDER_PUB.process_change_order'||'RETURN STATUS: '||x_out.output_status.return_status);
2157: EXCEPTION
2158: WHEN FND_API.g_exc_unexpected_error THEN
2159: ROLLBACK TO inv_ebi_chg_order_save_pnt;
2160:
2159: ROLLBACK TO inv_ebi_chg_order_save_pnt;
2160:
2161: x_out.output_status.return_status := FND_API.g_ret_sts_unexp_error;
2162: IF(x_out.output_status.msg_data IS NULL) THEN
2163: x_out.output_status.error_table := INV_EBI_UTIL.get_error_table();
2164:
2165: IF (x_out.output_status.error_table IS NOT NULL AND x_out.output_status.error_table.COUNT > 0) THEN
2166: x_out.output_status.msg_data := INV_EBI_UTIL.get_error_table_msgtxt(x_out.output_status.error_table);
2167:
2162: IF(x_out.output_status.msg_data IS NULL) THEN
2163: x_out.output_status.error_table := INV_EBI_UTIL.get_error_table();
2164:
2165: IF (x_out.output_status.error_table IS NOT NULL AND x_out.output_status.error_table.COUNT > 0) THEN
2166: x_out.output_status.msg_data := INV_EBI_UTIL.get_error_table_msgtxt(x_out.output_status.error_table);
2167:
2168: IF(x_out.output_status.msg_data IS NULL) THEN
2169: FND_MSG_PUB.count_and_get(
2170: p_encoded => FND_API.g_false
2177: END IF;
2178: WHEN OTHERS THEN
2179: ROLLBACK TO inv_ebi_chg_order_save_pnt;
2180:
2181: x_out.output_status.error_table := INV_EBI_UTIL.get_error_table();
2182: x_out.output_status.return_status := FND_API.g_ret_sts_unexp_error;
2183:
2184: IF (x_out.output_status.error_table IS NOT NULL AND x_out.output_status.error_table.COUNT > 0) THEN
2185: x_out.output_status.msg_data := INV_EBI_UTIL.get_error_table_msgtxt(x_out.output_status.error_table);
2181: x_out.output_status.error_table := INV_EBI_UTIL.get_error_table();
2182: x_out.output_status.return_status := FND_API.g_ret_sts_unexp_error;
2183:
2184: IF (x_out.output_status.error_table IS NOT NULL AND x_out.output_status.error_table.COUNT > 0) THEN
2185: x_out.output_status.msg_data := INV_EBI_UTIL.get_error_table_msgtxt(x_out.output_status.error_table);
2186: END IF;
2187: IF (x_out.output_status.msg_data IS NOT NULL) THEN
2188: x_out.output_status.msg_data := x_out.output_status.msg_data||' -> INV_EBI_CHANGE_ORDER_PUB.process_change_order ';
2189: ELSE
2242: FOR i IN p_eco_obj_list.FIRST..p_eco_obj_list.LAST
2243: LOOP
2244: IF p_eco_obj_list(i).NAME_VALUE_TBL IS NOT NULL AND p_eco_obj_list(i).NAME_VALUE_TBL.COUNT>0
2245: THEN
2246: INV_EBI_UTIL.set_apps_context(p_eco_obj_list(i).NAME_VALUE_TBL);
2247: END IF;
2248: EXIT;
2249: END LOOP;
2250: END IF;
2252:
2253: SAVEPOINT inv_ebi_prc_chg_ord_save_pnt;
2254: ERROR_HANDLER.Initialize;
2255: FND_MSG_PUB.initialize;
2256: INV_EBI_UTIL.debug_line('STEP 10: START INSIDE INV_EBI_CHANGE_ORDER_PUB.process_change_order_list_core');
2257: INV_EBI_UTIL.debug_line( ' **************** Apps Context Details ****************' );
2258: INV_EBI_UTIL.debug_line(' User Id: ' || FND_GLOBAL.USER_ID || '; Responsibility Application id: ' ||
2259: FND_GLOBAL.RESP_APPL_ID || '; Responsibility Id: ' || FND_GLOBAL.RESP_ID ||
2260: '; Security Group id: '|| FND_GLOBAL.SECURITY_GROUP_ID ||'; User Lang: '|| USERENV('LANG') );
2253: SAVEPOINT inv_ebi_prc_chg_ord_save_pnt;
2254: ERROR_HANDLER.Initialize;
2255: FND_MSG_PUB.initialize;
2256: INV_EBI_UTIL.debug_line('STEP 10: START INSIDE INV_EBI_CHANGE_ORDER_PUB.process_change_order_list_core');
2257: INV_EBI_UTIL.debug_line( ' **************** Apps Context Details ****************' );
2258: INV_EBI_UTIL.debug_line(' User Id: ' || FND_GLOBAL.USER_ID || '; Responsibility Application id: ' ||
2259: FND_GLOBAL.RESP_APPL_ID || '; Responsibility Id: ' || FND_GLOBAL.RESP_ID ||
2260: '; Security Group id: '|| FND_GLOBAL.SECURITY_GROUP_ID ||'; User Lang: '|| USERENV('LANG') );
2261: INV_EBI_UTIL.debug_line( ' **************** End of Apps Context ****************' );
2254: ERROR_HANDLER.Initialize;
2255: FND_MSG_PUB.initialize;
2256: INV_EBI_UTIL.debug_line('STEP 10: START INSIDE INV_EBI_CHANGE_ORDER_PUB.process_change_order_list_core');
2257: INV_EBI_UTIL.debug_line( ' **************** Apps Context Details ****************' );
2258: INV_EBI_UTIL.debug_line(' User Id: ' || FND_GLOBAL.USER_ID || '; Responsibility Application id: ' ||
2259: FND_GLOBAL.RESP_APPL_ID || '; Responsibility Id: ' || FND_GLOBAL.RESP_ID ||
2260: '; Security Group id: '|| FND_GLOBAL.SECURITY_GROUP_ID ||'; User Lang: '|| USERENV('LANG') );
2261: INV_EBI_UTIL.debug_line( ' **************** End of Apps Context ****************' );
2262:
2257: INV_EBI_UTIL.debug_line( ' **************** Apps Context Details ****************' );
2258: INV_EBI_UTIL.debug_line(' User Id: ' || FND_GLOBAL.USER_ID || '; Responsibility Application id: ' ||
2259: FND_GLOBAL.RESP_APPL_ID || '; Responsibility Id: ' || FND_GLOBAL.RESP_ID ||
2260: '; Security Group id: '|| FND_GLOBAL.SECURITY_GROUP_ID ||'; User Lang: '|| USERENV('LANG') );
2261: INV_EBI_UTIL.debug_line( ' **************** End of Apps Context ****************' );
2262:
2263: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2264: x_out := inv_ebi_eco_output_obj_tbl();
2265: l_revitem_output_tbl := inv_ebi_revitem_output_obj_tbl();
2281: l_inv_ebi_eco_obj := l_eco_obj_tbl(i);
2282: l_eco_name := l_eco_obj_tbl(i).eco_change_order_type.eco_name;
2283: l_org_code := l_eco_obj_tbl(i).eco_change_order_type.organization_code;
2284:
2285: l_is_master_org := INV_EBI_UTIL.is_master_org(l_org_code);
2286:
2287: IF( l_is_master_org = fnd_api.g_true ) THEN
2288:
2289: INV_EBI_UTIL.debug_line('STEP 20: BEFORE CALLING INV_EBI_CHANGE_ORDER_PUB.process_change_order_items for Master ORG'||
2285: l_is_master_org := INV_EBI_UTIL.is_master_org(l_org_code);
2286:
2287: IF( l_is_master_org = fnd_api.g_true ) THEN
2288:
2289: INV_EBI_UTIL.debug_line('STEP 20: BEFORE CALLING INV_EBI_CHANGE_ORDER_PUB.process_change_order_items for Master ORG'||
2290: ' Organization Code: '||l_eco_obj_tbl(i).eco_change_order_type.organization_code||
2291: ' ECO Name: '||l_eco_obj_tbl(i).eco_change_order_type.eco_name);
2292:
2293:
2322:
2323: END LOOP;
2324: END IF;
2325:
2326: INV_EBI_UTIL.debug_line('STEP 30: AFTER CALLING INV_EBI_CHANGE_ORDER_PUB.process_change_order_items for Master ORG'||
2327: ' Organization Code: '||l_eco_obj_tbl(i).eco_change_order_type.organization_code||
2328: ' ECO Name: '||l_eco_obj_tbl(i).eco_change_order_type.eco_name||' RETURN STATUS: '||l_item_output_obj.output_status.return_status);
2329:
2330: END IF;
2335:
2336: l_inv_ebi_eco_obj := l_eco_obj_tbl(i);
2337: l_eco_name := l_eco_obj_tbl(i).eco_change_order_type.eco_name;
2338: l_org_code := l_eco_obj_tbl(i).eco_change_order_type.organization_code;
2339: l_is_master_org := INV_EBI_UTIL.is_master_org(l_org_code);
2340:
2341: IF( l_is_master_org = fnd_api.g_false ) THEN
2342:
2343: INV_EBI_UTIL.debug_line('STEP 40: BEFORE CALLING INV_EBI_CHANGE_ORDER_PUB.process_change_order_items for Child ORG'||
2339: l_is_master_org := INV_EBI_UTIL.is_master_org(l_org_code);
2340:
2341: IF( l_is_master_org = fnd_api.g_false ) THEN
2342:
2343: INV_EBI_UTIL.debug_line('STEP 40: BEFORE CALLING INV_EBI_CHANGE_ORDER_PUB.process_change_order_items for Child ORG'||
2344: ' Organization Code: '||l_eco_obj_tbl(i).eco_change_order_type.organization_code||
2345: ' ECO Name: '||l_eco_obj_tbl(i).eco_change_order_type.eco_name);
2346:
2347: --To Create Items in Child Org
2381: END LOOP;
2382:
2383: END IF;
2384:
2385: INV_EBI_UTIL.debug_line('STEP 50: AFTER CALLING INV_EBI_CHANGE_ORDER_PUB.process_change_order_items for Child ORG'||
2386: ' Organization Code: '||l_eco_obj_tbl(i).eco_change_order_type.organization_code||
2387: ' ECO Name: '||l_eco_obj_tbl(i).eco_change_order_type.eco_name||' RETURN STATUS: '||l_item_output_obj.output_status.return_status);
2388:
2389:
2409: -- be a pending CO while trying to update the item,as it is not possible to update lc/lcp/status when there are pending
2410: -- CO's,so callout to process_update_item_lifecycle api is made to update these 3 attributes before CO is created.
2411: -- If user wants to update these values again,all the pending CO's should be implemented/cancelled.
2412:
2413: INV_EBI_UTIL.debug_line('STEP 60: BEFORE CALLING INV_EBI_ITEM_HELPER.process_update_item_lifecycle');
2414: INV_EBI_ITEM_HELPER.process_update_item_lifecycle(
2415: p_commit => FND_API.g_false
2416: ,p_update_item_tbl => l_updated_item_tbl
2417: ,x_out => l_item_output_obj
2415: p_commit => FND_API.g_false
2416: ,p_update_item_tbl => l_updated_item_tbl
2417: ,x_out => l_item_output_obj
2418: );
2419: INV_EBI_UTIL.debug_line('STEP 70: AFTER CALLING INV_EBI_ITEM_HELPER.process_update_item_lifecycle for item updation STATUS: '|| l_item_output_obj.output_status.return_status);
2420:
2421: --End of bug 10416391
2422:
2423: IF (l_item_output_obj.output_status.return_status <> fnd_api.g_ret_sts_success) THEN
2437: END LOOP;
2438: RAISE fnd_api.g_exc_unexpected_error;
2439: END IF;
2440:
2441: INV_EBI_UTIL.debug_line('STEP 80: BEFORE CALLING INV_EBI_CHANGE_ORDER_PUB.process_bom');
2442: process_bom(
2443: p_commit => p_commit
2444: ,p_eco_obj_list => l_eco_obj_tbl
2445: ,x_eco_obj_list => l_eco_obj_list
2445: ,x_eco_obj_list => l_eco_obj_list
2446: ,x_out => l_inv_ebi_eco_output_obj
2447: );
2448:
2449: INV_EBI_UTIL.debug_line('STEP 90: AFTER CALLING INV_EBI_CHANGE_ORDER_PUB.process_bom status is ' || l_inv_ebi_eco_output_obj.output_status.return_status);
2450: IF (l_inv_ebi_eco_output_obj.output_status.return_status <> FND_API.g_ret_sts_success )THEN
2451: l_eco_name := l_inv_ebi_eco_output_obj.change_notice;
2452: l_org_code := l_inv_ebi_eco_output_obj.organization_code;
2453: FOR i IN 1..l_eco_obj_tbl.COUNT LOOP
2465: LOOP
2466: l_inv_ebi_eco_obj := l_eco_obj_list(i);
2467: l_eco_name := l_eco_obj_list(i).eco_change_order_type.eco_name;
2468: l_org_code := l_eco_obj_list(i).eco_change_order_type.organization_code;
2469: INV_EBI_UTIL.debug_line('STEP 100: BEFORE CALLING INV_EBI_CHANGE_ORDER_PUB.process_change_order');
2470:
2471: process_change_order(
2472: p_commit => p_commit
2473: ,p_eco_obj => l_inv_ebi_eco_obj
2472: p_commit => p_commit
2473: ,p_eco_obj => l_inv_ebi_eco_obj
2474: ,x_out => l_inv_ebi_eco_output_obj
2475: );
2476: INV_EBI_UTIL.debug_line('STEP 110: AFTER CALLING INV_EBI_CHANGE_ORDER_PUB.process_change_order STATUS '|| l_inv_ebi_eco_output_obj.output_status.return_status);
2477: x_out(i) := l_inv_ebi_eco_output_obj;
2478:
2479: IF x_out(i).output_status.return_status <> FND_API.G_RET_STS_SUCCESS THEN
2480:
2486:
2487: --Item updation to be done after change Order creation
2488:
2489: -- update items
2490: INV_EBI_UTIL.debug_line('STEP 120: BEFORE CALLING INV_EBI_CHANGE_ORDER_PUB.process_update_items ');
2491: process_update_items(
2492: p_commit => p_commit
2493: ,p_update_item_tbl => l_updated_item_tbl
2494: ,x_out => l_item_output_obj
2493: ,p_update_item_tbl => l_updated_item_tbl
2494: ,x_out => l_item_output_obj
2495: );
2496:
2497: INV_EBI_UTIL.debug_line('STEP 130: AFTER CALLING INV_EBI_CHANGE_ORDER_PUB.process_update_items STATUS: '|| l_item_output_obj.output_status.return_status);
2498: IF (l_item_output_obj.output_status.return_status <> fnd_api.g_ret_sts_success) THEN
2499: l_item_name := l_item_output_obj.item_number;
2500: l_org_code := l_item_output_obj.organization_code;
2501:
2513: RAISE fnd_api.g_exc_unexpected_error;
2514: END IF;
2515:
2516: -- Start of Bug 10416673
2517: IF (INV_EBI_UTIL.is_pim_installed) THEN
2518: FOR i in 1..l_eco_obj_list.COUNT
2519: LOOP
2520:
2521: IF(l_eco_obj_list(i).eco_revised_item_type IS NOT NULL AND l_eco_obj_list(i).eco_revised_item_type.COUNT > 0) THEN
2520:
2521: IF(l_eco_obj_list(i).eco_revised_item_type IS NOT NULL AND l_eco_obj_list(i).eco_revised_item_type.COUNT > 0) THEN
2522: FOR j IN 1..l_eco_obj_list(i).eco_revised_item_type.COUNT
2523: LOOP
2524: INV_EBI_UTIL.debug_line('STEP 140: Processing Revised Item udas ');
2525: IF ( l_eco_obj_list(i).eco_revised_item_type(j).item.uda_type IS NOT NULL AND
2526: l_eco_obj_list(i).eco_revised_item_type(j).item.uda_type.attribute_group_tbl.COUNT > 0) THEN
2527:
2528: -- To process Revised Item udas
2536: ,p_item_number => l_eco_obj_list(i).eco_revised_item_type(j).revised_item_name
2537: );
2538:
2539:
2540: INV_EBI_UTIL.debug_line('STEP 150: START CALLING INV_EBI_ITEM_HELPER.process_item_uda'||'INV ITEM ID: '||l_inventory_item_id ||
2541: 'ORG ID: '||l_organization_id|| 'CATALOG GROUP ID: '||l_eco_obj_list(i).eco_revised_item_type(j).item.main_obj_type.item_catalog_group_id ||
2542: 'REVISED ITEM REVISION: '||l_eco_obj_list(i).eco_revised_item_type(j).new_revised_item_revision);
2543: INV_EBI_ITEM_HELPER.process_item_uda(
2544: p_api_version => l_api_version
2551: ,p_commit => fnd_api.g_false
2552: ,x_uda_output_obj => l_item_output_obj
2553: );
2554:
2555: INV_EBI_UTIL.debug_line('STEP 160: AFTER CALLING INV_EBI_ITEM_HELPER.process_item_uda STATUS: '|| l_item_output_obj.output_status.return_status);
2556: END IF;
2557:
2558: IF (l_item_output_obj.output_status.return_status <> FND_API.g_ret_sts_success) THEN
2559: x_out(i) := inv_ebi_eco_output_obj( l_eco_obj_list(i).eco_change_order_type.eco_name,NULL,NULL,l_eco_obj_list(i).eco_change_order_type.organization_code
2564: END IF;
2565: END LOOP;
2566: END IF;
2567: -- End of Bug 10416673
2568: INV_EBI_UTIL.debug_line('STEP 170: START CALLING populate_revised_items_out');
2569:
2570: FOR i in 1..l_eco_obj_list.COUNT LOOP
2571:
2572: l_inv_ebi_eco_obj := l_eco_obj_list(i);
2581: IF FND_API.to_boolean(p_commit) THEN
2582: COMMIT;
2583: END IF;
2584:
2585: INV_EBI_UTIL.debug_line('STEP 180: END INSIDE INV_EBI_CHANGE_ORDER_PUB.process_change_order_list STATUS: '|| x_return_status);
2586:
2587: EXCEPTION
2588: WHEN FND_API.g_exc_unexpected_error THEN
2589: ROLLBACK TO inv_ebi_prc_chg_ord_save_pnt;
2641: BEGIN
2642: SAVEPOINT inv_ebi_prc_chg_lst_save_pnt;
2643: ERROR_HANDLER.Initialize;
2644: FND_MSG_PUB.initialize;
2645: INV_EBI_UTIL.setup();
2646: INV_EBI_UTIL.debug_line('STEP 10: START INSIDE INV_EBI_CHANGE_ORDER_PUB.process_change_order_list');
2647: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2648:
2649: IF (p_eco_obj_list IS NOT NULL AND p_eco_obj_list.count > 0) THEN
2642: SAVEPOINT inv_ebi_prc_chg_lst_save_pnt;
2643: ERROR_HANDLER.Initialize;
2644: FND_MSG_PUB.initialize;
2645: INV_EBI_UTIL.setup();
2646: INV_EBI_UTIL.debug_line('STEP 10: START INSIDE INV_EBI_CHANGE_ORDER_PUB.process_change_order_list');
2647: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2648:
2649: IF (p_eco_obj_list IS NOT NULL AND p_eco_obj_list.count > 0) THEN
2650: INV_EBI_UTIL.debug_line('STEP 20: START CALLING INV_EBI_CHANGE_ORDER_PUB.process_change_order_list_core');
2646: INV_EBI_UTIL.debug_line('STEP 10: START INSIDE INV_EBI_CHANGE_ORDER_PUB.process_change_order_list');
2647: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2648:
2649: IF (p_eco_obj_list IS NOT NULL AND p_eco_obj_list.count > 0) THEN
2650: INV_EBI_UTIL.debug_line('STEP 20: START CALLING INV_EBI_CHANGE_ORDER_PUB.process_change_order_list_core');
2651: process_change_order_list_core( p_commit => fnd_api.g_false
2652: ,p_eco_obj_list => p_eco_obj_list
2653: ,x_out => x_out
2654: ,x_return_status => x_return_status
2653: ,x_out => x_out
2654: ,x_return_status => x_return_status
2655: ,x_msg_count => x_msg_count
2656: ,x_msg_data => x_msg_data);
2657: INV_EBI_UTIL.debug_line('STEP 30: END CALLING INV_EBI_CHANGE_ORDER_PUB.process_change_order_list_core STATUS: '|| x_return_status);
2658: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2659: RAISE FND_API.g_exc_unexpected_error;
2660: END IF;
2661: END IF;
2659: RAISE FND_API.g_exc_unexpected_error;
2660: END IF;
2661: END IF;
2662:
2663: INV_EBI_UTIL.debug_line('STEP 40: END INSIDE INV_EBI_CHANGE_ORDER_PUB.process_change_order_list');
2664: INV_EBI_UTIL.wrapup;
2665:
2666: EXCEPTION
2667: WHEN FND_API.g_exc_unexpected_error THEN
2660: END IF;
2661: END IF;
2662:
2663: INV_EBI_UTIL.debug_line('STEP 40: END INSIDE INV_EBI_CHANGE_ORDER_PUB.process_change_order_list');
2664: INV_EBI_UTIL.wrapup;
2665:
2666: EXCEPTION
2667: WHEN FND_API.g_exc_unexpected_error THEN
2668: ROLLBACK TO inv_ebi_prc_chg_lst_save_pnt;
2692: BEGIN
2693: --SAVEPOINT inv_ebi_val_chg_lst_save_pnt;
2694: ERROR_HANDLER.Initialize;
2695: FND_MSG_PUB.initialize;
2696: INV_EBI_UTIL.setup();
2697: INV_EBI_UTIL.debug_line('STEP 10: START INSIDE INV_EBI_CHANGE_ORDER_PUB.validate_change_order_list');
2698: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2699:
2700: IF (p_eco_obj_list IS NOT NULL AND p_eco_obj_list.count > 0) THEN
2693: --SAVEPOINT inv_ebi_val_chg_lst_save_pnt;
2694: ERROR_HANDLER.Initialize;
2695: FND_MSG_PUB.initialize;
2696: INV_EBI_UTIL.setup();
2697: INV_EBI_UTIL.debug_line('STEP 10: START INSIDE INV_EBI_CHANGE_ORDER_PUB.validate_change_order_list');
2698: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2699:
2700: IF (p_eco_obj_list IS NOT NULL AND p_eco_obj_list.count > 0) THEN
2701: INV_EBI_UTIL.debug_line('STEP 20: BEFORE CALLING INV_EBI_CHANGE_ORDER_PUB.process_change_order_list_core');
2697: INV_EBI_UTIL.debug_line('STEP 10: START INSIDE INV_EBI_CHANGE_ORDER_PUB.validate_change_order_list');
2698: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2699:
2700: IF (p_eco_obj_list IS NOT NULL AND p_eco_obj_list.count > 0) THEN
2701: INV_EBI_UTIL.debug_line('STEP 20: BEFORE CALLING INV_EBI_CHANGE_ORDER_PUB.process_change_order_list_core');
2702: process_change_order_list_core( p_commit => fnd_api.g_false
2703: ,p_eco_obj_list => p_eco_obj_list
2704: ,x_out => x_out
2705: ,x_return_status => x_return_status
2704: ,x_out => x_out
2705: ,x_return_status => x_return_status
2706: ,x_msg_count => x_msg_count
2707: ,x_msg_data => x_msg_data);
2708: INV_EBI_UTIL.debug_line('STEP 30: AFTER CALLING INV_EBI_CHANGE_ORDER_PUB.process_change_order_list_core'||'RETURN STATUS: '||x_return_status);
2709: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2710: RAISE FND_API.g_exc_unexpected_error;
2711: END IF;
2712: END IF;
2712: END IF;
2713:
2714: -- ROLLBACK TO inv_ebi_val_chg_lst_save_pnt;
2715: ROLLBACK;
2716: INV_EBI_UTIL.debug_line('STEP 40: END INSIDE INV_EBI_CHANGE_ORDER_PUB.validate_change_order_list');
2717: INV_EBI_UTIL.wrapup;
2718:
2719: EXCEPTION
2720: WHEN FND_API.g_exc_unexpected_error THEN
2713:
2714: -- ROLLBACK TO inv_ebi_val_chg_lst_save_pnt;
2715: ROLLBACK;
2716: INV_EBI_UTIL.debug_line('STEP 40: END INSIDE INV_EBI_CHANGE_ORDER_PUB.validate_change_order_list');
2717: INV_EBI_UTIL.wrapup;
2718:
2719: EXCEPTION
2720: WHEN FND_API.g_exc_unexpected_error THEN
2721: --ROLLBACK TO inv_ebi_val_chg_lst_save_pnt;