1 PACKAGE pay_mag_utils AUTHID CURRENT_USER AS
2 /* $Header: pymagutl.pkh 120.1 2005/10/10 12:03:04 meshah noship $ */
3 --
4 /*
5 ******************************************************************
6 * *
7 * Copyright (C) 1993 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_mag_utils
22
23 Description : Contains procedures and functions used by magnetic reports.
24
25 Uses :
26
27 Change List
28 -----------
29 Date Name Vers Bug No Description
30 ---- ---- ---- ------ -----------
31 10-OCT-96 ATAYLOR 40.0 Created.
32 01-NOV-96 GPERRY 40.1 Added Insert Lookups procedure and
33 Write procedure to support simple
34 debugging of 1099R reports.
35 06-NOV-96 GPERRY 40.2 Added function date_earned.
36 12-NOV-96 HEKIM 40.3 Added function org_info_exists.
37 20-MAR-97 HEKIM 40.4 Added udf_Exists and Delete_udf.
38 11-SEP-97 MFENDER 110.1 Fixed untranslatable dates.
39 17-AUG-99 rthakur 115.2 Added function get_parameter.
40 18-jan-2002 fusman 115.5 Added dbdrv commands.
41
42 */
43 --
44 g_message VARCHAR2(240);
45 --
46 --
47 FUNCTION Lookup_Formula ( p_session_date IN DATE,
48 p_business_group_id IN NUMBER,
49 p_legislation_code IN VARCHAR2,
50 p_formula_name IN VARCHAR2 ) RETURN NUMBER;
51 --
52 --
53 FUNCTION Lookup_Format ( p_period_end IN DATE,
54 p_report_type IN VARCHAR2,
55 p_state IN VARCHAR2 ) RETURN VARCHAR2;
56 --
57 --
58 FUNCTION Bal_db_Item ( p_db_item_name IN VARCHAR2 ) RETURN NUMBER;
59 --
60 --
61 FUNCTION Lookup_Jurisdiction_Code
62 ( p_state IN VARCHAR2 ) RETURN VARCHAR2;
63 --
64 --
65 PROCEDURE Check_Report_Unique ( p_business_group_id IN NUMBER,
66 p_period_end IN DATE,
67 p_report_type IN VARCHAR2,
68 p_state IN VARCHAR2 );
69 --
70 --
71 FUNCTION Create_Payroll_Action ( p_report_type IN VARCHAR2,
72 p_state IN VARCHAR2,
73 p_trans_legal_co_id IN VARCHAR2,
74 p_business_group_id IN NUMBER,
75 p_period_end IN DATE,
76 p_param_text IN VARCHAR2
77 DEFAULT NULL ) RETURN NUMBER;
78 --
79 --
80 FUNCTION Create_Assignment_Action ( p_payroll_action_id IN NUMBER,
81 p_assignment_id IN NUMBER,
82 p_tax_unit_id IN NUMBER ) RETURN NUMBER;
83 --
84 --
85 PROCEDURE Error_Payroll_Action ( p_payroll_action_id NUMBER );
86 --
87 --
88 PROCEDURE Get_Dates ( p_report_type VARCHAR2,
89 p_year VARCHAR2,
90 p_year_start IN OUT nocopy DATE,
91 p_year_end IN OUT nocopy DATE,
92 p_rep_year IN OUT nocopy VARCHAR2 );
93 --
94 --
95 PROCEDURE Update_Action_Status ( p_payroll_action_id NUMBER );
96 --
97 --
98 PROCEDURE Main ( p_report_format IN VARCHAR2 );
99 --
100 --
101 PROCEDURE Insert_Lookup
102 ( p_lookup_code IN VARCHAR2,
103 p_lookup_type IN VARCHAR2,
104 p_application_id IN NUMBER DEFAULT 800,
105 p_created_by IN NUMBER DEFAULT 1,
106 p_creation_date IN DATE DEFAULT to_date('01/01/1901','DD/MM/YYYY'),
107 p_enabled_flag IN VARCHAR2 DEFAULT 'Y',
108 p_last_updated_by IN NUMBER DEFAULT 1,
109 p_last_update_date IN DATE DEFAULT to_date('01/01/1901','DD/MM/YYYY'),
110 p_meaning IN VARCHAR2,
111 p_effective_date IN DATE DEFAULT to_date('01/01/1901','DD/MM/YYYY') );
112 --
113 --
114 PROCEDURE Write ( p_action IN VARCHAR2,
115 p_sequence IN NUMBER DEFAULT NULL,
116 p_message IN VARCHAR2 DEFAULT NULL,
117 p_write_mode IN BOOLEAN DEFAULT TRUE);
118 --
119 --
120 FUNCTION Org_Info_Exists ( p_org_info_type IN VARCHAR2) RETURN BOOLEAN;
121 --
122 --
123 FUNCTION Date_Earned ( p_report_date IN DATE,
124 p_assignment_id IN NUMBER,
125 p_ass_effective_start_date IN DATE,
126 p_ass_effective_end_date IN DATE,
127 p_per_effective_start_date IN DATE,
128 p_per_effective_end_date IN DATE) RETURN NUMBER;
129 --
130 PRAGMA RESTRICT_REFERENCES(Date_Earned, WNDS, WNPS);
131 --
132 FUNCTION udf_Exists (p_udf_name in varchar2) RETURN NUMBER;
133 --
134 PROCEDURE Delete_udf (p_udf_name in varchar2);
135 --
136 --
137 FUNCTION get_parameter(name in varchar2,
138 end_name in varchar2,
139 parameter_list varchar2) return varchar2;
140 pragma restrict_references(get_parameter, WNDS, WNPS);
141 --
142 END Pay_Mag_Utils;