1 package pay_paygtn_pkg AUTHID CURRENT_USER as
2 /* $Header: pypaygtn.pkh 120.2.12010000.1 2008/07/27 23:19:24 appldev ship $ */
3 /*
4 ******************************************************************
5 * *
6 * Copyright (C) 1992 Oracle Corporation UK Ltd., *
7 * Chertsey, England. *
8 * *
9 * All rights reserved. *
10 * *
11 * This material has been provided pursuant to an agreement *
12 * containing restrictions on its use. The material is also *
13 * protected by copyright law. No part of this material may *
14 * be copied or distributed, transmitted or transcribed, in *
15 * any form or by any means, electronic, mechanical, magnetic, *
16 * manual, or otherwise, or disclosed to third parties without *
17 * the express written permission of Oracle Corporation UK Ltd, *
18 * Oracle Park, Bittams Lane, Guildford Road, Chertsey, Surrey, *
19 * England. *
20 * *
21 ******************************************************************
22
23 Change List
24 -----------
25 Date Name Vers Bug No Description
26 ----------- ---------- ----- ------- -----------------------------------
27 21-NOV-1999 ssarma 40.0 Created.
28 04-FEB-2004 schauhan 115.4 Added oserror exit and nocopy to make
29 it gscc standard
30 09-DEC-2004 sgajula 115.5 3800371 Added procedures for Implementing BRA
31 07-APR-2006 rdhingra 115.6 5148084 Added level_cnt, cursor GTN_XML_Transmitter
32 and Procedure create_gtn_xml_data
33
34 */
35
36 -- 'level_cnt' will allow the cursors to select function results,
37 -- whether it is a standard fuction such as to_char or a function
38 -- defined in a package (with the correct pragma restriction).
39 level_cnt NUMBER;
40
41 CURSOR GTN_XML_Transmitter IS
42 SELECT 'PAYROLL_ACTION_ID=P',
43 pay_magtape_generic.get_parameter_value('TRANSFER_PAYROLL_ACTION_ID')
44 FROM dual;
45
46 procedure range_cursor ( pactid in number,
47 sqlstr out nocopy varchar2
48 );
49 procedure action_create_bra(pactid in number,
50 stperson in number,
51 endperson in number,
52 chunk in number);
53 procedure action_creation ( pactid in number,
54 stperson in number,
55 endperson in number,
56 chunk in number
57 );
58 procedure sort_action ( payactid in varchar2,
59 sqlstr in out nocopy varchar2,
60 len out nocopy number
61 );
62 function get_parameter(name in varchar2,
63 parameter_list varchar2) return varchar2;
64 Procedure ARCHIVE_DEINIT(p_payroll_action_id IN NUMBER);
65 Procedure ARCHIVE_CODE (p_payroll_action_id IN NUMBER
66 ,p_chunk_number IN NUMBER);
67 Procedure ARCHIVE_INIT(p_payroll_action_id IN NUMBER);
68
69 PROCEDURE CREATE_GTN_XML_DATA;
70
71 pragma restrict_references(get_parameter, WNDS, WNPS);
72 --
73 end pay_paygtn_pkg;