eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.FII_GL_CCID_C dependencies on FII_UTIL

Line 51: FII_UTIL.Write_Log('Inserting DBI log items into FII_CHANGE_LOG');

47: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.INIT_DBI_CHANGE_LOG');
48: End if;
49:
50: If g_debug_flag = 'Y' then
51: FII_UTIL.Write_Log('Inserting DBI log items into FII_CHANGE_LOG');
52: End if;
53: ---------------------------------------------
54: -- Populate FII_CHANGE_LOG with inital set up
55: -- entries if it hasn't been set up already

Line 105: FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' log items into FII_CHANGE_LOG');

101: 7, 'GL_PROD_CHANGE',
102: 8, 'AR_PROD_CHANGE'));
103:
104: If g_debug_flag = 'Y' then
105: FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' log items into FII_CHANGE_LOG');
106: End if;
107:
108: If g_debug_flag = 'Y' then
109: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.INIT_DBI_CHANGE_LOG');

Line 117: FII_UTIL.Write_Log('

113:
114: WHEN OTHERS THEN
115: rollback;
116: g_retcode := -1;
117: FII_UTIL.Write_Log('
118: Error occured in Procedure: INIT_DBI_CHANGE_LOG
119: Message: ' || sqlerrm);
120: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.INIT_DBI_CHANGE_LOG');
121: raise;

Line 155: FII_UTIL.Write_Log('

151:
152: EXCEPTION
153: WHEN OTHERS THEN
154: g_retcode := -1;
155: FII_UTIL.Write_Log('
156: ------------------------
157: Error in Function: GET_COA_NAME
158: Phase: '||g_phase||'
159: Message: '||sqlerrm);

Line 182: FII_UTIL.Write_Log('Getting Account segments column information for chart of account ID: '

178: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.GET_ACCT_SEGMENTS');
179: End if;
180:
181: If g_debug_flag = 'Y' then
182: FII_UTIL.Write_Log('Getting Account segments column information for chart of account ID: '
183: || p_coa_id);
184: End if;
185: ----------------------------------------------------
186: -- Given a chart of account ID, it will get:

Line 249: FII_UTIL.Write_Log('

245: RAISE;
246:
247: WHEN OTHERS THEN
248: rollback;
249: FII_UTIL.Write_Log('
250: ----------------------------
251: Error occured in Procedure: GET_ACCT_SEGMENTS
252: Message: ' || sqlerrm);
253: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.GET_ACCT_SEGMENTS');

Line 279: FII_UTIL.Write_Log('Insert to FII_CCID_SLG_GT by select DISTINCT ');

275: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.POPULATE_SLG_TMP');
276: End if;
277:
278: IF g_debug_flag = 'Y' then
279: FII_UTIL.Write_Log('Insert to FII_CCID_SLG_GT by select DISTINCT ');
280: END IF;
281:
282: insert into FII_CCID_SLG_GT
283: (COA_ID,

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

292: where slg.usage_code = 'DBI'
293: and slg.source_ledger_group_id = sts.source_ledger_group_id;
294:
295: If g_debug_flag = 'Y' then
296: FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows into FII_CCID_SLG_GT');
297: End if;
298:
299: IF g_debug_flag = 'Y' then
300: FII_UTIL.Write_Log('Update FII_CCID_SLG_GT for BAL_SEG_VALUE_ID = -1 (insert all company values)');

Line 300: FII_UTIL.Write_Log('Update FII_CCID_SLG_GT for BAL_SEG_VALUE_ID = -1 (insert all company values)');

296: FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows into FII_CCID_SLG_GT');
297: End if;
298:
299: IF g_debug_flag = 'Y' then
300: FII_UTIL.Write_Log('Update FII_CCID_SLG_GT for BAL_SEG_VALUE_ID = -1 (insert all company values)');
301: END IF;
302:
303: For l_coa_rec IN tmp_coa_list LOOP
304: l_coa_id := l_coa_rec.COA_ID;

Line 330: FII_UTIL.Write_Log(' ');

326: AND SUMMARY_FLAG = ''N''
327: AND TEMPLATE_ID IS NULL ';
328:
329: If g_debug_flag = 'Y' then
330: FII_UTIL.Write_Log(' ');
331: FII_UTIL.Write_Log(l_stmt);
332: End if;
333:
334: EXECUTE IMMEDIATE l_stmt;

Line 331: FII_UTIL.Write_Log(l_stmt);

327: AND TEMPLATE_ID IS NULL ';
328:
329: If g_debug_flag = 'Y' then
330: FII_UTIL.Write_Log(' ');
331: FII_UTIL.Write_Log(l_stmt);
332: End if;
333:
334: EXECUTE IMMEDIATE l_stmt;
335:

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

333:
334: EXECUTE IMMEDIATE l_stmt;
335:
336: If g_debug_flag = 'Y' then
337: FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows into FII_CCID_SLG_GT');
338: End if;
339:
340: END LOOP;
341:

Line 351: FII_UTIL.Write_Log('

347:
348: WHEN OTHERS THEN
349: rollback;
350: g_retcode := -1;
351: FII_UTIL.Write_Log('
352: -----------------------------
353: Error occured in Procedure: POPULATE_SLG_TMP;
354: Message: ' || sqlerrm);
355: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.POPULATE_SLG_TMP');

Line 375: FII_UTIL.Write_Log('Inserting CCIDs in chart of accounts: ' ||

371: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.INSERT_INTO_CCID_DIM');
372: End if;
373:
374: IF g_debug_flag = 'Y' then
375: FII_UTIL.Write_Log('Inserting CCIDs in chart of accounts: ' ||
376: p_company_seg || ' - ' ||
377: p_cc_seg || ' - ' ||
378: p_natural_seg || ' - ' ||
379: p_ud1_seg || ' - ' ||

Line 503: FII_UTIL.Write_Log(l_stmt);

499: END IF;
500:
501:
502: If g_debug_flag = 'Y' then
503: FII_UTIL.Write_Log(l_stmt);
504: FII_UTIL.start_timer;
505: End if;
506:
507: execute immediate l_stmt;

Line 504: FII_UTIL.start_timer;

500:
501:
502: If g_debug_flag = 'Y' then
503: FII_UTIL.Write_Log(l_stmt);
504: FII_UTIL.start_timer;
505: End if;
506:
507: execute immediate l_stmt;
508:

Line 510: FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' records into FII_GL_CCID_DIMENSIONS');

506:
507: execute immediate l_stmt;
508:
509: If g_debug_flag = 'Y' then
510: FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' records into FII_GL_CCID_DIMENSIONS');
511: FII_UTIL.stop_timer;
512: FII_UTIL.print_timer('Duration');
513: FII_UTIL.Write_Log('');
514: End if;

Line 511: FII_UTIL.stop_timer;

507: execute immediate l_stmt;
508:
509: If g_debug_flag = 'Y' then
510: FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' records into FII_GL_CCID_DIMENSIONS');
511: FII_UTIL.stop_timer;
512: FII_UTIL.print_timer('Duration');
513: FII_UTIL.Write_Log('');
514: End if;
515:

Line 512: FII_UTIL.print_timer('Duration');

508:
509: If g_debug_flag = 'Y' then
510: FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' records into FII_GL_CCID_DIMENSIONS');
511: FII_UTIL.stop_timer;
512: FII_UTIL.print_timer('Duration');
513: FII_UTIL.Write_Log('');
514: End if;
515:
516: If g_debug_flag = 'Y' then

Line 513: FII_UTIL.Write_Log('');

509: If g_debug_flag = 'Y' then
510: FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' records into FII_GL_CCID_DIMENSIONS');
511: FII_UTIL.stop_timer;
512: FII_UTIL.print_timer('Duration');
513: FII_UTIL.Write_Log('');
514: End if;
515:
516: If g_debug_flag = 'Y' then
517: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.INSERT_INTO_CCID_DIM');

Line 532: FII_UTIL.Write_Log('

528:
529: WHEN OTHERS THEN
530: rollback;
531: g_retcode := -1;
532: FII_UTIL.Write_Log('
533: -----------------------------
534: Error occured in Procedure: INSERT_INTO_CCID_DIM
535: Message: ' || sqlerrm);
536: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.INSERT_INTO_CCID_DIM');

Line 558: FII_UTIL.Write_Log('Inserting CCIDs in chart of accounts: ' ||

554: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.INSERT_INTO_CCID_DIM_INIT');
555: End if;
556:
557: IF g_debug_flag = 'Y' then
558: FII_UTIL.Write_Log('Inserting CCIDs in chart of accounts: ' ||
559: p_company_seg || ' - ' ||
560: p_cc_seg || ' - ' ||
561: p_natural_seg);
562: END IF;

Line 681: FII_UTIL.Write_Log(l_stmt);

677: AND glcc.' || p_ud2_seg || ' = flx5.FLEX_VALUE';
678: END IF;
679:
680: If g_debug_flag = 'Y' then
681: FII_UTIL.Write_Log(l_stmt);
682: FII_UTIL.start_timer;
683: End if;
684:
685: EXECUTE IMMEDIATE l_stmt;

Line 682: FII_UTIL.start_timer;

678: END IF;
679:
680: If g_debug_flag = 'Y' then
681: FII_UTIL.Write_Log(l_stmt);
682: FII_UTIL.start_timer;
683: End if;
684:
685: EXECUTE IMMEDIATE l_stmt;
686:

Line 688: FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' records into FII_GL_CCID_DIMENSIONS');

684:
685: EXECUTE IMMEDIATE l_stmt;
686:
687: If g_debug_flag = 'Y' then
688: FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' records into FII_GL_CCID_DIMENSIONS');
689: FII_UTIL.stop_timer;
690: FII_UTIL.print_timer('Duration');
691: FII_UTIL.Write_Log('');
692: End if;

Line 689: FII_UTIL.stop_timer;

685: EXECUTE IMMEDIATE l_stmt;
686:
687: If g_debug_flag = 'Y' then
688: FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' records into FII_GL_CCID_DIMENSIONS');
689: FII_UTIL.stop_timer;
690: FII_UTIL.print_timer('Duration');
691: FII_UTIL.Write_Log('');
692: End if;
693:

Line 690: FII_UTIL.print_timer('Duration');

686:
687: If g_debug_flag = 'Y' then
688: FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' records into FII_GL_CCID_DIMENSIONS');
689: FII_UTIL.stop_timer;
690: FII_UTIL.print_timer('Duration');
691: FII_UTIL.Write_Log('');
692: End if;
693:
694: --need this to avoid ORA-12838: cannot read/modify an object after modifying it in parallel

Line 691: FII_UTIL.Write_Log('');

687: If g_debug_flag = 'Y' then
688: FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' records into FII_GL_CCID_DIMENSIONS');
689: FII_UTIL.stop_timer;
690: FII_UTIL.print_timer('Duration');
691: FII_UTIL.Write_Log('');
692: End if;
693:
694: --need this to avoid ORA-12838: cannot read/modify an object after modifying it in parallel
695: COMMIT;

Line 704: FII_UTIL.TRUNCATE_TABLE('FII_GL_CCID_DIMENSIONS', g_fii_schema, g_retcode);

700:
701: EXCEPTION
702:
703: WHEN OTHERS THEN
704: FII_UTIL.TRUNCATE_TABLE('FII_GL_CCID_DIMENSIONS', g_fii_schema, g_retcode);
705: g_retcode := -1;
706: FII_UTIL.Write_Log('
707: -----------------------------
708: Error occured in Procedure: INSERT_INTO_CCID_DIM_INIT

Line 706: FII_UTIL.Write_Log('

702:
703: WHEN OTHERS THEN
704: FII_UTIL.TRUNCATE_TABLE('FII_GL_CCID_DIMENSIONS', g_fii_schema, g_retcode);
705: g_retcode := -1;
706: FII_UTIL.Write_Log('
707: -----------------------------
708: Error occured in Procedure: INSERT_INTO_CCID_DIM_INIT
709: Message: ' || sqlerrm);
710: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.INSERT_INTO_CCID_DIM_INIT');

Line 729: FII_UTIL.Write_Log('');

725: End if;
726:
727: g_phase := 'Updating max CCID processed';
728: If g_debug_flag = 'Y' then
729: FII_UTIL.Write_Log('');
730: FII_UTIL.Write_Log(g_phase);
731: FII_UTIL.start_timer;
732: End if;
733:

Line 730: FII_UTIL.Write_Log(g_phase);

726:
727: g_phase := 'Updating max CCID processed';
728: If g_debug_flag = 'Y' then
729: FII_UTIL.Write_Log('');
730: FII_UTIL.Write_Log(g_phase);
731: FII_UTIL.start_timer;
732: End if;
733:
734: --------------------------------------------------------------

Line 731: FII_UTIL.start_timer;

727: g_phase := 'Updating max CCID processed';
728: If g_debug_flag = 'Y' then
729: FII_UTIL.Write_Log('');
730: FII_UTIL.Write_Log(g_phase);
731: FII_UTIL.start_timer;
732: End if;
733:
734: --------------------------------------------------------------
735: -- Get the real max ccid that was inserted into CCID dimension

Line 768: FII_UTIL.Write_Log('Updated ' || SQL%ROWCOUNT || ' rows in fii_change_log');

764: WHERE log_item = 'MAX_CCID'
765: OR (log_item = 'PROD_CAT_SET_ID' and g_prod_cat_set_id is not null);
766:
767: If g_debug_flag = 'Y' then
768: FII_UTIL.Write_Log('Updated ' || SQL%ROWCOUNT || ' rows in fii_change_log');
769: End if;
770:
771: If g_debug_flag = 'Y' then
772: FII_UTIL.stop_timer;

Line 772: FII_UTIL.stop_timer;

768: FII_UTIL.Write_Log('Updated ' || SQL%ROWCOUNT || ' rows in fii_change_log');
769: End if;
770:
771: If g_debug_flag = 'Y' then
772: FII_UTIL.stop_timer;
773: FII_UTIL.print_timer('Duration');
774: FII_UTIL.Write_Log('');
775: End if;
776:

Line 773: FII_UTIL.print_timer('Duration');

769: End if;
770:
771: If g_debug_flag = 'Y' then
772: FII_UTIL.stop_timer;
773: FII_UTIL.print_timer('Duration');
774: FII_UTIL.Write_Log('');
775: End if;
776:
777: If g_debug_flag = 'Y' then

Line 774: FII_UTIL.Write_Log('');

770:
771: If g_debug_flag = 'Y' then
772: FII_UTIL.stop_timer;
773: FII_UTIL.print_timer('Duration');
774: FII_UTIL.Write_Log('');
775: End if;
776:
777: If g_debug_flag = 'Y' then
778: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.RECORD_MAX_PROCESSED_CCID');

Line 785: FII_UTIL.Write_Log('

781: EXCEPTION
782: WHEN OTHERS THEN
783: rollback;
784: g_retcode := -1;
785: FII_UTIL.Write_Log('
786: -------------------------------------------
787: Error occured in Procedure: RECORD_MAX_PROCESSED_CCID
788: Phase: ' || g_phase || '
789: Message: ' || sqlerrm);

Line 807: FII_UTIL.Write_Log(g_phase);

803: End if;
804:
805: g_phase := 'Identifying Max CCID processed';
806: If g_debug_flag = 'Y' then
807: FII_UTIL.Write_Log(g_phase);
808: FII_UTIL.Write_Log('');
809: End if;
810:
811: -- Bug 4152799.

Line 808: FII_UTIL.Write_Log('');

804:
805: g_phase := 'Identifying Max CCID processed';
806: If g_debug_flag = 'Y' then
807: FII_UTIL.Write_Log(g_phase);
808: FII_UTIL.Write_Log('');
809: End if;
810:
811: -- Bug 4152799.
812: g_log_item := 'MAX_CCID';

Line 820: FII_UTIL.Write_Log(g_phase);

816: WHERE log_item = g_log_item;
817:
818: g_phase := 'Identifying current Max CCID in GL';
819: If g_debug_flag = 'Y' then
820: FII_UTIL.Write_Log(g_phase);
821: FII_UTIL.Write_Log('');
822: End if;
823:
824: SELECT max(code_combination_id) INTO g_new_max_ccid

Line 821: FII_UTIL.Write_Log('');

817:
818: g_phase := 'Identifying current Max CCID in GL';
819: If g_debug_flag = 'Y' then
820: FII_UTIL.Write_Log(g_phase);
821: FII_UTIL.Write_Log('');
822: End if;
823:
824: SELECT max(code_combination_id) INTO g_new_max_ccid
825: FROM gl_code_combinations;

Line 841: FII_UTIL.Write_Log('

837: EXCEPTION
838: WHEN OTHERS THEN
839: rollback;
840: g_retcode := -1;
841: FII_UTIL.Write_Log('
842: -------------------------------------------
843: Error occured in Function: NEW_CCID_IN_GL
844: Phase: ' || g_phase || '
845: Message: ' || sqlerrm);

Line 866: FII_UTIL.Write_Log(g_phase);

862: -- Updating CCID Dimension for CCIDs with NULL CCC ORG ID
863: --------------------------------------------------------------
864: g_phase := 'Updating CCID Dimension for CCIDs with NULL CCC ORG ID';
865: If g_debug_flag = 'Y' then
866: FII_UTIL.Write_Log(g_phase);
867: FII_UTIL.start_timer;
868: End if;
869:
870: UPDATE fii_gl_ccid_dimensions dim

Line 867: FII_UTIL.start_timer;

863: --------------------------------------------------------------
864: g_phase := 'Updating CCID Dimension for CCIDs with NULL CCC ORG ID';
865: If g_debug_flag = 'Y' then
866: FII_UTIL.Write_Log(g_phase);
867: FII_UTIL.start_timer;
868: End if;
869:
870: UPDATE fii_gl_ccid_dimensions dim
871: SET dim.company_cost_center_org_id =

Line 878: FII_UTIL.Write_Log('Assigned CCC ORG ID to ' || SQL%ROWCOUNT

874: WHERE gcc.code_combination_id = dim.code_combination_id)
875: WHERE dim.company_cost_center_org_id = -1;
876:
877: IF g_debug_flag = 'Y' then
878: FII_UTIL.Write_Log('Assigned CCC ORG ID to ' || SQL%ROWCOUNT
879: || ' CCIDs in FII_GL_CCID_DIMENSIONS');
880: FII_UTIL.stop_timer;
881: FII_UTIL.print_timer('Duration');
882: END IF;

Line 880: FII_UTIL.stop_timer;

876:
877: IF g_debug_flag = 'Y' then
878: FII_UTIL.Write_Log('Assigned CCC ORG ID to ' || SQL%ROWCOUNT
879: || ' CCIDs in FII_GL_CCID_DIMENSIONS');
880: FII_UTIL.stop_timer;
881: FII_UTIL.print_timer('Duration');
882: END IF;
883:
884: If g_debug_flag = 'Y' then

Line 881: FII_UTIL.print_timer('Duration');

877: IF g_debug_flag = 'Y' then
878: FII_UTIL.Write_Log('Assigned CCC ORG ID to ' || SQL%ROWCOUNT
879: || ' CCIDs in FII_GL_CCID_DIMENSIONS');
880: FII_UTIL.stop_timer;
881: FII_UTIL.print_timer('Duration');
882: END IF;
883:
884: If g_debug_flag = 'Y' then
885: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.PROCESS_NULL_CCC_ORG_ID');

Line 893: FII_UTIL.Write_Log('

889:
890: WHEN OTHERS THEN
891: rollback;
892: g_retcode := -1;
893: FII_UTIL.Write_Log('
894: -----------------------------
895: Error occured in Procedure: PROCESS_NULL_CCC_ORG_ID
896: Phase: ' || g_phase || '
897: Message: ' || sqlerrm);

Line 922: FII_UTIL.Write_Log(g_phase);

918: End if;
919:
920: g_phase := 'Identifying Max CCID processed';
921: If g_debug_flag = 'Y' then
922: FII_UTIL.Write_Log(g_phase);
923: FII_UTIL.Write_Log('');
924: End if;
925:
926: -- Bug 4152799.

Line 923: FII_UTIL.Write_Log('');

919:
920: g_phase := 'Identifying Max CCID processed';
921: If g_debug_flag = 'Y' then
922: FII_UTIL.Write_Log(g_phase);
923: FII_UTIL.Write_Log('');
924: End if;
925:
926: -- Bug 4152799.
927: g_log_item := 'MAX_CCID';

Line 935: FII_UTIL.Write_Log(g_phase);

931: WHERE log_item = g_log_item;
932:
933: g_phase := 'Identifying current Max CCID in GL';
934: If g_debug_flag = 'Y' then
935: FII_UTIL.Write_Log(g_phase);
936: FII_UTIL.Write_Log('');
937: End if;
938:
939: ------------------------------------------------------

Line 936: FII_UTIL.Write_Log('');

932:
933: g_phase := 'Identifying current Max CCID in GL';
934: If g_debug_flag = 'Y' then
935: FII_UTIL.Write_Log(g_phase);
936: FII_UTIL.Write_Log('');
937: End if;
938:
939: ------------------------------------------------------
940: -- g_mode = 'L' if program is run in Initial Load mode

Line 948: FII_UTIL.TRUNCATE_TABLE('FII_GL_CCID_DIMENSIONS',g_fii_schema,g_retcode);

944: --Clean up the CCID dimension table
945:
946: g_phase := 'TRUNCATE FII_GL_CCID_DIMENSIONS';
947:
948: FII_UTIL.TRUNCATE_TABLE('FII_GL_CCID_DIMENSIONS',g_fii_schema,g_retcode);
949:
950: --------------------------------------------------------------------------
951: --Bug 3205051: we should not force re-summarization for CCID initial load
952: -- This is wrong: Update FII_DIM_MAPPING_RULES to force

Line 976: FII_UTIL.Write_Log('Updated ' || SQL%ROWCOUNT || ' rows in fii_change_log');

972: last_updated_by = g_fii_user_id
973: WHERE log_item = g_log_item;
974:
975: If g_debug_flag = 'Y' then
976: FII_UTIL.Write_Log('Updated ' || SQL%ROWCOUNT || ' rows in fii_change_log');
977: End if;
978:
979: g_max_ccid := 0;
980:

Line 992: FII_UTIL.Write_Log(g_phase);

988: IF (g_new_max_ccid > g_max_ccid) THEN
989:
990: g_phase := 'Insert new CCIDs into FII_GL_CCID_DIMENSIONS table';
991: If g_debug_flag = 'Y' then
992: FII_UTIL.Write_Log(g_phase);
993: FII_UTIL.Write_Log('');
994: End if;
995:
996: ------------------------------------------------------------------

Line 993: FII_UTIL.Write_Log('');

989:
990: g_phase := 'Insert new CCIDs into FII_GL_CCID_DIMENSIONS table';
991: If g_debug_flag = 'Y' then
992: FII_UTIL.Write_Log(g_phase);
993: FII_UTIL.Write_Log('');
994: End if;
995:
996: ------------------------------------------------------------------
997: -- Using this SQL to get company segment, cost center segment

Line 1006: FII_UTIL.TRUNCATE_TABLE('FII_ACCT_SEG_GT', g_fii_schema, g_retcode);

1002: -- these two dimensions are also populated. Also to avoid join
1003: -- with FII_DIM_MAPPING_RULES the value set id is also populated.
1004: ------------------------------------------------------------------
1005:
1006: FII_UTIL.TRUNCATE_TABLE('FII_ACCT_SEG_GT', g_fii_schema, g_retcode);
1007:
1008: g_phase := 'INSERT INTO FII_ACCT_SEG_GT';
1009:
1010: INSERT INTO FII_ACCT_SEG_GT(

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

1039: AND fsav3.segment_attribute_type = 'GL_ACCOUNT'
1040: AND fsav3.attribute_value = 'Y';
1041:
1042: If g_debug_flag = 'Y' then
1043: FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows into FII_ACCT_SEG_GT');
1044: End if;
1045:
1046: --------------------------------------------------------------------------------
1047: -- For supporting UD1/UD2 dimensions as well segment names for

Line 1063: FII_UTIL.Write_Log('Updated ' || SQL%ROWCOUNT || ' rows into FII_ACCT_SEG_GT');

1059: and dimension_short_name = g_dimension_name);
1060: END IF;
1061:
1062: If g_debug_flag = 'Y' then
1063: FII_UTIL.Write_Log('Updated ' || SQL%ROWCOUNT || ' rows into FII_ACCT_SEG_GT');
1064: End if;
1065:
1066: IF(G_UD2_ENABLED = 'Y' ) THEN
1067: g_dimension_name := 'FII_USER_DEFINED_2';

Line 1076: FII_UTIL.Write_Log('Updated ' || SQL%ROWCOUNT || ' rows into FII_ACCT_SEG_GT');

1072: and dimension_short_name = g_dimension_name);
1073: END IF;
1074:
1075: If g_debug_flag = 'Y' then
1076: FII_UTIL.Write_Log('Updated ' || SQL%ROWCOUNT || ' rows into FII_ACCT_SEG_GT');
1077: End if;
1078:
1079: ----------------------------------------------------
1080: -- Looping through each group of COA_IDs in the

Line 1118: FII_UTIL.Write_Log('No new CCID in GL');

1114: RECORD_MAX_PROCESSED_CCID;
1115:
1116: ELSE
1117: If g_debug_flag = 'Y' then
1118: FII_UTIL.Write_Log('No new CCID in GL');
1119: End if;
1120: END IF;
1121:
1122: ------------------------------------------------------

Line 1154: FII_UTIL.TRUNCATE_TABLE('FII_GL_CCID_DIMENSIONS',g_fii_schema,g_retcode);

1150: if g_mode = 'L' then
1151:
1152: --program is run in Initial Load mode, truncate the table and reset LOG
1153:
1154: FII_UTIL.TRUNCATE_TABLE('FII_GL_CCID_DIMENSIONS',g_fii_schema,g_retcode);
1155:
1156: -- Bug 4152799.
1157: g_log_item := 'MAX_CCID';
1158:

Line 1172: FII_UTIL.Write_Log('

1168: end if;
1169:
1170: rollback;
1171: g_retcode := -1;
1172: FII_UTIL.Write_Log('
1173: -----------------------------
1174: Error occured in Procedure: INSERT_NEW_CCID
1175: Phase: ' || g_phase || '
1176: Message: ' || sqlerrm);

Line 1196: FII_UTIL.Write_Log(g_phase);

1192: End if;
1193:
1194: g_phase := 'Updating Product assignment using Segment';
1195: If g_debug_flag = 'Y' then
1196: FII_UTIL.Write_Log(g_phase);
1197: End if;
1198: -----------------------------------------------------
1199: -- Product segment of the CCID records the product
1200: -- reporting classification

Line 1221: FII_UTIL.Write_Log('');

1217: AND flx1.flex_value_set_id = seg1.flex_value_set_id)
1218: WHERE glcc.chart_of_accounts_id = ' || p_coa_id;
1219:
1220: If g_debug_flag = 'Y' then
1221: FII_UTIL.Write_Log('');
1222: FII_UTIL.Write_Log(l_stmt);
1223: FII_UTIL.start_timer;
1224: End if;
1225:

Line 1222: FII_UTIL.Write_Log(l_stmt);

1218: WHERE glcc.chart_of_accounts_id = ' || p_coa_id;
1219:
1220: If g_debug_flag = 'Y' then
1221: FII_UTIL.Write_Log('');
1222: FII_UTIL.Write_Log(l_stmt);
1223: FII_UTIL.start_timer;
1224: End if;
1225:
1226: EXECUTE IMMEDIATE l_stmt;

Line 1223: FII_UTIL.start_timer;

1219:
1220: If g_debug_flag = 'Y' then
1221: FII_UTIL.Write_Log('');
1222: FII_UTIL.Write_Log(l_stmt);
1223: FII_UTIL.start_timer;
1224: End if;
1225:
1226: EXECUTE IMMEDIATE l_stmt;
1227:

Line 1229: FII_UTIL.Write_Log('Updated Product Assignments for ' || SQL%ROWCOUNT

1225:
1226: EXECUTE IMMEDIATE l_stmt;
1227:
1228: If g_debug_flag = 'Y' then
1229: FII_UTIL.Write_Log('Updated Product Assignments for ' || SQL%ROWCOUNT
1230: || ' records in FII_GL_CCID_DIMENSIONS');
1231: FII_UTIL.stop_timer;
1232: FII_UTIL.print_timer('Duration');
1233: End if;

Line 1231: FII_UTIL.stop_timer;

1227:
1228: If g_debug_flag = 'Y' then
1229: FII_UTIL.Write_Log('Updated Product Assignments for ' || SQL%ROWCOUNT
1230: || ' records in FII_GL_CCID_DIMENSIONS');
1231: FII_UTIL.stop_timer;
1232: FII_UTIL.print_timer('Duration');
1233: End if;
1234:
1235: If g_debug_flag = 'Y' then

Line 1232: FII_UTIL.print_timer('Duration');

1228: If g_debug_flag = 'Y' then
1229: FII_UTIL.Write_Log('Updated Product Assignments for ' || SQL%ROWCOUNT
1230: || ' records in FII_GL_CCID_DIMENSIONS');
1231: FII_UTIL.stop_timer;
1232: FII_UTIL.print_timer('Duration');
1233: End if;
1234:
1235: If g_debug_flag = 'Y' then
1236: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.USE_SEG');

Line 1244: FII_UTIL.Write_Log('

1240:
1241: WHEN OTHERS THEN
1242: rollback;
1243: g_retcode := -1;
1244: FII_UTIL.Write_Log('
1245: -------------------------------------------
1246: Error occured in Procedure: USE_SEG
1247: Phase: ' || g_phase || ' Message: ' || sqlerrm);
1248: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.USE_SEG');

Line 1285: FII_UTIL.Write_Log(g_phase);

1281: End if;
1282:
1283: g_phase := 'Populating FII_GL_CCID_PROD_INT';
1284: If g_debug_flag = 'Y' then
1285: FII_UTIL.Write_Log(g_phase);
1286: End if;
1287:
1288: ---------------------------------------------------
1289: -- Product mapping information is actually stored

Line 1378: FII_UTIL.Write_Log(l_stmt);

1374: AND NVL(glcc.segment30,1) <= NVL(fipa.segment30_high, NVL(glcc.segment30,1))';
1375:
1376:
1377: If g_debug_flag = 'Y' then
1378: FII_UTIL.Write_Log(l_stmt);
1379: FII_UTIL.start_timer;
1380: End if;
1381:
1382: EXECUTE IMMEDIATE l_stmt using p_coa_id, G_PROD_CAT_SET_ID;

Line 1379: FII_UTIL.start_timer;

1375:
1376:
1377: If g_debug_flag = 'Y' then
1378: FII_UTIL.Write_Log(l_stmt);
1379: FII_UTIL.start_timer;
1380: End if;
1381:
1382: EXECUTE IMMEDIATE l_stmt using p_coa_id, G_PROD_CAT_SET_ID;
1383:

Line 1385: FII_UTIL.Write_Log('Inserted Product Assignments for ' || SQL%ROWCOUNT

1381:
1382: EXECUTE IMMEDIATE l_stmt using p_coa_id, G_PROD_CAT_SET_ID;
1383:
1384: If g_debug_flag = 'Y' then
1385: FII_UTIL.Write_Log('Inserted Product Assignments for ' || SQL%ROWCOUNT
1386: || ' records in FII_GL_CCID_PROD_INT');
1387: FII_UTIL.stop_timer;
1388: FII_UTIL.print_timer('Duration');
1389: End if;

Line 1387: FII_UTIL.stop_timer;

1383:
1384: If g_debug_flag = 'Y' then
1385: FII_UTIL.Write_Log('Inserted Product Assignments for ' || SQL%ROWCOUNT
1386: || ' records in FII_GL_CCID_PROD_INT');
1387: FII_UTIL.stop_timer;
1388: FII_UTIL.print_timer('Duration');
1389: End if;
1390:
1391: ------------------------------------------------------------------

Line 1388: FII_UTIL.print_timer('Duration');

1384: If g_debug_flag = 'Y' then
1385: FII_UTIL.Write_Log('Inserted Product Assignments for ' || SQL%ROWCOUNT
1386: || ' records in FII_GL_CCID_PROD_INT');
1387: FII_UTIL.stop_timer;
1388: FII_UTIL.print_timer('Duration');
1389: End if;
1390:
1391: ------------------------------------------------------------------
1392: -- Checking if single CCID assigned to multiple product categories

Line 1396: FII_UTIL.Write_Log(g_phase);

1392: -- Checking if single CCID assigned to multiple product categories
1393: ------------------------------------------------------------------
1394: g_phase := 'Checking if single CCID assigned to multiple product categories';
1395: If g_debug_flag = 'Y' then
1396: FII_UTIL.Write_Log(g_phase);
1397: End if;
1398:
1399:
1400: For rec_dup_prod_asgn IN c_dup_prod_asgn Loop

Line 1440: FII_UTIL.Write_Output (l_ccid || ' ' || l_cat_name);

1436: --Print out the list of ccid with multiple product categories
1437: -------------------------------------------------------------
1438: For rec_dup_prod_cat IN c_dup_prod_cat (l_ccid) Loop
1439: l_cat_name := rec_dup_prod_cat.cat_name;
1440: FII_UTIL.Write_Output (l_ccid || ' ' || l_cat_name);
1441: End Loop;
1442:
1443: End Loop;
1444:

Line 1455: FII_UTIL.Write_Log(g_phase);

1451: -- Updating FII_GL_CCID_DIMENSIONS with product assignments information
1452: -------------------------------------------------------------
1453: g_phase := 'Updating FII_GL_CCID_DIMENSIONS to fix product assignments';
1454: If g_debug_flag = 'Y' then
1455: FII_UTIL.Write_Log(g_phase);
1456: FII_UTIL.start_timer;
1457: End if;
1458:
1459: UPDATE fii_gl_ccid_dimensions glcc

Line 1456: FII_UTIL.start_timer;

1452: -------------------------------------------------------------
1453: g_phase := 'Updating FII_GL_CCID_DIMENSIONS to fix product assignments';
1454: If g_debug_flag = 'Y' then
1455: FII_UTIL.Write_Log(g_phase);
1456: FII_UTIL.start_timer;
1457: End if;
1458:
1459: UPDATE fii_gl_ccid_dimensions glcc
1460: SET glcc.PROD_CATEGORY_ID =

Line 1468: FII_UTIL.Write_Log('Updated Product Assignments for ' || SQL%ROWCOUNT

1464: AND glcc.chart_of_accounts_id = p_coa_id)
1465: WHERE glcc.chart_of_accounts_id = p_coa_id;
1466:
1467: If g_debug_flag = 'Y' then
1468: FII_UTIL.Write_Log('Updated Product Assignments for ' || SQL%ROWCOUNT
1469: || ' records in FII_GL_CCID_DIMENSIONS');
1470: FII_UTIL.stop_timer;
1471: FII_UTIL.print_timer('Duration');
1472: End if;

Line 1470: FII_UTIL.stop_timer;

1466:
1467: If g_debug_flag = 'Y' then
1468: FII_UTIL.Write_Log('Updated Product Assignments for ' || SQL%ROWCOUNT
1469: || ' records in FII_GL_CCID_DIMENSIONS');
1470: FII_UTIL.stop_timer;
1471: FII_UTIL.print_timer('Duration');
1472: End if;
1473:
1474: If g_debug_flag = 'Y' then

Line 1471: FII_UTIL.print_timer('Duration');

1467: If g_debug_flag = 'Y' then
1468: FII_UTIL.Write_Log('Updated Product Assignments for ' || SQL%ROWCOUNT
1469: || ' records in FII_GL_CCID_DIMENSIONS');
1470: FII_UTIL.stop_timer;
1471: FII_UTIL.print_timer('Duration');
1472: End if;
1473:
1474: If g_debug_flag = 'Y' then
1475: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.USE_RANGES');

Line 1489: FII_UTIL.Write_Log('

1485:
1486: WHEN OTHERS THEN
1487: rollback;
1488: g_retcode := -1;
1489: FII_UTIL.Write_Log('
1490: --------------------------------------
1491: Error occured in Procedure: USE_RANGES
1492: Phase: ' || g_phase || '
1493: Message: ' || sqlerrm);

Line 1549: FII_UTIL.Write_Log('

1545:
1546: EXCEPTION
1547: WHEN OTHERS THEN
1548: g_retcode := -1;
1549: FII_UTIL.Write_Log('
1550: ------------------------
1551: Error in Function: INVALID_PROD_CODE_EXIST
1552: Phase: '||g_phase||'
1553: Message: '||sqlerrm);

Line 1613: FII_UTIL.Write_Log(g_phase);

1609: End if;
1610:
1611: g_phase := 'Maintain Product Assignment for CCIDs';
1612: If g_debug_flag = 'Y' then
1613: FII_UTIL.Write_Log(g_phase);
1614: End if;
1615:
1616: -- Bug 4152799
1617: g_dimension_name := 'ENI_ITEM_VBH_CAT';

Line 1642: FII_UTIL.Write_Log('Maintaining Product Assignment for Chart of Accounts ID: '

1638: l_prod_seg := coa_rec.prod_seg;
1639: l_assignment_code := coa_rec.assignment_type_code;
1640: l_current_coa_id := coa_rec.coa_id;
1641: If g_debug_flag = 'Y' then
1642: FII_UTIL.Write_Log('Maintaining Product Assignment for Chart of Accounts ID: '
1643: || coa_rec.coa_id);
1644: End if;
1645:
1646: ---------------------------------------------------

Line 1690: FII_UTIL.Write_Log('Error in MAINTAIN_PROD_ASSGN: null g_mtc_column_name');

1686: -- FII_PRODUCT_ASSIGNMENTS
1687: ------------------------------------------------------
1688: IF (l_assignment_code = 'S') THEN
1689: if g_mtc_column_name is NULL then
1690: FII_UTIL.Write_Log('Error in MAINTAIN_PROD_ASSGN: null g_mtc_column_name');
1691: raise G_NO_PROD_SEG_DEFINED;
1692: end if;
1693:
1694: USE_SEG (coa_rec.coa_id, coa_rec.prod_seg);

Line 1737: FII_UTIL.Write_Log(g_phase);

1733: IF (l_resummarization_needed = 'TRUE') THEN
1734:
1735: g_phase:= 'Updating FII_CHANGE_LOG to indicate resummarization is needed';
1736: If g_debug_flag = 'Y' then
1737: FII_UTIL.Write_Log(g_phase);
1738: End if;
1739:
1740: --Bug 3234044: should not require AP Resummarization --> remove AP_RESUMMARIZE
1741: --Bug 3401590: use 2 new log items for GL, AR reload (initial)

Line 1750: FII_UTIL.Write_Log('Updated ' || SQL%ROWCOUNT || ' rows in FII_CHANGE_LOG');

1746: last_updated_by = g_fii_user_id
1747: WHERE log_item IN ('AR_PROD_CHANGE', 'GL_PROD_CHANGE');
1748:
1749: If g_debug_flag = 'Y' then
1750: FII_UTIL.Write_Log('Updated ' || SQL%ROWCOUNT || ' rows in FII_CHANGE_LOG');
1751: End if;
1752:
1753: g_phase:= 'Updating FII_DIM_MAPPING_RULES to indicate product assignments are now current';
1754: If g_debug_flag = 'Y' then

Line 1755: FII_UTIL.Write_Log(g_phase);

1751: End if;
1752:
1753: g_phase:= 'Updating FII_DIM_MAPPING_RULES to indicate product assignments are now current';
1754: If g_debug_flag = 'Y' then
1755: FII_UTIL.Write_Log(g_phase);
1756: End if;
1757:
1758: -- Bug 4152799
1759: g_dimension_name := 'ENI_ITEM_VBH_CAT';

Line 1770: FII_UTIL.Write_Log ('Updated ' || SQL%ROWCOUNT || ' records in FII_DIM_MAPPING_RULES');

1766: WHERE dimension_short_name = g_dimension_name
1767: AND status_code = 'O';
1768:
1769: If g_debug_flag = 'Y' then
1770: FII_UTIL.Write_Log ('Updated ' || SQL%ROWCOUNT || ' records in FII_DIM_MAPPING_RULES');
1771: End if;
1772: END IF;
1773:
1774: If g_debug_flag = 'Y' then

Line 1783: FII_UTIL.Write_Log('

1779:
1780: WHEN G_NO_PROD_SEG_DEFINED THEN
1781: g_retcode := -1;
1782: ROLLBACK;
1783: FII_UTIL.Write_Log('
1784: ---------------------------------------
1785: Error occured in Procedure: MAINTAIN_PROD_ASSGN -> NO_PROD_SEG_DEFINED
1786: Phase: '||g_phase||'
1787: Message: '||sqlerrm);

Line 1794: FII_UTIL.Write_Log('

1790:
1791: WHEN G_INVALID_PROD_CODE_EXIST THEN
1792: g_retcode := -1;
1793: ROLLBACK;
1794: FII_UTIL.Write_Log('
1795: ---------------------------------------
1796: Error occured in Procedure: MAINTAIN_PROD_ASSGN -> INVALID_PROD_CODE_EXIST
1797: Phase: '||g_phase||'
1798: Message: '||sqlerrm);

Line 1805: FII_UTIL.Write_Log('

1801:
1802: WHEN OTHERS THEN
1803: g_retcode := -1;
1804: rollback;
1805: FII_UTIL.Write_Log('
1806: ---------------------------------------
1807: Error occured in Procedure: MAINTAIN_PROD_ASSGN
1808: Phase: '||g_phase||'
1809: Message: '||sqlerrm);

Line 1839: FII_UTIL.Write_Log(g_phase);

1835: -- Do set up for log file
1836: ----------------------------------------------
1837: g_phase := 'Set up for log file';
1838: If g_debug_flag = 'Y' then
1839: FII_UTIL.Write_Log(g_phase);
1840: End if;
1841:
1842: l_dir := fnd_profile.value('BIS_DEBUG_LOG_DIRECTORY');
1843: ------------------------------------------------------

Line 1848: l_dir := FII_UTIL.get_utl_file_dir ;

1844: -- Set default directory in case if the profile option
1845: -- BIS_DEBUG_LOG_DIRECTORY is not set up
1846: ------------------------------------------------------
1847: if l_dir is NULL then
1848: l_dir := FII_UTIL.get_utl_file_dir ;
1849: end if;
1850:
1851: ----------------------------------------------------------------
1852: -- FII_UTIL.initialize will get profile options FII_DEBUG_MODE

Line 1852: -- FII_UTIL.initialize will get profile options FII_DEBUG_MODE

1848: l_dir := FII_UTIL.get_utl_file_dir ;
1849: end if;
1850:
1851: ----------------------------------------------------------------
1852: -- FII_UTIL.initialize will get profile options FII_DEBUG_MODE
1853: -- and BIS_DEBUG_LOG_DIRECTORY and set up the directory where
1854: -- the log files and output files are written to
1855: ----------------------------------------------------------------
1856: FII_UTIL.initialize('FII_GL_CCID.log','FII_GL_CCID.out',l_dir, 'FII_GL_CCID_C');

Line 1856: FII_UTIL.initialize('FII_GL_CCID.log','FII_GL_CCID.out',l_dir, 'FII_GL_CCID_C');

1852: -- FII_UTIL.initialize will get profile options FII_DEBUG_MODE
1853: -- and BIS_DEBUG_LOG_DIRECTORY and set up the directory where
1854: -- the log files and output files are written to
1855: ----------------------------------------------------------------
1856: FII_UTIL.initialize('FII_GL_CCID.log','FII_GL_CCID.out',l_dir, 'FII_GL_CCID_C');
1857:
1858: -- --------------------------------------------------------
1859: -- Check source ledger setup for DBI
1860: -- --------------------------------------------------------

Line 1863: FII_UTIL.write_log(g_phase);

1859: -- Check source ledger setup for DBI
1860: -- --------------------------------------------------------
1861: g_phase := 'Check source ledger setup for DBI';
1862: if g_debug_flag = 'Y' then
1863: FII_UTIL.write_log(g_phase);
1864: end if;
1865:
1866: l_check := FII_EXCEPTION_CHECK_PKG.check_slg_setup;
1867:

Line 1877: FII_UTIL.Write_Log(g_phase);

1873: -- Find out the user ID, login ID, and current language
1874: -- --------------------------------------------------------
1875: g_phase := 'Find User ID, Login ID, and Current Language';
1876: If g_debug_flag = 'Y' then
1877: FII_UTIL.Write_Log(g_phase);
1878: End if;
1879:
1880: g_fii_user_id := FND_GLOBAL.User_Id;
1881: g_fii_login_id := FND_GLOBAL.Login_Id;

Line 1892: FII_UTIL.Write_Log(g_phase);

1888: -- Find the schema owner
1889: -- --------------------------------------------------------
1890: g_phase := 'Find schema owner for FII';
1891: If g_debug_flag = 'Y' then
1892: FII_UTIL.Write_Log(g_phase);
1893: End if;
1894:
1895: IF(FND_INSTALLATION.GET_APP_INFO('FII', l_status, l_industry, g_fii_schema))
1896: THEN NULL;

Line 1909: FII_UTIL.Write_Log(g_phase);

1905:
1906: g_phase := 'Checking if product Category is enabled or not';
1907:
1908: If g_debug_flag = 'Y' then
1909: FII_UTIL.Write_Log(g_phase);
1910: End if;
1911: BEGIN
1912: -- Bug 4152799.
1913: g_dimension_name := 'ENI_ITEM_VBH_CAT';

Line 1921: FII_UTIL.Write_Log ('Set up for product category not done');

1917:
1918: EXCEPTION
1919: WHEN NO_DATA_FOUND THEN
1920: -- If the Product Category set up is not done then set the flag to 'N'
1921: FII_UTIL.Write_Log ('Set up for product category not done');
1922: G_PROD_CAT_ENABLED_FLAG := 'N';
1923: END;
1924:
1925: If g_debug_flag = 'Y' then

Line 1926: FII_UTIL.Write_Log('G_PROD_CAT_ENABLED_FLAG = '||G_PROD_CAT_ENABLED_FLAG);

1922: G_PROD_CAT_ENABLED_FLAG := 'N';
1923: END;
1924:
1925: If g_debug_flag = 'Y' then
1926: FII_UTIL.Write_Log('G_PROD_CAT_ENABLED_FLAG = '||G_PROD_CAT_ENABLED_FLAG);
1927: End if;
1928:
1929: IF G_PROD_CAT_ENABLED_FLAG = 'Y' THEN
1930: ------------------------------------------------------------

Line 1937: FII_UTIL.Write_Log(g_phase);

1933: -- get the structure ID associated with the category set
1934: ------------------------------------------------------------
1935: g_phase := 'Getting category set ID associated with product reporting classification structure';
1936: If g_debug_flag = 'Y' then
1937: FII_UTIL.Write_Log(g_phase);
1938: End if;
1939:
1940: begin
1941: G_PROD_CAT_SET_ID := ENI_DENORM_HRCHY.get_category_set_id;

Line 1945: FII_UTIL.Write_Log('Error occured while: '|| g_phase);

1941: G_PROD_CAT_SET_ID := ENI_DENORM_HRCHY.get_category_set_id;
1942: exception
1943: when others then
1944: If g_debug_flag = 'Y' then
1945: FII_UTIL.Write_Log('Error occured while: '|| g_phase);
1946: FII_UTIL.Write_Log('The product category dimension is not set up properly.');
1947: End if;
1948: end;
1949:

Line 1946: FII_UTIL.Write_Log('The product category dimension is not set up properly.');

1942: exception
1943: when others then
1944: If g_debug_flag = 'Y' then
1945: FII_UTIL.Write_Log('Error occured while: '|| g_phase);
1946: FII_UTIL.Write_Log('The product category dimension is not set up properly.');
1947: End if;
1948: end;
1949:
1950: g_phase := 'Getting structure ID associated with the category set';

Line 1952: FII_UTIL.Write_Log(g_phase);

1948: end;
1949:
1950: g_phase := 'Getting structure ID associated with the category set';
1951: If g_debug_flag = 'Y' then
1952: FII_UTIL.Write_Log(g_phase);
1953: End if;
1954:
1955: begin
1956: SELECT structure_id INTO g_mtc_structure_id

Line 1962: FII_UTIL.Write_Log('Error occured while: '|| g_phase);

1958: WHERE category_set_id = g_prod_cat_set_id;
1959: exception
1960: when others then
1961: If g_debug_flag = 'Y' then
1962: FII_UTIL.Write_Log('Error occured while: '|| g_phase);
1963: FII_UTIL.Write_Log('The product category dimension is not set up properly.');
1964: End if;
1965: end;
1966:

Line 1963: FII_UTIL.Write_Log('The product category dimension is not set up properly.');

1959: exception
1960: when others then
1961: If g_debug_flag = 'Y' then
1962: FII_UTIL.Write_Log('Error occured while: '|| g_phase);
1963: FII_UTIL.Write_Log('The product category dimension is not set up properly.');
1964: End if;
1965: end;
1966:
1967: g_phase := 'Getting value set ID associated with the product structure';

Line 1969: FII_UTIL.Write_Log(g_phase);

1965: end;
1966:
1967: g_phase := 'Getting value set ID associated with the product structure';
1968: If g_debug_flag = 'Y' then
1969: FII_UTIL.Write_Log(g_phase);
1970: End if;
1971:
1972: begin
1973: g_mtc_value_set_id := ENI_VALUESET_CATEGORY.GET_FLEX_VALUE_SET_ID

Line 1980: FII_UTIL.Write_Log('Error occured while: '|| g_phase);

1976: P_VBH_CATSET_ID => g_prod_cat_set_id);
1977: exception
1978: when others then
1979: If g_debug_flag = 'Y' then
1980: FII_UTIL.Write_Log('Error occured while: '|| g_phase);
1981: FII_UTIL.Write_Log('The product category dimension is not set up properly.');
1982: End if;
1983: end;
1984:

Line 1981: FII_UTIL.Write_Log('The product category dimension is not set up properly.');

1977: exception
1978: when others then
1979: If g_debug_flag = 'Y' then
1980: FII_UTIL.Write_Log('Error occured while: '|| g_phase);
1981: FII_UTIL.Write_Log('The product category dimension is not set up properly.');
1982: End if;
1983: end;
1984:
1985:

Line 1988: FII_UTIL.Write_Log(g_phase);

1984:
1985:
1986: g_phase := 'Getting segment name in MTL_CATEGORIES associated with product structure';
1987: If g_debug_flag = 'Y' then
1988: FII_UTIL.Write_Log(g_phase);
1989: End if;
1990:
1991: begin
1992: --ENI just reports on the first enabled segment that is

Line 2007: FII_UTIL.Write_Log ('g_mtc_column_name is NULL');

2003: order by to_number(substr(application_column_name, 8, 2)) ASC)
2004: WHERE rownum = 1;
2005: exception
2006: when others then
2007: FII_UTIL.Write_Log ('g_mtc_column_name is NULL');
2008: g_mtc_column_name := NULL;
2009: end;
2010:
2011: ----------------------------------------------------------------------

Line 2020: FII_UTIL.Write_Log(g_phase);

2016: --or revert the Product Catalog to the old one.
2017: ----------------------------------------------------------------------
2018: g_phase := 'Checking product category for incremental update...';
2019: If g_debug_flag = 'Y' then
2020: FII_UTIL.Write_Log(g_phase);
2021: End if;
2022:
2023: If g_mode <> 'L' then
2024: begin

Line 2054: FII_UTIL.Write_Log(g_phase);

2050: -- Get the UNASSIGNED ID using the api in gl extraction util package
2051: -- -----------------------------------------------------------------
2052: g_phase := 'Find the shipped FII value set id';
2053: If g_debug_flag = 'Y' then
2054: FII_UTIL.Write_Log(g_phase);
2055: End if;
2056: FII_GL_EXTRACTION_UTIL.get_unassigned_id(G_UNASSIGNED_ID, l_vset_id, l_ret_code);
2057:
2058: IF(l_ret_code = -1) THEN

Line 2067: FII_UTIL.Write_Log(g_phase);

2063: -- Get the enabled flag for UDD1 and UDD2
2064: -- --------------------------------------------------------
2065: g_phase := 'Get the DBI Enabled flag for UDD1';
2066: If g_debug_flag = 'Y' then
2067: FII_UTIL.Write_Log(g_phase);
2068: End if;
2069: BEGIN
2070: -- Bug 4152799.
2071: g_dimension_name := 'FII_USER_DEFINED_1';

Line 2080: FII_UTIL.Write_Log ('Set up for User Defined Dimension1 not done');

2076:
2077: EXCEPTION
2078: WHEN NO_DATA_FOUND THEN
2079: -- If the User Defined Dimension1 set up is not done then set the flag to 'N'
2080: FII_UTIL.Write_Log ('Set up for User Defined Dimension1 not done');
2081: G_UD1_ENABLED := 'N';
2082: END;
2083:
2084: g_phase := 'Get the DBI Enabled flag for UDD2';

Line 2087: FII_UTIL.Write_Log(g_phase);

2083:
2084: g_phase := 'Get the DBI Enabled flag for UDD2';
2085:
2086: If g_debug_flag = 'Y' then
2087: FII_UTIL.Write_Log(g_phase);
2088: End if;
2089:
2090: BEGIN
2091: -- Bug 4152799.

Line 2100: FII_UTIL.Write_Log ('Set up for User Defined Dimension2 not done');

2096: WHERE DIMENSION_SHORT_NAME = g_dimension_name;
2097: EXCEPTION
2098: WHEN NO_DATA_FOUND THEN
2099: -- If the User Defined Dimension2 set up is not done then set the flag to 'N'
2100: FII_UTIL.Write_Log ('Set up for User Defined Dimension2 not done');
2101: G_UD2_ENABLED := 'N';
2102: END;
2103:
2104: If g_debug_flag = 'Y' then

Line 2111: FII_UTIL.write_log ('No source ledger setup for DBI');

2107:
2108: EXCEPTION
2109:
2110: WHEN G_NO_SLG_SETUP THEN
2111: FII_UTIL.write_log ('No source ledger setup for DBI');
2112: g_retcode := -1;
2113: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.INITIALIZE');
2114: raise;
2115:

Line 2117: FII_UTIL.write_log ('No UNASSIGNED ID');

2113: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.INITIALIZE');
2114: raise;
2115:
2116: WHEN G_NO_UNASSIGNED_ID THEN
2117: FII_UTIL.write_log ('No UNASSIGNED ID');
2118: g_retcode := -1;
2119: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.INITIALIZE');
2120: raise;
2121:

Line 2123: FII_UTIL.Write_Log ('Can not get User ID and Login ID, program exit');

2119: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.INITIALIZE');
2120: raise;
2121:
2122: WHEN G_LOGIN_INFO_NOT_AVABLE THEN
2123: FII_UTIL.Write_Log ('Can not get User ID and Login ID, program exit');
2124: g_retcode := -1;
2125: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.INITIALIZE');
2126: raise;
2127:

Line 2129: FII_UTIL.Write_Log ('>>New product catalog is detected for incremental update');

2125: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.INITIALIZE');
2126: raise;
2127:
2128: WHEN G_NEW_PROD_CAT_FOUND THEN
2129: FII_UTIL.Write_Log ('>>New product catalog is detected for incremental update');
2130: g_retcode := -1;
2131: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.INITIALIZE');
2132: raise;
2133:

Line 2136: FII_UTIL.Write_Log('

2132: raise;
2133:
2134: WHEN OTHERS THEN
2135: g_retcode := -1;
2136: FII_UTIL.Write_Log('
2137: ------------------------
2138: Error in Procedure: INITIALIZE
2139: Phase: '||g_phase||'
2140: Message: '||sqlerrm);

Line 2161: FII_UTIL.Write_Log(g_phase);

2157: End if;
2158:
2159: g_phase := 'Detect if reload is necessary';
2160: If g_debug_flag = 'Y' then
2161: FII_UTIL.Write_Log(g_phase);
2162: End if;
2163:
2164: -- Bug 4152799.
2165: g_log_item := 'CCID_RELOAD';

Line 2174: FII_UTIL.Write_Log(g_phase);

2170: IF (l_reload = 'Y') THEN
2171:
2172: g_phase := 'Truncate CCID dimension';
2173: If g_debug_flag = 'Y' then
2174: FII_UTIL.Write_Log(g_phase);
2175: End if;
2176:
2177: FII_UTIL.TRUNCATE_TABLE ('FII_GL_CCID_DIMENSIONS', g_fii_schema, g_retcode);
2178:

Line 2177: FII_UTIL.TRUNCATE_TABLE ('FII_GL_CCID_DIMENSIONS', g_fii_schema, g_retcode);

2173: If g_debug_flag = 'Y' then
2174: FII_UTIL.Write_Log(g_phase);
2175: End if;
2176:
2177: FII_UTIL.TRUNCATE_TABLE ('FII_GL_CCID_DIMENSIONS', g_fii_schema, g_retcode);
2178:
2179: -------------------------------------------------------------------
2180: --Bug 3401590: should not update FII_DIM_MAPPING_RULES here
2181: --

Line 2193: FII_UTIL.Write_Log(g_phase);

2189: -------------------------------------------------------------------
2190:
2191: g_phase := 'Reset max CCID processed to 0';
2192: If g_debug_flag = 'Y' then
2193: FII_UTIL.Write_Log(g_phase);
2194: End if;
2195:
2196: -- Bug 4152799.
2197: g_log_item := 'MAX_CCID';

Line 2207: FII_UTIL.Write_Log(SQL%ROWCOUNT || ' record got updated');

2203: last_updated_by = g_fii_user_id
2204: WHERE log_item = g_log_item;
2205:
2206: IF g_debug_flag = 'Y' THEN
2207: FII_UTIL.Write_Log(SQL%ROWCOUNT || ' record got updated');
2208: END IF;
2209:
2210: g_phase := 'Reset CCID_RELOAD to N';
2211: If g_debug_flag = 'Y' then

Line 2212: FII_UTIL.Write_Log(g_phase);

2208: END IF;
2209:
2210: g_phase := 'Reset CCID_RELOAD to N';
2211: If g_debug_flag = 'Y' then
2212: FII_UTIL.Write_Log(g_phase);
2213: End if;
2214:
2215: -- Bug 4152799.
2216: g_log_item := 'CCID_RELOAD';

Line 2226: FII_UTIL.Write_Log(SQL%ROWCOUNT || ' record got updated');

2222: last_updated_by = g_fii_user_id
2223: WHERE log_item = g_log_item;
2224:
2225: IF g_debug_flag = 'Y' THEN
2226: FII_UTIL.Write_Log(SQL%ROWCOUNT || ' record got updated');
2227: END IF;
2228:
2229: ELSE
2230: If g_debug_flag = 'Y' then

Line 2231: FII_UTIL.Write_Log('No reload is necessary');

2227: END IF;
2228:
2229: ELSE
2230: If g_debug_flag = 'Y' then
2231: FII_UTIL.Write_Log('No reload is necessary');
2232: End if;
2233: END IF;
2234:
2235: If g_debug_flag = 'Y' then

Line 2242: FII_UTIL.Write_Log('

2238:
2239: EXCEPTION
2240: WHEN OTHERS THEN
2241: g_retcode := -1;
2242: FII_UTIL.Write_Log('
2243: -----------------------------
2244: Error occured in Procedure: DETECT_RELOAD
2245: Phase: ' || g_phase || '
2246: Message: ' || sqlerrm);

Line 2290: FII_UTIL.TRUNCATE_TABLE ('FII_GL_CCID_PROD_INT', g_fii_schema, g_retcode);

2286:
2287: ---------------------------------------------------
2288: -- Clean up temporary tables used by the program
2289: ---------------------------------------------------
2290: FII_UTIL.TRUNCATE_TABLE ('FII_GL_CCID_PROD_INT', g_fii_schema, g_retcode);
2291:
2292: ---------------------------------------------------
2293: -- Inserting the basic items into FII_CHANGE_LOG if
2294: -- they have not been inserted

Line 2372: FII_UTIL.Write_Log('Updated ' || SQL%ROWCOUNT || ' rows in fii_change_log');

2368: WHERE log_item = g_log_item
2369: AND item_value = 'Y';
2370:
2371: If g_debug_flag = 'Y' then
2372: FII_UTIL.Write_Log('Updated ' || SQL%ROWCOUNT || ' rows in fii_change_log');
2373: End if;
2374:
2375: end if;
2376:

Line 2382: FII_UTIL.TRUNCATE_TABLE ('FII_GL_CCID_PROD_INT', g_fii_schema, g_retcode);

2378: -- Clean up temporary tables before exit
2379: ---------------------------------------------------
2380: g_phase := 'TRUNCATE FII_GL_CCID_PROD_INT';
2381:
2382: FII_UTIL.TRUNCATE_TABLE ('FII_GL_CCID_PROD_INT', g_fii_schema, g_retcode);
2383:
2384: ------------------------------------------------------
2385: -- We have finished the data processing for CCID table
2386: -- it is a logical point to commit.

Line 2408: FII_UTIL.Write_Log('

2404: EXCEPTION
2405: WHEN OTHERS THEN
2406: rollback;
2407:
2408: FII_UTIL.Write_Log('
2409: -----------------------------
2410: Error occured in Procedure: MAIN
2411: Phase: ' || g_phase || '
2412: Message: ' || sqlerrm);