DBA Data[Home] [Help]

APPS.BEN_CWB_CHANGE_ACCESS dependencies on HR_UTILITY

Line 7: g_debug boolean := hr_utility.debug_enabled;

3: --
4: -- Global cursor and variables declaration
5: --
6: g_package VARCHAR2(80) := 'ben_cwb_change_access.';
7: g_debug boolean := hr_utility.debug_enabled;
8: --
9: -- ----------------------------------------------------------------------------
10: -- |---------------------------< update_group_budget >------------------------|
11: -- ----------------------------------------------------------------------------

Line 43: hr_utility.set_location('Entering:'|| l_proc, 5);

39: l_requestor_last_name varchar2(240);
40: --
41: BEGIN
42: if g_debug then
43: hr_utility.set_location('Entering:'|| l_proc, 5);
44: end if;
45: --
46: -- Store initial values for IN OUT parameters
47: --

Line 116: hr_utility.set_location(l_proc, 8);

112: end if;
113:
114: --
115: if g_debug then
116: hr_utility.set_location(l_proc, 8);
117: end if;
118: --
119: /* NEED TO SAVE DATA IN BEN_TRANSACTIONS AND CALL NTF api */
120: -- Populating the OUT parameters.

Line 125: hr_utility.set_location(' Leaving:'||l_proc, 10);

121: --
122: p_object_version_number := l_object_version_number;
123: --
124: if g_debug then
125: hr_utility.set_location(' Leaving:'||l_proc, 10);
126: end if;
127: --
128: END update_group_budget;
129: --

Line 176: hr_utility.set_location('Entering:'|| l_proc, 10);

172: l_num number default 0;
173: --
174: BEGIN
175: if g_debug then
176: hr_utility.set_location('Entering:'|| l_proc, 10);
177: end if;
178: --
179: FOR l_num in p_group_per_in_ler_id.First..p_group_per_in_ler_id.LAST
180: LOOP

Line 189: hr_utility.set_location(l_proc, 20);

185: END IF;
186: END LOOP;
187: --
188: if g_debug then
189: hr_utility.set_location(l_proc, 20);
190: end if;
191: --
192:
193: if (p_popl_cd = 'D') then

Line 196: hr_utility.set_location(l_proc, 30);

192:
193: if (p_popl_cd = 'D') then
194: --
195: if g_debug then
196: hr_utility.set_location(l_proc, 30);
197: end if;
198: --
199: l_dynamic_sql :=
200: 'select max(emp_per.person_id) emp_person_id,

Line 227: hr_utility.set_location(l_proc, 40);

223: -- and nvl(per_grp.approval_cd, ''XX'') <> ''AP''
224: -- and NOT ( nvl(per_grp.submit_cd, ''XX'') = ''SU'' and per_grp.approval_cd is null )
225: group by smry.group_per_in_ler_id'; --
226: if g_debug then
227: hr_utility.set_location(l_proc, 40);
228: end if;
229: --
230: /* Open Main Cursor to fetch the desired population */
231: open fetch_direct_managers for l_dynamic_sql;

Line 252: hr_utility.set_location('Entering outer IF'|| l_proc, 50);

248: --
249: if ((l_appr_cd = 'AP' OR l_appr_cd = 'PR') OR (l_submit_cd = 'SU' AND l_appr_cd is null)) AND (l_access_cd <> p_access_cd_to) then
250: --
251: if g_debug then
252: hr_utility.set_location('Entering outer IF'|| l_proc, 50);
253: end if;
254: --
255: if l_access_cd = 'NA' AND p_access_cd_to = 'RO' then
256: --

Line 258: hr_utility.set_location('Entering: '|| l_proc, 55);

254: --
255: if l_access_cd = 'NA' AND p_access_cd_to = 'RO' then
256: --
257: if g_debug then
258: hr_utility.set_location('Entering: '|| l_proc, 55);
259: end if;
260: --
261: update_group_budget ( p_validate, l_per_in_ler_id, p_group_pl_id,
262: p_group_oipl_id, p_access_cd_to, p_comments,

Line 268: hr_utility.set_location('Entering: '|| l_proc, 56);

264: p_grp_pl_for_end_dt, l_ovn , p_requestor_name);--process;
265: elsif l_access_cd = 'UP' AND p_access_cd_to = 'RO' then
266: --
267: if g_debug then
268: hr_utility.set_location('Entering: '|| l_proc, 56);
269: end if;
270: --
271: update_group_budget ( p_validate, l_per_in_ler_id, p_group_pl_id,
272: p_group_oipl_id, p_access_cd_to, p_comments,

Line 278: hr_utility.set_location('Entering: '|| l_proc, 57);

274: p_grp_pl_for_end_dt, l_ovn , p_requestor_name);--process;
275: elsif l_access_cd = 'RO' AND p_access_cd_to = 'NA' then
276: --
277: if g_debug then
278: hr_utility.set_location('Entering: '|| l_proc, 57);
279: end if;
280: --
281: update_group_budget ( p_validate, l_per_in_ler_id, p_group_pl_id,
282: p_group_oipl_id, p_access_cd_to, p_comments,

Line 288: hr_utility.set_location('Entering: '|| l_proc, 58);

284: p_grp_pl_for_end_dt, l_ovn , p_requestor_name);--process;
285: elsif l_access_cd = 'UP' AND p_access_cd_to = 'RO' then
286: --
287: if g_debug then
288: hr_utility.set_location('Entering: '|| l_proc, 58);
289: end if;
290: --
291: update_group_budget ( p_validate, l_per_in_ler_id, p_group_pl_id,
292: p_group_oipl_id, p_access_cd_to, p_comments,

Line 298: hr_utility.set_location('Condition not found:'|| l_proc, 60);

294: p_grp_pl_for_end_dt, l_ovn , p_requestor_name);--process;
295: else
296: --
297: if g_debug then
298: hr_utility.set_location('Condition not found:'|| l_proc, 60);
299: end if;
300: --
301: -- Will set to 'Y' , to throw warning message
302: --

Line 309: hr_utility.set_location('Entering: '|| l_proc, 70);

305: end if;
306: else
307: --
308: if g_debug then
309: hr_utility.set_location('Entering: '|| l_proc, 70);
310: end if;
311: --
312: --
313: --Update as usual if not Submitted/Approved

Line 323: hr_utility.set_location(l_proc, 80);

319: end if;
320: end loop;
321: --
322: if g_debug then
323: hr_utility.set_location(l_proc, 80);
324: end if;
325: --
326: close fetch_direct_managers ;
327: --

Line 329: hr_utility.set_location(l_proc, 90);

325: --
326: close fetch_direct_managers ;
327: --
328: if g_debug then
329: hr_utility.set_location(l_proc, 90);
330: end if;
331: --
332: elsif (p_popl_cd = 'A') then
333: --

Line 335: hr_utility.set_location(l_proc, 100);

331: --
332: elsif (p_popl_cd = 'A') then
333: --
334: if g_debug then
335: hr_utility.set_location(l_proc, 100);
336: end if;
337: --
338: l_dynamic_sql := '
339: select max(emp_per.person_id) emp_person_id,

Line 369: hr_utility.set_location(l_proc, 110);

365:
366: /* Open Main Cursor to fetch the desired population */
367: --
368: if g_debug then
369: hr_utility.set_location(l_proc, 110);
370: end if;
371: --
372: open fetch_all_managers for l_dynamic_sql;
373: /* Loop through the cursor */

Line 390: hr_utility.set_location('Entering outer IF'|| l_proc, 120);

386: --
387: if ((l_appr_cd = 'AP' OR l_appr_cd = 'PR') OR (l_submit_cd = 'SU' AND l_appr_cd is null)) AND (l_access_cd <> p_access_cd_to) then
388: --
389: if g_debug then
390: hr_utility.set_location('Entering outer IF'|| l_proc, 120);
391: end if;
392: --
393: if l_access_cd = 'NA' AND p_access_cd_to = 'RO' then
394: --

Line 396: hr_utility.set_location('Entering: '|| l_proc, 125);

392: --
393: if l_access_cd = 'NA' AND p_access_cd_to = 'RO' then
394: --
395: if g_debug then
396: hr_utility.set_location('Entering: '|| l_proc, 125);
397: end if;
398: --
399: update_group_budget ( p_validate, l_per_in_ler_id, p_group_pl_id,
400: p_group_oipl_id, p_access_cd_to, p_comments,

Line 406: hr_utility.set_location('Entering: '|| l_proc, 126);

402: p_grp_pl_for_end_dt, l_ovn , p_requestor_name);--process;
403: elsif l_access_cd = 'UP' AND p_access_cd_to = 'RO' then
404: --
405: if g_debug then
406: hr_utility.set_location('Entering: '|| l_proc, 126);
407: end if;
408: --
409: update_group_budget ( p_validate, l_per_in_ler_id, p_group_pl_id,
410: p_group_oipl_id, p_access_cd_to, p_comments,

Line 416: hr_utility.set_location('Entering: '|| l_proc, 127);

412: p_grp_pl_for_end_dt, l_ovn , p_requestor_name);--process;
413: elsif l_access_cd = 'RO' AND p_access_cd_to = 'NA' then
414: --
415: if g_debug then
416: hr_utility.set_location('Entering: '|| l_proc, 127);
417: end if;
418: --
419: update_group_budget ( p_validate, l_per_in_ler_id, p_group_pl_id,
420: p_group_oipl_id, p_access_cd_to, p_comments,

Line 426: hr_utility.set_location('Entering: '|| l_proc, 128);

422: p_grp_pl_for_end_dt, l_ovn , p_requestor_name);--process;
423: elsif l_access_cd = 'UP' AND p_access_cd_to = 'RO' then
424: --
425: if g_debug then
426: hr_utility.set_location('Entering: '|| l_proc, 128);
427: end if;
428: --
429: update_group_budget ( p_validate, l_per_in_ler_id, p_group_pl_id,
430: p_group_oipl_id, p_access_cd_to, p_comments,

Line 436: hr_utility.set_location('Condition not found:'|| l_proc, 130);

432: p_grp_pl_for_end_dt, l_ovn , p_requestor_name);--process;
433: else
434: --
435: if g_debug then
436: hr_utility.set_location('Condition not found:'|| l_proc, 130);
437: end if;
438: --
439: -- Will set to 'Y' , to throw warning message
440: --

Line 447: hr_utility.set_location('Entering: '|| l_proc, 140);

443: end if;
444: else
445: --
446: if g_debug then
447: hr_utility.set_location('Entering: '|| l_proc, 140);
448: end if;
449: --
450: --
451: --Update as usual if not Submitted/Approved

Line 462: hr_utility.set_location(l_proc, 150);

458: end loop;
459: close fetch_all_managers ;
460: --
461: if g_debug then
462: hr_utility.set_location(l_proc, 150);
463: end if;
464: --
465: else
466: --

Line 468: hr_utility.set_location(l_proc, 160);

464: --
465: else
466: --
467: if g_debug then
468: hr_utility.set_location(l_proc, 160);
469: end if;
470: --
471: if(p_group_per_in_ler_id is not null ) then
472: l_dynamic_sql := '

Line 503: hr_utility.set_location(l_proc, 170);

499: -- and nvl(per_grp.approval_cd, ''XX'') <> ''AP''
500: -- and NOT ( nvl(per_grp.submit_cd, ''XX'') = ''SU'' and per_grp.approval_cd is null )
501: group by smry.group_per_in_ler_id'; --
502: if g_debug then
503: hr_utility.set_location(l_proc, 170);
504: end if;
505: --
506: open fetch_search_managers for l_dynamic_sql;
507: /* Loop through the cursor */

Line 518: hr_utility.set_location(l_proc, 180);

514: l_appr_cd,
515: l_submit_cd ;
516: EXIT WHEN fetch_search_managers%NOTFOUND;
517: if g_debug then
518: hr_utility.set_location(l_proc, 180);
519: end if;
520: -- CODE TO UPDATE , CALL TO MAIN API
521: --
522: --Access to be changed for the following cases when the PerInLer has Submitted or has been Approved

Line 527: hr_utility.set_location('Entering outer IF'|| l_proc, 190);

523: --
524: if ((l_appr_cd = 'AP' OR l_appr_cd = 'PR') OR (l_submit_cd = 'SU' AND l_appr_cd is null)) AND (l_access_cd <> p_access_cd_to) then
525: --
526: if g_debug then
527: hr_utility.set_location('Entering outer IF'|| l_proc, 190);
528: end if;
529: --
530: if l_access_cd = 'NA' AND p_access_cd_to = 'RO' then
531: --

Line 533: hr_utility.set_location('Entering: '|| l_proc, 195);

529: --
530: if l_access_cd = 'NA' AND p_access_cd_to = 'RO' then
531: --
532: if g_debug then
533: hr_utility.set_location('Entering: '|| l_proc, 195);
534: end if;
535: --
536: update_group_budget ( p_validate, l_per_in_ler_id, p_group_pl_id,
537: p_group_oipl_id, p_access_cd_to, p_comments,

Line 543: hr_utility.set_location('Entering: '|| l_proc, 196);

539: p_grp_pl_for_end_dt, l_ovn , p_requestor_name);--process;
540: elsif l_access_cd = 'UP' AND p_access_cd_to = 'RO' then
541: --
542: if g_debug then
543: hr_utility.set_location('Entering: '|| l_proc, 196);
544: end if;
545: --
546: update_group_budget ( p_validate, l_per_in_ler_id, p_group_pl_id,
547: p_group_oipl_id, p_access_cd_to, p_comments,

Line 553: hr_utility.set_location('Entering: '|| l_proc, 197);

549: p_grp_pl_for_end_dt, l_ovn , p_requestor_name);--process;
550: elsif l_access_cd = 'RO' AND p_access_cd_to = 'NA' then
551: --
552: if g_debug then
553: hr_utility.set_location('Entering: '|| l_proc, 197);
554: end if;
555: --
556: update_group_budget ( p_validate, l_per_in_ler_id, p_group_pl_id,
557: p_group_oipl_id, p_access_cd_to, p_comments,

Line 563: hr_utility.set_location('Entering: '|| l_proc, 198);

559: p_grp_pl_for_end_dt, l_ovn , p_requestor_name);--process;
560: elsif l_access_cd = 'UP' AND p_access_cd_to = 'RO' then
561: --
562: if g_debug then
563: hr_utility.set_location('Entering: '|| l_proc, 198);
564: end if;
565: --
566: update_group_budget ( p_validate, l_per_in_ler_id, p_group_pl_id,
567: p_group_oipl_id, p_access_cd_to, p_comments,

Line 573: hr_utility.set_location('Condition not found:'|| l_proc, 200);

569: p_grp_pl_for_end_dt, l_ovn , p_requestor_name);--process;
570: else
571: --
572: if g_debug then
573: hr_utility.set_location('Condition not found:'|| l_proc, 200);
574: end if;
575: --
576: -- Will set to 'Y' , to throw warning message
577: --

Line 587: hr_utility.set_location('Entering: '|| l_proc, 210);

583: --Update as usual if not Submitted/Approved
584: --
585: --
586: if g_debug then
587: hr_utility.set_location('Entering: '|| l_proc, 210);
588: end if;
589: --
590: update_group_budget ( p_validate, l_per_in_ler_id, p_group_pl_id,
591: p_group_oipl_id, p_access_cd_to, p_comments,

Line 603: hr_utility.set_location(' Leaving:'||l_proc, 220);

599: end if;
600: --
601: --
602: if g_debug then
603: hr_utility.set_location(' Leaving:'||l_proc, 220);
604: end if;
605: --
606: END update_access;
607: --