[Home] [Help]
1: package body pay_gb_p11d_mileage_extract as
2: /* $Header: pygbmxpl.pkb 120.5 2011/03/01 13:46:44 krreddy ship $
3: ******************************************************************
4: * *
5: * Copyright (C) 2003 Oracle Corporation UK Ltd., *
18: * England. *
19: * *
20: ******************************************************************
21:
22: Name : pay_gb_p11d_mileage_extract
23:
24: Description : This package contains functions and procedures to
25: create the extract file for P11d Mileage Claims
26:
43: 115.7 18/2/11 KRREDDY 10066755 Modified to avoid impact of enabling skip term leg rule.
44:
45: */
46:
47: g_package_name varchar2(27) := 'pay_gb_p11d_mileage_extract';
48:
49: -- Declare global variables:
50: g_veh_rcd_id NUMBER;
51: g_ext_rslt_id NUMBER;
91: BEGIN
92: hr_utility.set_location('get_param_tax_year',1);
93:
94: l_tax_year := hruserdt.get_table_value(p_bus_grp_id,
95: 'PAY GB P11d Mileage Extract',
96: 'Parameter Value',
97: 'Tax Year (YYYY)',
98: ben_ext_person.g_effective_date );
99:
198: BEGIN
199: hr_utility.set_location('get_param_ext_start_date',1);
200:
201: l_ext_start_date := fnd_date.displaydate_to_date(hruserdt.get_table_value(p_bus_group_id,
202: 'PAY GB P11D Mileage Extract',
203: 'Parameter Value',
204: 'Extract Start Date (DD-MON-YYYY)',
205: ben_ext_person.g_effective_date ));
206:
232: BEGIN
233: hr_utility.set_location('get_param_ext_end_date',1);
234:
235: l_ext_end_date := fnd_date.displaydate_to_date(hruserdt.get_table_value(p_bus_group_id,
236: 'PAY GB P11D Mileage Extract',
237: 'Parameter Value',
238: 'Extract End Date (DD-MON-YYYY)',
239: ben_ext_person.g_effective_date ));
240:
282: BEGIN
283:
284: -- Get Payroll Name Parameter Value
285: l_payroll_name := hruserdt.get_table_value(p_bus_group_id,
286: 'PAY GB P11D Mileage Extract',
287: 'Parameter Value',
288: 'Payroll Name',
289: ben_ext_person.g_effective_date );
290: --
316: BEGIN
317: BEGIN
318: -- Get Tax District Reference Parameter Value
319: l_tax_dist := hruserdt.get_table_value(p_bus_group_id,
320: 'PAY GB P11D Mileage Extract',
321: 'Parameter Value',
322: 'Tax District Reference',
323: ben_ext_person.g_effective_date );
324: --
351: BEGIN
352: BEGIN
353: -- Get Employee Number Parameter Value
354: l_employee_number := hruserdt.get_table_value(p_bus_group_id,
355: 'PAY GB P11D Mileage Extract',
356: 'Parameter Value',
357: 'Employee Number',
358: ben_ext_person.g_effective_date );
359: --
391: BEGIN
392: BEGIN
393: -- Get Consolidation Set Parameter Value
394: l_consolidation_set := hruserdt.get_table_value(p_bus_group_id,
395: 'PAY GB P11D Mileage Extract',
396: 'Parameter Value',
397: 'Consolidation Set',
398: ben_ext_person.g_effective_date );
399: --
432: BEGIN
433: BEGIN
434: -- Get Assignment Set Parameter Value
435: l_assignment_set := hruserdt.get_table_value(p_bus_group_id,
436: 'PAY GB P11D Mileage Extract',
437: 'Parameter Value',
438: 'Assignment Set',
439: ben_ext_person.g_effective_date );
440: --
1752: WHERE rslt.ext_rslt_id = p_ext_rslt_id
1753: AND rslt.ext_dfn_id = dfn.ext_dfn_id
1754: AND dfn.ext_file_id = rif.ext_file_id
1755: AND rif.ext_rcd_id = rcd.ext_rcd_id
1756: -- AND rcd.name like '%PAY GB P11D Mileage Extract 2003 - Assignment Details Record';
1757: -- AND rcd.name like '%PAY GB P11D Mileage Extract Test PV - Assignment Details Record';
1758: AND rcd.name like '%PAY GB P11D Mileage Extract - Assignment Details Record';
1759: --
1760: l_asg_rcd_id NUMBER;
1753: AND rslt.ext_dfn_id = dfn.ext_dfn_id
1754: AND dfn.ext_file_id = rif.ext_file_id
1755: AND rif.ext_rcd_id = rcd.ext_rcd_id
1756: -- AND rcd.name like '%PAY GB P11D Mileage Extract 2003 - Assignment Details Record';
1757: -- AND rcd.name like '%PAY GB P11D Mileage Extract Test PV - Assignment Details Record';
1758: AND rcd.name like '%PAY GB P11D Mileage Extract - Assignment Details Record';
1759: --
1760: l_asg_rcd_id NUMBER;
1761: --
1754: AND dfn.ext_file_id = rif.ext_file_id
1755: AND rif.ext_rcd_id = rcd.ext_rcd_id
1756: -- AND rcd.name like '%PAY GB P11D Mileage Extract 2003 - Assignment Details Record';
1757: -- AND rcd.name like '%PAY GB P11D Mileage Extract Test PV - Assignment Details Record';
1758: AND rcd.name like '%PAY GB P11D Mileage Extract - Assignment Details Record';
1759: --
1760: l_asg_rcd_id NUMBER;
1761: --
1762: CURSOR csr_detail_record_id IS
1768: WHERE rslt.ext_rslt_id = p_ext_rslt_id
1769: AND rslt.ext_dfn_id = dfn.ext_dfn_id
1770: AND dfn.ext_file_id = rif.ext_file_id
1771: AND rif.ext_rcd_id = rcd.ext_rcd_id
1772: -- AND rcd.name like '%PAY GB P11D Mileage Extract 2003 - Mileage and Passenger Record';
1773: -- AND rcd.name like '%PAY GB P11D Mileage Extract Test PV - Mileage and Passenger Record';
1774: AND rcd.name like '%PAY GB P11D Mileage Extract - Mileage and Passenger Record';
1775: --
1776: --
1769: AND rslt.ext_dfn_id = dfn.ext_dfn_id
1770: AND dfn.ext_file_id = rif.ext_file_id
1771: AND rif.ext_rcd_id = rcd.ext_rcd_id
1772: -- AND rcd.name like '%PAY GB P11D Mileage Extract 2003 - Mileage and Passenger Record';
1773: -- AND rcd.name like '%PAY GB P11D Mileage Extract Test PV - Mileage and Passenger Record';
1774: AND rcd.name like '%PAY GB P11D Mileage Extract - Mileage and Passenger Record';
1775: --
1776: --
1777: CURSOR csr_ext_asg IS
1770: AND dfn.ext_file_id = rif.ext_file_id
1771: AND rif.ext_rcd_id = rcd.ext_rcd_id
1772: -- AND rcd.name like '%PAY GB P11D Mileage Extract 2003 - Mileage and Passenger Record';
1773: -- AND rcd.name like '%PAY GB P11D Mileage Extract Test PV - Mileage and Passenger Record';
1774: AND rcd.name like '%PAY GB P11D Mileage Extract - Mileage and Passenger Record';
1775: --
1776: --
1777: CURSOR csr_ext_asg IS
1778: SELECT person_id, val_01 asg_id, ext_rslt_dtl_id, object_version_number
2384:
2385: end get_bal_value;
2386:
2387: /* end of package body */
2388: end pay_gb_p11d_mileage_extract;