[Home] [Help]
1: package body pay_gb_p11d_mileage_extract as
2: /* $Header: pygbmxpl.pkb 115.2 2003/05/06 11:01:42 gbutler noship $
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:
38: 115.2 06/5/03 GBUTLER Altered detail record layout
39:
40: */
41:
42: g_package_name varchar2(27) := 'pay_gb_p11d_mileage_extract';
43:
44: -- Declare global variables:
45: g_veh_rcd_id NUMBER;
46: g_ext_rslt_id NUMBER;
86: BEGIN
87: hr_utility.set_location('get_param_tax_year',1);
88:
89: l_tax_year := hruserdt.get_table_value(p_bus_grp_id,
90: 'PAY GB P11D Mileage Extract',
91: 'Parameter Value',
92: 'Tax Year (YYYY)',
93: ben_ext_person.g_effective_date );
94:
195: BEGIN
196: hr_utility.set_location('get_param_ext_end_date',1);
197:
198: l_ext_end_date := fnd_date.displaydate_to_date(hruserdt.get_table_value(p_bus_group_id,
199: 'PAY GB P11D Mileage Extract',
200: 'Parameter Value',
201: 'Extract End Date (DD-MON-YYYY)',
202: ben_ext_person.g_effective_date ));
203:
245: BEGIN
246:
247: -- Get Payroll Name Parameter Value
248: l_payroll_name := hruserdt.get_table_value(p_bus_group_id,
249: 'PAY GB P11D Mileage Extract',
250: 'Parameter Value',
251: 'Payroll Name',
252: ben_ext_person.g_effective_date );
253: --
279: BEGIN
280: BEGIN
281: -- Get Tax District Reference Parameter Value
282: l_tax_dist := hruserdt.get_table_value(p_bus_group_id,
283: 'PAY GB P11D Mileage Extract',
284: 'Parameter Value',
285: 'Tax District Reference',
286: ben_ext_person.g_effective_date );
287: --
314: BEGIN
315: BEGIN
316: -- Get Employee Number Parameter Value
317: l_employee_number := hruserdt.get_table_value(p_bus_group_id,
318: 'PAY GB P11D Mileage Extract',
319: 'Parameter Value',
320: 'Employee Number',
321: ben_ext_person.g_effective_date );
322: --
354: BEGIN
355: BEGIN
356: -- Get Consolidation Set Parameter Value
357: l_consolidation_set := hruserdt.get_table_value(p_bus_group_id,
358: 'PAY GB P11D Mileage Extract',
359: 'Parameter Value',
360: 'Consolidation Set',
361: ben_ext_person.g_effective_date );
362: --
395: BEGIN
396: BEGIN
397: -- Get Assignment Set Parameter Value
398: l_assignment_set := hruserdt.get_table_value(p_bus_group_id,
399: 'PAY GB P11D Mileage Extract',
400: 'Parameter Value',
401: 'Assignment Set',
402: ben_ext_person.g_effective_date );
403: --
1441: WHERE rslt.ext_rslt_id = p_ext_rslt_id
1442: AND rslt.ext_dfn_id = dfn.ext_dfn_id
1443: AND dfn.ext_file_id = rif.ext_file_id
1444: AND rif.ext_rcd_id = rcd.ext_rcd_id
1445: AND rcd.name like '%PAY GB P11D Mileage Extract 2003 - Assignment Details Record';
1446: --
1447: l_asg_rcd_id NUMBER;
1448: --
1449: CURSOR csr_detail_record_id IS
1455: WHERE rslt.ext_rslt_id = p_ext_rslt_id
1456: AND rslt.ext_dfn_id = dfn.ext_dfn_id
1457: AND dfn.ext_file_id = rif.ext_file_id
1458: AND rif.ext_rcd_id = rcd.ext_rcd_id
1459: AND rcd.name like '%PAY GB P11D Mileage Extract 2003 - Mileage and Passenger Record';
1460: --
1461: --
1462: CURSOR csr_ext_asg IS
1463: SELECT person_id, val_01 asg_id, ext_rslt_dtl_id, object_version_number
1604: --
1605: END check_person_inclusion;
1606:
1607: /* end of package body */
1608: end pay_gb_p11d_mileage_extract;