204: end;
205:
206: -----------------------------------------------------------------------------------
207: -- This procedure will be used to transfer the data from intermediate table
208: -- to the EIT table (PER_ASSIGNMENT_EXTRA_INFO)
209: -----------------------------------------------------------------------------------
210: procedure submit_yea_info(p_assignment_id in varchar2,
211: p_target_year in varchar2,
212: p_effective_date in varchar2, -- expects canonical
219: l_effective_date date;
220: l_yea_data_exists varchar2(1);
221: l_yea_fwtb_data_exists varchar2(1);
222: l_don_type_data_exists varchar2(1); -- Bug 9393732
223: l_aei_id per_assignment_extra_info.assignment_extra_infO_id%type;
224: l_ovn per_assignment_extra_info.object_version_number%type;
225: l_record_name varchar2(50);
226: l_person_id number ;
227: l_session_id number ;
220: l_yea_data_exists varchar2(1);
221: l_yea_fwtb_data_exists varchar2(1);
222: l_don_type_data_exists varchar2(1); -- Bug 9393732
223: l_aei_id per_assignment_extra_info.assignment_extra_infO_id%type;
224: l_ovn per_assignment_extra_info.object_version_number%type;
225: l_record_name varchar2(50);
226: l_person_id number ;
227: l_session_id number ;
228: l_data_exists varchar2(1); -- Bug 14321129
225: l_record_name varchar2(50);
226: l_person_id number ;
227: l_session_id number ;
228: l_data_exists varchar2(1); -- Bug 14321129
229: l_assign_extra_info_id per_assignment_extra_info.assignment_extra_info_id%type;
230: l_aei_information2 per_assignment_extra_info.aei_information2%type;
231: l_obj_ver_number per_assignment_extra_info.object_version_number%type;
232:
233: --
226: l_person_id number ;
227: l_session_id number ;
228: l_data_exists varchar2(1); -- Bug 14321129
229: l_assign_extra_info_id per_assignment_extra_info.assignment_extra_info_id%type;
230: l_aei_information2 per_assignment_extra_info.aei_information2%type;
231: l_obj_ver_number per_assignment_extra_info.object_version_number%type;
232:
233: --
234: -- Bug 9326153
227: l_session_id number ;
228: l_data_exists varchar2(1); -- Bug 14321129
229: l_assign_extra_info_id per_assignment_extra_info.assignment_extra_info_id%type;
230: l_aei_information2 per_assignment_extra_info.aei_information2%type;
231: l_obj_ver_number per_assignment_extra_info.object_version_number%type;
232:
233: --
234: -- Bug 9326153
235: --
235: --
236: cursor csr_delete
237: is
238: select assignment_extra_info_id,object_version_number
239: from per_assignment_extra_info
240: where assignment_id = p_assignment_id
241: and to_number(to_char(fnd_date.canonical_to_date(aei_information1), 'YYYY')) = p_target_year
242: And information_type in ('KR_YEA_SP_TAX_EXEM_INFO'
243: ,'KR_YEA_SP_TAX_EXEM_INFO2'
267: --
268: Cursor csr_yea_data_exists
269: Is
270: Select 'Y'
271: From per_assignment_extra_info
272: Where assignment_id = p_assignment_id
273: And to_number(to_char(fnd_date.canonical_to_date(aei_information1), 'YYYY')) = p_target_year
274: And information_type in ('KR_YEA_SP_TAX_EXEM_INFO'
275: ,'KR_YEA_SP_TAX_EXEM_INFO2'
297:
298: Cursor csr_yea_fwtb_data_exists
299: Is
300: Select 'Y'
301: From per_assignment_extra_info
302: Where assignment_id = p_assignment_id
303: And information_type ='KR_YEA_FW_TAX_BREAK_INFO';
304:
305: --
525: Is
526: Select assignment_extra_info_id,
527: aei_information2,
528: object_version_number
529: From per_assignment_extra_info
530: Where assignment_id = p_assignment_id
531: And to_char(fnd_date.canonical_to_date(aei_information1), 'yyyy') = p_target_year
532: And information_type = 'KR_YEA_TAX_EXEM_INFO2';
533:
636: p_object_version_number => i.object_version_number);
637: end loop;
638: -- End of Bug 9326153
639: --
640: delete from per_assignment_extra_info
641: where assignment_id = p_assignment_id
642: And information_type = 'KR_YEA_FW_TAX_BREAK_INFO';
643: --
644: --
1185:
1186: -- cursor to get the Update Allowed Flag of the assignment
1187: cursor csr_update_allowed_flag is
1188: select nvl(aei_information2, 'Y')
1189: from per_assignment_extra_info
1190: where information_type = 'KR_YEA_ENTRY_UPDATE'
1191: and aei_information1 = p_target_year
1192: and assignment_id = p_assignment_id;
1193:
1791: is
1792: cursor csr_access is
1793: select nvl(aei_information2,'Y') update_allowed,
1794: assignment_extra_info_id info_id
1795: from per_assignment_extra_info
1796: where assignment_id = P_ASSIGNMENT_ID
1797: and information_type = 'KR_YEA_ENTRY_UPDATE'
1798: and aei_information1 = P_TARGET_YEAR
1799: for update nowait;
1814: end if;
1815: close csr_access;
1816:
1817: if l_record_present = 'N' then -- create a record
1818: insert into per_assignment_extra_info(
1819: assignment_extra_info_id,
1820: assignment_id,
1821: aei_information1,
1822: aei_information2,
1822: aei_information2,
1823: information_type,
1824: aei_information_category)
1825: values(
1826: per_assignment_extra_info_s.nextval,
1827: P_ASSIGNMENT_ID,
1828: P_TARGET_YEAR,
1829: 'Y',
1830: 'KR_YEA_ENTRY_UPDATE',
1836: else
1837: l_future_access := 'N';
1838: end if;
1839:
1840: update per_assignment_extra_info
1841: set aei_information2 = l_future_access
1842: where assignment_extra_info_id = l_info_id;
1843:
1844: P_RESULT := l_future_access;
1968: --
1969: cursor csr_delete
1970: is
1971: select assignment_extra_info_id,object_version_number
1972: from per_assignment_extra_info
1973: where assignment_id = p_assignment_id
1974: and to_number(to_char(fnd_date.canonical_to_date(aei_information1), 'YYYY')) = p_target_year
1975: And information_type in ('KR_YEA_SP_TAX_EXEM_INFO'
1976: ,'KR_YEA_SP_TAX_EXEM_INFO2'
2434: aei_information8,
2435: aei_information9,
2436: aei_information10,
2437: aei_information11
2438: from per_assignment_extra_info
2439: where assignment_id = p_assignment_id
2440: and information_type = 'KR_YEA_DONATION_TYPE_DETAIL'
2441: and to_number(to_char(fnd_date.canonical_to_date(aei_information1), 'YYYY')) = to_number(p_target_year);
2442: --