DBA Data[Home] [Help]

APPS.PA_PROJ_STRUCTURE_PUB dependencies on FND_API

Line 15: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,

11:
12: procedure CREATE_RELATIONSHIP
13: (
14: p_api_version IN NUMBER := 1.0,
15: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
16: p_commit IN VARCHAR2 := FND_API.G_FALSE,
17: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
18: p_debug_mode IN VARCHAR2 := 'N',
19: p_task_id IN NUMBER,

Line 16: p_commit IN VARCHAR2 := FND_API.G_FALSE,

12: procedure CREATE_RELATIONSHIP
13: (
14: p_api_version IN NUMBER := 1.0,
15: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
16: p_commit IN VARCHAR2 := FND_API.G_FALSE,
17: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
18: p_debug_mode IN VARCHAR2 := 'N',
19: p_task_id IN NUMBER,
20: p_project_id IN NUMBER,

Line 17: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,

13: (
14: p_api_version IN NUMBER := 1.0,
15: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
16: p_commit IN VARCHAR2 := FND_API.G_FALSE,
17: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
18: p_debug_mode IN VARCHAR2 := 'N',
19: p_task_id IN NUMBER,
20: p_project_id IN NUMBER,
21: x_return_status OUT NOCOPY VARCHAR2,

Line 30: IF (p_commit= FND_API.G_TRUE) THEN

26: l_task_id NUMBER;
27: l_project_id NUMBER;
28: Begin
29: pa_debug.init_err_stack('PA_PROJ_STRUCTURE_PUB.CREATE_RELATIONSHIP');
30: IF (p_commit= FND_API.G_TRUE) THEN
31: SAVEPOINT CREATE_TASK_PROJ_REL;
32: END IF;
33: l_task_id := p_task_id;
34: l_project_id := p_project_id;

Line 45: IF (p_commit = FND_API.G_TRUE) THEN

41: x_msg_data => x_msg_data
42: );
43: EXCEPTION
44: When OTHERS Then
45: IF (p_commit = FND_API.G_TRUE) THEN
46: ROLLBACK TO CREATE_TASK_PROJ_REL;
47: END IF;
48: FND_MSG_PUB.add_exc_msg(
49: p_pkg_name => 'CREATE_RELATIONSHIP',

Line 52: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

48: FND_MSG_PUB.add_exc_msg(
49: p_pkg_name => 'CREATE_RELATIONSHIP',
50: p_procedure_name => PA_DEBUG.G_Err_Stack
51: );
52: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
53: RAISE;
54: END CREATE_RELATIONSHIP;
55:
56:

Line 103: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,

99:
100: procedure DELETE_RELATIONSHIP
101: (
102: p_api_version IN NUMBER := 1.0,
103: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
104: p_commit IN VARCHAR2 := FND_API.G_FALSE,
105: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
106: p_debug_mode IN VARCHAR2 := 'N',
107: p_task_id IN NUMBER,

Line 104: p_commit IN VARCHAR2 := FND_API.G_FALSE,

100: procedure DELETE_RELATIONSHIP
101: (
102: p_api_version IN NUMBER := 1.0,
103: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
104: p_commit IN VARCHAR2 := FND_API.G_FALSE,
105: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
106: p_debug_mode IN VARCHAR2 := 'N',
107: p_task_id IN NUMBER,
108: p_project_id IN NUMBER,

Line 105: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,

101: (
102: p_api_version IN NUMBER := 1.0,
103: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
104: p_commit IN VARCHAR2 := FND_API.G_FALSE,
105: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
106: p_debug_mode IN VARCHAR2 := 'N',
107: p_task_id IN NUMBER,
108: p_project_id IN NUMBER,
109: x_return_status OUT NOCOPY VARCHAR2,

Line 119: IF (p_commit= FND_API.G_TRUE) THEN

115: l_task_id NUMBER;
116:
117: BEGIN
118: pa_debug.init_err_stack('PA_PROJ_STRUCTURE_PUB.DELETE_RELATIONSHIP');
119: IF (p_commit= FND_API.G_TRUE) THEN
120: SAVEPOINT DELETE_TASK_PROJ_REL;
121: END IF;
122:
123: l_project_id := p_project_id;

Line 134: IF (p_commit = FND_API.G_TRUE) THEN

130: x_msg_data=> x_msg_data);
131:
132: EXCEPTION
133: When OTHERS Then
134: IF (p_commit = FND_API.G_TRUE) THEN
135: ROLLBACK TO DELETE_TASK_PROJ_REL;
136: END IF;
137: FND_MSG_PUB.add_exc_msg(
138: p_pkg_name => 'DELETE_RELATIONSHIP',

Line 141: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

137: FND_MSG_PUB.add_exc_msg(
138: p_pkg_name => 'DELETE_RELATIONSHIP',
139: p_procedure_name => PA_DEBUG.G_Err_Stack
140: );
141: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
142: RAISE;
143: END DELETE_RELATIONSHIP;
144:
145: procedure POPULATE_STRUCTURES_TMP_TAB

Line 148: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,

144:
145: procedure POPULATE_STRUCTURES_TMP_TAB
146: (
147: p_api_version IN NUMBER := 1.0,
148: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
149: p_commit IN VARCHAR2 := FND_API.G_FALSE,
150: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
151: p_debug_mode IN VARCHAR2 := 'N',
152: p_project_id IN NUMBER,

Line 149: p_commit IN VARCHAR2 := FND_API.G_FALSE,

145: procedure POPULATE_STRUCTURES_TMP_TAB
146: (
147: p_api_version IN NUMBER := 1.0,
148: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
149: p_commit IN VARCHAR2 := FND_API.G_FALSE,
150: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
151: p_debug_mode IN VARCHAR2 := 'N',
152: p_project_id IN NUMBER,
153: p_structure_version_id IN NUMBER,

Line 150: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,

146: (
147: p_api_version IN NUMBER := 1.0,
148: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
149: p_commit IN VARCHAR2 := FND_API.G_FALSE,
150: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
151: p_debug_mode IN VARCHAR2 := 'N',
152: p_project_id IN NUMBER,
153: p_structure_version_id IN NUMBER,
154: p_task_version_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,

Line 217: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

213: IF g1_debug_mode = 'Y' THEN
214: pa_debug.write(x_Module=>'PA_PROJ_STRUCTURE_PUB.POPULATE_STRUCTURES_TMP_TAB', x_Msg => 'ENTERED', x_Log_Level=> 3);
215: END IF;
216:
217: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
218: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
219: END IF;
220:
221:

Line 218: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

214: pa_debug.write(x_Module=>'PA_PROJ_STRUCTURE_PUB.POPULATE_STRUCTURES_TMP_TAB', x_Msg => 'ENTERED', x_Log_Level=> 3);
215: END IF;
216:
217: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
218: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
219: END IF;
220:
221:
222: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 222: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

218: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
219: END IF;
220:
221:
222: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
223: FND_MSG_PUB.initialize;
224: END IF;
225:
226:

Line 246: x_return_status := FND_API.G_RET_STS_SUCCESS;

242: l_parent_project_id := p_parent_project_id;
243: END IF;
244: --end bug 4197654
245:
246: x_return_status := FND_API.G_RET_STS_SUCCESS;
247:
248: --bug 4448499 moved this code here from below to have access to program flag.
249: IF p_calling_page_name NOT IN ('TASK_DETAILS','WP_UPD_TASKS')
250: -- <> 'TASK_DETAILS' --No need to get the program data for Task details page.

Line 433: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

429:
430:
431: END IF; --p_calling_page_name = 'TASK_DETAILS'
432:
433: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
434: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
435: END IF;
436:
437: END IF; -- l_pub_structure_flag = 'Y'

Line 434: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

430:
431: END IF; --p_calling_page_name = 'TASK_DETAILS'
432:
433: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
434: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
435: END IF;
436:
437: END IF; -- l_pub_structure_flag = 'Y'
438:

Line 525: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

521:
522:
523: END IF; --- p_calling_page_name = 'TASK_DETAILS'
524:
525: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
526: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
527: END IF;
528:
529: END IF; -- l_pub_structure_flag = 'N'

Line 526: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

522:
523: END IF; --- p_calling_page_name = 'TASK_DETAILS'
524:
525: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
526: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
527: END IF;
528:
529: END IF; -- l_pub_structure_flag = 'N'
530:

Line 575: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

571: IF g1_debug_mode = 'Y' THEN
572: pa_debug.write(x_Module=>'PA_PROJ_STRUCTURE_PUB.POPULATE_STRUCTURES_TMP_TAB', x_Msg => 'After calling PA_PROJ_STRUCTURE_PUB.INSERT_SUBPROJECTS l_return_status='||l_return_status, x_Log_Level=> 3);
573: END IF;
574:
575: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
576: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
577: END IF;
578: END IF; --l_program_flag = 'Y'
579: END IF; -- p_calling_page_name <> 'TASK_DETAILS'

Line 576: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

572: pa_debug.write(x_Module=>'PA_PROJ_STRUCTURE_PUB.POPULATE_STRUCTURES_TMP_TAB', x_Msg => 'After calling PA_PROJ_STRUCTURE_PUB.INSERT_SUBPROJECTS l_return_status='||l_return_status, x_Log_Level=> 3);
573: END IF;
574:
575: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
576: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
577: END IF;
578: END IF; --l_program_flag = 'Y'
579: END IF; -- p_calling_page_name <> 'TASK_DETAILS'
580:

Line 583: when FND_API.G_EXC_UNEXPECTED_ERROR then

579: END IF; -- p_calling_page_name <> 'TASK_DETAILS'
580:
581: EXCEPTION
582:
583: when FND_API.G_EXC_UNEXPECTED_ERROR then
584: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
585: x_msg_count := 1;
586: x_msg_data := SQLERRM;
587:

Line 584: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

580:
581: EXCEPTION
582:
583: when FND_API.G_EXC_UNEXPECTED_ERROR then
584: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
585: x_msg_count := 1;
586: x_msg_data := SQLERRM;
587:
588: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 588: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

584: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
585: x_msg_count := 1;
586: x_msg_data := SQLERRM;
587:
588: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
589: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_STRUCTURE_PUB',
590: p_procedure_name => 'POPULATE_STRUCTURES_TMP_TAB',
591: p_error_text => SUBSTRB(SQLERRM,1,240));
592: when OTHERS then

Line 593: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

589: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_STRUCTURE_PUB',
590: p_procedure_name => 'POPULATE_STRUCTURES_TMP_TAB',
591: p_error_text => SUBSTRB(SQLERRM,1,240));
592: when OTHERS then
593: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
594: x_msg_count := 1;
595: x_msg_data := SUBSTRB(SQLERRM,1,240);
596:
597: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_STRUCTURE_PUB',

Line 608: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,

604:
605: procedure INSERT_PUBLISHED_RECORDS
606: (
607: p_api_version IN NUMBER := 1.0,
608: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
609: p_commit IN VARCHAR2 := FND_API.G_FALSE,
610: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
611: p_debug_mode IN VARCHAR2 := 'N',
612: p_project_id IN NUMBER,

Line 609: p_commit IN VARCHAR2 := FND_API.G_FALSE,

605: procedure INSERT_PUBLISHED_RECORDS
606: (
607: p_api_version IN NUMBER := 1.0,
608: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
609: p_commit IN VARCHAR2 := FND_API.G_FALSE,
610: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
611: p_debug_mode IN VARCHAR2 := 'N',
612: p_project_id IN NUMBER,
613: p_structure_version_id IN NUMBER,

Line 610: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,

606: (
607: p_api_version IN NUMBER := 1.0,
608: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
609: p_commit IN VARCHAR2 := FND_API.G_FALSE,
610: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
611: p_debug_mode IN VARCHAR2 := 'N',
612: p_project_id IN NUMBER,
613: p_structure_version_id IN NUMBER,
614: p_parent_project_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,

Line 715: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

711: IF g1_debug_mode = 'Y' THEN
712: pa_debug.write(x_Module=>'PA_PROJ_STRUCTURE_PUB.INSERT_PUBLISHED_RECORDS', x_Msg => 'ENTERED', x_Log_Level=> 3);
713: END IF;
714:
715: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
716: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
717: END IF;
718:
719:

Line 716: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

712: pa_debug.write(x_Module=>'PA_PROJ_STRUCTURE_PUB.INSERT_PUBLISHED_RECORDS', x_Msg => 'ENTERED', x_Log_Level=> 3);
713: END IF;
714:
715: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
716: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
717: END IF;
718:
719:
720: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 720: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

716: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
717: END IF;
718:
719:
720: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
721: FND_MSG_PUB.initialize;
722: END IF;
723:
724:

Line 729: x_return_status := FND_API.G_RET_STS_SUCCESS;

725: IF g1_debug_mode = 'Y' THEN
726: pa_debug.write(x_Module=>'PA_PROJ_STRUCTURE_PUB.INSERT_PUBLISHED_RECORDS', x_Msg => 'p_project_id: '||p_project_id, x_Log_Level=> 3);
727: END IF;
728:
729: x_return_status := FND_API.G_RET_STS_SUCCESS;
730:
731: /*4275236 : Some Perf Enhancements*/
732: l_yes := PA_PROJ_ELEMENTS_UTILS.GET_FND_LOOKUP_MEANING('YES_NO','Y');
733: l_no := PA_PROJ_ELEMENTS_UTILS.GET_FND_LOOKUP_MEANING('YES_NO','N');

Line 3320: when FND_API.G_EXC_UNEXPECTED_ERROR then

3316:
3317: END IF;
3318:
3319: EXCEPTION
3320: when FND_API.G_EXC_UNEXPECTED_ERROR then
3321: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3322: x_msg_count := 1;
3323: x_msg_data := SQLERRM;
3324:

Line 3321: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

3317: END IF;
3318:
3319: EXCEPTION
3320: when FND_API.G_EXC_UNEXPECTED_ERROR then
3321: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3322: x_msg_count := 1;
3323: x_msg_data := SQLERRM;
3324:
3325: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3325: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3321: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3322: x_msg_count := 1;
3323: x_msg_data := SQLERRM;
3324:
3325: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3326: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_STRUCTURE_PUB',
3327: p_procedure_name => 'INSERT_PUBLISHED_RECORDS',
3328: p_error_text => SUBSTRB(SQLERRM,1,240));
3329: when OTHERS then

Line 3330: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

3326: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_STRUCTURE_PUB',
3327: p_procedure_name => 'INSERT_PUBLISHED_RECORDS',
3328: p_error_text => SUBSTRB(SQLERRM,1,240));
3329: when OTHERS then
3330: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3331: x_msg_count := 1;
3332: x_msg_data := SUBSTRB(SQLERRM,1,240);
3333:
3334: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_STRUCTURE_PUB',

Line 3344: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,

3340:
3341: procedure INSERT_WORKING_RECORDS
3342: (
3343: p_api_version IN NUMBER := 1.0,
3344: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
3345: p_commit IN VARCHAR2 := FND_API.G_FALSE,
3346: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
3347: p_debug_mode IN VARCHAR2 := 'N',
3348: p_project_id IN NUMBER,

Line 3345: p_commit IN VARCHAR2 := FND_API.G_FALSE,

3341: procedure INSERT_WORKING_RECORDS
3342: (
3343: p_api_version IN NUMBER := 1.0,
3344: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
3345: p_commit IN VARCHAR2 := FND_API.G_FALSE,
3346: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
3347: p_debug_mode IN VARCHAR2 := 'N',
3348: p_project_id IN NUMBER,
3349: p_structure_version_id IN NUMBER,

Line 3346: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,

3342: (
3343: p_api_version IN NUMBER := 1.0,
3344: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
3345: p_commit IN VARCHAR2 := FND_API.G_FALSE,
3346: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
3347: p_debug_mode IN VARCHAR2 := 'N',
3348: p_project_id IN NUMBER,
3349: p_structure_version_id IN NUMBER,
3350: p_parent_project_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,

Line 3394: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

3390: IF g1_debug_mode = 'Y' THEN
3391: pa_debug.write(x_Module=>'PA_PROJ_STRUCTURE_PUB.INSERT_WORKING_RECORDS', x_Msg => 'ENTERED', x_Log_Level=> 3);
3392: END IF;
3393:
3394: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
3395: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3396: END IF;
3397:
3398:

Line 3395: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

3391: pa_debug.write(x_Module=>'PA_PROJ_STRUCTURE_PUB.INSERT_WORKING_RECORDS', x_Msg => 'ENTERED', x_Log_Level=> 3);
3392: END IF;
3393:
3394: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
3395: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3396: END IF;
3397:
3398:
3399: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 3399: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

3395: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3396: END IF;
3397:
3398:
3399: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
3400: FND_MSG_PUB.initialize;
3401: END IF;
3402:
3403:

Line 3408: x_return_status := FND_API.G_RET_STS_SUCCESS;

3404: IF g1_debug_mode = 'Y' THEN
3405: pa_debug.write(x_Module=>'PA_PROJ_STRUCTURE_PUB.INSERT_WORKING_RECORDS', x_Msg => 'p_project_id: '||p_project_id, x_Log_Level=> 3);
3406: END IF;
3407:
3408: x_return_status := FND_API.G_RET_STS_SUCCESS;
3409:
3410: /*4275236: Perf Enhancements*/
3411: l_yes := PA_PROJ_ELEMENTS_UTILS.GET_FND_LOOKUP_MEANING('YES_NO','Y');
3412: l_no := PA_PROJ_ELEMENTS_UTILS.GET_FND_LOOKUP_MEANING('YES_NO','N');

Line 5926: when FND_API.G_EXC_UNEXPECTED_ERROR then

5922:
5923: END IF;
5924:
5925: EXCEPTION
5926: when FND_API.G_EXC_UNEXPECTED_ERROR then
5927: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5928: x_msg_count := 1;
5929: x_msg_data := SQLERRM;
5930:

Line 5927: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

5923: END IF;
5924:
5925: EXCEPTION
5926: when FND_API.G_EXC_UNEXPECTED_ERROR then
5927: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5928: x_msg_count := 1;
5929: x_msg_data := SQLERRM;
5930:
5931: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 5931: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5927: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5928: x_msg_count := 1;
5929: x_msg_data := SQLERRM;
5930:
5931: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5932: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_STRUCTURE_PUB',
5933: p_procedure_name => 'INSERT_WORKING_RECORDS',
5934: p_error_text => SUBSTRB(SQLERRM,1,240));
5935: when OTHERS then

Line 5936: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

5932: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_STRUCTURE_PUB',
5933: p_procedure_name => 'INSERT_WORKING_RECORDS',
5934: p_error_text => SUBSTRB(SQLERRM,1,240));
5935: when OTHERS then
5936: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5937: x_msg_count := 1;
5938: x_msg_data := SUBSTRB(SQLERRM,1,240);
5939:
5940: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_STRUCTURE_PUB',

Line 5950: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,

5946:
5947: procedure INSERT_SUBPROJECTS
5948: (
5949: p_api_version IN NUMBER := 1.0,
5950: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
5951: p_commit IN VARCHAR2 := FND_API.G_FALSE,
5952: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
5953: p_debug_mode IN VARCHAR2 := 'N',
5954: p_calling_page_name IN VARCHAR2,

Line 5951: p_commit IN VARCHAR2 := FND_API.G_FALSE,

5947: procedure INSERT_SUBPROJECTS
5948: (
5949: p_api_version IN NUMBER := 1.0,
5950: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
5951: p_commit IN VARCHAR2 := FND_API.G_FALSE,
5952: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
5953: p_debug_mode IN VARCHAR2 := 'N',
5954: p_calling_page_name IN VARCHAR2,
5955: p_project_id IN NUMBER,

Line 5952: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,

5948: (
5949: p_api_version IN NUMBER := 1.0,
5950: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
5951: p_commit IN VARCHAR2 := FND_API.G_FALSE,
5952: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
5953: p_debug_mode IN VARCHAR2 := 'N',
5954: p_calling_page_name IN VARCHAR2,
5955: p_project_id IN NUMBER,
5956: p_structure_version_id IN NUMBER,

Line 6033: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

6029: IF g1_debug_mode = 'Y' THEN
6030: pa_debug.write(x_Module=>'PA_PROJ_STRUCTURE_PUB.INSERT_SUBPROJECTS', x_Msg => 'ENTERED', x_Log_Level=> 3);
6031: END IF;
6032:
6033: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
6034: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6035: END IF;
6036:
6037:

Line 6034: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

6030: pa_debug.write(x_Module=>'PA_PROJ_STRUCTURE_PUB.INSERT_SUBPROJECTS', x_Msg => 'ENTERED', x_Log_Level=> 3);
6031: END IF;
6032:
6033: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
6034: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6035: END IF;
6036:
6037:
6038: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 6038: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

6034: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6035: END IF;
6036:
6037:
6038: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
6039: FND_MSG_PUB.initialize;
6040: END IF;
6041:
6042:

Line 6047: x_return_status := FND_API.G_RET_STS_SUCCESS;

6043: IF g1_debug_mode = 'Y' THEN
6044: pa_debug.write(x_Module=>'PA_PROJ_STRUCTURE_PUB.INSERT_SUBPROJECTS', x_Msg => 'p_project_id: '||p_project_id, x_Log_Level=> 3);
6045: END IF;
6046:
6047: x_return_status := FND_API.G_RET_STS_SUCCESS;
6048:
6049: --check if projects has subprojects
6050: OPEN get_structures;
6051: FETCH get_structures into l_struc_ver_id, l_project_id

Line 7392: when FND_API.G_EXC_UNEXPECTED_ERROR then

7388: --end code to populate tasks for subprojects
7389: --end bug 4197654
7390:
7391: EXCEPTION
7392: when FND_API.G_EXC_UNEXPECTED_ERROR then
7393: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
7394: x_msg_count := 1;
7395: x_msg_data := SQLERRM;
7396:

Line 7393: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

7389: --end bug 4197654
7390:
7391: EXCEPTION
7392: when FND_API.G_EXC_UNEXPECTED_ERROR then
7393: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
7394: x_msg_count := 1;
7395: x_msg_data := SQLERRM;
7396:
7397: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 7397: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

7393: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
7394: x_msg_count := 1;
7395: x_msg_data := SQLERRM;
7396:
7397: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7398: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_STRUCTURE_PUB',
7399: p_procedure_name => 'INSERT_SUBPROJECTS',
7400: p_error_text => SUBSTRB(SQLERRM,1,240));
7401: when OTHERS then

Line 7402: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

7398: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_STRUCTURE_PUB',
7399: p_procedure_name => 'INSERT_SUBPROJECTS',
7400: p_error_text => SUBSTRB(SQLERRM,1,240));
7401: when OTHERS then
7402: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
7403: x_msg_count := 1;
7404: x_msg_data := SUBSTRB(SQLERRM,1,240);
7405:
7406: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_STRUCTURE_PUB',

Line 7420: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,

7416:
7417: procedure INSERT_PUBLISHED_RECORD
7418: (
7419: p_api_version IN NUMBER := 1.0,
7420: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
7421: p_commit IN VARCHAR2 := FND_API.G_FALSE,
7422: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
7423: p_debug_mode IN VARCHAR2 := 'N',
7424: p_project_id IN NUMBER,

Line 7421: p_commit IN VARCHAR2 := FND_API.G_FALSE,

7417: procedure INSERT_PUBLISHED_RECORD
7418: (
7419: p_api_version IN NUMBER := 1.0,
7420: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
7421: p_commit IN VARCHAR2 := FND_API.G_FALSE,
7422: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
7423: p_debug_mode IN VARCHAR2 := 'N',
7424: p_project_id IN NUMBER,
7425: p_structure_version_id IN NUMBER,

Line 7422: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,

7418: (
7419: p_api_version IN NUMBER := 1.0,
7420: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
7421: p_commit IN VARCHAR2 := FND_API.G_FALSE,
7422: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
7423: p_debug_mode IN VARCHAR2 := 'N',
7424: p_project_id IN NUMBER,
7425: p_structure_version_id IN NUMBER,
7426: p_task_version_id IN NUMBER,

Line 7463: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

7459: IF g1_debug_mode = 'Y' THEN
7460: pa_debug.write(x_Module=>'PA_PROJ_STRUCTURE_PUB.INSERT_PUBLISHED_RECORD', x_Msg => 'ENTERED', x_Log_Level=> 3);
7461: END IF;
7462:
7463: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
7464: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7465: END IF;
7466:
7467:

Line 7464: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

7460: pa_debug.write(x_Module=>'PA_PROJ_STRUCTURE_PUB.INSERT_PUBLISHED_RECORD', x_Msg => 'ENTERED', x_Log_Level=> 3);
7461: END IF;
7462:
7463: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
7464: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7465: END IF;
7466:
7467:
7468: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 7468: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

7464: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7465: END IF;
7466:
7467:
7468: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
7469: FND_MSG_PUB.initialize;
7470: END IF;
7471:
7472:

Line 7477: x_return_status := FND_API.G_RET_STS_SUCCESS;

7473: IF g1_debug_mode = 'Y' THEN
7474: pa_debug.write(x_Module=>'PA_PROJ_STRUCTURE_PUB.INSERT_PUBLISHED_RECORD', x_Msg => 'p_project_id: '||p_project_id, x_Log_Level=> 3);
7475: END IF;
7476:
7477: x_return_status := FND_API.G_RET_STS_SUCCESS;
7478:
7479: -- Bug Fix 5609629
7480: -- Caching the versioning_enabled_flag attribute value locally.
7481: l_versioning_enabled_flag := pa_workplan_attr_utils.check_wp_versioning_enabled(p_project_id);

Line 8156: when FND_API.G_EXC_UNEXPECTED_ERROR then

8152: ----and ppc.structure_type (+) = ppru.structure_type -- Fix for Bug # 4216980.
8153: ;
8154:
8155: EXCEPTION
8156: when FND_API.G_EXC_UNEXPECTED_ERROR then
8157: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
8158: x_msg_count := 1;
8159: x_msg_data := SQLERRM;
8160:

Line 8157: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

8153: ;
8154:
8155: EXCEPTION
8156: when FND_API.G_EXC_UNEXPECTED_ERROR then
8157: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
8158: x_msg_count := 1;
8159: x_msg_data := SQLERRM;
8160:
8161: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 8161: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

8157: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
8158: x_msg_count := 1;
8159: x_msg_data := SQLERRM;
8160:
8161: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8162: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_STRUCTURE_PUB',
8163: p_procedure_name => 'INSERT_PUBLISHED_RECORD',
8164: p_error_text => SUBSTRB(SQLERRM,1,240));
8165: when OTHERS then

Line 8166: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

8162: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_STRUCTURE_PUB',
8163: p_procedure_name => 'INSERT_PUBLISHED_RECORD',
8164: p_error_text => SUBSTRB(SQLERRM,1,240));
8165: when OTHERS then
8166: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
8167: x_msg_count := 1;
8168: x_msg_data := SUBSTRB(SQLERRM,1,240);
8169:
8170: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_STRUCTURE_PUB',

Line 8180: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,

8176:
8177: procedure INSERT_WORKING_RECORD
8178: (
8179: p_api_version IN NUMBER := 1.0,
8180: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
8181: p_commit IN VARCHAR2 := FND_API.G_FALSE,
8182: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
8183: p_debug_mode IN VARCHAR2 := 'N',
8184: p_project_id IN NUMBER,

Line 8181: p_commit IN VARCHAR2 := FND_API.G_FALSE,

8177: procedure INSERT_WORKING_RECORD
8178: (
8179: p_api_version IN NUMBER := 1.0,
8180: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
8181: p_commit IN VARCHAR2 := FND_API.G_FALSE,
8182: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
8183: p_debug_mode IN VARCHAR2 := 'N',
8184: p_project_id IN NUMBER,
8185: p_structure_version_id IN NUMBER,

Line 8182: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,

8178: (
8179: p_api_version IN NUMBER := 1.0,
8180: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
8181: p_commit IN VARCHAR2 := FND_API.G_FALSE,
8182: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
8183: p_debug_mode IN VARCHAR2 := 'N',
8184: p_project_id IN NUMBER,
8185: p_structure_version_id IN NUMBER,
8186: p_task_version_id IN NUMBER,

Line 8223: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

8219: IF g1_debug_mode = 'Y' THEN
8220: pa_debug.write(x_Module=>'PA_PROJ_STRUCTURE_PUB.INSERT_WORKING_RECORD', x_Msg => 'ENTERED', x_Log_Level=> 3);
8221: END IF;
8222:
8223: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
8224: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8225: END IF;
8226:
8227:

Line 8224: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

8220: pa_debug.write(x_Module=>'PA_PROJ_STRUCTURE_PUB.INSERT_WORKING_RECORD', x_Msg => 'ENTERED', x_Log_Level=> 3);
8221: END IF;
8222:
8223: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
8224: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8225: END IF;
8226:
8227:
8228: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 8228: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

8224: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8225: END IF;
8226:
8227:
8228: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
8229: FND_MSG_PUB.initialize;
8230: END IF;
8231:
8232:

Line 8237: x_return_status := FND_API.G_RET_STS_SUCCESS;

8233: IF g1_debug_mode = 'Y' THEN
8234: pa_debug.write(x_Module=>'PA_PROJ_STRUCTURE_PUB.INSERT_WORKING_RECORD', x_Msg => 'p_project_id: '||p_project_id, x_Log_Level=> 3);
8235: END IF;
8236:
8237: x_return_status := FND_API.G_RET_STS_SUCCESS;
8238:
8239: -- Bug Fix 5609629
8240: -- Caching the versioning_enabled_flag attribute value locally.
8241: l_versioning_enabled_flag := pa_workplan_attr_utils.check_wp_versioning_enabled(p_project_id);

Line 8915: when FND_API.G_EXC_UNEXPECTED_ERROR then

8911: ---and ppc.structure_type (+) = ppru.structure_type -- Fix for Bug # 4627329.
8912: ;
8913:
8914: EXCEPTION
8915: when FND_API.G_EXC_UNEXPECTED_ERROR then
8916: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
8917: x_msg_count := 1;
8918: x_msg_data := SQLERRM;
8919:

Line 8916: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

8912: ;
8913:
8914: EXCEPTION
8915: when FND_API.G_EXC_UNEXPECTED_ERROR then
8916: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
8917: x_msg_count := 1;
8918: x_msg_data := SQLERRM;
8919:
8920: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 8920: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

8916: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
8917: x_msg_count := 1;
8918: x_msg_data := SQLERRM;
8919:
8920: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8921: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_STRUCTURE_PUB',
8922: p_procedure_name => 'INSERT_WORKING_RECORD',
8923: p_error_text => SUBSTRB(SQLERRM,1,240));
8924: when OTHERS then

Line 8925: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

8921: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_STRUCTURE_PUB',
8922: p_procedure_name => 'INSERT_WORKING_RECORD',
8923: p_error_text => SUBSTRB(SQLERRM,1,240));
8924: when OTHERS then
8925: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
8926: x_msg_count := 1;
8927: x_msg_data := SUBSTRB(SQLERRM,1,240);
8928:
8929: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_STRUCTURE_PUB',

Line 8938: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,

8934:
8935: procedure INSERT_UPD_WORKING_RECORDS
8936: (
8937: p_api_version IN NUMBER := 1.0,
8938: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
8939: p_commit IN VARCHAR2 := FND_API.G_FALSE,
8940: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
8941: p_debug_mode IN VARCHAR2 := 'N',
8942: p_project_id IN NUMBER,

Line 8939: p_commit IN VARCHAR2 := FND_API.G_FALSE,

8935: procedure INSERT_UPD_WORKING_RECORDS
8936: (
8937: p_api_version IN NUMBER := 1.0,
8938: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
8939: p_commit IN VARCHAR2 := FND_API.G_FALSE,
8940: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
8941: p_debug_mode IN VARCHAR2 := 'N',
8942: p_project_id IN NUMBER,
8943: p_structure_version_id IN NUMBER,

Line 8940: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,

8936: (
8937: p_api_version IN NUMBER := 1.0,
8938: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
8939: p_commit IN VARCHAR2 := FND_API.G_FALSE,
8940: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
8941: p_debug_mode IN VARCHAR2 := 'N',
8942: p_project_id IN NUMBER,
8943: p_structure_version_id IN NUMBER,
8944: p_parent_project_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,

Line 8994: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

8990: IF g1_debug_mode = 'Y' THEN
8991: pa_debug.write(x_Module=>'PA_PROJ_STRUCTURE_PUB.INSERT_UPD_WORKING_RECORDS', x_Msg => 'ENTERED', x_Log_Level=> 3);
8992: END IF;
8993:
8994: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
8995: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8996: END IF;
8997:
8998:

Line 8995: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

8991: pa_debug.write(x_Module=>'PA_PROJ_STRUCTURE_PUB.INSERT_UPD_WORKING_RECORDS', x_Msg => 'ENTERED', x_Log_Level=> 3);
8992: END IF;
8993:
8994: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
8995: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8996: END IF;
8997:
8998:
8999: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 8999: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

8995: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8996: END IF;
8997:
8998:
8999: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
9000: FND_MSG_PUB.initialize;
9001: END IF;
9002:
9003:

Line 9008: x_return_status := FND_API.G_RET_STS_SUCCESS;

9004: IF g1_debug_mode = 'Y' THEN
9005: pa_debug.write(x_Module=>'PA_PROJ_STRUCTURE_PUB.INSERT_UPD_WORKING_RECORDS', x_Msg => 'p_project_id: '||p_project_id, x_Log_Level=> 3);
9006: END IF;
9007:
9008: x_return_status := FND_API.G_RET_STS_SUCCESS;
9009:
9010: -- Bug # 4875311.
9011:
9012: -- ************************************************************************************************************************

Line 11529: when FND_API.G_EXC_UNEXPECTED_ERROR then

11525:
11526: END IF;
11527:
11528: EXCEPTION
11529: when FND_API.G_EXC_UNEXPECTED_ERROR then
11530: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
11531: x_msg_count := 1;
11532: x_msg_data := SQLERRM;
11533:

Line 11530: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

11526: END IF;
11527:
11528: EXCEPTION
11529: when FND_API.G_EXC_UNEXPECTED_ERROR then
11530: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
11531: x_msg_count := 1;
11532: x_msg_data := SQLERRM;
11533:
11534: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 11534: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

11530: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
11531: x_msg_count := 1;
11532: x_msg_data := SQLERRM;
11533:
11534: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11535: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_STRUCTURE_PUB',
11536: p_procedure_name => 'INSERT_UPD_WORKING_RECORDS',
11537: p_error_text => SUBSTRB(SQLERRM,1,240));
11538: when OTHERS then

Line 11539: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

11535: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_STRUCTURE_PUB',
11536: p_procedure_name => 'INSERT_UPD_WORKING_RECORDS',
11537: p_error_text => SUBSTRB(SQLERRM,1,240));
11538: when OTHERS then
11539: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
11540: x_msg_count := 1;
11541: x_msg_data := SUBSTRB(SQLERRM,1,240);
11542:
11543: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_STRUCTURE_PUB',

Line 11552: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,

11548:
11549: procedure INSERT_UPD_PUBLISHED_RECORDS
11550: (
11551: p_api_version IN NUMBER := 1.0,
11552: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
11553: p_commit IN VARCHAR2 := FND_API.G_FALSE,
11554: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
11555: p_debug_mode IN VARCHAR2 := 'N',
11556: p_project_id IN NUMBER,

Line 11553: p_commit IN VARCHAR2 := FND_API.G_FALSE,

11549: procedure INSERT_UPD_PUBLISHED_RECORDS
11550: (
11551: p_api_version IN NUMBER := 1.0,
11552: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
11553: p_commit IN VARCHAR2 := FND_API.G_FALSE,
11554: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
11555: p_debug_mode IN VARCHAR2 := 'N',
11556: p_project_id IN NUMBER,
11557: p_structure_version_id IN NUMBER,

Line 11554: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,

11550: (
11551: p_api_version IN NUMBER := 1.0,
11552: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
11553: p_commit IN VARCHAR2 := FND_API.G_FALSE,
11554: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
11555: p_debug_mode IN VARCHAR2 := 'N',
11556: p_project_id IN NUMBER,
11557: p_structure_version_id IN NUMBER,
11558: p_parent_project_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,

Line 11608: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

11604: IF g1_debug_mode = 'Y' THEN
11605: pa_debug.write(x_Module=>'PA_PROJ_STRUCTURE_PUB.INSERT_UPD_PUBLISHED_RECORDS', x_Msg => 'ENTERED', x_Log_Level=> 3);
11606: END IF;
11607:
11608: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
11609: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11610: END IF;
11611:
11612:

Line 11609: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

11605: pa_debug.write(x_Module=>'PA_PROJ_STRUCTURE_PUB.INSERT_UPD_PUBLISHED_RECORDS', x_Msg => 'ENTERED', x_Log_Level=> 3);
11606: END IF;
11607:
11608: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
11609: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11610: END IF;
11611:
11612:
11613: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 11613: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

11609: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11610: END IF;
11611:
11612:
11613: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
11614: FND_MSG_PUB.initialize;
11615: END IF;
11616:
11617:

Line 11622: x_return_status := FND_API.G_RET_STS_SUCCESS;

11618: IF g1_debug_mode = 'Y' THEN
11619: pa_debug.write(x_Module=>'PA_PROJ_STRUCTURE_PUB.INSERT_UPD_PUBLISHED_RECORDS', x_Msg => 'p_project_id: '||p_project_id, x_Log_Level=> 3);
11620: END IF;
11621:
11622: x_return_status := FND_API.G_RET_STS_SUCCESS;
11623:
11624: -- Bug # 4875311.
11625:
11626: -- ************************************************************************************************************************

Line 14050: when FND_API.G_EXC_UNEXPECTED_ERROR then

14046:
14047: END IF;
14048:
14049: EXCEPTION
14050: when FND_API.G_EXC_UNEXPECTED_ERROR then
14051: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
14052: x_msg_count := 1;
14053: x_msg_data := SQLERRM;
14054:

Line 14051: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

14047: END IF;
14048:
14049: EXCEPTION
14050: when FND_API.G_EXC_UNEXPECTED_ERROR then
14051: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
14052: x_msg_count := 1;
14053: x_msg_data := SQLERRM;
14054:
14055: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 14055: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

14051: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
14052: x_msg_count := 1;
14053: x_msg_data := SQLERRM;
14054:
14055: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
14056: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_STRUCTURE_PUB',
14057: p_procedure_name => 'INSERT_UPD_PUBLISHED_RECORDS',
14058: p_error_text => SUBSTRB(SQLERRM,1,240));
14059: when OTHERS then

Line 14060: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

14056: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_STRUCTURE_PUB',
14057: p_procedure_name => 'INSERT_UPD_PUBLISHED_RECORDS',
14058: p_error_text => SUBSTRB(SQLERRM,1,240));
14059: when OTHERS then
14060: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
14061: x_msg_count := 1;
14062: x_msg_data := SUBSTRB(SQLERRM,1,240);
14063:
14064: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_STRUCTURE_PUB',

Line 14074: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE

14070: -- Bug # 4875311.
14071:
14072: procedure populate_pji_tab_for_plan_prj
14073: (p_api_version IN NUMBER :=1.0
14074: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
14075: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
14076: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
14077: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
14078: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

Line 14075: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE

14071:
14072: procedure populate_pji_tab_for_plan_prj
14073: (p_api_version IN NUMBER :=1.0
14074: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
14075: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
14076: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
14077: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
14078: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
14079: ,p_debug_mode IN VARCHAR2 :='N'

Line 14076: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE

14072: procedure populate_pji_tab_for_plan_prj
14073: (p_api_version IN NUMBER :=1.0
14074: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
14075: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
14076: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
14077: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
14078: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
14079: ,p_debug_mode IN VARCHAR2 :='N'
14080: ,p_max_msg_count IN NUMBER :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 14077: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL

14073: (p_api_version IN NUMBER :=1.0
14074: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
14075: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
14076: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
14077: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
14078: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
14079: ,p_debug_mode IN VARCHAR2 :='N'
14080: ,p_max_msg_count IN NUMBER :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
14081: ,p_project_id IN NUMBER

Line 14110: IF (p_commit = FND_API.G_TRUE) THEN

14106: l_wbs_display_depth NUMBER;
14107: l_delete_flag VARCHAR2(1);
14108: begin
14109:
14110: IF (p_commit = FND_API.G_TRUE) THEN
14111: savepoint plan_qtys;
14112: END IF;
14113:
14114: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

Line 14114: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

14110: IF (p_commit = FND_API.G_TRUE) THEN
14111: savepoint plan_qtys;
14112: END IF;
14113:
14114: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
14115: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
14116: END IF;
14117:
14118: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 14115: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

14111: savepoint plan_qtys;
14112: END IF;
14113:
14114: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
14115: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
14116: END IF;
14117:
14118: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
14119: FND_MSG_PUB.initialize;

Line 14118: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

14114: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
14115: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
14116: END IF;
14117:
14118: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
14119: FND_MSG_PUB.initialize;
14120: END IF;
14121:
14122: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 14122: x_return_status := FND_API.G_RET_STS_SUCCESS;

14118: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
14119: FND_MSG_PUB.initialize;
14120: END IF;
14121:
14122: x_return_status := FND_API.G_RET_STS_SUCCESS;
14123:
14124: --bug 4290593
14125: IF p_populate_tmp_tab_flag = 'N' AND PA_PROJ_STRUCTURE_UTILS.CHECK_PJI_TEMP_TAB_POPULATED(p_project_id) = 'Y'
14126: THEN

Line 14166: RAISE FND_API.G_EXC_ERROR;

14162: WHEN OTHERS THEN
14163: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_STRUCTURE_PUB',
14164: p_procedure_name => 'POPULATE_PJI_TAB_FOR_PLAN_PRJ',
14165: p_error_text => SUBSTRB('Call of PJI_FM_XBS_ACCUM_UTILS.populate_updatewbs_data Failed. SQLERRM='||SQLERRM,1,120));
14166: RAISE FND_API.G_EXC_ERROR;
14167: END;
14168:
14169: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
14170: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',

Line 14169: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

14165: p_error_text => SUBSTRB('Call of PJI_FM_XBS_ACCUM_UTILS.populate_updatewbs_data Failed. SQLERRM='||SQLERRM,1,120));
14166: RAISE FND_API.G_EXC_ERROR;
14167: END;
14168:
14169: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
14170: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
14171: p_msg_name => l_msg_data);
14172: x_msg_data := l_msg_data;
14173: x_return_status := 'E';

Line 14175: RAISE FND_API.G_EXC_ERROR;

14171: p_msg_name => l_msg_data);
14172: x_msg_data := l_msg_data;
14173: x_return_status := 'E';
14174: x_msg_count := l_msg_count;
14175: RAISE FND_API.G_EXC_ERROR;
14176: END IF;
14177: exception
14178: when FND_API.G_EXC_ERROR then
14179: if p_commit = FND_API.G_TRUE then

Line 14178: when FND_API.G_EXC_ERROR then

14174: x_msg_count := l_msg_count;
14175: RAISE FND_API.G_EXC_ERROR;
14176: END IF;
14177: exception
14178: when FND_API.G_EXC_ERROR then
14179: if p_commit = FND_API.G_TRUE then
14180: rollback to plan_qtys;
14181: end if;
14182: x_return_status := FND_API.G_RET_STS_ERROR;

Line 14179: if p_commit = FND_API.G_TRUE then

14175: RAISE FND_API.G_EXC_ERROR;
14176: END IF;
14177: exception
14178: when FND_API.G_EXC_ERROR then
14179: if p_commit = FND_API.G_TRUE then
14180: rollback to plan_qtys;
14181: end if;
14182: x_return_status := FND_API.G_RET_STS_ERROR;
14183: when FND_API.G_EXC_UNEXPECTED_ERROR then

Line 14182: x_return_status := FND_API.G_RET_STS_ERROR;

14178: when FND_API.G_EXC_ERROR then
14179: if p_commit = FND_API.G_TRUE then
14180: rollback to plan_qtys;
14181: end if;
14182: x_return_status := FND_API.G_RET_STS_ERROR;
14183: when FND_API.G_EXC_UNEXPECTED_ERROR then
14184: if p_commit = FND_API.G_TRUE then
14185: rollback to plan_qtys;
14186: end if;

Line 14183: when FND_API.G_EXC_UNEXPECTED_ERROR then

14179: if p_commit = FND_API.G_TRUE then
14180: rollback to plan_qtys;
14181: end if;
14182: x_return_status := FND_API.G_RET_STS_ERROR;
14183: when FND_API.G_EXC_UNEXPECTED_ERROR then
14184: if p_commit = FND_API.G_TRUE then
14185: rollback to plan_qtys;
14186: end if;
14187: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 14184: if p_commit = FND_API.G_TRUE then

14180: rollback to plan_qtys;
14181: end if;
14182: x_return_status := FND_API.G_RET_STS_ERROR;
14183: when FND_API.G_EXC_UNEXPECTED_ERROR then
14184: if p_commit = FND_API.G_TRUE then
14185: rollback to plan_qtys;
14186: end if;
14187: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
14188: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_STRUCTURE_PUB',

Line 14187: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

14183: when FND_API.G_EXC_UNEXPECTED_ERROR then
14184: if p_commit = FND_API.G_TRUE then
14185: rollback to plan_qtys;
14186: end if;
14187: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
14188: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_STRUCTURE_PUB',
14189: p_procedure_name => 'populate_pji_tab_for_plan_prj',
14190: p_error_text => SUBSTRB(SQLERRM,1,120));
14191: when OTHERS then

Line 14192: if p_commit = FND_API.G_TRUE then

14188: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_STRUCTURE_PUB',
14189: p_procedure_name => 'populate_pji_tab_for_plan_prj',
14190: p_error_text => SUBSTRB(SQLERRM,1,120));
14191: when OTHERS then
14192: if p_commit = FND_API.G_TRUE then
14193: rollback to plan_qtys;
14194: end if;
14195: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
14196: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_STRUCTURE_PUB',

Line 14195: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

14191: when OTHERS then
14192: if p_commit = FND_API.G_TRUE then
14193: rollback to plan_qtys;
14194: end if;
14195: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
14196: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_STRUCTURE_PUB',
14197: p_procedure_name => 'populate_pji_tab_for_plan_prj',
14198: p_error_text => SUBSTRB(SQLERRM,1,120));
14199: raise;