DBA Data[Home] [Help]

PACKAGE: APPS.PAY_CA_T4AEOY_ARCHIVE

Source


1 package pay_ca_t4aeoy_archive as
2 /* $Header: pycayt4a.pkh 120.0.12000000.1 2007/01/17 17:44:46 appldev noship $ */
3 
4 /*
5 /*
6    ******************************************************************
7    *                                                                *
8    *  Copyright (C) 1992 Oracle Corporation UK Ltd.,                *
9    *                   Chertsey, England.                           *
10    *                                                                *
11    *  All rights reserved.                                          *
12    *                                                                *
13    *  This material has been provided pursuant to an agreement      *
14    *  containing restrictions on its use.  The material is also     *
15    *  protected by copyright law.  No part of this material may     *
16    *  be copied or distributed, transmitted or transcribed, in      *
17    *  any form or by any means, electronic, mechanical, magnetic,   *
18    *  manual, or otherwise, or disclosed to third parties without   *
19    *  the express written permission of Oracle Corporation UK Ltd,  *
20    *  Oracle Park, Bittams Lane, Guildford Road, Chertsey, Surrey,  *
21    *  England.                                                      *
22    *                                                                *
23    ******************************************************************
24 This package is used to keep the logics for
25 1)selecting people  : eoy_range_cursor
26 2)assignment action creation : eoy_action_creation
27 3)archiving data for Canadian End of Year archiver process :eoy_archive_data
28   for T4 reports and magtape.
29 4)Initialization_code : eoy_archinit (which does not do anything but kept for
30                                       backward compatibility with the PYUGEN
31                                       archiver process.)
32 
33 The above procedures are called by PYUGEN pay_report_mappings_f, i.e the
34 row in this table for T4 archiver is like:
35 
36  REPORT_TYPE            : CAEOY
37  REPORT_QUALIFIER       : CAEOY
38  REPORT_FORMAT          : CAEOY
39  EFFECTIVE_START_DATE   : 01-JAN-01
40  EFFECTIVE_END_DATE     : 31-DEC-12
41  RANGE_CODE             : pay_ca_t4aeoy_archive.eoy_range_cursor
42  ASSIGNMENT_ACTION_CODE : pay_ca_t4aeoy_archive.eoy_action_creation
43  INITIALIZATION_CODE    : pay_ca_t4aeoy_archive.eoy_archinit
44  ARCHIVE_CODE           : pay_ca_t4aeoy_archive.eoy_archive_data
45  MAGNETIC_CODE          : NULL
46  REPORT_CATEGORY        : CAEOY
47  REPORT_NAME            : NULL
48  SORT_CODE              : NULL
49  INITIALISATION_CODE    : NULL
50  UPDATABLE_FLAG         : NULL
51 
52 
53 
54    Change List
55    -----------
56    Date         Name        Vers   Bug No   Description
57    -----------  ----------  -----  -------  -----------------------------------
58    03-JAN-2000  mmukherj    110.0           Created.
59    19-NOV-2001  ssattini    115.1           Added dbdrv line.
60    02-DEC-2002  SSattini    115.6           Added 'nocopy' for out and in out
61                                             parameters, GSCC compliance.
62 */
63 
64 TYPE char240_data_type_table IS TABLE OF VARCHAR2(240)
65                                   INDEX BY BINARY_INTEGER;
66 TYPE number_data_type_table IS TABLE OF NUMBER
67                                   INDEX BY BINARY_INTEGER;
68 g_min_chunk    number:= -1;
69 g_archive_flag varchar2(1) := 'N';
70 
71 procedure eoy_range_cursor(pactid in  number,
72                        sqlstr out nocopy varchar2);
73 
74 procedure eoy_action_creation(pactid in number,
75                           stperson in number,
76                           endperson in number,
77                           chunk in number);
78 procedure eoy_archive_data(p_assactid in number, p_effective_date in date);
79 procedure eoy_archinit(p_payroll_action_id in number);
80 --
81 end pay_ca_t4aeoy_archive;