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

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

23: l_proc VARCHAR2(72) := g_package||'Chk_Unique';
24:
25: Begin
26: --
27: hr_utility.set_location('Entering:'||l_proc, 5);
28: --
29: SELECT NULL
30: INTO l_result
31: FROM PER_BUDGET_ELEMENTS E

Line 43: hr_utility.set_message(801,'PER_7231_BUDGET_UNIQUE_COMB');

39: AND NVL(E.TRAINING_PLAN_MEMBER_ID,-1) = NVL(X_Training_Plan_Member_Id,-1)
40: AND NVL(E.EVENT_ID,-1) = NVL(X_Event_Id,-1);
41:
42: IF (SQL%FOUND) then
43: hr_utility.set_message(801,'PER_7231_BUDGET_UNIQUE_COMB');
44: hr_utility.raise_error;
45: end if;
46: --
47: hr_utility.set_location(' Leaving:'||l_proc, 10);

Line 44: hr_utility.raise_error;

40: AND NVL(E.EVENT_ID,-1) = NVL(X_Event_Id,-1);
41:
42: IF (SQL%FOUND) then
43: hr_utility.set_message(801,'PER_7231_BUDGET_UNIQUE_COMB');
44: hr_utility.raise_error;
45: end if;
46: --
47: hr_utility.set_location(' Leaving:'||l_proc, 10);
48: --

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

43: hr_utility.set_message(801,'PER_7231_BUDGET_UNIQUE_COMB');
44: hr_utility.raise_error;
45: end if;
46: --
47: hr_utility.set_location(' Leaving:'||l_proc, 10);
48: --
49: EXCEPTION
50: when NO_DATA_FOUND then
51: null;

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

80: --
81:
82: BEGIN
83:
84: hr_utility.set_location(' Entering:'|| l_proc, 5);
85:
86: --
87: l_dyn_curs := dbms_sql.open_cursor;
88: --

Line 102: hr_utility.set_message(800,'PER_52877_TPID_NOT_EXISTS');

98: l_dyn_rows := dbms_sql.execute_and_fetch(l_dyn_curs);
99: --
100: if dbms_sql.last_row_count < 1 then
101: dbms_sql.close_cursor(l_dyn_curs);
102: hr_utility.set_message(800,'PER_52877_TPID_NOT_EXISTS');
103: hr_utility.raise_error;
104: end if;
105: end if;
106: if dbms_sql.is_open(l_dyn_curs) then

Line 103: hr_utility.raise_error;

99: --
100: if dbms_sql.last_row_count < 1 then
101: dbms_sql.close_cursor(l_dyn_curs);
102: hr_utility.set_message(800,'PER_52877_TPID_NOT_EXISTS');
103: hr_utility.raise_error;
104: end if;
105: end if;
106: if dbms_sql.is_open(l_dyn_curs) then
107: dbms_sql.close_cursor(l_dyn_curs);

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

106: if dbms_sql.is_open(l_dyn_curs) then
107: dbms_sql.close_cursor(l_dyn_curs);
108: end if;
109: --
110: hr_utility.set_location(' Leaving:'|| l_proc, 10);
111: --
112: END Chk_Training_Plan_Id;
113: --
114: --

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

147: --
148: --
149: BEGIN
150: --
151: hr_utility.set_location('Entering:'||l_proc, 5);
152:
153: --
154: l_dyn_curs := dbms_sql.open_cursor;
155: --

Line 168: hr_utility.set_message(800,'PER_52878_TPMID_NOT_EXISTS');

164: l_dyn_rows := dbms_sql.execute_and_fetch(l_dyn_curs);
165: --
166: if dbms_sql.last_row_count < 1 then
167: dbms_sql.close_cursor(l_dyn_curs);
168: hr_utility.set_message(800,'PER_52878_TPMID_NOT_EXISTS');
169: hr_utility.raise_error;
170: end if;
171: end if;
172: if dbms_sql.is_open(l_dyn_curs) then

Line 169: hr_utility.raise_error;

165: --
166: if dbms_sql.last_row_count < 1 then
167: dbms_sql.close_cursor(l_dyn_curs);
168: hr_utility.set_message(800,'PER_52878_TPMID_NOT_EXISTS');
169: hr_utility.raise_error;
170: end if;
171: end if;
172: if dbms_sql.is_open(l_dyn_curs) then
173: dbms_sql.close_cursor(l_dyn_curs);

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

172: if dbms_sql.is_open(l_dyn_curs) then
173: dbms_sql.close_cursor(l_dyn_curs);
174: end if;
175: --
176: hr_utility.set_location(' Leaving:'|| l_proc, 10);
177: --
178: END Chk_Training_Plan_Member_Id;
179: --
180: -- ----------------------------------------------------------------------------

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

185: l_result VARCHAR2(255);
186: l_proc VARCHAR2(72) := g_package||'Chk_Event_Id';
187: BEGIN
188: --
189: hr_utility.set_location('Entering:'||l_proc, 5);
190: --
191: SELECT NULL
192: INTO l_result
193: FROM OTA_EVENTS OE

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

193: FROM OTA_EVENTS OE
194: WHERE OE.Event_Id = X_Event_Id
195: AND OE.Business_Group_Id = X_Business_Group;
196: --
197: hr_utility.set_location(' Leaving:'||l_proc, 10);
198: --
199: EXCEPTION
200: when NO_DATA_FOUND then
201: hr_utility.set_message(800,'PER_52879_EID_NOT_EXISTS');

Line 201: hr_utility.set_message(800,'PER_52879_EID_NOT_EXISTS');

197: hr_utility.set_location(' Leaving:'||l_proc, 10);
198: --
199: EXCEPTION
200: when NO_DATA_FOUND then
201: hr_utility.set_message(800,'PER_52879_EID_NOT_EXISTS');
202: hr_utility.raise_error;
203:
204: END Chk_Event_Id;
205:

Line 202: hr_utility.raise_error;

198: --
199: EXCEPTION
200: when NO_DATA_FOUND then
201: hr_utility.set_message(800,'PER_52879_EID_NOT_EXISTS');
202: hr_utility.raise_error;
203:
204: END Chk_Event_Id;
205:
206: -- ----------------------------------------------------------------------------

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

211: l_result VARCHAR2(255);
212: l_proc VARCHAR2(72) := g_package||'chk_budget_element_id';
213: BEGIN
214: --
215: hr_utility.set_location('Entering:'||l_proc, 5);
216: --
217: SELECT NULL
218: INTO l_result
219: FROM per_budget_elements pge

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

219: FROM per_budget_elements pge
220: WHERE pge.budget_element_id = x_budget_element_id
221: AND (pge.rowid <> X_rowid OR X_rowid IS NULL);
222: --
223: hr_utility.set_location(' Leaving:'||l_proc, 10);
224: --
225: IF SQL%FOUND THEN
226: hr_utility.set_message(800,'PER_52880_BUD_ELE_EXISTS');
227: hr_utility.raise_error;

Line 226: hr_utility.set_message(800,'PER_52880_BUD_ELE_EXISTS');

222: --
223: hr_utility.set_location(' Leaving:'||l_proc, 10);
224: --
225: IF SQL%FOUND THEN
226: hr_utility.set_message(800,'PER_52880_BUD_ELE_EXISTS');
227: hr_utility.raise_error;
228: END IF;
229: --
230: EXCEPTION

Line 227: hr_utility.raise_error;

223: hr_utility.set_location(' Leaving:'||l_proc, 10);
224: --
225: IF SQL%FOUND THEN
226: hr_utility.set_message(800,'PER_52880_BUD_ELE_EXISTS');
227: hr_utility.raise_error;
228: END IF;
229: --
230: EXCEPTION
231: when NO_DATA_FOUND then

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

240: l_result VARCHAR2(255);
241: l_proc VARCHAR2(72) := g_package||'chk_grade_id';
242: BEGIN
243: --
244: hr_utility.set_location('Entering:'||l_proc, 5);
245: --
246:
247: SELECT NULL
248: INTO l_result

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

249: FROM per_grades pg
250: WHERE pg.grade_id = X_Grade_Id
251: AND pg.business_group_id = X_Business_Group;
252: --
253: hr_utility.set_location(' Leaving:'||l_proc, 10);
254: --
255:
256: EXCEPTION
257: when NO_DATA_FOUND then

Line 258: hr_utility.set_message(801,'HR_51082_GRADE_INVALID_BG');

254: --
255:
256: EXCEPTION
257: when NO_DATA_FOUND then
258: hr_utility.set_message(801,'HR_51082_GRADE_INVALID_BG');
259: hr_utility.raise_error;
260: END chk_grade_id;
261: --
262: -- ----------------------------------------------------------------------------

Line 259: hr_utility.raise_error;

255:
256: EXCEPTION
257: when NO_DATA_FOUND then
258: hr_utility.set_message(801,'HR_51082_GRADE_INVALID_BG');
259: hr_utility.raise_error;
260: END chk_grade_id;
261: --
262: -- ----------------------------------------------------------------------------
263: -- |----------------------< chk_job_id >-------------------------------|

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

268: l_result VARCHAR2(255);
269: l_proc VARCHAR2(72) := g_package||'chk_job_id';
270: BEGIN
271: --
272: hr_utility.set_location('Entering:'||l_proc, 5);
273: --
274:
275: SELECT NULL
276: INTO l_result

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

277: FROM per_jobs_v job
278: WHERE job.job_id = X_job_id
279: AND job.Business_Group_Id = X_Business_Group;
280: --
281: hr_utility.set_location(' Leaving:'||l_proc, 10);
282: --
283:
284: EXCEPTION
285: when NO_DATA_FOUND then

Line 286: hr_utility.set_message(801,'HR_51090_JOB_NOT_EXIST');

282: --
283:
284: EXCEPTION
285: when NO_DATA_FOUND then
286: hr_utility.set_message(801,'HR_51090_JOB_NOT_EXIST');
287: hr_utility.raise_error;
288: END chk_job_id;
289:
290: -- ----------------------------------------------------------------------------

Line 287: hr_utility.raise_error;

283:
284: EXCEPTION
285: when NO_DATA_FOUND then
286: hr_utility.set_message(801,'HR_51090_JOB_NOT_EXIST');
287: hr_utility.raise_error;
288: END chk_job_id;
289:
290: -- ----------------------------------------------------------------------------
291: -- |----------------------< chk_position_id >-------------------------------|

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

296: l_proc VARCHAR2(72) := g_package||'Chk_position_id';
297:
298: BEGIN
299: --
300: hr_utility.set_location('Entering:'||l_proc, 5);
301: --
302:
303: SELECT NULL
304: INTO l_result

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

306: WHERE pos.position_id = X_position_id
307: AND pos.Business_Group_Id = X_Business_Group;
308:
309: --
310: hr_utility.set_location(' Leaving:'||l_proc, 10);
311: --
312:
313: EXCEPTION
314: when NO_DATA_FOUND then

Line 315: hr_utility.set_message(801,'HR_51093_POS_INVALID_BG');

311: --
312:
313: EXCEPTION
314: when NO_DATA_FOUND then
315: hr_utility.set_message(801,'HR_51093_POS_INVALID_BG');
316: hr_utility.raise_error;
317:
318: END chk_position_id;
319:

Line 316: hr_utility.raise_error;

312:
313: EXCEPTION
314: when NO_DATA_FOUND then
315: hr_utility.set_message(801,'HR_51093_POS_INVALID_BG');
316: hr_utility.raise_error;
317:
318: END chk_position_id;
319:
320: -- ----------------------------------------------------------------------------

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

327: l_proc VARCHAR2(72) := g_package||'Chk_Organization_Id';
328:
329: BEGIN
330: --
331: hr_utility.set_location('Entering:'||l_proc, 5);
332: --
333:
334: SELECT NULL
335: INTO l_result

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

344: from per_budget_versions pbv
345: where pbv.budget_version_id = X_Budget_Version_Id);
346:
347: --
348: hr_utility.set_location(' Leaving:'||l_proc, 10);
349: --
350:
351: EXCEPTION
352: when NO_DATA_FOUND then

Line 353: hr_utility.set_message(801,'HR_51371_POS_ORG_NOT_EXIST');

349: --
350:
351: EXCEPTION
352: when NO_DATA_FOUND then
353: hr_utility.set_message(801,'HR_51371_POS_ORG_NOT_EXIST');
354: hr_utility.raise_error;
355:
356: END chk_organization_id;
357:

Line 354: hr_utility.raise_error;

350:
351: EXCEPTION
352: when NO_DATA_FOUND then
353: hr_utility.set_message(801,'HR_51371_POS_ORG_NOT_EXIST');
354: hr_utility.raise_error;
355:
356: END chk_organization_id;
357:
358: -- ----------------------------------------------------------------------------

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

364: l_result VARCHAR2(255);
365: l_proc VARCHAR2(72) := g_package||'chk_budget_version_id';
366: BEGIN
367: --
368: hr_utility.set_location('Entering:'||l_proc, 5);
369: --
370: SELECT null
371: INTO l_result
372: FROM per_budget_versions pbv

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

372: FROM per_budget_versions pbv
373: WHERE pbv.budget_version_id = X_budget_version_id
374: AND pbv.business_group_id = X_Business_Group;
375: --
376: hr_utility.set_location(' Leaving:'||l_proc, 10);
377: --
378: EXCEPTION
379: WHEN NO_DATA_FOUND THEN
380: hr_utility.set_message(800,'PER_52881_BUD_VER_NOT_EXISTS');

Line 380: hr_utility.set_message(800,'PER_52881_BUD_VER_NOT_EXISTS');

376: hr_utility.set_location(' Leaving:'||l_proc, 10);
377: --
378: EXCEPTION
379: WHEN NO_DATA_FOUND THEN
380: hr_utility.set_message(800,'PER_52881_BUD_VER_NOT_EXISTS');
381: hr_utility.raise_error;
382: WHEN TOO_MANY_ROWS THEN
383: null;
384:

Line 381: hr_utility.raise_error;

377: --
378: EXCEPTION
379: WHEN NO_DATA_FOUND THEN
380: hr_utility.set_message(800,'PER_52881_BUD_VER_NOT_EXISTS');
381: hr_utility.raise_error;
382: WHEN TOO_MANY_ROWS THEN
383: null;
384:
385: END chk_budget_version_id;

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

409: l_proc VARCHAR2(72) := g_package||'Insert_Row';
410:
411: BEGIN
412: --
413: hr_utility.set_location('Entering:'||l_proc, 5);
414: --
415: -- validate mandatory business_group
416: hr_api.validate_bus_grp_id(X_Business_Group_Id);
417:

Line 453: hr_utility.set_message(800,'PER_52882_TP_NOT_NULL');

449: IF per_budgets_pkg.chk_ota_budget_type(null,x_budget_version_id,null) THEN
450:
451: -- ensure one of training_plan_id, training_plan_member_id, event_id are set if OTA_BUDGET
452: IF x_training_plan_id IS NULL AND x_training_plan_member_id IS NULL AND x_event_id IS NULL THEN
453: hr_utility.set_message(800,'PER_52882_TP_NOT_NULL');
454: hr_utility.raise_error;
455: END IF;
456:
457: -- ensure x_training_plan_member_id is not null if x_event_id is set

Line 454: hr_utility.raise_error;

450:
451: -- ensure one of training_plan_id, training_plan_member_id, event_id are set if OTA_BUDGET
452: IF x_training_plan_id IS NULL AND x_training_plan_member_id IS NULL AND x_event_id IS NULL THEN
453: hr_utility.set_message(800,'PER_52882_TP_NOT_NULL');
454: hr_utility.raise_error;
455: END IF;
456:
457: -- ensure x_training_plan_member_id is not null if x_event_id is set
458: IF x_event_id IS NOT NULL AND x_training_plan_member_id IS NULL THEN

Line 459: hr_utility.set_message(800,'PER_52883_TPMID_NOT_NULL');

455: END IF;
456:
457: -- ensure x_training_plan_member_id is not null if x_event_id is set
458: IF x_event_id IS NOT NULL AND x_training_plan_member_id IS NULL THEN
459: hr_utility.set_message(800,'PER_52883_TPMID_NOT_NULL');
460: hr_utility.raise_error;
461: END IF;
462:
463: -- ensure x_training_plan_id is not null if x_training_plan_member_id is set

Line 460: hr_utility.raise_error;

456:
457: -- ensure x_training_plan_member_id is not null if x_event_id is set
458: IF x_event_id IS NOT NULL AND x_training_plan_member_id IS NULL THEN
459: hr_utility.set_message(800,'PER_52883_TPMID_NOT_NULL');
460: hr_utility.raise_error;
461: END IF;
462:
463: -- ensure x_training_plan_id is not null if x_training_plan_member_id is set
464: IF x_training_plan_member_id IS NOT NULL AND x_training_plan_id IS NULL THEN

Line 465: hr_utility.set_message(800,'PER_52884_TPID_NOT_NULL');

461: END IF;
462:
463: -- ensure x_training_plan_id is not null if x_training_plan_member_id is set
464: IF x_training_plan_member_id IS NOT NULL AND x_training_plan_id IS NULL THEN
465: hr_utility.set_message(800,'PER_52884_TPID_NOT_NULL');
466: hr_utility.raise_error;
467: END IF;
468:
469: -- validate event_id

Line 466: hr_utility.raise_error;

462:
463: -- ensure x_training_plan_id is not null if x_training_plan_member_id is set
464: IF x_training_plan_member_id IS NOT NULL AND x_training_plan_id IS NULL THEN
465: hr_utility.set_message(800,'PER_52884_TPID_NOT_NULL');
466: hr_utility.raise_error;
467: END IF;
468:
469: -- validate event_id
470: IF x_event_id IS NOT NULL THEN

Line 486: hr_utility.set_message(800,'PER_52885_TP_NULL');

482: END IF;
483:
484: -- raise error as these should not be set if 'HR_BUDGET' per_budgets is parent.
485: ELSIF x_training_plan_id IS NOT NULL OR x_training_plan_member_id IS NOT NULL OR x_event_id IS NOT NULL THEN
486: hr_utility.set_message(800,'PER_52885_TP_NULL');
487: hr_utility.raise_error;
488: END IF;
489:
490: -- check uniqueness of the record

Line 487: hr_utility.raise_error;

483:
484: -- raise error as these should not be set if 'HR_BUDGET' per_budgets is parent.
485: ELSIF x_training_plan_id IS NOT NULL OR x_training_plan_member_id IS NOT NULL OR x_event_id IS NOT NULL THEN
486: hr_utility.set_message(800,'PER_52885_TP_NULL');
487: hr_utility.raise_error;
488: END IF;
489:
490: -- check uniqueness of the record
491: Chk_Unique(X_Rowid,

Line 533: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');

529: OPEN C1;
530: FETCH C1 INTO X_Rowid;
531: if (C1%NOTFOUND) then
532: CLOSE C1;
533: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
534: hr_utility.set_message_token('PROCEDURE','Insert_Row');
535: hr_utility.set_message_token('STEP','1');
536: hr_utility.raise_error;
537: end if;

Line 534: hr_utility.set_message_token('PROCEDURE','Insert_Row');

530: FETCH C1 INTO X_Rowid;
531: if (C1%NOTFOUND) then
532: CLOSE C1;
533: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
534: hr_utility.set_message_token('PROCEDURE','Insert_Row');
535: hr_utility.set_message_token('STEP','1');
536: hr_utility.raise_error;
537: end if;
538: CLOSE C1;

Line 535: hr_utility.set_message_token('STEP','1');

531: if (C1%NOTFOUND) then
532: CLOSE C1;
533: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
534: hr_utility.set_message_token('PROCEDURE','Insert_Row');
535: hr_utility.set_message_token('STEP','1');
536: hr_utility.raise_error;
537: end if;
538: CLOSE C1;
539: --

Line 536: hr_utility.raise_error;

532: CLOSE C1;
533: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
534: hr_utility.set_message_token('PROCEDURE','Insert_Row');
535: hr_utility.set_message_token('STEP','1');
536: hr_utility.raise_error;
537: end if;
538: CLOSE C1;
539: --
540: hr_utility.set_location(' Leaving:'||l_proc, 10);

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

536: hr_utility.raise_error;
537: end if;
538: CLOSE C1;
539: --
540: hr_utility.set_location(' Leaving:'||l_proc, 10);
541: --
542: END Insert_Row;
543: --
544: -- ----------------------------------------------------------------------------

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

564: Recinfo C%ROWTYPE;
565: l_proc VARCHAR2(72) := g_package||'Lock_Row';
566: BEGIN
567: --
568: hr_utility.set_location('Entering:'||l_proc, 5);
569: --
570: OPEN C;
571: FETCH C INTO Recinfo;
572: if (C%NOTFOUND) then

Line 574: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');

570: OPEN C;
571: FETCH C INTO Recinfo;
572: if (C%NOTFOUND) then
573: CLOSE C;
574: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
575: hr_utility.set_message_token('PROCEDURE','Lock_Row');
576: hr_utility.set_message_token('STEP','1');
577: hr_utility.raise_error;
578: end if;

Line 575: hr_utility.set_message_token('PROCEDURE','Lock_Row');

571: FETCH C INTO Recinfo;
572: if (C%NOTFOUND) then
573: CLOSE C;
574: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
575: hr_utility.set_message_token('PROCEDURE','Lock_Row');
576: hr_utility.set_message_token('STEP','1');
577: hr_utility.raise_error;
578: end if;
579: CLOSE C;

Line 576: hr_utility.set_message_token('STEP','1');

572: if (C%NOTFOUND) then
573: CLOSE C;
574: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
575: hr_utility.set_message_token('PROCEDURE','Lock_Row');
576: hr_utility.set_message_token('STEP','1');
577: hr_utility.raise_error;
578: end if;
579: CLOSE C;
580: if (

Line 577: hr_utility.raise_error;

573: CLOSE C;
574: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
575: hr_utility.set_message_token('PROCEDURE','Lock_Row');
576: hr_utility.set_message_token('STEP','1');
577: hr_utility.raise_error;
578: end if;
579: CLOSE C;
580: if (
581: ( (Recinfo.budget_element_id = X_Budget_Element_Id)

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

614: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
615: APP_EXCEPTION.RAISE_EXCEPTION;
616: end if;
617: --
618: hr_utility.set_location(' Leaving:'||l_proc, 10);
619: --
620: END Lock_Row;
621: --
622: -- ----------------------------------------------------------------------------

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

638: l_proc VARCHAR2(72) := g_package||'Update_Row';
639:
640: BEGIN
641: --
642: hr_utility.set_location('Entering:'||l_proc, 5);
643: --
644: -- validate mandatory business_group
645: hr_api.validate_bus_grp_id(X_Business_Group_Id);
646:

Line 695: hr_utility.set_message(800,'PER_52882_TP_NOT_NULL');

691: IF per_budgets_pkg.chk_ota_budget_type(null,x_budget_version_id,null) THEN
692:
693: -- ensure one of training_plan_id, training_plan_member_id, event_id are set if OTA_BUDGET
694: IF x_training_plan_id IS NULL AND x_training_plan_member_id IS NULL AND x_event_id IS NULL THEN
695: hr_utility.set_message(800,'PER_52882_TP_NOT_NULL');
696: hr_utility.raise_error;
697: END IF;
698:
699: -- ensure x_training_plan_member_id is not null if x_event_id is set

Line 696: hr_utility.raise_error;

692:
693: -- ensure one of training_plan_id, training_plan_member_id, event_id are set if OTA_BUDGET
694: IF x_training_plan_id IS NULL AND x_training_plan_member_id IS NULL AND x_event_id IS NULL THEN
695: hr_utility.set_message(800,'PER_52882_TP_NOT_NULL');
696: hr_utility.raise_error;
697: END IF;
698:
699: -- ensure x_training_plan_member_id is not null if x_event_id is set
700: IF x_event_id IS NOT NULL AND x_training_plan_member_id IS NULL THEN

Line 701: hr_utility.set_message(800,'PER_52883_TPMID_NOT_NULL');

697: END IF;
698:
699: -- ensure x_training_plan_member_id is not null if x_event_id is set
700: IF x_event_id IS NOT NULL AND x_training_plan_member_id IS NULL THEN
701: hr_utility.set_message(800,'PER_52883_TPMID_NOT_NULL');
702: hr_utility.raise_error;
703: END IF;
704:
705: -- ensure x_training_plan_id is not null if x_training_plan_member_id is set

Line 702: hr_utility.raise_error;

698:
699: -- ensure x_training_plan_member_id is not null if x_event_id is set
700: IF x_event_id IS NOT NULL AND x_training_plan_member_id IS NULL THEN
701: hr_utility.set_message(800,'PER_52883_TPMID_NOT_NULL');
702: hr_utility.raise_error;
703: END IF;
704:
705: -- ensure x_training_plan_id is not null if x_training_plan_member_id is set
706: IF x_training_plan_member_id IS NOT NULL AND x_training_plan_id IS NULL THEN

Line 707: hr_utility.set_message(800,'PER_52884_TPID_NOT_NULL');

703: END IF;
704:
705: -- ensure x_training_plan_id is not null if x_training_plan_member_id is set
706: IF x_training_plan_member_id IS NOT NULL AND x_training_plan_id IS NULL THEN
707: hr_utility.set_message(800,'PER_52884_TPID_NOT_NULL');
708: hr_utility.raise_error;
709: END IF;
710:
711: -- validate event_id

Line 708: hr_utility.raise_error;

704:
705: -- ensure x_training_plan_id is not null if x_training_plan_member_id is set
706: IF x_training_plan_member_id IS NOT NULL AND x_training_plan_id IS NULL THEN
707: hr_utility.set_message(800,'PER_52884_TPID_NOT_NULL');
708: hr_utility.raise_error;
709: END IF;
710:
711: -- validate event_id
712: IF x_event_id IS NOT NULL THEN

Line 728: hr_utility.set_message(800,'PER_52885_TP_NULL');

724: END IF;
725:
726: -- raise error as these should not be set if 'HR_BUDGET' per_budgets is parent.
727: ELSIF x_training_plan_id IS NOT NULL OR x_training_plan_member_id IS NOT NULL OR x_event_id IS NOT NULL THEN
728: hr_utility.set_message(800,'PER_52885_TP_NULL');
729: hr_utility.raise_error;
730: END IF;
731:
732: -- check uniqueness of the record

Line 729: hr_utility.raise_error;

725:
726: -- raise error as these should not be set if 'HR_BUDGET' per_budgets is parent.
727: ELSIF x_training_plan_id IS NOT NULL OR x_training_plan_member_id IS NOT NULL OR x_event_id IS NOT NULL THEN
728: hr_utility.set_message(800,'PER_52885_TP_NULL');
729: hr_utility.raise_error;
730: END IF;
731:
732: -- check uniqueness of the record
733: Chk_Unique(X_Rowid,

Line 759: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');

755: event_id = X_Event_Id
756: WHERE rowid = X_rowid;
757:
758: if (SQL%NOTFOUND) then
759: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
760: hr_utility.set_message_token('PROCEDURE','Update_Row');
761: hr_utility.set_message_token('STEP','1');
762: hr_utility.raise_error;
763: end if;

Line 760: hr_utility.set_message_token('PROCEDURE','Update_Row');

756: WHERE rowid = X_rowid;
757:
758: if (SQL%NOTFOUND) then
759: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
760: hr_utility.set_message_token('PROCEDURE','Update_Row');
761: hr_utility.set_message_token('STEP','1');
762: hr_utility.raise_error;
763: end if;
764: --

Line 761: hr_utility.set_message_token('STEP','1');

757:
758: if (SQL%NOTFOUND) then
759: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
760: hr_utility.set_message_token('PROCEDURE','Update_Row');
761: hr_utility.set_message_token('STEP','1');
762: hr_utility.raise_error;
763: end if;
764: --
765: hr_utility.set_location(' Leaving:'||l_proc, 10);

Line 762: hr_utility.raise_error;

758: if (SQL%NOTFOUND) then
759: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
760: hr_utility.set_message_token('PROCEDURE','Update_Row');
761: hr_utility.set_message_token('STEP','1');
762: hr_utility.raise_error;
763: end if;
764: --
765: hr_utility.set_location(' Leaving:'||l_proc, 10);
766: --

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

761: hr_utility.set_message_token('STEP','1');
762: hr_utility.raise_error;
763: end if;
764: --
765: hr_utility.set_location(' Leaving:'||l_proc, 10);
766: --
767: END Update_Row;
768:
769: -- ----------------------------------------------------------------------------

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

783: l_budget_version_id NUMBER(15);
784: --
785: BEGIN
786: --
787: hr_utility.set_location('Entering:'||l_proc, 5);
788: --
789: SELECT budget_version_id into l_budget_version_id
790: FROM per_budget_elements pbe
791: WHERE pbe.rowid = x_rowid;

Line 807: hr_utility.set_message(800,'PER_52886_BUD_VAL_DELETE_FAIL');

803: FETCH C_Values into l_val_rowid;
804: IF C_Values%FOUND THEN
805: CLOSE C_Values;
806: --raise error as child record has been found
807: hr_utility.set_message(800,'PER_52886_BUD_VAL_DELETE_FAIL');
808: hr_utility.raise_error;
809: END IF;
810: END IF;
811: CLOSE C_Values;

Line 808: hr_utility.raise_error;

804: IF C_Values%FOUND THEN
805: CLOSE C_Values;
806: --raise error as child record has been found
807: hr_utility.set_message(800,'PER_52886_BUD_VAL_DELETE_FAIL');
808: hr_utility.raise_error;
809: END IF;
810: END IF;
811: CLOSE C_Values;
812: --

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

813: --now delete the parent element
814: DELETE FROM PER_BUDGET_ELEMENTS
815: WHERE rowid = X_Rowid;
816: --
817: hr_utility.set_location(' Leaving:'||l_proc, 10);
818: --
819: EXCEPTION
820: WHEN NO_DATA_FOUND THEN
821: hr_utility.set_message(800,'PER_52881_BUD_VER_NOT_EXISTS');

Line 821: hr_utility.set_message(800,'PER_52881_BUD_VER_NOT_EXISTS');

817: hr_utility.set_location(' Leaving:'||l_proc, 10);
818: --
819: EXCEPTION
820: WHEN NO_DATA_FOUND THEN
821: hr_utility.set_message(800,'PER_52881_BUD_VER_NOT_EXISTS');
822: hr_utility.raise_error;
823: END Delete_Row;
824:
825: END PER_BUDGET_ELEMENTS_PKG;

Line 822: hr_utility.raise_error;

818: --
819: EXCEPTION
820: WHEN NO_DATA_FOUND THEN
821: hr_utility.set_message(800,'PER_52881_BUD_VER_NOT_EXISTS');
822: hr_utility.raise_error;
823: END Delete_Row;
824:
825: END PER_BUDGET_ELEMENTS_PKG;