DBA Data[Home] [Help]

APPS.PA_CI_IMPACT_TYPE_USAGE_PVT dependencies on PA_CI_IMPACT_TYPE_USAGE

Line 1: PACKAGE BODY PA_CI_IMPACT_TYPE_USAGE_pvt AS

1: PACKAGE BODY PA_CI_IMPACT_TYPE_USAGE_pvt AS
2: /* $Header: PACIIMVB.pls 120.0.12010000.4 2009/10/06 21:58:32 cklee ship $ */
3:
4: PROCEDURE create_ci_impact_type_usage (
5: p_api_version IN NUMBER := 1.0,

Line 32: pa_ci_impact_type_usage

28: l_rowid VARCHAR2(30);
29: CURSOR check_exists is
30: SELECT 'Y' FROM dual
31: WHERE exists (SELECT ci_impact_type_usage_id FROM
32: pa_ci_impact_type_usage
33: -- WHERE ci_type_class_code = p_ci_type_class_code
34: WHERE nvl(ci_type_class_code, 1) = nvl(p_ci_type_class_code, 1) -- cklee
35: AND ci_type_id = p_ci_type_id
36: AND impact_type_code = p_impact_type_code);

Line 41: pa_debug.set_err_stack ('PA_CI_IMPACT_TYPE_USAGE_PVT.CREATE_CI_IMPACT_TYPE_USAGE');

37:
38: l_dummy VARCHAR2(1);
39:
40: BEGIN
41: pa_debug.set_err_stack ('PA_CI_IMPACT_TYPE_USAGE_PVT.CREATE_CI_IMPACT_TYPE_USAGE');
42:
43: IF p_commit = 'T' THEN
44: SAVEPOINT create_ci_impact_type_usage;
45: END IF;

Line 68: PA_CI_IMPACT_TYPE_USAGE_pkg.insert_row(

64: END IF;
65: CLOSE check_exists;
66:
67: IF (p_validate_only <> 'T' AND x_return_status = 'S') THEN
68: PA_CI_IMPACT_TYPE_USAGE_pkg.insert_row(
69: x_rowid => l_rowid,
70: x_ci_impact_type_usage_id => x_ci_impact_type_usage_id,
71: x_impact_type_code => p_impact_type_code,
72: x_ci_type_class_code => p_ci_type_class_code,

Line 105: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CI_IMPACT_TYPE_USAGE_PVT',

101: ROLLBACK TO create_ci_impact_type_usage;
102: END IF;
103:
104: x_return_status := 'U';
105: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CI_IMPACT_TYPE_USAGE_PVT',
106: p_procedure_name => 'CREATE_CI_IMPACT_TYPE_USAGE',
107: p_error_text => SUBSTRB(SQLERRM,1,240));
108:
109: fnd_msg_pub.count_and_get(p_count => x_msg_count,

Line 132: pa_debug.set_err_stack ('PA_CI_IMPACT_TYPE_USAGE_PVT.UPDATE_CI_IMPACT_TYPE_USAGE');

128: )
129: is
130:
131: BEGIN
132: pa_debug.set_err_stack ('PA_CI_IMPACT_TYPE_USAGE_PVT.UPDATE_CI_IMPACT_TYPE_USAGE');
133:
134: IF p_commit = 'T' THEN
135: SAVEPOINT update_ci_impact_type_usage;
136: END IF;

Line 146: PA_CI_IMPACT_TYPE_USAGE_pkg.update_row(

142: x_return_status := 'S';
143: x_msg_count := 0;
144: x_msg_data := '';
145: IF (p_validate_only <> 'T' AND x_return_status = 'S') THEN
146: PA_CI_IMPACT_TYPE_USAGE_pkg.update_row(
147: x_ci_impact_type_usage_id => p_ci_impact_type_usage_id,
148: X_IMPACT_TYPE_CODE_ORDER => P_IMPACT_TYPE_CODE_ORDER);
149:
150: END IF;

Line 172: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CI_IMPACT_TYPE_USAGE_PVT',

168: ROLLBACK TO update_ci_impact_type_usage;
169: END IF;
170:
171: x_return_status := 'U';
172: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CI_IMPACT_TYPE_USAGE_PVT',
173: p_procedure_name => 'UPDATE_CI_IMPACT_TYPE_USAGE',
174: p_error_text => SUBSTRB(SQLERRM,1,240));
175:
176: fnd_msg_pub.count_and_get(p_count => x_msg_count,

Line 206: pa_ci_impact_type_usage

202: l_temp VARCHAR2(1);
203: CURSOR check_exists is
204: SELECT 'Y' FROM dual
205: WHERE exists (SELECT ci_impact_type_usage_id FROM
206: pa_ci_impact_type_usage
207: WHERE ci_impact_type_usage_id = p_ci_impact_type_usage_id
208: );
209: --start:| 16-FEB-2009 cklee R12.1.2 setup ehancement
210: CURSOR c_impact_type is

Line 221: pa_debug.set_err_stack ('PA_CI_IMPACT_TYPE_USAGE_PVT.DELETE_CI_IMPACT_TYPE_USAGE');

217:
218:
219: l_dummy VARCHAR2(1);
220: BEGIN
221: pa_debug.set_err_stack ('PA_CI_IMPACT_TYPE_USAGE_PVT.DELETE_CI_IMPACT_TYPE_USAGE');
222:
223: IF p_commit = 'T' THEN
224: SAVEPOINT delete_ci_impact_type_usage;
225: END IF;

Line 255: l_dummy := pa_ci_impact_type_usage_pub.delete_impact_type_usage_ok

251: IF p_ci_type_id IS NOT NULL
252: AND p_impact_type_code IS NOT NULL
253: THEN
254:
255: l_dummy := pa_ci_impact_type_usage_pub.delete_impact_type_usage_ok
256: (p_impact_type_code, p_ci_type_id);
257:
258: IF l_dummy = 'N' THEN
259:

Line 281: PA_CI_IMPACT_TYPE_USAGE_pkg.delete_row(

277: END IF;
278:
279:
280: IF (p_validate_only <> 'T' AND x_return_status = 'S') THEN
281: PA_CI_IMPACT_TYPE_USAGE_pkg.delete_row(
282: x_ci_impact_type_usage_id => p_ci_impact_type_usage_id);
283: END IF;
284:
285:

Line 335: l_ci_impact_type_usage_id pa_ci_impact_type_usage.ci_impact_type_usage_id%type;

331: )
332: IS
333:
334: l_rowid VARCHAR2(30);
335: l_ci_impact_type_usage_id pa_ci_impact_type_usage.ci_impact_type_usage_id%type;
336:
337: CURSOR validate_impacts_csr (p_ci_type_id pa_ci_types_b.CI_TYPE_ID%type) is
338: select pc.impact_type_code,
339: luk.meaning impact_type_name

Line 350: from pa_ci_impact_type_usage pcu

346: and luk.lookup_type = 'PA_CI_IMPACT_TYPES'
347: and pc.impact_type_code <> 'FINPLAN' -- cklee 4/23/09
348: and not exists
349: (select 1
350: from pa_ci_impact_type_usage pcu
351: where pcu.impact_type_code = pc.impact_type_code
352: and pcu.ci_type_id = pci.ci_type_id);
353:
354: validate_impacts_rec validate_impacts_csr%ROWTYPE;

Line 365: from pa_ci_impact_type_usage pu

361:
362:
363: CURSOR delete_impacts_csr (p_ci_type_id pa_ci_types_b.CI_TYPE_ID%type) is
364: select pu.ci_impact_type_usage_id
365: from pa_ci_impact_type_usage pu
366: where pu.ci_type_id = p_ci_type_id;
367:
368: delete_impacts_rec delete_impacts_csr%ROWTYPE;
369: --cklee 5/1/09

Line 392: pa_debug.set_err_stack ('PA_CI_IMPACT_TYPE_USAGE_PVT.APPLY_CI_IMPACT_TYPE_USAGE');

388:
389: BEGIN
390:
391:
392: pa_debug.set_err_stack ('PA_CI_IMPACT_TYPE_USAGE_PVT.APPLY_CI_IMPACT_TYPE_USAGE');
393:
394: IF p_commit = 'T' THEN
395: SAVEPOINT apply_ci_impact_type_usage;
396: END IF;

Line 413: 1. delete * from pa_ci_impact_type_usage where ci_type_id = p_ci_type;

409: if however, any list is missing from the pa_ci_impacts, we can list all missing list in once
410: so that user can fix on UI in once.
411:
412: Also notice that this list is expected to be very small. So no performance concern for the implementation
413: 1. delete * from pa_ci_impact_type_usage where ci_type_id = p_ci_type;
414: 2: Cost, Revenue and Direct Cost are mutually exclusive. Please choose the correct impact sections.
415: 3. insert into pa_ci_impact_type_usage with passed in impact lists
416: 4. validate if existing impact list is missing from the new impact list and raise error
417: */

Line 415: 3. insert into pa_ci_impact_type_usage with passed in impact lists

411:
412: Also notice that this list is expected to be very small. So no performance concern for the implementation
413: 1. delete * from pa_ci_impact_type_usage where ci_type_id = p_ci_type;
414: 2: Cost, Revenue and Direct Cost are mutually exclusive. Please choose the correct impact sections.
415: 3. insert into pa_ci_impact_type_usage with passed in impact lists
416: 4. validate if existing impact list is missing from the new impact list and raise error
417: */
418: --1. delete * from pa_ci_impact_type_usage where ci_type_id = p_ci_type;
419: -- 1.1 user may rearrange the selected list in update control item only

Line 418: --1. delete * from pa_ci_impact_type_usage where ci_type_id = p_ci_type;

414: 2: Cost, Revenue and Direct Cost are mutually exclusive. Please choose the correct impact sections.
415: 3. insert into pa_ci_impact_type_usage with passed in impact lists
416: 4. validate if existing impact list is missing from the new impact list and raise error
417: */
418: --1. delete * from pa_ci_impact_type_usage where ci_type_id = p_ci_type;
419: -- 1.1 user may rearrange the selected list in update control item only
420: -- 1.2 Issue class doesn't have impact region, hence no action needed
421: IF (p_validate_only <> 'T' AND x_return_status = 'S') THEN
422:

Line 427: PA_CI_IMPACT_TYPE_USAGE_pvt.delete_CI_IMPACT_TYPE_USAGE(

423: IF p_ui_mode = 'UPDATE' AND p_ci_class_code <> 'ISSUE' THEN
424:
425: FOR delete_impacts_rec IN delete_impacts_csr (p_ci_type_id)
426: LOOP
427: PA_CI_IMPACT_TYPE_USAGE_pvt.delete_CI_IMPACT_TYPE_USAGE(
428: --p_api_version => p_api_version,
429: --p_init_msg_list => p_init_msg_list,
430: --p_commit => p_commit,
431: p_validate_only => p_validate_only,

Line 446: --delete from pa_ci_impact_type_usage where ci_type_id = p_ci_type_id;

442: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
443: RAISE G_EXCEPTION_ERROR;
444: END IF;
445: END LOOP;
446: --delete from pa_ci_impact_type_usage where ci_type_id = p_ci_type_id;
447: END IF;
448:
449: --
450: -- 2: Cost, Revenue and Direct Cost are mutually exclusive. Please choose the correct impact sections.

Line 562: --3. insert into pa_ci_impact_type_usage with passed in impact lists

558:
559: END IF;
560: END IF;
561:
562: --3. insert into pa_ci_impact_type_usage with passed in impact lists
563:
564: -- 2.1 user may re-assemble the selected list in create/update control item
565: -- 2.2 Issue class doesn't have impact region, hence no action needed
566: IF p_ui_mode <> 'VIEW' AND p_ci_class_code <> 'ISSUE' THEN

Line 573: PA_CI_IMPACT_TYPE_USAGE_pvt.CREATE_CI_IMPACT_TYPE_USAGE(

569:
570: FOR i in l_impact_tbl.FIRST..l_impact_tbl.LAST LOOP
571:
572:
573: PA_CI_IMPACT_TYPE_USAGE_pvt.CREATE_CI_IMPACT_TYPE_USAGE(
574: --p_api_version => p_api_version,
575: --p_init_msg_list => p_init_msg_list,
576: --p_commit => p_commit,
577: p_validate_only => p_validate_only,

Line 668: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CI_IMPACT_TYPE_USAGE_PVT',

664: ROLLBACK TO apply_ci_impact_type_usage;
665: END IF;
666:
667: x_return_status := 'U';
668: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CI_IMPACT_TYPE_USAGE_PVT',
669: p_procedure_name => 'APPLY_CI_IMPACT_TYPE_USAGE',
670: p_error_text => SUBSTRB(SQLERRM,1,240));
671:
672: fnd_msg_pub.count_and_get(p_count => x_msg_count,

Line 679: END PA_CI_IMPACT_TYPE_USAGE_pvt;

675:
676:
677: END apply_ci_impact_type_usage;
678:
679: END PA_CI_IMPACT_TYPE_USAGE_pvt;