1 PACKAGE PA_FAXFACE AUTHID CURRENT_USER AS
2 /* $Header: PAFAXS.pls 120.11 2011/11/09 04:45:19 nbudi ship $ */
3
4 -- Standard who
5 x_last_updated_by NUMBER(15) := FND_GLOBAL.USER_ID;
6 x_last_update_date NUMBER(15) := FND_GLOBAL.USER_ID;
7 x_created_by NUMBER(15) := FND_GLOBAL.USER_ID;
8 x_last_update_login NUMBER(15) := FND_GLOBAL.LOGIN_ID;
9 -- Commented out for bug 5401326 x_request_id NUMBER(15) := FND_GLOBAL.CONC_REQUEST_ID;
10 x_request_id NUMBER(15);
11 x_program_application_id NUMBER(15) := FND_GLOBAL.PROG_APPL_ID;
12 x_program_id NUMBER(15) := FND_GLOBAL.CONC_PROGRAM_ID;
13
14 -- Variable used by the set_ and get_inservice_thru_date functions.
15 x_in_service_thru_date DATE;
16 G_debug_mode VARCHAR2(1); -- Fix for bug : 4878878
17
18 PROCEDURE set_in_service_thru_date (x_passed_thru_date IN DATE);
19
20 FUNCTION check_required_segment (structnum in number) return varchar2;
21
22 FUNCTION get_in_service_thru_date RETURN DATE;
23 --This function is used by the pa_cp_generate_asset_v to enable
24 --the view's where clause to use a parameter passed to the report.
25 --pragma RESTRICT_REFERENCES (get_in_service_thru_date, WNDS, WNPS );
26
27 FUNCTION Initialize RETURN NUMBER;
28
29 FUNCTION get_group_level_task_id
30 ( x_task_id IN NUMBER,
31 x_top_task_id IN NUMBER,
32 x_project_id IN NUMBER)
33 RETURN NUMBER ;
34
35 --pragma RESTRICT_REFERENCES (get_group_level_task_id, WNDS, WNPS );
36
37 FUNCTION get_asset_category_id
38 ( x_doc_header_id IN NUMBER,
39 x_doc_line_num IN NUMBER,
40 x_doc_dist_id IN NUMBER,
41 x_transaction_source IN VARCHAR2,
42 x_document_distribution_type IN VARCHAR2 DEFAULT NULL) --self assessed tax enhancement
43 RETURN NUMBER;
44
45 -- pragma RESTRICT_REFERENCES (get_asset_category_id, WNDS, WNPS );
46
47 /* Added for bug 1280252 */
48 FUNCTION is_project_eligible(p_project_id IN NUMBER
49 ,p_capital_event_id IN NUMBER
50 ) RETURN BOOLEAN;
51
52 PROCEDURE get_asset_id
53 ( x_project_id IN NUMBER,
54 x_system_linkage_function IN VARCHAR2,
55 x_grp_level_task_id IN NUMBER,
56 x_asset_category_id IN NUMBER,
57 x_line_type IN VARCHAR2,
58 x_capital_event_id IN NUMBER,
59 x_asset_id OUT NOCOPY NUMBER,
60 x_num_asset_assigned OUT NOCOPY NUMBER);
61
62 PROCEDURE get_asset_attributes
63 ( x_project_asset_id IN NUMBER,
64 x_depreciation_expense_ccid IN OUT NOCOPY NUMBER,
65 x_err_stage IN OUT NOCOPY VARCHAR2,
66 x_err_code IN OUT NOCOPY NUMBER);
67
68 PROCEDURE find_assets_to_be_reversed
69 (x_project_id IN NUMBER,
70 x_asset_found IN OUT NOCOPY BOOLEAN,
71 x_capital_event_id IN NUMBER,
72 x_err_stage IN OUT NOCOPY VARCHAR2,
73 x_err_code IN OUT NOCOPY NUMBER);
74
75 PROCEDURE check_asset_to_be_reversed
76 (x_proj_asset_line_detail_id IN NUMBER,
77 x_asset_found IN OUT NOCOPY BOOLEAN,
78 x_err_stage IN OUT NOCOPY VARCHAR2,
79 x_err_code IN OUT NOCOPY NUMBER);
80
81 PROCEDURE check_proj_asset_lines
82 (x_proj_asset_line_detail_id IN NUMBER,
83 x_line_found IN OUT NOCOPY BOOLEAN,
84 x_err_stage IN OUT NOCOPY VARCHAR2,
85 x_err_code IN OUT NOCOPY NUMBER);
86
87 PROCEDURE update_line_details
88 (x_proj_asset_line_detail_id IN NUMBER,
89 x_err_stage IN OUT NOCOPY VARCHAR2,
90 x_err_code IN OUT NOCOPY NUMBER);
91
92 PROCEDURE update_expenditure_items
93 (x_proj_asset_line_detail_id IN NUMBER,
94 x_revenue_distributed_flag IN VARCHAR2,
95 x_err_stage IN OUT NOCOPY VARCHAR2,
96 x_err_code IN OUT NOCOPY NUMBER);
97
98 PROCEDURE update_asset_cost
99 (x_project_asset_id IN NUMBER,
100 x_grouped_cip_cost IN NUMBER,
101 x_capitalized_cost IN NUMBER,
102 x_err_stage IN OUT NOCOPY VARCHAR2,
103 x_err_code IN OUT NOCOPY NUMBER);
104
105 PROCEDURE create_project_asset_lines
106 (x_description IN VARCHAR2,
107 x_project_asset_id IN NUMBER,
108 x_project_id IN NUMBER,
109 x_task_id IN NUMBER,
110 x_cip_ccid IN NUMBER,
111 x_asset_cost_ccid IN NUMBER,
112 x_original_asset_cost IN NUMBER,
113 x_current_asset_cost IN NUMBER,
114 x_project_asset_line_detail_id IN NUMBER,
115 x_gl_date IN DATE,
116 x_transfer_status_code IN VARCHAR2,
117 x_transfer_rejection_reason IN VARCHAR2,
118 x_amortize_flag IN VARCHAR2,
119 x_asset_category_id IN NUMBER,
120 x_rev_proj_asset_line_id IN NUMBER,
121 x_rev_from_proj_asset_line_id IN NUMBER,
122 x_invoice_number IN VARCHAR2,
123 x_vendor_number IN VARCHAR2,
124 x_po_vendor_id IN NUMBER,
125 x_po_number IN VARCHAR2,
126 x_invoice_date IN DATE,
127 x_invoice_created_by IN NUMBER,
128 x_invoice_updated_by IN NUMBER,
129 x_invoice_id IN NUMBER,
130 x_payables_batch_name IN VARCHAR2,
131 x_ap_dist_line_number IN NUMBER, -- R12 changes
132 x_invoice_distribution_id IN NUMBER,
133 x_orig_asset_id IN Number,
134 x_line_type IN VARCHAR2,
135 x_capital_event_id IN NUMBER,
136 x_retirement_cost_type IN VARCHAR2,
137 x_err_stage IN OUT NOCOPY VARCHAR2,
138 x_err_code IN OUT NOCOPY NUMBER);
139
140 PROCEDURE reverse_asset_lines
141 (x_project_id IN NUMBER,
142 x_capital_event_id IN NUMBER,
143 x_err_stage IN OUT NOCOPY VARCHAR2,
144 x_err_code IN OUT NOCOPY NUMBER);
145
146 PROCEDURE get_proj_asset_id
147 (x_project_id IN NUMBER,
148 x_task_id IN NUMBER,
149 x_project_asset_id IN OUT NOCOPY NUMBER,
150 x_err_stage IN OUT NOCOPY VARCHAR2,
151 x_err_code IN OUT NOCOPY NUMBER);
152
153 PROCEDURE delete_proj_asset_line
154 (x_project_asset_line_id IN NUMBER,
155 x_err_stage IN OUT NOCOPY VARCHAR2,
156 x_err_code IN OUT NOCOPY NUMBER);
157
158 PROCEDURE delete_proj_asset_line_details
159 (x_project_asset_line_detail_id IN NUMBER,
160 x_err_stage IN OUT NOCOPY VARCHAR2,
161 x_err_code IN OUT NOCOPY NUMBER);
162
163 /* bug 10257577 */
164 PROCEDURE delete_asset_lines
165 (x_project_id IN NUMBER,
166 x_in_service_date_through IN DATE,
167 x_capital_event_id IN NUMBER,
168 x_err_stage IN OUT NOCOPY VARCHAR2,
169 x_err_code IN OUT NOCOPY NUMBER);
170
171 PROCEDURE create_proj_asset_line_details
172 (x_expenditure_item_id IN NUMBER,
173 x_line_num IN NUMBER,
174 x_project_asset_line_detail_id IN NUMBER,
175 x_cip_cost IN NUMBER,
176 x_reversed_flag IN VARCHAR2,
177 x_err_stage IN OUT NOCOPY VARCHAR2,
178 x_err_code IN OUT NOCOPY NUMBER);
179
180 PROCEDURE fetch_vi_info ( /*Start of changes for Bug 7428263 */
181 /* x_invoice_id IN Number, */
182 x_ref2 IN Number,
183 /* x_ap_dist_line_number IN Number, */
184 x_ref3 IN Number,
185 x_ref4 IN Number,
186 x_transaction_source IN VARCHAR2,
187 /*End of changes for Bug 7428263 */
188 x_document_distribution_type IN VARCHAR2 DEFAULT NULL, --self assessed tax enhancement
189 x_employee_id OUT NOCOPY Number,
190 x_invoice_num OUT NOCOPY VARCHAR2,
191 x_vendor_number OUT NOCOPY VARCHAR2,
192 x_po_vendor_id OUT NOCOPY NUMBER,
193 x_po_number OUT NOCOPY VARCHAR2,
194 x_invoice_date OUT NOCOPY DATE,
195 x_invoice_created_by OUT NOCOPY NUMBER,
196 x_invoice_updated_by OUT NOCOPY NUMBER,
197 x_payables_batch_name OUT NOCOPY VARCHAR2,
198 x_err_stage IN OUT NOCOPY VARCHAR2,
199 x_err_code IN OUT NOCOPY NUMBER);
200
201 PROCEDURE generate_proj_asset_lines
202 ( x_project_id IN NUMBER,
203 x_in_service_date_through IN DATE,
204 x_common_tasks_flag IN VARCHAR2,
205 x_pa_date IN DATE,
206 x_capital_cost_type_code IN VARCHAR2 ,
207 x_cip_grouping_method_code IN VARCHAR2 ,
208 x_OVERRIDE_ASSET_ASSIGNMENT IN VARchar2,
209 x_VENDOR_INVOICE_GROUPING_CODE IN varchar2,
210 x_capital_event_id IN NUMBER,
211 x_line_type IN VARCHAR2,
212 x_ledger_id IN NUMBER,
213 x_err_stage IN OUT NOCOPY VARCHAR2,
214 x_err_code IN OUT NOCOPY NUMBER);
215
216 PROCEDURE summarize_proj
217 ( errbuf IN OUT NOCOPY VARCHAR2,
218 retcode IN OUT NOCOPY VARCHAR2,
219 x_project_num_from IN VARCHAR2,
220 x_project_num_to IN VARCHAR2,
221 x_in_service_date_through IN DATE,
222 x_common_tasks_flag IN VARCHAR2,
223 x_pa_date IN DATE
224 ,x_capital_event_id IN NUMBER DEFAULT NULL
225 , x_debug_mode IN VARCHAR2 -- Fix for bug : 4878878
226 );
227 PROCEDURE mark_asset_lines_for_xfer
228 ( x_project_id IN NUMBER,
229 x_in_service_date_through IN DATE,
230 x_line_type IN VARCHAR2,
231 x_rowcount IN OUT NOCOPY NUMBER,
232 x_err_stage IN OUT NOCOPY VARCHAR2,
233 x_err_code IN OUT NOCOPY NUMBER);
234
235 PROCEDURE mark_reversing_lines(x_project_id IN NUMBER,
236 x_capital_event_id IN NUMBER,
237 x_line_type IN VARCHAR2,
238 x_err_stage IN OUT NOCOPY VARCHAR2,
239 x_err_code IN OUT NOCOPY NUMBER);
240
241 PROCEDURE update_asset_capitalized_flag
242 (x_project_asset_id IN NUMBER,
243 x_capitalized_flag IN VARCHAR2,
244 x_err_stage IN OUT NOCOPY VARCHAR2,
245 x_err_code IN OUT NOCOPY NUMBER);
246
247 PROCEDURE update_asset_adjustment_flag
248 (x_project_asset_id IN NUMBER,
249 x_adjustment_flag IN VARCHAR2,
250 x_adjustment_type IN VARCHAR2,
251 x_err_stage IN OUT NOCOPY VARCHAR2,
252 x_err_code IN OUT NOCOPY NUMBER);
253
254 PROCEDURE check_asset_id_in_FA
255 (x_project_asset_id IN NUMBER,
256 x_asset_id_in_FA IN OUT NOCOPY NUMBER,
257 x_num_asset_found IN OUT NOCOPY NUMBER,
258 x_book_type_code IN VARCHAR2,
259 x_date_placed_in_service IN OUT NOCOPY DATE,
260 x_err_stage IN OUT NOCOPY VARCHAR2,
261 x_err_code IN OUT NOCOPY NUMBER);
265 x_err_code IN OUT NOCOPY NUMBER);
262 PROCEDURE reject_lines_check1
263 (x_rows_rejected IN OUT NOCOPY NUMBER,
264 x_err_stage IN OUT NOCOPY VARCHAR2,
266
267
268 PROCEDURE update_asset_lines
269 (x_proj_asset_line_id IN NUMBER,
270 x_transfer_rejection_reason IN VARCHAR2,
271 x_transfer_status_code IN VARCHAR2,
275
272 x_amortize_flag IN VARCHAR2,
273 x_err_stage IN OUT NOCOPY VARCHAR2,
274 x_err_code IN OUT NOCOPY NUMBER);
276 PROCEDURE create_fa_mass_additions
277 (x_accounting_date IN DATE,
278 x_add_to_asset_id IN NUMBER,
279 x_amortize_flag IN VARCHAR2,
280 x_asset_category_id IN NUMBER,
281 x_asset_key_ccid IN NUMBER,
282 x_asset_number IN VARCHAR2,
283 x_asset_type IN VARCHAR2,
284 x_assigned_to IN NUMBER,
285 x_book_type_code IN VARCHAR2,
286 x_create_batch_date IN DATE,
287 x_create_batch_id IN NUMBER,
288 x_date_placed_in_service IN DATE,
289 x_depreciate_flag IN VARCHAR2,
290 x_description IN VARCHAR2,
291 x_expense_code_combination_id IN NUMBER,
292 x_feeder_system_name IN VARCHAR2,
293 x_fixed_assets_cost IN NUMBER,
294 x_fixed_assets_units IN NUMBER,
295 x_location_id IN NUMBER,
296 x_mass_addition_id IN OUT NOCOPY NUMBER,
297 x_merged_code IN VARCHAR2,
298 x_merge_prnt_mass_additions_id IN NUMBER,
299 x_new_master_flag IN VARCHAR2,
300 x_parent_mass_addition_id IN NUMBER,
301 x_payables_code_combination_id IN NUMBER,
302 x_payables_cost IN NUMBER,
303 x_payables_units IN NUMBER,
304 x_posting_status IN VARCHAR2,
305 x_project_asset_line_id IN NUMBER,
306 x_project_id IN NUMBER,
307 x_queue_name IN VARCHAR2,
308 x_split_code IN VARCHAR2,
309 x_split_merged_code IN VARCHAR2,
310 x_split_prnt_mass_additions_id IN NUMBER,
311 x_task_id IN NUMBER,
312 x_invoice_number IN VARCHAR2,
313 x_vendor_number IN VARCHAR2,
314 x_po_vendor_id IN NUMBER,
315 x_po_number IN VARCHAR2,
316 x_invoice_date IN DATE,
317 x_invoice_created_by IN NUMBER,
318 x_invoice_updated_by IN NUMBER,
319 x_invoice_id IN NUMBER,
320 x_payables_batch_name IN VARCHAR2,
321 x_ap_dist_line_number IN NUMBER, -- R12 changes
322 x_invoice_distribution_id IN NUMBER, -- R12 changes
323 x_parent_asset_id IN NUMBER,
324 x_manufacturer_name IN VARCHAR2,
325 x_model_number IN VARCHAR2,
326 x_serial_number IN VARCHAR2,
327 x_tag_number IN VARCHAR2,
328 x_err_stage IN OUT NOCOPY VARCHAR2,
329 x_err_code IN OUT NOCOPY NUMBER
330 );
331
332 PROCEDURE interface_asset_lines
333 ( x_project_id IN NUMBER,
334 x_asset_type IN VARCHAR2,
335 x_in_service_date_through IN DATE,
336 x_reversed_line_flag IN VARCHAR2,
337 x_err_stage IN OUT NOCOPY VARCHAR2,
338 x_err_code IN OUT NOCOPY NUMBER);
339
340 PROCEDURE interface_assets
341 ( errbuf IN OUT NOCOPY VARCHAR2,
342 retcode IN OUT NOCOPY VARCHAR2,
343 x_project_num_from IN VARCHAR2,
344 x_project_num_to IN VARCHAR2,
345 x_in_service_date_through IN DATE
346 );
347
348 /* Automatic asset capitalization changes JPULTORAK 04-FEB-03 */
349 PROCEDURE get_depreciation_expense
350 (x_project_asset_id IN NUMBER,
351 x_book_type_code IN VARCHAR2,
352 x_asset_category_id IN NUMBER,
353 x_date_placed_in_service IN DATE,
354 x_in_deprn_expense_ccid IN NUMBER,
355 x_out_deprn_expense_ccid IN OUT NOCOPY NUMBER,
356 x_err_stage IN OUT NOCOPY VARCHAR2,
357 x_err_code IN OUT NOCOPY NUMBER
358 );
359
360
361 PROCEDURE interface_ret_asset_lines
362 ( x_project_id IN NUMBER,
363 x_err_stage IN OUT NOCOPY VARCHAR2,
364 x_err_code IN OUT NOCOPY NUMBER);
365
366
367
368 PROCEDURE no_event_projects
369 ( x_project_id IN NUMBER, /*bug 5758490*/
370 x_in_service_date_through IN DATE,
371 x_err_stage IN OUT NOCOPY VARCHAR2,
372 x_err_code IN OUT NOCOPY NUMBER);
373 /* End of Automatic asset capitalization changes */
374
375
376 PROCEDURE summarize_xface
377 ( errbuf IN OUT NOCOPY VARCHAR2,
378 retcode IN OUT NOCOPY VARCHAR2,
379 x_project_num_from IN VARCHAR2,
380 x_project_num_to IN VARCHAR2,
381 x_in_service_date_through IN DATE,
382 x_pa_date IN DATE
383 );
384
385 PROCEDURE create_alc_asset_line_details (x_proj_asset_line_dtl_uniq_id IN NUMBER,
386 x_expenditure_item_id IN NUMBER,
390 x_err_code IN OUT NOCOPY NUMBER) ;
387 x_line_num IN NUMBER,
388 x_project_asset_line_detail_id IN NUMBER,
389 x_err_stage IN OUT NOCOPY VARCHAR2,
391
392 PROCEDURE create_alc_proj_asset_lines (x_project_asset_line_id IN NUMBER,
393 x_project_asset_line_detail_id IN NUMBER,
394 x_rev_proj_asset_line_id IN NUMBER,
395 x_original_asset_cost IN NUMBER,
396 x_current_asset_cost IN NUMBER,
397 x_err_stage IN OUT NOCOPY VARCHAR2,
398 x_err_code IN OUT NOCOPY NUMBER);
399
400 PROCEDURE update_alc_proj_asset_lines (x_project_asset_line_id IN NUMBER,
401 x_original_asset_cost IN NUMBER,
402 x_current_asset_cost IN NUMBER);
403
404 PROCEDURE create_alc_fa_mass_additions (x_project_asset_line_id IN NUMBER,
405 x_mass_addition_id IN NUMBER,
406 x_parent_mass_addition_id IN NUMBER,
407 x_fixed_assets_cost IN NUMBER);
408
409 -- Added this procedure for bug 5401326
410 PROCEDURE set_request_id(x_passed_request_id IN NUMBER);
411
412 END PA_FAXFACE;