DBA Data[Home] [Help]

APPS.FII_COM_CC_DIM_MAPS_PKG dependencies on FII_COM_CC_DIM_MAPS

Line 1: PACKAGE BODY FII_COM_CC_DIM_MAPS_PKG AS

1: PACKAGE BODY FII_COM_CC_DIM_MAPS_PKG AS
2: /* $Header: FIICCMPB.pls 120.1 2005/10/30 05:05:42 appldev noship $ */
3:
4: G_UNASSIGNED_ID NUMBER(15);
5: G_CO_MAP_SEG VARCHAR2(30);

Line 43: FII_UTIL.initialize('FII_COM_CC_DIM_MAPS_PKG.log',

39: -- FII_UTIL.initialize will get profile options FII_DEBUG_MODE
40: -- and BIS_DEBUG_LOG_DIRECTORY and set up the directory where
41: -- the log files and output files are written to
42: ----------------------------------------------------------------
43: FII_UTIL.initialize('FII_COM_CC_DIM_MAPS_PKG.log',
44: 'FII_COM_CC_DIM_MAPS_PKG.out',l_dir,'FII_COM_CC_DIM_MAPS_PKG');
45:
46:
47: -- Obtain FII schema name

Line 44: 'FII_COM_CC_DIM_MAPS_PKG.out',l_dir,'FII_COM_CC_DIM_MAPS_PKG');

40: -- and BIS_DEBUG_LOG_DIRECTORY and set up the directory where
41: -- the log files and output files are written to
42: ----------------------------------------------------------------
43: FII_UTIL.initialize('FII_COM_CC_DIM_MAPS_PKG.log',
44: 'FII_COM_CC_DIM_MAPS_PKG.out',l_dir,'FII_COM_CC_DIM_MAPS_PKG');
45:
46:
47: -- Obtain FII schema name
48: g_schema_name := FII_UTIL.get_schema_name ('FII');

Line 129: FII_UTIL.Write_Log ('FII_COM_CC_DIM_MAPS_PKG.Initialize : '|| 'User defined error');

125:
126: Exception
127:
128: When COMCCDIM_fatal_err then
129: FII_UTIL.Write_Log ('FII_COM_CC_DIM_MAPS_PKG.Initialize : '|| 'User defined error');
130: FII_UTIL.Write_Log ('G_PHASE : ' || g_phase);
131: FND_CONCURRENT.Af_Rollback;
132: FII_MESSAGE.Func_Fail(func_name => 'FII_COM_CC_DIM_MAPS_PKG.Initialize');
133: raise;

Line 132: FII_MESSAGE.Func_Fail(func_name => 'FII_COM_CC_DIM_MAPS_PKG.Initialize');

128: When COMCCDIM_fatal_err then
129: FII_UTIL.Write_Log ('FII_COM_CC_DIM_MAPS_PKG.Initialize : '|| 'User defined error');
130: FII_UTIL.Write_Log ('G_PHASE : ' || g_phase);
131: FND_CONCURRENT.Af_Rollback;
132: FII_MESSAGE.Func_Fail(func_name => 'FII_COM_CC_DIM_MAPS_PKG.Initialize');
133: raise;
134:
135: When others then
136: FII_UTIL.Write_Log ('Unexpected error when calling Initialize...');

Line 151: FII_MESSAGE.Func_Ent(func_name => 'FII_COM_CC_DIM_MAPS_PKG.Populate_com_cc_Maps');

147:
148: PROCEDURE Populate_com_cc_Maps IS
149: BEGIN
150: IF (FIIDIM_Debug) THEN
151: FII_MESSAGE.Func_Ent(func_name => 'FII_COM_CC_DIM_MAPS_PKG.Populate_com_cc_Maps');
152: END IF;
153:
154: -- Insert records in the com cc mappings GI table
155: g_phase := 'Insert into FII_COM_CC_DIM_MAP_GT';

Line 161: -- To populate those id's also in FII_COM_CC_DIM_MAPS_GT

157: ------------------------------------------------------------------------------
158: -- There is a possibility of having Company_id and cost_center_id
159: -- in FII_GL_CCID_DIMENSIONS which might not be present in the
160: -- corresponding Dimension hierarchy (it might now be mapped)
161: -- To populate those id's also in FII_COM_CC_DIM_MAPS_GT
162: -- outer join is used.
163: -- Also since both Company and Cost Center Dimension can be mapped
164: -- to either Balancing / Cost Center Segment so we need to identify
165: -- that the dimension is mapped to which segment. If the Dimension

Line 173: INSERT INTO FII_COM_CC_DIM_MAPS_GT (PARENT_COMPANY_DIM_ID,

169: -- Cost_Center_id From FII_GL_CCID_DIMENSIONS and FII_BUDGET_BASE
170: -- should be mapped to the dimension table. Decode is used for this purpose
171: --------------------------------------------------------------------------------
172:
173: INSERT INTO FII_COM_CC_DIM_MAPS_GT (PARENT_COMPANY_DIM_ID,
174: CHILD_COMPANY_ID,
175: PARENT_COST_CENTER_DIM_ID,
176: CHILD_COST_CENTER_ID)
177: SELECT

Line 213: FII_MESSAGE.Func_Succ(func_name => 'FII_COM_CC_DIM_MAPS_PKG.Populate_com_cc_Maps');

209: h2.child_cc_id ;
210: -- Removed outer join as we dont want unassigned as a parent
211: IF (FIIDIM_Debug) THEN
212: FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows from FII_COM_CC_DIM_MAP_GT');
213: FII_MESSAGE.Func_Succ(func_name => 'FII_COM_CC_DIM_MAPS_PKG.Populate_com_cc_Maps');
214: END IF;
215:
216: Exception
217:

Line 238: FII_MESSAGE.Func_Ent(func_name => 'FII_COM_CC_DIM_MAPS_PKG.Init_Load');

234:
235: BEGIN
236:
237: IF (FIIDIM_Debug) THEN
238: FII_MESSAGE.Func_Ent(func_name => 'FII_COM_CC_DIM_MAPS_PKG.Init_Load');
239: END IF;
240:
241: --First do the initialization
242: g_phase := 'Calling intialize procedure';

Line 247: g_phase := 'Populate FII_COM_CC_DIM_MAPS_GT';

243:
244: Initialize;
245:
246: -- Populate the com cc dim maps GT.
247: g_phase := 'Populate FII_COM_CC_DIM_MAPS_GT';
248:
249: Populate_com_cc_Maps;
250: -- Populate by selecting from the mappings table
251:

Line 254: g_phase := 'Copy from FII_COM_CC_DIM_MAP_GT to FII_COM_CC_DIM_MAPS';

250: -- Populate by selecting from the mappings table
251:
252: -- Now all the mappings are populated in the GT table.
253: -- Copy data from GT table to Mappings table
254: g_phase := 'Copy from FII_COM_CC_DIM_MAP_GT to FII_COM_CC_DIM_MAPS';
255:
256: FII_UTIL.truncate_table ('FII_COM_CC_DIM_MAPS', 'FII', g_retcode);
257:
258: Insert into /*+ APPEND */ FII_COM_CC_DIM_MAPS (

Line 256: FII_UTIL.truncate_table ('FII_COM_CC_DIM_MAPS', 'FII', g_retcode);

252: -- Now all the mappings are populated in the GT table.
253: -- Copy data from GT table to Mappings table
254: g_phase := 'Copy from FII_COM_CC_DIM_MAP_GT to FII_COM_CC_DIM_MAPS';
255:
256: FII_UTIL.truncate_table ('FII_COM_CC_DIM_MAPS', 'FII', g_retcode);
257:
258: Insert into /*+ APPEND */ FII_COM_CC_DIM_MAPS (
259: PARENT_COMPANY_DIM_ID,
260: CHILD_COMPANY_ID,

Line 258: Insert into /*+ APPEND */ FII_COM_CC_DIM_MAPS (

254: g_phase := 'Copy from FII_COM_CC_DIM_MAP_GT to FII_COM_CC_DIM_MAPS';
255:
256: FII_UTIL.truncate_table ('FII_COM_CC_DIM_MAPS', 'FII', g_retcode);
257:
258: Insert into /*+ APPEND */ FII_COM_CC_DIM_MAPS (
259: PARENT_COMPANY_DIM_ID,
260: CHILD_COMPANY_ID,
261: PARENT_COST_CENTER_DIM_ID,
262: CHILD_COST_CENTER_ID,

Line 278: FROM FII_COM_CC_DIM_MAPS_GT;

274: FII_USER_ID,
275: SYSDATE,
276: FII_USER_ID,
277: FII_LOGIN_ID
278: FROM FII_COM_CC_DIM_MAPS_GT;
279:
280: IF (FIIDIM_Debug) THEN
281: FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows from FII_COM_CC_DIM_MAPS');
282: END IF;

Line 281: FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows from FII_COM_CC_DIM_MAPS');

277: FII_LOGIN_ID
278: FROM FII_COM_CC_DIM_MAPS_GT;
279:
280: IF (FIIDIM_Debug) THEN
281: FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows from FII_COM_CC_DIM_MAPS');
282: END IF;
283:
284:
285: FND_CONCURRENT.Af_Commit;

Line 289: g_phase := 'gather_table_stats for FII_COM_CC_DIM_MAPS';

285: FND_CONCURRENT.Af_Commit;
286:
287: --Call FND_STATS to collect statistics after populating the tables.
288: -- This will be in RSG data.
289: g_phase := 'gather_table_stats for FII_COM_CC_DIM_MAPS';
290:
291: FND_STATS.gather_table_stats
292: (ownname => g_schema_name,
293: tabname => 'FII_COM_CC_DIM_MAPS');

Line 293: tabname => 'FII_COM_CC_DIM_MAPS');

289: g_phase := 'gather_table_stats for FII_COM_CC_DIM_MAPS';
290:
291: FND_STATS.gather_table_stats
292: (ownname => g_schema_name,
293: tabname => 'FII_COM_CC_DIM_MAPS');
294:
295: g_phase := 'gather_table_stats for MLOG$_FII_COM_CC_DIM_MAPS';
296:
297: FND_STATS.gather_table_stats

Line 295: g_phase := 'gather_table_stats for MLOG$_FII_COM_CC_DIM_MAPS';

291: FND_STATS.gather_table_stats
292: (ownname => g_schema_name,
293: tabname => 'FII_COM_CC_DIM_MAPS');
294:
295: g_phase := 'gather_table_stats for MLOG$_FII_COM_CC_DIM_MAPS';
296:
297: FND_STATS.gather_table_stats
298: (ownname => g_schema_name,
299: tabname => 'MLOG$_FII_COM_CC_DIM_MAPS');

Line 299: tabname => 'MLOG$_FII_COM_CC_DIM_MAPS');

295: g_phase := 'gather_table_stats for MLOG$_FII_COM_CC_DIM_MAPS';
296:
297: FND_STATS.gather_table_stats
298: (ownname => g_schema_name,
299: tabname => 'MLOG$_FII_COM_CC_DIM_MAPS');
300:
301: --=====================================================================
302:
303: IF (FIIDIM_Debug) THEN

Line 304: FII_MESSAGE.Func_Succ(func_name => 'FII_COM_CC_DIM_MAPS_PKG.Init_Load');

300:
301: --=====================================================================
302:
303: IF (FIIDIM_Debug) THEN
304: FII_MESSAGE.Func_Succ(func_name => 'FII_COM_CC_DIM_MAPS_PKG.Init_Load');
305: END IF;
306:
307: -- Exception handling
308:

Line 313: FII_UTIL.Write_Log ('FII_COM_CC_DIM_MAPS_PKG.Init_Load: '||

309: EXCEPTION
310:
311: WHEN COMCCDIM_fatal_err THEN
312:
313: FII_UTIL.Write_Log ('FII_COM_CC_DIM_MAPS_PKG.Init_Load: '||
314: 'User defined error');
315: FND_CONCURRENT.Af_Rollback;
316: FII_MESSAGE.Func_Fail(func_name => 'FII_COM_CC_DIM_MAPS_PKG.Init_Load');
317: retcode := sqlcode;

Line 316: FII_MESSAGE.Func_Fail(func_name => 'FII_COM_CC_DIM_MAPS_PKG.Init_Load');

312:
313: FII_UTIL.Write_Log ('FII_COM_CC_DIM_MAPS_PKG.Init_Load: '||
314: 'User defined error');
315: FND_CONCURRENT.Af_Rollback;
316: FII_MESSAGE.Func_Fail(func_name => 'FII_COM_CC_DIM_MAPS_PKG.Init_Load');
317: retcode := sqlcode;
318: ret_val := FND_CONCURRENT.Set_Completion_Status
319: (status => 'ERROR', message => substr(sqlerrm,1,180));
320:

Line 326: FII_MESSAGE.Func_Fail(func_name => 'FII_COM_CC_DIM_MAPS_PKG.Init_Load');

322: FII_UTIL.Write_Log ('Init_Load -> phase: '|| g_phase);
323: FII_UTIL.Write_Log (
324: 'Other error in FII_CC_MAINTAIN_PKG.Init_Load: ' || substr(sqlerrm,1,180));
325: FND_CONCURRENT.Af_Rollback;
326: FII_MESSAGE.Func_Fail(func_name => 'FII_COM_CC_DIM_MAPS_PKG.Init_Load');
327: retcode := sqlcode;
328: ret_val := FND_CONCURRENT.Set_Completion_Status
329: (status => 'ERROR', message => substr(sqlerrm,1,180));
330:

Line 346: FII_MESSAGE.Func_Ent(func_name => 'FII_COM_CC_DIM_MAPS_PKG.Incre_Update');

342: ret_code VARCHAR2(2):=0;
343: BEGIN
344:
345: IF (FIIDIM_Debug) THEN
346: FII_MESSAGE.Func_Ent(func_name => 'FII_COM_CC_DIM_MAPS_PKG.Incre_Update');
347: END IF;
348:
349: --First do the initialization
350: g_phase := 'Calling intialize procedure';

Line 355: g_phase := 'Populate FII_COM_CC_DIM_MAPS_GT';

351:
352: Initialize;
353:
354: -- Populate the com cc dim maps GT table.
355: g_phase := 'Populate FII_COM_CC_DIM_MAPS_GT';
356:
357: Populate_com_cc_Maps;
358:
359: -- -----------------------------------------------------

Line 360: -- Incremental maintainence of FII_COM_CC_DIM_MAPS

356:
357: Populate_com_cc_Maps;
358:
359: -- -----------------------------------------------------
360: -- Incremental maintainence of FII_COM_CC_DIM_MAPS
361: -- This is done in 2 statements
362: -- One Delete statement and one Insert statement
363: -- Do a diff with the mappings table with the GT table
364: -- ------------------------------------------------------

Line 367: DELETE FROM FII_COM_CC_DIM_MAPS

363: -- Do a diff with the mappings table with the GT table
364: -- ------------------------------------------------------
365:
366: -- Do a diff with the mappings table
367: DELETE FROM FII_COM_CC_DIM_MAPS
368: WHERE
369: (PARENT_COMPANY_DIM_ID,
370: CHILD_COMPANY_ID,
371: PARENT_COST_CENTER_DIM_ID,

Line 377: FROM FII_COM_CC_DIM_MAPS

373: (SELECT PARENT_COMPANY_DIM_ID,
374: CHILD_COMPANY_ID,
375: PARENT_COST_CENTER_DIM_ID,
376: CHILD_COST_CENTER_ID
377: FROM FII_COM_CC_DIM_MAPS
378: MINUS
379: SELECT PARENT_COMPANY_DIM_ID,
380: CHILD_COMPANY_ID,
381: PARENT_COST_CENTER_DIM_ID,

Line 383: FROM FII_COM_CC_DIM_MAPS_GT);

379: SELECT PARENT_COMPANY_DIM_ID,
380: CHILD_COMPANY_ID,
381: PARENT_COST_CENTER_DIM_ID,
382: CHILD_COST_CENTER_ID
383: FROM FII_COM_CC_DIM_MAPS_GT);
384:
385:
386: IF (FIIDIM_Debug) THEN
387: FII_UTIL.Write_Log('Deleted ' || SQL%ROWCOUNT || ' rows from FII_COM_CC_DIM_MAPS');

Line 387: FII_UTIL.Write_Log('Deleted ' || SQL%ROWCOUNT || ' rows from FII_COM_CC_DIM_MAPS');

383: FROM FII_COM_CC_DIM_MAPS_GT);
384:
385:
386: IF (FIIDIM_Debug) THEN
387: FII_UTIL.Write_Log('Deleted ' || SQL%ROWCOUNT || ' rows from FII_COM_CC_DIM_MAPS');
388: END IF;
389:
390:
391: Insert into FII_COM_CC_DIM_MAPS (

Line 391: Insert into FII_COM_CC_DIM_MAPS (

387: FII_UTIL.Write_Log('Deleted ' || SQL%ROWCOUNT || ' rows from FII_COM_CC_DIM_MAPS');
388: END IF;
389:
390:
391: Insert into FII_COM_CC_DIM_MAPS (
392: PARENT_COMPANY_DIM_ID,
393: CHILD_COMPANY_ID,
394: PARENT_COST_CENTER_DIM_ID,
395: CHILD_COST_CENTER_ID,

Line 411: FROM FII_COM_CC_DIM_MAPS_GT

407: FII_USER_ID,
408: SYSDATE,
409: FII_USER_ID,
410: FII_LOGIN_ID
411: FROM FII_COM_CC_DIM_MAPS_GT
412: MINUS
413: SELECT
414: PARENT_COMPANY_DIM_ID,
415: CHILD_COMPANY_ID,

Line 423: FROM FII_COM_CC_DIM_MAPS);

419: FII_USER_ID,
420: SYSDATE,
421: FII_USER_ID,
422: FII_LOGIN_ID
423: FROM FII_COM_CC_DIM_MAPS);
424:
425: IF (FIIDIM_Debug) THEN
426: FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows into FII_COM_CC_DIM_MAPS');
427: END IF;

Line 426: FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows into FII_COM_CC_DIM_MAPS');

422: FII_LOGIN_ID
423: FROM FII_COM_CC_DIM_MAPS);
424:
425: IF (FIIDIM_Debug) THEN
426: FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows into FII_COM_CC_DIM_MAPS');
427: END IF;
428:
429: FND_CONCURRENT.Af_Commit;
430:

Line 433: g_phase := 'gather_table_stats for FII_COM_CC_DIM_MAPS';

429: FND_CONCURRENT.Af_Commit;
430:
431: -- Call FND_STATS to collect statistics after populating the tables.
432: -- This will be in RSG data.
433: g_phase := 'gather_table_stats for FII_COM_CC_DIM_MAPS';
434:
435: FND_STATS.gather_table_stats
436: (ownname => g_schema_name,
437: tabname => 'FII_COM_CC_DIM_MAPS');

Line 437: tabname => 'FII_COM_CC_DIM_MAPS');

433: g_phase := 'gather_table_stats for FII_COM_CC_DIM_MAPS';
434:
435: FND_STATS.gather_table_stats
436: (ownname => g_schema_name,
437: tabname => 'FII_COM_CC_DIM_MAPS');
438:
439: -- Bug 4200473. Not to analyze MLOG in incremental run.
440: -- As per performance teams suggestions.
441: --g_phase := 'gather_table_stats for MLOG$_FII_COM_CC_DIM_MAPS';

Line 441: --g_phase := 'gather_table_stats for MLOG$_FII_COM_CC_DIM_MAPS';

437: tabname => 'FII_COM_CC_DIM_MAPS');
438:
439: -- Bug 4200473. Not to analyze MLOG in incremental run.
440: -- As per performance teams suggestions.
441: --g_phase := 'gather_table_stats for MLOG$_FII_COM_CC_DIM_MAPS';
442:
443: --FND_STATS.gather_table_stats
444: --(ownname => g_schema_name,
445: --tabname => 'MLOG$_FII_COM_CC_DIM_MAPS');

Line 445: --tabname => 'MLOG$_FII_COM_CC_DIM_MAPS');

441: --g_phase := 'gather_table_stats for MLOG$_FII_COM_CC_DIM_MAPS';
442:
443: --FND_STATS.gather_table_stats
444: --(ownname => g_schema_name,
445: --tabname => 'MLOG$_FII_COM_CC_DIM_MAPS');
446:
447: IF (FIIDIM_Debug) THEN
448: FII_MESSAGE.Func_Succ(func_name => 'FII_COM_CC_DIM_MAPS_PKG.Incre_Update');
449: END IF;

Line 448: FII_MESSAGE.Func_Succ(func_name => 'FII_COM_CC_DIM_MAPS_PKG.Incre_Update');

444: --(ownname => g_schema_name,
445: --tabname => 'MLOG$_FII_COM_CC_DIM_MAPS');
446:
447: IF (FIIDIM_Debug) THEN
448: FII_MESSAGE.Func_Succ(func_name => 'FII_COM_CC_DIM_MAPS_PKG.Incre_Update');
449: END IF;
450:
451: -- Exception handling
452:

Line 455: FII_UTIL.Write_Log ('FII_COM_CC_DIM_MAPS_PKG.Incre_Update'||

451: -- Exception handling
452:
453: EXCEPTION
454: WHEN COMCCDIM_fatal_err THEN
455: FII_UTIL.Write_Log ('FII_COM_CC_DIM_MAPS_PKG.Incre_Update'||
456: 'User defined error');
457:
458: FND_CONCURRENT.Af_Rollback;
459: FII_MESSAGE.Func_Fail(func_name => 'FII_COM_CC_DIM_MAPS_PKG.Incre_Update');

Line 459: FII_MESSAGE.Func_Fail(func_name => 'FII_COM_CC_DIM_MAPS_PKG.Incre_Update');

455: FII_UTIL.Write_Log ('FII_COM_CC_DIM_MAPS_PKG.Incre_Update'||
456: 'User defined error');
457:
458: FND_CONCURRENT.Af_Rollback;
459: FII_MESSAGE.Func_Fail(func_name => 'FII_COM_CC_DIM_MAPS_PKG.Incre_Update');
460: retcode := sqlcode;
461: ret_val := FND_CONCURRENT.Set_Completion_Status
462: (status => 'ERROR', message => substr(sqlerrm,1,180));
463:

Line 467: 'Other error in FII_COM_CC_DIM_MAPS_PKG.Incre_Update: ' || substr(sqlerrm,1,180));

463:
464: WHEN OTHERS THEN
465: FII_UTIL.Write_Log ('Incre_Update -> phase: '|| g_phase);
466: FII_UTIL.Write_Log (
467: 'Other error in FII_COM_CC_DIM_MAPS_PKG.Incre_Update: ' || substr(sqlerrm,1,180));
468:
469:
470: FND_CONCURRENT.Af_Rollback;
471: FII_MESSAGE.Func_Fail(func_name => 'FII_COM_CC_DIM_MAPS_PKG.Incre_Update');

Line 471: FII_MESSAGE.Func_Fail(func_name => 'FII_COM_CC_DIM_MAPS_PKG.Incre_Update');

467: 'Other error in FII_COM_CC_DIM_MAPS_PKG.Incre_Update: ' || substr(sqlerrm,1,180));
468:
469:
470: FND_CONCURRENT.Af_Rollback;
471: FII_MESSAGE.Func_Fail(func_name => 'FII_COM_CC_DIM_MAPS_PKG.Incre_Update');
472: retcode := sqlcode;
473: ret_val := FND_CONCURRENT.Set_Completion_Status
474: (status => 'ERROR', message => substr(sqlerrm,1,180));
475:

Line 478: END FII_COM_CC_DIM_MAPS_PKG ;

474: (status => 'ERROR', message => substr(sqlerrm,1,180));
475:
476: END Incre_Update;
477:
478: END FII_COM_CC_DIM_MAPS_PKG ;