DBA Data[Home] [Help]

APPS.OTA_PLE_UPD dependencies on OTA_PLE_SHD

Line 54: Procedure update_dml(p_rec in out ota_ple_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_ple_shd.g_rec_type) is
55: --
56: l_proc varchar2(72) := g_package||'update_dml';
57: --
58: Begin

Line 65: ota_ple_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_ple_shd.g_api_dml := true; -- Set the api dml status
66: --
67: -- Update the ota_price_list_entries Row
68: --
69: update ota_price_list_entries

Line 106: ota_ple_shd.g_api_dml := false; -- Unset the api dml status

102: ple_information19 = p_rec.ple_information19,
103: ple_information20 = p_rec.ple_information20
104: where price_list_entry_id = p_rec.price_list_entry_id;
105: --
106: ota_ple_shd.g_api_dml := false; -- Unset the api dml status
107: --
108: hr_utility.set_location(' Leaving:'||l_proc, 10);
109: --
110: Exception

Line 113: ota_ple_shd.g_api_dml := false; -- Unset the api dml status

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

Line 114: ota_ple_shd.constraint_error

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

Line 118: ota_ple_shd.g_api_dml := false; -- Unset the api dml status

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

Line 119: ota_ple_shd.constraint_error

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

Line 123: ota_ple_shd.g_api_dml := false; -- Unset the api dml status

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

Line 124: ota_ple_shd.constraint_error

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

Line 127: ota_ple_shd.g_api_dml := false; -- Unset the api dml status

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

Line 163: Procedure pre_update(p_rec in ota_ple_shd.g_rec_type) is

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

Line 205: Procedure post_update(p_rec in ota_ple_shd.g_rec_type) is

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

Line 258: Function convert_defs(p_rec in out ota_ple_shd.g_rec_type)

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

Line 259: Return ota_ple_shd.g_rec_type is

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

Line 274: ota_ple_shd.g_old_rec.vendor_supply_id;

270: -- is being used then we must set to the 'current' argument value.
271: --
272: If (p_rec.vendor_supply_id = hr_api.g_number) then
273: p_rec.vendor_supply_id :=
274: ota_ple_shd.g_old_rec.vendor_supply_id;
275: End If;
276: If (p_rec.activity_version_id = hr_api.g_number) then
277: p_rec.activity_version_id :=
278: ota_ple_shd.g_old_rec.activity_version_id;

Line 278: ota_ple_shd.g_old_rec.activity_version_id;

274: ota_ple_shd.g_old_rec.vendor_supply_id;
275: End If;
276: If (p_rec.activity_version_id = hr_api.g_number) then
277: p_rec.activity_version_id :=
278: ota_ple_shd.g_old_rec.activity_version_id;
279: End If;
280: If (p_rec.price_list_id = hr_api.g_number) then
281: p_rec.price_list_id :=
282: ota_ple_shd.g_old_rec.price_list_id;

Line 282: ota_ple_shd.g_old_rec.price_list_id;

278: ota_ple_shd.g_old_rec.activity_version_id;
279: End If;
280: If (p_rec.price_list_id = hr_api.g_number) then
281: p_rec.price_list_id :=
282: ota_ple_shd.g_old_rec.price_list_id;
283: End If;
284: If (p_rec.price = hr_api.g_number) then
285: p_rec.price :=
286: ota_ple_shd.g_old_rec.price;

Line 286: ota_ple_shd.g_old_rec.price;

282: ota_ple_shd.g_old_rec.price_list_id;
283: End If;
284: If (p_rec.price = hr_api.g_number) then
285: p_rec.price :=
286: ota_ple_shd.g_old_rec.price;
287: End If;
288: If (p_rec.price_basis = hr_api.g_varchar2) then
289: p_rec.price_basis :=
290: ota_ple_shd.g_old_rec.price_basis;

Line 290: ota_ple_shd.g_old_rec.price_basis;

286: ota_ple_shd.g_old_rec.price;
287: End If;
288: If (p_rec.price_basis = hr_api.g_varchar2) then
289: p_rec.price_basis :=
290: ota_ple_shd.g_old_rec.price_basis;
291: End If;
292: If (p_rec.start_date = hr_api.g_date) then
293: p_rec.start_date :=
294: ota_ple_shd.g_old_rec.start_date;

Line 294: ota_ple_shd.g_old_rec.start_date;

290: ota_ple_shd.g_old_rec.price_basis;
291: End If;
292: If (p_rec.start_date = hr_api.g_date) then
293: p_rec.start_date :=
294: ota_ple_shd.g_old_rec.start_date;
295: End If;
296: If (p_rec.comments = hr_api.g_varchar2) then
297: p_rec.comments :=
298: ota_ple_shd.g_old_rec.comments;

Line 298: ota_ple_shd.g_old_rec.comments;

294: ota_ple_shd.g_old_rec.start_date;
295: End If;
296: If (p_rec.comments = hr_api.g_varchar2) then
297: p_rec.comments :=
298: ota_ple_shd.g_old_rec.comments;
299: End If;
300: If (p_rec.end_date = hr_api.g_date) then
301: p_rec.end_date :=
302: ota_ple_shd.g_old_rec.end_date;

Line 302: ota_ple_shd.g_old_rec.end_date;

298: ota_ple_shd.g_old_rec.comments;
299: End If;
300: If (p_rec.end_date = hr_api.g_date) then
301: p_rec.end_date :=
302: ota_ple_shd.g_old_rec.end_date;
303: End If;
304: If (p_rec.maximum_attendees = hr_api.g_number) then
305: p_rec.maximum_attendees :=
306: ota_ple_shd.g_old_rec.maximum_attendees;

Line 306: ota_ple_shd.g_old_rec.maximum_attendees;

302: ota_ple_shd.g_old_rec.end_date;
303: End If;
304: If (p_rec.maximum_attendees = hr_api.g_number) then
305: p_rec.maximum_attendees :=
306: ota_ple_shd.g_old_rec.maximum_attendees;
307: End If;
308: If (p_rec.minimum_attendees = hr_api.g_number) then
309: p_rec.minimum_attendees :=
310: ota_ple_shd.g_old_rec.minimum_attendees;

Line 310: ota_ple_shd.g_old_rec.minimum_attendees;

306: ota_ple_shd.g_old_rec.maximum_attendees;
307: End If;
308: If (p_rec.minimum_attendees = hr_api.g_number) then
309: p_rec.minimum_attendees :=
310: ota_ple_shd.g_old_rec.minimum_attendees;
311: End If;
312: If (p_rec.ple_information_category = hr_api.g_varchar2) then
313: p_rec.ple_information_category :=
314: ota_ple_shd.g_old_rec.ple_information_category;

Line 314: ota_ple_shd.g_old_rec.ple_information_category;

310: ota_ple_shd.g_old_rec.minimum_attendees;
311: End If;
312: If (p_rec.ple_information_category = hr_api.g_varchar2) then
313: p_rec.ple_information_category :=
314: ota_ple_shd.g_old_rec.ple_information_category;
315: End If;
316: If (p_rec.ple_information1 = hr_api.g_varchar2) then
317: p_rec.ple_information1 :=
318: ota_ple_shd.g_old_rec.ple_information1;

Line 318: ota_ple_shd.g_old_rec.ple_information1;

314: ota_ple_shd.g_old_rec.ple_information_category;
315: End If;
316: If (p_rec.ple_information1 = hr_api.g_varchar2) then
317: p_rec.ple_information1 :=
318: ota_ple_shd.g_old_rec.ple_information1;
319: End If;
320: If (p_rec.ple_information2 = hr_api.g_varchar2) then
321: p_rec.ple_information2 :=
322: ota_ple_shd.g_old_rec.ple_information2;

Line 322: ota_ple_shd.g_old_rec.ple_information2;

318: ota_ple_shd.g_old_rec.ple_information1;
319: End If;
320: If (p_rec.ple_information2 = hr_api.g_varchar2) then
321: p_rec.ple_information2 :=
322: ota_ple_shd.g_old_rec.ple_information2;
323: End If;
324: If (p_rec.ple_information3 = hr_api.g_varchar2) then
325: p_rec.ple_information3 :=
326: ota_ple_shd.g_old_rec.ple_information3;

Line 326: ota_ple_shd.g_old_rec.ple_information3;

322: ota_ple_shd.g_old_rec.ple_information2;
323: End If;
324: If (p_rec.ple_information3 = hr_api.g_varchar2) then
325: p_rec.ple_information3 :=
326: ota_ple_shd.g_old_rec.ple_information3;
327: End If;
328: If (p_rec.ple_information4 = hr_api.g_varchar2) then
329: p_rec.ple_information4 :=
330: ota_ple_shd.g_old_rec.ple_information4;

Line 330: ota_ple_shd.g_old_rec.ple_information4;

326: ota_ple_shd.g_old_rec.ple_information3;
327: End If;
328: If (p_rec.ple_information4 = hr_api.g_varchar2) then
329: p_rec.ple_information4 :=
330: ota_ple_shd.g_old_rec.ple_information4;
331: End If;
332: If (p_rec.ple_information5 = hr_api.g_varchar2) then
333: p_rec.ple_information5 :=
334: ota_ple_shd.g_old_rec.ple_information5;

Line 334: ota_ple_shd.g_old_rec.ple_information5;

330: ota_ple_shd.g_old_rec.ple_information4;
331: End If;
332: If (p_rec.ple_information5 = hr_api.g_varchar2) then
333: p_rec.ple_information5 :=
334: ota_ple_shd.g_old_rec.ple_information5;
335: End If;
336: If (p_rec.ple_information6 = hr_api.g_varchar2) then
337: p_rec.ple_information6 :=
338: ota_ple_shd.g_old_rec.ple_information6;

Line 338: ota_ple_shd.g_old_rec.ple_information6;

334: ota_ple_shd.g_old_rec.ple_information5;
335: End If;
336: If (p_rec.ple_information6 = hr_api.g_varchar2) then
337: p_rec.ple_information6 :=
338: ota_ple_shd.g_old_rec.ple_information6;
339: End If;
340: If (p_rec.ple_information7 = hr_api.g_varchar2) then
341: p_rec.ple_information7 :=
342: ota_ple_shd.g_old_rec.ple_information7;

Line 342: ota_ple_shd.g_old_rec.ple_information7;

338: ota_ple_shd.g_old_rec.ple_information6;
339: End If;
340: If (p_rec.ple_information7 = hr_api.g_varchar2) then
341: p_rec.ple_information7 :=
342: ota_ple_shd.g_old_rec.ple_information7;
343: End If;
344: If (p_rec.ple_information8 = hr_api.g_varchar2) then
345: p_rec.ple_information8 :=
346: ota_ple_shd.g_old_rec.ple_information8;

Line 346: ota_ple_shd.g_old_rec.ple_information8;

342: ota_ple_shd.g_old_rec.ple_information7;
343: End If;
344: If (p_rec.ple_information8 = hr_api.g_varchar2) then
345: p_rec.ple_information8 :=
346: ota_ple_shd.g_old_rec.ple_information8;
347: End If;
348: If (p_rec.ple_information9 = hr_api.g_varchar2) then
349: p_rec.ple_information9 :=
350: ota_ple_shd.g_old_rec.ple_information9;

Line 350: ota_ple_shd.g_old_rec.ple_information9;

346: ota_ple_shd.g_old_rec.ple_information8;
347: End If;
348: If (p_rec.ple_information9 = hr_api.g_varchar2) then
349: p_rec.ple_information9 :=
350: ota_ple_shd.g_old_rec.ple_information9;
351: End If;
352: If (p_rec.ple_information10 = hr_api.g_varchar2) then
353: p_rec.ple_information10 :=
354: ota_ple_shd.g_old_rec.ple_information10;

Line 354: ota_ple_shd.g_old_rec.ple_information10;

350: ota_ple_shd.g_old_rec.ple_information9;
351: End If;
352: If (p_rec.ple_information10 = hr_api.g_varchar2) then
353: p_rec.ple_information10 :=
354: ota_ple_shd.g_old_rec.ple_information10;
355: End If;
356: If (p_rec.ple_information11 = hr_api.g_varchar2) then
357: p_rec.ple_information11 :=
358: ota_ple_shd.g_old_rec.ple_information11;

Line 358: ota_ple_shd.g_old_rec.ple_information11;

354: ota_ple_shd.g_old_rec.ple_information10;
355: End If;
356: If (p_rec.ple_information11 = hr_api.g_varchar2) then
357: p_rec.ple_information11 :=
358: ota_ple_shd.g_old_rec.ple_information11;
359: End If;
360: If (p_rec.ple_information12 = hr_api.g_varchar2) then
361: p_rec.ple_information12 :=
362: ota_ple_shd.g_old_rec.ple_information12;

Line 362: ota_ple_shd.g_old_rec.ple_information12;

358: ota_ple_shd.g_old_rec.ple_information11;
359: End If;
360: If (p_rec.ple_information12 = hr_api.g_varchar2) then
361: p_rec.ple_information12 :=
362: ota_ple_shd.g_old_rec.ple_information12;
363: End If;
364: If (p_rec.ple_information13 = hr_api.g_varchar2) then
365: p_rec.ple_information13 :=
366: ota_ple_shd.g_old_rec.ple_information13;

Line 366: ota_ple_shd.g_old_rec.ple_information13;

362: ota_ple_shd.g_old_rec.ple_information12;
363: End If;
364: If (p_rec.ple_information13 = hr_api.g_varchar2) then
365: p_rec.ple_information13 :=
366: ota_ple_shd.g_old_rec.ple_information13;
367: End If;
368: If (p_rec.ple_information14 = hr_api.g_varchar2) then
369: p_rec.ple_information14 :=
370: ota_ple_shd.g_old_rec.ple_information14;

Line 370: ota_ple_shd.g_old_rec.ple_information14;

366: ota_ple_shd.g_old_rec.ple_information13;
367: End If;
368: If (p_rec.ple_information14 = hr_api.g_varchar2) then
369: p_rec.ple_information14 :=
370: ota_ple_shd.g_old_rec.ple_information14;
371: End If;
372: If (p_rec.ple_information15 = hr_api.g_varchar2) then
373: p_rec.ple_information15 :=
374: ota_ple_shd.g_old_rec.ple_information15;

Line 374: ota_ple_shd.g_old_rec.ple_information15;

370: ota_ple_shd.g_old_rec.ple_information14;
371: End If;
372: If (p_rec.ple_information15 = hr_api.g_varchar2) then
373: p_rec.ple_information15 :=
374: ota_ple_shd.g_old_rec.ple_information15;
375: End If;
376: If (p_rec.ple_information16 = hr_api.g_varchar2) then
377: p_rec.ple_information16 :=
378: ota_ple_shd.g_old_rec.ple_information16;

Line 378: ota_ple_shd.g_old_rec.ple_information16;

374: ota_ple_shd.g_old_rec.ple_information15;
375: End If;
376: If (p_rec.ple_information16 = hr_api.g_varchar2) then
377: p_rec.ple_information16 :=
378: ota_ple_shd.g_old_rec.ple_information16;
379: End If;
380: If (p_rec.ple_information17 = hr_api.g_varchar2) then
381: p_rec.ple_information17 :=
382: ota_ple_shd.g_old_rec.ple_information17;

Line 382: ota_ple_shd.g_old_rec.ple_information17;

378: ota_ple_shd.g_old_rec.ple_information16;
379: End If;
380: If (p_rec.ple_information17 = hr_api.g_varchar2) then
381: p_rec.ple_information17 :=
382: ota_ple_shd.g_old_rec.ple_information17;
383: End If;
384: If (p_rec.ple_information18 = hr_api.g_varchar2) then
385: p_rec.ple_information18 :=
386: ota_ple_shd.g_old_rec.ple_information18;

Line 386: ota_ple_shd.g_old_rec.ple_information18;

382: ota_ple_shd.g_old_rec.ple_information17;
383: End If;
384: If (p_rec.ple_information18 = hr_api.g_varchar2) then
385: p_rec.ple_information18 :=
386: ota_ple_shd.g_old_rec.ple_information18;
387: End If;
388: If (p_rec.ple_information19 = hr_api.g_varchar2) then
389: p_rec.ple_information19 :=
390: ota_ple_shd.g_old_rec.ple_information19;

Line 390: ota_ple_shd.g_old_rec.ple_information19;

386: ota_ple_shd.g_old_rec.ple_information18;
387: End If;
388: If (p_rec.ple_information19 = hr_api.g_varchar2) then
389: p_rec.ple_information19 :=
390: ota_ple_shd.g_old_rec.ple_information19;
391: End If;
392: If (p_rec.ple_information20 = hr_api.g_varchar2) then
393: p_rec.ple_information20 :=
394: ota_ple_shd.g_old_rec.ple_information20;

Line 394: ota_ple_shd.g_old_rec.ple_information20;

390: ota_ple_shd.g_old_rec.ple_information19;
391: End If;
392: If (p_rec.ple_information20 = hr_api.g_varchar2) then
393: p_rec.ple_information20 :=
394: ota_ple_shd.g_old_rec.ple_information20;
395: End If;
396: --
397: -- Return the plsql record structure.
398: --

Line 409: p_rec in out ota_ple_shd.g_rec_type,

405: -- |---------------------------------< upd >----------------------------------|
406: -- ----------------------------------------------------------------------------
407: Procedure upd
408: (
409: p_rec in out ota_ple_shd.g_rec_type,
410: p_validate in boolean default false
411: ) is
412: --
413: l_proc varchar2(72) := g_package||'upd';

Line 429: ota_ple_shd.lck

425: End If;
426: --
427: -- We must lock the row which we need to update.
428: --
429: ota_ple_shd.lck
430: (
431: p_rec.price_list_entry_id,
432: p_rec.object_version_number
433: );

Line 512: l_rec ota_ple_shd.g_rec_type;

508: p_ple_information20 in varchar2 default hr_api.g_varchar2,
509: p_validate in boolean default false
510: ) is
511: --
512: l_rec ota_ple_shd.g_rec_type;
513: l_proc varchar2(72) := g_package||'upd';
514: --
515: Begin
516: hr_utility.set_location('Entering:'||l_proc, 5);

Line 522: ota_ple_shd.convert_args

518: -- Call conversion function to turn arguments into the
519: -- l_rec structure.
520: --
521: l_rec :=
522: ota_ple_shd.convert_args
523: (
524: p_price_list_entry_id,
525: p_vendor_supply_id,
526: p_activity_version_id,