1 PACKAGE pay_1099R_data AUTHID CURRENT_USER AS
2 /* $Header: py1099rd.pkh 115.0 99/07/17 05:40:54 porting ship $ */
3 --
4 /*
5 ******************************************************************
6 * *
7 * Copyright (C) 1996 Oracle Corporation. *
8 * All rights reserved. *
9 * *
10 * This material has been provided pursuant to an agreement *
11 * containing restrictions on its use. The material is also *
12 * protected by copyright law. No part of this material may *
13 * be copied or distributed, transmitted or transcribed, in *
14 * any form or by any means, electronic, mechanical, magnetic, *
15 * manual, or otherwise, or disclosed to third parties without *
16 * the express written permission of Oracle Corporation, *
17 * 500 Oracle Parkway, Redwood City, CA, 94065. *
18 * *
19 ******************************************************************
20
21 Name : pay_1099R_data
22
23 Description : Sets up the data to provide 1099R reporting.
24
25 Uses :
26
27 Change List
28 -----------
29 Date Name Vers Bug No Description
30 ---- ---- ---- ------ -----------
31 07-AUG-96 ATAYLOR 40.0 Created.
32
33 */
34 --
35 -- Define start / end of time constants.
36 --
37 c_start_of_time constant date := to_date('01/01/0001','DD/MM/YYYY');
38 c_end_of_time constant date := to_date('31/12/4712','DD/MM/YYYY');
39 --
40 TYPE char30_data_table IS TABLE OF VARCHAR2(30)
41 INDEX BY BINARY_INTEGER;
42 --
43 TYPE char250_data_table IS TABLE OF VARCHAR2(250)
44 INDEX BY BINARY_INTEGER;
45 --
46 TYPE numeric_data_table IS TABLE OF NUMBER
47 INDEX BY BINARY_INTEGER;
48 --
49 TYPE boolean_data_table IS TABLE OF BOOLEAN
50 INDEX BY BINARY_INTEGER;
51 --
52 procedure setup;
53 --
54 end pay_1099R_data;