DBA Data[Home] [Help]

APPS.HR_PSF_DEL dependencies on HR_UTILITY

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

55: --
56: Begin
57: if g_debug then
58: l_proc := g_package||'dt_delete_dml';
59: hr_utility.set_location('Entering:'||l_proc, 5);
60: end if;
61: If (p_datetrack_mode = 'DELETE_NEXT_CHANGE') then
62: if g_debug then
63: hr_utility.set_location(l_proc, 10);

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

59: hr_utility.set_location('Entering:'||l_proc, 5);
60: end if;
61: If (p_datetrack_mode = 'DELETE_NEXT_CHANGE') then
62: if g_debug then
63: hr_utility.set_location(l_proc, 10);
64: end if;
65: --
66: -- Delete the where the effective start date is equal
67: -- to the validation end date.

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

71: and effective_start_date = p_validation_start_date;
72: --
73: Else
74: if g_debug then
75: hr_utility.set_location(l_proc, 15);
76: end if;
77: --
78: -- Delete the row(s) where the effective start date is greater than
79: -- or equal to the validation start date.

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

84: --
85: End If;
86: --
87: if g_debug then
88: hr_utility.set_location(' Leaving:'||l_proc, 20);
89: end if;
90: --
91: Exception
92: When Others Then

Line 109: g_debug := hr_utility.debug_enabled;

105: --
106: l_proc varchar2(72) ;
107: --
108: Begin
109: g_debug := hr_utility.debug_enabled;
110: if g_debug then
111: l_proc := g_package||'delete_dml';
112: hr_utility.set_location('Entering:'||l_proc, 5);
113: end if;

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

108: Begin
109: g_debug := hr_utility.debug_enabled;
110: if g_debug then
111: l_proc := g_package||'delete_dml';
112: hr_utility.set_location('Entering:'||l_proc, 5);
113: end if;
114: --
115: dt_delete_dml(p_rec => p_rec,
116: p_effective_date => p_effective_date,

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

118: p_validation_start_date => p_validation_start_date,
119: p_validation_end_date => p_validation_end_date);
120: --
121: if g_debug then
122: hr_utility.set_location(' Leaving:'||l_proc, 10);
123: end if;
124: End delete_dml;
125: --
126: -- ----------------------------------------------------------------------------

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

167: --
168: Begin
169: if g_debug then
170: l_proc := g_package||'dt_pre_delete';
171: hr_utility.set_location('Entering:'||l_proc, 5);
172: end if;
173: --
174: If (p_datetrack_mode <> 'ZAP') then
175: --

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

194: p_rec.effective_start_date := null;
195: p_rec.effective_end_date := null;
196: End If;
197: if g_debug then
198: hr_utility.set_location(' Leaving:'||l_proc, 10);
199: end if;
200: End dt_pre_delete;
201: --
202: --

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

219:
220: begin
221: if g_debug then
222: l_proc := g_package||'pre_delete_checks';
223: hr_utility.set_location('Entering : ' || l_proc, 10);
224: end if;
225: if p_datetrack_mode = 'ZAP' then
226: if g_debug then
227: hr_utility.set_location(l_proc, 20);

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

223: hr_utility.set_location('Entering : ' || l_proc, 10);
224: end if;
225: if p_datetrack_mode = 'ZAP' then
226: if g_debug then
227: hr_utility.set_location(l_proc, 20);
228: end if;
229: l_exists := NULL;
230: -- if p_hr_ins = 'Y' then
231: l_exists := NULL;

Line 243: hr_utility.set_message(800,'HR_PSF_DEL_FAIL_BGT_ELE');

239: exception when no_data_found then
240: null;
241: end;
242: if l_exists = '1' then
243: hr_utility.set_message(800,'HR_PSF_DEL_FAIL_BGT_ELE');
244: hr_utility.raise_error;
245: end if;
246: l_exists := NULL;
247: if g_debug then

Line 244: hr_utility.raise_error;

240: null;
241: end;
242: if l_exists = '1' then
243: hr_utility.set_message(800,'HR_PSF_DEL_FAIL_BGT_ELE');
244: hr_utility.raise_error;
245: end if;
246: l_exists := NULL;
247: if g_debug then
248: hr_utility.set_location(l_proc, 30);

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

244: hr_utility.raise_error;
245: end if;
246: l_exists := NULL;
247: if g_debug then
248: hr_utility.set_location(l_proc, 30);
249: end if;
250: begin
251: select '1'
252: into l_exists

Line 261: hr_utility.set_message(800,'PER_7861_DEL_POS_REC_ACT');

257: exception when no_data_found then
258: null;
259: end;
260: if l_exists = '1' then
261: hr_utility.set_message(800,'PER_7861_DEL_POS_REC_ACT');
262: hr_utility.raise_error;
263: end if;
264: if g_debug then
265: hr_utility.set_location(l_proc, 40);

Line 262: hr_utility.raise_error;

258: null;
259: end;
260: if l_exists = '1' then
261: hr_utility.set_message(800,'PER_7861_DEL_POS_REC_ACT');
262: hr_utility.raise_error;
263: end if;
264: if g_debug then
265: hr_utility.set_location(l_proc, 40);
266: end if;

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

261: hr_utility.set_message(800,'PER_7861_DEL_POS_REC_ACT');
262: hr_utility.raise_error;
263: end if;
264: if g_debug then
265: hr_utility.set_location(l_proc, 40);
266: end if;
267: /****** Commented for bug 9146790 ********
268: begin
269: select e.pos_structure_element_id

Line 288: hr_utility.set_location(l_proc, 50);

284: ****** Commented for bug 9146790 ********/
285:
286: l_exists := NULL;
287: if g_debug then
288: hr_utility.set_location(l_proc, 50);
289: end if;
290: --if l_pos_structure_element_id is null then -- condition removed (Bug 9146790)
291: begin
292: select '1'

Line 303: hr_utility.set_location(l_proc, 60);

299: exception when no_data_found then
300: null;
301: end;
302: if g_debug then
303: hr_utility.set_location(l_proc, 60);
304: end if;
305: if l_exists = '1' then
306: hr_utility.set_message(800,'PER_7416_POS_IN_POS_HIER');
307: hr_utility.raise_error;

Line 306: hr_utility.set_message(800,'PER_7416_POS_IN_POS_HIER');

302: if g_debug then
303: hr_utility.set_location(l_proc, 60);
304: end if;
305: if l_exists = '1' then
306: hr_utility.set_message(800,'PER_7416_POS_IN_POS_HIER');
307: hr_utility.raise_error;
308: end if;
309: -- end if; -- Bug 9146790
310: l_exists := NULL;

Line 307: hr_utility.raise_error;

303: hr_utility.set_location(l_proc, 60);
304: end if;
305: if l_exists = '1' then
306: hr_utility.set_message(800,'PER_7416_POS_IN_POS_HIER');
307: hr_utility.raise_error;
308: end if;
309: -- end if; -- Bug 9146790
310: l_exists := NULL;
311: if g_debug then

Line 312: hr_utility.set_location(l_proc, 70);

308: end if;
309: -- end if; -- Bug 9146790
310: l_exists := NULL;
311: if g_debug then
312: hr_utility.set_location(l_proc, 70);
313: end if;
314: begin
315: select '1'
316: into l_exists

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

322: exception when no_data_found then
323: null;
324: end;
325: if g_debug then
326: hr_utility.set_location(l_proc, 80);
327: end if;
328: if l_exists = '1' then
329: hr_utility.set_message(801,'PER_7865_DEF_POS_DEL_GRADE');
330: hr_utility.raise_error;

Line 329: hr_utility.set_message(801,'PER_7865_DEF_POS_DEL_GRADE');

325: if g_debug then
326: hr_utility.set_location(l_proc, 80);
327: end if;
328: if l_exists = '1' then
329: hr_utility.set_message(801,'PER_7865_DEF_POS_DEL_GRADE');
330: hr_utility.raise_error;
331: end if;
332: l_exists := NULL;
333: if g_debug then

Line 330: hr_utility.raise_error;

326: hr_utility.set_location(l_proc, 80);
327: end if;
328: if l_exists = '1' then
329: hr_utility.set_message(801,'PER_7865_DEF_POS_DEL_GRADE');
330: hr_utility.raise_error;
331: end if;
332: l_exists := NULL;
333: if g_debug then
334: hr_utility.set_location(l_proc, 90);

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

330: hr_utility.raise_error;
331: end if;
332: l_exists := NULL;
333: if g_debug then
334: hr_utility.set_location(l_proc, 90);
335: end if;
336: begin
337: select '1'
338: into l_exists

Line 347: hr_utility.set_message(801,'PER_7866_DEF_POS_DEL_REQ');

343: exception when no_data_found then
344: null;
345: end;
346: if l_exists = '1' then
347: hr_utility.set_message(801,'PER_7866_DEF_POS_DEL_REQ');
348: hr_utility.raise_error;
349: end if;
350: l_exists := NULL;
351: if g_debug then

Line 348: hr_utility.raise_error;

344: null;
345: end;
346: if l_exists = '1' then
347: hr_utility.set_message(801,'PER_7866_DEF_POS_DEL_REQ');
348: hr_utility.raise_error;
349: end if;
350: l_exists := NULL;
351: if g_debug then
352: hr_utility.set_location(l_proc, 100);

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

348: hr_utility.raise_error;
349: end if;
350: l_exists := NULL;
351: if g_debug then
352: hr_utility.set_location(l_proc, 100);
353: end if;
354: begin
355: select '1'
356: into l_exists

Line 365: hr_utility.set_message(801,'PER_7867_DEF_POS_DEL_EVAL');

361: exception when no_data_found then
362: null;
363: end;
364: if l_exists = '1' then
365: hr_utility.set_message(801,'PER_7867_DEF_POS_DEL_EVAL');
366: hr_utility.raise_error;
367: end if;
368:
369: l_exists := NULL;

Line 366: hr_utility.raise_error;

362: null;
363: end;
364: if l_exists = '1' then
365: hr_utility.set_message(801,'PER_7867_DEF_POS_DEL_EVAL');
366: hr_utility.raise_error;
367: end if;
368:
369: l_exists := NULL;
370: if g_debug then

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

367: end if;
368:
369: l_exists := NULL;
370: if g_debug then
371: hr_utility.set_location(l_proc, 110);
372: end if;
373: begin
374: select '1'
375: into l_exists

Line 385: hr_utility.set_message(801,'PER_7996_POS_SUCCESSOR_REF');

381: null;
382: end;
383:
384: if l_exists = '1' then
385: hr_utility.set_message(801,'PER_7996_POS_SUCCESSOR_REF');
386: hr_utility.raise_error;
387: end if;
388:
389: l_exists := NULL;

Line 386: hr_utility.raise_error;

382: end;
383:
384: if l_exists = '1' then
385: hr_utility.set_message(801,'PER_7996_POS_SUCCESSOR_REF');
386: hr_utility.raise_error;
387: end if;
388:
389: l_exists := NULL;
390: if g_debug then

Line 391: hr_utility.set_location(l_proc, 120);

387: end if;
388:
389: l_exists := NULL;
390: if g_debug then
391: hr_utility.set_location(l_proc, 120);
392: end if;
393:
394: begin
395: select '1'

Line 406: hr_utility.set_message(801,'PER_7997_POS_RELIEF_REF');

402: null;
403: end;
404:
405: if l_exists = '1' then
406: hr_utility.set_message(801,'PER_7997_POS_RELIEF_REF');
407: hr_utility.raise_error;
408: end if;
409:
410: l_exists := NULL;

Line 407: hr_utility.raise_error;

403: end;
404:
405: if l_exists = '1' then
406: hr_utility.set_message(801,'PER_7997_POS_RELIEF_REF');
407: hr_utility.raise_error;
408: end if;
409:
410: l_exists := NULL;
411: if g_debug then

Line 412: hr_utility.set_location(l_proc, 130);

408: end if;
409:
410: l_exists := NULL;
411: if g_debug then
412: hr_utility.set_location(l_proc, 130);
413: end if;
414:
415: begin
416: select '1'

Line 427: hr_utility.set_message(800,'HR_52776_NOT_DEL_MM_POSITIONS');

423: null;
424: end;
425:
426: if l_exists = '1' then
427: hr_utility.set_message(800,'HR_52776_NOT_DEL_MM_POSITIONS');
428: hr_utility.raise_error;
429: end if;
430: if g_debug then
431: hr_utility.set_location(l_proc, 140);

Line 428: hr_utility.raise_error;

424: end;
425:
426: if l_exists = '1' then
427: hr_utility.set_message(800,'HR_52776_NOT_DEL_MM_POSITIONS');
428: hr_utility.raise_error;
429: end if;
430: if g_debug then
431: hr_utility.set_location(l_proc, 140);
432: end if;

Line 431: hr_utility.set_location(l_proc, 140);

427: hr_utility.set_message(800,'HR_52776_NOT_DEL_MM_POSITIONS');
428: hr_utility.raise_error;
429: end if;
430: if g_debug then
431: hr_utility.set_location(l_proc, 140);
432: end if;
433:
434: -- end if;
435: -- fix for bug 8439584

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

461: -- Open Cursor for Processing Sql statment.
462: --
463: -- fix for bug 8439584
464: if g_debug then
465: hr_utility.set_location(l_proc, 150);
466: end if;
467: l_sql_cursor := dbms_sql.open_cursor;
468: --
469: -- Parse SQL statement.

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

472: --
473: -- Map the local variables to each returned Column
474: --
475: if g_debug then
476: hr_utility.set_location(l_proc, 160);
477: end if;
478: dbms_sql.define_column(l_sql_cursor, 1,l_oci_out,1);
479: --
480: -- Execute the SQL statement.

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

479: --
480: -- Execute the SQL statement.
481: --
482: if g_debug then
483: hr_utility.set_location(l_proc, 170);
484: end if;
485: l_rows_fetched := dbms_sql.execute(l_sql_cursor);
486: --
487: if (dbms_sql.fetch_rows(l_sql_cursor) > 0)

Line 489: hr_utility.set_message(800,'HR_6048_PO_POS_DEL_POS_CONT');

485: l_rows_fetched := dbms_sql.execute(l_sql_cursor);
486: --
487: if (dbms_sql.fetch_rows(l_sql_cursor) > 0)
488: then
489: hr_utility.set_message(800,'HR_6048_PO_POS_DEL_POS_CONT');
490: hr_utility.raise_error;
491: end if;
492: --
493: -- Close cursor used for processing SQL statement.

Line 490: hr_utility.raise_error;

486: --
487: if (dbms_sql.fetch_rows(l_sql_cursor) > 0)
488: then
489: hr_utility.set_message(800,'HR_6048_PO_POS_DEL_POS_CONT');
490: hr_utility.raise_error;
491: end if;
492: --
493: -- Close cursor used for processing SQL statement.
494: --

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

493: -- Close cursor used for processing SQL statement.
494: --
495: dbms_sql.close_cursor(l_sql_cursor);
496: if g_debug then
497: hr_utility.set_location(l_proc, 180);
498: end if;
499: end;
500: -- end if;
501: --

Line 506: hr_utility.set_location('Leaving : ' || l_proc, 300);

502: -- Ref Int check for OTA.
503: --
504: per_ota_predel_validation.ota_predel_pos_validation(p_position_id);
505: if g_debug then
506: hr_utility.set_location('Leaving : ' || l_proc, 300);
507: end if;
508: --
509: end if;
510: end pre_delete_checks;

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

556: where position_id = p_rec.position_id;
557: Begin
558: if g_debug then
559: l_proc := g_package||'pre_delete';
560: hr_utility.set_location('Entering:'||l_proc, 5);
561: end if;
562: -- pre delete checks
563: pre_delete_checks(p_position_id => p_rec.position_id
564: ,p_business_group_id => p_rec.business_group_id

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

595: p_validation_start_date => p_validation_start_date,
596: p_validation_end_date => p_validation_end_date);
597: --
598: if g_debug then
599: hr_utility.set_location(' Leaving:'||l_proc, 10);
600: end if;
601: End pre_delete;
602: --
603: -- ----------------------------------------------------------------------------

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

644: Begin
645: if g_debug then
646: l_proc := g_package||'post_delete';
647: --
648: hr_utility.set_location('Entering:'||l_proc, 5);
649: end if;
650: --
651: -- User Hook
652: --

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

800: , p_eff_start_date => p_rec.effective_start_date
801: , p_eff_end_date => p_rec.effective_end_date );
802: --
803: if g_debug then
804: hr_utility.set_location(' Leaving:'||l_proc, 10);
805: end if;
806: End post_delete;
807: --
808: -- ----------------------------------------------------------------------------

Line 829: g_debug := hr_utility.debug_enabled;

825: from hr_all_positions_f
826: where position_id = p_rec.position_id;
827: --
828: Begin
829: g_debug := hr_utility.debug_enabled;
830: if g_debug then
831: l_proc := g_package||'del';
832: hr_utility.set_location('Entering:'||l_proc, 5);
833: end if;

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

828: Begin
829: g_debug := hr_utility.debug_enabled;
830: if g_debug then
831: l_proc := g_package||'del';
832: hr_utility.set_location('Entering:'||l_proc, 5);
833: end if;
834: --
835: -- Ensure that the DateTrack delete mode is valid
836: --

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

906: Raise HR_Api.Validate_Enabled;
907: End If;
908: --
909: if g_debug then
910: hr_utility.set_location(' Leaving:'||l_proc, 10);
911: end if;
912:
913: Exception
914: When HR_Api.Validate_Enabled Then

Line 941: g_debug := hr_utility.debug_enabled;

937: l_rec hr_psf_shd.g_rec_type;
938: l_proc varchar2(72);
939: --
940: Begin
941: g_debug := hr_utility.debug_enabled;
942: if g_debug then
943: l_proc := g_package||'del';
944: hr_utility.set_location('Entering:'||l_proc, 5);
945: end if;

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

940: Begin
941: g_debug := hr_utility.debug_enabled;
942: if g_debug then
943: l_proc := g_package||'del';
944: hr_utility.set_location('Entering:'||l_proc, 5);
945: end if;
946: --
947: -- As the delete procedure accepts a plsql record structure we do need to
948: -- convert the arguments into the record structure.

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

966: p_effective_start_date := l_rec.effective_start_date;
967: p_effective_end_date := l_rec.effective_end_date;
968: --
969: if g_debug then
970: hr_utility.set_location(' Leaving:'||l_proc, 10);
971: end if;
972: End del;
973:
974: end hr_psf_del;