1: PACKAGE BODY PAY_FI_ARCHIVE_ACRA as
2: /* $Header: pyfiacra.pkb 120.6 2006/04/03 05:43:39 dbehera noship $ */
3: TYPE lock_rec IS RECORD (
4: archive_assact_id NUMBER);
5: TYPE lock_table IS TABLE OF lock_rec INDEX BY BINARY_INTEGER;
63: ,p_effective_date OUT NOCOPY DATE
64: ,p_archive OUT NOCOPY VARCHAR2
65: ) IS
66: CURSOR csr_parameter_info(p_payroll_action_id NUMBER) IS
67: SELECT PAY_FI_ARCHIVE_ACRA.GET_PARAMETER(legislative_parameters,
68: 'LEGAL_EMPLOYER')
69: ,PAY_FI_ARCHIVE_ACRA.GET_PARAMETER(legislative_parameters,'LOCAL_UNIT_NAME')
70: ,PAY_FI_ARCHIVE_ACRA.GET_PARAMETER(legislative_parameters,'ELEMENT_NAME')
71: ,PAY_FI_ARCHIVE_ACRA.GET_PARAMETER(legislative_parameters,'ELEMENT_SET')
65: ) IS
66: CURSOR csr_parameter_info(p_payroll_action_id NUMBER) IS
67: SELECT PAY_FI_ARCHIVE_ACRA.GET_PARAMETER(legislative_parameters,
68: 'LEGAL_EMPLOYER')
69: ,PAY_FI_ARCHIVE_ACRA.GET_PARAMETER(legislative_parameters,'LOCAL_UNIT_NAME')
70: ,PAY_FI_ARCHIVE_ACRA.GET_PARAMETER(legislative_parameters,'ELEMENT_NAME')
71: ,PAY_FI_ARCHIVE_ACRA.GET_PARAMETER(legislative_parameters,'ELEMENT_SET')
72: ,FND_DATE.canonical_to_date(PAY_FI_ARCHIVE_ACRA.GET_PARAMETER
73: (legislative_parameters,'START_DATE'))
66: CURSOR csr_parameter_info(p_payroll_action_id NUMBER) IS
67: SELECT PAY_FI_ARCHIVE_ACRA.GET_PARAMETER(legislative_parameters,
68: 'LEGAL_EMPLOYER')
69: ,PAY_FI_ARCHIVE_ACRA.GET_PARAMETER(legislative_parameters,'LOCAL_UNIT_NAME')
70: ,PAY_FI_ARCHIVE_ACRA.GET_PARAMETER(legislative_parameters,'ELEMENT_NAME')
71: ,PAY_FI_ARCHIVE_ACRA.GET_PARAMETER(legislative_parameters,'ELEMENT_SET')
72: ,FND_DATE.canonical_to_date(PAY_FI_ARCHIVE_ACRA.GET_PARAMETER
73: (legislative_parameters,'START_DATE'))
74: ,FND_DATE.canonical_to_date(PAY_FI_ARCHIVE_ACRA.GET_PARAMETER
67: SELECT PAY_FI_ARCHIVE_ACRA.GET_PARAMETER(legislative_parameters,
68: 'LEGAL_EMPLOYER')
69: ,PAY_FI_ARCHIVE_ACRA.GET_PARAMETER(legislative_parameters,'LOCAL_UNIT_NAME')
70: ,PAY_FI_ARCHIVE_ACRA.GET_PARAMETER(legislative_parameters,'ELEMENT_NAME')
71: ,PAY_FI_ARCHIVE_ACRA.GET_PARAMETER(legislative_parameters,'ELEMENT_SET')
72: ,FND_DATE.canonical_to_date(PAY_FI_ARCHIVE_ACRA.GET_PARAMETER
73: (legislative_parameters,'START_DATE'))
74: ,FND_DATE.canonical_to_date(PAY_FI_ARCHIVE_ACRA.GET_PARAMETER
75: (legislative_parameters,'END_DATE'))
68: 'LEGAL_EMPLOYER')
69: ,PAY_FI_ARCHIVE_ACRA.GET_PARAMETER(legislative_parameters,'LOCAL_UNIT_NAME')
70: ,PAY_FI_ARCHIVE_ACRA.GET_PARAMETER(legislative_parameters,'ELEMENT_NAME')
71: ,PAY_FI_ARCHIVE_ACRA.GET_PARAMETER(legislative_parameters,'ELEMENT_SET')
72: ,FND_DATE.canonical_to_date(PAY_FI_ARCHIVE_ACRA.GET_PARAMETER
73: (legislative_parameters,'START_DATE'))
74: ,FND_DATE.canonical_to_date(PAY_FI_ARCHIVE_ACRA.GET_PARAMETER
75: (legislative_parameters,'END_DATE'))
76: ,PAY_FI_ARCHIVE_ACRA.GET_PARAMETER(legislative_parameters,'ARCHIVE')
70: ,PAY_FI_ARCHIVE_ACRA.GET_PARAMETER(legislative_parameters,'ELEMENT_NAME')
71: ,PAY_FI_ARCHIVE_ACRA.GET_PARAMETER(legislative_parameters,'ELEMENT_SET')
72: ,FND_DATE.canonical_to_date(PAY_FI_ARCHIVE_ACRA.GET_PARAMETER
73: (legislative_parameters,'START_DATE'))
74: ,FND_DATE.canonical_to_date(PAY_FI_ARCHIVE_ACRA.GET_PARAMETER
75: (legislative_parameters,'END_DATE'))
76: ,PAY_FI_ARCHIVE_ACRA.GET_PARAMETER(legislative_parameters,'ARCHIVE')
77: ,effective_date
78: ,business_group_id
72: ,FND_DATE.canonical_to_date(PAY_FI_ARCHIVE_ACRA.GET_PARAMETER
73: (legislative_parameters,'START_DATE'))
74: ,FND_DATE.canonical_to_date(PAY_FI_ARCHIVE_ACRA.GET_PARAMETER
75: (legislative_parameters,'END_DATE'))
76: ,PAY_FI_ARCHIVE_ACRA.GET_PARAMETER(legislative_parameters,'ARCHIVE')
77: ,effective_date
78: ,business_group_id
79: FROM pay_payroll_actions
80: WHERE payroll_action_id = p_payroll_action_id;
272: ,pay_payroll_actions ppa
273: WHERE ppa.payroll_action_id = :payroll_action_id
274: AND ppa.business_group_id = ppf.business_group_id
275: ORDER BY ppf.person_id';
276: PAY_FI_ARCHIVE_ACRA.GET_ALL_PARAMETERS(
277: p_payroll_action_id
278: ,l_business_group_id
279: ,l_legal_employer_id
280: ,l_local_unit_id
653: hr_utility.set_location(' Leaving Procedure ARCHIVE_CODE',90);
654: END IF;
655: fnd_file.put_line (fnd_file.LOG, 'Exiting archive code' );
656: END ARCHIVE_CODE;
657: END PAY_FI_ARCHIVE_ACRA;