275: , x_msg_data => l_msg_data
276: , x_return_status => x_return_status
277: );
278:
279: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
280: RAISE FND_API.G_EXC_ERROR;
281: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
282: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
283: END IF;
276: , x_return_status => x_return_status
277: );
278:
279: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
280: RAISE FND_API.G_EXC_ERROR;
281: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
282: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
283: END IF;
284:
277: );
278:
279: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
280: RAISE FND_API.G_EXC_ERROR;
281: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
282: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
283: END IF;
284:
285: IF l_hold_result = FND_API.G_TRUE
278:
279: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
280: RAISE FND_API.G_EXC_ERROR;
281: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
282: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
283: END IF;
284:
285: IF l_hold_result = FND_API.G_TRUE
286: THEN
281: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
282: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
283: END IF;
284:
285: IF l_hold_result = FND_API.G_TRUE
286: THEN
287: OE_DEBUG_PUB.Add('OEXVCRHB: Hold already applied on Header ID:' ||
288: p_header_id );
289: ELSE
294: OE_DEBUG_PUB.Add('Call OE_Holds_PUB.Apply_Holds' );
295:
296: OE_Holds_PUB.Apply_Holds
297: ( p_api_version => 1.0
298: , p_validation_level => FND_API.G_VALID_LEVEL_NONE
299: , p_hold_source_rec => l_hold_source_rec
300: , x_msg_count => l_msg_count
301: , x_msg_data => l_msg_data
302: , x_return_status => x_return_status
301: , x_msg_data => l_msg_data
302: , x_return_status => x_return_status
303: );
304:
305: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
306: RAISE FND_API.G_EXC_ERROR;
307: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
308: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
309: ELSIF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
302: , x_return_status => x_return_status
303: );
304:
305: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
306: RAISE FND_API.G_EXC_ERROR;
307: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
308: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
309: ELSIF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
310: OE_DEBUG_PUB.ADD('OEXPCRGB: Credit check hold applied on header_ID: '
303: );
304:
305: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
306: RAISE FND_API.G_EXC_ERROR;
307: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
308: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
309: ELSIF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
310: OE_DEBUG_PUB.ADD('OEXPCRGB: Credit check hold applied on header_ID: '
311: ||p_header_id, 1);
304:
305: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
306: RAISE FND_API.G_EXC_ERROR;
307: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
308: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
309: ELSIF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
310: OE_DEBUG_PUB.ADD('OEXPCRGB: Credit check hold applied on header_ID: '
311: ||p_header_id, 1);
312: END IF;
305: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
306: RAISE FND_API.G_EXC_ERROR;
307: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
308: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
309: ELSIF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
310: OE_DEBUG_PUB.ADD('OEXPCRGB: Credit check hold applied on header_ID: '
311: ||p_header_id, 1);
312: END IF;
313: END IF; -- Check hold exist
319:
320: EXCEPTION
321:
322: WHEN OTHERS THEN
323: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
324: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
325: OE_MSG_PUB.Add_Exc_Msg
326: ( G_PKG_NAME
327: , 'Apply_exception_hold'
427: l_result_out VARCHAR2(100);
428: l_cc_hold_comment VARCHAR2(2000):= NULL;
429:
430: BEGIN
431: x_return_status := FND_API.G_RET_STS_SUCCESS;
432:
433: IF G_debug_flag = 'Y'
434: THEN
435: OE_DEBUG_PUB.ADD('OEXPCRGB: IN Credit_check_with_payment_typ ',1);
462: THEN
463: OE_DEBUG_PUB.ADD('x_return_status '|| x_return_status );
464: END IF;
465:
466: IF x_return_status = FND_API.G_RET_STS_ERROR
467: THEN
468: -- Assign the status to SUCCESS as the order will
469: -- put on hold when the status is error
470: -- GL currency conversion
468: -- Assign the status to SUCCESS as the order will
469: -- put on hold when the status is error
470: -- GL currency conversion
471:
472: x_return_status := FND_API.G_RET_STS_SUCCESS ;
473:
474: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
475: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
476: END IF;
470: -- GL currency conversion
471:
472: x_return_status := FND_API.G_RET_STS_SUCCESS ;
473:
474: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
475: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
476: END IF;
477:
478: IF G_debug_flag = 'Y'
471:
472: x_return_status := FND_API.G_RET_STS_SUCCESS ;
473:
474: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
475: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
476: END IF;
477:
478: IF G_debug_flag = 'Y'
479: THEN
483: END IF;
484:
485: EXCEPTION
486:
487: WHEN FND_API.G_EXC_ERROR THEN
488: x_return_status := FND_API.G_RET_STS_ERROR;
489: oe_debug_pub.add(' SQLERRM: '|| SQLERRM );
490: OE_MSG_PUB.Count_And_Get
491: ( p_count => l_msg_count,
484:
485: EXCEPTION
486:
487: WHEN FND_API.G_EXC_ERROR THEN
488: x_return_status := FND_API.G_RET_STS_ERROR;
489: oe_debug_pub.add(' SQLERRM: '|| SQLERRM );
490: OE_MSG_PUB.Count_And_Get
491: ( p_count => l_msg_count,
492: p_data => l_msg_data
491: ( p_count => l_msg_count,
492: p_data => l_msg_data
493: );
494:
495: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
496: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
497: oe_debug_pub.add(' SQLERRM: '|| SQLERRM );
498: OE_MSG_PUB.Count_And_Get
499: ( p_count => l_msg_count,
492: p_data => l_msg_data
493: );
494:
495: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
496: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
497: oe_debug_pub.add(' SQLERRM: '|| SQLERRM );
498: OE_MSG_PUB.Count_And_Get
499: ( p_count => l_msg_count,
500: p_data => l_msg_data
500: p_data => l_msg_data
501: );
502:
503: WHEN OTHERS THEN
504: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
505: oe_debug_pub.add(' SQLERRM: '|| SQLERRM );
506: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
507: THEN
508: FND_MSG_PUB.Add_Exc_Msg
582: OE_DEBUG_PUB.ADD('p_credit_check_rule_id => '|| p_credit_check_rule_id );
583: OE_DEBUG_PUB.ADD('p_need_exposure_details => '|| p_need_exposure_details );
584: END IF;
585:
586: x_return_status := FND_API.G_RET_STS_SUCCESS;
587: l_global_exposure_flag := 'N' ;
588:
589:
590: ---get credit check rule record
716: END LOOP;
717:
718: x_return_status:='C';
719:
720: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
721: THEN
722: RAISE FND_API.G_EXC_ERROR;
723: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
724: THEN
718: x_return_status:='C';
719:
720: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
721: THEN
722: RAISE FND_API.G_EXC_ERROR;
723: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
724: THEN
725: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
726: END IF;
719:
720: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
721: THEN
722: RAISE FND_API.G_EXC_ERROR;
723: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
724: THEN
725: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
726: END IF;
727:
721: THEN
722: RAISE FND_API.G_EXC_ERROR;
723: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
724: THEN
725: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
726: END IF;
727:
728: -----------End party ----
729: ---customer level exposure
854: END LOOP;
855:
856: ---bug fix 2439029
857:
858: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
859:
860: x_return_status:='C';
861:
862: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
858: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
859:
860: x_return_status:='C';
861:
862: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
863: THEN
864: RAISE FND_API.G_EXC_ERROR;
865: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
866: THEN
860: x_return_status:='C';
861:
862: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
863: THEN
864: RAISE FND_API.G_EXC_ERROR;
865: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
866: THEN
867: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
868: END IF;
861:
862: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
863: THEN
864: RAISE FND_API.G_EXC_ERROR;
865: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
866: THEN
867: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
868: END IF;
869:
863: THEN
864: RAISE FND_API.G_EXC_ERROR;
865: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
866: THEN
867: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
868: END IF;
869:
870: ----non pre-calculate exposure
871: ELSIF l_credit_check_rule_rec.quick_cr_check_flag ='N'
911: END LOOP;
912:
913: ---bug fix 2439029
914:
915: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
916:
917: x_return_status:='C';
918:
919: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
915: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
916:
917: x_return_status:='C';
918:
919: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
920: THEN
921: RAISE FND_API.G_EXC_ERROR;
922: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
923: THEN
917: x_return_status:='C';
918:
919: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
920: THEN
921: RAISE FND_API.G_EXC_ERROR;
922: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
923: THEN
924: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
925: END IF;
918:
919: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
920: THEN
921: RAISE FND_API.G_EXC_ERROR;
922: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
923: THEN
924: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
925: END IF;
926:
920: THEN
921: RAISE FND_API.G_EXC_ERROR;
922: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
923: THEN
924: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
925: END IF;
926:
927: END IF;
928:
967: , 'Get_Customer_Exposure'
968: );
969: END IF;
970:
971: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
972: END ;
973:
974: MO_GLOBAL.Set_Policy_Context('S', l_org_id) ;
975:
1078: END LOOP;
1079:
1080: ---bug fix 2439029
1081:
1082: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1083:
1084: x_return_status:='C';
1085:
1086: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
1082: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1083:
1084: x_return_status:='C';
1085:
1086: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
1087: THEN
1088: RAISE FND_API.G_EXC_ERROR;
1089: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
1090: THEN
1084: x_return_status:='C';
1085:
1086: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
1087: THEN
1088: RAISE FND_API.G_EXC_ERROR;
1089: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
1090: THEN
1091: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1092: END IF;
1085:
1086: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
1087: THEN
1088: RAISE FND_API.G_EXC_ERROR;
1089: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
1090: THEN
1091: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1092: END IF;
1093:
1087: THEN
1088: RAISE FND_API.G_EXC_ERROR;
1089: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
1090: THEN
1091: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1092: END IF;
1093:
1094: ----non pre-calculate exposure
1095: ELSIF l_credit_check_rule_rec.quick_cr_check_flag ='N'
1135: END LOOP;
1136:
1137: ---bug fix 2439029
1138:
1139: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1140:
1141: x_return_status:='C';
1142:
1143:
1140:
1141: x_return_status:='C';
1142:
1143:
1144: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
1145: THEN
1146: RAISE FND_API.G_EXC_ERROR;
1147: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
1148: THEN
1142:
1143:
1144: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
1145: THEN
1146: RAISE FND_API.G_EXC_ERROR;
1147: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
1148: THEN
1149: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1150: END IF;
1143:
1144: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
1145: THEN
1146: RAISE FND_API.G_EXC_ERROR;
1147: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
1148: THEN
1149: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1150: END IF;
1151: END IF;
1145: THEN
1146: RAISE FND_API.G_EXC_ERROR;
1147: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
1148: THEN
1149: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1150: END IF;
1151: END IF;
1152:
1153: END IF;
1158: END IF;
1159:
1160: EXCEPTION
1161:
1162: WHEN FND_API.G_EXC_ERROR THEN
1163: x_return_status := FND_API.G_RET_STS_ERROR;
1164: OE_MSG_PUB.Count_And_Get
1165: ( p_count => l_msg_count,
1166: p_data => l_msg_data
1159:
1160: EXCEPTION
1161:
1162: WHEN FND_API.G_EXC_ERROR THEN
1163: x_return_status := FND_API.G_RET_STS_ERROR;
1164: OE_MSG_PUB.Count_And_Get
1165: ( p_count => l_msg_count,
1166: p_data => l_msg_data
1167: );
1165: ( p_count => l_msg_count,
1166: p_data => l_msg_data
1167: );
1168:
1169: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1170: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1171: OE_MSG_PUB.Count_And_Get
1172: ( p_count => l_msg_count,
1173: p_data => l_msg_data
1166: p_data => l_msg_data
1167: );
1168:
1169: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1170: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1171: OE_MSG_PUB.Count_And_Get
1172: ( p_count => l_msg_count,
1173: p_data => l_msg_data
1174: );
1173: p_data => l_msg_data
1174: );
1175:
1176: WHEN OTHERS THEN
1177: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1178: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1179: THEN
1180: FND_MSG_PUB.Add_Exc_Msg
1181: ( G_PKG_NAME
1250: END IF;
1251:
1252: EXCEPTION
1253: WHEN OTHERS THEN
1254: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1255: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1256: THEN
1257: FND_MSG_PUB.Add_Exc_Msg
1258: ( G_PKG_NAME
1302: l_header_rec OE_Order_PUB.Header_Rec_Type;
1303:
1304: BEGIN
1305:
1306: x_return_status := FND_API.G_RET_STS_SUCCESS;
1307:
1308: IF G_debug_flag = 'Y'
1309: THEN
1310: OE_DEBUG_PUB.ADD('OEXPCRGB: IN Check_Credit ',1);
1475: END IF;
1476:
1477: -- Moved calling_action check to outside of status check
1478: IF p_calling_action <> 'EXTERNAL' THEN
1479: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1480:
1481:
1482: Apply_exception_hold
1483: ( p_header_id => p_header_id
1489: OE_DEBUG_PUB.ADD('Apply_exception_hold x_return_status => '
1490: || x_return_status );
1491: END IF;
1492:
1493: IF x_return_status = FND_API.G_RET_STS_SUCCESS
1494: THEN
1495: x_return_status := FND_API.G_RET_STS_ERROR;
1496: ELSE
1497: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1491: END IF;
1492:
1493: IF x_return_status = FND_API.G_RET_STS_SUCCESS
1494: THEN
1495: x_return_status := FND_API.G_RET_STS_ERROR;
1496: ELSE
1497: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1498: END IF;
1499: END IF; -- apply exception hold
1493: IF x_return_status = FND_API.G_RET_STS_SUCCESS
1494: THEN
1495: x_return_status := FND_API.G_RET_STS_ERROR;
1496: ELSE
1497: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1498: END IF;
1499: END IF; -- apply exception hold
1500: -- set result out to FAIL when credit check failed or
1501: -- when an exception occurred and a hold was successfully placed
1499: END IF; -- apply exception hold
1500: -- set result out to FAIL when credit check failed or
1501: -- when an exception occurred and a hold was successfully placed
1502:
1503: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1504: x_result_out := 'FAIL' ;
1505: END IF;
1506: ELSE -- for the case of EXTERNAL credit check
1507: -- x_return_status is either SUCCESS, ERROR or UNEXP_ERROR
1510: -- In this case, don't attempt to place credit hold
1511: -- set return status to SUCCESS with result_out=FAIL to indicate that
1512: -- credit checking completed successfully, even though
1513: -- the result_out is failure.
1514: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1515:
1516: IF G_debug_flag = 'Y'
1517: THEN
1518: OE_DEBUG_PUB.ADD( ' x_return_status = '|| x_return_status );
1520: OE_Credit_Engine_GRP.G_currency_error_msg );
1521: END IF;
1522: END IF;
1523:
1524: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1525: x_result_out := 'FAIL';
1526: x_return_status := FND_API.G_RET_STS_SUCCESS;
1527: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1528: x_result_out := 'FAIL';
1522: END IF;
1523:
1524: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1525: x_result_out := 'FAIL';
1526: x_return_status := FND_API.G_RET_STS_SUCCESS;
1527: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1528: x_result_out := 'FAIL';
1529: END IF;
1530: -- for success, default is PASS
1523:
1524: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1525: x_result_out := 'FAIL';
1526: x_return_status := FND_API.G_RET_STS_SUCCESS;
1527: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1528: x_result_out := 'FAIL';
1529: END IF;
1530: -- for success, default is PASS
1531: END IF;
1558: OE_DEBUG_PUB.ADD('x_return_status = '|| x_return_status );
1559: OE_DEBUG_PUB.ADD('line hold count =>'||OE_Credit_Check_lines_PVT.G_line_hold_count);
1560: END IF;
1561:
1562: IF x_return_status <> FND_API.G_RET_STS_SUCCESS
1563: THEN
1564:
1565: OE_DEBUG_PUB.ADD('send failed ');
1566:
1563: THEN
1564:
1565: OE_DEBUG_PUB.ADD('send failed ');
1566:
1567: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1568:
1569: OE_DEBUG_PUB.ADD(' after assign x_return_status = '
1570: || x_return_status );
1571: END IF;
1600: END IF;
1601:
1602: EXCEPTION
1603:
1604: WHEN FND_API.G_EXC_ERROR THEN
1605: x_return_status := FND_API.G_RET_STS_ERROR;
1606: x_result_out := 'FAIL' ;
1607: OE_MSG_PUB.Count_And_Get
1608: ( p_count => x_msg_count,
1601:
1602: EXCEPTION
1603:
1604: WHEN FND_API.G_EXC_ERROR THEN
1605: x_return_status := FND_API.G_RET_STS_ERROR;
1606: x_result_out := 'FAIL' ;
1607: OE_MSG_PUB.Count_And_Get
1608: ( p_count => x_msg_count,
1609: p_data => x_msg_data
1608: ( p_count => x_msg_count,
1609: p_data => x_msg_data
1610: );
1611:
1612: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1613: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1614: x_result_out := 'FAIL' ;
1615: OE_MSG_PUB.Count_And_Get
1616: ( p_count => x_msg_count,
1609: p_data => x_msg_data
1610: );
1611:
1612: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1613: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1614: x_result_out := 'FAIL' ;
1615: OE_MSG_PUB.Count_And_Get
1616: ( p_count => x_msg_count,
1617: p_data => x_msg_data
1617: p_data => x_msg_data
1618: );
1619:
1620: WHEN OTHERS THEN
1621: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1622: x_result_out := 'FAIL' ;
1623: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1624: THEN
1625: FND_MSG_PUB.Add_Exc_Msg
1662: ELSE
1663: IF G_debug_flag = 'Y' THEN
1664: oe_debug_pub.add('OEXPCRGB: Unexpected error in setting org context where Customer Exposure flag is ''''N', 1 );
1665: END IF;
1666: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1667: END IF;
1668:
1669: OE_CREDIT_CHECK_UTIL.G_org_id := l_org_id ;
1670:
1670:
1671: IF l_org_id IS NULL THEN
1672: Fnd_Message.set_name('FND','MO_ORG_REQUIRED');
1673: Oe_Msg_Pub.Add;
1674: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1675: END IF;
1676:
1677: EXCEPTION
1678: WHEN NO_DATA_FOUND
1699: , 'Set_Context'
1700: );
1701: END IF;
1702:
1703: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1704:
1705: END Set_context ;
1706:
1707: /* End MOAC CREDIT CHECK CHANGE */