DBA Data[Home] [Help]

APPS.OE_CREDIT_PUB dependencies on FND_API

Line 71: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

67:
68: EXCEPTION
69:
70: WHEN others THEN
71: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
72: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
73:
74: OE_MSG_PUB.Add_Exc_Msg
75: ( G_PKG_NAME

Line 94: , p_trx_credit_limit IN NUMBER := FND_API.G_MISS_NUM

90:
91: PROCEDURE Check_Trx_Limit
92: ( p_header_rec IN OE_Order_PUB.Header_Rec_Type
93: , p_credit_rule_id IN NUMBER
94: , p_trx_credit_limit IN NUMBER := FND_API.G_MISS_NUM
95: , p_total_exposure IN NUMBER
96: , p_overall_credit_limit IN NUMBER
97: , p_result_out OUT NOCOPY /* file.sql.39 change */ VARCHAR2
98: , p_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2

Line 110: p_return_status := FND_API.G_RET_STS_SUCCESS;

106:
107: BEGIN
108:
109: -- Initialize return status to success
110: p_return_status := FND_API.G_RET_STS_SUCCESS;
111:
112: -- Default to Pass
113: p_result_out := 'PASS';
114:

Line 182: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

178:
179: EXCEPTION
180:
181: WHEN others THEN
182: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
183: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
184: OE_MSG_PUB.Add_Exc_Msg
185: ( G_PKG_NAME
186: , 'Check_Trx_Limit'

Line 200: ( p_header_id IN NUMBER := FND_API.G_MISS_NUM

196: -- should be checked, calculates total exposure, find credit limits
197: -- and determine result for calling function.
198:
199: PROCEDURE Check_Available_Credit
200: ( p_header_id IN NUMBER := FND_API.G_MISS_NUM
201: , p_calling_action IN VARCHAR2 := 'BOOKING'
202: , p_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER
203: , p_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2
204: , p_result_out OUT NOCOPY /* file.sql.39 change */ VARCHAR2 -- Pass or Fail Credit Check

Line 231: p_return_status := FND_API.G_RET_STS_SUCCESS;

227: -- Set the default behaviour to pass credit check
228: -- oe_debug_pub.debug_on;
229:
230: p_result_out := 'PASS';
231: p_return_status := FND_API.G_RET_STS_SUCCESS;
232:
233: oe_debug_pub.ADD('Calling action is '|| p_calling_action);
234:
235: -- The first thing to do is to load the record structure for the order header

Line 261: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

257: , l_trx_credit_limit
258: , l_return_status
259: );
260:
261: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
262: RAISE FND_API.G_EXC_ERROR;
263: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
264: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
265: END IF;

Line 262: RAISE FND_API.G_EXC_ERROR;

258: , l_return_status
259: );
260:
261: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
262: RAISE FND_API.G_EXC_ERROR;
263: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
264: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
265: END IF;
266:

Line 263: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

259: );
260:
261: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
262: RAISE FND_API.G_EXC_ERROR;
263: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
264: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
265: END IF;
266:
267: IF l_check_order = 'Y' THEN

Line 264: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

260:
261: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
262: RAISE FND_API.G_EXC_ERROR;
263: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
264: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
265: END IF;
266:
267: IF l_check_order = 'Y' THEN
268:

Line 281: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

277: ,l_credit_level
278: ,l_check_past_due
279: ,l_return_status
280: );
281: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
282: RAISE FND_API.G_EXC_ERROR;
283: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
284: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
285: END IF;

Line 282: RAISE FND_API.G_EXC_ERROR;

278: ,l_check_past_due
279: ,l_return_status
280: );
281: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
282: RAISE FND_API.G_EXC_ERROR;
283: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
284: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
285: END IF;
286:

Line 283: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

279: ,l_return_status
280: );
281: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
282: RAISE FND_API.G_EXC_ERROR;
283: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
284: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
285: END IF;
286:
287: IF l_check_past_due = 'N' THEN

Line 284: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

280: );
281: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
282: RAISE FND_API.G_EXC_ERROR;
283: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
284: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
285: END IF;
286:
287: IF l_check_past_due = 'N' THEN
288: -- Determine total exposure.

Line 302: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

298: , l_total_exposure
299: , l_return_status
300: );
301:
302: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
303: RAISE FND_API.G_EXC_ERROR;
304: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
305: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
306: END IF;

Line 303: RAISE FND_API.G_EXC_ERROR;

299: , l_return_status
300: );
301:
302: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
303: RAISE FND_API.G_EXC_ERROR;
304: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
305: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
306: END IF;
307:

Line 304: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

300: );
301:
302: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
303: RAISE FND_API.G_EXC_ERROR;
304: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
305: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
306: END IF;
307:
308: oe_debug_pub.ADD(' Credit Rule Id ='||to_char(l_credit_rule_id));

Line 305: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

301:
302: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
303: RAISE FND_API.G_EXC_ERROR;
304: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
305: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
306: END IF;
307:
308: oe_debug_pub.ADD(' Credit Rule Id ='||to_char(l_credit_rule_id));
309:

Line 330: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

326: oe_debug_pub.add('After the call for check_Trx_Limit');
327: oe_debug_pub.add('Result out ='||l_result_out);
328: oe_debug_pub.add('Return Status ='||l_return_status);
329:
330: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
331: RAISE FND_API.G_EXC_ERROR;
332: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
333: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
334: END IF;

Line 331: RAISE FND_API.G_EXC_ERROR;

327: oe_debug_pub.add('Result out ='||l_result_out);
328: oe_debug_pub.add('Return Status ='||l_return_status);
329:
330: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
331: RAISE FND_API.G_EXC_ERROR;
332: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
333: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
334: END IF;
335:

Line 332: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

328: oe_debug_pub.add('Return Status ='||l_return_status);
329:
330: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
331: RAISE FND_API.G_EXC_ERROR;
332: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
333: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
334: END IF;
335:
336: p_result_out := l_result_out;

Line 333: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

329:
330: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
331: RAISE FND_API.G_EXC_ERROR;
332: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
333: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
334: END IF;
335:
336: p_result_out := l_result_out;
337:

Line 366: WHEN FND_API.G_EXC_ERROR THEN

362: );
363:
364: EXCEPTION
365:
366: WHEN FND_API.G_EXC_ERROR THEN
367:
368: p_return_status := FND_API.G_RET_STS_ERROR;
369:
370: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 368: p_return_status := FND_API.G_RET_STS_ERROR;

364: EXCEPTION
365:
366: WHEN FND_API.G_EXC_ERROR THEN
367:
368: p_return_status := FND_API.G_RET_STS_ERROR;
369:
370: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
371:
372: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 370: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

366: WHEN FND_API.G_EXC_ERROR THEN
367:
368: p_return_status := FND_API.G_RET_STS_ERROR;
369:
370: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
371:
372: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
373:
374: WHEN OTHERS THEN

Line 372: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

368: p_return_status := FND_API.G_RET_STS_ERROR;
369:
370: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
371:
372: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
373:
374: WHEN OTHERS THEN
375:
376: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 376: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

372: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
373:
374: WHEN OTHERS THEN
375:
376: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
377:
378: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
379: THEN
380: OE_MSG_PUB.Add_Exc_Msg

Line 408: l_credit_limit_test NUMBER := FND_API.G_MISS_NUM;

404: , p_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2
405: )
406: IS
407: -- Set up working Variables for Check Order
408: l_credit_limit_test NUMBER := FND_API.G_MISS_NUM;
409: l_credit_check_term NUMBER := FND_API.G_MISS_NUM;
410: l_credit_check_rule_id NUMBER := FND_API.G_MISS_NUM;
411: l_credit_check_lvl_out VARCHAR2(30) := 'SITE';
412: l_check_order VARCHAR2(1);

Line 409: l_credit_check_term NUMBER := FND_API.G_MISS_NUM;

405: )
406: IS
407: -- Set up working Variables for Check Order
408: l_credit_limit_test NUMBER := FND_API.G_MISS_NUM;
409: l_credit_check_term NUMBER := FND_API.G_MISS_NUM;
410: l_credit_check_rule_id NUMBER := FND_API.G_MISS_NUM;
411: l_credit_check_lvl_out VARCHAR2(30) := 'SITE';
412: l_check_order VARCHAR2(1);
413: l_invoice_to_cust_id NUMBER;

Line 410: l_credit_check_rule_id NUMBER := FND_API.G_MISS_NUM;

406: IS
407: -- Set up working Variables for Check Order
408: l_credit_limit_test NUMBER := FND_API.G_MISS_NUM;
409: l_credit_check_term NUMBER := FND_API.G_MISS_NUM;
410: l_credit_check_rule_id NUMBER := FND_API.G_MISS_NUM;
411: l_credit_check_lvl_out VARCHAR2(30) := 'SITE';
412: l_check_order VARCHAR2(1);
413: l_invoice_to_cust_id NUMBER;
414:

Line 427: p_return_status := FND_API.G_RET_STS_SUCCESS;

423:
424: -- Set up a variable to capture the situation of having no credit
425: -- profile set up.
426:
427: p_return_status := FND_API.G_RET_STS_SUCCESS;
428:
429: -- Read the Credit Rules on the Order Type Definition for the
430: -- Order Being Credit Checked.
431: -- If Called from Validating the Order at Order Entry use the

Line 565: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

561: ( G_PKG_NAME
562: , 'Check Order:Check Customer'
563: );
564: END IF;
565: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
566: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
567:
568: END;
569:

Line 566: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

562: , 'Check Order:Check Customer'
563: );
564: END IF;
565: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
566: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
567:
568: END;
569:
570: -- If no credit limit has been set for either the total Order Amount

Line 621: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

617: ( G_PKG_NAME
618: , 'Check Order:Check Customer'
619: );
620: END IF;
621: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
622: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
623: END;
624:
625: -- If no credit limit has been set for either the total Order Amount

Line 622: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

618: , 'Check Order:Check Customer'
619: );
620: END IF;
621: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
622: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
623: END;
624:
625: -- If no credit limit has been set for either the total Order Amount
626: -- or the Total Exposure, do not credit check.

Line 670: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

666: ( G_PKG_NAME
667: , 'Check_Order: Check Terms'
668: );
669: END IF;
670: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
671: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
672:
673: END;
674:

Line 671: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

667: , 'Check_Order: Check Terms'
668: );
669: END IF;
670: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
671: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
672:
673: END;
674:
675: END IF; -- Order Type, Bill to or Customer are subject to Credit Check

Line 692: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

688: ( G_PKG_NAME
689: , 'Check_Order'
690: );
691: END IF;
692: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
693: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
694:
695: END Check_Order;
696:

Line 693: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

689: , 'Check_Order'
690: );
691: END IF;
692: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
693: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
694:
695: END Check_Order;
696:
697:

Line 1217: p_return_status := FND_API.G_RET_STS_SUCCESS;

1213:
1214: BEGIN
1215:
1216: -- Set the default behaviour to pass credit check exposure
1217: p_return_status := FND_API.G_RET_STS_SUCCESS;
1218: -- Read the Credit rule and determine the inclusions and exclusions for exposure
1219:
1220: -- Include Amounts on Receivables if within the AR horizon. Add the OPEN_AR_DAYS
1221: -- to todays date to determine the AR Horizon. Use this to compare the Due date on

Line 1651: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1647: ( G_PKG_NAME
1648: , 'Check_Exposure'
1649: );
1650: END IF;
1651: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1652:
1653: RAISE ;
1654:
1655: END Check_Exposure;

Line 1709: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1705: oe_debug_pub.ADD('OEXPCRCB.pls: Line level Past due Invoice Check:' || p_check_past_due);
1706: EXCEPTION
1707:
1708: WHEN others THEN
1709: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1710: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1711:
1712: OE_MSG_PUB.Add_Exc_Msg
1713: ( G_PKG_NAME

Line 1734: , p_trx_credit_limit IN NUMBER := FND_API.G_MISS_NUM

1730: , p_invoice_to_org_id IN NUMBER
1731: , p_customer_id IN NUMBER
1732: , p_credit_rule_id IN NUMBER
1733: , p_credit_level IN VARCHAR2
1734: , p_trx_credit_limit IN NUMBER := FND_API.G_MISS_NUM
1735: , p_total_exposure IN NUMBER
1736: , p_overall_credit_limit IN NUMBER
1737: , p_result_out OUT NOCOPY /* file.sql.39 change */ VARCHAR2
1738: , p_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2

Line 1750: p_return_status := FND_API.G_RET_STS_SUCCESS;

1746:
1747: BEGIN
1748:
1749: -- Initialize return status to success
1750: p_return_status := FND_API.G_RET_STS_SUCCESS;
1751:
1752: -- Default to Pass
1753: p_result_out := 'PASS';
1754:

Line 1846: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1842:
1843: EXCEPTION
1844:
1845: WHEN others THEN
1846: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1847: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1848: OE_MSG_PUB.Add_Exc_Msg
1849: ( G_PKG_NAME
1850: , 'Check_Trx_Limit_Line'

Line 1865: ( p_header_id IN NUMBER := FND_API.G_MISS_NUM

1861: -- and determine result for calling function.
1862:
1863: ----------------------------------------------------------------------------
1864: PROCEDURE Check_Available_Credit_Line
1865: ( p_header_id IN NUMBER := FND_API.G_MISS_NUM
1866: , p_invoice_to_org_id IN NUMBER := FND_API.G_MISS_NUM
1867: , p_calling_action IN VARCHAR2 := 'BOOKING'
1868: , p_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER
1869: , p_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2

Line 1866: , p_invoice_to_org_id IN NUMBER := FND_API.G_MISS_NUM

1862:
1863: ----------------------------------------------------------------------------
1864: PROCEDURE Check_Available_Credit_Line
1865: ( p_header_id IN NUMBER := FND_API.G_MISS_NUM
1866: , p_invoice_to_org_id IN NUMBER := FND_API.G_MISS_NUM
1867: , p_calling_action IN VARCHAR2 := 'BOOKING'
1868: , p_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER
1869: , p_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2
1870: , p_result_out OUT NOCOPY /* file.sql.39 change */ VARCHAR2 -- Pass or Fail Credit Check

Line 1895: p_return_status := FND_API.G_RET_STS_SUCCESS;

1891: -- Set the default behaviour to pass credit check
1892: -- oe_debug_pub.debug_on;
1893:
1894: p_result_out := 'PASS';
1895: p_return_status := FND_API.G_RET_STS_SUCCESS;
1896:
1897: oe_debug_pub.ADD('Line Level: Calling action is '|| p_calling_action);
1898:
1899: -- The first thing to do is to load the record structure for the order header

Line 1919: --x_return_status := FND_API.G_RET_STS_ERROR;

1915: FROM oe_invoice_to_orgs_v
1916: WHERE ORGANIZATION_ID = p_invoice_to_org_id;
1917: EXCEPTION
1918: WHEN no_data_found then
1919: --x_return_status := FND_API.G_RET_STS_ERROR;
1920: --FND_MESSAGE.SET_NAME('ONT', 'OE_INVALID_SITE_USE_ID');
1921: --OE_MSG_PUB.ADD;
1922: --fnd_message.set_token('SITE_USE_ID',
1923: -- to_char(p_hold_entity_id));

Line 1926: RAISE FND_API.G_EXC_ERROR;

1922: --fnd_message.set_token('SITE_USE_ID',
1923: -- to_char(p_hold_entity_id));
1924: OE_Debug_PUB.Add('OEXPCRCB: Line Level: No Customer ID for Bill to:' ||
1925: to_char(p_invoice_to_org_id), 1);
1926: RAISE FND_API.G_EXC_ERROR;
1927: END;
1928: OE_Debug_PUB.Add('OEXPCRCB: Line Level: Customer ID:' ||
1929: to_char(l_customer_id), 1);
1930: -- Now we have the Record Structure loaded we can call the other

Line 1950: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

1946: , l_trx_credit_limit
1947: , l_return_status
1948: );
1949:
1950: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1951: RAISE FND_API.G_EXC_ERROR;
1952: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1953: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1954: END IF;

Line 1951: RAISE FND_API.G_EXC_ERROR;

1947: , l_return_status
1948: );
1949:
1950: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1951: RAISE FND_API.G_EXC_ERROR;
1952: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1953: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1954: END IF;
1955:

Line 1952: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1948: );
1949:
1950: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1951: RAISE FND_API.G_EXC_ERROR;
1952: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1953: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1954: END IF;
1955:
1956: IF l_check_order = 'Y' THEN

Line 1953: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1949:
1950: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1951: RAISE FND_API.G_EXC_ERROR;
1952: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1953: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1954: END IF;
1955:
1956: IF l_check_order = 'Y' THEN
1957:

Line 1972: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

1968: ,l_credit_level
1969: ,l_check_past_due
1970: ,l_return_status
1971: );
1972: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1973: RAISE FND_API.G_EXC_ERROR;
1974: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1975: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1976: END IF;

Line 1973: RAISE FND_API.G_EXC_ERROR;

1969: ,l_check_past_due
1970: ,l_return_status
1971: );
1972: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1973: RAISE FND_API.G_EXC_ERROR;
1974: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1975: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1976: END IF;
1977:

Line 1974: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1970: ,l_return_status
1971: );
1972: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1973: RAISE FND_API.G_EXC_ERROR;
1974: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1975: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1976: END IF;
1977:
1978: IF l_check_past_due = 'N' THEN

Line 1975: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1971: );
1972: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1973: RAISE FND_API.G_EXC_ERROR;
1974: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1975: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1976: END IF;
1977:
1978: IF l_check_past_due = 'N' THEN
1979: -- Determine total exposure.

Line 1992: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

1988: , l_total_exposure
1989: , l_return_status
1990: );
1991:
1992: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1993: RAISE FND_API.G_EXC_ERROR;
1994: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1995: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1996: END IF;

Line 1993: RAISE FND_API.G_EXC_ERROR;

1989: , l_return_status
1990: );
1991:
1992: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1993: RAISE FND_API.G_EXC_ERROR;
1994: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1995: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1996: END IF;
1997:

Line 1994: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1990: );
1991:
1992: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1993: RAISE FND_API.G_EXC_ERROR;
1994: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1995: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1996: END IF;
1997:
1998: oe_debug_pub.ADD('Line Level: Credit Rule Id ='||to_char(l_credit_rule_id));

Line 1995: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1991:
1992: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1993: RAISE FND_API.G_EXC_ERROR;
1994: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1995: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1996: END IF;
1997:
1998: oe_debug_pub.ADD('Line Level: Credit Rule Id ='||to_char(l_credit_rule_id));
1999:

Line 2023: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

2019: oe_debug_pub.add('Line Level: After the call for check_Trx_Limit_Line');
2020: oe_debug_pub.add('Line level: Result out ='||l_result_out);
2021: oe_debug_pub.add('Line Level: Return Status ='||l_return_status);
2022:
2023: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2024: RAISE FND_API.G_EXC_ERROR;
2025: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2026: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2027: END IF;

Line 2024: RAISE FND_API.G_EXC_ERROR;

2020: oe_debug_pub.add('Line level: Result out ='||l_result_out);
2021: oe_debug_pub.add('Line Level: Return Status ='||l_return_status);
2022:
2023: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2024: RAISE FND_API.G_EXC_ERROR;
2025: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2026: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2027: END IF;
2028:

Line 2025: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

2021: oe_debug_pub.add('Line Level: Return Status ='||l_return_status);
2022:
2023: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2024: RAISE FND_API.G_EXC_ERROR;
2025: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2026: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2027: END IF;
2028:
2029: p_result_out := l_result_out;

Line 2026: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2022:
2023: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2024: RAISE FND_API.G_EXC_ERROR;
2025: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2026: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2027: END IF;
2028:
2029: p_result_out := l_result_out;
2030:

Line 2059: WHEN FND_API.G_EXC_ERROR THEN

2055: );
2056:
2057: EXCEPTION
2058:
2059: WHEN FND_API.G_EXC_ERROR THEN
2060:
2061: p_return_status := FND_API.G_RET_STS_ERROR;
2062:
2063: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2061: p_return_status := FND_API.G_RET_STS_ERROR;

2057: EXCEPTION
2058:
2059: WHEN FND_API.G_EXC_ERROR THEN
2060:
2061: p_return_status := FND_API.G_RET_STS_ERROR;
2062:
2063: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2064:
2065: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2063: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2059: WHEN FND_API.G_EXC_ERROR THEN
2060:
2061: p_return_status := FND_API.G_RET_STS_ERROR;
2062:
2063: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2064:
2065: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2066:
2067: WHEN OTHERS THEN

Line 2065: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2061: p_return_status := FND_API.G_RET_STS_ERROR;
2062:
2063: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2064:
2065: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2066:
2067: WHEN OTHERS THEN
2068:
2069: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2069: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2065: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2066:
2067: WHEN OTHERS THEN
2068:
2069: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2070:
2071: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2072: THEN
2073: OE_MSG_PUB.Add_Exc_Msg

Line 2103: l_credit_limit_test NUMBER := FND_API.G_MISS_NUM;

2099: , p_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2
2100: )
2101: IS
2102: -- Set up working Variables for Check Order
2103: l_credit_limit_test NUMBER := FND_API.G_MISS_NUM;
2104: l_credit_check_term NUMBER := FND_API.G_MISS_NUM;
2105: l_credit_check_rule_id NUMBER := FND_API.G_MISS_NUM;
2106: l_credit_check_lvl_out VARCHAR2(30) := 'SITE';
2107: l_check_order VARCHAR2(1);

Line 2104: l_credit_check_term NUMBER := FND_API.G_MISS_NUM;

2100: )
2101: IS
2102: -- Set up working Variables for Check Order
2103: l_credit_limit_test NUMBER := FND_API.G_MISS_NUM;
2104: l_credit_check_term NUMBER := FND_API.G_MISS_NUM;
2105: l_credit_check_rule_id NUMBER := FND_API.G_MISS_NUM;
2106: l_credit_check_lvl_out VARCHAR2(30) := 'SITE';
2107: l_check_order VARCHAR2(1);
2108:

Line 2105: l_credit_check_rule_id NUMBER := FND_API.G_MISS_NUM;

2101: IS
2102: -- Set up working Variables for Check Order
2103: l_credit_limit_test NUMBER := FND_API.G_MISS_NUM;
2104: l_credit_check_term NUMBER := FND_API.G_MISS_NUM;
2105: l_credit_check_rule_id NUMBER := FND_API.G_MISS_NUM;
2106: l_credit_check_lvl_out VARCHAR2(30) := 'SITE';
2107: l_check_order VARCHAR2(1);
2108:
2109: BEGIN

Line 2120: p_return_status := FND_API.G_RET_STS_SUCCESS;

2116:
2117: -- Set up a variable to capture the situation of having no credit
2118: -- profile set up.
2119:
2120: p_return_status := FND_API.G_RET_STS_SUCCESS;
2121:
2122: -- Read the Credit Rules on the Order Type Definition for the
2123: -- Order Being Credit Checked.
2124: -- If Called from Validating the Order at Order Entry use the

Line 2245: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2241: ( G_PKG_NAME
2242: , 'Check Order:Check Customer'
2243: );
2244: END IF;
2245: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2246: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2247: END;
2248:
2249: -- If no credit limit has been set for either the total Order Amount

Line 2246: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2242: , 'Check Order:Check Customer'
2243: );
2244: END IF;
2245: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2246: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2247: END;
2248:
2249: -- If no credit limit has been set for either the total Order Amount
2250: -- or the Total Exposure, get the credit profiles from the customer level

Line 2304: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2300: ( G_PKG_NAME
2301: , 'Check Order:Check Customer'
2302: );
2303: END IF;
2304: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2305: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2306: END;
2307:
2308: -- If no credit limit has been set for either the total Order Amount

Line 2305: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2301: , 'Check Order:Check Customer'
2302: );
2303: END IF;
2304: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2305: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2306: END;
2307:
2308: -- If no credit limit has been set for either the total Order Amount
2309: -- or the Total Exposure, do not credit check

Line 2353: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2349: ( G_PKG_NAME
2350: , 'Check_Order: Check Terms'
2351: );
2352: END IF;
2353: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2354: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2355: END;
2356:
2357: END IF; -- Order Type, Bill to or Customer are subject to Credit Check

Line 2354: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2350: , 'Check_Order: Check Terms'
2351: );
2352: END IF;
2353: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2354: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2355: END;
2356:
2357: END IF; -- Order Type, Bill to or Customer are subject to Credit Check
2358:

Line 2374: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2370: ( G_PKG_NAME
2371: , 'Check_Order'
2372: );
2373: END IF;
2374: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2375: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2376:
2377: END Check_Order_line;
2378:

Line 2375: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2371: , 'Check_Order'
2372: );
2373: END IF;
2374: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2375: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2376:
2377: END Check_Order_line;
2378:
2379:

Line 2916: p_return_status := FND_API.G_RET_STS_SUCCESS;

2912:
2913: BEGIN
2914:
2915: -- Set the default behaviour to pass credit check exposure
2916: p_return_status := FND_API.G_RET_STS_SUCCESS;
2917: -- Read the Credit rule and determine the inclusions and exclusions
2918: -- for exposure
2919:
2920: -- Include Amounts on Receivables if within the AR horizon.

Line 3299: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3295: ( G_PKG_NAME
3296: , 'Check_Exposure'
3297: );
3298: END IF;
3299: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3300: RAISE ;
3301:
3302: END Check_Exposure_Line;
3303: