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