1 PACKAGE CST_MGD_INFL_ADJUSTMENT_PVT AUTHID CURRENT_USER AS
2 /* $Header: CSTVIADS.pls 115.15 2004/05/20 09:34:18 vjavli ship $ */
3
4 --===================
5 -- GLOBAL CONSTANTS
6 --===================
7 G_PKG_NAME CONSTANT VARCHAR2(30) := 'CST_MGD_INFL_ADJUSTMENT_PVT';
8
9 --===================
10 -- TYPES
11 --===================
12
13 TYPE Infl_Adj_Acct_Rec_Type IS RECORD
14 ( status VARCHAR2(50)
15 , set_of_books_id NUMBER
16 , user_je_source_name VARCHAR2(25)
17 , user_je_category_name VARCHAR2(25)
18 , accounting_date DATE
19 , currency_code VARCHAR2(15)
20 , date_created DATE
21 , created_by NUMBER
22 , actual_flag VARCHAR2(1)
23 , entered_dr NUMBER
24 , entered_cr NUMBER
25 , code_combination_id NUMBER
26 );
27
28 TYPE Infl_Adj_Acct_Tbl_Rec_Type IS TABLE OF Infl_Adj_Acct_Rec_Type
29 INDEX BY BINARY_INTEGER;
30
31 --========================
32 -- PUBLIC FUNCTIONS
33 --========================
34
35 --========================================================================
36 -- FUNCTION : Infl_Item_Category PRIVATE
37 -- PARAMETERS: p_inventory_item_id Inventory Item ID
38 -- p_org_id Organization ID
39 -- p_category_set_id Item Category Set ID
40 -- p_category_id Item Category ID
41 -- COMMENT : This function returns 'Y' if the item requires inflation
42 -- adjustment.
43 -- EXCEPTIONS: g_no_hist_data_exc No historical data
44 --========================================================================
45 FUNCTION Infl_Item_Category
46 ( p_inventory_item_id IN NUMBER
47 , p_org_id IN NUMBER
48 , p_category_set_id IN NUMBER
49 , p_category_id IN NUMBER
50 )
51 RETURN VARCHAR2;
52
53
54 --===================
55 -- PRIVATE PROCEDURES
56 --===================
57
58 --========================================================================
59 -- PROCEDURE : Check_Period_Close PRIVATE
60 -- PARAMETERS: p_org_id Organization ID
61 -- : p_acct_period_id Account period ID
62 -- COMMENT : This procedure check if an accounting period is closed.
63 -- EXCEPTIONS: g_period_not_closed_exc Period is not closed
64 -- g_toom_many_per_close_exc Too many rows selected
65 --========================================================================
66 PROCEDURE Check_Period_Close
67 ( p_org_id IN NUMBER
68 , p_acct_period_id IN NUMBER
69 );
70
71
72 --========================================================================
73 -- PROCEDURE : Get_Previous_Acct_Period_ID PRIVATE
74 -- PARAMETERS: p_organization_id Organization ID
75 -- p_acct_period_id Account period ID
76 -- x_prev_acct_period_id Perious period account period ID
77 -- x_prev_sch_close_date Perious period schedule close date
78 -- COMMENT : This procedure retrieves previous period account period ID
79 -- and scheduled close date.
80 -- EXCEPTIONS: g_no_data_prev_per_id_exc No data found
81 -- g_too_many_prev_per_id_exc Too many rows selected
82 --========================================================================
83 PROCEDURE Get_Previous_Acct_Period_ID
84 ( p_organization_id IN NUMBER
85 , p_acct_period_id IN NUMBER
86 , x_prev_acct_period_id OUT NOCOPY NUMBER
87 , x_prev_sch_close_date OUT NOCOPY DATE
88 );
89
90
91 --=======================================================================
92 -- PROCEDURE : Get_Previous_Period_Info PRIVATE
93 -- PARAMETERS: p_country_code Country code
94 -- p_organization_id Organization ID
95 -- p_inventory_item_id Inventory item ID
96 -- p_acct_period_id Account period ID
97 -- p_prev_acct_period_id Previous account period id
98 -- p_cost_group_id Cost Group Id
99 -- x_previous_qty Previous period quantity
100 -- x_previous_cost Previous period total cost
101 -- x_previous_inflation_adj Previous period inflation
102 -- adjustment
103 -- COMMENT : This procedure returns previous inflation adjustment
104 -- data
105 -- EXCEPTIONS:
106 -- made obsolete g_no_data_previous_data_exc No rows selected
107 -- part of bug#1474753 fix
108 -- removed historical flag parameter.
109 --========================================================================
110 PROCEDURE Get_Previous_Period_Info
111 ( p_country_code IN VARCHAR2
112 , p_organization_id IN NUMBER
113 , p_inventory_item_id IN NUMBER
114 , p_acct_period_id IN NUMBER
115 , p_prev_acct_period_id IN NUMBER
116 , p_cost_group_id IN CST_COST_GROUPS.cost_group_id%TYPE
117 , x_previous_qty OUT NOCOPY NUMBER
118 , x_previous_cost OUT NOCOPY NUMBER
119 , x_previous_inflation_adj OUT NOCOPY NUMBER
120 );
121
122
123 --========================================================================
124 -- PROCEDURE : Get_Curr_Period_Start_Date PRIVATE
125 -- PARAMETERS: p_org_id Organization ID
126 -- p_acct_period_id Account period ID
127 -- x_curr_period_start_date Current period start date
128 -- COMMENT : This procedure returns the current period start date
129 -- EXCEPTIONS: g_no_data_start_date_exc No data found
130 -- g_too_many_start_date_exc Too many rows selected
131 --========================================================================
132 PROCEDURE Get_Curr_Period_Start_Date
133 ( p_org_id IN NUMBER
134 , p_acct_period_id IN NUMBER
135 , x_curr_period_start_date OUT NOCOPY DATE
136 , x_curr_period_end_date OUT NOCOPY DATE
137 );
138
139
140 --========================================================================
141 -- PROCEDURE : Get_Purchase_Qty PRIVATE
142 -- PARAMETERS: p_org_id Organization ID
143 -- p_inventory_item_id Inventory item ID
144 -- p_acct_period_id Account period ID
145 -- p_cost_group_id Cost Group Id
146 -- x_purchase_qty Purchase quantity in period
147 -- COMMENT : This procedure returns the purchase quantity incurred in
148 -- a period.
149 --========================================================================
150 PROCEDURE Get_Purchase_Qty
151 ( p_org_id IN NUMBER
152 , p_inventory_item_id IN NUMBER
153 , p_acct_period_id IN NUMBER
154 , p_cost_group_id IN CST_COST_GROUPS.cost_group_id%TYPE
155 , x_purchase_qty OUT NOCOPY NUMBER
156 );
157
158 /* bug#1474753 fix -- historical data check removed
159 --========================================================================
160 -- PROCEDURE : Check_First_Time PRIVATE
161 -- PARAMETERS: p_country_code Country code
162 -- p_org_id Organization ID
163 -- x_get_hist_data_flag Historical data flag
164 -- COMMENT : This procedure determines if the process is running for
165 -- the first time.
166 -- EXCEPTIONS: g_no_hist_data_exc No historical data
167 --========================================================================
168 PROCEDURE Check_First_Time
169 ( p_country_code IN VARCHAR2
170 , p_org_id IN NUMBER
171 , x_get_hist_data_flag OUT NOCOPY VARCHAR2
172 );
173 */
174
175
176 --========================================================================
177 -- PROCEDURE : Create_Infl_Period_Status PRIVATE
178 -- PARAMETERS: p_org_id Organization ID
179 -- p_acct_period_id Account period ID
180 -- x_return_status Return error if failed
181 -- COMMENT : This procedure makes the inflation adjusted period status
182 -- to PROCESS
183 -- USAGE : This procedue is used in Calculate_Adjustment at the end
184 -- inflation processor run to set the inflation status
185 -- EXCEPTIONS: g_exception1 exception description
186 --========================================================================
187 PROCEDURE Create_Infl_Period_Status
188 ( p_org_id IN NUMBER
189 , p_acct_period_id IN NUMBER
190 , x_return_status OUT NOCOPY VARCHAR2
191 );
192
193
194 --========================================================================
195 -- PROCEDURE : Update_Infl_Period_Status PRIVATE
196 -- PARAMETERS: p_org_id Organization ID
197 -- p_acct_period_id Account period ID
198 -- x_return_status Return error if failed
199 -- COMMENT : This procedure makes the inflation adjusted period status
200 -- to FINAL
201 -- USAGE : This procedure is used in Transfer_to_GL at the end
202 -- to set the inflation status FINAL
203 -- EXCEPTIONS: g_exception1 exception description
204 --========================================================================
205 PROCEDURE Update_Infl_Period_Status
206 ( p_org_id IN NUMBER
207 , p_acct_period_id IN NUMBER
208 , x_return_status OUT NOCOPY VARCHAR2
209 );
210
211
212 --========================================================================
213 -- PROCEDURE : Create_Inflation_Adjusted_Cost PRIVATE
214 -- PARAMETERS: p_api_version_number known api versionerror buffer
215 -- p_init_msg_list FND_API.G_TRUE to reset list
216 -- x_return_status return status
217 -- x_msg_count number of messages in the list
218 -- x_msg_data text of messages
219 -- p_inflation_index_value Inflation index value
220 -- p_inflation_adjustment_rec Inflation data record
221 -- p_cost_group_id Cost Group Id
222 -- VERSION : current version 1.0
223 -- initial version 1.0
224 -- COMMENT : This API is called by concurrent program.
225 --=======================================================================
226 PROCEDURE Create_Inflation_Adjusted_Cost
227 ( p_api_version_number IN NUMBER
228 , p_init_msg_list IN VARCHAR2
229 , x_return_status OUT NOCOPY VARCHAR2
230 , x_msg_count OUT NOCOPY NUMBER
231 , x_msg_data OUT NOCOPY VARCHAR2
232 , p_inflation_index_value IN NUMBER
233 , p_prev_acct_period_id IN NUMBER
234 , p_inflation_adjustment_rec IN
235 CST_MGD_INFL_ADJUSTMENT_PUB.Inflation_Adjustment_Rec_Type
236 , p_cost_group_id IN CST_COST_GROUPS.cost_group_id%TYPE
237 );
238
239
240 --========================================================================
241 -- PROCEDURE : Get_Set_Of_Books_ID PRIVATE
242 -- PARAMETERS: p_org_id Organization ID
243 -- x_set_of_books_id Set of books ID
244 -- COMMENT : This procedure returns the set of books id.
245 -- EXCEPTIONS: g_no_data_set_of_books_exc No data found
246 -- g_too_many_set_of_books_exc Too many rows selected
247 --========================================================================
248 PROCEDURE Get_Set_Of_Books_ID
249 ( p_org_id IN NUMBER
250 , x_set_of_books_id OUT NOCOPY NUMBER
251 );
252
253
254 --========================================================================
255 -- PROCEDURE : Get_Currency_Code PRIVATE
256 -- PARAMETERS: p_set_of_books_id Set of books ID
257 -- x_currency_code Currency code
258 -- COMMENT : This procedure returns the currency code for a set of books
259 -- EXCEPTIONS: g_no_data_curr_code_exc No data found
260 -- g_too_many_curr_code_exc Too many rows selected
261 --========================================================================
262 PROCEDURE Get_Currency_Code
263 ( p_set_of_books_id IN NUMBER
264 , x_currency_code OUT NOCOPY VARCHAR2
265 );
266
267
268 --========================================================================
269 -- PROCEDURE : GL_Interface_Default PRIVATE
270 -- PARAMETERS: p_country_code Country code
271 -- p_org_id Organization ID
272 -- p_inv_item_id Inventory item ID
273 -- p_acct_period_id Accout period id
274 -- p_inventory_adj_acct_cr Credit entry for inventory
275 -- inflation account
276 -- p_inventory_adj_acct_dr Debit entry for inventory
277 -- inflation account
278 -- p_monetary_corr_acct_cr Credit entry for monetary
279 -- correction account
280 -- p_sales_cost_acct_dr Debit entry for sales cost account
281 -- p_set_of_books_id Set of books id
282 -- p_currency_code Currency code
283 -- p_user_category_name User JE category name
284 -- p_user_source_name User JE source name
285 -- p_accounting_date Accounting date entry
286 -- x_acct_entry_tbl_rec Account entry table record
287 -- COMMENT : This procedure defaults value for GL_INTERFACE
288 --========================================================================
289 PROCEDURE GL_Interface_Default
290 ( p_country_code IN VARCHAR2
291 , p_org_id IN NUMBER
292 , p_inv_item_id IN NUMBER
293 , p_acct_period_id IN NUMBER
294 , p_inventory_adj_acct_cr IN NUMBER
295 , p_inventory_adj_acct_dr IN NUMBER
296 , p_monetary_corr_acct_cr IN NUMBER
297 , p_sales_cost_acct_dr IN NUMBER
298 , p_set_of_books_id IN NUMBER
299 , p_currency_code IN VARCHAR2
300 , p_user_category_name IN VARCHAR2
301 , p_user_source_name IN VARCHAR2
302 , p_accounting_date IN DATE
303 , x_acct_entry_tbl_rec OUT NOCOPY Infl_Adj_Acct_Tbl_Rec_Type
304 );
305
306
307 --========================================================================
308 -- PROCEDURE : Create_Journal_Entries PRIVATE
309 -- PARAMETERS: p_infl_adj_acct_rec Inflation account record
310 -- COMMENT : This procedure crreates the account entry data.
311 --========================================================================
312 PROCEDURE Create_Journal_Entries
313 ( p_infl_adj_acct_rec IN Infl_Adj_Acct_Rec_Type
314 );
315
316
317 --========================================================================
318 -- PROCEDURE : Validate_Hist_Attributes PRIVATE
319 -- PARAMETERS: p_historical_infl_adj_rec Historical data record
320 -- x_return_status Return error if failed
321 -- COMMENT : This procedure validates historical data
322 --========================================================================
323 PROCEDURE Validate_Hist_Attributes
324 ( p_historical_infl_adj_rec IN
325 CST_MGD_INFL_ADJUSTMENT_PUB.Inflation_Adjustment_Rec_Type
326 , x_return_status OUT NOCOPY VARCHAR2
327 );
328
329
330 --========================================================================
331 -- PROCEDURE : Hist_Default PRIVATE
332 -- PARAMETERS: p_historical_infl_adj_rec Historical data record
333 -- x_historical_infl_adj_rec Historical data record
334 -- COMMENT : This procedure defaults historical data
335 --========================================================================
336 PROCEDURE Hist_Default
337 ( p_historical_infl_adj_rec IN
338 CST_MGD_INFL_ADJUSTMENT_PUB.Inflation_Adjustment_Rec_Type
339 , x_historical_infl_adj_rec OUT NOCOPY
340 CST_MGD_INFL_ADJUSTMENT_PUB.Inflation_Adjustment_Rec_Type
341 );
342
343
344 --========================================================================
345 -- PROCEDURE : Insert_Inflation_Adj PRIVATE
346 -- PARAMETERS: p_inflation_adjustment_rec Inflation data record
347 -- COMMENT : This procedure inserts inflation adjustment data.
348 --========================================================================
349 PROCEDURE Insert_Inflation_Adj
350 ( p_inflation_adjustment_rec IN
351 CST_MGD_INFL_ADJUSTMENT_PUB.Inflation_Adjustment_Rec_Type
352 );
353
354
355 --========================================================================
356 -- PROCEDURE : Get_Period_End_Avg_Cost PRIVATE
357 -- PARAMETERS: p_acct_period_id Account period ID
358 -- p_org_id Organization ID
359 -- p_inv_item_id Inventory item ID
360 -- p_cost_group_id Cost Group Id
361 -- x_period_end_item_avg_cost Period end item unit average
362 -- cost
363 -- COMMENT : This procedure returns period end item unit average cost.
364 -- EXCEPTIONS: g_no_data_per_unit_cost_exc No end period unit cost
365 --========================================================================
366 PROCEDURE Get_Period_End_Avg_Cost
367 ( p_acct_period_id IN NUMBER
368 , p_org_id IN NUMBER
369 , p_inv_item_id IN NUMBER
370 , p_cost_group_id IN CST_COST_GROUPS.cost_group_id%TYPE
371 , x_period_end_item_avg_cost OUT NOCOPY NUMBER
372 );
373
374 END CST_MGD_INFL_ADJUSTMENT_PVT;