74: , p_change_comments IN VARCHAR2
75: , p_msg_count OUT NOCOPY NUMBER
76: , p_msg_data OUT NOCOPY VARCHAR2
77: , p_return_status OUT NOCOPY VARCHAR2
78: , p_mc_err_handling_flag IN NUMBER DEFAULT FND_API.G_MISS_NUM
79: , p_error_count OUT NOCOPY NUMBER
80: , p_accounting_rule_id IN NUMBER
81: , p_accounting_rule_duration IN NUMBER
82: , p_agreement_id IN NUMBER
337: ( x_return_status => l_return_status
338: , p_x_header_rec => l_x_header_rec
339: , p_header_id => l_header_id);
340:
341: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
342: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
343: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
344: RAISE FND_API.G_EXC_ERROR;
345: END IF;
338: , p_x_header_rec => l_x_header_rec
339: , p_header_id => l_header_id);
340:
341: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
342: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
343: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
344: RAISE FND_API.G_EXC_ERROR;
345: END IF;
346:
339: , p_header_id => l_header_id);
340:
341: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
342: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
343: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
344: RAISE FND_API.G_EXC_ERROR;
345: END IF;
346:
347:
340:
341: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
342: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
343: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
344: RAISE FND_API.G_EXC_ERROR;
345: END IF;
346:
347:
348:
917: --End of bug 4882981
918:
919: Oe_Order_Pvt.Header
920: (
921: p_validation_level => FND_API.G_VALID_LEVEL_FULL
922: , p_init_msg_list => l_init_msg_list
923: , p_control_rec => l_control_rec
924: , p_x_header_rec => l_header_rec
925: , p_x_old_header_rec => l_old_header_rec
928:
929:
930: p_return_status := l_return_status;
931: OE_DEBUG_PUB.Add('return_status='||l_return_status);
932: if l_return_status in(FND_API.G_RET_STS_ERROR,
933: FND_API.G_RET_STS_UNEXP_ERROR) then
934: ROLLBACK TO SAVEPOINT Process_Order_Scalar;
935: G_ERROR_COUNT := G_ERROR_COUNT + 1;
936:
929:
930: p_return_status := l_return_status;
931: OE_DEBUG_PUB.Add('return_status='||l_return_status);
932: if l_return_status in(FND_API.G_RET_STS_ERROR,
933: FND_API.G_RET_STS_UNEXP_ERROR) then
934: ROLLBACK TO SAVEPOINT Process_Order_Scalar;
935: G_ERROR_COUNT := G_ERROR_COUNT + 1;
936:
937: l_error_count := l_error_count + 1;
949:
950: end if;
951: -- loop exception handling
952: Exception
953: WHEN FND_API.G_EXC_ERROR THEN
954: p_return_status := FND_API.G_RET_STS_ERROR ;
955: OE_MSG_PUB.Count_And_Get
956: ( p_count => p_msg_count,
957: p_data => p_msg_data
950: end if;
951: -- loop exception handling
952: Exception
953: WHEN FND_API.G_EXC_ERROR THEN
954: p_return_status := FND_API.G_RET_STS_ERROR ;
955: OE_MSG_PUB.Count_And_Get
956: ( p_count => p_msg_count,
957: p_data => p_msg_data
958: );
965: if l_mc_err_handling_flag in (EXIT_FIRST_ERROR,SKIP_CONTINUE) then
966: exit;
967: end if;
968:
969: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
970: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
971: OE_MSG_PUB.Count_And_Get
972: ( p_count => p_msg_count,
973: p_data => p_msg_data
966: exit;
967: end if;
968:
969: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
970: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
971: OE_MSG_PUB.Count_And_Get
972: ( p_count => p_msg_count,
973: p_data => p_msg_data
974: );
983: end if;
984:
985:
986: WHEN OTHERS THEN
987: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
988: IF OE_MSG_PUB.Check_Msg_Level
989: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
990: THEN
991: OE_MSG_PUB.Add_Exc_Msg
1008: END;
1009:
1010: --End LOOP; /* end of FOR loop */
1011: -- moved execution of delayed request inside the for loop for bug 4882981
1012: IF p_return_status = FND_API.G_RET_STS_SUCCESS THEN
1013: --{ SUCCESS from OE_ORDER_PVT.Header
1014: BEGIN
1015: -- call to post_line_process is not needed for headers mass change
1016: /*
1064: p_count => p_msg_count,
1065: p_data => p_msg_data
1066: );
1067:
1068: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1069: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1070: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1071: RAISE FND_API.G_EXC_ERROR;
1072: END IF;
1065: p_data => p_msg_data
1066: );
1067:
1068: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1069: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1070: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1071: RAISE FND_API.G_EXC_ERROR;
1072: END IF;
1073:
1066: );
1067:
1068: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1069: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1070: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1071: RAISE FND_API.G_EXC_ERROR;
1072: END IF;
1073:
1074:
1067:
1068: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1069: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1070: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1071: RAISE FND_API.G_EXC_ERROR;
1072: END IF;
1073:
1074:
1075: oe_debug_pub.add('p_cascade_header_changes' || p_cascade_header_changes);
1087: ,x_msg_data => p_msg_data
1088: );
1089:
1090: oe_debug_pub.add('return_status from cascade_header_attributes '|| l_return_status);
1091: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1092: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1093: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1094: RAISE FND_API.G_EXC_ERROR;
1095: END IF;
1088: );
1089:
1090: oe_debug_pub.add('return_status from cascade_header_attributes '|| l_return_status);
1091: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1092: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1093: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1094: RAISE FND_API.G_EXC_ERROR;
1095: END IF;
1096: --}
1089:
1090: oe_debug_pub.add('return_status from cascade_header_attributes '|| l_return_status);
1091: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1092: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1093: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1094: RAISE FND_API.G_EXC_ERROR;
1095: END IF;
1096: --}
1097: END IF;
1090: oe_debug_pub.add('return_status from cascade_header_attributes '|| l_return_status);
1091: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1092: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1093: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1094: RAISE FND_API.G_EXC_ERROR;
1095: END IF;
1096: --}
1097: END IF;
1098: -- End of Cascade Header changes in Mass Change ER 7509356
1099:
1100:
1101:
1102: EXCEPTION
1103: WHEN FND_API.G_EXC_ERROR THEN
1104: l_error_count := l_error_count + 1;
1105: p_error_count := l_error_count;
1106: p_return_status := FND_API.G_RET_STS_ERROR ;
1107: OE_MSG_PUB.Count_And_Get
1102: EXCEPTION
1103: WHEN FND_API.G_EXC_ERROR THEN
1104: l_error_count := l_error_count + 1;
1105: p_error_count := l_error_count;
1106: p_return_status := FND_API.G_RET_STS_ERROR ;
1107: OE_MSG_PUB.Count_And_Get
1108: ( p_count => p_msg_count,
1109: p_data => p_msg_data
1110: );
1114: G_ERROR_COUNT := G_ERROR_COUNT + 1;
1115: ROLLBACK TO SAVEPOINT Process_Order_Scalar;
1116:
1117:
1118: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1119: l_error_count := l_error_count + 1;
1120: p_error_count := l_error_count;
1121: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1122: OE_MSG_PUB.Count_And_Get
1117:
1118: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1119: l_error_count := l_error_count + 1;
1120: p_error_count := l_error_count;
1121: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1122: OE_MSG_PUB.Count_And_Get
1123: ( p_count => p_msg_count,
1124: p_data => p_msg_data
1125: );
1131:
1132: WHEN OTHERS THEN
1133: l_error_count := l_error_count + 1;
1134: p_error_count := l_error_count;
1135: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1136: IF OE_MSG_PUB.Check_Msg_Level
1137: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1138: THEN
1139: OE_MSG_PUB.Add_Exc_Msg
1171: , p_change_comments IN VARCHAR2
1172: , p_msg_count OUT NOCOPY NUMBER
1173: , p_msg_data OUT NOCOPY VARCHAR2
1174: , p_return_status OUT NOCOPY VARCHAR2
1175: , p_mc_err_handling_flag IN NUMBER := FND_API.G_MISS_NUM
1176: , p_error_count OUT NOCOPY NUMBER
1177: , p_header_id IN NUMBER
1178: , p_accounting_rule_id IN NUMBER
1179: , p_accounting_rule_duration IN NUMBER
1521: l_current_org_id Number;
1522: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1523: l_error_count NUMBER := 0;
1524: l_header_id Number;
1525: l_init_msg_list VARCHAR2(1) := FND_API.G_TRUE;
1526: l_line_id Number;
1527: l_line_tbl OE_ORDER_PUB.Line_Tbl_Type;
1528: l_mc_err_handling_flag NUMBER := p_mc_err_handling_flag;
1529: l_num_of_records NUMBER;
1600: oe_debug_pub.add('l_rec - ' || l_rec);
1601: END IF;
1602:
1603: IF l_rec > 0 THEN
1604: l_init_msg_list := FND_API.G_FALSE;
1605: END IF;
1606:
1607: --Bug 7566697
1608: --Will be creating new savepoint only if the header has changed
1652: IF l_debug_level > 0 THEN
1653: OE_DEBUG_PUB.Add('After Lock Row - ' || l_return_status);
1654: END IF;
1655:
1656: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1657: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1658: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1659: RAISE FND_API.G_EXC_ERROR;
1660: END IF;
1653: OE_DEBUG_PUB.Add('After Lock Row - ' || l_return_status);
1654: END IF;
1655:
1656: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1657: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1658: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1659: RAISE FND_API.G_EXC_ERROR;
1660: END IF;
1661:
1654: END IF;
1655:
1656: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1657: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1658: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1659: RAISE FND_API.G_EXC_ERROR;
1660: END IF;
1661:
1662: l_line_tbl(l_rec).operation := OE_GLOBALS.G_OPR_UPDATE;
1655:
1656: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1657: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1658: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1659: RAISE FND_API.G_EXC_ERROR;
1660: END IF;
1661:
1662: l_line_tbl(l_rec).operation := OE_GLOBALS.G_OPR_UPDATE;
1663:
2812: -- bug 4339639
2813: OE_Versioning_Util.G_UI_CALLED := TRUE;
2814:
2815: Oe_Order_Pvt.Lines
2816: ( p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2817: p_init_msg_list => l_init_msg_list,
2818: p_control_rec => l_control_rec,
2819: p_x_line_tbl => l_line_tbl,
2820: p_x_old_line_tbl => l_old_line_tbl,
2823: IF l_debug_level > 0 THEN
2824: OE_DEBUG_PUB.Add('After Call to Process Order From MC - ' || l_return_status);
2825: END IF;
2826:
2827: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2828: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2829: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2830: RAISE FND_API.G_EXC_ERROR;
2831: END IF;
2824: OE_DEBUG_PUB.Add('After Call to Process Order From MC - ' || l_return_status);
2825: END IF;
2826:
2827: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2828: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2829: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2830: RAISE FND_API.G_EXC_ERROR;
2831: END IF;
2832:
2825: END IF;
2826:
2827: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2828: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2829: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2830: RAISE FND_API.G_EXC_ERROR;
2831: END IF;
2832:
2833: l_control_rec.controlled_operation := TRUE;
2826:
2827: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2828: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2829: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2830: RAISE FND_API.G_EXC_ERROR;
2831: END IF;
2832:
2833: l_control_rec.controlled_operation := TRUE;
2834: l_control_rec.process := TRUE;
2868: -- as a result of the delayed request execution
2869: OE_MSG_PUB.Count_and_Get(p_count => p_msg_count,
2870: p_data => p_msg_data);
2871:
2872: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2873: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2874: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2875: RAISE FND_API.G_EXC_ERROR;
2876: END IF;
2869: OE_MSG_PUB.Count_and_Get(p_count => p_msg_count,
2870: p_data => p_msg_data);
2871:
2872: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2873: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2874: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2875: RAISE FND_API.G_EXC_ERROR;
2876: END IF;
2877: EXCEPTION
2870: p_data => p_msg_data);
2871:
2872: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2873: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2874: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2875: RAISE FND_API.G_EXC_ERROR;
2876: END IF;
2877: EXCEPTION
2878:
2871:
2872: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2873: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2874: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2875: RAISE FND_API.G_EXC_ERROR;
2876: END IF;
2877: EXCEPTION
2878:
2879: WHEN FND_API.G_EXC_ERROR THEN
2875: RAISE FND_API.G_EXC_ERROR;
2876: END IF;
2877: EXCEPTION
2878:
2879: WHEN FND_API.G_EXC_ERROR THEN
2880: IF l_debug_level > 0 THEN
2881: oe_debug_pub.ADD('Exception - FND_API.G_EXC_ERROR');
2882: END IF;
2883:
2877: EXCEPTION
2878:
2879: WHEN FND_API.G_EXC_ERROR THEN
2880: IF l_debug_level > 0 THEN
2881: oe_debug_pub.ADD('Exception - FND_API.G_EXC_ERROR');
2882: END IF;
2883:
2884: p_return_status := FND_API.G_RET_STS_ERROR ;
2885: OE_SET_UTIL.G_SET_TBL.delete; --bug#2428456
2880: IF l_debug_level > 0 THEN
2881: oe_debug_pub.ADD('Exception - FND_API.G_EXC_ERROR');
2882: END IF;
2883:
2884: p_return_status := FND_API.G_RET_STS_ERROR ;
2885: OE_SET_UTIL.G_SET_TBL.delete; --bug#2428456
2886: OE_SET_UTIL.G_SET_OPT_TBL.delete; -- bug#2428456
2887:
2888: oe_delayed_requests_pvt.Clear_Request(x_return_status=> l_return_status);
2932: else
2933: OE_DEBUG_PUB.Add('SKIP_ALL');
2934: end if;
2935:
2936: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2937: IF l_debug_level > 0 THEN
2938: oe_debug_pub.ADD('Exception - FND_API.G_EXC_UNEXPECTED_ERROR');
2939: END IF;
2940:
2934: end if;
2935:
2936: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2937: IF l_debug_level > 0 THEN
2938: oe_debug_pub.ADD('Exception - FND_API.G_EXC_UNEXPECTED_ERROR');
2939: END IF;
2940:
2941: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2942: OE_SET_UTIL.G_SET_TBL.delete; --bug#2428456
2937: IF l_debug_level > 0 THEN
2938: oe_debug_pub.ADD('Exception - FND_API.G_EXC_UNEXPECTED_ERROR');
2939: END IF;
2940:
2941: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2942: OE_SET_UTIL.G_SET_TBL.delete; --bug#2428456
2943: OE_SET_UTIL.G_SET_OPT_TBL.delete; -- bug#2428456
2944:
2945: oe_delayed_requests_pvt.Clear_Request(x_return_status=> l_return_status);
2991: end if;
2992:
2993: WHEN OTHERS THEN
2994: IF l_debug_level > 0 THEN
2995: oe_debug_pub.ADD('Exception - FND_API.G_EXC_ERROR');
2996: END IF;
2997:
2998: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2999: OE_SET_UTIL.G_SET_TBL.delete; --bug#2428456
2994: IF l_debug_level > 0 THEN
2995: oe_debug_pub.ADD('Exception - FND_API.G_EXC_ERROR');
2996: END IF;
2997:
2998: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2999: OE_SET_UTIL.G_SET_TBL.delete; --bug#2428456
3000: OE_SET_UTIL.G_SET_OPT_TBL.delete; -- bug#2428456
3001:
3002: oe_delayed_requests_pvt.Clear_Request(x_return_status=> l_return_status);