[Home] [Help]
PACKAGE: APPS.JGRX_WT
Source
1 PACKAGE JGRX_WT AUTHID CURRENT_USER AS
2 /* $Header: jgrxwts.pls 120.6 2005/06/23 22:18:21 rguerrer ship $ */
3 /**************************************************************************
4 * Public Procedures *
5 **************************************************************************/
6 /**************************************************************************
7 * *
8 * Name : Get_Withholding_Tax *
9 * Purpose : This is the core generic withholding tax routine, which *
10 * populates the interface table JG_ZZ_AP_WHT_ITF. *
11 * This has a call to the following: *
12 * 1. Before Report - where it constructs the basic SELECT *
13 * 2. Bind - binds the variables *
14 * *
15 **************************************************************************/
16
17 PROCEDURE GET_WITHHOLDING_TAX ( request_id in number,
18 section_name in varchar2,
19 retcode out NOCOPY number,
20 errbuf out NOCOPY varchar2);
21
22
23 /**************************************************************************
24 * *
25 * Name : jg_wht_extract *
26 * Purpose : This plug-in is specific to suit Korean withholding tax *
27 * needs. It has the following procedures *
28 * 1. Call to the BASIC procedure Get_Withholding_Tax *
29 * 2. Before Report - To add conditions specific to Korea *
30 * 3. Bind - binds the variables *
31 * 4. After Fetch - does manipulation on fetched record *
32 * *
33 **************************************************************************/
34
35 PROCEDURE jg_wht_extract ( p_gldate_from in DATE,
36 p_gldate_to in DATE,
37 p_supplier_from in VARCHAR2,
38 p_supplier_to in VARCHAR2,
39 p_supp_tax_reg_num in VARCHAR2,
40 p_invoice_number in VARCHAR2,
41 p_reporting_level in VARCHAR2,
42 p_reporting_context in VARCHAR2,
43 p_legal_entity_id in NUMBER,
44 p_acct_flexfield_from in VARCHAR2,
45 p_acct_flexfield_to in VARCHAR2,
46 p_org_type in VARCHAR2,
47 p_location in NUMBER,
48 p_res_inc_categ in VARCHAR2,
49 p_for_inc_categ in VARCHAR2,
50 request_id in NUMBER,
51 retcode out NOCOPY NUMBER,
52 errbuf out NOCOPY VARCHAR2);
53
54 ---------------------
55 -- Public Procedures
56 ---------------------
57 PROCEDURE set_retcode(p_retcode in number);
58 PROCEDURE append_errbuf(p_msg in varchar2);
59
60 /**************************************************************************
61 * *
62 * Name : before_report *
63 * Purpose : This procedure constructs the basic SELECT and INSERT *
64 * statement to populate the interface table JG_ZZ_AP_WHT_ITF *
65 * *
66 **************************************************************************/
67
68 PROCEDURE before_report;
69
70 /**************************************************************************
71 * *
72 * Name : wht_before_report *
73 * Purpose : This procedure has Korean specific WHERE clauses *
74 * for populating the interface table JG_ZZ_AP_WHT_ITF *
75 * *
76 **************************************************************************/
77
78 PROCEDURE wht_before_report;
79
80 /**************************************************************************
81 * *
82 * Name : get_lookup_meaning *
83 * Purpose : This function returns the meaning for the matching *
84 * lookup_type and lookup_code in po_lookup_codes, *
85 * fnd_lookups using a memory structure. *
86 **************************************************************************/
87
88 FUNCTION get_lookup_meaning( p_product in varchar2,
89 p_lookup_type in varchar2,
90 p_lookup_code in varchar2)
91 RETURN varchar2;
92
93
94 /**************************************************************************
95 * *
96 * Name : wht_bind *
97 * Purpose : This procedure accepts an integer parameter :CURSOR_SELECT *
98 * and binds the parameter to variables *
99 * *
100 **************************************************************************/
101 PROCEDURE wht_bind(c in integer);
102
103 /**************************************************************************
104 * *
105 * Name : wht_after_fetch *
106 * Purpose : This procedure does any manipulation required on the *
107 * fetched record before populating the interface table *
108 * JG_ZZ_AP_WHT_ITF *
109 * *
110 **************************************************************************/
111 PROCEDURE wht_after_fetch;
112
113 /**************************************************************************
114 * Structure to hold placeholder values *
115 **************************************************************************/
116
117 type var_t is record (
118 CORPORATE_ID_NUMBER VARCHAR2(150),
119 LOCATION_NAME VARCHAR2(60),
120 LOCATION_ADDRESS1 VARCHAR2(240),
121 LOCATION_ADDRESS2 VARCHAR2(240),
122 LOCATION_ADDRESS3 VARCHAR2(240),
123 LOCATION_COUNTRY VARCHAR2(60),
124 LOCATION_ZIPCODE VARCHAR2(30),
125 LOCATION_PHONE VARCHAR2(30),
126 LOCATION_FAX VARCHAR2(60),
127 LEGAL_ENTITY_NAME VARCHAR2(60),
128 LEGAL_ENTITY_CITY VARCHAR2(30),
129 LEGAL_ENTITY_ADDRESS1 VARCHAR2(240),
130 LEGAL_ENTITY_ADDRESS2 VARCHAR2(240),
131 LEGAL_ENTITY_ADDRESS3 VARCHAR2(240),
132 LEGAL_ENTITY_COUNTRY VARCHAR2(60),
133 LEGAL_ENTITY_ZIPCODE VARCHAR2(30),
134 LEGAL_ENTITY_PHONE VARCHAR2(30),
135 TAX_REGISTRATION_NUM VARCHAR2(150),
136 LOC_TAXABLE_PERSON VARCHAR2(150),
137 SUPPLIER_ID NUMBER,
138 SUPPLIER_NAME VARCHAR2(240),
139 SUPPLIER_SITE_ID NUMBER,
140 SUPPLIER_SITE_NAME VARCHAR2(15),
141 PV_ATTRIBUTE1 VARCHAR2(150),
142 PV_ATTRIBUTE2 VARCHAR2(150),
143 PV_ATTRIBUTE3 VARCHAR2(150),
144 PV_ATTRIBUTE4 VARCHAR2(150),
145 PV_ATTRIBUTE5 VARCHAR2(150),
146 PV_ATTRIBUTE6 VARCHAR2(150),
147 PV_ATTRIBUTE7 VARCHAR2(150),
148 PV_ATTRIBUTE8 VARCHAR2(150),
149 PV_ATTRIBUTE9 VARCHAR2(150),
150 PV_ATTRIBUTE10 VARCHAR2(150),
151 PV_ATTRIBUTE11 VARCHAR2(150),
152 PV_ATTRIBUTE12 VARCHAR2(150),
153 PV_ATTRIBUTE13 VARCHAR2(150),
154 PV_ATTRIBUTE14 VARCHAR2(150),
155 PV_ATTRIBUTE15 VARCHAR2(150),
156 PVS_ATTRIBUTE1 VARCHAR2(150),
157 PVS_ATTRIBUTE2 VARCHAR2(150),
158 PVS_ATTRIBUTE3 VARCHAR2(150),
159 PVS_ATTRIBUTE4 VARCHAR2(150),
160 PVS_ATTRIBUTE5 VARCHAR2(150),
161 PVS_ATTRIBUTE6 VARCHAR2(150),
162 PVS_ATTRIBUTE7 VARCHAR2(150),
163 PVS_ATTRIBUTE8 VARCHAR2(150),
164 PVS_ATTRIBUTE9 VARCHAR2(150),
165 PVS_ATTRIBUTE10 VARCHAR2(150),
166 PVS_ATTRIBUTE11 VARCHAR2(150),
167 PVS_ATTRIBUTE12 VARCHAR2(150),
168 PVS_ATTRIBUTE13 VARCHAR2(150),
169 PVS_ATTRIBUTE14 VARCHAR2(150),
170 PVS_ATTRIBUTE15 VARCHAR2(150),
171 INV_ATTRIBUTE1 VARCHAR2(150),
172 INV_ATTRIBUTE2 VARCHAR2(150),
173 INV_ATTRIBUTE3 VARCHAR2(150),
174 INV_ATTRIBUTE4 VARCHAR2(150),
175 INV_ATTRIBUTE5 VARCHAR2(150),
176 INV_ATTRIBUTE6 VARCHAR2(150),
177 INV_ATTRIBUTE7 VARCHAR2(150),
178 INV_ATTRIBUTE8 VARCHAR2(150),
179 INV_ATTRIBUTE9 VARCHAR2(150),
180 INV_ATTRIBUTE10 VARCHAR2(150),
181 INV_ATTRIBUTE11 VARCHAR2(150),
182 INV_ATTRIBUTE12 VARCHAR2(150),
183 INV_ATTRIBUTE13 VARCHAR2(150),
184 INV_ATTRIBUTE14 VARCHAR2(150),
185 INV_ATTRIBUTE15 VARCHAR2(150),
186 SUPPLIER_COUNTRY VARCHAR2(25),
187 SUPPLIER_ADDRESS_LINE1 VARCHAR2(240),
188 SUPPLIER_ADDRESS_LINE2 VARCHAR2(240),
189 SUPPLIER_ADDRESS_LINE3 VARCHAR2(240),
190 SUPPLIER_CITY VARCHAR2(25),
191 SUPPLIER_POSTAL_CODE VARCHAR2(20),
192 SUPPLIER_PROVINCE VARCHAR2(150),
193 SUPPLIER_COUNTY VARCHAR2(150),
194 SUPP_CONCATENATED_ADDRESS VARCHAR2(800),
195 SUPPLIER_TAXABLE_PERSON VARCHAR2(150),
196 SUPPLIER_TAX_REGISTRATION_NUM VARCHAR2(20),
197 SUPPLIER_TAXPAYER_ID VARCHAR2(30),
198 BUSINESS_INC_SUB_CATEGORY VARCHAR2(150),
199 BIZ_INC_SUB_CATEG_MEANING VARCHAR2(80),
200 DIST_CODE_COMBINATION_ID NUMBER(15),
201 ACCOUNTING_FLEXFIELD VARCHAR2(1000), /*Bug 3017170*/
202 TRANSACTION_NUMBER VARCHAR2(50),
203 ACCOUNTING_DATE DATE,
204 DOCUMENT_NUMBER VARCHAR2(50),
205 ORGANIZATION_TYPE VARCHAR2(25),
206 ORG_TYPE_MEANING VARCHAR2(80),
207 TAX_ID NUMBER(15),
208 TAX_CODE VARCHAR2(15),
209 AWT_DESCRIPTION VARCHAR2(240),
210 TAX_TYPE VARCHAR2(25),
211 TAX_RATE_ID NUMBER(15),
212 TAX_RATE NUMBER,
213 RECOGNIZED_EXPENSE_PERCENT VARCHAR2(150),
214 NOMINAL_TAX_RATE VARCHAR2(150),
215 NOMINAL_OR_REG_TAX_RATE NUMBER,
216 TAX_LOCATION VARCHAR2(150),
217 WITHHOLDING_TAX_TYPE VARCHAR2(150),
218 WH_TAX_TYPE_MEANING VARCHAR2(80),
219 RESIDENT_INC_CATEG_CODE VARCHAR2(150),
220 RES_INC_CATEG_MEANING VARCHAR2(80),
221 FOREIGN_INC_CATEG_CODE VARCHAR2(150),
222 FOR_INC_CATEG_MEANING VARCHAR2(80),
223 TAX_AUTHORITY_NAME VARCHAR2(240),
224 STATUS VARCHAR2(1),
225 INCOME_TAX NUMBER,
226 RESIDENT_TAX NUMBER,
227 TOTAL_WHT_AMOUNT NUMBER,
228 PAYMENT_CURRENCY VARCHAR2(15),
229 INVOICE_PAYMENT_ID NUMBER(15),
230 PAYMENT_AMOUNT NUMBER,
231 PAYMENT_DATE DATE,
232 PAYMENT_NUMBER NUMBER(15),
233 CHECK_ID NUMBER(15),
234 CHECK_NUMBER NUMBER(15),
235 CHECK_AMOUNT NUMBER,
236 INVOICE_ID NUMBER(15),
237 INVOICE_LINE_NUMBER NUMBER(15),
238 INVOICE_DISTRIBUTION_ID NUMBER(15),
239 INVOICE_AMOUNT NUMBER,
240 INVOICE_DATE DATE,
241 CURRENCY_CODE VARCHAR2(15),
242 FUNC_CURRENCY_CODE VARCHAR2(15),
243 AMT_SUBJECT_TO_WH NUMBER,
244 RECOGNIZED_EXPENSE_AMT NUMBER,
245 INC_WH_TAX_BASE_AMT NUMBER,
246 RES_WH_TAX_BASE_AMT NUMBER,
247 TOTAL_TAX_BASE_AMT NUMBER,
248 NET_AMOUNT NUMBER,
249 LINE_NUMBER NUMBER(15),
250 TYPE_1099 VARCHAR2(10),
251 ITEM_DESCRIPTION VARCHAR2(240),
252 ORGANIZATION_NAME VARCHAR2(60),
253 REPORTING_ENTITY_NAME VARCHAR2(50),
254 REPORTING_SOB_NAME VARCHAR2(30),
255 SOB_ID NUMBER(15),
256 CREATE_DIST ap_system_parameters_all.create_awt_dists_type%TYPE,
257 ORG_ID NUMBER(15)
258 );
259
260 var var_t;
261
262 END JGRX_WT;