12: -- 1.product code,
13: -- 2.function security ,
14: -- 3.api compatibility.
15: --
16: --Called subprograms:FND_API.Compatible_API_Call
17: -- PA_PM_FUNCTION_SECURITY_PUB.check_function_security
18: --
19: --
20: --
53: ,x_msg => 'Beginning of Check Mandatory Parameters1 '
54: ,x_log_level => 5);
55: END IF;
56:
57: x_return_status := FND_API.G_RET_STS_SUCCESS;
58:
59:
60: -- Standard call to check for call compatibility.
61:
65: ,x_msg => 'Beginning of api compatibility check '
66: ,x_log_level => 5);
67: End If;
68:
69: IF NOT FND_API.Compatible_API_Call ( g_api_version_number ,
70: p_api_version_number ,
71: p_api_name ,
72: G_PKG_PVT )
73: THEN
71: p_api_name ,
72: G_PKG_PVT )
73: THEN
74:
75: x_return_status := FND_API.G_RET_STS_ERROR;
76: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
77:
78: END IF;
79:
72: G_PKG_PVT )
73: THEN
74:
75: x_return_status := FND_API.G_RET_STS_ERROR;
76: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
77:
78: END IF;
79:
80: --Log Message
99: ,p_msg_data => x_msg_data
100: ,p_return_status => x_return_status
101: ,p_function_allowed => l_function_allowed );
102:
103: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR
104: THEN
105: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
106:
107: ELSIF x_return_status = FND_API.G_RET_STS_ERROR
101: ,p_function_allowed => l_function_allowed );
102:
103: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR
104: THEN
105: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
106:
107: ELSIF x_return_status = FND_API.G_RET_STS_ERROR
108: THEN
109: RAISE FND_API.G_EXC_ERROR;
103: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR
104: THEN
105: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
106:
107: ELSIF x_return_status = FND_API.G_RET_STS_ERROR
108: THEN
109: RAISE FND_API.G_EXC_ERROR;
110: END IF;
111:
105: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
106:
107: ELSIF x_return_status = FND_API.G_RET_STS_ERROR
108: THEN
109: RAISE FND_API.G_EXC_ERROR;
110: END IF;
111:
112: IF l_function_allowed = 'N' THEN
113: pa_interface_utils_pub.map_new_amg_msg
119: ,p_attribute2 => ''
120: ,p_attribute3 => ''
121: ,p_attribute4 => ''
122: ,p_attribute5 => '');
123: x_return_status := FND_API.G_RET_STS_ERROR;
124: RAISE FND_API.G_EXC_ERROR;
125: --For Bug 3619483
126: END IF;
127:
120: ,p_attribute3 => ''
121: ,p_attribute4 => ''
122: ,p_attribute5 => '');
123: x_return_status := FND_API.G_RET_STS_ERROR;
124: RAISE FND_API.G_EXC_ERROR;
125: --For Bug 3619483
126: END IF;
127:
128: IF fnd_function.test('PA_PAXINEVT_MAINT_INV_EVENTS') THEN
146: ,p_attribute2 => ''
147: ,p_attribute3 => ''
148: ,p_attribute4 => ''
149: ,p_attribute5 => '');
150: x_return_status := FND_API.G_RET_STS_ERROR;
151: RAISE FND_API.G_EXC_ERROR;
152: END IF;
153:
154: --END OF BUG FIX 3619483
147: ,p_attribute3 => ''
148: ,p_attribute4 => ''
149: ,p_attribute5 => '');
150: x_return_status := FND_API.G_RET_STS_ERROR;
151: RAISE FND_API.G_EXC_ERROR;
152: END IF;
153:
154: --END OF BUG FIX 3619483
155: --Log Message
177: ,p_attribute3 => ''
178: ,p_attribute4 => ''
179: ,p_attribute5 => '');
180: END IF;
181: x_return_status := FND_API.G_RET_STS_ERROR;
182: RAISE FND_API.G_EXC_ERROR;
183: End IF; /* End of 'If' Added for bug 5056969 */
184: ELSE
185: Open ProductCode_cur(P_pm_product_code);
178: ,p_attribute4 => ''
179: ,p_attribute5 => '');
180: END IF;
181: x_return_status := FND_API.G_RET_STS_ERROR;
182: RAISE FND_API.G_EXC_ERROR;
183: End IF; /* End of 'If' Added for bug 5056969 */
184: ELSE
185: Open ProductCode_cur(P_pm_product_code);
186: Fetch ProductCode_cur Into l_product_code;
200: ,p_attribute3 => ''
201: ,p_attribute4 => ''
202: ,p_attribute5 => '');
203: END IF;
204: x_return_status := FND_API.G_RET_STS_ERROR;
205: RAISE FND_API.G_EXC_ERROR;
206: End If;
207: END IF;
208:
201: ,p_attribute4 => ''
202: ,p_attribute5 => '');
203: END IF;
204: x_return_status := FND_API.G_RET_STS_ERROR;
205: RAISE FND_API.G_EXC_ERROR;
206: End If;
207: END IF;
208:
209: IF l_debug_mode = 'Y' THEN
213: END IF;
214:
215: --handling exceptions
216: Exception
217: WHEN FND_API.G_EXC_ERROR
218: THEN
219: RAISE FND_API.G_EXC_ERROR;
220:
221: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
215: --handling exceptions
216: Exception
217: WHEN FND_API.G_EXC_ERROR
218: THEN
219: RAISE FND_API.G_EXC_ERROR;
220:
221: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
222: THEN
223: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
217: WHEN FND_API.G_EXC_ERROR
218: THEN
219: RAISE FND_API.G_EXC_ERROR;
220:
221: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
222: THEN
223: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
224:
225: When pa_event_utils.pvt_excp
219: RAISE FND_API.G_EXC_ERROR;
220:
221: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
222: THEN
223: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
224:
225: When pa_event_utils.pvt_excp
226: then
227: PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'PRIVATE->';
275: ,x_log_level => 5);
276: END IF;
277:
278: --Initialising return status
279: x_return_status :=FND_API.G_RET_STS_SUCCESS;
280:
281: --Log Message
282: IF l_debug_mode = 'Y' THEN
283: pa_debug.write_log (x_module => 'pa.plsql.PA_EVENT_PVT.CHECK_MDTY_PARAMS2.begin'
300: ,p_attribute3 => ''
301: ,p_attribute4 => ''
302: ,p_attribute5 => '');
303: END IF;
304: x_return_status := FND_API.G_RET_STS_ERROR;
305: RAISE FND_API.G_EXC_ERROR;
306: End If;
307:
308: --Log Message
301: ,p_attribute4 => ''
302: ,p_attribute5 => '');
303: END IF;
304: x_return_status := FND_API.G_RET_STS_ERROR;
305: RAISE FND_API.G_EXC_ERROR;
306: End If;
307:
308: --Log Message
309: IF l_debug_mode = 'Y' THEN
340: ,p_attribute3 => ''
341: ,p_attribute4 => ''
342: ,p_attribute5 => '');
343: END IF;
344: x_return_status := FND_API.G_RET_STS_ERROR;
345: RAISE FND_API.G_EXC_ERROR;
346: End If;
347:
348: --Log Message
341: ,p_attribute4 => ''
342: ,p_attribute5 => '');
343: END IF;
344: x_return_status := FND_API.G_RET_STS_ERROR;
345: RAISE FND_API.G_EXC_ERROR;
346: End If;
347:
348: --Log Message
349: IF l_debug_mode = 'Y' THEN
367: ,p_attribute3 => ''
368: ,p_attribute4 => ''
369: ,p_attribute5 => '');
370: END IF;
371: x_return_status := FND_API.G_RET_STS_ERROR;
372: END IF;
373:
374: --Log Message
375: IF l_debug_mode = 'Y' THEN
393: ,p_attribute3 => ''
394: ,p_attribute4 => ''
395: ,p_attribute5 => '');
396: END IF;
397: x_return_status := FND_API.G_RET_STS_ERROR;
398: END IF;
399:
400: --Log Message
401: IF l_debug_mode = 'Y' THEN
419: ,p_attribute3 => ''
420: ,p_attribute4 => ''
421: ,p_attribute5 => '');
422: END IF;
423: x_return_status := FND_API.G_RET_STS_ERROR;
424: END IF;
425:
426: --Log Message
427: IF l_debug_mode = 'Y' THEN
439: END IF;
440:
441: --handling exceptions
442: Exception
443: WHEN FND_API.G_EXC_ERROR
444: THEN
445: RAISE FND_API.G_EXC_ERROR;
446:
447: When pa_event_utils.pvt_excp
441: --handling exceptions
442: Exception
443: WHEN FND_API.G_EXC_ERROR
444: THEN
445: RAISE FND_API.G_EXC_ERROR;
446:
447: When pa_event_utils.pvt_excp
448: then
449: PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'PRIVATE->';
742: ,p_attribute2 => ''
743: ,p_attribute3 => ''
744: ,p_attribute4 => ''
745: ,p_attribute5 => '');
746: RAISE FND_API.G_EXC_ERROR;
747: END IF;
748:
749: IF ((g_inv_evt_fun_allowed = 'N' ) AND
750: (p_event_type_classification IN('DEFERRED REVENUE','INVOICE REDUCTION','SCHEDULED PAYMENTS'))) THEN
757: ,p_attribute2 => ''
758: ,p_attribute3 => ''
759: ,p_attribute4 => ''
760: ,p_attribute5 => '');
761: RAISE FND_API.G_EXC_ERROR;
762: END IF;
763:
764: IF ((p_event_type_classification = 'MANUAL') AND
765: (g_inv_evt_fun_allowed = 'Y' ) AND
784: ,p_attribute2 => ''
785: ,p_attribute3 => ''
786: ,p_attribute4 => ''
787: ,p_attribute5 => '');
788: RAISE FND_API.G_EXC_ERROR;
789: END IF;
790:
791: IF ((p_event_type_classification = 'MANUAL') AND
792: (g_inv_evt_fun_allowed = 'N' ) AND
811: ,p_attribute2 => ''
812: ,p_attribute3 => ''
813: ,p_attribute4 => ''
814: ,p_attribute5 => '');
815: RAISE FND_API.G_EXC_ERROR;
816: END IF;
817:
818: --End of Bug fix3619483
819:
2030: ,p_attribute2 => ''
2031: ,p_attribute3 => ''
2032: ,p_attribute4 => ''
2033: ,p_attribute5 => '');
2034: RAISE FND_API.G_EXC_ERROR;
2035: END IF;
2036:
2037: IF ( (g_inv_evt_fun_allowed = 'N' ) AND
2038: (p_event_type_classification IN('DEFERRED REVENUE','INVOICE REDUCTION','SCHEDULED PAYMENTS'))) THEN
2045: ,p_attribute2 => ''
2046: ,p_attribute3 => ''
2047: ,p_attribute4 => ''
2048: ,p_attribute5 => '');
2049: RAISE FND_API.G_EXC_ERROR;
2050: END IF;
2051:
2052: SELECT bill_trans_rev_amount,
2053: bill_trans_bill_amount
2079: ,p_attribute2 => ''
2080: ,p_attribute3 => ''
2081: ,p_attribute4 => ''
2082: ,p_attribute5 => '');
2083: RAISE FND_API.G_EXC_ERROR;
2084:
2085: ELSIF ( (g_inv_evt_fun_allowed = 'N' ) AND
2086: (g_rev_evt_fun_allowed = 'Y' ) AND
2087: (l_old_bill_amount <> NVL(p_event_in_rec.p_bill_trans_bill_amount,0))) THEN
2104: ,p_attribute2 => ''
2105: ,p_attribute3 => ''
2106: ,p_attribute4 => ''
2107: ,p_attribute5 => '');
2108: RAISE FND_API.G_EXC_ERROR;
2109: END IF;
2110:
2111: END IF;
2112: --End of Bug fix 3619483
3339: ,p_attribute2 => ''
3340: ,p_attribute3 => ''
3341: ,p_attribute4 => ''
3342: ,p_attribute5 => '');
3343: RAISE FND_API.G_EXC_ERROR;
3344: END IF;
3345:
3346: IF ( (g_inv_evt_fun_allowed = 'N' ) AND
3347: (p_event_type_classification IN('DEFERRED REVENUE','INVOICE REDUCTION','SCHEDULED PAYMENTS'))) THEN
3354: ,p_attribute2 => ''
3355: ,p_attribute3 => ''
3356: ,p_attribute4 => ''
3357: ,p_attribute5 => '');
3358: RAISE FND_API.G_EXC_ERROR;
3359: END IF;
3360: SELECT bill_trans_rev_amount,
3361: bill_trans_bill_amount
3362: INTO l_rev_amount,
3377: ,p_attribute2 => ''
3378: ,p_attribute3 => ''
3379: ,p_attribute4 => ''
3380: ,p_attribute5 => '');
3381: RAISE FND_API.G_EXC_ERROR;
3382:
3383: ELSIF ( (g_inv_evt_fun_allowed = 'N' ) AND
3384: (g_rev_evt_fun_allowed = 'Y' ) AND
3385: (l_bill_amount <> 0)) THEN
3392: ,p_attribute2 => ''
3393: ,p_attribute3 => ''
3394: ,p_attribute4 => ''
3395: ,p_attribute5 => '');
3396: RAISE FND_API.G_EXC_ERROR;
3397: END IF;
3398:
3399: END IF;
3400: