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.PQH_PRVCALC dependencies on HR_UTILITY

Line 3: -- global package variable for the purpose of hr_utility.

1: Package Body pqh_prvcalc as
2: /* $Header: pqprvcal.pkb 120.1 2005/07/05 17:13:19 hsajja noship $ */
3: -- global package variable for the purpose of hr_utility.
4:
5: g_package varchar2(2000) := 'pqh_prvcalc.';
6:
7:

Line 18: hr_utility.set_location('form_col :'||g_result(i).form_column_name||' Mod : '||g_result(i).mode_flag||' Req :'||g_result(i).reqd_flag,10);

14: --
15: procedure list_attribute_privs is
16: begin
17: for i in g_result.first .. g_result.last loop
18: hr_utility.set_location('form_col :'||g_result(i).form_column_name||' Mod : '||g_result(i).mode_flag||' Req :'||g_result(i).reqd_flag,10);
19: end loop;
20: end;
21: --
22: -- ----------------------------------------------------------------------------

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

29: p_result_reqd_flag out nocopy varchar )
30: as
31: l_proc varchar2(2000) := g_package||'task_task_reqd_comp_flag' ;
32: begin
33: hr_utility.set_location('Entering'||l_proc,10);
34: if p_task1_reqd_flag = 'Y' or p_task2_reqd_flag ='Y' then
35: p_result_reqd_flag := 'Y' ;
36: else
37: p_result_reqd_flag := 'N' ;

Line 39: hr_utility.set_location('Exiting'||l_proc,10000);

35: p_result_reqd_flag := 'Y' ;
36: else
37: p_result_reqd_flag := 'N' ;
38: end if;
39: hr_utility.set_location('Exiting'||l_proc,10000);
40: exception when others then
41: p_result_reqd_flag := null;
42: raise;
43: end task_task_reqd_comp_flag;

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

52: p_result_flag out nocopy varchar2 )
53: as
54: l_proc varchar2(2000) := g_package||'attribute_flag_result' ;
55: begin
56: -- hr_utility.set_location('Entering'||l_proc,10);
57: /*
58: This procedure is used for calculating the result flag based on the
59: values of the edit flag and the view flag which are taken as input.
60: If edit flag is Yes then result is E irrespective of the value of the View flag.

Line 71: hr_utility.set_location('edit'||p_edit_flag||' view '||p_view_flag||' result '||p_result_flag||l_proc,20);

67: p_result_flag := 'V' ;
68: else
69: p_result_flag := 'N' ;
70: end if;
71: hr_utility.set_location('edit'||p_edit_flag||' view '||p_view_flag||' result '||p_result_flag||l_proc,20);
72: -- hr_utility.set_location('Exiting'||l_proc,10000);
73: exception when others then
74: p_result_flag := null;
75: raise;

Line 72: -- hr_utility.set_location('Exiting'||l_proc,10000);

68: else
69: p_result_flag := 'N' ;
70: end if;
71: hr_utility.set_location('edit'||p_edit_flag||' view '||p_view_flag||' result '||p_result_flag||l_proc,20);
72: -- hr_utility.set_location('Exiting'||l_proc,10000);
73: exception when others then
74: p_result_flag := null;
75: raise;
76: end attribute_flag_result;

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

85: p_result_flag out nocopy varchar2 )
86: as
87: l_proc varchar2(2000) := g_package||'task_task_mode_comp_flag' ;
88: begin
89: -- hr_utility.set_location('Entering'||l_proc,10);
90: /*
91: This procedure is used for calculating result of the comparison of the
92: flags associated with an attribute of a task.
93: Task1 task2 are the input parameters . Flags can have possible values

Line 108: hr_utility.set_location('task1'||p_task1_flag||' task2 '||p_task2_flag||' result '||p_result_flag||l_proc,20 );

104: p_result_flag := 'V' ;
105: else
106: p_result_flag := 'N' ;
107: end if;
108: hr_utility.set_location('task1'||p_task1_flag||' task2 '||p_task2_flag||' result '||p_result_flag||l_proc,20 );
109: -- hr_utility.set_location('Exiting'||l_proc,10000);
110: exception when others then
111: p_result_flag := null;
112: raise;

Line 109: -- hr_utility.set_location('Exiting'||l_proc,10000);

105: else
106: p_result_flag := 'N' ;
107: end if;
108: hr_utility.set_location('task1'||p_task1_flag||' task2 '||p_task2_flag||' result '||p_result_flag||l_proc,20 );
109: -- hr_utility.set_location('Exiting'||l_proc,10000);
110: exception when others then
111: p_result_flag := null;
112: raise;
113: end task_task_mode_comp_flag;

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

122: p_result_flag out nocopy varchar2 )
123: as
124: l_proc varchar2(2000) := g_package||'domain_task_mode_comp_flag' ;
125: begin
126: -- hr_utility.set_location('Entering'||l_proc,10);
127: /*
128: This procedure is used for calculating the result of comparison of
129: domain flag and task flag associated with the attribute. Flag can have
130: values (E,V,N) . Minimum of the two flags is to be calculated as result.

Line 149: hr_utility.set_location('domain'||p_domain_mode_flag||' task '||p_task_mode_flag||' result '||p_result_flag||l_proc,20 );

145: end if;
146: else
147: p_result_flag := 'N' ;
148: end if;
149: hr_utility.set_location('domain'||p_domain_mode_flag||' task '||p_task_mode_flag||' result '||p_result_flag||l_proc,20 );
150: -- hr_utility.set_location('Exiting'||l_proc,10000);
151: exception when others then
152: p_result_flag := null;
153: raise;

Line 150: -- hr_utility.set_location('Exiting'||l_proc,10000);

146: else
147: p_result_flag := 'N' ;
148: end if;
149: hr_utility.set_location('domain'||p_domain_mode_flag||' task '||p_task_mode_flag||' result '||p_result_flag||l_proc,20 );
150: -- hr_utility.set_location('Exiting'||l_proc,10000);
151: exception when others then
152: p_result_flag := null;
153: raise;
154: end domain_task_mode_comp_flag;

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

169: from pqh_template_attributes
170: where template_id = l_template_id;
171: l_proc varchar2(2000) := g_package||'domain_result_calc' ;
172: begin
173: hr_utility.set_location('Entering'||l_proc,10);
174: /*
175: This procedure is used for calculating the attribute and result flag
176: associated to a domain. domain template id is taken as input parameter
177: and result is stored in the pl/sql table of records. Call to attribute

Line 182: -- hr_utility.set_location('# '||to_char(l_count)||' attribute '||to_char(l_domain_rec.attribute_id)||l_proc,20 );

178: flag result is made to find out nocopy the result flag for each attribute.
179: */
180: l_count := 1 ;
181: for l_domain_rec in c1(p_domain) loop
182: -- hr_utility.set_location('# '||to_char(l_count)||' attribute '||to_char(l_domain_rec.attribute_id)||l_proc,20 );
183: attribute_flag_result(p_edit_flag => l_domain_rec.edit_flag,
184: p_view_flag => l_domain_rec.view_flag,
185: p_result_flag => l_result_flag);
186: p_result(l_count).attribute_id := l_domain_rec.attribute_id;

Line 194: hr_utility.set_location('Exiting'||l_proc,10000);

190: -- domain's task type is also not considered
191: p_result(l_count).task_type := '';
192: l_count := l_count + 1 ;
193: end loop;
194: hr_utility.set_location('Exiting'||l_proc,10000);
195: exception when others then
196: p_result := l_result;
197: raise;
198: end;

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

217: from pqh_template_attributes
218: where template_id = l_task_template_id;
219: l_proc varchar2(2000) := g_package||'task_result_update' ;
220: begin
221: -- hr_utility.set_location('Entering'||l_proc,10);
222: /*
223: This procedure is used to update internal result table which stores result
224: flags for the attributes associated with the list of tasks. Internal result
225: table and task template id are the input parameters and internal result

Line 235: hr_utility.set_location('task is'||p_task||l_proc,15 );

231: is made and result is stored back in internal result table. if no match is
232: made for the attribute then attribute is added in the internal result
233: table with the result flag.
234: */
235: hr_utility.set_location('task is'||p_task||l_proc,15 );
236: for i in c1(p_task) loop
237: -- hr_utility.set_location('Values task, attribute '||to_char(i.attribute_id)||'edit '||i.edit_flag||' view '||i.view_flag||l_proc,20 );
238: attribute_flag_result(p_edit_flag => i.edit_flag,
239: p_view_flag => i.view_flag,

Line 237: -- hr_utility.set_location('Values task, attribute '||to_char(i.attribute_id)||'edit '||i.edit_flag||' view '||i.view_flag||l_proc,20 );

233: table with the result flag.
234: */
235: hr_utility.set_location('task is'||p_task||l_proc,15 );
236: for i in c1(p_task) loop
237: -- hr_utility.set_location('Values task, attribute '||to_char(i.attribute_id)||'edit '||i.edit_flag||' view '||i.view_flag||l_proc,20 );
238: attribute_flag_result(p_edit_flag => i.edit_flag,
239: p_view_flag => i.view_flag,
240: p_result_flag => l_result_flag);
241: l_reqd_flag := substr(nvl(i.required_flag,'N'),1,1) ;

Line 248: -- hr_utility.set_location('Table has'||p_result_int(l_res_count).task_type||' adding '||p_task_type||l_proc,30);

244: l_task_last_count := p_result_int.count;
245: for l_res_count in 1..l_task_last_count loop
246: if p_result_int(l_res_count).attribute_id = i.attribute_id then
247: l_ins_result := 'N' ;
248: -- hr_utility.set_location('Table has'||p_result_int(l_res_count).task_type||' adding '||p_task_type||l_proc,30);
249: if p_result_int(l_res_count).task_type = 'T' then
250: if p_task_type ='T' then
251: -- max of the attribute flags is stored in the table
252: -- hr_utility.set_location('Attribute flags updated '||l_proc,40);

Line 252: -- hr_utility.set_location('Attribute flags updated '||l_proc,40);

248: -- hr_utility.set_location('Table has'||p_result_int(l_res_count).task_type||' adding '||p_task_type||l_proc,30);
249: if p_result_int(l_res_count).task_type = 'T' then
250: if p_task_type ='T' then
251: -- max of the attribute flags is stored in the table
252: -- hr_utility.set_location('Attribute flags updated '||l_proc,40);
253: task_task_mode_comp_flag(p_task1_flag => p_result_int(l_res_count).mode_flag,
254: p_task2_flag => l_result_flag,
255: p_result_flag => p_result_int(l_res_count).mode_flag);
256: task_task_reqd_comp_flag(p_task1_reqd_flag => p_result_int(l_res_count).reqd_flag,

Line 280: -- hr_utility.set_location('New attribute added '||l_proc,50);

276: end if;
277: end if;
278: end loop;
279: if l_ins_result ='Y' then
280: -- hr_utility.set_location('New attribute added '||l_proc,50);
281: l_res_count := l_task_last_count + 1;
282: p_result_int(l_res_count).attribute_id := i.attribute_id;
283: p_result_int(l_res_count).mode_flag := l_result_flag ;
284: p_result_int(l_res_count).reqd_flag := l_reqd_flag;

Line 288: -- hr_utility.set_location('Exiting'||l_proc,10000);

284: p_result_int(l_res_count).reqd_flag := l_reqd_flag;
285: p_result_int(l_res_count).task_type := p_task_type;
286: end if;
287: end loop;
288: -- hr_utility.set_location('Exiting'||l_proc,10000);
289: exception when others then
290: p_result_int := l_result_int;
291: raise;
292: end task_result_update;

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

309: and reference_type_cd = 'REFERENCE';
310:
311: l_proc varchar2(2000) := g_package||'task_references' ;
312: begin
313: hr_utility.set_location('Entering'||l_proc,10);
314: /*
315: This procedure is used for finding out nocopy reference tasks associated with
316: each task and also taking into account their flag values and updating
317: those into the internal result table. for each reference task associated

Line 321: hr_utility.set_location('values fetched are attribute '||to_char(i.base_template_id)||l_proc,20 );

317: those into the internal result table. for each reference task associated
318: with a task, call to task_result update is made.
319: */
320: for i in c2(p_task) loop
321: hr_utility.set_location('values fetched are attribute '||to_char(i.base_template_id)||l_proc,20 );
322: task_result_update(p_task => i.base_template_id,
323: p_task_type => 'R',
324: p_result_int => p_result_int);
325: end loop;

Line 326: hr_utility.set_location('Exiting'||l_proc,10000);

322: task_result_update(p_task => i.base_template_id,
323: p_task_type => 'R',
324: p_result_int => p_result_int);
325: end loop;
326: hr_utility.set_location('Exiting'||l_proc,10000);
327:
328: exception when others then
329: p_result_int := l_result_int;
330: raise;

Line 347: hr_utility.set_location('att'||p_result(i).form_column_name||'mode'||p_result(i).mode_flag||'reqd'||p_result(i).reqd_flag||l_proc,200);

343: p_tasks => p_tasks,
344: p_transaction_category_id => p_transaction_category_id,
345: p_result => p_result);
346: for i in 1..p_result.last loop
347: hr_utility.set_location('att'||p_result(i).form_column_name||'mode'||p_result(i).mode_flag||'reqd'||p_result(i).reqd_flag||l_proc,200);
348: end loop;
349: end check_priv_calc;
350:
351: procedure get_row_prv( p_row in number,

Line 361: hr_utility.set_location('exiting'||l_proc,10000);

357: begin
358: p_form_column_name := g_result(p_row).form_column_name;
359: p_mode_flag := g_result(p_row).mode_flag;
360: p_reqd_flag := g_result(p_row).reqd_flag;
361: hr_utility.set_location('exiting'||l_proc,10000);
362: end get_row_prv;
363:
364: procedure priviledge_calc_count (p_domain in pqh_template_attributes.template_id%type,
365: p_tasks in t_task_templ,

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

388: where attribute_id = p_attribute_id
389: and transaction_category_id = p_transaction_category_id;
390: l_proc varchar2(2000) := g_package||'priviledge_calc_count' ;
391: begin
392: hr_utility.set_location('Entering'||l_proc,10);
393: /*
394: This is the main procedure . It takes domain template id and an table of tasks as input
395: and passes the attributes and their flag values as result .
396: This procedure has three parts.

Line 409: hr_utility.set_location('domain reqd'||l_proc,20);

405:
406: l_task_last_count := p_tasks.count;
407: if p_domain is null then
408: l_error_flag := TRUE;
409: hr_utility.set_location('domain reqd'||l_proc,20);
410: elsif l_task_last_count = 0 then
411: l_error_flag := TRUE;
412: hr_utility.set_location('tasks reqd'||l_proc,30);
413: end if;

Line 412: hr_utility.set_location('tasks reqd'||l_proc,30);

408: l_error_flag := TRUE;
409: hr_utility.set_location('domain reqd'||l_proc,20);
410: elsif l_task_last_count = 0 then
411: l_error_flag := TRUE;
412: hr_utility.set_location('tasks reqd'||l_proc,30);
413: end if;
414:
415: -- Part1 starts here
416: /*

Line 431: hr_utility.set_location('att '||l_result_task_int(i).attribute_id||'mode '||l_result_task_int(i).mode_flag||'reqd '||l_result_task_int(i).reqd_flag||l_proc,35);

427: p_result_int => l_result_task_int) ;
428: end loop;
429: l_task_att_count := l_result_task_int.count;
430: for i in 1..l_task_att_count loop
431: hr_utility.set_location('att '||l_result_task_int(i).attribute_id||'mode '||l_result_task_int(i).mode_flag||'reqd '||l_result_task_int(i).reqd_flag||l_proc,35);
432: end loop;
433:
434: -- Part2 : Computation of result table , corresponding to domain template
435: domain_result_calc(p_domain => p_domain,

Line 455: hr_utility.set_location('attribute in task'||to_char(l_result_task_int(l_int_res_count).attribute_id)||l_proc,95);

451: l_task_last_count := l_result_task_int.count;
452: for l_int_res_count in 1..l_task_last_count loop
453: if l_result_domain_int(l_res_count).attribute_id = l_result_task_int(l_int_res_count).attribute_id then
454: l_chg_result := 'N' ;
455: hr_utility.set_location('attribute in task'||to_char(l_result_task_int(l_int_res_count).attribute_id)||l_proc,95);
456: -- mode flag is taken as minimum of domain and task privledges
457: domain_task_mode_comp_flag(p_domain_mode_flag => l_result_domain_int(l_res_count).mode_flag,
458: p_task_mode_flag => l_result_task_int(l_int_res_count).mode_flag,
459: p_result_flag => l_temp_flag);

Line 482: hr_utility.set_location('att'||g_result(i).form_column_name||'mode'||g_result(i).mode_flag||'reqd'||g_result(i).reqd_flag||l_proc,200);

478: close c1;
479: g_result(i).form_column_name := l_form_column_name;
480: g_result(i).mode_flag := l_result_domain_int(i).mode_flag;
481: g_result(i).reqd_flag := l_result_domain_int(i).reqd_flag;
482: hr_utility.set_location('att'||g_result(i).form_column_name||'mode'||g_result(i).mode_flag||'reqd'||g_result(i).reqd_flag||l_proc,200);
483: end loop;
484: else
485: hr_utility.set_location('errors , cannot execute'||l_proc,100);
486: end if;

Line 485: hr_utility.set_location('errors , cannot execute'||l_proc,100);

481: g_result(i).reqd_flag := l_result_domain_int(i).reqd_flag;
482: hr_utility.set_location('att'||g_result(i).form_column_name||'mode'||g_result(i).mode_flag||'reqd'||g_result(i).reqd_flag||l_proc,200);
483: end loop;
484: else
485: hr_utility.set_location('errors , cannot execute'||l_proc,100);
486: end if;
487: hr_utility.set_location('Exiting'||l_proc,10000);
488: exception when others then
489: p_result_count := null;

Line 487: hr_utility.set_location('Exiting'||l_proc,10000);

483: end loop;
484: else
485: hr_utility.set_location('errors , cannot execute'||l_proc,100);
486: end if;
487: hr_utility.set_location('Exiting'||l_proc,10000);
488: exception when others then
489: p_result_count := null;
490: raise;
491: end priviledge_calc_count;

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

524: where attribute_id = p_attribute_id
525: and transaction_category_id = p_transaction_category_id;
526: l_proc varchar2(2000) := g_package||'priviledge_calc' ;
527: begin
528: hr_utility.set_location('Entering'||l_proc,10);
529: /*
530: This is the main procedure . It takes domain template id and an table of tasks as input
531: and passes the attributes and their flag values as result .
532: This procedure has three parts.

Line 545: hr_utility.set_location('domain reqd'||l_proc,20);

541:
542: l_task_last_count := p_tasks.count;
543: if p_domain is null then
544: l_error_flag := TRUE;
545: hr_utility.set_location('domain reqd'||l_proc,20);
546: elsif l_task_last_count = 0 then
547: l_error_flag := TRUE;
548: hr_utility.set_location('tasks reqd'||l_proc,30);
549: end if;

Line 548: hr_utility.set_location('tasks reqd'||l_proc,30);

544: l_error_flag := TRUE;
545: hr_utility.set_location('domain reqd'||l_proc,20);
546: elsif l_task_last_count = 0 then
547: l_error_flag := TRUE;
548: hr_utility.set_location('tasks reqd'||l_proc,30);
549: end if;
550:
551: -- Part1 starts here
552: /*

Line 567: hr_utility.set_location('att '||l_result_task_int(i).attribute_id||'mode '||l_result_task_int(i).mode_flag||'reqd '||l_result_task_int(i).reqd_flag||l_proc,35);

563: p_result_int => l_result_task_int) ;
564: end loop;
565: l_task_att_count := l_result_task_int.count;
566: for i in 1..l_task_att_count loop
567: hr_utility.set_location('att '||l_result_task_int(i).attribute_id||'mode '||l_result_task_int(i).mode_flag||'reqd '||l_result_task_int(i).reqd_flag||l_proc,35);
568: end loop;
569:
570: -- Part2 : Computation of result table , corresponding to domain template
571: domain_result_calc(p_domain => p_domain,

Line 591: hr_utility.set_location('attribute in task'||to_char(l_result_task_int(l_int_res_count).attribute_id)||l_proc,95);

587: l_task_last_count := l_result_task_int.count;
588: for l_int_res_count in 1..l_task_last_count loop
589: if l_result_domain_int(l_res_count).attribute_id = l_result_task_int(l_int_res_count).attribute_id then
590: l_chg_result := 'N' ;
591: hr_utility.set_location('attribute in task'||to_char(l_result_task_int(l_int_res_count).attribute_id)||l_proc,95);
592: -- mode flag is taken as minimum of domain and task privledges
593: domain_task_mode_comp_flag(p_domain_mode_flag => l_result_domain_int(l_res_count).mode_flag,
594: p_task_mode_flag => l_result_task_int(l_int_res_count).mode_flag,
595: p_result_flag => l_temp_flag);

Line 618: hr_utility.set_location('att'||p_result(i).form_column_name||'mode'||p_result(i).mode_flag||'reqd'||p_result(i).reqd_flag||l_proc,200);

614: close c1;
615: p_result(i).form_column_name := l_form_column_name;
616: p_result(i).mode_flag := l_result_domain_int(i).mode_flag;
617: p_result(i).reqd_flag := l_result_domain_int(i).reqd_flag;
618: hr_utility.set_location('att'||p_result(i).form_column_name||'mode'||p_result(i).mode_flag||'reqd'||p_result(i).reqd_flag||l_proc,200);
619: end loop;
620: else
621: hr_utility.set_location('errors , cannot execute'||l_proc,100);
622: end if;

Line 621: hr_utility.set_location('errors , cannot execute'||l_proc,100);

617: p_result(i).reqd_flag := l_result_domain_int(i).reqd_flag;
618: hr_utility.set_location('att'||p_result(i).form_column_name||'mode'||p_result(i).mode_flag||'reqd'||p_result(i).reqd_flag||l_proc,200);
619: end loop;
620: else
621: hr_utility.set_location('errors , cannot execute'||l_proc,100);
622: end if;
623: hr_utility.set_location('Exiting'||l_proc,10000);
624: exception when others then
625: p_result := l_result;

Line 623: hr_utility.set_location('Exiting'||l_proc,10000);

619: end loop;
620: else
621: hr_utility.set_location('errors , cannot execute'||l_proc,100);
622: end if;
623: hr_utility.set_location('Exiting'||l_proc,10000);
624: exception when others then
625: p_result := l_result;
626: raise;
627: end priviledge_calc;

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

650: and transaction_category_id = p_transaction_category_id;
651:
652: l_proc varchar2(2000) := g_package||'template_attrib_reqd_calc' ;
653: begin
654: hr_utility.set_location('Entering'||l_proc,10);
655: for l_task_count in 1..p_tasks.count loop
656: l_task_template_id := p_tasks(l_task_count) ;
657: task_result_update(p_task => p_tasks(l_task_count),
658: p_task_type => 'T',

Line 671: hr_utility.set_location('Exiting'||l_proc,10000);

667: p_result(i).form_column_name := l_form_column_name;
668: p_result(i).mode_flag := l_result_task_int(i).mode_flag;
669: p_result(i).reqd_flag := l_result_task_int(i).reqd_flag;
670: end loop;
671: hr_utility.set_location('Exiting'||l_proc,10000);
672: exception when others then
673: p_result := l_result;
674: raise;
675: end template_attrib_reqd_calc;