DBA Data[Home] [Help]

APPS.PER_KAD_UPD dependencies on PER_KAD_SHD

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

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

Line 66: per_kad_shd.g_api_dml := true; -- Set the api dml status

62: --
63: p_rec.object_version_number := p_rec.object_version_number + 1;
64: --
65: hr_utility.set_location(l_proc, 6);
66: per_kad_shd.g_api_dml := true; -- Set the api dml status
67: --
68: hr_utility.set_location(l_proc, 7);
69: -- Update the per_addresses Row
70: --

Line 121: per_kad_shd.g_api_dml := false; -- Unset the api dml status

117: object_version_number = p_rec.object_version_number
118: where address_id = p_rec.address_id;
119: --
120: hr_utility.set_location(l_proc, 8);
121: per_kad_shd.g_api_dml := false; -- Unset the api dml status
122: --
123: hr_utility.set_location(' Leaving:'||l_proc, 10);
124: --
125: Exception

Line 128: per_kad_shd.g_api_dml := false; -- Unset the api dml status

124: --
125: Exception
126: When hr_api.check_integrity_violated Then
127: -- A check constraint has been violated
128: per_kad_shd.g_api_dml := false; -- Unset the api dml status
129: per_kad_shd.constraint_error
130: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
131: When hr_api.parent_integrity_violated Then
132: -- Parent integrity has been violated

Line 129: per_kad_shd.constraint_error

125: Exception
126: When hr_api.check_integrity_violated Then
127: -- A check constraint has been violated
128: per_kad_shd.g_api_dml := false; -- Unset the api dml status
129: per_kad_shd.constraint_error
130: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
131: When hr_api.parent_integrity_violated Then
132: -- Parent integrity has been violated
133: per_kad_shd.g_api_dml := false; -- Unset the api dml status

Line 133: per_kad_shd.g_api_dml := false; -- Unset the api dml status

129: per_kad_shd.constraint_error
130: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
131: When hr_api.parent_integrity_violated Then
132: -- Parent integrity has been violated
133: per_kad_shd.g_api_dml := false; -- Unset the api dml status
134: per_kad_shd.constraint_error
135: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
136: When hr_api.unique_integrity_violated Then
137: -- Unique integrity has been violated

Line 134: per_kad_shd.constraint_error

130: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
131: When hr_api.parent_integrity_violated Then
132: -- Parent integrity has been violated
133: per_kad_shd.g_api_dml := false; -- Unset the api dml status
134: per_kad_shd.constraint_error
135: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
136: When hr_api.unique_integrity_violated Then
137: -- Unique integrity has been violated
138: per_kad_shd.g_api_dml := false; -- Unset the api dml status

Line 138: per_kad_shd.g_api_dml := false; -- Unset the api dml status

134: per_kad_shd.constraint_error
135: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
136: When hr_api.unique_integrity_violated Then
137: -- Unique integrity has been violated
138: per_kad_shd.g_api_dml := false; -- Unset the api dml status
139: per_kad_shd.constraint_error
140: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
141: When Others Then
142: per_kad_shd.g_api_dml := false; -- Unset the api dml status

Line 139: per_kad_shd.constraint_error

135: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
136: When hr_api.unique_integrity_violated Then
137: -- Unique integrity has been violated
138: per_kad_shd.g_api_dml := false; -- Unset the api dml status
139: per_kad_shd.constraint_error
140: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
141: When Others Then
142: per_kad_shd.g_api_dml := false; -- Unset the api dml status
143: Raise;

Line 142: per_kad_shd.g_api_dml := false; -- Unset the api dml status

138: per_kad_shd.g_api_dml := false; -- Unset the api dml status
139: per_kad_shd.constraint_error
140: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
141: When Others Then
142: per_kad_shd.g_api_dml := false; -- Unset the api dml status
143: Raise;
144: End update_dml;
145: --
146: -- ----------------------------------------------------------------------------

Line 178: Procedure pre_update(p_rec in per_kad_shd.g_rec_type) is

174: -- Internal Table Handler Use Only.
175: --
176: -- {End Of Comments}
177: -- ----------------------------------------------------------------------------
178: Procedure pre_update(p_rec in per_kad_shd.g_rec_type) is
179: --
180: l_proc varchar2(72) := g_package||'pre_update';
181: --
182: Begin

Line 220: Procedure post_update(p_rec in per_kad_shd.g_rec_type,

216: -- Internal Table Handler Use Only.
217: --
218: -- {End Of Comments}
219: -- ----------------------------------------------------------------------------
220: Procedure post_update(p_rec in per_kad_shd.g_rec_type,
221: p_effective_date in date) is
222: --
223: l_proc varchar2(72) := g_package||'post_update';
224: --

Line 237: l_old.person_id := per_kad_shd.g_old_rec.person_id;

233: hr_utility.set_location('Entering:'||l_proc, 5);
234: --
235: -- Fix for WWBUG 1408379
236: --
237: l_old.person_id := per_kad_shd.g_old_rec.person_id;
238: l_old.business_group_id := per_kad_shd.g_old_rec.business_group_id;
239: l_old.date_from := per_kad_shd.g_old_rec.date_from;
240: l_old.date_to := per_kad_shd.g_old_rec.date_to;
241: l_old.primary_flag := per_kad_shd.g_old_rec.primary_flag;

Line 238: l_old.business_group_id := per_kad_shd.g_old_rec.business_group_id;

234: --
235: -- Fix for WWBUG 1408379
236: --
237: l_old.person_id := per_kad_shd.g_old_rec.person_id;
238: l_old.business_group_id := per_kad_shd.g_old_rec.business_group_id;
239: l_old.date_from := per_kad_shd.g_old_rec.date_from;
240: l_old.date_to := per_kad_shd.g_old_rec.date_to;
241: l_old.primary_flag := per_kad_shd.g_old_rec.primary_flag;
242: l_old.postal_code := per_kad_shd.g_old_rec.postal_code;

Line 239: l_old.date_from := per_kad_shd.g_old_rec.date_from;

235: -- Fix for WWBUG 1408379
236: --
237: l_old.person_id := per_kad_shd.g_old_rec.person_id;
238: l_old.business_group_id := per_kad_shd.g_old_rec.business_group_id;
239: l_old.date_from := per_kad_shd.g_old_rec.date_from;
240: l_old.date_to := per_kad_shd.g_old_rec.date_to;
241: l_old.primary_flag := per_kad_shd.g_old_rec.primary_flag;
242: l_old.postal_code := per_kad_shd.g_old_rec.postal_code;
243: l_old.region_2 := per_kad_shd.g_old_rec.region_2;

Line 240: l_old.date_to := per_kad_shd.g_old_rec.date_to;

236: --
237: l_old.person_id := per_kad_shd.g_old_rec.person_id;
238: l_old.business_group_id := per_kad_shd.g_old_rec.business_group_id;
239: l_old.date_from := per_kad_shd.g_old_rec.date_from;
240: l_old.date_to := per_kad_shd.g_old_rec.date_to;
241: l_old.primary_flag := per_kad_shd.g_old_rec.primary_flag;
242: l_old.postal_code := per_kad_shd.g_old_rec.postal_code;
243: l_old.region_2 := per_kad_shd.g_old_rec.region_2;
244: l_old.address_type := per_kad_shd.g_old_rec.address_type;

Line 241: l_old.primary_flag := per_kad_shd.g_old_rec.primary_flag;

237: l_old.person_id := per_kad_shd.g_old_rec.person_id;
238: l_old.business_group_id := per_kad_shd.g_old_rec.business_group_id;
239: l_old.date_from := per_kad_shd.g_old_rec.date_from;
240: l_old.date_to := per_kad_shd.g_old_rec.date_to;
241: l_old.primary_flag := per_kad_shd.g_old_rec.primary_flag;
242: l_old.postal_code := per_kad_shd.g_old_rec.postal_code;
243: l_old.region_2 := per_kad_shd.g_old_rec.region_2;
244: l_old.address_type := per_kad_shd.g_old_rec.address_type;
245: l_old.address_id := per_kad_shd.g_old_rec.address_id;

Line 242: l_old.postal_code := per_kad_shd.g_old_rec.postal_code;

238: l_old.business_group_id := per_kad_shd.g_old_rec.business_group_id;
239: l_old.date_from := per_kad_shd.g_old_rec.date_from;
240: l_old.date_to := per_kad_shd.g_old_rec.date_to;
241: l_old.primary_flag := per_kad_shd.g_old_rec.primary_flag;
242: l_old.postal_code := per_kad_shd.g_old_rec.postal_code;
243: l_old.region_2 := per_kad_shd.g_old_rec.region_2;
244: l_old.address_type := per_kad_shd.g_old_rec.address_type;
245: l_old.address_id := per_kad_shd.g_old_rec.address_id;
246: l_new.person_id := p_rec.person_id;

Line 243: l_old.region_2 := per_kad_shd.g_old_rec.region_2;

239: l_old.date_from := per_kad_shd.g_old_rec.date_from;
240: l_old.date_to := per_kad_shd.g_old_rec.date_to;
241: l_old.primary_flag := per_kad_shd.g_old_rec.primary_flag;
242: l_old.postal_code := per_kad_shd.g_old_rec.postal_code;
243: l_old.region_2 := per_kad_shd.g_old_rec.region_2;
244: l_old.address_type := per_kad_shd.g_old_rec.address_type;
245: l_old.address_id := per_kad_shd.g_old_rec.address_id;
246: l_new.person_id := p_rec.person_id;
247: l_new.business_group_id := p_rec.business_group_id;

Line 244: l_old.address_type := per_kad_shd.g_old_rec.address_type;

240: l_old.date_to := per_kad_shd.g_old_rec.date_to;
241: l_old.primary_flag := per_kad_shd.g_old_rec.primary_flag;
242: l_old.postal_code := per_kad_shd.g_old_rec.postal_code;
243: l_old.region_2 := per_kad_shd.g_old_rec.region_2;
244: l_old.address_type := per_kad_shd.g_old_rec.address_type;
245: l_old.address_id := per_kad_shd.g_old_rec.address_id;
246: l_new.person_id := p_rec.person_id;
247: l_new.business_group_id := p_rec.business_group_id;
248: l_new.date_from := p_rec.date_from;

Line 245: l_old.address_id := per_kad_shd.g_old_rec.address_id;

241: l_old.primary_flag := per_kad_shd.g_old_rec.primary_flag;
242: l_old.postal_code := per_kad_shd.g_old_rec.postal_code;
243: l_old.region_2 := per_kad_shd.g_old_rec.region_2;
244: l_old.address_type := per_kad_shd.g_old_rec.address_type;
245: l_old.address_id := per_kad_shd.g_old_rec.address_id;
246: l_new.person_id := p_rec.person_id;
247: l_new.business_group_id := p_rec.business_group_id;
248: l_new.date_from := p_rec.date_from;
249: l_new.date_to := p_rec.date_to;

Line 308: Function convert_defs(p_rec in out nocopy per_kad_shd.g_rec_type)

304: -- Internal Table Handler Use Only.
305: --
306: -- {End Of Comments}
307: -- ----------------------------------------------------------------------------
308: Function convert_defs(p_rec in out nocopy per_kad_shd.g_rec_type)
309: Return per_kad_shd.g_rec_type is
310: --
311: l_proc varchar2(72) := g_package||'convert_defs';
312: --

Line 309: Return per_kad_shd.g_rec_type is

305: --
306: -- {End Of Comments}
307: -- ----------------------------------------------------------------------------
308: Function convert_defs(p_rec in out nocopy per_kad_shd.g_rec_type)
309: Return per_kad_shd.g_rec_type is
310: --
311: l_proc varchar2(72) := g_package||'convert_defs';
312: --
313: Begin

Line 324: per_kad_shd.g_old_rec.business_group_id;

320: -- is being used then we must set to the 'current' argument value.
321: --
322: If (p_rec.business_group_id = hr_api.g_number) then
323: p_rec.business_group_id :=
324: per_kad_shd.g_old_rec.business_group_id;
325: End If;
326: If (p_rec.person_id = hr_api.g_number) then
327: p_rec.person_id :=
328: per_kad_shd.g_old_rec.person_id;

Line 328: per_kad_shd.g_old_rec.person_id;

324: per_kad_shd.g_old_rec.business_group_id;
325: End If;
326: If (p_rec.person_id = hr_api.g_number) then
327: p_rec.person_id :=
328: per_kad_shd.g_old_rec.person_id;
329: End If;
330: If (p_rec.date_from = hr_api.g_date) then
331: p_rec.date_from :=
332: per_kad_shd.g_old_rec.date_from;

Line 332: per_kad_shd.g_old_rec.date_from;

328: per_kad_shd.g_old_rec.person_id;
329: End If;
330: If (p_rec.date_from = hr_api.g_date) then
331: p_rec.date_from :=
332: per_kad_shd.g_old_rec.date_from;
333: End If;
334: If (p_rec.primary_flag = hr_api.g_varchar2) then
335: p_rec.primary_flag :=
336: per_kad_shd.g_old_rec.primary_flag;

Line 336: per_kad_shd.g_old_rec.primary_flag;

332: per_kad_shd.g_old_rec.date_from;
333: End If;
334: If (p_rec.primary_flag = hr_api.g_varchar2) then
335: p_rec.primary_flag :=
336: per_kad_shd.g_old_rec.primary_flag;
337: End If;
338: If (p_rec.style = hr_api.g_varchar2) then
339: p_rec.style :=
340: per_kad_shd.g_old_rec.style;

Line 340: per_kad_shd.g_old_rec.style;

336: per_kad_shd.g_old_rec.primary_flag;
337: End If;
338: If (p_rec.style = hr_api.g_varchar2) then
339: p_rec.style :=
340: per_kad_shd.g_old_rec.style;
341: End If;
342: If (p_rec.address_line1 = hr_api.g_varchar2) then
343: p_rec.address_line1 :=
344: per_kad_shd.g_old_rec.address_line1;

Line 344: per_kad_shd.g_old_rec.address_line1;

340: per_kad_shd.g_old_rec.style;
341: End If;
342: If (p_rec.address_line1 = hr_api.g_varchar2) then
343: p_rec.address_line1 :=
344: per_kad_shd.g_old_rec.address_line1;
345: End If;
346: If (p_rec.address_line2 = hr_api.g_varchar2) then
347: p_rec.address_line2 :=
348: per_kad_shd.g_old_rec.address_line2;

Line 348: per_kad_shd.g_old_rec.address_line2;

344: per_kad_shd.g_old_rec.address_line1;
345: End If;
346: If (p_rec.address_line2 = hr_api.g_varchar2) then
347: p_rec.address_line2 :=
348: per_kad_shd.g_old_rec.address_line2;
349: End If;
350: If (p_rec.address_line3 = hr_api.g_varchar2) then
351: p_rec.address_line3 :=
352: per_kad_shd.g_old_rec.address_line3;

Line 352: per_kad_shd.g_old_rec.address_line3;

348: per_kad_shd.g_old_rec.address_line2;
349: End If;
350: If (p_rec.address_line3 = hr_api.g_varchar2) then
351: p_rec.address_line3 :=
352: per_kad_shd.g_old_rec.address_line3;
353: End If;
354: If (p_rec.address_type = hr_api.g_varchar2) then
355: p_rec.address_type :=
356: per_kad_shd.g_old_rec.address_type;

Line 356: per_kad_shd.g_old_rec.address_type;

352: per_kad_shd.g_old_rec.address_line3;
353: End If;
354: If (p_rec.address_type = hr_api.g_varchar2) then
355: p_rec.address_type :=
356: per_kad_shd.g_old_rec.address_type;
357: End If;
358: If (p_rec.comments = hr_api.g_varchar2) then
359: p_rec.comments :=
360: per_kad_shd.g_old_rec.comments;

Line 360: per_kad_shd.g_old_rec.comments;

356: per_kad_shd.g_old_rec.address_type;
357: End If;
358: If (p_rec.comments = hr_api.g_varchar2) then
359: p_rec.comments :=
360: per_kad_shd.g_old_rec.comments;
361: End If;
362: If (p_rec.country = hr_api.g_varchar2) then
363: p_rec.country :=
364: per_kad_shd.g_old_rec.country;

Line 364: per_kad_shd.g_old_rec.country;

360: per_kad_shd.g_old_rec.comments;
361: End If;
362: If (p_rec.country = hr_api.g_varchar2) then
363: p_rec.country :=
364: per_kad_shd.g_old_rec.country;
365: End If;
366: If (p_rec.date_to = hr_api.g_date) then
367: p_rec.date_to :=
368: per_kad_shd.g_old_rec.date_to;

Line 368: per_kad_shd.g_old_rec.date_to;

364: per_kad_shd.g_old_rec.country;
365: End If;
366: If (p_rec.date_to = hr_api.g_date) then
367: p_rec.date_to :=
368: per_kad_shd.g_old_rec.date_to;
369: End If;
370: If (p_rec.postal_code = hr_api.g_varchar2) then
371: p_rec.postal_code :=
372: per_kad_shd.g_old_rec.postal_code;

Line 372: per_kad_shd.g_old_rec.postal_code;

368: per_kad_shd.g_old_rec.date_to;
369: End If;
370: If (p_rec.postal_code = hr_api.g_varchar2) then
371: p_rec.postal_code :=
372: per_kad_shd.g_old_rec.postal_code;
373: End If;
374: If (p_rec.region_1 = hr_api.g_varchar2) then
375: p_rec.region_1 :=
376: per_kad_shd.g_old_rec.region_1;

Line 376: per_kad_shd.g_old_rec.region_1;

372: per_kad_shd.g_old_rec.postal_code;
373: End If;
374: If (p_rec.region_1 = hr_api.g_varchar2) then
375: p_rec.region_1 :=
376: per_kad_shd.g_old_rec.region_1;
377: End If;
378: If (p_rec.region_2 = hr_api.g_varchar2) then
379: p_rec.region_2 :=
380: per_kad_shd.g_old_rec.region_2;

Line 380: per_kad_shd.g_old_rec.region_2;

376: per_kad_shd.g_old_rec.region_1;
377: End If;
378: If (p_rec.region_2 = hr_api.g_varchar2) then
379: p_rec.region_2 :=
380: per_kad_shd.g_old_rec.region_2;
381: End If;
382: If (p_rec.region_3 = hr_api.g_varchar2) then
383: p_rec.region_3 :=
384: per_kad_shd.g_old_rec.region_3;

Line 384: per_kad_shd.g_old_rec.region_3;

380: per_kad_shd.g_old_rec.region_2;
381: End If;
382: If (p_rec.region_3 = hr_api.g_varchar2) then
383: p_rec.region_3 :=
384: per_kad_shd.g_old_rec.region_3;
385: End If;
386: If (p_rec.telephone_number_1 = hr_api.g_varchar2) then
387: p_rec.telephone_number_1 :=
388: per_kad_shd.g_old_rec.telephone_number_1;

Line 388: per_kad_shd.g_old_rec.telephone_number_1;

384: per_kad_shd.g_old_rec.region_3;
385: End If;
386: If (p_rec.telephone_number_1 = hr_api.g_varchar2) then
387: p_rec.telephone_number_1 :=
388: per_kad_shd.g_old_rec.telephone_number_1;
389: End If;
390: If (p_rec.telephone_number_2 = hr_api.g_varchar2) then
391: p_rec.telephone_number_2 :=
392: per_kad_shd.g_old_rec.telephone_number_2;

Line 392: per_kad_shd.g_old_rec.telephone_number_2;

388: per_kad_shd.g_old_rec.telephone_number_1;
389: End If;
390: If (p_rec.telephone_number_2 = hr_api.g_varchar2) then
391: p_rec.telephone_number_2 :=
392: per_kad_shd.g_old_rec.telephone_number_2;
393: End If;
394: If (p_rec.telephone_number_3 = hr_api.g_varchar2) then
395: p_rec.telephone_number_3 :=
396: per_kad_shd.g_old_rec.telephone_number_3;

Line 396: per_kad_shd.g_old_rec.telephone_number_3;

392: per_kad_shd.g_old_rec.telephone_number_2;
393: End If;
394: If (p_rec.telephone_number_3 = hr_api.g_varchar2) then
395: p_rec.telephone_number_3 :=
396: per_kad_shd.g_old_rec.telephone_number_3;
397: End If;
398: If (p_rec.town_or_city = hr_api.g_varchar2) then
399: p_rec.town_or_city :=
400: per_kad_shd.g_old_rec.town_or_city;

Line 400: per_kad_shd.g_old_rec.town_or_city;

396: per_kad_shd.g_old_rec.telephone_number_3;
397: End If;
398: If (p_rec.town_or_city = hr_api.g_varchar2) then
399: p_rec.town_or_city :=
400: per_kad_shd.g_old_rec.town_or_city;
401: End If;
402: If (p_rec.request_id = hr_api.g_number) then
403: p_rec.request_id :=
404: per_kad_shd.g_old_rec.request_id;

Line 404: per_kad_shd.g_old_rec.request_id;

400: per_kad_shd.g_old_rec.town_or_city;
401: End If;
402: If (p_rec.request_id = hr_api.g_number) then
403: p_rec.request_id :=
404: per_kad_shd.g_old_rec.request_id;
405: End If;
406: If (p_rec.program_application_id = hr_api.g_number) then
407: p_rec.program_application_id :=
408: per_kad_shd.g_old_rec.program_application_id;

Line 408: per_kad_shd.g_old_rec.program_application_id;

404: per_kad_shd.g_old_rec.request_id;
405: End If;
406: If (p_rec.program_application_id = hr_api.g_number) then
407: p_rec.program_application_id :=
408: per_kad_shd.g_old_rec.program_application_id;
409: End If;
410: If (p_rec.program_id = hr_api.g_number) then
411: p_rec.program_id :=
412: per_kad_shd.g_old_rec.program_id;

Line 412: per_kad_shd.g_old_rec.program_id;

408: per_kad_shd.g_old_rec.program_application_id;
409: End If;
410: If (p_rec.program_id = hr_api.g_number) then
411: p_rec.program_id :=
412: per_kad_shd.g_old_rec.program_id;
413: End If;
414: If (p_rec.program_update_date = hr_api.g_date) then
415: p_rec.program_update_date :=
416: per_kad_shd.g_old_rec.program_update_date;

Line 416: per_kad_shd.g_old_rec.program_update_date;

412: per_kad_shd.g_old_rec.program_id;
413: End If;
414: If (p_rec.program_update_date = hr_api.g_date) then
415: p_rec.program_update_date :=
416: per_kad_shd.g_old_rec.program_update_date;
417: End If;
418: If (p_rec.addr_attribute_category = hr_api.g_varchar2) then
419: p_rec.addr_attribute_category :=
420: per_kad_shd.g_old_rec.addr_attribute_category;

Line 420: per_kad_shd.g_old_rec.addr_attribute_category;

416: per_kad_shd.g_old_rec.program_update_date;
417: End If;
418: If (p_rec.addr_attribute_category = hr_api.g_varchar2) then
419: p_rec.addr_attribute_category :=
420: per_kad_shd.g_old_rec.addr_attribute_category;
421: End If;
422: If (p_rec.addr_attribute1 = hr_api.g_varchar2) then
423: p_rec.addr_attribute1 :=
424: per_kad_shd.g_old_rec.addr_attribute1;

Line 424: per_kad_shd.g_old_rec.addr_attribute1;

420: per_kad_shd.g_old_rec.addr_attribute_category;
421: End If;
422: If (p_rec.addr_attribute1 = hr_api.g_varchar2) then
423: p_rec.addr_attribute1 :=
424: per_kad_shd.g_old_rec.addr_attribute1;
425: End If;
426: If (p_rec.addr_attribute2 = hr_api.g_varchar2) then
427: p_rec.addr_attribute2 :=
428: per_kad_shd.g_old_rec.addr_attribute2;

Line 428: per_kad_shd.g_old_rec.addr_attribute2;

424: per_kad_shd.g_old_rec.addr_attribute1;
425: End If;
426: If (p_rec.addr_attribute2 = hr_api.g_varchar2) then
427: p_rec.addr_attribute2 :=
428: per_kad_shd.g_old_rec.addr_attribute2;
429: End If;
430: If (p_rec.addr_attribute3 = hr_api.g_varchar2) then
431: p_rec.addr_attribute3 :=
432: per_kad_shd.g_old_rec.addr_attribute3;

Line 432: per_kad_shd.g_old_rec.addr_attribute3;

428: per_kad_shd.g_old_rec.addr_attribute2;
429: End If;
430: If (p_rec.addr_attribute3 = hr_api.g_varchar2) then
431: p_rec.addr_attribute3 :=
432: per_kad_shd.g_old_rec.addr_attribute3;
433: End If;
434: If (p_rec.addr_attribute4 = hr_api.g_varchar2) then
435: p_rec.addr_attribute4 :=
436: per_kad_shd.g_old_rec.addr_attribute4;

Line 436: per_kad_shd.g_old_rec.addr_attribute4;

432: per_kad_shd.g_old_rec.addr_attribute3;
433: End If;
434: If (p_rec.addr_attribute4 = hr_api.g_varchar2) then
435: p_rec.addr_attribute4 :=
436: per_kad_shd.g_old_rec.addr_attribute4;
437: End If;
438: If (p_rec.addr_attribute5 = hr_api.g_varchar2) then
439: p_rec.addr_attribute5 :=
440: per_kad_shd.g_old_rec.addr_attribute5;

Line 440: per_kad_shd.g_old_rec.addr_attribute5;

436: per_kad_shd.g_old_rec.addr_attribute4;
437: End If;
438: If (p_rec.addr_attribute5 = hr_api.g_varchar2) then
439: p_rec.addr_attribute5 :=
440: per_kad_shd.g_old_rec.addr_attribute5;
441: End If;
442: If (p_rec.addr_attribute6 = hr_api.g_varchar2) then
443: p_rec.addr_attribute6 :=
444: per_kad_shd.g_old_rec.addr_attribute6;

Line 444: per_kad_shd.g_old_rec.addr_attribute6;

440: per_kad_shd.g_old_rec.addr_attribute5;
441: End If;
442: If (p_rec.addr_attribute6 = hr_api.g_varchar2) then
443: p_rec.addr_attribute6 :=
444: per_kad_shd.g_old_rec.addr_attribute6;
445: End If;
446: If (p_rec.addr_attribute7 = hr_api.g_varchar2) then
447: p_rec.addr_attribute7 :=
448: per_kad_shd.g_old_rec.addr_attribute7;

Line 448: per_kad_shd.g_old_rec.addr_attribute7;

444: per_kad_shd.g_old_rec.addr_attribute6;
445: End If;
446: If (p_rec.addr_attribute7 = hr_api.g_varchar2) then
447: p_rec.addr_attribute7 :=
448: per_kad_shd.g_old_rec.addr_attribute7;
449: End If;
450: If (p_rec.addr_attribute8 = hr_api.g_varchar2) then
451: p_rec.addr_attribute8 :=
452: per_kad_shd.g_old_rec.addr_attribute8;

Line 452: per_kad_shd.g_old_rec.addr_attribute8;

448: per_kad_shd.g_old_rec.addr_attribute7;
449: End If;
450: If (p_rec.addr_attribute8 = hr_api.g_varchar2) then
451: p_rec.addr_attribute8 :=
452: per_kad_shd.g_old_rec.addr_attribute8;
453: End If;
454: If (p_rec.addr_attribute9 = hr_api.g_varchar2) then
455: p_rec.addr_attribute9 :=
456: per_kad_shd.g_old_rec.addr_attribute9;

Line 456: per_kad_shd.g_old_rec.addr_attribute9;

452: per_kad_shd.g_old_rec.addr_attribute8;
453: End If;
454: If (p_rec.addr_attribute9 = hr_api.g_varchar2) then
455: p_rec.addr_attribute9 :=
456: per_kad_shd.g_old_rec.addr_attribute9;
457: End If;
458: If (p_rec.addr_attribute10 = hr_api.g_varchar2) then
459: p_rec.addr_attribute10 :=
460: per_kad_shd.g_old_rec.addr_attribute10;

Line 460: per_kad_shd.g_old_rec.addr_attribute10;

456: per_kad_shd.g_old_rec.addr_attribute9;
457: End If;
458: If (p_rec.addr_attribute10 = hr_api.g_varchar2) then
459: p_rec.addr_attribute10 :=
460: per_kad_shd.g_old_rec.addr_attribute10;
461: End If;
462: If (p_rec.addr_attribute11 = hr_api.g_varchar2) then
463: p_rec.addr_attribute11 :=
464: per_kad_shd.g_old_rec.addr_attribute11;

Line 464: per_kad_shd.g_old_rec.addr_attribute11;

460: per_kad_shd.g_old_rec.addr_attribute10;
461: End If;
462: If (p_rec.addr_attribute11 = hr_api.g_varchar2) then
463: p_rec.addr_attribute11 :=
464: per_kad_shd.g_old_rec.addr_attribute11;
465: End If;
466: If (p_rec.addr_attribute12 = hr_api.g_varchar2) then
467: p_rec.addr_attribute12 :=
468: per_kad_shd.g_old_rec.addr_attribute12;

Line 468: per_kad_shd.g_old_rec.addr_attribute12;

464: per_kad_shd.g_old_rec.addr_attribute11;
465: End If;
466: If (p_rec.addr_attribute12 = hr_api.g_varchar2) then
467: p_rec.addr_attribute12 :=
468: per_kad_shd.g_old_rec.addr_attribute12;
469: End If;
470: If (p_rec.addr_attribute13 = hr_api.g_varchar2) then
471: p_rec.addr_attribute13 :=
472: per_kad_shd.g_old_rec.addr_attribute13;

Line 472: per_kad_shd.g_old_rec.addr_attribute13;

468: per_kad_shd.g_old_rec.addr_attribute12;
469: End If;
470: If (p_rec.addr_attribute13 = hr_api.g_varchar2) then
471: p_rec.addr_attribute13 :=
472: per_kad_shd.g_old_rec.addr_attribute13;
473: End If;
474: If (p_rec.addr_attribute14 = hr_api.g_varchar2) then
475: p_rec.addr_attribute14 :=
476: per_kad_shd.g_old_rec.addr_attribute14;

Line 476: per_kad_shd.g_old_rec.addr_attribute14;

472: per_kad_shd.g_old_rec.addr_attribute13;
473: End If;
474: If (p_rec.addr_attribute14 = hr_api.g_varchar2) then
475: p_rec.addr_attribute14 :=
476: per_kad_shd.g_old_rec.addr_attribute14;
477: End If;
478: If (p_rec.addr_attribute15 = hr_api.g_varchar2) then
479: p_rec.addr_attribute15 :=
480: per_kad_shd.g_old_rec.addr_attribute15;

Line 480: per_kad_shd.g_old_rec.addr_attribute15;

476: per_kad_shd.g_old_rec.addr_attribute14;
477: End If;
478: If (p_rec.addr_attribute15 = hr_api.g_varchar2) then
479: p_rec.addr_attribute15 :=
480: per_kad_shd.g_old_rec.addr_attribute15;
481: End If;
482: If (p_rec.addr_attribute16 = hr_api.g_varchar2) then
483: p_rec.addr_attribute16 :=
484: per_kad_shd.g_old_rec.addr_attribute16;

Line 484: per_kad_shd.g_old_rec.addr_attribute16;

480: per_kad_shd.g_old_rec.addr_attribute15;
481: End If;
482: If (p_rec.addr_attribute16 = hr_api.g_varchar2) then
483: p_rec.addr_attribute16 :=
484: per_kad_shd.g_old_rec.addr_attribute16;
485: End If;
486: If (p_rec.addr_attribute17 = hr_api.g_varchar2) then
487: p_rec.addr_attribute17 :=
488: per_kad_shd.g_old_rec.addr_attribute17;

Line 488: per_kad_shd.g_old_rec.addr_attribute17;

484: per_kad_shd.g_old_rec.addr_attribute16;
485: End If;
486: If (p_rec.addr_attribute17 = hr_api.g_varchar2) then
487: p_rec.addr_attribute17 :=
488: per_kad_shd.g_old_rec.addr_attribute17;
489: End If;
490: If (p_rec.addr_attribute18 = hr_api.g_varchar2) then
491: p_rec.addr_attribute18 :=
492: per_kad_shd.g_old_rec.addr_attribute18;

Line 492: per_kad_shd.g_old_rec.addr_attribute18;

488: per_kad_shd.g_old_rec.addr_attribute17;
489: End If;
490: If (p_rec.addr_attribute18 = hr_api.g_varchar2) then
491: p_rec.addr_attribute18 :=
492: per_kad_shd.g_old_rec.addr_attribute18;
493: End If;
494: If (p_rec.addr_attribute19 = hr_api.g_varchar2) then
495: p_rec.addr_attribute19 :=
496: per_kad_shd.g_old_rec.addr_attribute19;

Line 496: per_kad_shd.g_old_rec.addr_attribute19;

492: per_kad_shd.g_old_rec.addr_attribute18;
493: End If;
494: If (p_rec.addr_attribute19 = hr_api.g_varchar2) then
495: p_rec.addr_attribute19 :=
496: per_kad_shd.g_old_rec.addr_attribute19;
497: End If;
498: If (p_rec.addr_attribute20 = hr_api.g_varchar2) then
499: p_rec.addr_attribute20 :=
500: per_kad_shd.g_old_rec.addr_attribute20;

Line 500: per_kad_shd.g_old_rec.addr_attribute20;

496: per_kad_shd.g_old_rec.addr_attribute19;
497: End If;
498: If (p_rec.addr_attribute20 = hr_api.g_varchar2) then
499: p_rec.addr_attribute20 :=
500: per_kad_shd.g_old_rec.addr_attribute20;
501: End If;
502:
503: --
504: -- Return the plsql record structure.

Line 516: p_rec in out nocopy per_kad_shd.g_rec_type

512: -- |---------------------------------< upd >----------------------------------|
513: -- ----------------------------------------------------------------------------
514: Procedure upd
515: (
516: p_rec in out nocopy per_kad_shd.g_rec_type
517: ,p_validate in boolean default false
518: ,p_effective_date in date
519: ) is
520: --

Line 522: l_convert per_kad_shd.g_rec_type;

518: ,p_effective_date in date
519: ) is
520: --
521: l_proc varchar2(72) := g_package||'upd';
522: l_convert per_kad_shd.g_rec_type;
523: --
524: Begin
525: hr_utility.set_location('Entering:'||l_proc, 5);
526: --

Line 538: per_kad_shd.lck

534: End If;
535: --
536: -- We must lock the row which we need to update.
537: --
538: per_kad_shd.lck
539: (
540: p_rec.address_id,
541: p_rec.object_version_number
542: );

Line 638: l_rec per_kad_shd.g_rec_type;

634: ,p_validate in boolean default false
635: ,p_effective_date in date
636: ) is
637: --
638: l_rec per_kad_shd.g_rec_type;
639: l_proc varchar2(72) := g_package||'upd';
640: --
641: Begin
642: hr_utility.set_location('Entering:'||l_proc, 5);

Line 648: per_kad_shd.convert_args

644: -- Call conversion function to turn arguments into the
645: -- l_rec structure.
646: --
647: l_rec :=
648: per_kad_shd.convert_args
649: (
650: p_address_id,
651: -- 70.2 change a start.
652: hr_api.g_number,