DBA Data[Home] [Help]

APPS.OTA_PMM_UPD dependencies on OTA_PMM_SHD

Line 54: Procedure update_dml(p_rec in out ota_pmm_shd.g_rec_type) is

50: -- Internal Development Use Only.
51: --
52: -- {End Of Comments}
53: -- ----------------------------------------------------------------------------
54: Procedure update_dml(p_rec in out ota_pmm_shd.g_rec_type) is
55: --
56: l_proc varchar2(72) := g_package||'update_dml';
57: --
58: Begin

Line 65: ota_pmm_shd.g_api_dml := true; -- Set the api dml status

61: -- Increment the object version
62: --
63: p_rec.object_version_number := p_rec.object_version_number + 1;
64: --
65: ota_pmm_shd.g_api_dml := true; -- Set the api dml status
66: --
67: -- Update the ota_program_memberships Row
68: --
69: update ota_program_memberships

Line 103: ota_pmm_shd.g_api_dml := false; -- Unset the api dml status

99: pmm_information19 = p_rec.pmm_information19,
100: pmm_information20 = p_rec.pmm_information20
101: where program_membership_id = p_rec.program_membership_id;
102: --
103: ota_pmm_shd.g_api_dml := false; -- Unset the api dml status
104: --
105: hr_utility.set_location(' Leaving:'||l_proc, 10);
106: --
107: Exception

Line 110: ota_pmm_shd.g_api_dml := false; -- Unset the api dml status

106: --
107: Exception
108: When hr_api.check_integrity_violated Then
109: -- A check constraint has been violated
110: ota_pmm_shd.g_api_dml := false; -- Unset the api dml status
111: ota_pmm_shd.constraint_error
112: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
113: When hr_api.parent_integrity_violated Then
114: -- Parent integrity has been violated

Line 111: ota_pmm_shd.constraint_error

107: Exception
108: When hr_api.check_integrity_violated Then
109: -- A check constraint has been violated
110: ota_pmm_shd.g_api_dml := false; -- Unset the api dml status
111: ota_pmm_shd.constraint_error
112: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
113: When hr_api.parent_integrity_violated Then
114: -- Parent integrity has been violated
115: ota_pmm_shd.g_api_dml := false; -- Unset the api dml status

Line 115: ota_pmm_shd.g_api_dml := false; -- Unset the api dml status

111: ota_pmm_shd.constraint_error
112: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
113: When hr_api.parent_integrity_violated Then
114: -- Parent integrity has been violated
115: ota_pmm_shd.g_api_dml := false; -- Unset the api dml status
116: ota_pmm_shd.constraint_error
117: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
118: When hr_api.unique_integrity_violated Then
119: -- Unique integrity has been violated

Line 116: ota_pmm_shd.constraint_error

112: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
113: When hr_api.parent_integrity_violated Then
114: -- Parent integrity has been violated
115: ota_pmm_shd.g_api_dml := false; -- Unset the api dml status
116: ota_pmm_shd.constraint_error
117: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
118: When hr_api.unique_integrity_violated Then
119: -- Unique integrity has been violated
120: ota_pmm_shd.g_api_dml := false; -- Unset the api dml status

Line 120: ota_pmm_shd.g_api_dml := false; -- Unset the api dml status

116: ota_pmm_shd.constraint_error
117: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
118: When hr_api.unique_integrity_violated Then
119: -- Unique integrity has been violated
120: ota_pmm_shd.g_api_dml := false; -- Unset the api dml status
121: ota_pmm_shd.constraint_error
122: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
123: When Others Then
124: ota_pmm_shd.g_api_dml := false; -- Unset the api dml status

Line 121: ota_pmm_shd.constraint_error

117: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
118: When hr_api.unique_integrity_violated Then
119: -- Unique integrity has been violated
120: ota_pmm_shd.g_api_dml := false; -- Unset the api dml status
121: ota_pmm_shd.constraint_error
122: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
123: When Others Then
124: ota_pmm_shd.g_api_dml := false; -- Unset the api dml status
125: Raise;

Line 124: ota_pmm_shd.g_api_dml := false; -- Unset the api dml status

120: ota_pmm_shd.g_api_dml := false; -- Unset the api dml status
121: ota_pmm_shd.constraint_error
122: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
123: When Others Then
124: ota_pmm_shd.g_api_dml := false; -- Unset the api dml status
125: Raise;
126: End update_dml;
127: --
128: -- ----------------------------------------------------------------------------

Line 160: Procedure pre_update(p_rec in ota_pmm_shd.g_rec_type) is

156: -- Internal Development Use Only.
157: --
158: -- {End Of Comments}
159: -- ----------------------------------------------------------------------------
160: Procedure pre_update(p_rec in ota_pmm_shd.g_rec_type) is
161: --
162: l_proc varchar2(72) := g_package||'pre_update';
163: --
164: Begin

Line 202: Procedure post_update(p_rec in ota_pmm_shd.g_rec_type) is

198: -- Internal Development Use Only.
199: --
200: -- {End Of Comments}
201: -- ----------------------------------------------------------------------------
202: Procedure post_update(p_rec in ota_pmm_shd.g_rec_type) is
203: --
204: l_proc varchar2(72) := g_package||'post_update';
205: --
206: Begin

Line 255: Function convert_defs(p_rec in out ota_pmm_shd.g_rec_type)

251: -- Internal Development Use Only.
252: --
253: -- {End Of Comments}
254: -- ----------------------------------------------------------------------------
255: Function convert_defs(p_rec in out ota_pmm_shd.g_rec_type)
256: Return ota_pmm_shd.g_rec_type is
257: --
258: l_proc varchar2(72) := g_package||'convert_defs';
259: --

Line 256: Return ota_pmm_shd.g_rec_type is

252: --
253: -- {End Of Comments}
254: -- ----------------------------------------------------------------------------
255: Function convert_defs(p_rec in out ota_pmm_shd.g_rec_type)
256: Return ota_pmm_shd.g_rec_type is
257: --
258: l_proc varchar2(72) := g_package||'convert_defs';
259: --
260: Begin

Line 271: ota_pmm_shd.g_old_rec.event_id;

267: -- is being used then we must set to the 'current' argument value.
268: --
269: If (p_rec.event_id = hr_api.g_number) then
270: p_rec.event_id :=
271: ota_pmm_shd.g_old_rec.event_id;
272: End If;
273: If (p_rec.program_event_id = hr_api.g_number) then
274: p_rec.program_event_id :=
275: ota_pmm_shd.g_old_rec.program_event_id;

Line 275: ota_pmm_shd.g_old_rec.program_event_id;

271: ota_pmm_shd.g_old_rec.event_id;
272: End If;
273: If (p_rec.program_event_id = hr_api.g_number) then
274: p_rec.program_event_id :=
275: ota_pmm_shd.g_old_rec.program_event_id;
276: End If;
277: If (p_rec.comments = hr_api.g_varchar2) then
278: p_rec.comments :=
279: ota_pmm_shd.g_old_rec.comments;

Line 279: ota_pmm_shd.g_old_rec.comments;

275: ota_pmm_shd.g_old_rec.program_event_id;
276: End If;
277: If (p_rec.comments = hr_api.g_varchar2) then
278: p_rec.comments :=
279: ota_pmm_shd.g_old_rec.comments;
280: End If;
281: If (p_rec.group_name = hr_api.g_varchar2) then
282: p_rec.group_name :=
283: ota_pmm_shd.g_old_rec.group_name;

Line 283: ota_pmm_shd.g_old_rec.group_name;

279: ota_pmm_shd.g_old_rec.comments;
280: End If;
281: If (p_rec.group_name = hr_api.g_varchar2) then
282: p_rec.group_name :=
283: ota_pmm_shd.g_old_rec.group_name;
284: End If;
285: If (p_rec.required_flag = hr_api.g_varchar2) then
286: p_rec.required_flag :=
287: ota_pmm_shd.g_old_rec.required_flag;

Line 287: ota_pmm_shd.g_old_rec.required_flag;

283: ota_pmm_shd.g_old_rec.group_name;
284: End If;
285: If (p_rec.required_flag = hr_api.g_varchar2) then
286: p_rec.required_flag :=
287: ota_pmm_shd.g_old_rec.required_flag;
288: End If;
289: If (p_rec.role = hr_api.g_varchar2) then
290: p_rec.role :=
291: ota_pmm_shd.g_old_rec.role;

Line 291: ota_pmm_shd.g_old_rec.role;

287: ota_pmm_shd.g_old_rec.required_flag;
288: End If;
289: If (p_rec.role = hr_api.g_varchar2) then
290: p_rec.role :=
291: ota_pmm_shd.g_old_rec.role;
292: End If;
293: If (p_rec.sequence = hr_api.g_number) then
294: p_rec.sequence :=
295: ota_pmm_shd.g_old_rec.sequence;

Line 295: ota_pmm_shd.g_old_rec.sequence;

291: ota_pmm_shd.g_old_rec.role;
292: End If;
293: If (p_rec.sequence = hr_api.g_number) then
294: p_rec.sequence :=
295: ota_pmm_shd.g_old_rec.sequence;
296: End If;
297: If (p_rec.pmm_information_category = hr_api.g_varchar2) then
298: p_rec.pmm_information_category :=
299: ota_pmm_shd.g_old_rec.pmm_information_category;

Line 299: ota_pmm_shd.g_old_rec.pmm_information_category;

295: ota_pmm_shd.g_old_rec.sequence;
296: End If;
297: If (p_rec.pmm_information_category = hr_api.g_varchar2) then
298: p_rec.pmm_information_category :=
299: ota_pmm_shd.g_old_rec.pmm_information_category;
300: End If;
301: If (p_rec.pmm_information1 = hr_api.g_varchar2) then
302: p_rec.pmm_information1 :=
303: ota_pmm_shd.g_old_rec.pmm_information1;

Line 303: ota_pmm_shd.g_old_rec.pmm_information1;

299: ota_pmm_shd.g_old_rec.pmm_information_category;
300: End If;
301: If (p_rec.pmm_information1 = hr_api.g_varchar2) then
302: p_rec.pmm_information1 :=
303: ota_pmm_shd.g_old_rec.pmm_information1;
304: End If;
305: If (p_rec.pmm_information2 = hr_api.g_varchar2) then
306: p_rec.pmm_information2 :=
307: ota_pmm_shd.g_old_rec.pmm_information2;

Line 307: ota_pmm_shd.g_old_rec.pmm_information2;

303: ota_pmm_shd.g_old_rec.pmm_information1;
304: End If;
305: If (p_rec.pmm_information2 = hr_api.g_varchar2) then
306: p_rec.pmm_information2 :=
307: ota_pmm_shd.g_old_rec.pmm_information2;
308: End If;
309: If (p_rec.pmm_information3 = hr_api.g_varchar2) then
310: p_rec.pmm_information3 :=
311: ota_pmm_shd.g_old_rec.pmm_information3;

Line 311: ota_pmm_shd.g_old_rec.pmm_information3;

307: ota_pmm_shd.g_old_rec.pmm_information2;
308: End If;
309: If (p_rec.pmm_information3 = hr_api.g_varchar2) then
310: p_rec.pmm_information3 :=
311: ota_pmm_shd.g_old_rec.pmm_information3;
312: End If;
313: If (p_rec.pmm_information4 = hr_api.g_varchar2) then
314: p_rec.pmm_information4 :=
315: ota_pmm_shd.g_old_rec.pmm_information4;

Line 315: ota_pmm_shd.g_old_rec.pmm_information4;

311: ota_pmm_shd.g_old_rec.pmm_information3;
312: End If;
313: If (p_rec.pmm_information4 = hr_api.g_varchar2) then
314: p_rec.pmm_information4 :=
315: ota_pmm_shd.g_old_rec.pmm_information4;
316: End If;
317: If (p_rec.pmm_information5 = hr_api.g_varchar2) then
318: p_rec.pmm_information5 :=
319: ota_pmm_shd.g_old_rec.pmm_information5;

Line 319: ota_pmm_shd.g_old_rec.pmm_information5;

315: ota_pmm_shd.g_old_rec.pmm_information4;
316: End If;
317: If (p_rec.pmm_information5 = hr_api.g_varchar2) then
318: p_rec.pmm_information5 :=
319: ota_pmm_shd.g_old_rec.pmm_information5;
320: End If;
321: If (p_rec.pmm_information6 = hr_api.g_varchar2) then
322: p_rec.pmm_information6 :=
323: ota_pmm_shd.g_old_rec.pmm_information6;

Line 323: ota_pmm_shd.g_old_rec.pmm_information6;

319: ota_pmm_shd.g_old_rec.pmm_information5;
320: End If;
321: If (p_rec.pmm_information6 = hr_api.g_varchar2) then
322: p_rec.pmm_information6 :=
323: ota_pmm_shd.g_old_rec.pmm_information6;
324: End If;
325: If (p_rec.pmm_information7 = hr_api.g_varchar2) then
326: p_rec.pmm_information7 :=
327: ota_pmm_shd.g_old_rec.pmm_information7;

Line 327: ota_pmm_shd.g_old_rec.pmm_information7;

323: ota_pmm_shd.g_old_rec.pmm_information6;
324: End If;
325: If (p_rec.pmm_information7 = hr_api.g_varchar2) then
326: p_rec.pmm_information7 :=
327: ota_pmm_shd.g_old_rec.pmm_information7;
328: End If;
329: If (p_rec.pmm_information8 = hr_api.g_varchar2) then
330: p_rec.pmm_information8 :=
331: ota_pmm_shd.g_old_rec.pmm_information8;

Line 331: ota_pmm_shd.g_old_rec.pmm_information8;

327: ota_pmm_shd.g_old_rec.pmm_information7;
328: End If;
329: If (p_rec.pmm_information8 = hr_api.g_varchar2) then
330: p_rec.pmm_information8 :=
331: ota_pmm_shd.g_old_rec.pmm_information8;
332: End If;
333: If (p_rec.pmm_information9 = hr_api.g_varchar2) then
334: p_rec.pmm_information9 :=
335: ota_pmm_shd.g_old_rec.pmm_information9;

Line 335: ota_pmm_shd.g_old_rec.pmm_information9;

331: ota_pmm_shd.g_old_rec.pmm_information8;
332: End If;
333: If (p_rec.pmm_information9 = hr_api.g_varchar2) then
334: p_rec.pmm_information9 :=
335: ota_pmm_shd.g_old_rec.pmm_information9;
336: End If;
337: If (p_rec.pmm_information10 = hr_api.g_varchar2) then
338: p_rec.pmm_information10 :=
339: ota_pmm_shd.g_old_rec.pmm_information10;

Line 339: ota_pmm_shd.g_old_rec.pmm_information10;

335: ota_pmm_shd.g_old_rec.pmm_information9;
336: End If;
337: If (p_rec.pmm_information10 = hr_api.g_varchar2) then
338: p_rec.pmm_information10 :=
339: ota_pmm_shd.g_old_rec.pmm_information10;
340: End If;
341: If (p_rec.pmm_information11 = hr_api.g_varchar2) then
342: p_rec.pmm_information11 :=
343: ota_pmm_shd.g_old_rec.pmm_information11;

Line 343: ota_pmm_shd.g_old_rec.pmm_information11;

339: ota_pmm_shd.g_old_rec.pmm_information10;
340: End If;
341: If (p_rec.pmm_information11 = hr_api.g_varchar2) then
342: p_rec.pmm_information11 :=
343: ota_pmm_shd.g_old_rec.pmm_information11;
344: End If;
345: If (p_rec.pmm_information12 = hr_api.g_varchar2) then
346: p_rec.pmm_information12 :=
347: ota_pmm_shd.g_old_rec.pmm_information12;

Line 347: ota_pmm_shd.g_old_rec.pmm_information12;

343: ota_pmm_shd.g_old_rec.pmm_information11;
344: End If;
345: If (p_rec.pmm_information12 = hr_api.g_varchar2) then
346: p_rec.pmm_information12 :=
347: ota_pmm_shd.g_old_rec.pmm_information12;
348: End If;
349: If (p_rec.pmm_information13 = hr_api.g_varchar2) then
350: p_rec.pmm_information13 :=
351: ota_pmm_shd.g_old_rec.pmm_information13;

Line 351: ota_pmm_shd.g_old_rec.pmm_information13;

347: ota_pmm_shd.g_old_rec.pmm_information12;
348: End If;
349: If (p_rec.pmm_information13 = hr_api.g_varchar2) then
350: p_rec.pmm_information13 :=
351: ota_pmm_shd.g_old_rec.pmm_information13;
352: End If;
353: If (p_rec.pmm_information14 = hr_api.g_varchar2) then
354: p_rec.pmm_information14 :=
355: ota_pmm_shd.g_old_rec.pmm_information14;

Line 355: ota_pmm_shd.g_old_rec.pmm_information14;

351: ota_pmm_shd.g_old_rec.pmm_information13;
352: End If;
353: If (p_rec.pmm_information14 = hr_api.g_varchar2) then
354: p_rec.pmm_information14 :=
355: ota_pmm_shd.g_old_rec.pmm_information14;
356: End If;
357: If (p_rec.pmm_information15 = hr_api.g_varchar2) then
358: p_rec.pmm_information15 :=
359: ota_pmm_shd.g_old_rec.pmm_information15;

Line 359: ota_pmm_shd.g_old_rec.pmm_information15;

355: ota_pmm_shd.g_old_rec.pmm_information14;
356: End If;
357: If (p_rec.pmm_information15 = hr_api.g_varchar2) then
358: p_rec.pmm_information15 :=
359: ota_pmm_shd.g_old_rec.pmm_information15;
360: End If;
361: If (p_rec.pmm_information16 = hr_api.g_varchar2) then
362: p_rec.pmm_information16 :=
363: ota_pmm_shd.g_old_rec.pmm_information16;

Line 363: ota_pmm_shd.g_old_rec.pmm_information16;

359: ota_pmm_shd.g_old_rec.pmm_information15;
360: End If;
361: If (p_rec.pmm_information16 = hr_api.g_varchar2) then
362: p_rec.pmm_information16 :=
363: ota_pmm_shd.g_old_rec.pmm_information16;
364: End If;
365: If (p_rec.pmm_information17 = hr_api.g_varchar2) then
366: p_rec.pmm_information17 :=
367: ota_pmm_shd.g_old_rec.pmm_information17;

Line 367: ota_pmm_shd.g_old_rec.pmm_information17;

363: ota_pmm_shd.g_old_rec.pmm_information16;
364: End If;
365: If (p_rec.pmm_information17 = hr_api.g_varchar2) then
366: p_rec.pmm_information17 :=
367: ota_pmm_shd.g_old_rec.pmm_information17;
368: End If;
369: If (p_rec.pmm_information18 = hr_api.g_varchar2) then
370: p_rec.pmm_information18 :=
371: ota_pmm_shd.g_old_rec.pmm_information18;

Line 371: ota_pmm_shd.g_old_rec.pmm_information18;

367: ota_pmm_shd.g_old_rec.pmm_information17;
368: End If;
369: If (p_rec.pmm_information18 = hr_api.g_varchar2) then
370: p_rec.pmm_information18 :=
371: ota_pmm_shd.g_old_rec.pmm_information18;
372: End If;
373: If (p_rec.pmm_information19 = hr_api.g_varchar2) then
374: p_rec.pmm_information19 :=
375: ota_pmm_shd.g_old_rec.pmm_information19;

Line 375: ota_pmm_shd.g_old_rec.pmm_information19;

371: ota_pmm_shd.g_old_rec.pmm_information18;
372: End If;
373: If (p_rec.pmm_information19 = hr_api.g_varchar2) then
374: p_rec.pmm_information19 :=
375: ota_pmm_shd.g_old_rec.pmm_information19;
376: End If;
377: If (p_rec.pmm_information20 = hr_api.g_varchar2) then
378: p_rec.pmm_information20 :=
379: ota_pmm_shd.g_old_rec.pmm_information20;

Line 379: ota_pmm_shd.g_old_rec.pmm_information20;

375: ota_pmm_shd.g_old_rec.pmm_information19;
376: End If;
377: If (p_rec.pmm_information20 = hr_api.g_varchar2) then
378: p_rec.pmm_information20 :=
379: ota_pmm_shd.g_old_rec.pmm_information20;
380: End If;
381: --
382: -- Return the plsql record structure.
383: --

Line 394: p_rec in out ota_pmm_shd.g_rec_type,

390: -- |---------------------------------< upd >----------------------------------|
391: -- ----------------------------------------------------------------------------
392: Procedure upd
393: (
394: p_rec in out ota_pmm_shd.g_rec_type,
395: p_validate in boolean default false
396: ) is
397: --
398: l_proc varchar2(72) := g_package||'upd';

Line 414: ota_pmm_shd.lck

410: End If;
411: --
412: -- We must lock the row which we need to update.
413: --
414: ota_pmm_shd.lck
415: (
416: p_rec.program_membership_id,
417: p_rec.object_version_number
418: );

Line 494: l_rec ota_pmm_shd.g_rec_type;

490: p_pmm_information20 in varchar2 default hr_api.g_varchar2,
491: p_validate in boolean default false
492: ) is
493: --
494: l_rec ota_pmm_shd.g_rec_type;
495: l_proc varchar2(72) := g_package||'upd';
496: --
497: Begin
498: hr_utility.set_location('Entering:'||l_proc, 5);

Line 504: ota_pmm_shd.convert_args

500: -- Call conversion function to turn arguments into the
501: -- l_rec structure.
502: --
503: l_rec :=
504: ota_pmm_shd.convert_args
505: (
506: p_program_membership_id,
507: p_event_id,
508: p_program_event_id,