DBA Data[Home] [Help]

APPS.PA_ROLE_UTILS dependencies on FND_API

Line 35: IF p_role_id IS NOT NULL AND p_role_id <> FND_API.G_MISS_NUM THEN

31: l_id_found_flag VARCHAR(1) := 'N';
32:
33: BEGIN
34: pa_debug.init_err_stack ('pa_role_utils.Check_Role_Name_Or_Id');
35: IF p_role_id IS NOT NULL AND p_role_id <> FND_API.G_MISS_NUM THEN
36: IF p_check_id_flag = 'Y' THEN
37: SELECT project_role_id
38: INTO x_role_id
39: FROM pa_project_role_types_b /* Bug#2788815-Changed pa_project_role_types_vl to

Line 92: x_return_status := FND_API.G_RET_STS_SUCCESS;

88:
89: END IF;
90: END IF;
91:
92: x_return_status := FND_API.G_RET_STS_SUCCESS;
93: pa_debug.reset_err_stack;
94: EXCEPTION
95: WHEN NO_DATA_FOUND THEN
96: x_role_id := null;

Line 97: x_return_status := FND_API.G_RET_STS_ERROR;

93: pa_debug.reset_err_stack;
94: EXCEPTION
95: WHEN NO_DATA_FOUND THEN
96: x_role_id := null;
97: x_return_status := FND_API.G_RET_STS_ERROR;
98: x_error_message_code := 'PA_ROLE_INVALID_AMBIGOUS';
99:
100: WHEN TOO_MANY_ROWS THEN
101: x_role_id := null;

Line 102: x_return_status := FND_API.G_RET_STS_ERROR;

98: x_error_message_code := 'PA_ROLE_INVALID_AMBIGOUS';
99:
100: WHEN TOO_MANY_ROWS THEN
101: x_role_id := null;
102: x_return_status := FND_API.G_RET_STS_ERROR;
103: x_error_message_code := 'PA_ROLE_INVALID_AMBIGOUS';
104: WHEN OTHERS THEN
105: x_role_id := null;
106: fnd_msg_pub.add_exc_msg

Line 109: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;

105: x_role_id := null;
106: fnd_msg_pub.add_exc_msg
107: (p_pkg_name => 'PA_ROLE_UTILS',
108: p_procedure_name => pa_debug.g_err_stack );
109: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
110: RAISE;
111: END Check_Role_Name_Or_Id;
112:
113: procedure Check_Role_RoleList

Line 129: x_return_status := FND_API.G_RET_STS_SUCCESS;

125: l_sysdate DATE := TRUNC(sysdate);
126: BEGIN
127: pa_debug.init_err_stack ('pa_role_utils.Check_Role_RoleList');
128:
129: x_return_status := FND_API.G_RET_STS_SUCCESS;
130:
131: begin
132: IF p_role_id IS NOT NULL AND p_role_id <> FND_API.G_MISS_NUM THEN
133: IF p_check_id_flag = 'Y' THEN

Line 132: IF p_role_id IS NOT NULL AND p_role_id <> FND_API.G_MISS_NUM THEN

128:
129: x_return_status := FND_API.G_RET_STS_SUCCESS;
130:
131: begin
132: IF p_role_id IS NOT NULL AND p_role_id <> FND_API.G_MISS_NUM THEN
133: IF p_check_id_flag = 'Y' THEN
134: SELECT project_role_id
135: INTO x_role_id
136: FROM pa_project_role_types_b /* Bug#2788815-Changed pa_project_role_types_vl to

Line 158: x_return_status := FND_API.G_RET_STS_ERROR;

154:
155:
156: EXCEPTION
157: WHEN NO_DATA_FOUND THEN
158: x_return_status := FND_API.G_RET_STS_ERROR;
159: x_error_message_code := 'PA_ROLE_INVALID_AMBIGOUS';
160:
161: WHEN TOO_MANY_ROWS THEN
162: x_return_status := FND_API.G_RET_STS_ERROR;

Line 162: x_return_status := FND_API.G_RET_STS_ERROR;

158: x_return_status := FND_API.G_RET_STS_ERROR;
159: x_error_message_code := 'PA_ROLE_INVALID_AMBIGOUS';
160:
161: WHEN TOO_MANY_ROWS THEN
162: x_return_status := FND_API.G_RET_STS_ERROR;
163: x_error_message_code := 'PA_ROLE_INVALID_AMBIGOUS';
164:
165: WHEN OTHERS THEN
166: fnd_msg_pub.add_exc_msg

Line 169: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;

165: WHEN OTHERS THEN
166: fnd_msg_pub.add_exc_msg
167: (p_pkg_name => 'PA_ROLE_UTILS',
168: p_procedure_name => pa_debug.g_err_stack );
169: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
170: RAISE;
171: END;
172:
173: -- if it alread fails, then we return.

Line 174: IF x_return_status <> FND_API.g_ret_sts_success THEN

170: RAISE;
171: END;
172:
173: -- if it alread fails, then we return.
174: IF x_return_status <> FND_API.g_ret_sts_success THEN
175: RETURN;
176: END IF;
177:
178:

Line 187: IF p_role_list_id IS NOT NULL AND p_role_list_id <> FND_API.G_MISS_NUM THEN

183: END IF;
184:
185:
186: BEGIN
187: IF p_role_list_id IS NOT NULL AND p_role_list_id <> FND_API.G_MISS_NUM THEN
188: IF p_check_id_flag <> 'N' THEN
189: SELECT role_list_id
190: INTO x_role_list_id
191: FROM pa_role_lists

Line 210: x_return_status := FND_API.G_RET_STS_ERROR;

206:
207:
208: EXCEPTION
209: WHEN NO_DATA_FOUND THEN
210: x_return_status := FND_API.G_RET_STS_ERROR;
211: x_error_message_code := 'PA_ROLE_LIST_INVALID_AMBIGOUS';
212:
213: WHEN TOO_MANY_ROWS THEN
214: x_return_status := FND_API.G_RET_STS_ERROR;

Line 214: x_return_status := FND_API.G_RET_STS_ERROR;

210: x_return_status := FND_API.G_RET_STS_ERROR;
211: x_error_message_code := 'PA_ROLE_LIST_INVALID_AMBIGOUS';
212:
213: WHEN TOO_MANY_ROWS THEN
214: x_return_status := FND_API.G_RET_STS_ERROR;
215: x_error_message_code := 'PA_ROLE_LIST_INVALID_AMBIGOUS';
216:
217: WHEN OTHERS THEN
218: fnd_msg_pub.add_exc_msg

Line 221: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;

217: WHEN OTHERS THEN
218: fnd_msg_pub.add_exc_msg
219: (p_pkg_name => 'PA_ROLE_LIST_UTILS',
220: p_procedure_name => pa_debug.g_err_stack );
221: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
222: RAISE;
223:
224: END;
225:

Line 228: IF x_return_status <> FND_API.g_ret_sts_success THEN

224: END;
225:
226:
227: -- if it alread fails, then we return.
228: IF x_return_status <> FND_API.g_ret_sts_success THEN
229: RETURN;
230: END IF;
231:
232: -- we need to validate that the role actually belongs to the role_type

Line 242: x_return_status := FND_API.G_RET_STS_SUCCESS;

238: WHERE role_list_id = x_role_list_id
239: AND project_role_id = x_role_id
240: );
241:
242: x_return_status := FND_API.G_RET_STS_SUCCESS;
243: x_error_message_code := NULL;
244: pa_debug.reset_err_stack;
245:
246: EXCEPTION

Line 248: x_return_status := FND_API.G_RET_STS_ERROR;

244: pa_debug.reset_err_stack;
245:
246: EXCEPTION
247: WHEN NO_DATA_FOUND THEN
248: x_return_status := FND_API.G_RET_STS_ERROR;
249: x_error_message_code := 'PA_ROLE_NOT_IN_ROLELIST';
250: WHEN OTHERS THEN
251: fnd_msg_pub.add_exc_msg
252: (p_pkg_name => 'PA_ROLE_UTILS',

Line 254: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;

250: WHEN OTHERS THEN
251: fnd_msg_pub.add_exc_msg
252: (p_pkg_name => 'PA_ROLE_UTILS',
253: p_procedure_name => pa_debug.g_err_stack );
254: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
255: RAISE;
256:
257: END Check_Role_RoleList;
258:

Line 300: x_return_status := FND_API.G_RET_STS_ERROR;

296: x_default_max_job_level,
297: x_menu_id,
298: x_default_job_id ;
299: IF l_role_csr%NOTFOUND THEN
300: x_return_status := FND_API.G_RET_STS_ERROR;
301: x_error_message_code := 'PA_ROLE_INVALID_AMBIGOUS';
302: CLOSE l_role_csr;
303: pa_debug.reset_err_stack;
304: RETURN;

Line 320: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

316: ,x_return_status => l_return_status );
317: -- It is possible the the role does not have competencies
318: -- It is ok to have no competencies;hence we will not raise errors
319: -- if l_num = 0;
320: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
321: x_error_message_code := l_error_message_code;
322: x_return_status := l_return_status;
323: pa_debug.reset_err_stack;
324: RETURN ;

Line 327: x_return_status:= FND_API.G_RET_STS_SUCCESS;

323: pa_debug.reset_err_stack;
324: RETURN ;
325: END IF ;
326: x_def_competencies := l_competency_tbl;
327: x_return_status:= FND_API.G_RET_STS_SUCCESS;
328: pa_debug.reset_err_stack;
329: EXCEPTION
330: WHEN OTHERS THEN
331: fnd_msg_pub.add_exc_msg

Line 334: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;

330: WHEN OTHERS THEN
331: fnd_msg_pub.add_exc_msg
332: (p_pkg_name => 'PA_ROLE_UTILS',
333: p_procedure_name => pa_debug.g_err_stack );
334: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
335: RAISE;
336: END Get_Role_Defaults;
337:
338:

Line 360: x_return_status := FND_API.G_RET_STS_ERROR;

356: pa_debug.init_err_stack ('pa_role_utils.validate_role_competency');
357: OPEN l_get_bg_csr;
358: FETCH l_get_bg_csr INTO l_business_group_id;
359: IF l_get_bg_csr%NOTFOUND THEN
360: x_return_status := FND_API.G_RET_STS_ERROR;
361: x_error_message_code := 'PA_COMPETENCY_INVALID_AMBIGOUS';
362: ELSIF (l_business_group_id IS NOT NULL AND
363: pa_cross_business_grp.IsCrossBGProfile = 'Y' ) THEN
364: x_return_status := FND_API.G_RET_STS_ERROR;

Line 364: x_return_status := FND_API.G_RET_STS_ERROR;

360: x_return_status := FND_API.G_RET_STS_ERROR;
361: x_error_message_code := 'PA_COMPETENCY_INVALID_AMBIGOUS';
362: ELSIF (l_business_group_id IS NOT NULL AND
363: pa_cross_business_grp.IsCrossBGProfile = 'Y' ) THEN
364: x_return_status := FND_API.G_RET_STS_ERROR;
365: x_error_message_code := 'PA_ROLE_COMPETENCY_NOT_GLOBAL';
366: ELSIF l_business_group_id is not null THEN
367: IF l_business_group_id <> pa_utils.business_group_id THEN
368: x_return_status := FND_API.G_RET_STS_ERROR;

Line 368: x_return_status := FND_API.G_RET_STS_ERROR;

364: x_return_status := FND_API.G_RET_STS_ERROR;
365: x_error_message_code := 'PA_ROLE_COMPETENCY_NOT_GLOBAL';
366: ELSIF l_business_group_id is not null THEN
367: IF l_business_group_id <> pa_utils.business_group_id THEN
368: x_return_status := FND_API.G_RET_STS_ERROR;
369: x_error_message_code := 'PA_ROLE_COMPETENCY_BG_INVALID';
370: END IF;
371: ELSE
372: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 372: x_return_status := FND_API.G_RET_STS_SUCCESS;

368: x_return_status := FND_API.G_RET_STS_ERROR;
369: x_error_message_code := 'PA_ROLE_COMPETENCY_BG_INVALID';
370: END IF;
371: ELSE
372: x_return_status := FND_API.G_RET_STS_SUCCESS;
373: END IF;
374: CLOSE l_get_bg_csr;
375: pa_debug.reset_err_stack;
376: EXCEPTION

Line 381: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;

377: WHEN OTHERS THEN
378: fnd_msg_pub.add_exc_msg
379: (p_pkg_name => 'PA_ROLE_UTILS',
380: p_procedure_name => pa_debug.g_err_stack );
381: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
382: RAISE;
383: END Validate_Role_Competency ;
384:
385:

Line 414: x_return_status:=FND_API.G_RET_STS_SUCCESS;

410: open c_allow_schedule;
411: fetch c_allow_schedule into v_dummy;
412: if c_allow_schedule%FOUND then
413: x_schedulable_flag:='Y';
414: x_return_status:=FND_API.G_RET_STS_SUCCESS;
415: else
416: x_schedulable_flag:='N';
417: x_return_status:= FND_API.G_RET_STS_SUCCESS;
418: end if;

Line 417: x_return_status:= FND_API.G_RET_STS_SUCCESS;

413: x_schedulable_flag:='Y';
414: x_return_status:=FND_API.G_RET_STS_SUCCESS;
415: else
416: x_schedulable_flag:='N';
417: x_return_status:= FND_API.G_RET_STS_SUCCESS;
418: end if;
419: close c_allow_schedule;
420: exception
421: when others then

Line 423: x_return_status:=FND_API.G_RET_STS_UNEXP_ERROR;

419: close c_allow_schedule;
420: exception
421: when others then
422: close c_allow_schedule;
423: x_return_status:=FND_API.G_RET_STS_UNEXP_ERROR;
424: x_error_message_code:=SQLCODE;
425: end;
426:
427: ---FUNCTION Get_Schedulable_flag

Line 490: x_return_status:=FND_API.G_RET_STS_ERROR;

486: Begin
487: open c_seed_roles;
488: fetch c_seed_roles into v_dummy1;
489: if c_seed_roles%FOUND then
490: x_return_status:=FND_API.G_RET_STS_ERROR;
491: x_error_message_code:='PA_COMMON_SEEDED_ROLES';
492: else
493: if is_role_in_use(p_role_id)='N' then
494: x_return_status:=FND_API.G_RET_STS_SUCCESS;

Line 494: x_return_status:=FND_API.G_RET_STS_SUCCESS;

490: x_return_status:=FND_API.G_RET_STS_ERROR;
491: x_error_message_code:='PA_COMMON_SEEDED_ROLES';
492: else
493: if is_role_in_use(p_role_id)='N' then
494: x_return_status:=FND_API.G_RET_STS_SUCCESS;
495: else
496: x_return_status:=FND_API.G_RET_STS_ERROR;
497: x_error_message_code:='PA_COMMON_ROLE_IN_USE';
498: end if;

Line 496: x_return_status:=FND_API.G_RET_STS_ERROR;

492: else
493: if is_role_in_use(p_role_id)='N' then
494: x_return_status:=FND_API.G_RET_STS_SUCCESS;
495: else
496: x_return_status:=FND_API.G_RET_STS_ERROR;
497: x_error_message_code:='PA_COMMON_ROLE_IN_USE';
498: end if;
499: end if;
500: close c_seed_roles;

Line 504: x_return_status:=FND_API.G_RET_STS_UNEXP_ERROR;

500: close c_seed_roles;
501: exception
502: when others then
503: close c_seed_roles;
504: x_return_status:=FND_API.G_RET_STS_UNEXP_ERROR;
505: x_error_message_code:=SQLCODE;
506: End;
507:
508:

Line 561: x_return_status:=FND_API.G_RET_STS_ERROR;

557: OPEN c_role_control;
558: FETCH c_role_control INTO v_cr_by;
559: IF c_role_control%FOUND THEN
560: IF v_cr_by =1 THEN
561: x_return_status:=FND_API.G_RET_STS_ERROR;
562: x_error_message_code:='PA_COMMON_SEEDED_ROLES';
563: ELSE
564: x_return_status:=FND_API.G_RET_STS_SUCCESS;
565: END IF;

Line 564: x_return_status:=FND_API.G_RET_STS_SUCCESS;

560: IF v_cr_by =1 THEN
561: x_return_status:=FND_API.G_RET_STS_ERROR;
562: x_error_message_code:='PA_COMMON_SEEDED_ROLES';
563: ELSE
564: x_return_status:=FND_API.G_RET_STS_SUCCESS;
565: END IF;
566: -- x_return_status:=FND_API.G_RET_STS_SUCCESS;
567: -- x_return_status:=FND_API.G_RET_STS_ERROR;
568: -- x_error_message_code:='PA_COMMON_SEEDED_ROLES';

Line 566: -- x_return_status:=FND_API.G_RET_STS_SUCCESS;

562: x_error_message_code:='PA_COMMON_SEEDED_ROLES';
563: ELSE
564: x_return_status:=FND_API.G_RET_STS_SUCCESS;
565: END IF;
566: -- x_return_status:=FND_API.G_RET_STS_SUCCESS;
567: -- x_return_status:=FND_API.G_RET_STS_ERROR;
568: -- x_error_message_code:='PA_COMMON_SEEDED_ROLES';
569: END IF;
570: CLOSE c_role_control;

Line 567: -- x_return_status:=FND_API.G_RET_STS_ERROR;

563: ELSE
564: x_return_status:=FND_API.G_RET_STS_SUCCESS;
565: END IF;
566: -- x_return_status:=FND_API.G_RET_STS_SUCCESS;
567: -- x_return_status:=FND_API.G_RET_STS_ERROR;
568: -- x_error_message_code:='PA_COMMON_SEEDED_ROLES';
569: END IF;
570: CLOSE c_role_control;
571: /* Fix for bug 1829383*/

Line 574: x_return_status:=FND_API.G_RET_STS_SUCCESS;

570: CLOSE c_role_control;
571: /* Fix for bug 1829383*/
572: else
573: /* Commented the following line for bug 2375913
574: x_return_status:=FND_API.G_RET_STS_SUCCESS;
575: */
576: /* Uncommented the following block of code for bug 2375913 */
577: /* Added the below if condition for ALLOW_QUERY_LABOR_COST for Bug 2951857 */
578: If p_role_control_code <> 'ALLOW_QUERY_LABOR_COST' then

Line 580: x_return_status:=FND_API.G_RET_STS_SUCCESS;

576: /* Uncommented the following block of code for bug 2375913 */
577: /* Added the below if condition for ALLOW_QUERY_LABOR_COST for Bug 2951857 */
578: If p_role_control_code <> 'ALLOW_QUERY_LABOR_COST' then
579: if is_role_in_use(p_role_id)='N' then
580: x_return_status:=FND_API.G_RET_STS_SUCCESS;
581: else
582: x_return_status:=FND_API.G_RET_STS_ERROR;
583: x_error_message_code:='PA_COMMON_ROLE_IN_USE';
584: end if;

Line 582: x_return_status:=FND_API.G_RET_STS_ERROR;

578: If p_role_control_code <> 'ALLOW_QUERY_LABOR_COST' then
579: if is_role_in_use(p_role_id)='N' then
580: x_return_status:=FND_API.G_RET_STS_SUCCESS;
581: else
582: x_return_status:=FND_API.G_RET_STS_ERROR;
583: x_error_message_code:='PA_COMMON_ROLE_IN_USE';
584: end if;
585: else
586: x_return_status:=FND_API.G_RET_STS_SUCCESS;

Line 586: x_return_status:=FND_API.G_RET_STS_SUCCESS;

582: x_return_status:=FND_API.G_RET_STS_ERROR;
583: x_error_message_code:='PA_COMMON_ROLE_IN_USE';
584: end if;
585: else
586: x_return_status:=FND_API.G_RET_STS_SUCCESS;
587: end if;
588: /* end of code uncommented for bug 2375913 */
589: end if;
590: CLOSE c_seed_roles;

Line 593: x_return_status:=FND_API.G_RET_STS_UNEXP_ERROR;

589: end if;
590: CLOSE c_seed_roles;
591: exception
592: when others then
593: x_return_status:=FND_API.G_RET_STS_UNEXP_ERROR;
594: x_error_message_code:=SQLCODE;
595: End;
596:
597:

Line 626: x_return_status:=FND_API.G_RET_STS_SUCCESS;

622: begin
623: open c_role_list_in_use;
624: fetch c_role_list_in_use into v_dummy;
625: if c_role_list_in_use%NOTFOUND then
626: x_return_status:=FND_API.G_RET_STS_SUCCESS;
627: else
628: x_return_status:=FND_API.G_RET_STS_ERROR;
629: x_error_message_code:='PA_COMMON_ROLE_LIST_IN_USE';
630: end if;

Line 628: x_return_status:=FND_API.G_RET_STS_ERROR;

624: fetch c_role_list_in_use into v_dummy;
625: if c_role_list_in_use%NOTFOUND then
626: x_return_status:=FND_API.G_RET_STS_SUCCESS;
627: else
628: x_return_status:=FND_API.G_RET_STS_ERROR;
629: x_error_message_code:='PA_COMMON_ROLE_LIST_IN_USE';
630: end if;
631: close c_role_list_in_use;
632: exception

Line 635: x_return_status:=FND_API.G_RET_STS_UNEXP_ERROR;

631: close c_role_list_in_use;
632: exception
633: when others then
634: close c_role_list_in_use;
635: x_return_status:=FND_API.G_RET_STS_UNEXP_ERROR;
636: x_error_message_code:=SQLCODE;
637: End;
638:
639:

Line 662: x_return_status:=FND_API.G_RET_STS_SUCCESS;

658: where project_role_id=p_role_id;
659:
660: if v_menu_id is not null then
661: if is_role_in_use(p_role_id)='N' then
662: x_return_status:=FND_API.G_RET_STS_SUCCESS;
663: else
664: x_return_status:=FND_API.G_RET_STS_ERROR;
665: x_error_message_code:='PA_COMMON_ROLE_IN_USE';
666: end if;

Line 664: x_return_status:=FND_API.G_RET_STS_ERROR;

660: if v_menu_id is not null then
661: if is_role_in_use(p_role_id)='N' then
662: x_return_status:=FND_API.G_RET_STS_SUCCESS;
663: else
664: x_return_status:=FND_API.G_RET_STS_ERROR;
665: x_error_message_code:='PA_COMMON_ROLE_IN_USE';
666: end if;
667: else
668: x_return_status:=FND_API.G_RET_STS_ERROR;

Line 668: x_return_status:=FND_API.G_RET_STS_ERROR;

664: x_return_status:=FND_API.G_RET_STS_ERROR;
665: x_error_message_code:='PA_COMMON_ROLE_IN_USE';
666: end if;
667: else
668: x_return_status:=FND_API.G_RET_STS_ERROR;
669: end if;
670:
671: exception
672: when no_data_found then

Line 675: x_return_status:=FND_API.G_RET_STS_UNEXP_ERROR;

671: exception
672: when no_data_found then
673: null;
674: when others then
675: x_return_status:=FND_API.G_RET_STS_UNEXP_ERROR;
676: x_error_message_code:=SQLCODE;
677: end; */
678:
679:

Line 701: p_commit => FND_API.G_FALSE,

697:
698: IF l_count > 0 THEN
699:
700: pa_security_pvt.update_menu(
701: p_commit => FND_API.G_FALSE,
702: -- p_debug_mode => 'N',
703: p_project_role_id => p_role_id,
704: p_menu_id => p_menu_id,
705: x_return_status => v_return_status,

Line 710: if v_return_status=fnd_api.g_ret_sts_success then

706: x_msg_count => v_msg_count,
707: x_msg_data => v_msg_data
708: );
709:
710: if v_return_status=fnd_api.g_ret_sts_success then
711: x_return_status:=fnd_api.g_ret_sts_success;
712: return;
713: else
714: x_return_status:=fnd_api.g_ret_sts_error;

Line 711: x_return_status:=fnd_api.g_ret_sts_success;

707: x_msg_data => v_msg_data
708: );
709:
710: if v_return_status=fnd_api.g_ret_sts_success then
711: x_return_status:=fnd_api.g_ret_sts_success;
712: return;
713: else
714: x_return_status:=fnd_api.g_ret_sts_error;
715: return;

Line 714: x_return_status:=fnd_api.g_ret_sts_error;

710: if v_return_status=fnd_api.g_ret_sts_success then
711: x_return_status:=fnd_api.g_ret_sts_success;
712: return;
713: else
714: x_return_status:=fnd_api.g_ret_sts_error;
715: return;
716: end if;
717:
718: END IF;

Line 720: x_return_status:=fnd_api.g_ret_sts_success;

716: end if;
717:
718: END IF;
719:
720: x_return_status:=fnd_api.g_ret_sts_success;
721:
722: exception
723: when others then
724: x_return_status:=fnd_api.g_ret_sts_unexp_error;

Line 724: x_return_status:=fnd_api.g_ret_sts_unexp_error;

720: x_return_status:=fnd_api.g_ret_sts_success;
721:
722: exception
723: when others then
724: x_return_status:=fnd_api.g_ret_sts_unexp_error;
725: x_error_message_code:=SQLCODE;
726: end ;
727:
728: ----PROCEDURE Disable_role_based_sec

Line 749: p_commit => FND_API.G_FALSE,

745:
746: IF l_count > 0 THEN
747:
748: pa_security_pvt.revoke_role_based_sec(
749: p_commit => FND_API.G_FALSE,
750: -- p_debug_mode =>'N',
751: p_project_role_id => p_role_id,
752: x_return_status => v_return_status,
753: x_msg_count => v_msg_count,

Line 757: if v_return_status = fnd_api.g_ret_sts_success then

753: x_msg_count => v_msg_count,
754: x_msg_data => v_msg_data
755: );
756:
757: if v_return_status = fnd_api.g_ret_sts_success then
758: x_return_status := fnd_api.g_ret_sts_success;
759: return;
760: else
761: x_return_status := fnd_api.g_ret_sts_error;

Line 758: x_return_status := fnd_api.g_ret_sts_success;

754: x_msg_data => v_msg_data
755: );
756:
757: if v_return_status = fnd_api.g_ret_sts_success then
758: x_return_status := fnd_api.g_ret_sts_success;
759: return;
760: else
761: x_return_status := fnd_api.g_ret_sts_error;
762: return;

Line 761: x_return_status := fnd_api.g_ret_sts_error;

757: if v_return_status = fnd_api.g_ret_sts_success then
758: x_return_status := fnd_api.g_ret_sts_success;
759: return;
760: else
761: x_return_status := fnd_api.g_ret_sts_error;
762: return;
763: end if;
764: END IF;
765:

Line 766: x_return_status:=fnd_api.g_ret_sts_success;

762: return;
763: end if;
764: END IF;
765:
766: x_return_status:=fnd_api.g_ret_sts_success;
767:
768: exception
769: when others then
770: x_return_status:=fnd_api.g_ret_sts_unexp_error;

Line 770: x_return_status:=fnd_api.g_ret_sts_unexp_error;

766: x_return_status:=fnd_api.g_ret_sts_success;
767:
768: exception
769: when others then
770: x_return_status:=fnd_api.g_ret_sts_unexp_error;
771: x_error_message_code:=SQLCODE;
772: end ;
773:
774: ----PROCEDURE Enable_role_based_sec

Line 797: p_commit => FND_API.G_FALSE,

793:
794: -- hr_utility.trace('before call to grant_role_based_sec');
795: IF l_count > 0 THEN
796: pa_security_pvt.grant_role_based_sec(
797: p_commit => FND_API.G_FALSE,
798: -- p_debug_mode => 'N',
799: p_project_role_id => p_role_id,
800: x_return_status => v_return_status,
801: x_msg_count => v_msg_count,

Line 807: if v_return_status = fnd_api.g_ret_sts_success then

803: );
804: -- hr_utility.trace('v_return_status is ' || v_return_status);
805:
806: -- hr_utility.trace('after call to grant_role_based_sec');
807: if v_return_status = fnd_api.g_ret_sts_success then
808: x_return_status := fnd_api.g_ret_sts_success;
809: return;
810: else
811: x_return_status := fnd_api.g_ret_sts_error;

Line 808: x_return_status := fnd_api.g_ret_sts_success;

804: -- hr_utility.trace('v_return_status is ' || v_return_status);
805:
806: -- hr_utility.trace('after call to grant_role_based_sec');
807: if v_return_status = fnd_api.g_ret_sts_success then
808: x_return_status := fnd_api.g_ret_sts_success;
809: return;
810: else
811: x_return_status := fnd_api.g_ret_sts_error;
812: return;

Line 811: x_return_status := fnd_api.g_ret_sts_error;

807: if v_return_status = fnd_api.g_ret_sts_success then
808: x_return_status := fnd_api.g_ret_sts_success;
809: return;
810: else
811: x_return_status := fnd_api.g_ret_sts_error;
812: return;
813: end if;
814:
815: END IF;

Line 817: x_return_status := fnd_api.g_ret_sts_success;

813: end if;
814:
815: END IF;
816:
817: x_return_status := fnd_api.g_ret_sts_success;
818:
819: exception
820: when others then
821: x_return_status := fnd_api.g_ret_sts_unexp_error;

Line 821: x_return_status := fnd_api.g_ret_sts_unexp_error;

817: x_return_status := fnd_api.g_ret_sts_success;
818:
819: exception
820: when others then
821: x_return_status := fnd_api.g_ret_sts_unexp_error;
822: x_error_message_code := SQLCODE;
823: end ;
824:
825:

Line 889: x_return_status:=fnd_api.g_ret_sts_success;

885: begin
886: open c_exist;
887: fetch c_exist into v_dummy;
888: if c_exist%notfound then
889: x_return_status:=fnd_api.g_ret_sts_success;
890: else
891: x_return_status:=fnd_api.g_ret_sts_error;
892: x_error_message_code:='PA_COMMON_DUP_ROLE_NAME';
893: end if;

Line 891: x_return_status:=fnd_api.g_ret_sts_error;

887: fetch c_exist into v_dummy;
888: if c_exist%notfound then
889: x_return_status:=fnd_api.g_ret_sts_success;
890: else
891: x_return_status:=fnd_api.g_ret_sts_error;
892: x_error_message_code:='PA_COMMON_DUP_ROLE_NAME';
893: end if;
894: close c_exist;
895: exception

Line 898: x_return_status:=FND_API.G_RET_STS_UNEXP_ERROR;

894: close c_exist;
895: exception
896: when others then
897: close c_exist;
898: x_return_status:=FND_API.G_RET_STS_UNEXP_ERROR;
899: x_error_message_code:=SQLCODE;
900: end;
901:
902: ---PROCEDURE Check_dup_role_list_name

Line 919: x_return_status:=fnd_api.g_ret_sts_success;

915: begin
916: open c_exist;
917: fetch c_exist into v_dummy;
918: if c_exist%notfound then
919: x_return_status:=fnd_api.g_ret_sts_success;
920: else
921: x_return_status:=fnd_api.g_ret_sts_error;
922: x_error_message_code:='PA_COMMON_DUP_ROLE_LIST_NAME';
923: end if;

Line 921: x_return_status:=fnd_api.g_ret_sts_error;

917: fetch c_exist into v_dummy;
918: if c_exist%notfound then
919: x_return_status:=fnd_api.g_ret_sts_success;
920: else
921: x_return_status:=fnd_api.g_ret_sts_error;
922: x_error_message_code:='PA_COMMON_DUP_ROLE_LIST_NAME';
923: end if;
924: close c_exist;
925: exception

Line 928: x_return_status:=FND_API.G_RET_STS_UNEXP_ERROR;

924: close c_exist;
925: exception
926: when others then
927: close c_exist;
928: x_return_status:=FND_API.G_RET_STS_UNEXP_ERROR;
929: x_error_message_code:=SQLCODE;
930: end;
931:
932: end PA_ROLE_UTILS ;