[Home] [Help]
PACKAGE BODY: APPS.OZF_FUNDS_ALL_PKG
Source
1 package body OZF_FUNDS_ALL_PKG as
2 /* $Header: ozflfunb.pls 115.7 2004/04/03 01:53:35 julou ship $ */
3 procedure INSERT_ROW (
4 X_ROWID in out VARCHAR2,
5 X_FUND_ID in NUMBER,
6 X_CREATED_FROM in VARCHAR2,
7 X_REQUEST_ID in NUMBER,
8 X_FUND_NUMBER in VARCHAR2,
9 X_PARENT_FUND_ID in NUMBER,
10 X_CATEGORY_ID in NUMBER,
11 X_FUND_TYPE in VARCHAR2,
12 X_FUND_USAGE in VARCHAR2,
13 X_STATUS_CODE in VARCHAR2,
14 X_STATUS_DATE in DATE,
15 X_ACCRUED_LIABLE_ACCOUNT in NUMBER,
16 X_DED_ADJUSTMENT_ACCOUNT in NUMBER,
17 X_LIABILITY_FLAG in VARCHAR2,
18 X_SET_OF_BOOKS_ID in NUMBER,
19 X_START_PERIOD_ID in NUMBER,
20 X_END_PERIOD_ID in NUMBER,
21 X_START_DATE_ACTIVE in DATE,
22 X_END_DATE_ACTIVE in DATE,
23 X_BUDGET_AMOUNT_TC in NUMBER,
24 X_BUDGET_AMOUNT_FC in NUMBER,
25 X_AVAILABLE_AMOUNT in NUMBER,
26 X_DISTRIBUTED_AMOUNT in NUMBER,
27 X_CURRENCY_CODE_TC in VARCHAR2,
28 X_CURRENCY_CODE_FC in VARCHAR2,
29 X_EXCHANGE_RATE_TYPE in VARCHAR2,
30 X_EXCHANGE_RATE_DATE in DATE,
31 X_EXCHANGE_RATE in NUMBER,
32 X_DEPARTMENT_ID in NUMBER,
33 X_COSTCENTRE_ID in NUMBER,
34 X_OWNER in NUMBER,
35 X_ACCRUAL_METHOD in VARCHAR2,
36 X_ACCRUAL_OPERAND in VARCHAR2,
37 X_ACCRUAL_RATE in NUMBER,
38 X_ACCRUAL_BASIS in VARCHAR2,
39 X_HIERARCHY in VARCHAR2,
40 X_HIERARCHY_LEVEL in VARCHAR2,
41 X_BUDGET_FLAG in VARCHAR2,
42 X_EARNED_FLAG in VARCHAR2,
43 X_APPLY_ACCRUAL_ON in VARCHAR2,
44 X_ACCRUAL_PHASE in VARCHAR2,
45 X_ACCRUAL_CAP in NUMBER,
46 X_ACCRUAL_UOM in VARCHAR2,
47 X_OBJECT_VERSION_NUMBER in NUMBER,
48 X_ATTRIBUTE_CATEGORY in VARCHAR2,
49 X_ATTRIBUTE1 in VARCHAR2,
50 X_ATTRIBUTE2 in VARCHAR2,
51 X_ATTRIBUTE3 in VARCHAR2,
52 X_ATTRIBUTE4 in VARCHAR2,
53 X_ATTRIBUTE5 in VARCHAR2,
54 X_ATTRIBUTE6 in VARCHAR2,
55 X_ATTRIBUTE7 in VARCHAR2,
56 X_ATTRIBUTE8 in VARCHAR2,
57 X_ATTRIBUTE9 in VARCHAR2,
58 X_ATTRIBUTE10 in VARCHAR2,
59 X_ATTRIBUTE11 in VARCHAR2,
60 X_ATTRIBUTE12 in VARCHAR2,
61 X_ATTRIBUTE13 in VARCHAR2,
62 X_ATTRIBUTE14 in VARCHAR2,
63 X_ATTRIBUTE15 in VARCHAR2,
64 X_SHORT_NAME in VARCHAR2,
65 X_DESCRIPTION in VARCHAR2,
66 X_CREATION_DATE in DATE,
67 X_CREATED_BY in NUMBER,
68 X_LAST_UPDATE_DATE in DATE,
69 X_LAST_UPDATED_BY in NUMBER,
70 X_LAST_UPDATE_LOGIN in NUMBER,
71 X_HIERARCHY_ID in NUMBER,
72 X_PARENT_NODE_ID in NUMBER,
73 X_NODE_ID in NUMBER,
74 X_ORIGINAL_BUDGET in NUMBER,
75 X_TRANSFERED_IN_AMT in NUMBER,
76 X_TRANSFERED_OUT_AMT in NUMBER,
77 X_HOLDBACK_AMT in NUMBER,
78 X_PLANNED_AMT in NUMBER,
79 X_COMMITTED_AMT in NUMBER,
80 X_EARNED_AMT in NUMBER,
81 X_PAID_AMT in NUMBER,
82 X_PLAN_TYPE in VARCHAR2,
83 X_PLAN_ID in NUMBER,
84 X_LIABLE_ACCNT_SEGMENTS in VARCHAR2,
85 X_ADJUSTMENT_ACCNT_SEGMENTS in VARCHAR2
86 ) is
87 cursor C is select ROWID from OZF_FUNDS_ALL_B
88 where FUND_ID = X_FUND_ID
89 ;
90 begin
91 insert into OZF_FUNDS_ALL_B (
92 FUND_ID,
93 CREATED_FROM,
94 REQUEST_ID,
95 FUND_NUMBER,
96 PARENT_FUND_ID,
97 CATEGORY_ID,
98 FUND_TYPE,
99 FUND_USAGE,
100 STATUS_CODE,
101 STATUS_DATE,
102 ACCRUED_LIABLE_ACCOUNT,
103 DED_ADJUSTMENT_ACCOUNT,
104 LIABILITY_FLAG,
105 SET_OF_BOOKS_ID,
106 START_PERIOD_ID,
107 END_PERIOD_ID,
108 START_DATE_ACTIVE,
109 END_DATE_ACTIVE,
110 BUDGET_AMOUNT_TC,
111 BUDGET_AMOUNT_FC,
112 AVAILABLE_AMOUNT,
113 DISTRIBUTED_AMOUNT,
114 CURRENCY_CODE_TC,
115 CURRENCY_CODE_FC,
116 EXCHANGE_RATE_TYPE,
117 EXCHANGE_RATE_DATE,
118 EXCHANGE_RATE,
119 DEPARTMENT_ID,
120 COSTCENTRE_ID,
121 OWNER,
122 ACCRUAL_METHOD,
123 ACCRUAL_OPERAND,
124 ACCRUAL_RATE,
125 ACCRUAL_BASIS,
126 HIERARCHY,
127 HIERARCHY_LEVEL,
128 BUDGET_FLAG,
129 EARNED_FLAG,
130 APPLY_ACCRUAL_ON,
131 ACCRUAL_PHASE,
132 ACCRUAL_CAP,
133 ACCRUAL_UOM,
134 OBJECT_VERSION_NUMBER,
135 ATTRIBUTE_CATEGORY,
136 ATTRIBUTE1,
137 ATTRIBUTE2,
138 ATTRIBUTE3,
139 ATTRIBUTE4,
140 ATTRIBUTE5,
141 ATTRIBUTE6,
142 ATTRIBUTE7,
143 ATTRIBUTE8,
144 ATTRIBUTE9,
145 ATTRIBUTE10,
146 ATTRIBUTE11,
147 ATTRIBUTE12,
148 ATTRIBUTE13,
149 ATTRIBUTE14,
150 ATTRIBUTE15,
151 CREATION_DATE,
152 CREATED_BY,
153 LAST_UPDATE_DATE,
154 LAST_UPDATED_BY,
155 LAST_UPDATE_LOGIN,
156 HIERARCHY_ID,
157 PARENT_NODE_ID ,
158 NODE_ID ,
159 ORIGINAL_BUDGET,
160 TRANSFERED_IN_AMT,
161 TRANSFERED_OUT_AMT,
162 HOLDBACK_AMT,
163 PLANNED_AMT,
164 COMMITTED_AMT,
165 EARNED_AMT,
166 PAID_AMT,
167 PLAN_TYPE,
168 PLAN_ID,
169 LIABLE_ACCNT_SEGMENTS,
170 ADJUSTMENT_ACCNT_SEGMENTS
171 ) values (
172 X_FUND_ID,
173 X_CREATED_FROM,
174 X_REQUEST_ID,
175 X_FUND_NUMBER,
176 X_PARENT_FUND_ID,
177 X_CATEGORY_ID,
178 X_FUND_TYPE,
179 X_FUND_USAGE,
180 X_STATUS_CODE,
181 X_STATUS_DATE,
182 X_ACCRUED_LIABLE_ACCOUNT,
183 X_DED_ADJUSTMENT_ACCOUNT,
184 X_LIABILITY_FLAG,
185 X_SET_OF_BOOKS_ID,
186 X_START_PERIOD_ID,
187 X_END_PERIOD_ID,
188 X_START_DATE_ACTIVE,
189 X_END_DATE_ACTIVE,
190 X_BUDGET_AMOUNT_TC,
191 X_BUDGET_AMOUNT_FC,
192 X_AVAILABLE_AMOUNT,
193 X_DISTRIBUTED_AMOUNT,
194 X_CURRENCY_CODE_TC,
195 X_CURRENCY_CODE_FC,
196 X_EXCHANGE_RATE_TYPE,
197 X_EXCHANGE_RATE_DATE,
198 X_EXCHANGE_RATE,
199 X_DEPARTMENT_ID,
200 X_COSTCENTRE_ID,
201 X_OWNER,
202 X_ACCRUAL_METHOD,
203 X_ACCRUAL_OPERAND,
204 X_ACCRUAL_RATE,
205 X_ACCRUAL_BASIS,
206 X_HIERARCHY,
207 X_HIERARCHY_LEVEL,
208 X_BUDGET_FLAG,
209 X_EARNED_FLAG,
210 X_APPLY_ACCRUAL_ON,
211 X_ACCRUAL_PHASE,
212 X_ACCRUAL_CAP,
213 X_ACCRUAL_UOM,
214 X_OBJECT_VERSION_NUMBER,
215 X_ATTRIBUTE_CATEGORY,
216 X_ATTRIBUTE1,
217 X_ATTRIBUTE2,
218 X_ATTRIBUTE3,
219 X_ATTRIBUTE4,
220 X_ATTRIBUTE5,
221 X_ATTRIBUTE6,
222 X_ATTRIBUTE7,
223 X_ATTRIBUTE8,
224 X_ATTRIBUTE9,
225 X_ATTRIBUTE10,
226 X_ATTRIBUTE11,
227 X_ATTRIBUTE12,
228 X_ATTRIBUTE13,
229 X_ATTRIBUTE14,
230 X_ATTRIBUTE15,
231 X_CREATION_DATE,
232 X_CREATED_BY,
233 X_LAST_UPDATE_DATE,
234 X_LAST_UPDATED_BY,
235 X_LAST_UPDATE_LOGIN,
236 X_HIERARCHY_ID,
237 X_PARENT_NODE_ID,
238 X_NODE_ID,
239 X_ORIGINAL_BUDGET,
240 X_TRANSFERED_IN_AMT,
241 X_TRANSFERED_OUT_AMT,
242 X_HOLDBACK_AMT,
243 X_PLANNED_AMT,
244 X_COMMITTED_AMT,
245 X_EARNED_AMT,
246 X_PAID_AMT,
247 X_PLAN_TYPE,
248 X_PLAN_ID,
249 X_LIABLE_ACCNT_SEGMENTS,
250 X_ADJUSTMENT_ACCNT_SEGMENTS
251 );
252
253 insert into OZF_FUNDS_ALL_TL (
254 FUND_ID,
255 LAST_UPDATE_DATE,
256 LAST_UPDATED_BY,
257 LAST_UPDATE_LOGIN,
258 CREATION_DATE,
259 CREATED_BY,
260 CREATED_FROM,
261 REQUEST_ID,
262 SHORT_NAME,
263 DESCRIPTION,
264 LANGUAGE,
265 SOURCE_LANG
266 ) select
267 X_FUND_ID,
268 X_LAST_UPDATE_DATE,
269 X_LAST_UPDATED_BY,
270 X_LAST_UPDATE_LOGIN,
271 X_CREATION_DATE,
272 X_CREATED_BY,
273 X_CREATED_FROM,
274 X_REQUEST_ID,
275 X_SHORT_NAME,
276 X_DESCRIPTION,
277 L.LANGUAGE_CODE,
278 userenv('LANG')
279 from FND_LANGUAGES L
280 where L.INSTALLED_FLAG in ('I', 'B')
281 and not exists
282 (select NULL
283 from OZF_FUNDS_ALL_TL T
284 where T.FUND_ID = X_FUND_ID
285 and T.LANGUAGE = L.LANGUAGE_CODE);
286
287 open c;
288 fetch c into X_ROWID;
289 if (c%notfound) then
290 close c;
291 raise no_data_found;
292 end if;
293 close c;
294
295 end INSERT_ROW;
296
297 procedure LOCK_ROW (
298 X_FUND_ID in NUMBER,
299 X_CREATED_FROM in VARCHAR2,
300 X_REQUEST_ID in NUMBER,
301 X_FUND_NUMBER in VARCHAR2,
302 X_PARENT_FUND_ID in NUMBER,
303 X_CATEGORY_ID in NUMBER,
304 X_FUND_TYPE in VARCHAR2,
305 X_FUND_USAGE in VARCHAR2,
306 X_STATUS_CODE in VARCHAR2,
307 X_STATUS_DATE in DATE,
308 X_ACCRUED_LIABLE_ACCOUNT in NUMBER,
309 X_DED_ADJUSTMENT_ACCOUNT in NUMBER,
310 X_LIABILITY_FLAG in VARCHAR2,
311 X_SET_OF_BOOKS_ID in NUMBER,
312 X_START_PERIOD_ID in NUMBER,
313 X_END_PERIOD_ID in NUMBER,
314 X_START_DATE_ACTIVE in DATE,
315 X_END_DATE_ACTIVE in DATE,
316 X_BUDGET_AMOUNT_TC in NUMBER,
317 X_BUDGET_AMOUNT_FC in NUMBER,
318 X_AVAILABLE_AMOUNT in NUMBER,
319 X_DISTRIBUTED_AMOUNT in NUMBER,
320 X_CURRENCY_CODE_TC in VARCHAR2,
321 X_CURRENCY_CODE_FC in VARCHAR2,
322 X_EXCHANGE_RATE_TYPE in VARCHAR2,
323 X_EXCHANGE_RATE_DATE in DATE,
324 X_EXCHANGE_RATE in NUMBER,
325 X_DEPARTMENT_ID in NUMBER,
326 X_COSTCENTRE_ID in NUMBER,
327 X_OWNER in NUMBER,
328 X_ACCRUAL_METHOD in VARCHAR2,
329 X_ACCRUAL_OPERAND in VARCHAR2,
330 X_ACCRUAL_RATE in NUMBER,
331 X_ACCRUAL_BASIS in VARCHAR2,
332 X_HIERARCHY in VARCHAR2,
333 X_HIERARCHY_LEVEL in VARCHAR2,
334 X_BUDGET_FLAG in VARCHAR2,
335 X_EARNED_FLAG in VARCHAR2,
336 X_APPLY_ACCRUAL_ON in VARCHAR2,
337 X_ACCRUAL_PHASE in VARCHAR2,
338 X_ACCRUAL_CAP in NUMBER,
339 X_ACCRUAL_UOM in VARCHAR2,
340 X_OBJECT_VERSION_NUMBER in NUMBER,
341 X_ATTRIBUTE_CATEGORY in VARCHAR2,
342 X_ATTRIBUTE1 in VARCHAR2,
343 X_ATTRIBUTE2 in VARCHAR2,
344 X_ATTRIBUTE3 in VARCHAR2,
345 X_ATTRIBUTE4 in VARCHAR2,
346 X_ATTRIBUTE5 in VARCHAR2,
347 X_ATTRIBUTE6 in VARCHAR2,
348 X_ATTRIBUTE7 in VARCHAR2,
349 X_ATTRIBUTE8 in VARCHAR2,
350 X_ATTRIBUTE9 in VARCHAR2,
351 X_ATTRIBUTE10 in VARCHAR2,
352 X_ATTRIBUTE11 in VARCHAR2,
353 X_ATTRIBUTE12 in VARCHAR2,
354 X_ATTRIBUTE13 in VARCHAR2,
355 X_ATTRIBUTE14 in VARCHAR2,
356 X_ATTRIBUTE15 in VARCHAR2,
357 X_SHORT_NAME in VARCHAR2,
358 X_DESCRIPTION in VARCHAR2,
359 X_HIERARCHY_ID in NUMBER,
360 X_PARENT_NODE_ID in NUMBER,
361 X_NODE_ID in NUMBER,
362 X_ORIGINAL_BUDGET in NUMBER,
363 X_TRANSFERED_IN_AMT in NUMBER,
364 X_TRANSFERED_OUT_AMT in NUMBER,
365 X_HOLDBACK_AMT in NUMBER,
366 X_PLANNED_AMT in NUMBER,
367 X_COMMITTED_AMT in NUMBER,
368 X_EARNED_AMT in NUMBER,
369 X_PAID_AMT in NUMBER,
370 X_PLAN_TYPE in VARCHAR2,
371 X_PLAN_ID in NUMBER,
372 X_LIABLE_ACCNT_SEGMENTS in VARCHAR2,
373 X_ADJUSTMENT_ACCNT_SEGMENTS in VARCHAR2
374 ) is
375 cursor c is select
376 CREATED_FROM,
377 REQUEST_ID,
378 FUND_NUMBER,
379 PARENT_FUND_ID,
380 CATEGORY_ID,
381 FUND_TYPE,
382 FUND_USAGE,
383 STATUS_CODE,
384 STATUS_DATE,
385 ACCRUED_LIABLE_ACCOUNT,
386 DED_ADJUSTMENT_ACCOUNT,
387 LIABILITY_FLAG,
388 SET_OF_BOOKS_ID,
389 START_PERIOD_ID,
390 END_PERIOD_ID,
391 START_DATE_ACTIVE,
392 END_DATE_ACTIVE,
393 BUDGET_AMOUNT_TC,
394 BUDGET_AMOUNT_FC,
395 AVAILABLE_AMOUNT,
396 DISTRIBUTED_AMOUNT,
397 CURRENCY_CODE_TC,
398 CURRENCY_CODE_FC,
399 EXCHANGE_RATE_TYPE,
400 EXCHANGE_RATE_DATE,
401 EXCHANGE_RATE,
402 DEPARTMENT_ID,
403 COSTCENTRE_ID,
404 OWNER,
405 ACCRUAL_METHOD,
406 ACCRUAL_OPERAND,
407 ACCRUAL_RATE,
408 ACCRUAL_BASIS,
409 HIERARCHY,
410 HIERARCHY_LEVEL,
411 BUDGET_FLAG,
412 EARNED_FLAG,
413 APPLY_ACCRUAL_ON,
414 ACCRUAL_PHASE,
415 ACCRUAL_CAP,
416 ACCRUAL_UOM,
417 OBJECT_VERSION_NUMBER,
418 ATTRIBUTE_CATEGORY,
419 ATTRIBUTE1,
420 ATTRIBUTE2,
421 ATTRIBUTE3,
422 ATTRIBUTE4,
423 ATTRIBUTE5,
424 ATTRIBUTE6,
425 ATTRIBUTE7,
426 ATTRIBUTE8,
427 ATTRIBUTE9,
428 ATTRIBUTE10,
429 ATTRIBUTE11,
430 ATTRIBUTE12,
431 ATTRIBUTE13,
432 ATTRIBUTE14,
433 ATTRIBUTE15,
434 HIERARCHY_ID,
435 PARENT_NODE_ID ,
436 NODE_ID ,
437 ORIGINAL_BUDGET,
438 TRANSFERED_IN_AMT,
439 TRANSFERED_OUT_AMT,
440 HOLDBACK_AMT,
441 PLANNED_AMT,
442 COMMITTED_AMT,
443 EARNED_AMT,
444 PAID_AMT,
445 PLAN_TYPE,
446 PLAN_ID,
447 LIABLE_ACCNT_SEGMENTS,
448 ADJUSTMENT_ACCNT_SEGMENTS
449 from OZF_FUNDS_ALL_B
450 where FUND_ID = X_FUND_ID
451 for update of FUND_ID nowait;
452 recinfo c%rowtype;
453
454 cursor c1 is select
455 SHORT_NAME,
456 DESCRIPTION,
457 decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
458 from OZF_FUNDS_ALL_TL
459 where FUND_ID = X_FUND_ID
460 and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
461 for update of FUND_ID nowait;
462 begin
463 open c;
464 fetch c into recinfo;
465 if (c%notfound) then
466 close c;
467 fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
468 app_exception.raise_exception;
469 end if;
470 close c;
471 if ( ((recinfo.CREATED_FROM = X_CREATED_FROM)
472 OR ((recinfo.CREATED_FROM is null) AND (X_CREATED_FROM is null)))
473 AND ((recinfo.REQUEST_ID = X_REQUEST_ID)
474 OR ((recinfo.REQUEST_ID is null) AND (X_REQUEST_ID is null)))
475 AND (recinfo.FUND_NUMBER = X_FUND_NUMBER)
476 AND ((recinfo.PARENT_FUND_ID = X_PARENT_FUND_ID)
477 OR ((recinfo.PARENT_FUND_ID is null) AND (X_PARENT_FUND_ID is null)))
478 AND ((recinfo.CATEGORY_ID = X_CATEGORY_ID)
479 OR ((recinfo.CATEGORY_ID is null) AND (X_CATEGORY_ID is null)))
480 AND ((recinfo.FUND_TYPE = X_FUND_TYPE)
481 OR ((recinfo.FUND_TYPE is null) AND (X_FUND_TYPE is null)))
482 AND ((recinfo.FUND_USAGE = X_FUND_USAGE)
483 OR ((recinfo.FUND_USAGE is null) AND (X_FUND_USAGE is null)))
484 AND (recinfo.STATUS_CODE = X_STATUS_CODE)
485 AND (recinfo.STATUS_DATE = X_STATUS_DATE)
486 AND ((recinfo.ACCRUED_LIABLE_ACCOUNT = X_ACCRUED_LIABLE_ACCOUNT)
487 OR ((recinfo.ACCRUED_LIABLE_ACCOUNT is null) AND (X_ACCRUED_LIABLE_ACCOUNT is null)))
488 AND ((recinfo.DED_ADJUSTMENT_ACCOUNT = X_DED_ADJUSTMENT_ACCOUNT)
489 OR ((recinfo.DED_ADJUSTMENT_ACCOUNT is null) AND (X_DED_ADJUSTMENT_ACCOUNT is null)))
490 AND (recinfo.LIABILITY_FLAG = X_LIABILITY_FLAG)
491 AND ((recinfo.SET_OF_BOOKS_ID = X_SET_OF_BOOKS_ID)
492 OR ((recinfo.SET_OF_BOOKS_ID is null) AND (X_SET_OF_BOOKS_ID is null)))
493 AND ((recinfo.START_PERIOD_ID = X_START_PERIOD_ID)
494 OR ((recinfo.START_PERIOD_ID is null) AND (X_START_PERIOD_ID is null)))
498 OR ((recinfo.START_DATE_ACTIVE is null) AND (X_START_DATE_ACTIVE is null)))
495 AND ((recinfo.END_PERIOD_ID = X_END_PERIOD_ID)
496 OR ((recinfo.END_PERIOD_ID is null) AND (X_END_PERIOD_ID is null)))
497 AND ((recinfo.START_DATE_ACTIVE = X_START_DATE_ACTIVE)
499 AND ((recinfo.END_DATE_ACTIVE = X_END_DATE_ACTIVE)
500 OR ((recinfo.END_DATE_ACTIVE is null) AND (X_END_DATE_ACTIVE is null)))
501 AND ((recinfo.BUDGET_AMOUNT_TC = X_BUDGET_AMOUNT_TC)
502 OR ((recinfo.BUDGET_AMOUNT_TC is null) AND (X_BUDGET_AMOUNT_TC is null)))
503 AND ((recinfo.BUDGET_AMOUNT_FC = X_BUDGET_AMOUNT_FC)
504 OR ((recinfo.BUDGET_AMOUNT_FC is null) AND (X_BUDGET_AMOUNT_FC is null)))
505 AND ((recinfo.AVAILABLE_AMOUNT = X_AVAILABLE_AMOUNT)
506 OR ((recinfo.AVAILABLE_AMOUNT is null) AND (X_AVAILABLE_AMOUNT is null)))
507 AND ((recinfo.DISTRIBUTED_AMOUNT = X_DISTRIBUTED_AMOUNT)
508 OR ((recinfo.DISTRIBUTED_AMOUNT is null) AND (X_DISTRIBUTED_AMOUNT is null)))
509 AND ((recinfo.CURRENCY_CODE_TC = X_CURRENCY_CODE_TC)
510 OR ((recinfo.CURRENCY_CODE_TC is null) AND (X_CURRENCY_CODE_TC is null)))
511 AND ((recinfo.CURRENCY_CODE_FC = X_CURRENCY_CODE_FC)
512 OR ((recinfo.CURRENCY_CODE_FC is null) AND (X_CURRENCY_CODE_FC is null)))
513 AND ((recinfo.EXCHANGE_RATE_TYPE = X_EXCHANGE_RATE_TYPE)
514 OR ((recinfo.EXCHANGE_RATE_TYPE is null) AND (X_EXCHANGE_RATE_TYPE is null)))
515 AND ((recinfo.EXCHANGE_RATE_DATE = X_EXCHANGE_RATE_DATE)
516 OR ((recinfo.EXCHANGE_RATE_DATE is null) AND (X_EXCHANGE_RATE_DATE is null)))
517 AND ((recinfo.EXCHANGE_RATE = X_EXCHANGE_RATE)
518 OR ((recinfo.EXCHANGE_RATE is null) AND (X_EXCHANGE_RATE is null)))
519 AND ((recinfo.DEPARTMENT_ID = X_DEPARTMENT_ID)
520 OR ((recinfo.DEPARTMENT_ID is null) AND (X_DEPARTMENT_ID is null)))
521 AND ((recinfo.COSTCENTRE_ID = X_COSTCENTRE_ID)
522 OR ((recinfo.COSTCENTRE_ID is null) AND (X_COSTCENTRE_ID is null)))
523 AND (recinfo.OWNER = X_OWNER)
524 AND ((recinfo.ACCRUAL_METHOD = X_ACCRUAL_METHOD)
525 OR ((recinfo.ACCRUAL_METHOD is null) AND (X_ACCRUAL_METHOD is null)))
526 AND ((recinfo.ACCRUAL_OPERAND = X_ACCRUAL_OPERAND)
527 OR ((recinfo.ACCRUAL_OPERAND is null) AND (X_ACCRUAL_OPERAND is null)))
528 AND ((recinfo.ACCRUAL_RATE = X_ACCRUAL_RATE)
529 OR ((recinfo.ACCRUAL_RATE is null) AND (X_ACCRUAL_RATE is null)))
530 AND ((recinfo.ACCRUAL_BASIS = X_ACCRUAL_BASIS)
531 OR ((recinfo.ACCRUAL_BASIS is null) AND (X_ACCRUAL_BASIS is null)))
532 AND ((recinfo.HIERARCHY = X_HIERARCHY)
533 OR ((recinfo.HIERARCHY is null) AND (X_HIERARCHY is null)))
534 AND ((recinfo.HIERARCHY_LEVEL = X_HIERARCHY_LEVEL)
535 OR ((recinfo.HIERARCHY_LEVEL is null) AND (X_HIERARCHY_LEVEL is null)))
536 AND ((recinfo.BUDGET_FLAG = X_BUDGET_FLAG)
537 OR ((recinfo.BUDGET_FLAG is null) AND (X_BUDGET_FLAG is null)))
538 AND ((recinfo.EARNED_FLAG = X_EARNED_FLAG)
539 OR ((recinfo.EARNED_FLAG is null) AND (X_EARNED_FLAG is null)))
540 AND ((recinfo.APPLY_ACCRUAL_ON = X_APPLY_ACCRUAL_ON)
541 OR ((recinfo.APPLY_ACCRUAL_ON is null) AND (X_APPLY_ACCRUAL_ON is null)))
542 AND ((recinfo.ACCRUAL_PHASE = X_ACCRUAL_PHASE)
543 OR ((recinfo.ACCRUAL_PHASE is null) AND (X_ACCRUAL_PHASE is null)))
544 AND ((recinfo.ACCRUAL_CAP = X_ACCRUAL_CAP)
545 OR ((recinfo.ACCRUAL_CAP is null) AND (X_ACCRUAL_CAP is null)))
546 AND ((recinfo.ACCRUAL_UOM = X_ACCRUAL_UOM)
547 OR ((recinfo.ACCRUAL_UOM is null) AND (X_ACCRUAL_UOM is null)))
548 AND ((recinfo.OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER)
549 OR ((recinfo.OBJECT_VERSION_NUMBER is null) AND (X_OBJECT_VERSION_NUMBER is null)))
550 AND ((recinfo.ATTRIBUTE_CATEGORY = X_ATTRIBUTE_CATEGORY)
551 OR ((recinfo.ATTRIBUTE_CATEGORY is null) AND (X_ATTRIBUTE_CATEGORY is null)))
552 AND ((recinfo.ATTRIBUTE1 = X_ATTRIBUTE1)
553 OR ((recinfo.ATTRIBUTE1 is null) AND (X_ATTRIBUTE1 is null)))
554 AND ((recinfo.ATTRIBUTE2 = X_ATTRIBUTE2)
555 OR ((recinfo.ATTRIBUTE2 is null) AND (X_ATTRIBUTE2 is null)))
556 AND ((recinfo.ATTRIBUTE3 = X_ATTRIBUTE3)
557 OR ((recinfo.ATTRIBUTE3 is null) AND (X_ATTRIBUTE3 is null)))
558 AND ((recinfo.ATTRIBUTE4 = X_ATTRIBUTE4)
559 OR ((recinfo.ATTRIBUTE4 is null) AND (X_ATTRIBUTE4 is null)))
560 AND ((recinfo.ATTRIBUTE5 = X_ATTRIBUTE5)
561 OR ((recinfo.ATTRIBUTE5 is null) AND (X_ATTRIBUTE5 is null)))
562 AND ((recinfo.ATTRIBUTE6 = X_ATTRIBUTE6)
563 OR ((recinfo.ATTRIBUTE6 is null) AND (X_ATTRIBUTE6 is null)))
564 AND ((recinfo.ATTRIBUTE7 = X_ATTRIBUTE7)
565 OR ((recinfo.ATTRIBUTE7 is null) AND (X_ATTRIBUTE7 is null)))
566 AND ((recinfo.ATTRIBUTE8 = X_ATTRIBUTE8)
567 OR ((recinfo.ATTRIBUTE8 is null) AND (X_ATTRIBUTE8 is null)))
568 AND ((recinfo.ATTRIBUTE9 = X_ATTRIBUTE9)
569 OR ((recinfo.ATTRIBUTE9 is null) AND (X_ATTRIBUTE9 is null)))
570 AND ((recinfo.ATTRIBUTE10 = X_ATTRIBUTE10)
571 OR ((recinfo.ATTRIBUTE10 is null) AND (X_ATTRIBUTE10 is null)))
572 AND ((recinfo.ATTRIBUTE11 = X_ATTRIBUTE11)
573 OR ((recinfo.ATTRIBUTE11 is null) AND (X_ATTRIBUTE11 is null)))
574 AND ((recinfo.ATTRIBUTE12 = X_ATTRIBUTE12)
575 OR ((recinfo.ATTRIBUTE12 is null) AND (X_ATTRIBUTE12 is null)))
576 AND ((recinfo.ATTRIBUTE13 = X_ATTRIBUTE13)
580 AND ((recinfo.ATTRIBUTE15 = X_ATTRIBUTE15)
577 OR ((recinfo.ATTRIBUTE13 is null) AND (X_ATTRIBUTE13 is null)))
578 AND ((recinfo.ATTRIBUTE14 = X_ATTRIBUTE14)
579 OR ((recinfo.ATTRIBUTE14 is null) AND (X_ATTRIBUTE14 is null)))
581 OR ((recinfo.ATTRIBUTE15 is null) AND (X_ATTRIBUTE15 is null)))
582 AND ((recinfo.HIERARCHY_ID = X_HIERARCHY_ID)
583 OR ((recinfo.HIERARCHY_ID is null) AND (X_HIERARCHY_ID is null)))
584 AND ((recinfo.PARENT_NODE_ID = X_PARENT_NODE_ID )
585 OR ((recinfo.PARENT_NODE_ID is null) AND (X_PARENT_NODE_ID is null)))
586 AND ((recinfo.NODE_ID = X_NODE_ID)
587 OR ((recinfo.NODE_ID is null) AND (X_NODE_ID is null)))
588 AND ((recinfo.ORIGINAL_BUDGET = X_ORIGINAL_BUDGET)
589 OR ((recinfo.ORIGINAL_BUDGET is null) AND (X_ORIGINAL_BUDGET is null)))
590 AND ((recinfo.TRANSFERED_IN_AMT = X_TRANSFERED_IN_AMT)
591 OR ((recinfo.TRANSFERED_IN_AMT is null) AND (X_TRANSFERED_IN_AMT is null)))
592 AND ((recinfo.TRANSFERED_OUT_AMT = X_TRANSFERED_OUT_AMT)
593 OR ((recinfo.TRANSFERED_OUT_AMT is null) AND (X_TRANSFERED_OUT_AMT is null)))
594 AND ((recinfo.HOLDBACK_AMT = X_HOLDBACK_AMT)
595 OR ((recinfo.HOLDBACK_AMT is null) AND (X_HOLDBACK_AMT is null)))
596 AND ((recinfo.PLANNED_AMT = X_PLANNED_AMT)
597 OR ((recinfo.PLANNED_AMT is null) AND (X_PLANNED_AMT is null)))
598 AND ((recinfo.COMMITTED_AMT = X_COMMITTED_AMT)
599 OR ((recinfo.COMMITTED_AMT is null) AND (X_COMMITTED_AMT is null)))
600 AND ((recinfo.EARNED_AMT = X_EARNED_AMT)
601 OR ((recinfo.EARNED_AMT is null) AND (X_EARNED_AMT is null)))
602 AND ((recinfo.PAID_AMT = X_PAID_AMT)
603 OR ((recinfo.PAID_AMT is null) AND (X_PAID_AMT is null)))
604 AND ((recinfo.PLAN_TYPE = X_PLAN_TYPE)
605 OR ((recinfo.PLAN_TYPE is null) AND (X_PLAN_TYPE is null)))
606 AND ((recinfo.PLAN_ID = X_PLAN_ID)
607 OR ((recinfo.PLAN_ID is null) AND (X_PLAN_ID is null)))
608 AND ((recinfo.LIABLE_ACCNT_SEGMENTS = X_LIABLE_ACCNT_SEGMENTS)
609 OR ((recinfo.LIABLE_ACCNT_SEGMENTS is null) AND (X_LIABLE_ACCNT_SEGMENTS is null)))
610 AND ((recinfo.ADJUSTMENT_ACCNT_SEGMENTS = X_ADJUSTMENT_ACCNT_SEGMENTS)
611 OR ((recinfo.ADJUSTMENT_ACCNT_SEGMENTS is null) AND (X_ADJUSTMENT_ACCNT_SEGMENTS is null)))
612 ) then
613 null;
614 else
615 fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
616 app_exception.raise_exception;
617 end if;
618
619 for tlinfo in c1 loop
620 if (tlinfo.BASELANG = 'Y') then
621 if ( (tlinfo.SHORT_NAME = X_SHORT_NAME)
622 AND ((tlinfo.DESCRIPTION = X_DESCRIPTION)
623 OR ((tlinfo.DESCRIPTION is null) AND (X_DESCRIPTION is null)))
624 ) then
625 null;
626 else
627 fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
628 app_exception.raise_exception;
629 end if;
630 end if;
631 end loop;
632 return;
633 end LOCK_ROW;
634
635 procedure UPDATE_ROW (
636 X_FUND_ID in NUMBER,
637 X_CREATED_FROM in VARCHAR2,
638 X_REQUEST_ID in NUMBER,
639 X_FUND_NUMBER in VARCHAR2,
640 X_PARENT_FUND_ID in NUMBER,
641 X_CATEGORY_ID in NUMBER,
642 X_FUND_TYPE in VARCHAR2,
643 X_FUND_USAGE in VARCHAR2,
644 X_STATUS_CODE in VARCHAR2,
645 X_STATUS_DATE in DATE,
646 X_ACCRUED_LIABLE_ACCOUNT in NUMBER,
647 X_DED_ADJUSTMENT_ACCOUNT in NUMBER,
648 X_LIABILITY_FLAG in VARCHAR2,
649 X_SET_OF_BOOKS_ID in NUMBER,
650 X_START_PERIOD_ID in NUMBER,
651 X_END_PERIOD_ID in NUMBER,
652 X_START_DATE_ACTIVE in DATE,
653 X_END_DATE_ACTIVE in DATE,
654 X_BUDGET_AMOUNT_TC in NUMBER,
655 X_BUDGET_AMOUNT_FC in NUMBER,
656 X_AVAILABLE_AMOUNT in NUMBER,
657 X_DISTRIBUTED_AMOUNT in NUMBER,
658 X_CURRENCY_CODE_TC in VARCHAR2,
659 X_CURRENCY_CODE_FC in VARCHAR2,
660 X_EXCHANGE_RATE_TYPE in VARCHAR2,
661 X_EXCHANGE_RATE_DATE in DATE,
662 X_EXCHANGE_RATE in NUMBER,
663 X_DEPARTMENT_ID in NUMBER,
664 X_COSTCENTRE_ID in NUMBER,
665 X_OWNER in NUMBER,
666 X_ACCRUAL_METHOD in VARCHAR2,
667 X_ACCRUAL_OPERAND in VARCHAR2,
668 X_ACCRUAL_RATE in NUMBER,
669 X_ACCRUAL_BASIS in VARCHAR2,
670 X_HIERARCHY in VARCHAR2,
671 X_HIERARCHY_LEVEL in VARCHAR2,
672 X_BUDGET_FLAG in VARCHAR2,
673 X_EARNED_FLAG in VARCHAR2,
674 X_APPLY_ACCRUAL_ON in VARCHAR2,
675 X_ACCRUAL_PHASE in VARCHAR2,
676 X_ACCRUAL_CAP in NUMBER,
677 X_ACCRUAL_UOM in VARCHAR2,
678 X_OBJECT_VERSION_NUMBER in NUMBER,
679 X_ATTRIBUTE_CATEGORY in VARCHAR2,
680 X_ATTRIBUTE1 in VARCHAR2,
681 X_ATTRIBUTE2 in VARCHAR2,
682 X_ATTRIBUTE3 in VARCHAR2,
683 X_ATTRIBUTE4 in VARCHAR2,
684 X_ATTRIBUTE5 in VARCHAR2,
685 X_ATTRIBUTE6 in VARCHAR2,
686 X_ATTRIBUTE7 in VARCHAR2,
687 X_ATTRIBUTE8 in VARCHAR2,
688 X_ATTRIBUTE9 in VARCHAR2,
689 X_ATTRIBUTE10 in VARCHAR2,
690 X_ATTRIBUTE11 in VARCHAR2,
691 X_ATTRIBUTE12 in VARCHAR2,
692 X_ATTRIBUTE13 in VARCHAR2,
693 X_ATTRIBUTE14 in VARCHAR2,
694 X_ATTRIBUTE15 in VARCHAR2,
695 X_SHORT_NAME in VARCHAR2,
696 X_DESCRIPTION in VARCHAR2,
697 X_LAST_UPDATE_DATE in DATE,
698 X_LAST_UPDATED_BY in NUMBER,
699 X_LAST_UPDATE_LOGIN in NUMBER,
700 X_HIERARCHY_ID in NUMBER,
701 X_PARENT_NODE_ID in NUMBER,
702 X_NODE_ID in NUMBER,
703 X_ORIGINAL_BUDGET in NUMBER,
704 X_TRANSFERED_IN_AMT in NUMBER,
705 X_TRANSFERED_OUT_AMT in NUMBER,
709 X_EARNED_AMT in NUMBER,
706 X_HOLDBACK_AMT in NUMBER,
707 X_PLANNED_AMT in NUMBER,
708 X_COMMITTED_AMT in NUMBER,
710 X_PAID_AMT in NUMBER,
711 X_PLAN_TYPE in VARCHAR2,
712 X_PLAN_ID in NUMBER,
713 X_LIABLE_ACCNT_SEGMENTS in VARCHAR2,
714 X_ADJUSTMENT_ACCNT_SEGMENTS in VARCHAR2
715 ) is
716 begin
717 update OZF_FUNDS_ALL_B set
718 CREATED_FROM = X_CREATED_FROM,
719 REQUEST_ID = X_REQUEST_ID,
720 FUND_NUMBER = X_FUND_NUMBER,
721 PARENT_FUND_ID = X_PARENT_FUND_ID,
722 CATEGORY_ID = X_CATEGORY_ID,
723 FUND_TYPE = X_FUND_TYPE,
724 FUND_USAGE = X_FUND_USAGE,
725 STATUS_CODE = X_STATUS_CODE,
726 STATUS_DATE = X_STATUS_DATE,
727 ACCRUED_LIABLE_ACCOUNT = X_ACCRUED_LIABLE_ACCOUNT,
728 DED_ADJUSTMENT_ACCOUNT = X_DED_ADJUSTMENT_ACCOUNT,
729 LIABILITY_FLAG = X_LIABILITY_FLAG,
730 SET_OF_BOOKS_ID = X_SET_OF_BOOKS_ID,
731 START_PERIOD_ID = X_START_PERIOD_ID,
732 END_PERIOD_ID = X_END_PERIOD_ID,
733 START_DATE_ACTIVE = X_START_DATE_ACTIVE,
734 END_DATE_ACTIVE = X_END_DATE_ACTIVE,
735 BUDGET_AMOUNT_TC = X_BUDGET_AMOUNT_TC,
736 BUDGET_AMOUNT_FC = X_BUDGET_AMOUNT_FC,
737 AVAILABLE_AMOUNT = X_AVAILABLE_AMOUNT,
738 DISTRIBUTED_AMOUNT = X_DISTRIBUTED_AMOUNT,
739 CURRENCY_CODE_TC = X_CURRENCY_CODE_TC,
740 CURRENCY_CODE_FC = X_CURRENCY_CODE_FC,
741 EXCHANGE_RATE_TYPE = X_EXCHANGE_RATE_TYPE,
742 EXCHANGE_RATE_DATE = X_EXCHANGE_RATE_DATE,
743 EXCHANGE_RATE = X_EXCHANGE_RATE,
744 DEPARTMENT_ID = X_DEPARTMENT_ID,
745 COSTCENTRE_ID = X_COSTCENTRE_ID,
746 OWNER = X_OWNER,
747 ACCRUAL_METHOD = X_ACCRUAL_METHOD,
748 ACCRUAL_OPERAND = X_ACCRUAL_OPERAND,
749 ACCRUAL_RATE = X_ACCRUAL_RATE,
750 ACCRUAL_BASIS = X_ACCRUAL_BASIS,
751 HIERARCHY = X_HIERARCHY,
752 HIERARCHY_LEVEL = X_HIERARCHY_LEVEL,
753 BUDGET_FLAG = X_BUDGET_FLAG,
754 EARNED_FLAG = X_EARNED_FLAG,
755 APPLY_ACCRUAL_ON = X_APPLY_ACCRUAL_ON,
756 ACCRUAL_PHASE = X_ACCRUAL_PHASE,
757 ACCRUAL_CAP = X_ACCRUAL_CAP,
758 ACCRUAL_UOM = X_ACCRUAL_UOM,
759 OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER,
760 ATTRIBUTE_CATEGORY = X_ATTRIBUTE_CATEGORY,
761 ATTRIBUTE1 = X_ATTRIBUTE1,
762 ATTRIBUTE2 = X_ATTRIBUTE2,
763 ATTRIBUTE3 = X_ATTRIBUTE3,
764 ATTRIBUTE4 = X_ATTRIBUTE4,
765 ATTRIBUTE5 = X_ATTRIBUTE5,
766 ATTRIBUTE6 = X_ATTRIBUTE6,
767 ATTRIBUTE7 = X_ATTRIBUTE7,
768 ATTRIBUTE8 = X_ATTRIBUTE8,
769 ATTRIBUTE9 = X_ATTRIBUTE9,
770 ATTRIBUTE10 = X_ATTRIBUTE10,
771 ATTRIBUTE11 = X_ATTRIBUTE11,
772 ATTRIBUTE12 = X_ATTRIBUTE12,
773 ATTRIBUTE13 = X_ATTRIBUTE13,
774 ATTRIBUTE14 = X_ATTRIBUTE14,
775 ATTRIBUTE15 = X_ATTRIBUTE15,
776 LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
777 LAST_UPDATED_BY = X_LAST_UPDATED_BY,
778 LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
779 HIERARCHY_ID = X_HIERARCHY_ID,
780 PARENT_NODE_ID = X_PARENT_NODE_ID,
781 NODE_ID = X_NODE_ID,
782 ORIGINAL_BUDGET = X_ORIGINAL_BUDGET,
783 TRANSFERED_IN_AMT = X_TRANSFERED_IN_AMT,
784 TRANSFERED_OUT_AMT = X_TRANSFERED_OUT_AMT,
785 HOLDBACK_AMT = X_HOLDBACK_AMT,
786 PLANNED_AMT = X_PLANNED_AMT,
787 COMMITTED_AMT = X_COMMITTED_AMT,
788 EARNED_AMT = X_EARNED_AMT,
789 PAID_AMT = X_PAID_AMT,
790 PLAN_TYPE = X_PLAN_TYPE,
791 PLAN_ID = X_PLAN_ID,
792 LIABLE_ACCNT_SEGMENTS = X_LIABLE_ACCNT_SEGMENTS,
793 ADJUSTMENT_ACCNT_SEGMENTS = X_ADJUSTMENT_ACCNT_SEGMENTS
794 where FUND_ID = X_FUND_ID;
795
796 if (sql%notfound) then
797 raise no_data_found;
798 end if;
799
800 update OZF_FUNDS_ALL_TL set
801 SHORT_NAME = X_SHORT_NAME,
802 DESCRIPTION = X_DESCRIPTION,
803 LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
804 LAST_UPDATED_BY = X_LAST_UPDATED_BY,
805 LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
806 SOURCE_LANG = userenv('LANG')
807 where FUND_ID = X_FUND_ID
808 and userenv('LANG') in (LANGUAGE, SOURCE_LANG);
809
810 if (sql%notfound) then
811 raise no_data_found;
812 end if;
813 end UPDATE_ROW;
814
815 procedure DELETE_ROW (
816 X_FUND_ID in NUMBER
817 ) is
818 begin
819 delete from OZF_FUNDS_ALL_TL
820 where FUND_ID = X_FUND_ID;
821
822 if (sql%notfound) then
823 raise no_data_found;
824 end if;
825
826 delete from OZF_FUNDS_ALL_B
827 where FUND_ID = X_FUND_ID;
828
829 if (sql%notfound) then
830 raise no_data_found;
831 end if;
832 end DELETE_ROW;
833
834 procedure ADD_LANGUAGE
835 is
836 begin
837 delete from OZF_FUNDS_ALL_TL T
838 where not exists
839 (select NULL
840 from OZF_FUNDS_ALL_B B
841 where B.FUND_ID = T.FUND_ID
842 );
843
844 update OZF_FUNDS_ALL_TL T set (
845 SHORT_NAME,
846 DESCRIPTION
847 ) = (select
848 B.SHORT_NAME,
849 B.DESCRIPTION
850 from OZF_FUNDS_ALL_TL B
851 where B.FUND_ID = T.FUND_ID
852 and B.LANGUAGE = T.SOURCE_LANG)
853 where (
854 T.FUND_ID,
855 T.LANGUAGE
859 from OZF_FUNDS_ALL_TL SUBB, OZF_FUNDS_ALL_TL SUBT
856 ) in (select
857 SUBT.FUND_ID,
858 SUBT.LANGUAGE
860 where SUBB.FUND_ID = SUBT.FUND_ID
861 and SUBB.LANGUAGE = SUBT.SOURCE_LANG
862 and (SUBB.SHORT_NAME <> SUBT.SHORT_NAME
863 or SUBB.DESCRIPTION <> SUBT.DESCRIPTION
864 or (SUBB.DESCRIPTION is null and SUBT.DESCRIPTION is not null)
865 or (SUBB.DESCRIPTION is not null and SUBT.DESCRIPTION is null)
866 ));
867
868 insert into OZF_FUNDS_ALL_TL (
869 FUND_ID,
870 LAST_UPDATE_DATE,
871 LAST_UPDATED_BY,
872 LAST_UPDATE_LOGIN,
873 CREATION_DATE,
874 CREATED_BY,
875 CREATED_FROM,
876 REQUEST_ID,
877 PROGRAM_APPLICATION_ID,
878 PROGRAM_ID,
879 PROGRAM_UPDATE_DATE,
880 SHORT_NAME,
881 DESCRIPTION,
882 LANGUAGE,
883 SOURCE_LANG,
884 ORG_ID
885 ) select
886 B.FUND_ID,
887 B.LAST_UPDATE_DATE,
888 B.LAST_UPDATED_BY,
889 B.LAST_UPDATE_LOGIN,
890 B.CREATION_DATE,
891 B.CREATED_BY,
892 B.CREATED_FROM,
893 B.REQUEST_ID,
894 B.PROGRAM_APPLICATION_ID,
895 B.PROGRAM_ID,
896 B.PROGRAM_UPDATE_DATE,
897 B.SHORT_NAME,
898 B.DESCRIPTION,
899 L.LANGUAGE_CODE,
900 B.SOURCE_LANG,
901 B.ORG_ID
902 from OZF_FUNDS_ALL_TL B, FND_LANGUAGES L
903 where L.INSTALLED_FLAG in ('I', 'B')
904 and B.LANGUAGE = userenv('LANG')
905 and not exists
906 (select NULL
907 from OZF_FUNDS_ALL_TL T
908 where T.FUND_ID = B.FUND_ID
909 and T.LANGUAGE = L.LANGUAGE_CODE);
910 end ADD_LANGUAGE;
911
912 procedure TRANSLATE_ROW(
913 X_FUND_ID in NUMBER,
914 X_SHORT_NAME in VARCHAR2,
915 X_DESCRIPTION in VARCHAR2,
916 X_OWNERS in VARCHAR2
917 )
918 IS
919 BEGIN
920 update OZF_FUNDS_ALL_TL set
921 short_name = nvl(x_short_name, short_name),
922 description = nvl(x_description, description),
923 source_lang = userenv('LANG'),
924 last_update_date = sysdate,
925 last_updated_by = decode(x_owners, 'SEED', 1, 0),
926 last_update_login = 0
927 where fund_id = x_fund_id
928 and userenv('LANG') in (language, source_lang);
929 END TRANSLATE_ROW;
930
931 procedure LOAD_ROW(
932 X_FUND_ID in NUMBER,
933 X_CREATED_FROM in VARCHAR2,
934 X_REQUEST_ID in NUMBER,
935 X_FUND_NUMBER in VARCHAR2,
936 X_PARENT_FUND_ID in NUMBER,
937 X_CATEGORY_ID in NUMBER,
938 X_FUND_TYPE in VARCHAR2,
939 X_FUND_USAGE in VARCHAR2,
940 X_STATUS_CODE in VARCHAR2,
941 X_STATUS_DATE in DATE,
942 X_ACCRUED_LIABLE_ACCOUNT in NUMBER,
943 X_DED_ADJUSTMENT_ACCOUNT in NUMBER,
944 X_LIABILITY_FLAG in VARCHAR2,
945 X_SET_OF_BOOKS_ID in NUMBER,
946 X_START_PERIOD_ID in NUMBER,
947 X_END_PERIOD_ID in NUMBER,
948 X_START_DATE_ACTIVE in DATE,
949 X_END_DATE_ACTIVE in DATE,
950 X_BUDGET_AMOUNT_TC in NUMBER,
951 X_BUDGET_AMOUNT_FC in NUMBER,
952 X_AVAILABLE_AMOUNT in NUMBER,
953 X_DISTRIBUTED_AMOUNT in NUMBER,
954 X_CURRENCY_CODE_TC in VARCHAR2,
955 X_CURRENCY_CODE_FC in VARCHAR2,
956 X_EXCHANGE_RATE_TYPE in VARCHAR2,
957 X_EXCHANGE_RATE_DATE in DATE,
958 X_EXCHANGE_RATE in NUMBER,
959 X_DEPARTMENT_ID in NUMBER,
960 X_COSTCENTRE_ID in NUMBER,
961 X_OWNER in NUMBER,
962 X_ACCRUAL_METHOD in VARCHAR2,
963 X_ACCRUAL_OPERAND in VARCHAR2,
964 X_ACCRUAL_RATE in NUMBER,
965 X_ACCRUAL_BASIS in VARCHAR2,
966 X_HIERARCHY in VARCHAR2,
967 X_HIERARCHY_LEVEL in VARCHAR2,
968 X_BUDGET_FLAG in VARCHAR2,
969 X_EARNED_FLAG in VARCHAR2,
970 X_APPLY_ACCRUAL_ON in VARCHAR2,
971 X_ACCRUAL_PHASE in VARCHAR2,
972 X_ACCRUAL_CAP in NUMBER,
973 X_ACCRUAL_UOM in VARCHAR2,
974 X_OBJECT_VERSION_NUMBER in NUMBER,
975 X_ATTRIBUTE_CATEGORY in VARCHAR2,
976 X_ATTRIBUTE1 in VARCHAR2,
977 X_ATTRIBUTE2 in VARCHAR2,
978 X_ATTRIBUTE3 in VARCHAR2,
979 X_ATTRIBUTE4 in VARCHAR2,
980 X_ATTRIBUTE5 in VARCHAR2,
981 X_ATTRIBUTE6 in VARCHAR2,
982 X_ATTRIBUTE7 in VARCHAR2,
983 X_ATTRIBUTE8 in VARCHAR2,
984 X_ATTRIBUTE9 in VARCHAR2,
985 X_ATTRIBUTE10 in VARCHAR2,
986 X_ATTRIBUTE11 in VARCHAR2,
987 X_ATTRIBUTE12 in VARCHAR2,
988 X_ATTRIBUTE13 in VARCHAR2,
989 X_ATTRIBUTE14 in VARCHAR2,
990 X_ATTRIBUTE15 in VARCHAR2,
991 X_SHORT_NAME in VARCHAR2,
992 X_DESCRIPTION in VARCHAR2,
993 X_OWNERS in VARCHAR2,
994 X_HIERARCHY_ID in NUMBER,
995 X_PARENT_NODE_ID in NUMBER,
996 X_NODE_ID in NUMBER,
997 X_ORIGINAL_BUDGET in NUMBER,
998 X_TRANSFERED_IN_AMT in NUMBER,
999 X_TRANSFERED_OUT_AMT in NUMBER,
1000 X_HOLDBACK_AMT in NUMBER,
1001 X_PLANNED_AMT in NUMBER,
1002 X_COMMITTED_AMT in NUMBER,
1003 X_EARNED_AMT in NUMBER,
1004 X_PAID_AMT in NUMBER,
1005 X_PLAN_TYPE in VARCHAR2,
1006 X_PLAN_ID in NUMBER,
1007 X_LIABLE_ACCNT_SEGMENTS in VARCHAR2,
1008 X_ADJUSTMENT_ACCNT_SEGMENTS in VARCHAR2
1009 )
1010 IS
1011
1015 l_dummy_char varchar2(1);
1012 l_user_id number := 0;
1013 l_version number;
1014 l_fund_id number;
1016 l_row_id varchar2(100);
1017
1018 cursor c_version is
1019 select object_version_number
1020 from ozf_funds_all_b
1021 where fund_id = X_FUND_ID;
1022
1023 cursor c_fund_exists is
1024 select 'x'
1025 from ozf_funds_all_b
1026 where fund_id = X_FUND_ID;
1027
1028 cursor c_fund_id is
1029 select OZF_FUNDS_S.nextval
1030 from dual;
1031
1032 BEGIN
1033
1034 if X_OWNERS = 'SEED' then
1035 l_user_id := 1;
1036 end if;
1037
1038 open c_fund_exists;
1039 fetch c_fund_exists into l_dummy_char;
1040 if c_fund_exists%notfound then
1041 close c_fund_exists;
1042 if X_FUND_ID is not null then
1043 l_fund_id := X_FUND_ID;
1044 else
1045 open c_fund_id;
1046 fetch c_fund_id into l_fund_id;
1047 close c_fund_id;
1048 end if;
1049 l_version := 1;
1050 OZF_FUNDS_ALL_PKG.INSERT_ROW(
1051 X_ROWID =>l_row_id
1052 ,X_FUND_ID =>l_fund_id
1053 ,X_CREATED_FROM =>X_CREATED_FROM
1054 ,X_REQUEST_ID =>X_REQUEST_ID
1055 ,X_FUND_NUMBER =>X_FUND_NUMBER
1056 ,X_PARENT_FUND_ID =>X_PARENT_FUND_ID
1057 ,X_CATEGORY_ID =>X_CATEGORY_ID
1058 ,X_FUND_TYPE =>X_FUND_TYPE
1059 ,X_FUND_USAGE =>X_FUND_USAGE
1060 ,X_STATUS_CODE =>X_STATUS_CODE
1061 ,X_STATUS_DATE =>X_STATUS_DATE
1062 ,X_ACCRUED_LIABLE_ACCOUNT =>X_ACCRUED_LIABLE_ACCOUNT
1063 ,X_DED_ADJUSTMENT_ACCOUNT =>X_DED_ADJUSTMENT_ACCOUNT
1064 ,X_LIABILITY_FLAG =>X_LIABILITY_FLAG
1065 ,X_SET_OF_BOOKS_ID =>X_SET_OF_BOOKS_ID
1066 ,X_START_PERIOD_ID =>X_START_PERIOD_ID
1067 ,X_END_PERIOD_ID =>X_END_PERIOD_ID
1068 ,X_START_DATE_ACTIVE =>X_START_DATE_ACTIVE
1069 ,X_END_DATE_ACTIVE =>X_END_DATE_ACTIVE
1070 ,X_BUDGET_AMOUNT_TC =>X_BUDGET_AMOUNT_TC
1071 ,X_BUDGET_AMOUNT_FC =>X_BUDGET_AMOUNT_FC
1072 ,X_AVAILABLE_AMOUNT =>X_AVAILABLE_AMOUNT
1073 ,X_DISTRIBUTED_AMOUNT =>X_DISTRIBUTED_AMOUNT
1074 ,X_CURRENCY_CODE_TC =>X_CURRENCY_CODE_TC
1075 ,X_CURRENCY_CODE_FC =>X_CURRENCY_CODE_FC
1076 ,X_EXCHANGE_RATE_TYPE =>X_EXCHANGE_RATE_TYPE
1077 ,X_EXCHANGE_RATE_DATE =>X_EXCHANGE_RATE_DATE
1078 ,X_EXCHANGE_RATE =>X_EXCHANGE_RATE
1079 ,X_DEPARTMENT_ID =>X_DEPARTMENT_ID
1080 ,X_COSTCENTRE_ID =>X_COSTCENTRE_ID
1081 ,X_OWNER =>X_OWNER
1082 ,X_ACCRUAL_METHOD =>X_ACCRUAL_METHOD
1083 ,X_ACCRUAL_OPERAND =>X_ACCRUAL_OPERAND
1084 ,X_ACCRUAL_RATE =>X_ACCRUAL_RATE
1085 ,X_ACCRUAL_BASIS =>X_ACCRUAL_BASIS
1086 ,X_HIERARCHY =>X_HIERARCHY
1087 ,X_HIERARCHY_LEVEL =>X_HIERARCHY_LEVEL
1088 ,X_BUDGET_FLAG =>X_BUDGET_FLAG
1089 ,X_EARNED_FLAG =>X_EARNED_FLAG
1090 ,X_APPLY_ACCRUAL_ON =>X_APPLY_ACCRUAL_ON
1091 ,X_ACCRUAL_PHASE =>X_ACCRUAL_PHASE
1092 ,X_ACCRUAL_CAP =>X_ACCRUAL_CAP
1093 ,X_ACCRUAL_UOM =>X_ACCRUAL_UOM
1094 ,X_OBJECT_VERSION_NUMBER =>l_version
1095 ,X_ATTRIBUTE_CATEGORY =>X_ATTRIBUTE_CATEGORY
1096 ,X_ATTRIBUTE1 =>X_ATTRIBUTE1
1097 ,X_ATTRIBUTE2 =>X_ATTRIBUTE2
1098 ,X_ATTRIBUTE3 =>X_ATTRIBUTE3
1099 ,X_ATTRIBUTE4 =>X_ATTRIBUTE4
1100 ,X_ATTRIBUTE5 =>X_ATTRIBUTE5
1101 ,X_ATTRIBUTE6 =>X_ATTRIBUTE6
1102 ,X_ATTRIBUTE7 =>X_ATTRIBUTE7
1103 ,X_ATTRIBUTE8 =>X_ATTRIBUTE8
1104 ,X_ATTRIBUTE9 =>X_ATTRIBUTE9
1105 ,X_ATTRIBUTE10 =>X_ATTRIBUTE10
1106 ,X_ATTRIBUTE11 =>X_ATTRIBUTE11
1107 ,X_ATTRIBUTE12 =>X_ATTRIBUTE12
1108 ,X_ATTRIBUTE13 =>X_ATTRIBUTE13
1109 ,X_ATTRIBUTE14 =>X_ATTRIBUTE14
1110 ,X_ATTRIBUTE15 =>X_ATTRIBUTE15
1111 ,X_SHORT_NAME =>X_SHORT_NAME
1112 ,X_DESCRIPTION =>X_DESCRIPTION
1113 ,X_CREATION_DATE =>SYSDATE
1114 ,X_CREATED_BY =>l_user_id
1115 ,X_LAST_UPDATE_DATE =>SYSDATE
1116 ,X_LAST_UPDATED_BY =>l_user_id
1117 ,X_LAST_UPDATE_LOGIN =>0
1118 ,X_HIERARCHY_ID =>X_HIERARCHY_ID
1119 ,X_PARENT_NODE_ID =>X_PARENT_NODE_ID
1120 ,X_NODE_ID =>X_NODE_ID
1121 ,X_ORIGINAL_BUDGET =>X_ORIGINAL_BUDGET
1122 ,X_TRANSFERED_IN_AMT =>X_TRANSFERED_IN_AMT
1123 ,X_TRANSFERED_OUT_AMT =>X_TRANSFERED_OUT_AMT
1124 ,X_HOLDBACK_AMT =>X_HOLDBACK_AMT
1125 ,X_PLANNED_AMT =>X_PLANNED_AMT
1126 ,X_COMMITTED_AMT =>X_COMMITTED_AMT
1127 ,X_EARNED_AMT =>X_EARNED_AMT
1128 ,X_PAID_AMT =>X_PAID_AMT
1129 ,X_PLAN_TYPE =>X_PLAN_TYPE
1130 ,X_PLAN_ID =>X_PLAN_ID
1131 ,X_LIABLE_ACCNT_SEGMENTS =>X_LIABLE_ACCNT_SEGMENTS
1132 ,X_ADJUSTMENT_ACCNT_SEGMENTS =>X_ADJUSTMENT_ACCNT_SEGMENTS
1133 );
1134 else
1135 close c_fund_exists;
1136 open c_version;
1137 fetch c_version into l_version;
1138 close c_version;
1139 OZF_FUNDS_ALL_PKG.UPDATE_ROW(
1140 X_FUND_ID =>l_fund_id
1141 ,X_CREATED_FROM =>X_CREATED_FROM
1142 ,X_REQUEST_ID =>X_REQUEST_ID
1143 ,X_FUND_NUMBER =>X_FUND_NUMBER
1144 ,X_PARENT_FUND_ID =>X_PARENT_FUND_ID
1145 ,X_CATEGORY_ID =>X_CATEGORY_ID
1147 ,X_FUND_USAGE =>X_FUND_USAGE
1148 ,X_STATUS_CODE =>X_STATUS_CODE
1149 ,X_STATUS_DATE =>X_STATUS_DATE
1150 ,X_ACCRUED_LIABLE_ACCOUNT =>X_ACCRUED_LIABLE_ACCOUNT
1151 ,X_DED_ADJUSTMENT_ACCOUNT =>X_DED_ADJUSTMENT_ACCOUNT
1152 ,X_LIABILITY_FLAG =>X_LIABILITY_FLAG
1153 ,X_SET_OF_BOOKS_ID =>X_SET_OF_BOOKS_ID
1154 ,X_START_PERIOD_ID =>X_START_PERIOD_ID
1155 ,X_END_PERIOD_ID =>X_END_PERIOD_ID
1156 ,X_START_DATE_ACTIVE =>X_START_DATE_ACTIVE
1157 ,X_END_DATE_ACTIVE =>X_END_DATE_ACTIVE
1158 ,X_BUDGET_AMOUNT_TC =>X_BUDGET_AMOUNT_TC
1159 ,X_BUDGET_AMOUNT_FC =>X_BUDGET_AMOUNT_FC
1160 ,X_AVAILABLE_AMOUNT =>X_AVAILABLE_AMOUNT
1161 ,X_DISTRIBUTED_AMOUNT =>X_DISTRIBUTED_AMOUNT
1162 ,X_CURRENCY_CODE_TC =>X_CURRENCY_CODE_TC
1163 ,X_CURRENCY_CODE_FC =>X_CURRENCY_CODE_FC
1164 ,X_EXCHANGE_RATE_TYPE =>X_EXCHANGE_RATE_TYPE
1165 ,X_EXCHANGE_RATE_DATE =>X_EXCHANGE_RATE_DATE
1166 ,X_EXCHANGE_RATE =>X_EXCHANGE_RATE
1167 ,X_DEPARTMENT_ID =>X_DEPARTMENT_ID
1168 ,X_COSTCENTRE_ID =>X_COSTCENTRE_ID
1169 ,X_OWNER =>X_OWNER
1170 ,X_ACCRUAL_METHOD =>X_ACCRUAL_METHOD
1171 ,X_ACCRUAL_OPERAND =>X_ACCRUAL_OPERAND
1172 ,X_ACCRUAL_RATE =>X_ACCRUAL_RATE
1173 ,X_ACCRUAL_BASIS =>X_ACCRUAL_BASIS
1174 ,X_HIERARCHY =>X_HIERARCHY
1175 ,X_HIERARCHY_LEVEL =>X_HIERARCHY_LEVEL
1176 ,X_BUDGET_FLAG =>X_BUDGET_FLAG
1177 ,X_EARNED_FLAG =>X_EARNED_FLAG
1178 ,X_APPLY_ACCRUAL_ON =>X_APPLY_ACCRUAL_ON
1179 ,X_ACCRUAL_PHASE =>X_ACCRUAL_PHASE
1180 ,X_ACCRUAL_CAP =>X_ACCRUAL_CAP
1181 ,X_ACCRUAL_UOM =>X_ACCRUAL_UOM
1182 ,X_OBJECT_VERSION_NUMBER =>l_version + 1
1183 ,X_ATTRIBUTE_CATEGORY =>X_ATTRIBUTE_CATEGORY
1184 ,X_ATTRIBUTE1 =>X_ATTRIBUTE1
1185 ,X_ATTRIBUTE2 =>X_ATTRIBUTE2
1186 ,X_ATTRIBUTE3 =>X_ATTRIBUTE3
1187 ,X_ATTRIBUTE4 =>X_ATTRIBUTE4
1188 ,X_ATTRIBUTE5 =>X_ATTRIBUTE5
1189 ,X_ATTRIBUTE6 =>X_ATTRIBUTE6
1190 ,X_ATTRIBUTE7 =>X_ATTRIBUTE7
1191 ,X_ATTRIBUTE8 =>X_ATTRIBUTE8
1192 ,X_ATTRIBUTE9 =>X_ATTRIBUTE9
1193 ,X_ATTRIBUTE10 =>X_ATTRIBUTE10
1194 ,X_ATTRIBUTE11 =>X_ATTRIBUTE11
1195 ,X_ATTRIBUTE12 =>X_ATTRIBUTE12
1196 ,X_ATTRIBUTE13 =>X_ATTRIBUTE13
1197 ,X_ATTRIBUTE14 =>X_ATTRIBUTE14
1198 ,X_ATTRIBUTE15 =>X_ATTRIBUTE15
1199 ,X_SHORT_NAME =>X_SHORT_NAME
1200 ,X_DESCRIPTION =>X_DESCRIPTION
1201 ,X_LAST_UPDATE_DATE =>SYSDATE
1202 ,X_LAST_UPDATED_BY =>l_user_id
1203 ,X_LAST_UPDATE_LOGIN =>0
1204 ,X_HIERARCHY_ID =>X_HIERARCHY_ID
1205 ,X_PARENT_NODE_ID =>X_PARENT_NODE_ID
1206 ,X_NODE_ID =>X_NODE_ID
1207 ,X_ORIGINAL_BUDGET =>X_ORIGINAL_BUDGET
1208 ,X_TRANSFERED_IN_AMT =>X_TRANSFERED_IN_AMT
1209 ,X_TRANSFERED_OUT_AMT =>X_TRANSFERED_OUT_AMT
1210 ,X_HOLDBACK_AMT =>X_HOLDBACK_AMT
1211 ,X_PLANNED_AMT =>X_PLANNED_AMT
1212 ,X_COMMITTED_AMT =>X_COMMITTED_AMT
1213 ,X_EARNED_AMT =>X_EARNED_AMT
1214 ,X_PAID_AMT =>X_PAID_AMT
1215 ,X_PLAN_TYPE =>X_PLAN_TYPE
1216 ,X_PLAN_ID =>X_PLAN_ID
1217 ,X_LIABLE_ACCNT_SEGMENTS =>X_LIABLE_ACCNT_SEGMENTS
1218 ,X_ADJUSTMENT_ACCNT_SEGMENTS =>X_ADJUSTMENT_ACCNT_SEGMENTS
1219 );
1220 end if;
1221 END LOAD_ROW;
1222
1223
1224 end OZF_FUNDS_ALL_PKG;
1146 ,X_FUND_TYPE =>X_FUND_TYPE