DBA Data[Home] [Help]

APPS.PER_BIL_SHD dependencies on HR_UTILITY

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

14: --
15: l_proc varchar2(72) := g_package||'return_api_dml_status';
16: --
17: Begin
18: hr_utility.set_location('Entering:'||l_proc, 5);
19: --
20: Return (nvl(g_api_dml, false));
21: --
22: hr_utility.set_location(' Leaving:'||l_proc, 10);

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

18: hr_utility.set_location('Entering:'||l_proc, 5);
19: --
20: Return (nvl(g_api_dml, false));
21: --
22: hr_utility.set_location(' Leaving:'||l_proc, 10);
23: End return_api_dml_status;
24: --
25: -- ----------------------------------------------------------------------------
26: -- |---------------------------< constraint_error >---------------------------|

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

30: --
31: l_proc varchar2(72) := g_package||'constraint_error';
32: --
33: Begin
34: hr_utility.set_location('Entering:'||l_proc, 5);
35: --
36: If (p_constraint_name = 'hr_summary_PK') Then
37: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
38: fnd_message.set_token('PROCEDURE', l_proc);

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

92: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
93: fnd_message.raise_error;
94: End If;
95: --
96: hr_utility.set_location(' Leaving:'||l_proc, 10);
97: End constraint_error;
98: --
99: -- ----------------------------------------------------------------------------
100: -- |-----------------------------< api_updating >-----------------------------|

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

137: l_proc varchar2(72) := g_package||'api_updating';
138: l_fct_ret boolean;
139: --
140: Begin
141: hr_utility.set_location('Entering:'||l_proc, 5);
142: --
143: If (
144: p_object_version_number is null and p_id_value is null
145: ) Then

Line 155: hr_utility.set_location(l_proc, 10);

151: Else
152: If (
153: p_object_version_number = g_old_rec.object_version_number and p_id_value = g_old_rec.id_value
154: ) Then
155: hr_utility.set_location(l_proc, 10);
156: --
157: -- The g_old_rec is current therefore we must
158: -- set the returning function to true
159: --

Line 172: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');

168: Close C_Sel1;
169: --
170: -- The primary key is invalid therefore we must error
171: --
172: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
173: hr_utility.raise_error;
174: End If;
175: Close C_Sel1;
176: If (p_object_version_number <> g_old_rec.object_version_number) Then

Line 173: hr_utility.raise_error;

169: --
170: -- The primary key is invalid therefore we must error
171: --
172: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
173: hr_utility.raise_error;
174: End If;
175: Close C_Sel1;
176: If (p_object_version_number <> g_old_rec.object_version_number) Then
177: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');

Line 177: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');

173: hr_utility.raise_error;
174: End If;
175: Close C_Sel1;
176: If (p_object_version_number <> g_old_rec.object_version_number) Then
177: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
178: hr_utility.raise_error;
179: End If;
180: hr_utility.set_location(l_proc, 15);
181: l_fct_ret := true;

Line 178: hr_utility.raise_error;

174: End If;
175: Close C_Sel1;
176: If (p_object_version_number <> g_old_rec.object_version_number) Then
177: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
178: hr_utility.raise_error;
179: End If;
180: hr_utility.set_location(l_proc, 15);
181: l_fct_ret := true;
182: End If;

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

176: If (p_object_version_number <> g_old_rec.object_version_number) Then
177: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
178: hr_utility.raise_error;
179: End If;
180: hr_utility.set_location(l_proc, 15);
181: l_fct_ret := true;
182: End If;
183: End If;
184: hr_utility.set_location(' Leaving:'||l_proc, 20);

Line 184: hr_utility.set_location(' Leaving:'||l_proc, 20);

180: hr_utility.set_location(l_proc, 15);
181: l_fct_ret := true;
182: End If;
183: End If;
184: hr_utility.set_location(' Leaving:'||l_proc, 20);
185: Return (l_fct_ret);
186: --
187: End api_updating;
188: --

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

225: --
226: l_proc varchar2(72) := g_package||'lck';
227: --
228: Begin
229: hr_utility.set_location('Entering:'||l_proc, 5);
230: --
231: -- Add any mandatory argument checking here:
232: -- Example:
233: -- hr_api.mandatory_arg_error

Line 245: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');

241: Close C_Sel1;
242: --
243: -- The primary key is invalid therefore we must error
244: --
245: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
246: hr_utility.raise_error;
247: End If;
248: Close C_Sel1;
249: If (p_object_version_number <> g_old_rec.object_version_number) Then

Line 246: hr_utility.raise_error;

242: --
243: -- The primary key is invalid therefore we must error
244: --
245: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
246: hr_utility.raise_error;
247: End If;
248: Close C_Sel1;
249: If (p_object_version_number <> g_old_rec.object_version_number) Then
250: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');

Line 250: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');

246: hr_utility.raise_error;
247: End If;
248: Close C_Sel1;
249: If (p_object_version_number <> g_old_rec.object_version_number) Then
250: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
251: hr_utility.raise_error;
252: End If;
253: --
254: hr_utility.set_location(' Leaving:'||l_proc, 10);

Line 251: hr_utility.raise_error;

247: End If;
248: Close C_Sel1;
249: If (p_object_version_number <> g_old_rec.object_version_number) Then
250: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
251: hr_utility.raise_error;
252: End If;
253: --
254: hr_utility.set_location(' Leaving:'||l_proc, 10);
255: --

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

250: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
251: hr_utility.raise_error;
252: End If;
253: --
254: hr_utility.set_location(' Leaving:'||l_proc, 10);
255: --
256: -- We need to trap the ORA LOCK exception
257: --
258: Exception

Line 264: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');

260: --
261: -- The object is locked therefore we need to supply a meaningful
262: -- error message.
263: --
264: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
265: hr_utility.set_message_token('TABLE_NAME', 'hr_summary');
266: hr_utility.raise_error;
267: End lck;
268: --

Line 265: hr_utility.set_message_token('TABLE_NAME', 'hr_summary');

261: -- The object is locked therefore we need to supply a meaningful
262: -- error message.
263: --
264: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
265: hr_utility.set_message_token('TABLE_NAME', 'hr_summary');
266: hr_utility.raise_error;
267: End lck;
268: --
269: -- ----------------------------------------------------------------------------

Line 266: hr_utility.raise_error;

262: -- error message.
263: --
264: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
265: hr_utility.set_message_token('TABLE_NAME', 'hr_summary');
266: hr_utility.raise_error;
267: End lck;
268: --
269: -- ----------------------------------------------------------------------------
270: -- |-----------------------------< convert_args >-----------------------------|

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

298: l_proc varchar2(72) := g_package||'convert_args';
299: --
300: Begin
301: --
302: hr_utility.set_location('Entering:'||l_proc, 5);
303: --
304: -- Convert arguments into local l_rec structure.
305: --
306: l_rec.type := p_type;

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

325: l_rec.date_value3 := p_date_value3;
326: --
327: -- Return the plsql record structure.
328: --
329: hr_utility.set_location(' Leaving:'||l_proc, 10);
330: Return(l_rec);
331: --
332: End convert_args;
333: --

Line 376: hr_utility.set_location('Entering: row_exist', 5);

372: l_dummy varchar2(1);
373: --
374: Begin
375: --
376: hr_utility.set_location('Entering: row_exist', 5);
377: --
378: open csr_exists;
379: fetch csr_exists into l_dummy;
380: --

Line 384: hr_utility.set_location('Leaving: row_exist', 10);

380: --
381: if csr_exists%found then
382: close csr_exists;
383: --
384: hr_utility.set_location('Leaving: row_exist', 10);
385: --
386: return true;
387: else
388: close csr_exists;

Line 390: hr_utility.set_location('Leaving: row_exist', 11);

386: return true;
387: else
388: close csr_exists;
389: --
390: hr_utility.set_location('Leaving: row_exist', 11);
391: --
392: return false;
393: end if;
394: --

Line 416: hr_utility.set_location('Entering: lookup_exist', 5);

412: l_dummy varchar2(1);
413: --
414: Begin
415: --
416: hr_utility.set_location('Entering: lookup_exist', 5);
417: --
418: open csr_lookup;
419: fetch csr_lookup into l_dummy;
420: --

Line 429: hr_utility.set_location('Leaving: lookup_exist', 10);

425: fnd_message.set_token('NAME',p_code);
426: fnd_message.raise_error;
427: end if;
428: --
429: hr_utility.set_location('Leaving: lookup_exist', 10);
430: --
431: End lookup_exists;
432: --
433: -- ----------------------------------------------------------------------------

Line 449: hr_utility.set_location('Entering: sequence_exist', 5);

445: l_dummy varchar2(1);
446: --
447: Begin
448: --
449: hr_utility.set_location('Entering: sequence_exist', 5);
450: --
451: open csr_exists;
452: fetch csr_exists into l_dummy;
453: --

Line 457: hr_utility.set_location('Leaving: row_exist', 10);

453: --
454: if csr_exists%found then
455: close csr_exists;
456: --
457: hr_utility.set_location('Leaving: row_exist', 10);
458: --
459: return true;
460: else
461: close csr_exists;

Line 463: hr_utility.set_location('Leaving: row_exist', 11);

459: return true;
460: else
461: close csr_exists;
462: --
463: hr_utility.set_location('Leaving: row_exist', 11);
464: --
465: return false;
466: end if;
467: --

Line 570: hr_utility.set_location('Entering: valid_value', 5);

566: test_csr TestCurTyp;
567: --
568: Begin
569: --
570: hr_utility.set_location('Entering: valid_value', 5);
571: --
572: open csr_lov_exists(p_rec.fk_value1,p_rec.business_group_id);
573: fetch csr_lov_exists into l_restriction_sql,l_rt_title;
574: if csr_lov_exists%found and l_restriction_sql is not null then

Line 606: hr_utility.set_location('Valid_Value: Parsing SQL', 10);

602: source_cursor := dbms_sql.open_cursor;
603: --
604: begin
605: l_restriction_sql := replace(l_restriction_sql,':ctl_globals.business_group_id',p_rec.business_group_id);
606: hr_utility.set_location('Valid_Value: Parsing SQL', 10);
607: dbms_sql.parse(source_cursor,l_restriction_sql,dbms_sql.v7);
608: hr_utility.set_location('Valid_Value: Defining_column', 15);
609: dbms_sql.define_column(source_cursor,1,l_value,100);
610: ignore := dbms_sql.execute(source_cursor);

Line 608: hr_utility.set_location('Valid_Value: Defining_column', 15);

604: begin
605: l_restriction_sql := replace(l_restriction_sql,':ctl_globals.business_group_id',p_rec.business_group_id);
606: hr_utility.set_location('Valid_Value: Parsing SQL', 10);
607: dbms_sql.parse(source_cursor,l_restriction_sql,dbms_sql.v7);
608: hr_utility.set_location('Valid_Value: Defining_column', 15);
609: dbms_sql.define_column(source_cursor,1,l_value,100);
610: ignore := dbms_sql.execute(source_cursor);
611: loop
612: if dbms_sql.fetch_rows(source_cursor) > 0 then

Line 613: hr_utility.set_location('Valid_Value: column_value', 20);

609: dbms_sql.define_column(source_cursor,1,l_value,100);
610: ignore := dbms_sql.execute(source_cursor);
611: loop
612: if dbms_sql.fetch_rows(source_cursor) > 0 then
613: hr_utility.set_location('Valid_Value: column_value', 20);
614: dbms_sql.column_value(source_cursor,1,l_value);
615: if l_value = p_rec.text_value1 then
616: l_found := true;
617: exit;

Line 638: hr_utility.set_location('Leaving: valid_value', 25);

634: else
635: close csr_lov_exists;
636: end if;
637: --
638: hr_utility.set_location('Leaving: valid_value', 25);
639: --
640: End valid_value;
641: --
642: -- ----------------------------------------------------------------------------

Line 666: hr_utility.set_location('Entered get_restriction_meaning',5);

662: test_csr TestCurTyp;
663: l_meaning varchar2(32000) := null;
664: --
665: BEGIN
666: hr_utility.set_location('Entered get_restriction_meaning',5);
667: open csr_get_sql;
668: fetch csr_get_sql into l_stmt, l_business_group_id;
669: close csr_get_sql;
670: --

Line 677: hr_utility.set_location('About to open cursor',17);

673: per_bil_shd.check_restriction_sql (p_stmt => l_stmt
674: ,p_business_group_id => l_business_group_id);
675: --
676: l_stmt := 'Select rs.meaning from (' || l_stmt || ') rs where rs.value = '''||p_value ||''' ';
677: hr_utility.set_location('About to open cursor',17);
678: open test_csr for l_stmt;
679: hr_utility.set_location('Opened cursor',20);
680: fetch test_csr into l_meaning;
681: hr_utility.set_location('fetched meaning:'||l_meaning,25);

Line 679: hr_utility.set_location('Opened cursor',20);

675: --
676: l_stmt := 'Select rs.meaning from (' || l_stmt || ') rs where rs.value = '''||p_value ||''' ';
677: hr_utility.set_location('About to open cursor',17);
678: open test_csr for l_stmt;
679: hr_utility.set_location('Opened cursor',20);
680: fetch test_csr into l_meaning;
681: hr_utility.set_location('fetched meaning:'||l_meaning,25);
682: close test_csr;
683: --

Line 681: hr_utility.set_location('fetched meaning:'||l_meaning,25);

677: hr_utility.set_location('About to open cursor',17);
678: open test_csr for l_stmt;
679: hr_utility.set_location('Opened cursor',20);
680: fetch test_csr into l_meaning;
681: hr_utility.set_location('fetched meaning:'||l_meaning,25);
682: close test_csr;
683: --
684: return l_meaning;
685: --

Line 689: hr_utility.set_location('meaning defaulted',50);

685: --
686: exception when others then
687: /* If the cursor cannot find the meaning, then display the value */
688: l_meaning := p_value;
689: hr_utility.set_location('meaning defaulted',50);
690: END get_restriction_meaning;
691: --
692: -- ----------------------------------------------------------------------------
693: -- |-------------------------------< parent_found >----------------------------|

Line 708: hr_utility.set_location('Entering: parent_found', 5);

704: l_found boolean := FALSE;
705: --
706: Begin
707: --
708: hr_utility.set_location('Entering: parent_found', 5);
709: --
710: if p_rec.fk_value1 is not null then
711: open csr_exists(p_rec.fk_value1);
712: fetch csr_exists into l_dummy;

Line 744: hr_utility.set_location('Leaving: parent_found', 10);

740: end if;
741: close csr_exists;
742: end if;
743: --
744: hr_utility.set_location('Leaving: parent_found', 10);
745: --
746: return l_found;
747: --
748: End parent_found;

Line 767: hr_utility.set_location('Entering: chk_valid_date', 5);

763: l_date date;
764: --
765: Begin
766: --
767: hr_utility.set_location('Entering: chk_valid_date', 5);
768: --
769: open csr_get_datatype;
770: fetch csr_get_datatype into l_datatype;
771: close csr_get_datatype;

Line 778: hr_utility.set_location('Leaving: chk_valid_date', 10);

774: into l_date
775: from dual;
776: end if;
777: --
778: hr_utility.set_location('Leaving: chk_valid_date', 10);
779: --
780: return(true);
781: Exception
782: When Others Then

Line 783: hr_utility.set_location('Leaving: chk_valid_date', 11);

779: --
780: return(true);
781: Exception
782: When Others Then
783: hr_utility.set_location('Leaving: chk_valid_date', 11);
784: return(false);
785: End chk_date_valid;
786: --
787: end per_bil_shd;