eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.PA_PROJECT_PARTIES_PVT dependencies on FND_API

Line 6: PROCEDURE CREATE_PROJECT_PARTY( p_commit IN VARCHAR2 := FND_API.G_FALSE,

2: /* $Header: PARPPUTB.pls 120.12.12010000.6 2009/08/21 12:00:43 nkapling ship $ */
3:
4: P_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
5:
6: PROCEDURE CREATE_PROJECT_PARTY( p_commit IN VARCHAR2 := FND_API.G_FALSE,
7: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
8: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
9: p_debug_mode IN VARCHAR2 default 'N',
10: p_object_id IN NUMBER := FND_API.G_MISS_NUM,

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

3:
4: P_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
5:
6: PROCEDURE CREATE_PROJECT_PARTY( p_commit IN VARCHAR2 := FND_API.G_FALSE,
7: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
8: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
9: p_debug_mode IN VARCHAR2 default 'N',
10: p_object_id IN NUMBER := FND_API.G_MISS_NUM,
11: p_object_type IN VARCHAR2 := FND_API.G_MISS_CHAR,

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

4: P_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
5:
6: PROCEDURE CREATE_PROJECT_PARTY( p_commit IN VARCHAR2 := FND_API.G_FALSE,
7: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
8: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
9: p_debug_mode IN VARCHAR2 default 'N',
10: p_object_id IN NUMBER := FND_API.G_MISS_NUM,
11: p_object_type IN VARCHAR2 := FND_API.G_MISS_CHAR,
12: p_resource_type_id IN NUMBER := 101,

Line 10: p_object_id IN NUMBER := FND_API.G_MISS_NUM,

6: PROCEDURE CREATE_PROJECT_PARTY( p_commit IN VARCHAR2 := FND_API.G_FALSE,
7: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
8: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
9: p_debug_mode IN VARCHAR2 default 'N',
10: p_object_id IN NUMBER := FND_API.G_MISS_NUM,
11: p_object_type IN VARCHAR2 := FND_API.G_MISS_CHAR,
12: p_resource_type_id IN NUMBER := 101,
13: p_project_role_id IN NUMBER,
14: p_resource_source_id IN NUMBER,

Line 11: p_object_type IN VARCHAR2 := FND_API.G_MISS_CHAR,

7: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
8: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
9: p_debug_mode IN VARCHAR2 default 'N',
10: p_object_id IN NUMBER := FND_API.G_MISS_NUM,
11: p_object_type IN VARCHAR2 := FND_API.G_MISS_CHAR,
12: p_resource_type_id IN NUMBER := 101,
13: p_project_role_id IN NUMBER,
14: p_resource_source_id IN NUMBER,
15: p_start_date_active IN DATE,

Line 18: p_project_id IN NUMBER := FND_API.G_MISS_NUM,

14: p_resource_source_id IN NUMBER,
15: p_start_date_active IN DATE,
16: p_scheduled_flag IN VARCHAR2 := 'N',
17: p_calling_module IN VARCHAR2,
18: p_project_id IN NUMBER := FND_API.G_MISS_NUM,
19: p_project_end_date IN DATE,
20: p_mgr_validation_type IN VARCHAR2 := FND_API.G_MISS_CHAR,/*Added for bug 2111806*/
21: p_end_date_active IN OUT NOCOPY DATE, --File.Sql.39 bug 4440895
22: x_project_party_id OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895

Line 20: p_mgr_validation_type IN VARCHAR2 := FND_API.G_MISS_CHAR,/Added for bug 2111806/

16: p_scheduled_flag IN VARCHAR2 := 'N',
17: p_calling_module IN VARCHAR2,
18: p_project_id IN NUMBER := FND_API.G_MISS_NUM,
19: p_project_end_date IN DATE,
20: p_mgr_validation_type IN VARCHAR2 := FND_API.G_MISS_CHAR,/*Added for bug 2111806*/
21: p_end_date_active IN OUT NOCOPY DATE, --File.Sql.39 bug 4440895
22: x_project_party_id OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
23: x_resource_id OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
24: x_assignment_id OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895

Line 67: if p_commit = FND_API.G_TRUE then

63: l_past_resource VARCHAR2(10);
64:
65: BEGIN
66:
67: if p_commit = FND_API.G_TRUE then
68: savepoint project_parties;
69: end if;
70: x_return_status := FND_API.G_RET_STS_SUCCESS;
71:

Line 70: x_return_status := FND_API.G_RET_STS_SUCCESS;

66:
67: if p_commit = FND_API.G_TRUE then
68: savepoint project_parties;
69: end if;
70: x_return_status := FND_API.G_RET_STS_SUCCESS;
71:
72: if p_project_id = FND_API.G_MISS_NUM or p_project_id is null then
73: l_project_id := null;
74: else

Line 72: if p_project_id = FND_API.G_MISS_NUM or p_project_id is null then

68: savepoint project_parties;
69: end if;
70: x_return_status := FND_API.G_RET_STS_SUCCESS;
71:
72: if p_project_id = FND_API.G_MISS_NUM or p_project_id is null then
73: l_project_id := null;
74: else
75: l_project_id := p_project_id;
76: end if;

Line 111: If x_return_status = FND_API.G_RET_STS_SUCCESS and not(fnd_api.to_boolean(nvl(p_validate_only,FND_API.G_FALSE))) then

107:
108: --dbms_output.put_line('return :'||x_return_status);
109: --dbms_output.put_line('project_role_id :'||to_char(p_project_role_id));
110:
111: If x_return_status = FND_API.G_RET_STS_SUCCESS and not(fnd_api.to_boolean(nvl(p_validate_only,FND_API.G_FALSE))) then
112: --if pa_install.is_prm_licensed() = 'Y' then
113:
114: --MT: OrgRole changes
115: IF p_resource_type_id=101 THEN

Line 144: p_init_msg_list => fnd_api.g_false,

140: /* End of code added for bug 3234293 */
141:
142: pa_debug.G_err_stage := 'Calling create_resource';
143: pa_r_project_resources_pub.create_resource(p_api_version => 1.0,
144: p_init_msg_list => fnd_api.g_false,
145: p_commit => p_commit,
146: p_validate_only => p_validate_only,
147: p_person_id => p_resource_source_id,
148: p_internal => 'Y',

Line 159: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

155: x_msg_count => x_msg_count,
156: x_msg_data => x_msg_data,
157: x_resource_id => l_resource_id);
158: --Bug 5186830
159: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
160: RAISE FND_API.G_EXC_ERROR;
161: END IF;
162: /* Added for bug 3234293 - Added this else condition to get the resource id */
163: ELSE

Line 160: RAISE FND_API.G_EXC_ERROR;

156: x_msg_data => x_msg_data,
157: x_resource_id => l_resource_id);
158: --Bug 5186830
159: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
160: RAISE FND_API.G_EXC_ERROR;
161: END IF;
162: /* Added for bug 3234293 - Added this else condition to get the resource id */
163: ELSE
164:

Line 191: p_init_msg_list => fnd_api.g_false,

187: /* End of code added for bug 3234293 */
188:
189: pa_debug.G_err_stage := 'Calling create_resource';
190: pa_r_project_resources_pub.create_resource(p_api_version => 1.0,
191: p_init_msg_list => fnd_api.g_false,
192: p_commit => p_commit,
193: p_validate_only => p_validate_only,
194: p_party_id => p_resource_source_id,
195: p_internal => 'N',

Line 203: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

199: x_msg_count => x_msg_count,
200: x_msg_data => x_msg_data,
201: x_resource_id => l_resource_id);
202: --Bug 5186830
203: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
204: RAISE FND_API.G_EXC_ERROR;
205: END IF;
206: /* Added for bug 3234293 - Added this else condition to get the resource id */
207:

Line 204: RAISE FND_API.G_EXC_ERROR;

200: x_msg_data => x_msg_data,
201: x_resource_id => l_resource_id);
202: --Bug 5186830
203: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
204: RAISE FND_API.G_EXC_ERROR;
205: END IF;
206: /* Added for bug 3234293 - Added this else condition to get the resource id */
207:
208: ELSE

Line 222: if (x_return_status = FND_API.G_RET_STS_SUCCESS and p_scheduled_flag = 'Y') then

218:
219: END IF;
220: --MT: End OrgRole changes
221:
222: if (x_return_status = FND_API.G_RET_STS_SUCCESS and p_scheduled_flag = 'Y') then
223: l_past_resource := pa_resource_utils.is_past_resource(l_resource_id);
224: IF(NVL(l_past_resource,'XXX') = 'Y') THEN
225: pa_resource_utils.CHECK_RES_BELONGS_EXPORG(p_resource_id => l_resource_id,
226: p_start_date_active => p_start_date_active,

Line 239: x_return_status := FND_API.G_RET_STS_ERROR;

235: x_error_message_code => l_error_msg_code);
236: END IF;
237: if (l_valid <> 'Y') then
238: -- check that the person is allowed to have schedule
239: x_return_status := FND_API.G_RET_STS_ERROR;
240: fnd_message.set_name('PA','PA_NO_SCHEDULABLE_PERSON');
241: fnd_msg_pub.add();
242: end if;
243:

Line 247: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN

243:
244: -- if the res belongs to the expenditure org hierarchy, check if the res's
245: -- job is schedulable
246:
247: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
248: IF(NVL(l_past_resource,'XXX') = 'Y') THEN --Added for Bug 8811314
249: SELECT max(resource_effective_end_date)
250: INTO l_date
251: FROM pa_resources_denorm

Line 260: x_return_status := FND_API.G_RET_STS_ERROR;

256: l_job_schedulable := PA_HR_UPDATE_API.check_job_schedulable
257: ( p_person_id => p_resource_source_id
258: ,p_date => l_date );
259: IF l_job_schedulable <> 'Y' THEN
260: x_return_status := FND_API.G_RET_STS_ERROR;
261: fnd_message.set_name('PA','PA_NOT_SCHEDULABLE_JOB');
262: fnd_msg_pub.add();
263: END IF;
264: END IF;

Line 268: if x_call_overlap = 'N' and x_return_status = FND_API.G_RET_STS_SUCCESS then

264: END IF;
265: end if;
266:
267:
268: if x_call_overlap = 'N' and x_return_status = FND_API.G_RET_STS_SUCCESS then
269: -- call update api
270: if (p_debug_mode = 'Y') then
271: IF P_DEBUG_MODE = 'Y' THEN
272: pa_debug.debug('Create_project_party: Calling update_row.');

Line 311: elsif x_return_status = FND_API.G_RET_STS_SUCCESS then

307:
308: end if;
309: end if;
310:
311: elsif x_return_status = FND_API.G_RET_STS_SUCCESS then
312:
313: pa_security_pvt.grant_role(
314: p_project_role_id => p_project_role_id,
315: p_object_name => p_object_type,

Line 326: if x_return_status = FND_API.G_RET_STS_SUCCESS then

322: x_msg_count => x_msg_count,
323: x_msg_data => x_msg_data);
324: l_grant_id := null;
325:
326: if x_return_status = FND_API.G_RET_STS_SUCCESS then
327:
328: x_resource_id := l_resource_id;
329:
330: if (p_debug_mode = 'Y') then

Line 356: if x_return_status = FND_API.G_RET_STS_SUCCESS and x_assignment_action = 'CREATE' and p_calling_module = 'PROJECT_MEMBER' then

352: X_LAST_UPDATE_LOGIN => FND_GLOBAL.LOGIN_ID) ;
353: end if;
354: end if;
355:
356: if x_return_status = FND_API.G_RET_STS_SUCCESS and x_assignment_action = 'CREATE' and p_calling_module = 'PROJECT_MEMBER' then
357: -- call assignments api
358: -- l_assignment_rec.assignment_name := ;
359: l_assignment_rec.assignment_type := 'STAFFED_ASSIGNMENT';
360: l_assignment_rec.project_id := l_project_id;

Line 381: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

377:
378: end if;
379:
380: --Bug 5856712
381: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
382: RAISE FND_API.G_EXC_ERROR;
383: END IF;
384:
385:

Line 382: RAISE FND_API.G_EXC_ERROR;

378: end if;
379:
380: --Bug 5856712
381: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
382: RAISE FND_API.G_EXC_ERROR;
383: END IF;
384:
385:
386: /* Start of code for bug #2111806:

Line 413: x_return_status := FND_API.G_RET_STS_ERROR;

409: ,p_token2 => 'END_DATE'
410: ,p_value2 => l_end_no_mgr_date
411: );
412: END IF;
413: x_return_status := FND_API.G_RET_STS_ERROR;
414: RETURN;
415: END IF;
416:
417: /* Throw an error if there are no Project Managers assigned.

Line 426: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

422: ,x_return_status => x_return_status
423: ,x_msg_count => x_msg_count
424: ,x_msg_data => x_msg_data );
425:
426: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
427: x_return_status := FND_API.G_RET_STS_ERROR;
428: RETURN;
429: END IF;
430: END IF;

Line 427: x_return_status := FND_API.G_RET_STS_ERROR;

423: ,x_msg_count => x_msg_count
424: ,x_msg_data => x_msg_data );
425:
426: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
427: x_return_status := FND_API.G_RET_STS_ERROR;
428: RETURN;
429: END IF;
430: END IF;
431: END IF;

Line 434: if fnd_api.to_boolean(nvl(p_commit,FND_API.G_FALSE)) and x_return_status = FND_API.G_RET_STS_SUCCESS then

430: END IF;
431: END IF;
432: /* End of code for bug #2111806 */
433:
434: if fnd_api.to_boolean(nvl(p_commit,FND_API.G_FALSE)) and x_return_status = FND_API.G_RET_STS_SUCCESS then
435: if (p_debug_mode = 'Y') then
436: IF P_DEBUG_MODE = 'Y' THEN
437: pa_debug.debug('Create_project_party: Commiting data.');
438: END IF;

Line 450: WHEN FND_API.G_EXC_ERROR THEN

446: pa_debug.reset_err_stack;
447:
448: EXCEPTION
449: --Bug 5186830
450: WHEN FND_API.G_EXC_ERROR THEN
451:
452: l_msg_count := FND_MSG_PUB.count_msg;
453:
454: IF l_msg_count = 1 THEN

Line 456: (p_encoded => FND_API.G_TRUE

452: l_msg_count := FND_MSG_PUB.count_msg;
453:
454: IF l_msg_count = 1 THEN
455: PA_INTERFACE_UTILS_PUB.get_messages
456: (p_encoded => FND_API.G_TRUE
457: ,p_msg_index => 1
458: ,p_msg_count => l_msg_count
459: ,p_msg_data => l_msg_data
460: ,p_data => l_data

Line 467: x_return_status := FND_API.G_RET_STS_ERROR;

463: x_msg_count := l_msg_count;
464: ELSE
465: x_msg_count := l_msg_count;
466: END IF;
467: x_return_status := FND_API.G_RET_STS_ERROR;
468: pa_debug.reset_err_stack;
469:
470: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
471: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 470: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

466: END IF;
467: x_return_status := FND_API.G_RET_STS_ERROR;
468: pa_debug.reset_err_stack;
469:
470: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
471: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
472: fnd_message.set_name('PA','PA_UNEXPECTED_ERROR');
473: fnd_message.set_token('PKG_NAME','PA_PROJECT_PARTIES_PUB');
474: fnd_message.set_token('PROCEDURE_NAME','CREATE_PROJECT_PARTY');

Line 471: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

467: x_return_status := FND_API.G_RET_STS_ERROR;
468: pa_debug.reset_err_stack;
469:
470: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
471: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
472: fnd_message.set_name('PA','PA_UNEXPECTED_ERROR');
473: fnd_message.set_token('PKG_NAME','PA_PROJECT_PARTIES_PUB');
474: fnd_message.set_token('PROCEDURE_NAME','CREATE_PROJECT_PARTY');
475: fnd_msg_pub.add();

Line 481: if p_commit = FND_API.G_TRUE then

477: p_data => x_msg_data);
478: raise;
479:
480: WHEN OTHERS THEN
481: if p_commit = FND_API.G_TRUE then
482: rollback to project_parties;
483: end if;
484: x_return_status := fnd_api.g_ret_sts_unexp_error;
485: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_PARTIES_PUB',

Line 484: x_return_status := fnd_api.g_ret_sts_unexp_error;

480: WHEN OTHERS THEN
481: if p_commit = FND_API.G_TRUE then
482: rollback to project_parties;
483: end if;
484: x_return_status := fnd_api.g_ret_sts_unexp_error;
485: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_PARTIES_PUB',
486: p_procedure_name => pa_debug.G_err_stack,
487: p_error_text => SUBSTRB(SQLERRM,1,240));
488: raise;

Line 492: PROCEDURE UPDATE_PROJECT_PARTY( p_commit IN VARCHAR2 := FND_API.G_FALSE,

488: raise;
489:
490: END CREATE_PROJECT_PARTY;
491:
492: PROCEDURE UPDATE_PROJECT_PARTY( p_commit IN VARCHAR2 := FND_API.G_FALSE,
493: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
494: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
495: p_debug_mode IN VARCHAR2 default 'N',
496: p_object_id IN NUMBER := FND_API.G_MISS_NUM,

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

489:
490: END CREATE_PROJECT_PARTY;
491:
492: PROCEDURE UPDATE_PROJECT_PARTY( p_commit IN VARCHAR2 := FND_API.G_FALSE,
493: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
494: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
495: p_debug_mode IN VARCHAR2 default 'N',
496: p_object_id IN NUMBER := FND_API.G_MISS_NUM,
497: p_object_type IN VARCHAR2 := FND_API.G_MISS_CHAR,

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

490: END CREATE_PROJECT_PARTY;
491:
492: PROCEDURE UPDATE_PROJECT_PARTY( p_commit IN VARCHAR2 := FND_API.G_FALSE,
493: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
494: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
495: p_debug_mode IN VARCHAR2 default 'N',
496: p_object_id IN NUMBER := FND_API.G_MISS_NUM,
497: p_object_type IN VARCHAR2 := FND_API.G_MISS_CHAR,
498: p_project_role_id IN NUMBER,

Line 496: p_object_id IN NUMBER := FND_API.G_MISS_NUM,

492: PROCEDURE UPDATE_PROJECT_PARTY( p_commit IN VARCHAR2 := FND_API.G_FALSE,
493: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
494: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
495: p_debug_mode IN VARCHAR2 default 'N',
496: p_object_id IN NUMBER := FND_API.G_MISS_NUM,
497: p_object_type IN VARCHAR2 := FND_API.G_MISS_CHAR,
498: p_project_role_id IN NUMBER,
499: p_resource_type_id IN NUMBER := 101,
500: p_resource_source_id IN NUMBER,

Line 497: p_object_type IN VARCHAR2 := FND_API.G_MISS_CHAR,

493: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
494: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
495: p_debug_mode IN VARCHAR2 default 'N',
496: p_object_id IN NUMBER := FND_API.G_MISS_NUM,
497: p_object_type IN VARCHAR2 := FND_API.G_MISS_CHAR,
498: p_project_role_id IN NUMBER,
499: p_resource_type_id IN NUMBER := 101,
500: p_resource_source_id IN NUMBER,
501: p_resource_id IN NUMBER,

Line 504: p_record_version_number IN NUMBER := FND_API.G_MISS_NUM,

500: p_resource_source_id IN NUMBER,
501: p_resource_id IN NUMBER,
502: p_start_date_active IN DATE,
503: p_scheduled_flag IN VARCHAR2 := 'N',
504: p_record_version_number IN NUMBER := FND_API.G_MISS_NUM,
505: p_calling_module IN VARCHAR2 := FND_API.G_MISS_CHAR,
506: p_project_id IN NUMBER := FND_API.G_MISS_NUM,
507: p_project_end_date IN DATE,
508: p_project_party_id IN NUMBER,

Line 505: p_calling_module IN VARCHAR2 := FND_API.G_MISS_CHAR,

501: p_resource_id IN NUMBER,
502: p_start_date_active IN DATE,
503: p_scheduled_flag IN VARCHAR2 := 'N',
504: p_record_version_number IN NUMBER := FND_API.G_MISS_NUM,
505: p_calling_module IN VARCHAR2 := FND_API.G_MISS_CHAR,
506: p_project_id IN NUMBER := FND_API.G_MISS_NUM,
507: p_project_end_date IN DATE,
508: p_project_party_id IN NUMBER,
509: p_assignment_id IN NUMBER,

Line 506: p_project_id IN NUMBER := FND_API.G_MISS_NUM,

502: p_start_date_active IN DATE,
503: p_scheduled_flag IN VARCHAR2 := 'N',
504: p_record_version_number IN NUMBER := FND_API.G_MISS_NUM,
505: p_calling_module IN VARCHAR2 := FND_API.G_MISS_CHAR,
506: p_project_id IN NUMBER := FND_API.G_MISS_NUM,
507: p_project_end_date IN DATE,
508: p_project_party_id IN NUMBER,
509: p_assignment_id IN NUMBER,
510: p_assign_record_version_number IN NUMBER,

Line 511: p_mgr_validation_type IN VARCHAR2 := FND_API.G_MISS_CHAR,/Added for bug 2111806/

507: p_project_end_date IN DATE,
508: p_project_party_id IN NUMBER,
509: p_assignment_id IN NUMBER,
510: p_assign_record_version_number IN NUMBER,
511: p_mgr_validation_type IN VARCHAR2 := FND_API.G_MISS_CHAR,/*Added for bug 2111806*/
512: p_end_date_active IN OUT NOCOPY DATE, --File.Sql.39 bug 4440895
513: x_assignment_id OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
514: x_wf_type OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
515: x_wf_item_type OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895

Line 561: if p_commit = FND_API.G_TRUE then

557: ('ASGMT_APPRVL_REJECTED','ASGMT_APPRVL_CANCELED');
558: l_staff_assn_exists_rec l_staff_assn_exists_csr%ROWTYPE;
559:
560: BEGIN
561: if p_commit = FND_API.G_TRUE then
562: savepoint project_parties;
563: end if;
564: x_return_status := FND_API.G_RET_STS_SUCCESS;
565: --dbms_output.put_line('role id '||to_char(p_project_role_id));

Line 564: x_return_status := FND_API.G_RET_STS_SUCCESS;

560: BEGIN
561: if p_commit = FND_API.G_TRUE then
562: savepoint project_parties;
563: end if;
564: x_return_status := FND_API.G_RET_STS_SUCCESS;
565: --dbms_output.put_line('role id '||to_char(p_project_role_id));
566: --dbms_output.put_line('resource source id '||to_char(p_resource_source_id));
567: --dbms_output.put_line('project party id '||to_char(p_project_party_id));
568: l_record_version_number := p_record_version_number;

Line 600: If x_return_status = FND_API.G_RET_STS_SUCCESS and not(fnd_api.to_boolean(nvl(p_validate_only,FND_API.G_FALSE))) then

596: x_return_status);
597: end if;
598:
599:
600: If x_return_status = FND_API.G_RET_STS_SUCCESS and not(fnd_api.to_boolean(nvl(p_validate_only,FND_API.G_FALSE))) then
601:
602: if x_assignment_action = 'CREATE' then
603: -- call assignments api
604:

Line 622: x_return_status := FND_API.G_RET_STS_ERROR;

618: x_error_message_code => l_error_msg_code);
619: END IF;
620: IF (l_valid <> 'Y') then
621: -- check that the person is allowed to have schedule
622: x_return_status := FND_API.G_RET_STS_ERROR;
623: fnd_message.set_name('PA','PA_NO_SCHEDULABLE_PERSON');
624: fnd_msg_pub.add();
625: END IF;
626:

Line 631: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN

627: -- if the res belongs to the expenditure org hierarchy, check if the res's
628: -- job is schedulable
629:
630:
631: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
632: -- Added for bug 3149239
633: IF(NVL(l_past_resource,'XXX') = 'Y') THEN --Added for bug 8811314
634: SELECT max(resource_effective_end_date)
635: INTO l_date

Line 646: x_return_status := FND_API.G_RET_STS_ERROR;

642: ( p_person_id => p_resource_source_id
643: ,p_date => l_date );
644:
645: IF l_job_schedulable <> 'Y' THEN
646: x_return_status := FND_API.G_RET_STS_ERROR;
647: fnd_message.set_name('PA','PA_NOT_SCHEDULABLE_JOB');
648: fnd_msg_pub.add();
649: END IF;
650: END IF;

Line 652: if x_return_status = FND_API.G_RET_STS_SUCCESS then

648: fnd_msg_pub.add();
649: END IF;
650: END IF;
651: END IF;
652: if x_return_status = FND_API.G_RET_STS_SUCCESS then
653:
654: l_assignment_rec.assignment_type := 'STAFFED_ASSIGNMENT';
655: l_assignment_rec.project_id := p_project_id;
656: l_assignment_rec.project_role_id := p_project_role_id;

Line 687: ,p_validate_only => FND_API.G_FALSE

683: ( p_assignment_id => p_assignment_id
684: ,p_assignment_type => 'STAFFED_ASSIGNMENT'
685: ,p_record_version_number => p_assign_record_version_number
686: ,p_commit => p_commit
687: ,p_validate_only => FND_API.G_FALSE
688: ,x_return_status => x_return_status
689: ,x_msg_count => x_msg_count
690: ,x_msg_data => x_msg_data);
691:

Line 707: -- ,p_mass_update_flag => FND_API.G_FLASE

703: THEN
704:
705: PA_SCHEDULE_PUB.update_schedule (
706: p_project_id => p_project_id
707: -- ,p_mass_update_flag => FND_API.G_FLASE
708: ,p_exception_type_code => 'CHANGE_DURATION'
709: ,p_record_version_number => l_staff_assn_exists_rec.record_version_number
710: ,p_assignment_id => l_staff_assn_exists_rec.assignment_id
711: ,p_change_start_date => p_start_date_active

Line 717: ,p_validate_only => FND_API.G_FALSE--'F'

713: ,p_assignment_status_code => l_staff_assn_exists_rec.status_code
714: ,p_non_working_day_flag => 'N'
715: ,p_called_by_proj_party => 'Y'
716: ,p_commit => p_commit
717: ,p_validate_only => FND_API.G_FALSE--'F'
718: ,x_return_status => x_return_status
719: ,x_msg_count => x_msg_count
720: ,x_msg_data => x_msg_data );
721:

Line 722: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

718: ,x_return_status => x_return_status
719: ,x_msg_count => x_msg_count
720: ,x_msg_data => x_msg_data );
721:
722: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
723: Close l_staff_assn_exists_csr;
724: RAISE FND_API.G_EXC_ERROR;
725: END IF;
726:

Line 724: RAISE FND_API.G_EXC_ERROR;

720: ,x_msg_data => x_msg_data );
721:
722: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
723: Close l_staff_assn_exists_csr;
724: RAISE FND_API.G_EXC_ERROR;
725: END IF;
726:
727:
728: END IF;

Line 743: if x_return_status = FND_API.G_RET_STS_SUCCESS and l_grant_id > 0 then

739:
740: /* FP-L status-based security
741: l_grant_id := pa_project_parties_utils.get_grant_id(p_project_party_id => p_project_party_id);
742:
743: if x_return_status = FND_API.G_RET_STS_SUCCESS and l_grant_id > 0 then
744: -- call fnd_grants
745: IF p_resource_type_id = 112 THEN
746: l_source_type := 'HZ_PARTY';
747: END IF;

Line 768: if x_return_status = FND_API.G_RET_STS_SUCCESS then

764: end if;
765:
766: */
767:
768: if x_return_status = FND_API.G_RET_STS_SUCCESS then
769: l_grant_id := null;
770:
771: ----dbms_output.put_line('calling update api');
772: pa_debug.g_err_stage := 'Calling Update_row';

Line 789: x_return_status := FND_API.G_RET_STS_ERROR;

785: X_LAST_UPDATED_BY => FND_GLOBAL.USER_ID,
786: X_LAST_UPDATE_LOGIN => FND_GLOBAL.LOGIN_ID,
787: X_RETURN_STATUS => x_return_status);
788: if (x_return_status = 'N') then
789: x_return_status := FND_API.G_RET_STS_ERROR;
790: if p_calling_module = 'FORM' then
791: fnd_message.set_name('FND','FORM_RECORD_CHANGED');
792: --fnd_message.set_token('PKG_NAME','PA_PROJECT_PARTIES_PKG');
793: --fnd_message.set_token('PROCEDURE_NAME','UPDATE_ROW');

Line 809: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

805:
806: end if;
807:
808: --Bug 5856712
809: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
810: RAISE FND_API.G_EXC_ERROR;
811: END IF;
812:
813:

Line 810: RAISE FND_API.G_EXC_ERROR;

806: end if;
807:
808: --Bug 5856712
809: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
810: RAISE FND_API.G_EXC_ERROR;
811: END IF;
812:
813:
814: /* Start of code for bug #2111806:

Line 842: x_return_status := FND_API.G_RET_STS_ERROR;

838: ,p_token2 => 'END_DATE'
839: ,p_value2 => l_end_no_mgr_date
840: );
841: END IF;
842: x_return_status := FND_API.G_RET_STS_ERROR;
843: RETURN;
844: END IF;
845:
846: /* Throw an error if there are no Project Managers assigned.

Line 855: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

851: ,x_return_status => x_return_status
852: ,x_msg_count => x_msg_count
853: ,x_msg_data => x_msg_data );
854:
855: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
856: x_return_status := FND_API.G_RET_STS_ERROR;
857: RETURN;
858: END IF;
859: END IF;

Line 856: x_return_status := FND_API.G_RET_STS_ERROR;

852: ,x_msg_count => x_msg_count
853: ,x_msg_data => x_msg_data );
854:
855: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
856: x_return_status := FND_API.G_RET_STS_ERROR;
857: RETURN;
858: END IF;
859: END IF;
860: END IF;

Line 863: if fnd_api.to_boolean(nvl(p_commit,fnd_api.G_FALSE)) and x_return_status = FND_API.G_RET_STS_SUCCESS then

859: END IF;
860: END IF;
861: /* End of code for bug #2111806 */
862:
863: if fnd_api.to_boolean(nvl(p_commit,fnd_api.G_FALSE)) and x_return_status = FND_API.G_RET_STS_SUCCESS then
864: if (p_debug_mode = 'Y') then
865: IF P_DEBUG_MODE = 'Y' THEN
866: pa_debug.debug('Update_project_party: Commiting data.');
867: END IF;

Line 879: WHEN FND_API.G_EXC_ERROR THEN

875:
876: EXCEPTION
877:
878: -- bug 5856712
879: WHEN FND_API.G_EXC_ERROR THEN
880:
881: l_msg_count := FND_MSG_PUB.count_msg;
882:
883: IF l_msg_count = 1 THEN

Line 885: (p_encoded => FND_API.G_TRUE

881: l_msg_count := FND_MSG_PUB.count_msg;
882:
883: IF l_msg_count = 1 THEN
884: PA_INTERFACE_UTILS_PUB.get_messages
885: (p_encoded => FND_API.G_TRUE
886: ,p_msg_index => 1
887: ,p_msg_count => l_msg_count
888: ,p_msg_data => l_msg_data
889: ,p_data => l_data

Line 896: x_return_status := FND_API.G_RET_STS_ERROR;

892: x_msg_count := l_msg_count;
893: ELSE
894: x_msg_count := l_msg_count;
895: END IF;
896: x_return_status := FND_API.G_RET_STS_ERROR;
897: pa_debug.reset_err_stack;
898:
899: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
900: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 899: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

895: END IF;
896: x_return_status := FND_API.G_RET_STS_ERROR;
897: pa_debug.reset_err_stack;
898:
899: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
900: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
901: fnd_message.set_name('PA','PA_UNEXPECTED_ERROR');
902: fnd_message.set_token('PKG_NAME','PA_PROJECT_PARTIES_PUB');
903: fnd_message.set_token('PROCEDURE_NAME','UPDATE_PROJECT_PARTY');

Line 900: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

896: x_return_status := FND_API.G_RET_STS_ERROR;
897: pa_debug.reset_err_stack;
898:
899: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
900: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
901: fnd_message.set_name('PA','PA_UNEXPECTED_ERROR');
902: fnd_message.set_token('PKG_NAME','PA_PROJECT_PARTIES_PUB');
903: fnd_message.set_token('PROCEDURE_NAME','UPDATE_PROJECT_PARTY');
904: fnd_msg_pub.add();

Line 911: if p_commit = fnd_api.G_TRUE then

907: raise;
908:
909:
910: WHEN OTHERS THEN
911: if p_commit = fnd_api.G_TRUE then
912: rollback to project_parties;
913: end if;
914: x_return_status := fnd_api.g_ret_sts_unexp_error;
915: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_PARTIES_PUB',

Line 914: x_return_status := fnd_api.g_ret_sts_unexp_error;

910: WHEN OTHERS THEN
911: if p_commit = fnd_api.G_TRUE then
912: rollback to project_parties;
913: end if;
914: x_return_status := fnd_api.g_ret_sts_unexp_error;
915: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_PARTIES_PUB',
916: p_procedure_name => pa_debug.g_err_stack,
917: p_error_text => SUBSTRB(SQLERRM,1,240));
918: fnd_msg_pub.count_and_get(p_count => x_msg_count,

Line 926: PROCEDURE DELETE_PROJECT_PARTY( p_commit IN VARCHAR2 := FND_API.G_FALSE,

922:
923: end update_project_party;
924:
925:
926: PROCEDURE DELETE_PROJECT_PARTY( p_commit IN VARCHAR2 := FND_API.G_FALSE,
927: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
928: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
929: p_debug_mode IN VARCHAR2 default 'N',
930: p_record_version_number IN NUMBER := FND_API.G_MISS_NUM,

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

923: end update_project_party;
924:
925:
926: PROCEDURE DELETE_PROJECT_PARTY( p_commit IN VARCHAR2 := FND_API.G_FALSE,
927: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
928: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
929: p_debug_mode IN VARCHAR2 default 'N',
930: p_record_version_number IN NUMBER := FND_API.G_MISS_NUM,
931: p_calling_module IN VARCHAR2 := FND_API.G_MISS_CHAR,

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

924:
925:
926: PROCEDURE DELETE_PROJECT_PARTY( p_commit IN VARCHAR2 := FND_API.G_FALSE,
927: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
928: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
929: p_debug_mode IN VARCHAR2 default 'N',
930: p_record_version_number IN NUMBER := FND_API.G_MISS_NUM,
931: p_calling_module IN VARCHAR2 := FND_API.G_MISS_CHAR,
932: p_project_id IN NUMBER := FND_API.G_MISS_NUM,

Line 930: p_record_version_number IN NUMBER := FND_API.G_MISS_NUM,

926: PROCEDURE DELETE_PROJECT_PARTY( p_commit IN VARCHAR2 := FND_API.G_FALSE,
927: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
928: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
929: p_debug_mode IN VARCHAR2 default 'N',
930: p_record_version_number IN NUMBER := FND_API.G_MISS_NUM,
931: p_calling_module IN VARCHAR2 := FND_API.G_MISS_CHAR,
932: p_project_id IN NUMBER := FND_API.G_MISS_NUM,
933: p_project_party_id IN NUMBER := FND_API.G_MISS_NUM,
934: p_scheduled_flag IN VARCHAR2 := 'N',

Line 931: p_calling_module IN VARCHAR2 := FND_API.G_MISS_CHAR,

927: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
928: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
929: p_debug_mode IN VARCHAR2 default 'N',
930: p_record_version_number IN NUMBER := FND_API.G_MISS_NUM,
931: p_calling_module IN VARCHAR2 := FND_API.G_MISS_CHAR,
932: p_project_id IN NUMBER := FND_API.G_MISS_NUM,
933: p_project_party_id IN NUMBER := FND_API.G_MISS_NUM,
934: p_scheduled_flag IN VARCHAR2 := 'N',
935: /* code commented for the bug#1851096, starts here */

Line 932: p_project_id IN NUMBER := FND_API.G_MISS_NUM,

928: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
929: p_debug_mode IN VARCHAR2 default 'N',
930: p_record_version_number IN NUMBER := FND_API.G_MISS_NUM,
931: p_calling_module IN VARCHAR2 := FND_API.G_MISS_CHAR,
932: p_project_id IN NUMBER := FND_API.G_MISS_NUM,
933: p_project_party_id IN NUMBER := FND_API.G_MISS_NUM,
934: p_scheduled_flag IN VARCHAR2 := 'N',
935: /* code commented for the bug#1851096, starts here */
936: /* p_assignment_id IN NUMBER := FND_API.G_MISS_NUM,

Line 933: p_project_party_id IN NUMBER := FND_API.G_MISS_NUM,

929: p_debug_mode IN VARCHAR2 default 'N',
930: p_record_version_number IN NUMBER := FND_API.G_MISS_NUM,
931: p_calling_module IN VARCHAR2 := FND_API.G_MISS_CHAR,
932: p_project_id IN NUMBER := FND_API.G_MISS_NUM,
933: p_project_party_id IN NUMBER := FND_API.G_MISS_NUM,
934: p_scheduled_flag IN VARCHAR2 := 'N',
935: /* code commented for the bug#1851096, starts here */
936: /* p_assignment_id IN NUMBER := FND_API.G_MISS_NUM,
937: p_assign_record_version_number IN NUMBER := FND_API.G_MISS_NUM,

Line 936: /* p_assignment_id IN NUMBER := FND_API.G_MISS_NUM,

932: p_project_id IN NUMBER := FND_API.G_MISS_NUM,
933: p_project_party_id IN NUMBER := FND_API.G_MISS_NUM,
934: p_scheduled_flag IN VARCHAR2 := 'N',
935: /* code commented for the bug#1851096, starts here */
936: /* p_assignment_id IN NUMBER := FND_API.G_MISS_NUM,
937: p_assign_record_version_number IN NUMBER := FND_API.G_MISS_NUM,
938: */
939: /* code commented for the bug#1851096, end here */
940: /* code added for the bug#1851096, starts here */

Line 937: p_assign_record_version_number IN NUMBER := FND_API.G_MISS_NUM,

933: p_project_party_id IN NUMBER := FND_API.G_MISS_NUM,
934: p_scheduled_flag IN VARCHAR2 := 'N',
935: /* code commented for the bug#1851096, starts here */
936: /* p_assignment_id IN NUMBER := FND_API.G_MISS_NUM,
937: p_assign_record_version_number IN NUMBER := FND_API.G_MISS_NUM,
938: */
939: /* code commented for the bug#1851096, end here */
940: /* code added for the bug#1851096, starts here */
941: p_assignment_id IN NUMBER := 0,

Line 944: p_mgr_validation_type IN VARCHAR2 := FND_API.G_MISS_CHAR,/Added for bug 2111806/

940: /* code added for the bug#1851096, starts here */
941: p_assignment_id IN NUMBER := 0,
942: p_assign_record_version_number IN NUMBER := 0,
943: /* code added for the bug#1851096, end here */
944: p_mgr_validation_type IN VARCHAR2 := FND_API.G_MISS_CHAR,/*Added for bug 2111806*/
945: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
946: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
947: x_msg_data OUT NOCOPY VARCHAR2) IS --File.Sql.39 bug 4440895
948:

Line 1010: if p_commit = FND_API.G_TRUE then

1006: l_return_status VARCHAR2(1000);
1007: /* End of code for bug #2111806 */
1008:
1009: BEGIN
1010: if p_commit = FND_API.G_TRUE then
1011: savepoint project_parties;
1012: end if;
1013:
1014: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1014: x_return_status := FND_API.G_RET_STS_SUCCESS;

1010: if p_commit = FND_API.G_TRUE then
1011: savepoint project_parties;
1012: end if;
1013:
1014: x_return_status := FND_API.G_RET_STS_SUCCESS;
1015:
1016: if (p_debug_mode = 'Y') then
1017: IF P_DEBUG_MODE = 'Y' THEN
1018: pa_debug.debug('Delete_project_party : Lock Key Members ');

Line 1037: IF (( p_project_id IS NULL OR p_project_id = FND_API.G_MISS_NUM) AND

1033: So, fetching the p_project_id based on the p_project_party_id. */
1034:
1035: l_project_id := p_project_id; -- Added for bug 4483205
1036:
1037: IF (( p_project_id IS NULL OR p_project_id = FND_API.G_MISS_NUM) AND
1038: ( nvl(p_project_party_id,FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM )) THEN
1039:
1040: SELECT project_id
1041: INTO l_project_id

Line 1038: ( nvl(p_project_party_id,FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM )) THEN

1034:
1035: l_project_id := p_project_id; -- Added for bug 4483205
1036:
1037: IF (( p_project_id IS NULL OR p_project_id = FND_API.G_MISS_NUM) AND
1038: ( nvl(p_project_party_id,FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM )) THEN
1039:
1040: SELECT project_id
1041: INTO l_project_id
1042: FROM pa_project_parties

Line 1065: EXIT WHEN x_return_status <> FND_API.G_RET_STS_SUCCESS;

1061: p_project_party_id => rec.project_party_id,
1062: x_return_status => x_return_status,
1063: x_msg_count => x_msg_count,
1064: x_msg_data => x_msg_data);
1065: EXIT WHEN x_return_status <> FND_API.G_RET_STS_SUCCESS;
1066: END LOOP;
1067:
1068: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1069: RETURN;

Line 1068: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1064: x_msg_data => x_msg_data);
1065: EXIT WHEN x_return_status <> FND_API.G_RET_STS_SUCCESS;
1066: END LOOP;
1067:
1068: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1069: RETURN;
1070: END IF;
1071:
1072: FOR rec In c_billing_accounts LOOP

Line 1084: EXIT WHEN x_return_status <> FND_API.G_RET_STS_SUCCESS;

1080: p_record_version_number => rec.record_version_number,
1081: x_return_status => x_return_status,
1082: x_msg_count => x_msg_count,
1083: x_msg_data => x_msg_data);
1084: EXIT WHEN x_return_status <> FND_API.G_RET_STS_SUCCESS;
1085: END LOOP;
1086:
1087: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1088: RETURN;

Line 1087: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1083: x_msg_data => x_msg_data);
1084: EXIT WHEN x_return_status <> FND_API.G_RET_STS_SUCCESS;
1085: END LOOP;
1086:
1087: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1088: RETURN;
1089: END IF;
1090:
1091: l_grant_id := pa_project_parties_utils.get_grant_id(p_project_party_id => p_project_party_id);

Line 1099: ----- if x_return_status = FND_API.G_RET_STS_SUCCESS and pa_install.is_prm_licensed() = 'Y' and l_grant_id > 0 then

1095: x_record_version_number => p_record_version_number);
1096: end if;
1097:
1098: /* FP-L status-based security
1099: ----- if x_return_status = FND_API.G_RET_STS_SUCCESS and pa_install.is_prm_licensed() = 'Y' and l_grant_id > 0 then
1100: if x_return_status = FND_API.G_RET_STS_SUCCESS and l_grant_id > 0 then
1101: pa_security_pvt.revoke_grant(p_grant_guid => l_grant_id,
1102: x_return_status => x_return_status,
1103: x_msg_count => x_msg_count,

Line 1100: if x_return_status = FND_API.G_RET_STS_SUCCESS and l_grant_id > 0 then

1096: end if;
1097:
1098: /* FP-L status-based security
1099: ----- if x_return_status = FND_API.G_RET_STS_SUCCESS and pa_install.is_prm_licensed() = 'Y' and l_grant_id > 0 then
1100: if x_return_status = FND_API.G_RET_STS_SUCCESS and l_grant_id > 0 then
1101: pa_security_pvt.revoke_grant(p_grant_guid => l_grant_id,
1102: x_return_status => x_return_status,
1103: x_msg_count => x_msg_count,
1104: x_msg_data => x_msg_data

Line 1138: x_return_status := FND_API.G_RET_STS_ERROR;

1134: ,p_token2 => 'END_DATE'
1135: ,p_value2 => l_end_no_mgr_date
1136: );
1137: END IF;
1138: x_return_status := FND_API.G_RET_STS_ERROR;
1139: RETURN;
1140: END IF;
1141:
1142: /* Throw an error if there are no Project Managers assigned.

Line 1151: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1147: ,x_return_status => x_return_status
1148: ,x_msg_count => x_msg_count
1149: ,x_msg_data => x_msg_data );
1150:
1151: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1152: x_return_status := FND_API.G_RET_STS_ERROR;
1153: RETURN;
1154: END IF;
1155: END IF;

Line 1152: x_return_status := FND_API.G_RET_STS_ERROR;

1148: ,x_msg_count => x_msg_count
1149: ,x_msg_data => x_msg_data );
1150:
1151: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1152: x_return_status := FND_API.G_RET_STS_ERROR;
1153: RETURN;
1154: END IF;
1155: END IF;
1156:

Line 1160: if fnd_api.to_boolean(nvl(p_commit,fnd_api.G_FALSE)) and x_return_status = FND_API.G_RET_STS_SUCCESS then

1156:
1157: END IF;
1158: /* End of code for bug #2111806 */
1159:
1160: if fnd_api.to_boolean(nvl(p_commit,fnd_api.G_FALSE)) and x_return_status = FND_API.G_RET_STS_SUCCESS then
1161: if (p_debug_mode = 'Y') then
1162: IF P_DEBUG_MODE = 'Y' THEN
1163: pa_debug.debug('Delete_project_party: Commiting data.');
1164: END IF;

Line 1177: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1173: pa_debug.reset_err_stack;
1174:
1175: EXCEPTION
1176:
1177: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1178: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1179: fnd_message.set_name('PA','PA_UNEXPECTED_ERROR');
1180: fnd_message.set_token('PKG_NAME','PA_PROJECT_PARTIES_PVT');
1181: fnd_message.set_token('PROCEDURE_NAME','DELETE_PROJECT_PARTY');

Line 1178: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1174:
1175: EXCEPTION
1176:
1177: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1178: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1179: fnd_message.set_name('PA','PA_UNEXPECTED_ERROR');
1180: fnd_message.set_token('PKG_NAME','PA_PROJECT_PARTIES_PVT');
1181: fnd_message.set_token('PROCEDURE_NAME','DELETE_PROJECT_PARTY');
1182: fnd_msg_pub.add();

Line 1196: x_return_status := FND_API.G_RET_STS_ERROR;

1192: END IF;
1193: end if;
1194:
1195: --fnd_message.set_name('PA', 'PA_XC_NO_DATA_FOUND');
1196: x_return_status := FND_API.G_RET_STS_ERROR;
1197:
1198: WHEN TIMEOUT_ON_RESOURCE THEN
1199:
1200: if (p_debug_mode = 'Y') then

Line 1207: x_return_status := FND_API.G_RET_STS_ERROR;

1203: END IF;
1204: end if;
1205:
1206: fnd_message.set_name('PA', 'PA_XC_ROW_ALREADY_LOCKED');
1207: x_return_status := FND_API.G_RET_STS_ERROR;
1208: return;
1209:
1210: WHEN OTHERS then
1211: if p_commit = fnd_api.G_TRUE then

Line 1211: if p_commit = fnd_api.G_TRUE then

1207: x_return_status := FND_API.G_RET_STS_ERROR;
1208: return;
1209:
1210: WHEN OTHERS then
1211: if p_commit = fnd_api.G_TRUE then
1212: rollback to project_parties;
1213: end if;
1214:
1215: if (p_debug_mode = 'Y') then

Line 1224: x_return_status := FND_API.G_RET_STS_ERROR;

1220:
1221: if(SQLCODE = -54) then
1222: FND_MESSAGE.Set_Name('PA', 'PA_XC_ROW_ALREADY_LOCKED');
1223: x_msg_data := FND_MESSAGE.get;
1224: x_return_status := FND_API.G_RET_STS_ERROR;
1225: else
1226: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_PARTIES_PUB',
1227: p_procedure_name => pa_debug.g_err_stack,
1228: p_error_text => SUBSTRB(SQLERRM,1,240));

Line 1229: x_return_status := FND_API.G_RET_STS_ERROR;

1225: else
1226: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_PARTIES_PUB',
1227: p_procedure_name => pa_debug.g_err_stack,
1228: p_error_text => SUBSTRB(SQLERRM,1,240));
1229: x_return_status := FND_API.G_RET_STS_ERROR;
1230: end if;
1231:
1232: END DELETE_PROJECT_PARTY;
1233: