DBA Data[Home] [Help]

PACKAGE: APPS.FA_LOAD_TBL_PKG

Source


1 PACKAGE FA_LOAD_TBL_PKG AUTHID CURRENT_USER as
2 /* $Header: FAXVTBLS.pls 120.5 2009/03/27 09:53:31 bridgway 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          invoice_distribution_id number,
74          invoice_line_number     number,
75          po_distribution_id      number,
76 			ap_dist_line_num	number,
77 			payables_units		number,
78 			description		varchar2(80),
79 			project_asset_line_id	number,
80 			project_id		number,
81 			task_id			number,
82                         material_indicator_flag varchar2(1),
83 			deleted_flag		varchar2(3),
84 			inv_transfer_cost	number,
85 			inv_update_only		varchar2(4),
86 			inv_new_cost		number,
87                         depreciate_in_group_flag varchar2(1),
88 			attribute1	varchar2(150),
89 			attribute2	varchar2(150),
90 			attribute3	varchar2(150),
91 			attribute4	varchar2(150),
92 			attribute5	varchar2(150),
93 			attribute6	varchar2(150),
94 			attribute7	varchar2(150),
95 			attribute8	varchar2(150),
96 			attribute9	varchar2(150),
97 			attribute10	varchar2(150),
98 			attribute11	varchar2(150),
99 			attribute12	varchar2(150),
100 			attribute13	varchar2(150),
101 			attribute14	varchar2(150),
102 			attribute15	varchar2(150),
103 			attribute_cat_code varchar2(30));
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, p_log_level_rec        IN     FA_API_TYPES.log_level_rec_type);
232 
233 
234 PROCEDURE load_inv_table (
235 	     p_rowid				varchar2,
236              p_source_line_id                   number default null,
237      	     p_asset_id         		number default null,
238   	     p_po_vendor_id     		number default null,
239     	     p_asset_invoice_id 		number default null,
240 	     p_fixed_assets_cost 		number,
241 	     p_po_number			varchar2 default null,
242 	     p_invoice_number  			varchar2 default null,
243     	     p_payables_batch_name 		varchar2 default null,
244    	     p_payables_ccid			number default null,
245 	     p_feeder_system_name 		varchar2 default null,
246 	     p_create_batch_date		date default null,
247   	     p_create_batch_id			number default null,
248 	     p_invoice_date			date default null,
249 	     p_payables_cost			number default null,
250 	     p_post_batch_id			number default null,
251 	     p_invoice_id			number default null,
252         p_invoice_distribution_id number default null,
253         p_invoice_line_number     number default null,
254         p_po_distribution_id      number default null,
255 	     p_ap_dist_line_num			number default null,
256 	     p_payables_units			number default null,
257 	     p_description			varchar2 default null,
258 	     p_project_asset_line_id		number default null,
259 	     p_project_id			number default null,
260 	     p_task_id				number default null,
261              p_material_indicator_flag          varchar2 default null,
262 	     p_deleted_flag			varchar2,
263 	     p_inv_transfer_cost		number,
264 	     p_inv_update_only			varchar2,
265 	     p_inv_new_cost			number,
266              p_depreciate_in_group_flag         varchar2,
267 	     p_attribute1			varchar2 default null,
268 	     p_attribute2			varchar2 default null,
269 	     p_attribute3			varchar2 default null,
270 	     p_attribute4			varchar2 default null,
271 	     p_attribute5			varchar2 default null,
272 	     p_attribute6			varchar2 default null,
273 	     p_attribute7			varchar2 default null,
274 	     p_attribute8			varchar2 default null,
275 	     p_attribute9			varchar2 default null,
276 	     p_attribute10			varchar2 default null,
277 	     p_attribute11			varchar2 default null,
278 	     p_attribute12			varchar2 default null,
279 	     p_attribute13			varchar2 default null,
280 	     p_attribute14			varchar2 default null,
281 	     p_attribute15			varchar2 default null,
282 	     p_attribute_cat_code 		varchar2 default null, p_log_level_rec        IN     FA_API_TYPES.log_level_rec_type);
283 
284 -- procedure to reset global variable g_dist_count
285 FUNCTION     reset_g_dist_count RETURN BOOLEAN;
286 
287 -- procedure to reset global variable g_inv_count
288 PROCEDURE    reset_g_inv_count;
289 
290 
291 -- Procedure to load default depreciation rules for the specified
292 -- corporate book and its associated tax books in a specific category
293 -- into a global table(deprn_table.)  This procedure should be
294 -- called by a mass reclass program wrapper procedure, before calling
295 -- the Reclass Public API for each asset.
296 
297 PROCEDURE Load_Deprn_Rules_Tbl(
298         p_corp_book             VARCHAR2,
299         p_category_id           NUMBER,
300 	x_return_status	 OUT NOCOPY BOOLEAN, p_log_level_rec        IN     FA_API_TYPES.log_level_rec_type);
301 
302 -- Procedure that fetches a record of new depreciation rules for the
303 -- given book and date placed in service.  x_found indicates whether the record was
304 -- found or not.
305 
306 PROCEDURE Get_Deprn_Rules(
307         p_book_type_code        VARCHAR2,
308 	p_date_placed_in_service DATE,
309         x_deprn_rules_rec       OUT NOCOPY asset_deprn_info,
310 	x_found		 OUT NOCOPY BOOLEAN, p_log_level_rec        IN     FA_API_TYPES.log_level_rec_type);
311 
312 -- Procedure to find the index position of a specific depreciation
313 -- rules record in the table, deprn_table, based on the book and
314 -- date placed in service, which uniquely identifies one record in the table.
315 -- If the record is not found, NULL is returned.
316 
317 PROCEDURE Find_Position_Deprn_Rules(
318         p_book_type_code         VARCHAR2,
319         p_date_placed_in_service DATE,
320         x_pos                    OUT NOCOPY NUMBER
321         , p_log_level_rec        IN     FA_API_TYPES.log_level_rec_type);
322 
323 
324 END FA_LOAD_TBL_PKG;