[Home] [Help]
PACKAGE: APPS.FA_LOAD_TBL_PKG
Source
1 PACKAGE FA_LOAD_TBL_PKG as
2 /* $Header: FAXVTBLS.pls 120.4 2005/06/24 15:09:34 msiddiqu ship $ */
3
4 -- GLOBAL VARIABLES
5
6 -- dist_line_rec : Record to store one distribution
7
8 TYPE dist_line_rec IS RECORD
9 ( row_id VARCHAR2(18),
10 dist_id NUMBER(15),
11 asset_id NUMBER(15) DEFAULT NULL,
12 units NUMBER, -- units assigned
13 date_effective DATE,
14 ccid NUMBER(15),
15 location_id NUMBER(15),
16 th_id_in NUMBER(15),
17 assigned_to NUMBER(15),
18 trans_units NUMBER,
19 -- record_status = 'UPDATE', 'INSERT' or 'DELETE'. Informs what
20 -- SQL transaction has to be performed on this distribution line
21 -- (non-database field, added for Transfer transaction.)
22 record_status VARCHAR2(6)
23 );
24
25 -- dist_line_tbl : A global table to store distribution lines
26
27 TYPE dist_line_tbl IS TABLE OF dist_line_rec
28 INDEX BY BINARY_INTEGER;
29
30 dist_table dist_line_tbl;
31 -- Global variable holding the number of dist lines count
32 g_dist_count NUMBER := 0;
33
34 /* removing this, since PL/SQL still does not allow table of nested
35 records.
36 TYPE inv_descflex_rec is RECORD (
37 attribute1 varchar2(150),
38 attribute2 varchar2(150),
39 attribute3 varchar2(150),
40 attribute4 varchar2(150),
41 attribute5 varchar2(150),
42 attribute6 varchar2(150),
43 attribute7 varchar2(150),
44 attribute8 varchar2(150),
45 attribute9 varchar2(150),
46 attribute10 varchar2(150),
47 attribute11 varchar2(150),
48 attribute12 varchar2(150),
49 attribute13 varchar2(150),
50 attribute14 varchar2(150),
51 attribute15 varchar2(150),
52 attribute_cat_code varchar2(30));
53 */
54
55 TYPE inv_line_rec is RECORD (
56 rowid varchar2(18),
57 source_line_id number default null,
58 asset_id number default null,
59 po_vendor_id number default null,
60 asset_invoice_id number default null,
61 fixed_assets_cost number,
62 po_number varchar2(20) default null,
63 invoice_number varchar2(50) default null,
64 payables_batch_name varchar2(50) default null,
65 payables_ccid number,
66 feeder_system_name varchar2(40),
67 create_batch_date date,
68 create_batch_id number,
69 invoice_date date,
70 payables_cost number,
71 post_batch_id number,
72 invoice_id number,
73 ap_dist_line_num number,
74 payables_units number,
75 description varchar2(80),
76 project_asset_line_id number,
77 project_id number,
78 task_id number,
79 material_indicator_flag varchar2(1),
80 deleted_flag varchar2(3),
81 inv_transfer_cost number,
82 inv_update_only varchar2(4),
83 inv_new_cost number,
84 depreciate_in_group_flag varchar2(1),
85 attribute1 varchar2(150),
86 attribute2 varchar2(150),
87 attribute3 varchar2(150),
88 attribute4 varchar2(150),
89 attribute5 varchar2(150),
90 attribute6 varchar2(150),
91 attribute7 varchar2(150),
92 attribute8 varchar2(150),
93 attribute9 varchar2(150),
94 attribute10 varchar2(150),
95 attribute11 varchar2(150),
96 attribute12 varchar2(150),
97 attribute13 varchar2(150),
98 attribute14 varchar2(150),
99 attribute15 varchar2(150),
100 attribute_cat_code varchar2(30),
101 invoice_distribution_id number,
102 invoice_line_number number,
103 po_distribution_id number );
104
105 TYPE inv_line_tbl is TABLE of inv_line_rec
106 INDEX BY BINARY_INTEGER;
107
108 inv_table inv_line_tbl;
109 -- Global variable holding the number of invoice lines count
110 g_inv_count NUMBER := 0;
111
112 TYPE asset_deprn_info is RECORD (
113 book_type_code varchar2(15) default null, -- for reclass
114 -- start and end dpis in category books form.
115 -- start_dpis and/or end_dpis can also be used to store
116 -- the asset's date placed in service at user's choice.
117 start_dpis date default null, -- for reclass
118 end_dpis date default null, -- for reclass
119 prorate_conv_code varchar2(10),
120 deprn_method varchar2(12),
121 life_in_months number,
122 basic_rate number,
123 adjusted_rate number,
124 production_capacity number,
125 unit_of_measure varchar2(25),
126 bonus_rule varchar2(30),
127 itc_amount number,
128 ceiling_name varchar2(30),
129 depreciate_flag varchar2(3),
130 allow_deprn_limit number,
131 deprn_limit_amount number,
132 percent_salvage_value number);
133
134 -- table of asset depreciation rules for each book -- this table is
135 -- needed for mass reclass(preview report and program) to avoid
136 -- redundant select statements for new depreciation rules. It will
137 -- store default depreciation rules for the corporate book and its
138 -- corresponding tax books in a specific category.
139
140 TYPE asset_deprn_info_tbl is TABLE of asset_deprn_info
141 INDEX BY BINARY_INTEGER;
142
143 deprn_table asset_deprn_info_tbl;
144 g_deprn_count NUMBER := 0;
145
146 TYPE asset_descflex_rec is RECORD (
147 attribute1 varchar2(150),
148 attribute2 varchar2(150),
149 attribute3 varchar2(150),
150 attribute4 varchar2(150),
151 attribute5 varchar2(150),
152 attribute6 varchar2(150),
153 attribute7 varchar2(150),
154 attribute8 varchar2(150),
155 attribute9 varchar2(150),
156 attribute10 varchar2(150),
157 attribute11 varchar2(150),
158 attribute12 varchar2(150),
159 attribute13 varchar2(150),
160 attribute14 varchar2(150),
161 attribute15 varchar2(150),
162 attribute16 varchar2(150),
163 attribute17 varchar2(150),
164 attribute18 varchar2(150),
165 attribute19 varchar2(150),
166 attribute20 varchar2(150),
167 attribute21 varchar2(150),
168 attribute22 varchar2(150),
169 attribute23 varchar2(150),
170 attribute24 varchar2(150),
171 attribute25 varchar2(150),
172 attribute26 varchar2(150),
173 attribute27 varchar2(150),
174 attribute28 varchar2(150),
175 attribute29 varchar2(150),
176 attribute30 varchar2(150),
177 attribute_cat_code varchar2(210));
178
179 TYPE asset_globaldesc_rec is RECORD (
180 attribute1 varchar2(150),
181 attribute2 varchar2(150),
182 attribute3 varchar2(150),
183 attribute4 varchar2(150),
184 attribute5 varchar2(150),
185 attribute6 varchar2(150),
186 attribute7 varchar2(150),
187 attribute8 varchar2(150),
188 attribute9 varchar2(150),
189 attribute10 varchar2(150),
190 attribute11 varchar2(150),
191 attribute12 varchar2(150),
192 attribute13 varchar2(150),
193 attribute14 varchar2(150),
194 attribute15 varchar2(150),
195 attribute16 varchar2(150),
196 attribute17 varchar2(150),
197 attribute18 varchar2(150),
198 attribute19 varchar2(150),
199 attribute20 varchar2(150),
200 attribute21 varchar2(150),
201 attribute22 varchar2(150),
202 attribute23 varchar2(150),
203 attribute24 varchar2(150),
204 attribute25 varchar2(150),
205 attribute26 varchar2(150),
206 attribute27 varchar2(150),
207 attribute28 varchar2(150),
208 attribute29 varchar2(150),
209 attribute30 varchar2(150),
210 global_attribute_cat varchar2(210));
211
212 --
213 -- Procedure load_dist_table
214 --
215 -- Usage Called by client to load all distributions in the
216 -- global table dist_line_tbl before calling the API
217 --
218 --
219
220 PROCEDURE load_dist_table
221 (p_row_id varchar2 default null,
222 p_dist_id number default null,
223 p_asset_id number default null,
224 p_units number,
225 p_date_effective date,
226 p_ccid number,
227 p_location_id number,
228 p_th_id_in number,
229 p_assigned_to number,
230 p_trans_units number,
231 p_record_status varchar2,
232 p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null );
233
234
235 PROCEDURE load_inv_table (
236 p_rowid varchar2,
237 p_source_line_id number default null,
238 p_asset_id number default null,
239 p_po_vendor_id number default null,
240 p_asset_invoice_id number default null,
241 p_fixed_assets_cost number,
242 p_po_number varchar2 default null,
243 p_invoice_number varchar2 default null,
244 p_payables_batch_name varchar2 default null,
245 p_payables_ccid number default null,
246 p_feeder_system_name varchar2 default null,
247 p_create_batch_date date default null,
248 p_create_batch_id number default null,
249 p_invoice_date date default null,
250 p_payables_cost number default null,
251 p_post_batch_id number default null,
252 p_invoice_id number default null,
253 p_ap_dist_line_num number default null,
254 p_payables_units number default null,
255 p_description varchar2 default null,
256 p_project_asset_line_id number default null,
257 p_project_id number default null,
258 p_task_id number default null,
259 p_material_indicator_flag varchar2 default null,
260 p_deleted_flag varchar2,
261 p_inv_transfer_cost number,
262 p_inv_update_only varchar2,
263 p_inv_new_cost number,
264 p_depreciate_in_group_flag varchar2,
265 p_attribute1 varchar2 default null,
266 p_attribute2 varchar2 default null,
267 p_attribute3 varchar2 default null,
268 p_attribute4 varchar2 default null,
269 p_attribute5 varchar2 default null,
270 p_attribute6 varchar2 default null,
271 p_attribute7 varchar2 default null,
272 p_attribute8 varchar2 default null,
273 p_attribute9 varchar2 default null,
274 p_attribute10 varchar2 default null,
275 p_attribute11 varchar2 default null,
276 p_attribute12 varchar2 default null,
277 p_attribute13 varchar2 default null,
278 p_attribute14 varchar2 default null,
279 p_attribute15 varchar2 default null,
280 p_attribute_cat_code varchar2 default null,
281 p_invoice_distribution_id number default null,
282 p_invoice_line_number number default null,
283 p_po_distribution_id number default null,
284 p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null );
285
286 -- procedure to reset global variable g_dist_count
287 FUNCTION reset_g_dist_count(p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)
288 RETURN BOOLEAN;
289
290 -- procedure to reset global variable g_inv_count
291 PROCEDURE reset_g_inv_count(p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null);
292
293
294 -- Procedure to load default depreciation rules for the specified
295 -- corporate book and its associated tax books in a specific category
296 -- into a global table(deprn_table.) This procedure should be
297 -- called by a mass reclass program wrapper procedure, before calling
298 -- the Reclass Public API for each asset.
299
300 PROCEDURE Load_Deprn_Rules_Tbl(
301 p_corp_book VARCHAR2,
302 p_category_id NUMBER,
303 x_return_status OUT NOCOPY BOOLEAN,
304 p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null);
305
306 -- Procedure that fetches a record of new depreciation rules for the
307 -- given book and date placed in service. x_found indicates whether the record was
308 -- found or not.
309
310 PROCEDURE Get_Deprn_Rules(
311 p_book_type_code VARCHAR2,
312 p_date_placed_in_service DATE,
313 x_deprn_rules_rec OUT NOCOPY asset_deprn_info,
314 x_found OUT NOCOPY BOOLEAN,
315 p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null);
316
317 -- Procedure to find the index position of a specific depreciation
318 -- rules record in the table, deprn_table, based on the book and
319 -- date placed in service, which uniquely identifies one record in the table.
320 -- If the record is not found, NULL is returned.
321
322 PROCEDURE Find_Position_Deprn_Rules(
323 p_book_type_code VARCHAR2,
324 p_date_placed_in_service DATE,
325 x_pos OUT NOCOPY NUMBER,
326 p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null
327 );
328
329
330 END FA_LOAD_TBL_PKG;