1 package body JA_AWT_PKG as
2 /* $Header: jazzawtb.pls 115.6 2003/07/15 22:35:30 dbetanco ship $ */
3 --
4 --
5 function JA_AU_Check_Exception (
6 P_Tax_Name IN varchar2
7 ,P_Invoice_Id IN number
8 ,P_Payment_Num IN number
9 ,P_Awt_Date IN date
10 ,P_Amount IN number
11 ,P_Vendor_id IN number
12 ,P_Vendor_Site_id IN number
13 ,P_Minimum_rate_id IN number
14 )
15 return number
16 is
17 BEGIN
18
19 return(NULL);
20
21 END JA_AU_Check_Exception;
22
23
24 -- +=======================================================================+
25 -- | Function
26 -- | JA_AU_Get_Rate_Id
27 -- |
28 -- | Description
29 -- | Function JA_AU_Get_Rate_Id used to obtain tax rate as required by
30 -- | Australian Tax laws.
31 -- |
32 -- | Localization History
33 -- | S Goggin 11-MAR-96 PPS rules Coded
34 -- | S Goggin 18-MAR-96 Modified to check for exception
35 -- | Rate>variation rate.
36 -- | S Goggin 29-MAR-96 Added Rounding Code...
37 -- | J.Karouzakis 22-MAY-96 Modified to update proposed_payment_amount
38 -- | and amount_remaining in rounding routine.
39 -- | S.Goggin 07-JAN-97 Modified code to pick up the correct rates
40 -- | when the start date is null.
41 -- | S.Goggin 21-JAN-97 Fixed rounding problem with PPS invoices.
42 -- | J.Karouzakis 19-MAY-97 Modified to update proposed_payment_amount
43 -- |
44 -- | Globalization History
45 -- | J Tsai 19-JUN-97 Incorporated into JA Globalization
46 -- | J Liu 02-OCT-97 Added JA_AU_AP_AWT_FLAG for execution control
47 -- | J Liu 14-OCT-97 Bug564271. Local var not define and no value
48 -- | returned from ap_special_rate funtion.
49 -- | J Liu 22-DEC-97 Bug603639:nvl profile option comparison
50 -- | J.Karouzakis 22-DEC-97 Bug 569888. Changed cursors C_R_Tax_rate and
51 -- | C_C_Tax_rate to recognise certificate_type as
52 -- | it is stored in table.
53 -- | J.Karouzakis 02-SEP-99 Bug 825343. Fixed problems where incorrect
54 -- | rate may be used to calculate withholding tax
55 -- | when two or more vendor sites are associated
56 -- | with a vendor.
57 -- | Bug 970280. Modified to account for changes
58 -- | made by AP to rel 11 which resulted in
59 -- | invoice to Tax Authority being for unrounded
60 -- | amount.
61 -- | J.Karouzakis 22-DEC-97 Bug 569888. Changed cursors C_R_Tax_rate and
62 -- | J.Karouzakis 08-NOV-99 Fixed for Bug 1062505
63 -- | Dario Betancourt Stub Procedure Bug# 2358962
64 -- |
65 -- +==========================================================================+
66
67 function JA_AU_Get_Rate_Id (
68 P_Tax_Name IN varchar2
69 ,P_Invoice_Id IN number
70 ,P_Payment_Num IN number
71 ,P_Awt_Date IN date
72 ,P_Amount IN number
73 )
74 return number
75 is
76
77 BEGIN
78
79 return(NULL);
80
81 END JA_AU_Get_Rate_Id;
82
83
84 -- +=======================================================================+
85 -- | Procedure
86 -- | JA_AU_AWT_Rounding
87 -- |
88 -- | Description
89 -- | Procedure JA_AU_AWT_Rounding used for PPS payment invoice rounding.
90 -- |
91 -- | History
92 -- | S Goggin 26-MAR-96 Created
93 -- | S Goggin 18-JAN-97 Modified code to cope with pay alone invoices
94 -- | J Tsai 19-JUN-97 Incorporated into JA Globalization
95 -- | J Karouzakis 23-AUG-99 Changed for Bug 970280.
96 -- | J Karouzakis 07-OCT-99 Modified for altered implementation for 11i
97 -- | Dario Betancourt Stub Procedure Bug# 2358962
98 -- |
99 -- +=======================================================================+
100
101 procedure JA_AU_AWT_Rounding (P_Checkrun_Name IN varchar2)
102 is
103 BEGIN
104
105 NULL;
106
107 END JA_AU_AWT_Rounding;
108
109
110
111
112 -- MAIN function/procedure begins here.
113
114 -- +=======================================================================+
115 -- | Copyright (c) 1999 Oracle Corporation Belmont, California, USA |
116 -- | All rights reserved. |
117 -- +=======================================================================+
118 -- | Procedure
119 -- | Get_Rate_Id
120 -- |
121 -- | Description
122 -- | Procedure Get_Rate_Id used for rate implementations in AWT.
123 -- |
124 -- | History
125 -- | J Karouzakis 07-OCT-1999 Created
126 -- | Dario Betancourt Stub Procedure Bug# 2358962
127 -- |
128 -- +=======================================================================+
129
130 function Get_Rate_Id (
131 P_Tax_Name IN varchar2
132 ,P_Invoice_Id IN number
133 ,P_Payment_Num IN number
134 ,P_Awt_Date IN date
135 ,P_Amount IN number
136 )
137 return number
138 is
139
140 BEGIN
141
142 return(NULL);
143
144 END Get_Rate_Id;
145
146
147 -- +=======================================================================+
148 -- | Copyright (c) 1999 Oracle Corporation Belmont, California, USA |
149 -- | All rights reserved. |
150 -- +=======================================================================+
151 -- | Procedure
152 -- | AWT_Rounding
153 -- |
154 -- | Description
155 -- | Procedure AWT_Rounding used for rounding implementations in AWT.
156 -- |
157 -- | History
158 -- | J Karouzakis 07-OCT-1999 Created
159 -- | Dario Betancourt Stub Procedure Bug# 2358962
160 -- +=======================================================================+
161
162 procedure AWT_Rounding (P_Checkrun_Name IN varchar2)
163 is
164 BEGIN
165
166 NULL;
167
168 END AWT_Rounding;
169
170 end JA_AWT_PKG;