APPS.PA_STATUS_PUB dependencies on FND_API

Line 23: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

19: g_task_version_id_tbl SYSTEM.pa_num_tbl_type := SYSTEM.pa_num_tbl_type(); -- Bug 4218507
20:
21: PROCEDURE UPDATE_PROGRESS
22: ( p_api_version_number IN NUMBER
23: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
24: , p_commit IN VARCHAR2 := FND_API.G_FALSE
25: , p_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
26: , p_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
27: , p_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895

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

20:
21: PROCEDURE UPDATE_PROGRESS
22: ( p_api_version_number IN NUMBER
23: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
24: , p_commit IN VARCHAR2 := FND_API.G_FALSE
25: , p_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
26: , p_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
27: , p_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
28: , p_project_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 258: p_return_status := FND_API.G_RET_STS_SUCCESS;

254: pa_debug.write(x_Module=>'PA_STATUS_PUB.UPDATE_PROGRESS', x_Msg => 'p_actual_effort_to_date='||p_actual_effort_to_date, x_Log_Level=> 3);
255: END IF;
256:
257:
258: p_return_status := FND_API.G_RET_STS_SUCCESS;
259: -- We have p_populate_pji_tables as paramter because we can not populate PJI tables in Execute update_task_progress
260: -- as we do not have structure version id there.
261: -- If user passes intentionally as N and calls singule update_progress then we will set it as Y
262: IF(G_bulk_load_flag = 'Y') THEN

Line 264: IF FND_API.to_boolean(p_init_msg_list) THEN

260: -- as we do not have structure version id there.
261: -- If user passes intentionally as N and calls singule update_progress then we will set it as Y
262: IF(G_bulk_load_flag = 'Y') THEN
263: l_project_id_out := p_project_id;
264: IF FND_API.to_boolean(p_init_msg_list) THEN
265: FND_MSG_PUB.initialize;
266: END IF;
267: l_populate_pji_tables := p_populate_pji_tables;
268: l_rollup_entire_wbs := p_rollup_entire_wbs;

Line 279: , p_commit => FND_API.G_FALSE --Bug 3754134

275: END IF;
276:
277: PA_STATUS_PUB.Project_Level_Validations
278: ( p_api_version_number => p_api_version_number
279: , p_commit => FND_API.G_FALSE --Bug 3754134
280: , p_init_msg_list => p_init_msg_list
281: , p_msg_count => p_msg_count
282: , p_msg_data => p_msg_data
283: , p_return_status => l_return_status

Line 292: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then

288: IF g1_debug_mode = 'Y' THEN
289: pa_debug.write(x_Module=>'PA_STATUS_PUB.UPDATE_PROGRESS', x_Msg => 'After Project_Level_Validations l_return_status='||l_return_status, x_Log_Level=> 3);
290: END IF;
291:
292: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
293: RAISE FND_API.G_EXC_ERROR;
294: END IF;
295: -- Bug 3627315 : Added code to validate date against the project structure
296: -- it won't be validated for each object

Line 293: RAISE FND_API.G_EXC_ERROR;

289: pa_debug.write(x_Module=>'PA_STATUS_PUB.UPDATE_PROGRESS', x_Msg => 'After Project_Level_Validations l_return_status='||l_return_status, x_Log_Level=> 3);
290: END IF;
291:
292: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
293: RAISE FND_API.G_EXC_ERROR;
294: END IF;
295: -- Bug 3627315 : Added code to validate date against the project structure
296: -- it won't be validated for each object
297: OPEN c_get_structure_information(l_project_id_out, p_structure_type);

Line 305: p_return_status := FND_API.G_RET_STS_ERROR;

301: /*IF PA_PROGRESS_UTILS.CHECK_VALID_AS_OF_DATE(TRUNC(p_as_of_date), l_project_id_out, l_str_id, 'PA_STRUCTURES', l_str_id ) = 'N'
302: THEN
303: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
304: ,p_msg_name => 'PA_TP_INV_AOD2');
305: p_return_status := FND_API.G_RET_STS_ERROR;
306: RAISE FND_API.G_EXC_ERROR;
307: END IF;*/
308: END IF;
309:

Line 306: RAISE FND_API.G_EXC_ERROR;

302: THEN
303: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
304: ,p_msg_name => 'PA_TP_INV_AOD2');
305: p_return_status := FND_API.G_RET_STS_ERROR;
306: RAISE FND_API.G_EXC_ERROR;
307: END IF;*/
308: END IF;
309:
310: -- User can pass task_id or task reference

Line 341: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

337: , p_pm_task_reference => p_pm_task_reference
338: , p_out_task_id => l_task_id_out
339: , p_return_status => l_return_status
340: );
341: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
342: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
343: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
344: RAISE FND_API.G_EXC_ERROR;
345: END IF;

Line 342: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

338: , p_out_task_id => l_task_id_out
339: , p_return_status => l_return_status
340: );
341: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
342: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
343: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
344: RAISE FND_API.G_EXC_ERROR;
345: END IF;
346: l_object_type := 'PA_TASKS';

Line 343: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

339: , p_return_status => l_return_status
340: );
341: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
342: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
343: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
344: RAISE FND_API.G_EXC_ERROR;
345: END IF;
346: l_object_type := 'PA_TASKS';
347: l_object_id := l_task_id_out;

Line 344: RAISE FND_API.G_EXC_ERROR;

340: );
341: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
342: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
343: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
344: RAISE FND_API.G_EXC_ERROR;
345: END IF;
346: l_object_type := 'PA_TASKS';
347: l_object_id := l_task_id_out;
348: OPEN c_get_element_information(p_project_id, l_object_id, l_object_type, p_structure_type);

Line 360: p_return_status := FND_API.G_RET_STS_ERROR;

356:
357: IF p_object_type <> 'PA_ASSIGNMENTS' AND p_object_type <> 'PA_DELIVERABLES' AND p_object_type <> 'PA_TASKS' AND p_object_type <> 'PA_STRUCTURES' THEN
358: FND_MESSAGE.SET_NAME('PA','PA_PROG_WRONG_OBJ_TYPE');
359: FND_MSG_PUB.add;
360: p_return_status := FND_API.G_RET_STS_ERROR;
361: RAISE FND_API.G_EXC_ERROR;
362: ELSE
363: l_object_type := p_object_type;
364: END IF;

Line 361: RAISE FND_API.G_EXC_ERROR;

357: IF p_object_type <> 'PA_ASSIGNMENTS' AND p_object_type <> 'PA_DELIVERABLES' AND p_object_type <> 'PA_TASKS' AND p_object_type <> 'PA_STRUCTURES' THEN
358: FND_MESSAGE.SET_NAME('PA','PA_PROG_WRONG_OBJ_TYPE');
359: FND_MSG_PUB.add;
360: p_return_status := FND_API.G_RET_STS_ERROR;
361: RAISE FND_API.G_EXC_ERROR;
362: ELSE
363: l_object_type := p_object_type;
364: END IF;
365:

Line 369: p_return_status := FND_API.G_RET_STS_ERROR;

365:
366: IF ((l_object_type = 'PA_ASSIGNMENTS' OR l_object_type = 'PA_DELIVERABLES') AND p_structure_type = 'FINANCIAL') THEN
367: FND_MESSAGE.SET_NAME('PA','PA_PROG_ASGN_DEL_NOT_ALLOW_STR');
368: FND_MSG_PUB.add;
369: p_return_status := FND_API.G_RET_STS_ERROR;
370: RAISE FND_API.G_EXC_ERROR;
371: END IF;
372:
373: IF p_object_type = 'PA_TASKS' THEN

Line 370: RAISE FND_API.G_EXC_ERROR;

366: IF ((l_object_type = 'PA_ASSIGNMENTS' OR l_object_type = 'PA_DELIVERABLES') AND p_structure_type = 'FINANCIAL') THEN
367: FND_MESSAGE.SET_NAME('PA','PA_PROG_ASGN_DEL_NOT_ALLOW_STR');
368: FND_MSG_PUB.add;
369: p_return_status := FND_API.G_RET_STS_ERROR;
370: RAISE FND_API.G_EXC_ERROR;
371: END IF;
372:
373: IF p_object_type = 'PA_TASKS' THEN
374: IF ((p_task_id <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM AND p_task_id IS NOT NULL)

Line 385: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

381: , p_pm_task_reference => p_pm_task_reference
382: , p_out_task_id => l_task_id_out
383: , p_return_status => l_return_status
384: );
385: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
386: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
387: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
388: RAISE FND_API.G_EXC_ERROR;
389: END IF;

Line 386: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

382: , p_out_task_id => l_task_id_out
383: , p_return_status => l_return_status
384: );
385: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
386: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
387: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
388: RAISE FND_API.G_EXC_ERROR;
389: END IF;
390: END IF;

Line 387: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

383: , p_return_status => l_return_status
384: );
385: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
386: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
387: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
388: RAISE FND_API.G_EXC_ERROR;
389: END IF;
390: END IF;
391: IF ((p_object_id <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM AND p_object_id IS NOT NULL)

Line 388: RAISE FND_API.G_EXC_ERROR;

384: );
385: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
386: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
387: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
388: RAISE FND_API.G_EXC_ERROR;
389: END IF;
390: END IF;
391: IF ((p_object_id <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM AND p_object_id IS NOT NULL)
392: OR (p_pm_task_reference <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR AND p_pm_task_reference IS NOT NULL)) THEN

Line 402: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

398: , p_pm_task_reference => p_pm_task_reference
399: , p_out_task_id => l_task_id_out
400: , p_return_status => l_return_status
401: );
402: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
403: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
404: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
405: RAISE FND_API.G_EXC_ERROR;
406: END IF;

Line 403: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

399: , p_out_task_id => l_task_id_out
400: , p_return_status => l_return_status
401: );
402: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
403: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
404: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
405: RAISE FND_API.G_EXC_ERROR;
406: END IF;
407: END IF;

Line 404: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

400: , p_return_status => l_return_status
401: );
402: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
403: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
404: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
405: RAISE FND_API.G_EXC_ERROR;
406: END IF;
407: END IF;
408:

Line 405: RAISE FND_API.G_EXC_ERROR;

401: );
402: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
403: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
404: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
405: RAISE FND_API.G_EXC_ERROR;
406: END IF;
407: END IF;
408:
409: l_object_type := p_object_type;

Line 422: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

418: ,p_deliverable_id => p_object_id
419: ,p_project_id => l_project_id_out
420: ,p_out_deliverable_id => l_object_id
421: ,p_return_status => l_return_status);
422: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
423: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
424: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
425: RAISE FND_API.G_EXC_ERROR;
426: END IF;

Line 423: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

419: ,p_project_id => l_project_id_out
420: ,p_out_deliverable_id => l_object_id
421: ,p_return_status => l_return_status);
422: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
423: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
424: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
425: RAISE FND_API.G_EXC_ERROR;
426: END IF;
427: --Begin add for BUG 3746647, rtarway

Line 424: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

420: ,p_out_deliverable_id => l_object_id
421: ,p_return_status => l_return_status);
422: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
423: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
424: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
425: RAISE FND_API.G_EXC_ERROR;
426: END IF;
427: --Begin add for BUG 3746647, rtarway
428: OPEN c_get_del_ver_id(p_project_id, l_object_id);

Line 425: RAISE FND_API.G_EXC_ERROR;

421: ,p_return_status => l_return_status);
422: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
423: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
424: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
425: RAISE FND_API.G_EXC_ERROR;
426: END IF;
427: --Begin add for BUG 3746647, rtarway
428: OPEN c_get_del_ver_id(p_project_id, l_object_id);
429: FETCH c_get_del_ver_id into l_object_version_id;

Line 458: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

454: , p_pm_task_reference => p_pm_task_reference
455: , p_out_task_id => l_task_id_out
456: , p_return_status => l_return_status
457: );
458: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
459: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
460: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
461: RAISE FND_API.G_EXC_ERROR;
462: END IF;

Line 459: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

455: , p_out_task_id => l_task_id_out
456: , p_return_status => l_return_status
457: );
458: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
459: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
460: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
461: RAISE FND_API.G_EXC_ERROR;
462: END IF;
463: END IF;

Line 460: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

456: , p_return_status => l_return_status
457: );
458: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
459: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
460: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
461: RAISE FND_API.G_EXC_ERROR;
462: END IF;
463: END IF;
464: --end Added by rtarway for BUG 3872176

Line 461: RAISE FND_API.G_EXC_ERROR;

457: );
458: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
459: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
460: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
461: RAISE FND_API.G_EXC_ERROR;
462: END IF;
463: END IF;
464: --end Added by rtarway for BUG 3872176
465:

Line 500: p_return_status := FND_API.G_RET_STS_ERROR;

496: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
497: p_msg_name => 'PA_TP_INV_ASSGN_AMG',
498: P_TOKEN1 => 'OBJECT_ID',
499: P_VALUE1 => p_object_id);
500: p_return_status := FND_API.G_RET_STS_ERROR;
501: RAISE FND_API.G_EXC_ERROR;
502: END IF;
503: -- Here if hidden assignment, then we are just returning
504: -- We could have even thrown an erroe message of Invalid Assignment

Line 501: RAISE FND_API.G_EXC_ERROR;

497: p_msg_name => 'PA_TP_INV_ASSGN_AMG',
498: P_TOKEN1 => 'OBJECT_ID',
499: P_VALUE1 => p_object_id);
500: p_return_status := FND_API.G_RET_STS_ERROR;
501: RAISE FND_API.G_EXC_ERROR;
502: END IF;
503: -- Here if hidden assignment, then we are just returning
504: -- We could have even thrown an erroe message of Invalid Assignment
505: -- But we are not doing this right now as MSP is sending all assignments

Line 526: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

522: ,x_pa_task_assignment_id => l_object_id
523: --Added by rtarway for BUG 3872176
524: ,p_published_version_flag => l_published_version_flag
525: ,x_return_status => l_return_status );
526: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
527: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
528: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
529: RAISE FND_API.G_EXC_ERROR;
530: END IF;

Line 527: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

523: --Added by rtarway for BUG 3872176
524: ,p_published_version_flag => l_published_version_flag
525: ,x_return_status => l_return_status );
526: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
527: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
528: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
529: RAISE FND_API.G_EXC_ERROR;
530: END IF;
531: -- Bug 3799841 Returned l_object_id would be resource_assignment_id, we nned to change this to RLM id

Line 528: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

524: ,p_published_version_flag => l_published_version_flag
525: ,x_return_status => l_return_status );
526: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
527: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
528: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
529: RAISE FND_API.G_EXC_ERROR;
530: END IF;
531: -- Bug 3799841 Returned l_object_id would be resource_assignment_id, we nned to change this to RLM id
532: OPEN c_get_rlm_id(l_project_id_out, l_object_id, l_structure_version_id, l_task_version_id);

Line 529: RAISE FND_API.G_EXC_ERROR;

525: ,x_return_status => l_return_status );
526: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
527: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
528: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
529: RAISE FND_API.G_EXC_ERROR;
530: END IF;
531: -- Bug 3799841 Returned l_object_id would be resource_assignment_id, we nned to change this to RLM id
532: OPEN c_get_rlm_id(l_project_id_out, l_object_id, l_structure_version_id, l_task_version_id);
533: FETCH c_get_rlm_id INTO l_rlm_id;

Line 566: p_return_status := FND_API.G_RET_STS_ERROR;

562: or ( l_structure_version_id is null AND l_object_type <> 'PA_DELIVERABLES' )
563: ) THEN
564: FND_MESSAGE.SET_NAME('PA','PA_TP_INV_PROJ_STRUC_INFO');
565: FND_MSG_PUB.add;
566: p_return_status := FND_API.G_RET_STS_ERROR;
567: RAISE FND_API.G_EXC_ERROR;
568: END IF;
569: -- Bug 4218507 Added g_task_version_id_tbl
570: IF l_object_type = 'PA_DELIVERABLES' AND l_task_version_id IS NOT NULL THEN

Line 567: RAISE FND_API.G_EXC_ERROR;

563: ) THEN
564: FND_MESSAGE.SET_NAME('PA','PA_TP_INV_PROJ_STRUC_INFO');
565: FND_MSG_PUB.add;
566: p_return_status := FND_API.G_RET_STS_ERROR;
567: RAISE FND_API.G_EXC_ERROR;
568: END IF;
569: -- Bug 4218507 Added g_task_version_id_tbl
570: IF l_object_type = 'PA_DELIVERABLES' AND l_task_version_id IS NOT NULL THEN
571: l_unique_record := 'Y';

Line 607: ,p_commit => FND_API.G_FALSE --Bug 3754134

603:
604: PA_PROGRESS_PUB.populate_pji_tab_for_plan(
605: p_api_version => p_api_version_number
606: ,p_init_msg_list => p_init_msg_list
607: ,p_commit => FND_API.G_FALSE --Bug 3754134
608: ,p_calling_module => 'AMG'
609: ,p_project_id => l_project_id_out
610: ,p_structure_version_id => l_structure_version_id
611: ,p_baselined_str_ver_id => l_baselined_str_ver_id --maansari6/28 bug 3673618

Line 617: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then

613: ,x_msg_count => l_msg_count
614: ,x_msg_data => l_msg_data
615: );
616:
617: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
618: RAISE FND_API.G_EXC_ERROR;
619: END IF;
620: END IF;
621:

Line 618: RAISE FND_API.G_EXC_ERROR;

614: ,x_msg_data => l_msg_data
615: );
616:
617: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
618: RAISE FND_API.G_EXC_ERROR;
619: END IF;
620: END IF;
621:
622: IF (p_pm_product_code = PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR ) THEN

Line 731: p_return_status := FND_API.G_RET_STS_ERROR;

727: IF (l_object_type = 'PA_ASSIGNMENTS' OR l_object_type = 'PA_DELIVERABLES')
728: THEN
729: PA_UTILS.ADD_MESSAGE('PA', 'PA_PROG_BACKDATE_NOT_ALLOW',
730: 'OBJECT_ID', l_object_id);
731: p_return_status := FND_API.G_RET_STS_ERROR;
732: RAISE FND_API.G_EXC_ERROR;
733: END IF;
734: l_progress_mode := 'BACKDATED';
735: END IF;

Line 732: RAISE FND_API.G_EXC_ERROR;

728: THEN
729: PA_UTILS.ADD_MESSAGE('PA', 'PA_PROG_BACKDATE_NOT_ALLOW',
730: 'OBJECT_ID', l_object_id);
731: p_return_status := FND_API.G_RET_STS_ERROR;
732: RAISE FND_API.G_EXC_ERROR;
733: END IF;
734: l_progress_mode := 'BACKDATED';
735: END IF;
736: ELSE

Line 758: p_return_status := FND_API.G_RET_STS_ERROR;

754: AND trunc(nvl(l_latest_as_of_date,l_as_of_date + 1 )) <> TRUNC(l_as_of_date)
755: THEN
756: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
757: ,p_msg_name => 'PA_TP_INV_AOD2');
758: p_return_status := FND_API.G_RET_STS_ERROR;
759: RAISE FND_API.G_EXC_ERROR;
760: END IF;
761: END IF;
762: if (l_object_type = 'PA_ASSIGNMENTS')then

Line 759: RAISE FND_API.G_EXC_ERROR;

755: THEN
756: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
757: ,p_msg_name => 'PA_TP_INV_AOD2');
758: p_return_status := FND_API.G_RET_STS_ERROR;
759: RAISE FND_API.G_EXC_ERROR;
760: END IF;
761: END IF;
762: if (l_object_type = 'PA_ASSIGNMENTS')then
763: IF PA_PROGRESS_UTILS.CHECK_VALID_AS_OF_DATE(TRUNC(l_as_of_date), l_project_id_out, l_object_id, l_object_type, l_task_id ) = 'N'

Line 768: p_return_status := FND_API.G_RET_STS_ERROR;

764: AND trunc(nvl(l_latest_as_of_date,l_as_of_date + 1 )) <> TRUNC(l_as_of_date)
765: THEN
766: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
767: ,p_msg_name => 'PA_TP_INV_AOD2');
768: p_return_status := FND_API.G_RET_STS_ERROR;
769: RAISE FND_API.G_EXC_ERROR;
770: END IF;
771: END IF;
772: end if;

Line 769: RAISE FND_API.G_EXC_ERROR;

765: THEN
766: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
767: ,p_msg_name => 'PA_TP_INV_AOD2');
768: p_return_status := FND_API.G_RET_STS_ERROR;
769: RAISE FND_API.G_EXC_ERROR;
770: END IF;
771: END IF;
772: end if;
773: end if;

Line 816: p_commit => FND_API.G_FALSE, --Bug 3754134 instead passing p_commit pass false

812: if (l_progress_mode = 'FUTURE') then
813: PA_PROGRESS_PUB.UPDATE_PROGRESS(
814: p_api_version => p_api_version_number,
815: p_init_msg_list => p_init_msg_list,
816: p_commit => FND_API.G_FALSE, --Bug 3754134 instead passing p_commit pass false
817: p_action => 'PUBLISH',
818: P_rollup_entire_wbs_flag => l_rollup_entire_wbs,
819: p_progress_mode => l_progress_mode,
820: p_calling_module => 'AMG',

Line 856: p_commit => FND_API.G_FALSE,

852: elsif (l_progress_mode = 'BACKDATED') then
853: PA_PROGRESS_PUB.UPDATE_PROGRESS(
854: p_api_version => p_api_version_number,
855: p_init_msg_list => p_init_msg_list,
856: p_commit => FND_API.G_FALSE,
857: p_action => 'PUBLISH',
858: P_rollup_entire_wbs_flag => l_rollup_entire_wbs,
859: p_progress_mode => l_progress_mode,
860: p_calling_module => 'AMG',

Line 891: IF (p_return_status = FND_API.G_RET_STS_SUCCESS )

887: pa_debug.write(x_Module=>'PA_STATUS_PUB.UPDATE_PROGRESS', x_Msg => 'After call of PA_PROGRESS_PUB.UPDATE_PROGRESS p_return_status='||p_return_status, x_Log_Level=> 3);
888: END IF;
889:
890:
891: IF (p_return_status = FND_API.G_RET_STS_SUCCESS )
892: then
893: IF FND_API.to_boolean(p_commit)
894: THEN
895: COMMIT;

Line 893: IF FND_API.to_boolean(p_commit)

889:
890:
891: IF (p_return_status = FND_API.G_RET_STS_SUCCESS )
892: then
893: IF FND_API.to_boolean(p_commit)
894: THEN
895: COMMIT;
896: END IF;
897: ELSE

Line 906: WHEN FND_API.G_EXC_ERROR THEN

902: );
903: END IF;
904:
905: EXCEPTION
906: WHEN FND_API.G_EXC_ERROR THEN
907:
908: p_return_status := FND_API.G_RET_STS_ERROR;
909: ROLLBACK TO Update_Progress_Pub;
910:

Line 908: p_return_status := FND_API.G_RET_STS_ERROR;

904:
905: EXCEPTION
906: WHEN FND_API.G_EXC_ERROR THEN
907:
908: p_return_status := FND_API.G_RET_STS_ERROR;
909: ROLLBACK TO Update_Progress_Pub;
910:
911: FND_MSG_PUB.Count_And_Get
912: ( p_count => p_msg_count

Line 916: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

912: ( p_count => p_msg_count
913: , p_data => p_msg_data
914: );
915:
916: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
917:
918: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
919: ROLLBACK TO Update_Progress_Pub;
920:

Line 918: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

914: );
915:
916: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
917:
918: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
919: ROLLBACK TO Update_Progress_Pub;
920:
921: FND_MSG_PUB.Count_And_Get
922: ( p_count => p_msg_count

Line 929: p_return_status := FND_API.G_RET_STS_ERROR ;

925:
926:
927: WHEN ROW_ALREADY_LOCKED THEN
928:
929: p_return_status := FND_API.G_RET_STS_ERROR ;
930: IF FND_MSG_PUB.Check_Msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
931: THEN
932: FND_MESSAGE.SET_NAME('PA','PA_ROW_ALREADY_LOCKED');
933: FND_MESSAGE.SET_TOKEN('ENTITY', 'PERCENT_COMPLETE');

Line 944: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

940: );
941:
942: WHEN OTHERS THEN
943:
944: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
945: ROLLBACK TO Update_Progress_Pub;
946:
947: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
948: FND_MSG_PUB.Add_Exc_Msg

Line 983: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

979: --
980:
981: PROCEDURE Update_Earned_Value
982: (p_api_version_number IN NUMBER
983: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
984: , p_commit IN VARCHAR2 := FND_API.G_FALSE
985: , p_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
986: , p_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
987: , p_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895

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

980:
981: PROCEDURE Update_Earned_Value
982: (p_api_version_number IN NUMBER
983: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
984: , p_commit IN VARCHAR2 := FND_API.G_FALSE
985: , p_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
986: , p_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
987: , p_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
988: , p_project_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 1070: p_return_status := FND_API.G_RET_STS_SUCCESS;

1066: BEGIN
1067:
1068: SAVEPOINT Update_Earned_Value_Pub;
1069:
1070: p_return_status := FND_API.G_RET_STS_SUCCESS;
1071:
1072: IF NOT FND_API.Compatible_API_Call ( l_api_version_number ,
1073: p_api_version_number ,
1074: l_api_name,

Line 1072: IF NOT FND_API.Compatible_API_Call ( l_api_version_number ,

1068: SAVEPOINT Update_Earned_Value_Pub;
1069:
1070: p_return_status := FND_API.G_RET_STS_SUCCESS;
1071:
1072: IF NOT FND_API.Compatible_API_Call ( l_api_version_number ,
1073: p_api_version_number ,
1074: l_api_name,
1075: G_PKG_NAME)
1076: THEN

Line 1077: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1073: p_api_version_number ,
1074: l_api_name,
1075: G_PKG_NAME)
1076: THEN
1077: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1078: END IF;
1079:
1080: --Uncommented the following code as the fix of Bug 5632178
1081: /* Moved from below for Advanced Project Security Changes. Bug 2471668*/

Line 1091: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

1087: , p_return_status => l_return_status
1088: );
1089:
1090:
1091: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1092: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1093: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1094: RAISE FND_API.G_EXC_ERROR;
1095: END IF;

Line 1092: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1088: );
1089:
1090:
1091: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1092: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1093: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1094: RAISE FND_API.G_EXC_ERROR;
1095: END IF;
1096: --End of changes for bug 5632178

Line 1093: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

1089:
1090:
1091: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1092: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1093: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1094: RAISE FND_API.G_EXC_ERROR;
1095: END IF;
1096: --End of changes for bug 5632178
1097:

Line 1094: RAISE FND_API.G_EXC_ERROR;

1090:
1091: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1092: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1093: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1094: RAISE FND_API.G_EXC_ERROR;
1095: END IF;
1096: --End of changes for bug 5632178
1097:
1098: l_user_id := FND_GLOBAL.User_id;

Line 1122: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR

1118: p_msg_data => l_msg_data,
1119: p_return_status => l_return_status,
1120: p_function_allowed => l_function_allowed );
1121:
1122: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
1123: THEN
1124: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1125:
1126: ELSIF l_return_status = FND_API.G_RET_STS_ERROR

Line 1124: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1120: p_function_allowed => l_function_allowed );
1121:
1122: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
1123: THEN
1124: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1125:
1126: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
1127: THEN
1128: RAISE FND_API.G_EXC_ERROR;

Line 1126: ELSIF l_return_status = FND_API.G_RET_STS_ERROR

1122: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
1123: THEN
1124: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1125:
1126: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
1127: THEN
1128: RAISE FND_API.G_EXC_ERROR;
1129: END IF;
1130: IF l_function_allowed = 'N' THEN

Line 1128: RAISE FND_API.G_EXC_ERROR;

1124: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1125:
1126: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
1127: THEN
1128: RAISE FND_API.G_EXC_ERROR;
1129: END IF;
1130: IF l_function_allowed = 'N' THEN
1131: FND_MESSAGE.SET_NAME('PA','PA_FUNCTION_SECURITY_ENFORCED');
1132: FND_MSG_PUB.add;

Line 1133: p_return_status := FND_API.G_RET_STS_ERROR;

1129: END IF;
1130: IF l_function_allowed = 'N' THEN
1131: FND_MESSAGE.SET_NAME('PA','PA_FUNCTION_SECURITY_ENFORCED');
1132: FND_MSG_PUB.add;
1133: p_return_status := FND_API.G_RET_STS_ERROR;
1134: RAISE FND_API.G_EXC_ERROR;
1135: END IF;
1136:
1137: IF FND_API.to_boolean(p_init_msg_list)

Line 1134: RAISE FND_API.G_EXC_ERROR;

1130: IF l_function_allowed = 'N' THEN
1131: FND_MESSAGE.SET_NAME('PA','PA_FUNCTION_SECURITY_ENFORCED');
1132: FND_MSG_PUB.add;
1133: p_return_status := FND_API.G_RET_STS_ERROR;
1134: RAISE FND_API.G_EXC_ERROR;
1135: END IF;
1136:
1137: IF FND_API.to_boolean(p_init_msg_list)
1138: THEN

Line 1137: IF FND_API.to_boolean(p_init_msg_list)

1133: p_return_status := FND_API.G_RET_STS_ERROR;
1134: RAISE FND_API.G_EXC_ERROR;
1135: END IF;
1136:
1137: IF FND_API.to_boolean(p_init_msg_list)
1138: THEN
1139: FND_MSG_PUB.initialize;
1140: END IF;
1141:

Line 1154: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

1150: , p_return_status => l_return_status
1151: );
1152:
1153:
1154: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1155: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1156: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1157: RAISE FND_API.G_EXC_ERROR;
1158: END IF;

Line 1155: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1151: );
1152:
1153:
1154: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1155: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1156: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1157: RAISE FND_API.G_EXC_ERROR;
1158: END IF;
1159: */

Line 1156: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

1152:
1153:
1154: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1155: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1156: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1157: RAISE FND_API.G_EXC_ERROR;
1158: END IF;
1159: */
1160:

Line 1157: RAISE FND_API.G_EXC_ERROR;

1153:
1154: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1155: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1156: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1157: RAISE FND_API.G_EXC_ERROR;
1158: END IF;
1159: */
1160:
1161: IF pa_security.allow_query (x_project_id => l_project_id_out ) = 'N' THEN

Line 1168: p_return_status := FND_API.G_RET_STS_ERROR;

1164: -- Hence, cannot update the project.Raise error
1165:
1166: FND_MESSAGE.SET_NAME('PA','PA_PROJECT_SECURITY_ENFORCED');
1167: FND_MSG_PUB.add;
1168: p_return_status := FND_API.G_RET_STS_ERROR;
1169: RAISE FND_API.G_EXC_ERROR;
1170: ELSE
1171: -- If the user has query privileges, then check whether
1172: -- update privileges are also available

Line 1169: RAISE FND_API.G_EXC_ERROR;

1165:
1166: FND_MESSAGE.SET_NAME('PA','PA_PROJECT_SECURITY_ENFORCED');
1167: FND_MSG_PUB.add;
1168: p_return_status := FND_API.G_RET_STS_ERROR;
1169: RAISE FND_API.G_EXC_ERROR;
1170: ELSE
1171: -- If the user has query privileges, then check whether
1172: -- update privileges are also available
1173: IF pa_security.allow_update (x_project_id => l_project_id_out ) = 'N'

Line 1181: p_return_status := FND_API.G_RET_STS_ERROR;

1177: -- Hence , raise error
1178:
1179: FND_MESSAGE.SET_NAME('PA','PA_PROJECT_SECURITY_ENFORCED');
1180: FND_MSG_PUB.add;
1181: p_return_status := FND_API.G_RET_STS_ERROR;
1182: RAISE FND_API.G_EXC_ERROR;
1183: END IF;
1184: END IF;
1185:

Line 1182: RAISE FND_API.G_EXC_ERROR;

1178:
1179: FND_MESSAGE.SET_NAME('PA','PA_PROJECT_SECURITY_ENFORCED');
1180: FND_MSG_PUB.add;
1181: p_return_status := FND_API.G_RET_STS_ERROR;
1182: RAISE FND_API.G_EXC_ERROR;
1183: END IF;
1184: END IF;
1185:
1186: IF (p_task_id = 0) THEN

Line 1202: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

1198: , p_return_status => l_return_status
1199: );
1200:
1201:
1202: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1203: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1204: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1205: RAISE FND_API.G_EXC_ERROR;
1206: END IF;

Line 1203: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1199: );
1200:
1201:
1202: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1203: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1204: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1205: RAISE FND_API.G_EXC_ERROR;
1206: END IF;
1207: END IF;

Line 1204: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

1200:
1201:
1202: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1203: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1204: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1205: RAISE FND_API.G_EXC_ERROR;
1206: END IF;
1207: END IF;
1208:

Line 1205: RAISE FND_API.G_EXC_ERROR;

1201:
1202: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1203: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1204: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1205: RAISE FND_API.G_EXC_ERROR;
1206: END IF;
1207: END IF;
1208:
1209: -- ---------------------------------------------------------------

Line 1230: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

1226: , p_return_status => l_return_status
1227: );
1228:
1229:
1230: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1231: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1232: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1233: RAISE FND_API.G_EXC_ERROR;
1234: END IF;

Line 1231: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1227: );
1228:
1229:
1230: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1231: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1232: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1233: RAISE FND_API.G_EXC_ERROR;
1234: END IF;
1235:

Line 1232: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

1228:
1229:
1230: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1231: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1232: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1233: RAISE FND_API.G_EXC_ERROR;
1234: END IF;
1235:
1236: END IF;

Line 1233: RAISE FND_API.G_EXC_ERROR;

1229:
1230: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1231: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1232: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1233: RAISE FND_API.G_EXC_ERROR;
1234: END IF;
1235:
1236: END IF;
1237:

Line 1245: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

1241: p_out_resource_list_id => l_resource_list_id_out,
1242: p_return_status => l_return_status
1243: );
1244:
1245: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1246: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1247: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1248: RAISE FND_API.G_EXC_ERROR;
1249: END IF;

Line 1246: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1242: p_return_status => l_return_status
1243: );
1244:
1245: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1246: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1247: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1248: RAISE FND_API.G_EXC_ERROR;
1249: END IF;
1250:

Line 1247: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

1243: );
1244:
1245: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1246: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1247: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1248: RAISE FND_API.G_EXC_ERROR;
1249: END IF;
1250:
1251: PA_RESOURCE_PUB.Convert_alias_to_id

Line 1248: RAISE FND_API.G_EXC_ERROR;

1244:
1245: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1246: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1247: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1248: RAISE FND_API.G_EXC_ERROR;
1249: END IF;
1250:
1251: PA_RESOURCE_PUB.Convert_alias_to_id
1252: ( p_resource_list_id => l_resource_list_id_out

Line 1258: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

1254: , p_out_resource_list_member_id => l_resource_list_member_id_out
1255: , p_return_status => l_return_status
1256: );
1257:
1258: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1259: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1260: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1261: RAISE FND_API.G_EXC_ERROR;
1262: END IF;

Line 1259: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1255: , p_return_status => l_return_status
1256: );
1257:
1258: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1259: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1260: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1261: RAISE FND_API.G_EXC_ERROR;
1262: END IF;
1263:

Line 1260: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

1256: );
1257:
1258: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1259: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1260: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1261: RAISE FND_API.G_EXC_ERROR;
1262: END IF;
1263:
1264: END IF;

Line 1261: RAISE FND_API.G_EXC_ERROR;

1257:
1258: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1259: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1260: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1261: RAISE FND_API.G_EXC_ERROR;
1262: END IF;
1263:
1264: END IF;
1265:

Line 1417: RAISE FND_API.G_EXC_ERROR;

1413: THEN
1414: FND_MESSAGE.SET_NAME('PA','PA_EV_INSERT_ERROR');
1415: FND_MSG_PUB.Add;
1416: END IF;
1417: RAISE FND_API.G_EXC_ERROR;
1418: END IF;
1419:
1420: IF FND_API.to_boolean(p_commit)
1421: THEN

Line 1420: IF FND_API.to_boolean(p_commit)

1416: END IF;
1417: RAISE FND_API.G_EXC_ERROR;
1418: END IF;
1419:
1420: IF FND_API.to_boolean(p_commit)
1421: THEN
1422: COMMIT;
1423: END IF;
1424:

Line 1427: WHEN FND_API.G_EXC_ERROR THEN

1423: END IF;
1424:
1425:
1426: EXCEPTION
1427: WHEN FND_API.G_EXC_ERROR THEN
1428: p_return_status := FND_API.G_RET_STS_ERROR;
1429: ROLLBACK TO Update_Earned_Value_Pub;
1430:
1431: FND_MSG_PUB.Count_And_Get

Line 1428: p_return_status := FND_API.G_RET_STS_ERROR;

1424:
1425:
1426: EXCEPTION
1427: WHEN FND_API.G_EXC_ERROR THEN
1428: p_return_status := FND_API.G_RET_STS_ERROR;
1429: ROLLBACK TO Update_Earned_Value_Pub;
1430:
1431: FND_MSG_PUB.Count_And_Get
1432: ( p_count => p_msg_count

Line 1436: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1432: ( p_count => p_msg_count
1433: ,p_data => p_msg_data
1434: );
1435:
1436: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1437: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1438: ROLLBACK TO Update_Earned_Value_Pub;
1439:
1440: FND_MSG_PUB.Count_And_Get

Line 1437: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1433: ,p_data => p_msg_data
1434: );
1435:
1436: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1437: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1438: ROLLBACK TO Update_Earned_Value_Pub;
1439:
1440: FND_MSG_PUB.Count_And_Get
1441: ( p_count => p_msg_count

Line 1447: p_return_status := FND_API.G_RET_STS_ERROR ;

1443: );
1444:
1445: WHEN ROW_ALREADY_LOCKED THEN
1446:
1447: p_return_status := FND_API.G_RET_STS_ERROR ;
1448:
1449: IF FND_MSG_PUB.Check_Msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1450: THEN
1451: FND_MESSAGE.SET_NAME('PA','PA_ROW_ALREADY_LOCKED');

Line 1461: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1457:
1458:
1459: WHEN OTHERS THEN
1460:
1461: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1462: ROLLBACK TO Update_Earned_Value_Pub;
1463:
1464: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1465: FND_MSG_PUB.Add_Exc_Msg

Line 1481: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

1477: END Update_Earned_Value;
1478:
1479: PROCEDURE Init_Update_Task_Progress
1480: (p_api_version_number IN NUMBER
1481: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1482: , p_commit IN VARCHAR2 := FND_API.G_FALSE
1483: , p_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
1484: , p_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
1485: , p_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895

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

1478:
1479: PROCEDURE Init_Update_Task_Progress
1480: (p_api_version_number IN NUMBER
1481: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1482: , p_commit IN VARCHAR2 := FND_API.G_FALSE
1483: , p_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
1484: , p_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
1485: , p_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
1486: )

Line 1491: IF FND_API.to_boolean(p_init_msg_list)

1487: IS
1488: l_api_name CONSTANT VARCHAR2(30) := 'Init_Update_Task_Progress';
1489:
1490: BEGIN
1491: IF FND_API.to_boolean(p_init_msg_list)
1492: THEN
1493: FND_MSG_PUB.initialize;
1494: END IF;
1495:

Line 1496: p_return_status := FND_API.G_RET_STS_SUCCESS;

1492: THEN
1493: FND_MSG_PUB.initialize;
1494: END IF;
1495:
1496: p_return_status := FND_API.G_RET_STS_SUCCESS;
1497:
1498: G_TASK_PROGRESS_in_tbl.delete;
1499: G_TASK_PROGRESS_tbl_count := 0;
1500:

Line 1501: IF (p_return_status <> FND_API.G_RET_STS_SUCCESS ) then

1497:
1498: G_TASK_PROGRESS_in_tbl.delete;
1499: G_TASK_PROGRESS_tbl_count := 0;
1500:
1501: IF (p_return_status <> FND_API.G_RET_STS_SUCCESS ) then
1502: FND_MSG_PUB.Count_And_Get
1503: ( p_count => p_msg_count
1504: ,p_data => p_msg_data
1505: );

Line 1508: WHEN FND_API.G_EXC_ERROR THEN

1504: ,p_data => p_msg_data
1505: );
1506: END IF;
1507: EXCEPTION
1508: WHEN FND_API.G_EXC_ERROR THEN
1509: p_return_status := FND_API.G_RET_STS_ERROR;
1510: FND_MSG_PUB.Count_And_Get
1511: ( p_count => p_msg_count
1512: ,p_data => p_msg_data

Line 1509: p_return_status := FND_API.G_RET_STS_ERROR;

1505: );
1506: END IF;
1507: EXCEPTION
1508: WHEN FND_API.G_EXC_ERROR THEN
1509: p_return_status := FND_API.G_RET_STS_ERROR;
1510: FND_MSG_PUB.Count_And_Get
1511: ( p_count => p_msg_count
1512: ,p_data => p_msg_data
1513: );

Line 1514: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1510: FND_MSG_PUB.Count_And_Get
1511: ( p_count => p_msg_count
1512: ,p_data => p_msg_data
1513: );
1514: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1515: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1516: FND_MSG_PUB.Count_And_Get
1517: ( p_count => p_msg_count
1518: ,p_data => p_msg_data

Line 1515: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1511: ( p_count => p_msg_count
1512: ,p_data => p_msg_data
1513: );
1514: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1515: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1516: FND_MSG_PUB.Count_And_Get
1517: ( p_count => p_msg_count
1518: ,p_data => p_msg_data
1519: );

Line 1521: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1517: ( p_count => p_msg_count
1518: ,p_data => p_msg_data
1519: );
1520: WHEN OTHERS THEN
1521: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1522: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1523: FND_MSG_PUB.Add_Exc_Msg
1524: ( G_PKG_NAME
1525: , l_api_name

Line 1537: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

1533: END Init_Update_Task_Progress;
1534:
1535: PROCEDURE Load_Task_Progress
1536: (p_api_version_number IN NUMBER
1537: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1538: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1539: ,p_project_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
1540: ,p_pm_project_reference IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
1541: ,p_pm_product_code IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR

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

1534:
1535: PROCEDURE Load_Task_Progress
1536: (p_api_version_number IN NUMBER
1537: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1538: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1539: ,p_project_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
1540: ,p_pm_project_reference IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
1541: ,p_pm_product_code IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
1542: ,p_structure_type IN VARCHAR2 := 'FINANCIAL'

Line 1614: IF FND_API.to_boolean(p_init_msg_list)

1610: IF g1_debug_mode = 'Y' THEN
1611: pa_debug.init_err_stack ('PA_PROGRESS_PUB.LOAD_TASK_PROGRESS');
1612: END IF;
1613:
1614: IF FND_API.to_boolean(p_init_msg_list)
1615: THEN
1616: FND_MSG_PUB.initialize;
1617: END IF;
1618:

Line 1619: p_return_status := FND_API.G_RET_STS_SUCCESS;

1615: THEN
1616: FND_MSG_PUB.initialize;
1617: END IF;
1618:
1619: p_return_status := FND_API.G_RET_STS_SUCCESS;
1620:
1621: IF(G_TASK_PROGRESS_tbl_count = 0) THEN
1622: G_PROJECT_ID := P_PROJECT_ID;
1623: G_pm_project_reference := P_pm_project_reference;

Line 1980: IF (p_return_status <> FND_API.G_RET_STS_SUCCESS ) then

1976: -- G_TASK_PROGRESS_in_tbl(G_TASK_PROGRESS_tbl_count).PROGRESS_MODE := l_progress_mode;
1977:
1978: END LOOP;
1979:
1980: IF (p_return_status <> FND_API.G_RET_STS_SUCCESS ) then
1981: FND_MSG_PUB.Count_And_Get
1982: ( p_count => p_msg_count
1983: ,p_data => p_msg_data
1984: );

Line 1987: WHEN FND_API.G_EXC_ERROR THEN

1983: ,p_data => p_msg_data
1984: );
1985: END IF;
1986: EXCEPTION
1987: WHEN FND_API.G_EXC_ERROR THEN
1988: p_return_status := FND_API.G_RET_STS_ERROR;
1989: FND_MSG_PUB.Count_And_Get
1990: ( p_count => p_msg_count
1991: ,p_data => p_msg_data

Line 1988: p_return_status := FND_API.G_RET_STS_ERROR;

1984: );
1985: END IF;
1986: EXCEPTION
1987: WHEN FND_API.G_EXC_ERROR THEN
1988: p_return_status := FND_API.G_RET_STS_ERROR;
1989: FND_MSG_PUB.Count_And_Get
1990: ( p_count => p_msg_count
1991: ,p_data => p_msg_data
1992: );

Line 1993: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1989: FND_MSG_PUB.Count_And_Get
1990: ( p_count => p_msg_count
1991: ,p_data => p_msg_data
1992: );
1993: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1994: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1995: FND_MSG_PUB.Count_And_Get
1996: ( p_count => p_msg_count
1997: ,p_data => p_msg_data

Line 1994: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1990: ( p_count => p_msg_count
1991: ,p_data => p_msg_data
1992: );
1993: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1994: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1995: FND_MSG_PUB.Count_And_Get
1996: ( p_count => p_msg_count
1997: ,p_data => p_msg_data
1998: );

Line 2000: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1996: ( p_count => p_msg_count
1997: ,p_data => p_msg_data
1998: );
1999: WHEN OTHERS THEN
2000: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2001: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2002: FND_MSG_PUB.Add_Exc_Msg
2003: ( G_PKG_NAME
2004: , l_api_name

Line 2015: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

2011: END Load_Task_Progress;
2012:
2013: PROCEDURE Execute_Update_Task_Progress
2014: ( p_api_version_number IN NUMBER
2015: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
2016: , p_commit IN VARCHAR2 := FND_API.G_FALSE
2017: , p_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
2018: , p_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
2019: , p_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895

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

2012:
2013: PROCEDURE Execute_Update_Task_Progress
2014: ( p_api_version_number IN NUMBER
2015: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
2016: , p_commit IN VARCHAR2 := FND_API.G_FALSE
2017: , p_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
2018: , p_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
2019: , p_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
2020: )

Line 2121: IF FND_API.to_boolean(p_init_msg_list)

2117: l_proj_thru_dates_tbl SYSTEM.pa_date_tbl_type:= SYSTEM.pa_date_tbl_type() ;
2118:
2119: BEGIN
2120:
2121: IF FND_API.to_boolean(p_init_msg_list)
2122: THEN
2123: FND_MSG_PUB.initialize;
2124: END IF;
2125: g1_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

Line 2129: p_return_status := FND_API.G_RET_STS_SUCCESS;

2125: g1_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
2126: savepoint Execute_Update_Task_Progress;
2127:
2128:
2129: p_return_status := FND_API.G_RET_STS_SUCCESS;
2130: -- Bug 3606627 : Added call of PA_STATUS_PUB.Project_Level_Validations
2131: PA_STATUS_PUB.Project_Level_Validations
2132: (p_api_version_number => p_api_version_number
2133: ,p_msg_count => p_msg_count

Line 2140: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then

2136: , p_project_id => G_PROJECT_ID
2137: , p_pm_project_reference => G_pm_project_reference
2138: , p_project_id_out => l_project_id_out
2139: );
2140: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
2141: p_return_status := l_return_status;
2142: RAISE FND_API.G_EXC_ERROR;
2143: END IF;
2144:

Line 2142: RAISE FND_API.G_EXC_ERROR;

2138: , p_project_id_out => l_project_id_out
2139: );
2140: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
2141: p_return_status := l_return_status;
2142: RAISE FND_API.G_EXC_ERROR;
2143: END IF;
2144:
2145: G_PROJECT_ID := l_project_id_out;
2146:

Line 2151: p_return_status := FND_API.G_RET_STS_ERROR;

2147:
2148: IF(G_TASK_PROGRESS_tbl_count = 0) THEN
2149: FND_MESSAGE.SET_NAME('PA','PA_NO_TASK_PROGRESS_UPDATE');
2150: FND_MSG_PUB.add;
2151: p_return_status := FND_API.G_RET_STS_ERROR;
2152: RAISE FND_API.G_EXC_ERROR;
2153: -- Bug 3606627 : Changed the following if condition to >=1 from =1
2154: ELSIF(G_TASK_PROGRESS_tbl_count >= 1) THEN
2155: --G_bulk_load_flag := 'N'; Bug 3606627

Line 2152: RAISE FND_API.G_EXC_ERROR;

2148: IF(G_TASK_PROGRESS_tbl_count = 0) THEN
2149: FND_MESSAGE.SET_NAME('PA','PA_NO_TASK_PROGRESS_UPDATE');
2150: FND_MSG_PUB.add;
2151: p_return_status := FND_API.G_RET_STS_ERROR;
2152: RAISE FND_API.G_EXC_ERROR;
2153: -- Bug 3606627 : Changed the following if condition to >=1 from =1
2154: ELSIF(G_TASK_PROGRESS_tbl_count >= 1) THEN
2155: --G_bulk_load_flag := 'N'; Bug 3606627
2156: G_bulk_load_flag := 'Y'; -- Bug 3606627

Line 2171: p_return_status := FND_API.G_RET_STS_ERROR;

2167: /* IF PA_PROGRESS_UTILS.CHECK_VALID_AS_OF_DATE( TRUNC(g_as_of_date), l_project_id_out, l_structure_id, 'PA_STRUCTURES', l_structure_id --Bug 3764224 ) = 'N'
2168: THEN
2169: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
2170: ,p_msg_name => 'PA_TP_INV_AOD2');
2171: p_return_status := FND_API.G_RET_STS_ERROR;
2172: RAISE FND_API.G_EXC_ERROR;
2173: END IF; */
2174:
2175: l_baselined_str_ver_id := PA_PROJECT_STRUCTURE_UTILS.Get_Baseline_Struct_Ver(l_project_id_out); --maansari6/28 bug 3673618

Line 2172: RAISE FND_API.G_EXC_ERROR;

2168: THEN
2169: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
2170: ,p_msg_name => 'PA_TP_INV_AOD2');
2171: p_return_status := FND_API.G_RET_STS_ERROR;
2172: RAISE FND_API.G_EXC_ERROR;
2173: END IF; */
2174:
2175: l_baselined_str_ver_id := PA_PROJECT_STRUCTURE_UTILS.Get_Baseline_Struct_Ver(l_project_id_out); --maansari6/28 bug 3673618
2176:

Line 2188: ,p_commit => FND_API.G_FALSE --Bug 3754134

2184: AND l_baselined_str_ver_id IS NOT NULL THEN --maansari6/28 bug 3673618
2185: PA_PROGRESS_PUB.populate_pji_tab_for_plan(
2186: p_api_version => p_api_version_number
2187: ,p_init_msg_list => p_init_msg_list
2188: ,p_commit => FND_API.G_FALSE --Bug 3754134
2189: ,p_calling_module => 'AMG'
2190: ,p_project_id => l_project_id_out
2191: ,p_structure_version_id => l_structure_version_id
2192: ,p_baselined_str_ver_id => l_baselined_str_ver_id --maansari6/28 bug 3673618

Line 2198: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then

2194: ,x_msg_count => l_msg_count
2195: ,x_msg_data => l_msg_data
2196: );
2197:
2198: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
2199: RAISE FND_API.G_EXC_ERROR;
2200: END IF;
2201: END IF;
2202: g_task_version_id_tbl.delete; -- Bug 4218507

Line 2199: RAISE FND_API.G_EXC_ERROR;

2195: ,x_msg_data => l_msg_data
2196: );
2197:
2198: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
2199: RAISE FND_API.G_EXC_ERROR;
2200: END IF;
2201: END IF;
2202: g_task_version_id_tbl.delete; -- Bug 4218507
2203: i := G_TASK_PROGRESS_in_tbl.first;

Line 2294: ,p_commit => FND_API.G_FALSE -- Bug 3754134 Added this

2290: PA_STATUS_PUB.UPDATE_PROGRESS
2291: (p_api_version_number => p_api_version_number
2292: ,p_msg_count => l_msg_count
2293: ,p_msg_data => l_msg_data
2294: ,p_commit => FND_API.G_FALSE -- Bug 3754134 Added this
2295: ,p_return_status => l_return_status
2296: , p_project_id => l_project_id_out
2297: , p_pm_project_reference => g_pm_project_reference
2298: , p_task_id => l_task_id

Line 2328: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

2324: , p_populate_pji_tables => 'N' -- bug 3606627
2325: , p_rollup_entire_wbs => 'Y' -- bug 3606627
2326: );
2327:
2328: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2329: p_return_status := l_return_status;
2330:
2331: FND_MSG_PUB.get (
2332: p_msg_index => l_msg_count,

Line 2333: p_encoded => FND_API.G_FALSE,

2329: p_return_status := l_return_status;
2330:
2331: FND_MSG_PUB.get (
2332: p_msg_index => l_msg_count,
2333: p_encoded => FND_API.G_FALSE,
2334: p_data => l_data,
2335: p_msg_index_out => l_msg_index_out );
2336:
2337: IF l_data IS NOT NULL THEN

Line 2358: p_return_status := FND_API.G_RET_STS_ERROR;

2354: IF G_STRUCTURE_TYPE = 'WORKPLAN' and l_is_progress_status_null = 'Y'
2355: THEN
2356: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
2357: ,p_msg_name => 'PA_TP_STATUS_NOT_DEFINED');
2358: p_return_status := FND_API.G_RET_STS_ERROR;
2359: RAISE FND_API.G_EXC_ERROR;
2360: END IF;
2361:
2362: --maansari6/28 bug 3673618

Line 2359: RAISE FND_API.G_EXC_ERROR;

2355: THEN
2356: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
2357: ,p_msg_name => 'PA_TP_STATUS_NOT_DEFINED');
2358: p_return_status := FND_API.G_RET_STS_ERROR;
2359: RAISE FND_API.G_EXC_ERROR;
2360: END IF;
2361:
2362: --maansari6/28 bug 3673618
2363: IF l_progress_updated_flag = 'N'

Line 2370: RAISE FND_API.G_EXC_ERROR;

2366: END IF;
2367:
2368: IF (l_raise_exception = 'E' )
2369: THEN
2370: RAISE FND_API.G_EXC_ERROR;
2371: ELSIF l_raise_exception = 'U'
2372: THEN
2373: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2374: END IF;

Line 2373: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2369: THEN
2370: RAISE FND_API.G_EXC_ERROR;
2371: ELSIF l_raise_exception = 'U'
2372: THEN
2373: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2374: END IF;
2375: --maansari6/28 bug 3673618
2376:
2377:

Line 2431: RAISE FND_API.G_EXC_ERROR;

2427: WHEN OTHERS THEN
2428: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_STATUS_PUB',
2429: p_procedure_name => 'execute_update_progress',
2430: p_error_text => SUBSTRB('PA_FP_MAINTAIN_ACTUAL_PUB.MAINTAIN_ACTUAL_AMT_WRP:'||SQLERRM,1,120));
2431: RAISE FND_API.G_EXC_ERROR;
2432: END;
2433: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2434: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
2435: p_msg_name => l_msg_data);

Line 2433: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2429: p_procedure_name => 'execute_update_progress',
2430: p_error_text => SUBSTRB('PA_FP_MAINTAIN_ACTUAL_PUB.MAINTAIN_ACTUAL_AMT_WRP:'||SQLERRM,1,120));
2431: RAISE FND_API.G_EXC_ERROR;
2432: END;
2433: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2434: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
2435: p_msg_name => l_msg_data);
2436: p_return_status := 'E';
2437: RAISE FND_API.G_EXC_ERROR;

Line 2437: RAISE FND_API.G_EXC_ERROR;

2433: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2434: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
2435: p_msg_name => l_msg_data);
2436: p_return_status := 'E';
2437: RAISE FND_API.G_EXC_ERROR;
2438: END IF;
2439: END IF;
2440: -- Bug 4186007 Begin
2441: BEGIN

Line 2449: RAISE FND_API.G_EXC_ERROR;

2445: WHEN OTHERS THEN
2446: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_STATUS_PUB',
2447: p_procedure_name => 'EXECUTE_UPDATE_TASK_PROGRESS',
2448: p_error_text => SUBSTRB('Call of PJI_FM_XBS_ACCUM_MAINT.PLAN_UPDATE Failed:'||SQLERRM,1,120));
2449: RAISE FND_API.G_EXC_ERROR;
2450: END;
2451:
2452: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
2453: p_return_status := l_return_status;

Line 2452: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then

2448: p_error_text => SUBSTRB('Call of PJI_FM_XBS_ACCUM_MAINT.PLAN_UPDATE Failed:'||SQLERRM,1,120));
2449: RAISE FND_API.G_EXC_ERROR;
2450: END;
2451:
2452: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
2453: p_return_status := l_return_status;
2454: RAISE FND_API.G_EXC_ERROR;
2455: END IF;
2456:

Line 2454: RAISE FND_API.G_EXC_ERROR;

2450: END;
2451:
2452: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
2453: p_return_status := l_return_status;
2454: RAISE FND_API.G_EXC_ERROR;
2455: END IF;
2456:
2457:
2458: l_base_struct_ver_id := pa_project_structure_utils.get_baseline_struct_ver(l_project_id_out);

Line 2491: RAISE FND_API.G_EXC_ERROR;

2487: WHEN OTHERS THEN
2488: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_STATUS_PUB',
2489: p_procedure_name => 'EXECUTE_UPDATE_TASK_PROGRESS',
2490: p_error_text => SUBSTRB('Call of PJI_FM_XBS_ACCUM_UTILS.populate_workplan_data: failed'||SQLERRM,1,120));
2491: RAISE FND_API.G_EXC_ERROR;
2492: END;
2493: */
2494:
2495: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then

Line 2495: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then

2491: RAISE FND_API.G_EXC_ERROR;
2492: END;
2493: */
2494:
2495: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
2496: p_return_status := l_return_status;
2497: RAISE FND_API.G_EXC_ERROR;
2498: END IF;
2499:

Line 2497: RAISE FND_API.G_EXC_ERROR;

2493: */
2494:
2495: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
2496: p_return_status := l_return_status;
2497: RAISE FND_API.G_EXC_ERROR;
2498: END IF;
2499:
2500: -- Bug 4186007 End
2501:

Line 2505: ,p_commit => FND_API.G_FALSE -- Bug 3754134 instead of passing p_commit passing fasle

2501:
2502:
2503: PA_PROGRESS_PVT.ROLLUP_PROGRESS_PVT(
2504: p_init_msg_list => p_init_msg_list
2505: ,p_commit => FND_API.G_FALSE -- Bug 3754134 instead of passing p_commit passing fasle
2506: ,p_calling_module => 'AMG' --bug 3673618
2507: ,p_project_id => l_project_id_out
2508: ,p_structure_version_id => l_structure_version_id
2509: ,p_as_of_date => trunc(g_as_of_date) -- 5294838

Line 2519: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then

2515: ,x_return_status => l_return_status
2516: ,x_msg_count => l_msg_count
2517: ,x_msg_data => l_msg_data);
2518:
2519: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
2520: p_return_status := l_return_status;
2521: RAISE FND_API.G_EXC_ERROR;
2522: END IF;
2523:

Line 2521: RAISE FND_API.G_EXC_ERROR;

2517: ,x_msg_data => l_msg_data);
2518:
2519: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
2520: p_return_status := l_return_status;
2521: RAISE FND_API.G_EXC_ERROR;
2522: END IF;
2523:
2524: PA_PROGRESS_PUB.ROLLUP_FUTURE_PROGRESS_PVT(
2525: p_project_id => l_project_id_out

Line 2542: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then

2538: ,x_msg_count => l_msg_count
2539: ,x_msg_data => l_msg_data
2540: );
2541:
2542: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
2543: p_return_status := l_return_status;
2544: RAISE FND_API.G_EXC_ERROR;
2545: END IF;
2546: -- Bug 3606627 End

Line 2544: RAISE FND_API.G_EXC_ERROR;

2540: );
2541:
2542: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
2543: p_return_status := l_return_status;
2544: RAISE FND_API.G_EXC_ERROR;
2545: END IF;
2546: -- Bug 3606627 End
2547: END IF; --(G_TASK_PROGRESS_tbl_count >= 1) THEN Bug 3606627 : Added Ebd IF here itself
2548: -- BUG 4080922 Adding Program Rollup Code : rtarway

Line 2572: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN

2568: IF g1_debug_mode = 'Y' THEN
2569: pa_debug.write(x_Module=>'PA_PROGRESS_PUB.UPDATE_PROGRESS', x_Msg => 'After Calling program_rollup_pvt l_return_status='||l_return_status, x_Log_Level=> 3);
2570: END IF;
2571:
2572: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
2573: p_return_status := l_return_status;
2574: RAISE FND_API.G_EXC_ERROR;
2575: END IF;
2576:

Line 2574: RAISE FND_API.G_EXC_ERROR;

2570: END IF;
2571:
2572: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
2573: p_return_status := l_return_status;
2574: RAISE FND_API.G_EXC_ERROR;
2575: END IF;
2576:
2577: END IF;
2578: -- End Add 4080922

Line 2593: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then

2589: , p_project_id => G_PROJECT_ID
2590: , p_pm_project_reference => G_pm_project_reference
2591: , p_project_id_out => l_project_id_out
2592: );
2593: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
2594: p_return_status := l_return_status;
2595: RAISE FND_API.G_EXC_ERROR;
2596: END IF;
2597: G_PROJECT_ID := l_project_id_out;

Line 2595: RAISE FND_API.G_EXC_ERROR;

2591: , p_project_id_out => l_project_id_out
2592: );
2593: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
2594: p_return_status := l_return_status;
2595: RAISE FND_API.G_EXC_ERROR;
2596: END IF;
2597: G_PROJECT_ID := l_project_id_out;
2598:
2599: l_structure_version_id := PA_PROJECT_STRUCTURE_UTILS.get_latest_wp_version(l_project_id_out);

Line 2631: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then

2627: p_return_status => l_return_status,
2628: p_msg_count => p_msg_count,
2629: p_msg_data => p_msg_data
2630: );
2631: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
2632: p_return_status := l_return_status;
2633: RAISE FND_API.G_EXC_ERROR;
2634: END IF;
2635:

Line 2633: RAISE FND_API.G_EXC_ERROR;

2629: p_msg_data => p_msg_data
2630: );
2631: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
2632: p_return_status := l_return_status;
2633: RAISE FND_API.G_EXC_ERROR;
2634: END IF;
2635:
2636: IF(l_rollup_flag = 'Y') then
2637: PA_PROGRESS_PUB.ROLLUP_TASK_PROGRESSES(

Line 2649: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then

2645: p_return_status => l_return_status,
2646: p_msg_count => p_msg_count,
2647: p_msg_data => p_msg_data
2648: );
2649: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
2650: p_return_status := l_return_status;
2651: RAISE FND_API.G_EXC_ERROR;
2652: END IF;
2653: */

Line 2651: RAISE FND_API.G_EXC_ERROR;

2647: p_msg_data => p_msg_data
2648: );
2649: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
2650: p_return_status := l_return_status;
2651: RAISE FND_API.G_EXC_ERROR;
2652: END IF;
2653: */
2654:
2655:

Line 2672: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then

2668: p_return_status => l_return_status,
2669: p_msg_count => p_msg_count,
2670: p_msg_data => p_msg_data
2671: );
2672: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
2673: p_return_status := l_return_status;
2674: RAISE FND_API.G_EXC_ERROR;
2675: END IF;
2676:

Line 2674: RAISE FND_API.G_EXC_ERROR;

2670: p_msg_data => p_msg_data
2671: );
2672: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
2673: p_return_status := l_return_status;
2674: RAISE FND_API.G_EXC_ERROR;
2675: END IF;
2676:
2677: Commented out for Progress Management Changes. Bug # 3420093. */
2678:

Line 2695: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then

2691: x_return_status => l_return_status,
2692: x_msg_count => p_msg_count,
2693: x_msg_data => p_msg_data
2694: );
2695: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
2696: p_return_status := l_return_status;
2697: RAISE FND_API.G_EXC_ERROR;
2698: END IF;
2699: */

Line 2697: RAISE FND_API.G_EXC_ERROR;

2693: x_msg_data => p_msg_data
2694: );
2695: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
2696: p_return_status := l_return_status;
2697: RAISE FND_API.G_EXC_ERROR;
2698: END IF;
2699: */
2700:
2701: /* Progress Management Changes. Bug # 3420093. */

Line 2749: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then

2745: ,x_return_status => l_return_status
2746: ,x_msg_count => l_msg_count
2747: ,x_msg_data => l_msg_data
2748: );
2749: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
2750: p_return_status := l_return_status;
2751: RAISE FND_API.G_EXC_ERROR;
2752: END IF;
2753:

Line 2751: RAISE FND_API.G_EXC_ERROR;

2747: ,x_msg_data => l_msg_data
2748: );
2749: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) then
2750: p_return_status := l_return_status;
2751: RAISE FND_API.G_EXC_ERROR;
2752: END IF;
2753:
2754: IF ( NVL( l_lowest_level_task, 'N' ) = 'Y' )
2755: THEN

Line 2762: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

2758: ,p_element_version_id => l_object_version_id
2759: ,x_return_status => l_return_status
2760: ,x_msg_count => l_msg_count
2761: ,x_msg_data => l_msg_data );
2762: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
2763: THEN
2764: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
2765: p_msg_name => l_msg_data
2766: );

Line 2769: RAISE FND_API.G_EXC_ERROR;

2765: p_msg_name => l_msg_data
2766: );
2767: p_msg_data := l_msg_data;
2768: p_return_status := 'E';
2769: RAISE FND_API.G_EXC_ERROR;
2770: END IF;
2771: begin
2772: Select ppev1.proj_element_id
2773: into l_structure_id

Line 2786: p_validate_only => FND_API.G_FALSE

2782: AND
2783: (PA_PROJECT_STRUCTURE_UTILS.CHECK_SHARING_ENABLED(l_project_id_out) = 'Y')) THEN
2784: --copy to transaction dates
2785: PA_PROJECT_DATES_PUB.COPY_PROJECT_DATES(
2786: p_validate_only => FND_API.G_FALSE
2787: ,p_project_id => l_project_id_out
2788: ,x_return_status => l_return_status
2789: ,x_msg_count => l_msg_count
2790: ,x_msg_data => l_msg_data);

Line 2817: IF (p_return_status = FND_API.G_RET_STS_SUCCESS )

2813: and nvl(COMPLETED_PERCENTAGE,0) = nvl(eff_rollup_percent_comp, -1);
2814:
2815: /* bug 6917961 */
2816:
2817: IF (p_return_status = FND_API.G_RET_STS_SUCCESS )
2818: then
2819: IF FND_API.to_boolean(p_commit)
2820: THEN
2821: COMMIT;

Line 2819: IF FND_API.to_boolean(p_commit)

2815: /* bug 6917961 */
2816:
2817: IF (p_return_status = FND_API.G_RET_STS_SUCCESS )
2818: then
2819: IF FND_API.to_boolean(p_commit)
2820: THEN
2821: COMMIT;
2822: END IF;
2823: ELSE

Line 2834: WHEN FND_API.G_EXC_ERROR THEN

2830: G_bulk_load_flag :='N';
2831: G_TASK_PROGRESS_in_tbl.delete;
2832: G_TASK_PROGRESS_tbl_count := 0;
2833: EXCEPTION
2834: WHEN FND_API.G_EXC_ERROR THEN
2835: p_return_status := FND_API.G_RET_STS_ERROR;
2836: ROLLBACK TO Execute_Update_Task_Progress;
2837: FND_MSG_PUB.Count_And_Get
2838: ( p_count => p_msg_count

Line 2835: p_return_status := FND_API.G_RET_STS_ERROR;

2831: G_TASK_PROGRESS_in_tbl.delete;
2832: G_TASK_PROGRESS_tbl_count := 0;
2833: EXCEPTION
2834: WHEN FND_API.G_EXC_ERROR THEN
2835: p_return_status := FND_API.G_RET_STS_ERROR;
2836: ROLLBACK TO Execute_Update_Task_Progress;
2837: FND_MSG_PUB.Count_And_Get
2838: ( p_count => p_msg_count
2839: ,p_data => p_msg_data

Line 2844: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2840: );
2841: G_bulk_load_flag :='N';
2842: G_TASK_PROGRESS_in_tbl.delete;
2843: G_TASK_PROGRESS_tbl_count := 0;
2844: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2845: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2846: ROLLBACK TO Execute_Update_Task_Progress;
2847: FND_MSG_PUB.Count_And_Get
2848: ( p_count => p_msg_count

Line 2845: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2841: G_bulk_load_flag :='N';
2842: G_TASK_PROGRESS_in_tbl.delete;
2843: G_TASK_PROGRESS_tbl_count := 0;
2844: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2845: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2846: ROLLBACK TO Execute_Update_Task_Progress;
2847: FND_MSG_PUB.Count_And_Get
2848: ( p_count => p_msg_count
2849: ,p_data => p_msg_data

Line 2855: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2851: G_bulk_load_flag :='N';
2852: G_TASK_PROGRESS_in_tbl.delete;
2853: G_TASK_PROGRESS_tbl_count := 0;
2854: WHEN OTHERS THEN
2855: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2856: ROLLBACK TO Execute_Update_Task_Progress;
2857: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2858: FND_MSG_PUB.Add_Exc_Msg
2859: ( G_PKG_NAME

Line 2875: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

2871:
2872:
2873: PROCEDURE Project_Level_Validations
2874: (p_api_version_number IN NUMBER
2875: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
2876: , p_commit IN VARCHAR2 := FND_API.G_FALSE
2877: , p_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
2878: , p_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
2879: , p_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895

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

2872:
2873: PROCEDURE Project_Level_Validations
2874: (p_api_version_number IN NUMBER
2875: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
2876: , p_commit IN VARCHAR2 := FND_API.G_FALSE
2877: , p_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
2878: , p_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
2879: , p_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
2880: , p_project_id IN NUMBER

Line 2904: IF FND_API.to_boolean(p_init_msg_list)

2900: l_date_computed DATE;
2901:
2902:
2903: BEGIN
2904: IF FND_API.to_boolean(p_init_msg_list)
2905: THEN
2906: FND_MSG_PUB.initialize;
2907: END IF;
2908:

Line 2909: p_return_status := FND_API.G_RET_STS_SUCCESS;

2905: THEN
2906: FND_MSG_PUB.initialize;
2907: END IF;
2908:
2909: p_return_status := FND_API.G_RET_STS_SUCCESS;
2910:
2911:
2912: IF NOT FND_API.Compatible_API_Call ( l_api_version_number ,
2913: p_api_version_number ,

Line 2912: IF NOT FND_API.Compatible_API_Call ( l_api_version_number ,

2908:
2909: p_return_status := FND_API.G_RET_STS_SUCCESS;
2910:
2911:
2912: IF NOT FND_API.Compatible_API_Call ( l_api_version_number ,
2913: p_api_version_number ,
2914: l_api_name,
2915: G_PKG_NAME)
2916:

Line 2918: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2914: l_api_name,
2915: G_PKG_NAME)
2916:
2917: THEN
2918: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2919: END IF;
2920:
2921: --Moved from below for project security changes. --Bug 2471668
2922:

Line 2931: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

2927: , p_return_status => l_return_status
2928: );
2929:
2930:
2931: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2932: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2933: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
2934: RAISE FND_API.G_EXC_ERROR;
2935: END IF;

Line 2932: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2928: );
2929:
2930:
2931: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2932: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2933: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
2934: RAISE FND_API.G_EXC_ERROR;
2935: END IF;
2936: p_project_id_out := l_project_id_out;

Line 2933: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

2929:
2930:
2931: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2932: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2933: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
2934: RAISE FND_API.G_EXC_ERROR;
2935: END IF;
2936: p_project_id_out := l_project_id_out;
2937:

Line 2934: RAISE FND_API.G_EXC_ERROR;

2930:
2931: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2932: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2933: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
2934: RAISE FND_API.G_EXC_ERROR;
2935: END IF;
2936: p_project_id_out := l_project_id_out;
2937:
2938: --Bug 2471668

Line 2965: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR

2961: p_return_status => l_return_status,
2962: p_function_allowed => l_function_allowed );
2963:
2964:
2965: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
2966: THEN
2967: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2968:
2969: ELSIF l_return_status = FND_API.G_RET_STS_ERROR

Line 2967: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2963:
2964:
2965: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
2966: THEN
2967: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2968:
2969: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
2970: THEN
2971: RAISE FND_API.G_EXC_ERROR;

Line 2969: ELSIF l_return_status = FND_API.G_RET_STS_ERROR

2965: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
2966: THEN
2967: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2968:
2969: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
2970: THEN
2971: RAISE FND_API.G_EXC_ERROR;
2972: END IF;
2973: IF l_function_allowed = 'N' THEN

Line 2971: RAISE FND_API.G_EXC_ERROR;

2967: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2968:
2969: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
2970: THEN
2971: RAISE FND_API.G_EXC_ERROR;
2972: END IF;
2973: IF l_function_allowed = 'N' THEN
2974: FND_MESSAGE.SET_NAME('PA','PA_FUNCTION_SECURITY_ENFORCED');
2975: FND_MSG_PUB.add;

Line 2976: p_return_status := FND_API.G_RET_STS_ERROR;

2972: END IF;
2973: IF l_function_allowed = 'N' THEN
2974: FND_MESSAGE.SET_NAME('PA','PA_FUNCTION_SECURITY_ENFORCED');
2975: FND_MSG_PUB.add;
2976: p_return_status := FND_API.G_RET_STS_ERROR;
2977: RAISE FND_API.G_EXC_ERROR;
2978: END IF;
2979: IF FND_API.to_boolean(p_init_msg_list)
2980: THEN

Line 2977: RAISE FND_API.G_EXC_ERROR;

2973: IF l_function_allowed = 'N' THEN
2974: FND_MESSAGE.SET_NAME('PA','PA_FUNCTION_SECURITY_ENFORCED');
2975: FND_MSG_PUB.add;
2976: p_return_status := FND_API.G_RET_STS_ERROR;
2977: RAISE FND_API.G_EXC_ERROR;
2978: END IF;
2979: IF FND_API.to_boolean(p_init_msg_list)
2980: THEN
2981: FND_MSG_PUB.initialize;

Line 2979: IF FND_API.to_boolean(p_init_msg_list)

2975: FND_MSG_PUB.add;
2976: p_return_status := FND_API.G_RET_STS_ERROR;
2977: RAISE FND_API.G_EXC_ERROR;
2978: END IF;
2979: IF FND_API.to_boolean(p_init_msg_list)
2980: THEN
2981: FND_MSG_PUB.initialize;
2982: END IF;
2983:

Line 2993: p_return_status := FND_API.G_RET_STS_ERROR;

2989: -- Hence, cannot update the project.Raise error
2990:
2991: FND_MESSAGE.SET_NAME('PA','PA_PROJECT_SECURITY_ENFORCED');
2992: FND_MSG_PUB.add;
2993: p_return_status := FND_API.G_RET_STS_ERROR;
2994: RAISE FND_API.G_EXC_ERROR;
2995: ELSE
2996: -- If the user has query privileges, then check whether
2997: -- update privileges are also available

Line 2994: RAISE FND_API.G_EXC_ERROR;

2990:
2991: FND_MESSAGE.SET_NAME('PA','PA_PROJECT_SECURITY_ENFORCED');
2992: FND_MSG_PUB.add;
2993: p_return_status := FND_API.G_RET_STS_ERROR;
2994: RAISE FND_API.G_EXC_ERROR;
2995: ELSE
2996: -- If the user has query privileges, then check whether
2997: -- update privileges are also available
2998: IF pa_security.allow_update (x_project_id => l_project_id_out ) = 'N'

Line 3006: p_return_status := FND_API.G_RET_STS_ERROR;

3002: -- Hence , raise error
3003:
3004: FND_MESSAGE.SET_NAME('PA','PA_PROJECT_SECURITY_ENFORCED');
3005: FND_MSG_PUB.add;
3006: p_return_status := FND_API.G_RET_STS_ERROR;
3007: RAISE FND_API.G_EXC_ERROR;
3008: END IF;
3009: END IF;
3010:

Line 3007: RAISE FND_API.G_EXC_ERROR;

3003:
3004: FND_MESSAGE.SET_NAME('PA','PA_PROJECT_SECURITY_ENFORCED');
3005: FND_MSG_PUB.add;
3006: p_return_status := FND_API.G_RET_STS_ERROR;
3007: RAISE FND_API.G_EXC_ERROR;
3008: END IF;
3009: END IF;
3010:
3011: IF (p_return_status <> FND_API.G_RET_STS_SUCCESS ) then

Line 3011: IF (p_return_status <> FND_API.G_RET_STS_SUCCESS ) then

3007: RAISE FND_API.G_EXC_ERROR;
3008: END IF;
3009: END IF;
3010:
3011: IF (p_return_status <> FND_API.G_RET_STS_SUCCESS ) then
3012: FND_MSG_PUB.Count_And_Get
3013: ( p_count => p_msg_count
3014: ,p_data => p_msg_data
3015: );

Line 3018: WHEN FND_API.G_EXC_ERROR THEN

3014: ,p_data => p_msg_data
3015: );
3016: END IF;
3017: EXCEPTION
3018: WHEN FND_API.G_EXC_ERROR THEN
3019: p_return_status := FND_API.G_RET_STS_ERROR;
3020: FND_MSG_PUB.Count_And_Get
3021: ( p_count => p_msg_count
3022: ,p_data => p_msg_data

Line 3019: p_return_status := FND_API.G_RET_STS_ERROR;

3015: );
3016: END IF;
3017: EXCEPTION
3018: WHEN FND_API.G_EXC_ERROR THEN
3019: p_return_status := FND_API.G_RET_STS_ERROR;
3020: FND_MSG_PUB.Count_And_Get
3021: ( p_count => p_msg_count
3022: ,p_data => p_msg_data
3023: );

Line 3024: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3020: FND_MSG_PUB.Count_And_Get
3021: ( p_count => p_msg_count
3022: ,p_data => p_msg_data
3023: );
3024: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3025: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3026: FND_MSG_PUB.Count_And_Get
3027: ( p_count => p_msg_count
3028: ,p_data => p_msg_data

Line 3025: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3021: ( p_count => p_msg_count
3022: ,p_data => p_msg_data
3023: );
3024: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3025: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3026: FND_MSG_PUB.Count_And_Get
3027: ( p_count => p_msg_count
3028: ,p_data => p_msg_data
3029: );

Line 3031: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3027: ( p_count => p_msg_count
3028: ,p_data => p_msg_data
3029: );
3030: WHEN OTHERS THEN
3031: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3032: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3033: FND_MSG_PUB.Add_Exc_Msg
3034: ( G_PKG_NAME
3035: , l_api_name

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

3045: /* Progress Management Changes. Bug # 3420093. */
3046:
3047: PROCEDURE update_task_progress_amg
3048: ( p_api_version IN NUMBER :=1.0
3049: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
3050: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
3051: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
3052: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
3053: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

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

3046:
3047: PROCEDURE update_task_progress_amg
3048: ( p_api_version IN NUMBER :=1.0
3049: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
3050: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
3051: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
3052: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
3053: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
3054: ,p_debug_mode IN VARCHAR2 :='N'

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

3047: PROCEDURE update_task_progress_amg
3048: ( p_api_version IN NUMBER :=1.0
3049: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
3050: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
3051: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
3052: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
3053: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
3054: ,p_debug_mode IN VARCHAR2 :='N'
3055: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

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

3048: ( p_api_version IN NUMBER :=1.0
3049: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
3050: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
3051: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
3052: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
3053: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
3054: ,p_debug_mode IN VARCHAR2 :='N'
3055: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
3056: ,p_progress_mode IN VARCHAR2 := 'FUTURE'

Line 3071: IF FND_API.to_boolean(p_init_msg_list)

3067: l_task_progress_rec PA_PROGRESS_PUB.PA_TASK_PROGRESS_LIST_REC_TYPE;
3068: l_return_status VARCHAR2(1);
3069: l_api_name VARCHAR2(30) := 'update_task_progress_amg';
3070: begin
3071: IF FND_API.to_boolean(p_init_msg_list)
3072: THEN
3073: FND_MSG_PUB.initialize;
3074: END IF;
3075:

Line 3076: x_return_status := FND_API.G_RET_STS_SUCCESS;

3072: THEN
3073: FND_MSG_PUB.initialize;
3074: END IF;
3075:
3076: x_return_status := FND_API.G_RET_STS_SUCCESS;
3077:
3078: -- Setting context for the temporary fin_plan table.
3079:
3080: PA_PROGRESS_PUB.populate_pji_tab_for_plan(

Line 3096: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

3092: ,x_msg_data => x_msg_data
3093: );
3094:
3095: -- 4537865 : Included check for x_return_status
3096: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3097: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3098: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
3099: RAISE FND_API.G_EXC_ERROR;
3100: END IF;

Line 3097: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

3093: );
3094:
3095: -- 4537865 : Included check for x_return_status
3096: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3097: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3098: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
3099: RAISE FND_API.G_EXC_ERROR;
3100: END IF;
3101:

Line 3098: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN

3094:
3095: -- 4537865 : Included check for x_return_status
3096: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3097: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3098: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
3099: RAISE FND_API.G_EXC_ERROR;
3100: END IF;
3101:
3102: -- Call Update progress for each task with P_rollup_entire_wbs_flag = 'N' and p_calling_module = 'AMG'.

Line 3099: RAISE FND_API.G_EXC_ERROR;

3095: -- 4537865 : Included check for x_return_status
3096: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3097: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3098: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
3099: RAISE FND_API.G_EXC_ERROR;
3100: END IF;
3101:
3102: -- Call Update progress for each task with P_rollup_entire_wbs_flag = 'N' and p_calling_module = 'AMG'.
3103:

Line 3163: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

3159: ,x_msg_count => x_msg_count
3160: ,x_msg_data => x_msg_data
3161: );
3162: -- 4537865 : Included check for x_return_status
3163: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3164: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3165: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
3166: RAISE FND_API.G_EXC_ERROR;
3167: END IF;

Line 3164: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

3160: ,x_msg_data => x_msg_data
3161: );
3162: -- 4537865 : Included check for x_return_status
3163: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3164: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3165: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
3166: RAISE FND_API.G_EXC_ERROR;
3167: END IF;
3168: end loop;

Line 3165: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN

3161: );
3162: -- 4537865 : Included check for x_return_status
3163: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3164: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3165: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
3166: RAISE FND_API.G_EXC_ERROR;
3167: END IF;
3168: end loop;
3169:

Line 3166: RAISE FND_API.G_EXC_ERROR;

3162: -- 4537865 : Included check for x_return_status
3163: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3164: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3165: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
3166: RAISE FND_API.G_EXC_ERROR;
3167: END IF;
3168: end loop;
3169:
3170: -- Call rollup_progress_pvt api for the entire structure.

Line 3183: if (x_return_status <> fnd_api.g_ret_sts_success ) then

3179: ,x_return_status => x_return_status
3180: ,x_msg_count => x_msg_count
3181: ,x_msg_data => x_msg_data);
3182:
3183: if (x_return_status <> fnd_api.g_ret_sts_success ) then
3184: fnd_msg_pub.count_and_get
3185: (p_count => x_msg_count
3186: ,p_data => x_msg_data);
3187: end if;

Line 3191: when fnd_api.g_exc_error then

3187: end if;
3188:
3189: exception
3190:
3191: when fnd_api.g_exc_error then
3192: x_return_status := fnd_api.g_ret_sts_error;
3193: fnd_msg_pub.count_and_get
3194: (p_count => x_msg_count
3195: ,p_data => x_msg_data);

Line 3192: x_return_status := fnd_api.g_ret_sts_error;

3188:
3189: exception
3190:
3191: when fnd_api.g_exc_error then
3192: x_return_status := fnd_api.g_ret_sts_error;
3193: fnd_msg_pub.count_and_get
3194: (p_count => x_msg_count
3195: ,p_data => x_msg_data);
3196: when fnd_api.g_exc_unexpected_error then

Line 3196: when fnd_api.g_exc_unexpected_error then

3192: x_return_status := fnd_api.g_ret_sts_error;
3193: fnd_msg_pub.count_and_get
3194: (p_count => x_msg_count
3195: ,p_data => x_msg_data);
3196: when fnd_api.g_exc_unexpected_error then
3197: x_return_status := fnd_api.g_ret_sts_unexp_error;
3198: fnd_msg_pub.count_and_get
3199: (p_count => x_msg_count
3200: ,p_data => x_msg_data);

Line 3197: x_return_status := fnd_api.g_ret_sts_unexp_error;

3193: fnd_msg_pub.count_and_get
3194: (p_count => x_msg_count
3195: ,p_data => x_msg_data);
3196: when fnd_api.g_exc_unexpected_error then
3197: x_return_status := fnd_api.g_ret_sts_unexp_error;
3198: fnd_msg_pub.count_and_get
3199: (p_count => x_msg_count
3200: ,p_data => x_msg_data);
3201: when others then

Line 3202: x_return_status := fnd_api.g_ret_sts_unexp_error;

3198: fnd_msg_pub.count_and_get
3199: (p_count => x_msg_count
3200: ,p_data => x_msg_data);
3201: when others then
3202: x_return_status := fnd_api.g_ret_sts_unexp_error;
3203: if fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error) then
3204: fnd_msg_pub.add_exc_msg(g_pkg_name,l_api_name);
3205: end if;
3206: fnd_msg_pub.count_and_get