DBA Data[Home] [Help]

PACKAGE: APPS.PAY_CA_EOY_ARCHIVE

Source


1 package pay_ca_eoy_archive as
2 /* $Header: pycayear.pkh 120.0.12010000.1 2008/07/27 22:19:13 appldev ship $ */
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_eoy_archive.eoy_range_cursor
42  ASSIGNMENT_ACTION_CODE : pay_ca_eoy_archive.eoy_action_creation
43  INITIALIZATION_CODE    : pay_ca_eoy_archive.eoy_archinit
44  ARCHIVE_CODE           : pay_ca_eoy_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    13-NOV-2001  pganguly    115.1           Added set verify off
60    13-NOV-2001  pganguly    115.2           Added commit at the end.
61    14-NOV-2001  pganguly    115.3           Added dbdrv and oserror.
62    08-feb-2002  ssattini    115.4           Added checkfile
63    02-DEC-2002  pganguly    115.5           Added nocopy.
64 
65 */
66 --
67 TYPE char240_data_type_table IS TABLE OF VARCHAR2(240)
68                                   INDEX BY BINARY_INTEGER;
69 TYPE number_data_type_table IS TABLE OF NUMBER
70                                   INDEX BY BINARY_INTEGER;
71 g_min_chunk    number:= -1;
72 g_archive_flag varchar2(1) := 'N';
73 
74 procedure eoy_range_cursor(pactid in  number,
75                        sqlstr out nocopy varchar2);
76 
77 procedure eoy_action_creation(pactid in number,
78                           stperson in number,
79                           endperson in number,
80                           chunk in number);
81 procedure eoy_archive_data(p_assactid in number, p_effective_date in date);
82 procedure eoy_archinit(p_payroll_action_id in number);
83 --
84 end pay_ca_eoy_archive;