236: per.first_name;
237: --
238: begin
239: --
240: hr_utility.set_location('Entering : ' || l_proc, 10);
241: --
242: -- If p_effective_date is null, use session_date as effective_date.
243: -- Never cache effective_date into package global variables
244: -- which will cause inconsistency when retropay is run.
252: --
253: l_soy := trunc(l_effective_date, 'YYYY');
254: l_eoy := add_months(l_soy, 12) - 1;
255: --
256: --hr_utility.trace('L_EFFECTIVE_DATE : ' || fnd_date.date_to_chardate(l_effective_date));
257: --hr_utility.trace('L_SOY : ' || fnd_date.date_to_chardate(l_soy));
258: --hr_utility.trace('L_EOY : ' || fnd_date.date_to_chardate(l_eoy));
259: --
260: -- If cache is available, use cache.
253: l_soy := trunc(l_effective_date, 'YYYY');
254: l_eoy := add_months(l_soy, 12) - 1;
255: --
256: --hr_utility.trace('L_EFFECTIVE_DATE : ' || fnd_date.date_to_chardate(l_effective_date));
257: --hr_utility.trace('L_SOY : ' || fnd_date.date_to_chardate(l_soy));
258: --hr_utility.trace('L_EOY : ' || fnd_date.date_to_chardate(l_eoy));
259: --
260: -- If cache is available, use cache.
261: --
254: l_eoy := add_months(l_soy, 12) - 1;
255: --
256: --hr_utility.trace('L_EFFECTIVE_DATE : ' || fnd_date.date_to_chardate(l_effective_date));
257: --hr_utility.trace('L_SOY : ' || fnd_date.date_to_chardate(l_soy));
258: --hr_utility.trace('L_EOY : ' || fnd_date.date_to_chardate(l_eoy));
259: --
260: -- If cache is available, use cache.
261: --
262: if p_use_cache
263: and g_itax_dpnt_rec.assignment_id = p_assignment_id
264: and g_itax_dpnt_rec.itax_type = p_itax_type
265: and g_itax_dpnt_rec.effective_date = l_effective_date then
266: --
267: hr_utility.trace('Cache is available.');
268: --
269: p_itax_dpnt_rec := g_itax_dpnt_rec;
270: --
271: -- Cache is not available, derive directly from CTR and CEI.
271: -- Cache is not available, derive directly from CTR and CEI.
272: --
273: else
274: --
275: hr_utility.trace('Cache is NOT available. Derive from CTR and CEI.');
276: --
277: -- Initialization for "p_itax_dpnt_rec" is automatically done by "OUT" parameter.
278: --
279: p_itax_dpnt_rec.assignment_id := p_assignment_id;
283: -- Income Tax Type "KOU"
284: --
285: if p_itax_type in ('M_KOU', 'D_KOU', 'M_OTSU', 'D_OTSU') then
286: --
287: hr_utility.trace('Taxation Type : ' || p_itax_type);
288: --
289: if p_itax_type in ('M_KOU', 'D_KOU') then
290: l_information_type := c_kou_information_type;
291: else
293: end if;
294: --
295: for l_dpnt in csr_dpnt(l_information_type) loop
296: --
297: hr_utility.trace('**********');
298: --hr_utility.trace('Effective Date : ' || fnd_date.date_to_chardate(l_dpnt.effective_date));
299: --hr_utility.trace('Date of Birth : ' || fnd_date.date_to_chardate(l_dpnt.date_of_birth));
300: --hr_utility.trace('Date of Death : ' || fnd_date.date_to_chardate(l_dpnt.date_of_death));
301: hr_utility.trace('Contact Type : ' || l_dpnt.contact_type);
294: --
295: for l_dpnt in csr_dpnt(l_information_type) loop
296: --
297: hr_utility.trace('**********');
298: --hr_utility.trace('Effective Date : ' || fnd_date.date_to_chardate(l_dpnt.effective_date));
299: --hr_utility.trace('Date of Birth : ' || fnd_date.date_to_chardate(l_dpnt.date_of_birth));
300: --hr_utility.trace('Date of Death : ' || fnd_date.date_to_chardate(l_dpnt.date_of_death));
301: hr_utility.trace('Contact Type : ' || l_dpnt.contact_type);
302: hr_utility.trace('Last Name : ' || l_dpnt.first_name_kana);
295: for l_dpnt in csr_dpnt(l_information_type) loop
296: --
297: hr_utility.trace('**********');
298: --hr_utility.trace('Effective Date : ' || fnd_date.date_to_chardate(l_dpnt.effective_date));
299: --hr_utility.trace('Date of Birth : ' || fnd_date.date_to_chardate(l_dpnt.date_of_birth));
300: --hr_utility.trace('Date of Death : ' || fnd_date.date_to_chardate(l_dpnt.date_of_death));
301: hr_utility.trace('Contact Type : ' || l_dpnt.contact_type);
302: hr_utility.trace('Last Name : ' || l_dpnt.first_name_kana);
303: hr_utility.trace('Age : ' || l_dpnt.age);
296: --
297: hr_utility.trace('**********');
298: --hr_utility.trace('Effective Date : ' || fnd_date.date_to_chardate(l_dpnt.effective_date));
299: --hr_utility.trace('Date of Birth : ' || fnd_date.date_to_chardate(l_dpnt.date_of_birth));
300: --hr_utility.trace('Date of Death : ' || fnd_date.date_to_chardate(l_dpnt.date_of_death));
301: hr_utility.trace('Contact Type : ' || l_dpnt.contact_type);
302: hr_utility.trace('Last Name : ' || l_dpnt.first_name_kana);
303: hr_utility.trace('Age : ' || l_dpnt.age);
304: --
297: hr_utility.trace('**********');
298: --hr_utility.trace('Effective Date : ' || fnd_date.date_to_chardate(l_dpnt.effective_date));
299: --hr_utility.trace('Date of Birth : ' || fnd_date.date_to_chardate(l_dpnt.date_of_birth));
300: --hr_utility.trace('Date of Death : ' || fnd_date.date_to_chardate(l_dpnt.date_of_death));
301: hr_utility.trace('Contact Type : ' || l_dpnt.contact_type);
302: hr_utility.trace('Last Name : ' || l_dpnt.first_name_kana);
303: hr_utility.trace('Age : ' || l_dpnt.age);
304: --
305: --
298: --hr_utility.trace('Effective Date : ' || fnd_date.date_to_chardate(l_dpnt.effective_date));
299: --hr_utility.trace('Date of Birth : ' || fnd_date.date_to_chardate(l_dpnt.date_of_birth));
300: --hr_utility.trace('Date of Death : ' || fnd_date.date_to_chardate(l_dpnt.date_of_death));
301: hr_utility.trace('Contact Type : ' || l_dpnt.contact_type);
302: hr_utility.trace('Last Name : ' || l_dpnt.first_name_kana);
303: hr_utility.trace('Age : ' || l_dpnt.age);
304: --
305: --
306: -- If the contact_type is "Spouse"
299: --hr_utility.trace('Date of Birth : ' || fnd_date.date_to_chardate(l_dpnt.date_of_birth));
300: --hr_utility.trace('Date of Death : ' || fnd_date.date_to_chardate(l_dpnt.date_of_death));
301: hr_utility.trace('Contact Type : ' || l_dpnt.contact_type);
302: hr_utility.trace('Last Name : ' || l_dpnt.first_name_kana);
303: hr_utility.trace('Age : ' || l_dpnt.age);
304: --
305: --
306: -- If the contact_type is "Spouse"
307: --
445: -- for input parameters.
446: --
447: g_itax_dpnt_rec := p_itax_dpnt_rec;
448: --
449: hr_utility.trace('**********');
450: hr_utility.trace('spouse_type : ' || p_itax_dpnt_rec.spouse_type);
451: hr_utility.trace('dpnt_spouse_dsbl_type : ' || p_itax_dpnt_rec.dpnt_spouse_dsbl_type);
452: hr_utility.trace('dpnts : ' || to_char(p_itax_dpnt_rec.dpnts));
453: hr_utility.trace('aged_dpnts : ' || to_char(p_itax_dpnt_rec.aged_dpnts));
446: --
447: g_itax_dpnt_rec := p_itax_dpnt_rec;
448: --
449: hr_utility.trace('**********');
450: hr_utility.trace('spouse_type : ' || p_itax_dpnt_rec.spouse_type);
451: hr_utility.trace('dpnt_spouse_dsbl_type : ' || p_itax_dpnt_rec.dpnt_spouse_dsbl_type);
452: hr_utility.trace('dpnts : ' || to_char(p_itax_dpnt_rec.dpnts));
453: hr_utility.trace('aged_dpnts : ' || to_char(p_itax_dpnt_rec.aged_dpnts));
454: hr_utility.trace('aged_dpnt_parents_lt : ' || to_char(p_itax_dpnt_rec.aged_dpnt_parents_lt));
447: g_itax_dpnt_rec := p_itax_dpnt_rec;
448: --
449: hr_utility.trace('**********');
450: hr_utility.trace('spouse_type : ' || p_itax_dpnt_rec.spouse_type);
451: hr_utility.trace('dpnt_spouse_dsbl_type : ' || p_itax_dpnt_rec.dpnt_spouse_dsbl_type);
452: hr_utility.trace('dpnts : ' || to_char(p_itax_dpnt_rec.dpnts));
453: hr_utility.trace('aged_dpnts : ' || to_char(p_itax_dpnt_rec.aged_dpnts));
454: hr_utility.trace('aged_dpnt_parents_lt : ' || to_char(p_itax_dpnt_rec.aged_dpnt_parents_lt));
455: hr_utility.trace('young_dpnts : ' || to_char(p_itax_dpnt_rec.young_dpnts));
448: --
449: hr_utility.trace('**********');
450: hr_utility.trace('spouse_type : ' || p_itax_dpnt_rec.spouse_type);
451: hr_utility.trace('dpnt_spouse_dsbl_type : ' || p_itax_dpnt_rec.dpnt_spouse_dsbl_type);
452: hr_utility.trace('dpnts : ' || to_char(p_itax_dpnt_rec.dpnts));
453: hr_utility.trace('aged_dpnts : ' || to_char(p_itax_dpnt_rec.aged_dpnts));
454: hr_utility.trace('aged_dpnt_parents_lt : ' || to_char(p_itax_dpnt_rec.aged_dpnt_parents_lt));
455: hr_utility.trace('young_dpnts : ' || to_char(p_itax_dpnt_rec.young_dpnts));
456: hr_utility.trace('minor_dpnts : ' || to_char(p_itax_dpnt_rec.minor_dpnts));
449: hr_utility.trace('**********');
450: hr_utility.trace('spouse_type : ' || p_itax_dpnt_rec.spouse_type);
451: hr_utility.trace('dpnt_spouse_dsbl_type : ' || p_itax_dpnt_rec.dpnt_spouse_dsbl_type);
452: hr_utility.trace('dpnts : ' || to_char(p_itax_dpnt_rec.dpnts));
453: hr_utility.trace('aged_dpnts : ' || to_char(p_itax_dpnt_rec.aged_dpnts));
454: hr_utility.trace('aged_dpnt_parents_lt : ' || to_char(p_itax_dpnt_rec.aged_dpnt_parents_lt));
455: hr_utility.trace('young_dpnts : ' || to_char(p_itax_dpnt_rec.young_dpnts));
456: hr_utility.trace('minor_dpnts : ' || to_char(p_itax_dpnt_rec.minor_dpnts));
457: hr_utility.trace('dsbl_dpnts : ' || to_char(p_itax_dpnt_rec.dsbl_dpnts));
450: hr_utility.trace('spouse_type : ' || p_itax_dpnt_rec.spouse_type);
451: hr_utility.trace('dpnt_spouse_dsbl_type : ' || p_itax_dpnt_rec.dpnt_spouse_dsbl_type);
452: hr_utility.trace('dpnts : ' || to_char(p_itax_dpnt_rec.dpnts));
453: hr_utility.trace('aged_dpnts : ' || to_char(p_itax_dpnt_rec.aged_dpnts));
454: hr_utility.trace('aged_dpnt_parents_lt : ' || to_char(p_itax_dpnt_rec.aged_dpnt_parents_lt));
455: hr_utility.trace('young_dpnts : ' || to_char(p_itax_dpnt_rec.young_dpnts));
456: hr_utility.trace('minor_dpnts : ' || to_char(p_itax_dpnt_rec.minor_dpnts));
457: hr_utility.trace('dsbl_dpnts : ' || to_char(p_itax_dpnt_rec.dsbl_dpnts));
458: hr_utility.trace('svr_dsbl_dpnts : ' || to_char(p_itax_dpnt_rec.svr_dsbl_dpnts));
451: hr_utility.trace('dpnt_spouse_dsbl_type : ' || p_itax_dpnt_rec.dpnt_spouse_dsbl_type);
452: hr_utility.trace('dpnts : ' || to_char(p_itax_dpnt_rec.dpnts));
453: hr_utility.trace('aged_dpnts : ' || to_char(p_itax_dpnt_rec.aged_dpnts));
454: hr_utility.trace('aged_dpnt_parents_lt : ' || to_char(p_itax_dpnt_rec.aged_dpnt_parents_lt));
455: hr_utility.trace('young_dpnts : ' || to_char(p_itax_dpnt_rec.young_dpnts));
456: hr_utility.trace('minor_dpnts : ' || to_char(p_itax_dpnt_rec.minor_dpnts));
457: hr_utility.trace('dsbl_dpnts : ' || to_char(p_itax_dpnt_rec.dsbl_dpnts));
458: hr_utility.trace('svr_dsbl_dpnts : ' || to_char(p_itax_dpnt_rec.svr_dsbl_dpnts));
459: hr_utility.trace('svr_dsbl_dpnts_lt : ' || to_char(p_itax_dpnt_rec.svr_dsbl_dpnts_lt));
452: hr_utility.trace('dpnts : ' || to_char(p_itax_dpnt_rec.dpnts));
453: hr_utility.trace('aged_dpnts : ' || to_char(p_itax_dpnt_rec.aged_dpnts));
454: hr_utility.trace('aged_dpnt_parents_lt : ' || to_char(p_itax_dpnt_rec.aged_dpnt_parents_lt));
455: hr_utility.trace('young_dpnts : ' || to_char(p_itax_dpnt_rec.young_dpnts));
456: hr_utility.trace('minor_dpnts : ' || to_char(p_itax_dpnt_rec.minor_dpnts));
457: hr_utility.trace('dsbl_dpnts : ' || to_char(p_itax_dpnt_rec.dsbl_dpnts));
458: hr_utility.trace('svr_dsbl_dpnts : ' || to_char(p_itax_dpnt_rec.svr_dsbl_dpnts));
459: hr_utility.trace('svr_dsbl_dpnts_lt : ' || to_char(p_itax_dpnt_rec.svr_dsbl_dpnts_lt));
460: --
453: hr_utility.trace('aged_dpnts : ' || to_char(p_itax_dpnt_rec.aged_dpnts));
454: hr_utility.trace('aged_dpnt_parents_lt : ' || to_char(p_itax_dpnt_rec.aged_dpnt_parents_lt));
455: hr_utility.trace('young_dpnts : ' || to_char(p_itax_dpnt_rec.young_dpnts));
456: hr_utility.trace('minor_dpnts : ' || to_char(p_itax_dpnt_rec.minor_dpnts));
457: hr_utility.trace('dsbl_dpnts : ' || to_char(p_itax_dpnt_rec.dsbl_dpnts));
458: hr_utility.trace('svr_dsbl_dpnts : ' || to_char(p_itax_dpnt_rec.svr_dsbl_dpnts));
459: hr_utility.trace('svr_dsbl_dpnts_lt : ' || to_char(p_itax_dpnt_rec.svr_dsbl_dpnts_lt));
460: --
461: if p_itax_dpnt_rec.multiple_spouses_warning then
454: hr_utility.trace('aged_dpnt_parents_lt : ' || to_char(p_itax_dpnt_rec.aged_dpnt_parents_lt));
455: hr_utility.trace('young_dpnts : ' || to_char(p_itax_dpnt_rec.young_dpnts));
456: hr_utility.trace('minor_dpnts : ' || to_char(p_itax_dpnt_rec.minor_dpnts));
457: hr_utility.trace('dsbl_dpnts : ' || to_char(p_itax_dpnt_rec.dsbl_dpnts));
458: hr_utility.trace('svr_dsbl_dpnts : ' || to_char(p_itax_dpnt_rec.svr_dsbl_dpnts));
459: hr_utility.trace('svr_dsbl_dpnts_lt : ' || to_char(p_itax_dpnt_rec.svr_dsbl_dpnts_lt));
460: --
461: if p_itax_dpnt_rec.multiple_spouses_warning then
462: hr_utility.trace('multiple_spouses_warning : TRUE');
455: hr_utility.trace('young_dpnts : ' || to_char(p_itax_dpnt_rec.young_dpnts));
456: hr_utility.trace('minor_dpnts : ' || to_char(p_itax_dpnt_rec.minor_dpnts));
457: hr_utility.trace('dsbl_dpnts : ' || to_char(p_itax_dpnt_rec.dsbl_dpnts));
458: hr_utility.trace('svr_dsbl_dpnts : ' || to_char(p_itax_dpnt_rec.svr_dsbl_dpnts));
459: hr_utility.trace('svr_dsbl_dpnts_lt : ' || to_char(p_itax_dpnt_rec.svr_dsbl_dpnts_lt));
460: --
461: if p_itax_dpnt_rec.multiple_spouses_warning then
462: hr_utility.trace('multiple_spouses_warning : TRUE');
463: else
458: hr_utility.trace('svr_dsbl_dpnts : ' || to_char(p_itax_dpnt_rec.svr_dsbl_dpnts));
459: hr_utility.trace('svr_dsbl_dpnts_lt : ' || to_char(p_itax_dpnt_rec.svr_dsbl_dpnts_lt));
460: --
461: if p_itax_dpnt_rec.multiple_spouses_warning then
462: hr_utility.trace('multiple_spouses_warning : TRUE');
463: else
464: hr_utility.trace('multiple_spouses_warning : FALSE');
465: end if;
466: --
460: --
461: if p_itax_dpnt_rec.multiple_spouses_warning then
462: hr_utility.trace('multiple_spouses_warning : TRUE');
463: else
464: hr_utility.trace('multiple_spouses_warning : FALSE');
465: end if;
466: --
467: end if;
468: --
465: end if;
466: --
467: end if;
468: --
469: hr_utility.set_location('Leaving : ' || l_proc, 20);
470: --
471: end get_itax_dpnt_info;
472: -- ----------------------------------------------------------------------------
473: -- |--------------< Interface Functions for get_itax_dpnt_info >--------------|