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_GL_CCID_C

Line 1: PACKAGE BODY FII_GL_CCID_C AS

1: PACKAGE BODY FII_GL_CCID_C AS
2: /* $Header: FIIGLCCB.pls 120.52 2006/03/27 19:15:22 juding noship $ */
3:
4: g_debug_flag Varchar2(1) := NVL(FND_PROFILE.value('FII_DEBUG_MODE'), 'N');
5:

Line 47: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.INIT_DBI_CHANGE_LOG');

43: PROCEDURE INIT_DBI_CHANGE_LOG IS
44: BEGIN
45:
46: If g_debug_flag = 'Y' then
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');

Line 109: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.INIT_DBI_CHANGE_LOG');

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');
110: End if;
111:
112: EXCEPTION
113:

Line 120: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.INIT_DBI_CHANGE_LOG');

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;
122:
123: END INIT_DBI_CHANGE_LOG;
124:

Line 134: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.GET_COA_NAME');

130: l_coa_name VARCHAR2(30);
131:
132: BEGIN
133: If g_debug_flag = 'Y' then
134: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.GET_COA_NAME');
135: End if;
136:
137: g_phase := 'Getting user name for chart of account ID: ' || p_coa_id;
138:

Line 147: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.GET_COA_NAME');

143: AND id_flex_num = p_coa_id
144: AND language = g_current_language;
145:
146: If g_debug_flag = 'Y' then
147: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.GET_COA_NAME');
148: End if;
149:
150: return l_coa_name;
151:

Line 160: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.GET_COA_NAME');

156: ------------------------
157: Error in Function: GET_COA_NAME
158: Phase: '||g_phase||'
159: Message: '||sqlerrm);
160: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.GET_COA_NAME');
161: raise;
162:
163: END GET_COA_NAME;
164:

Line 178: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.GET_ACCT_SEGMENTS');

174:
175: BEGIN
176:
177: If g_debug_flag = 'Y' then
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: '

Line 218: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.GET_ACCT_SEGMENTS');

214: AND fsav3.segment_attribute_type = 'GL_ACCOUNT'
215: AND fsav3.attribute_value = 'Y';
216:
217: If g_debug_flag = 'Y' then
218: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.GET_ACCT_SEGMENTS');
219: End if;
220:
221: EXCEPTION
222: WHEN NO_DATA_FOUND THEN

Line 243: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.GET_ACCT_SEGMENTS');

239: token_num => 1,
240: t1 => 'COA_NAME',
241: v1 => v_coa_name);
242:
243: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.GET_ACCT_SEGMENTS');
244:
245: RAISE;
246:
247: WHEN OTHERS THEN

Line 253: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.GET_ACCT_SEGMENTS');

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');
254: RAISE;
255: END GET_ACCT_SEGMENTS;
256:
257: -----------------------------------------------------------------------------

Line 275: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.POPULATE_SLG_TMP');

271:
272: Begin
273:
274: If g_debug_flag = 'Y' then
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 ');

Line 343: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.POPULATE_SLG_TMP');

339:
340: END LOOP;
341:
342: If g_debug_flag = 'Y' then
343: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.POPULATE_SLG_TMP');
344: End if;
345:
346: Exception
347:

Line 355: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.POPULATE_SLG_TMP');

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');
356: raise;
357: End POPULATE_SLG_TMP;
358:
359: -----------------------------------------------------------------------------

Line 371: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.INSERT_INTO_CCID_DIM');

367: l_stmt VARCHAR2(10000);
368:
369: BEGIN
370: If g_debug_flag = 'Y' then
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: ' ||

Line 517: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.INSERT_INTO_CCID_DIM');

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');
518: End if;
519:
520: EXCEPTION
521:

Line 536: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.INSERT_INTO_CCID_DIM');

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');
537: raise;
538: END INSERT_INTO_CCID_DIM;
539:
540: -----------------------------------------------------------------------------

Line 554: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.INSERT_INTO_CCID_DIM_INIT');

550:
551: BEGIN
552:
553: If g_debug_flag = 'Y' then
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: ' ||

Line 698: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.INSERT_INTO_CCID_DIM_INIT');

694: --need this to avoid ORA-12838: cannot read/modify an object after modifying it in parallel
695: COMMIT;
696:
697: If g_debug_flag = 'Y' then
698: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.INSERT_INTO_CCID_DIM_INIT');
699: End if;
700:
701: EXCEPTION
702:

Line 710: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.INSERT_INTO_CCID_DIM_INIT');

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');
711: raise;
712: END INSERT_INTO_CCID_DIM_INIT;
713:
714: ------------------------------------------------------------------

Line 724: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.RECORD_MAX_PROCESSED_CCID');

720:
721: BEGIN
722:
723: If g_debug_flag = 'Y' then
724: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.RECORD_MAX_PROCESSED_CCID');
725: End if;
726:
727: g_phase := 'Updating max CCID processed';
728: If g_debug_flag = 'Y' then

Line 778: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.RECORD_MAX_PROCESSED_CCID');

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');
779: End if;
780:
781: EXCEPTION
782: WHEN OTHERS THEN

Line 790: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.RECORD_MAX_PROCESSED_CCID');

786: -------------------------------------------
787: Error occured in Procedure: RECORD_MAX_PROCESSED_CCID
788: Phase: ' || g_phase || '
789: Message: ' || sqlerrm);
790: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.RECORD_MAX_PROCESSED_CCID');
791: raise;
792:
793: END RECORD_MAX_PROCESSED_CCID;
794:

Line 802: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.NEW_CCID_IN_GL');

798: FUNCTION NEW_CCID_IN_GL RETURN BOOLEAN IS
799: BEGIN
800:
801: If g_debug_flag = 'Y' then
802: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.NEW_CCID_IN_GL');
803: End if;
804:
805: g_phase := 'Identifying Max CCID processed';
806: If g_debug_flag = 'Y' then

Line 828: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.NEW_CCID_IN_GL');

824: SELECT max(code_combination_id) INTO g_new_max_ccid
825: FROM gl_code_combinations;
826:
827: If g_debug_flag = 'Y' then
828: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.NEW_CCID_IN_GL');
829: End if;
830:
831: IF g_new_max_ccid > g_max_ccid THEN
832: RETURN TRUE;

Line 846: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.NEW_CCID_IN_GL');

842: -------------------------------------------
843: Error occured in Function: NEW_CCID_IN_GL
844: Phase: ' || g_phase || '
845: Message: ' || sqlerrm);
846: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.NEW_CCID_IN_GL');
847: raise;
848: END NEW_CCID_IN_GL;
849:
850: ------------------------------------------------------------------

Line 858: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.PROCESS_NULL_CCC_ORG_ID');

854:
855: BEGIN
856:
857: If g_debug_flag = 'Y' then
858: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.PROCESS_NULL_CCC_ORG_ID');
859: End if;
860:
861: --------------------------------------------------------------
862: -- Updating CCID Dimension for CCIDs with NULL CCC ORG ID

Line 885: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.PROCESS_NULL_CCC_ORG_ID');

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');
886: End if;
887:
888: EXCEPTION
889:

Line 898: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.PROCESS_NULL_CCC_ORG_ID');

894: -----------------------------
895: Error occured in Procedure: PROCESS_NULL_CCC_ORG_ID
896: Phase: ' || g_phase || '
897: Message: ' || sqlerrm);
898: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.PROCESS_NULL_CCC_ORG_ID');
899: RAISE;
900:
901: END PROCESS_NULL_CCC_ORG_ID;
902:

Line 917: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.INSERT_NEW_CCID');

913:
914: BEGIN
915:
916: If g_debug_flag = 'Y' then
917: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.INSERT_NEW_CCID');
918: End if;
919:
920: g_phase := 'Identifying Max CCID processed';
921: If g_debug_flag = 'Y' then

Line 1143: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.INSERT_NEW_CCID');

1139: -- (ownname => g_fii_schema,
1140: -- tabname => 'FII_GL_CCID_DIMENSIONS');
1141:
1142: If g_debug_flag = 'Y' then
1143: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.INSERT_NEW_CCID');
1144: End if;
1145:
1146: EXCEPTION
1147:

Line 1177: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.INSERT_NEW_CCID');

1173: -----------------------------
1174: Error occured in Procedure: INSERT_NEW_CCID
1175: Phase: ' || g_phase || '
1176: Message: ' || sqlerrm);
1177: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.INSERT_NEW_CCID');
1178: raise;
1179:
1180: END INSERT_NEW_CCID;
1181:

Line 1191: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.USE_SEG');

1187: l_stmt VARCHAR2(5000);
1188:
1189: BEGIN
1190: If g_debug_flag = 'Y' then
1191: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.USE_SEG');
1192: End if;
1193:
1194: g_phase := 'Updating Product assignment using Segment';
1195: If g_debug_flag = 'Y' then

Line 1236: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.USE_SEG');

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');
1237: End if;
1238:
1239: EXCEPTION
1240:

Line 1248: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.USE_SEG');

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');
1249: raise;
1250:
1251: END USE_SEG;
1252:

Line 1280: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.USE_RANGES');

1276:
1277: BEGIN
1278:
1279: If g_debug_flag = 'Y' then
1280: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.USE_RANGES');
1281: End if;
1282:
1283: g_phase := 'Populating FII_GL_CCID_PROD_INT';
1284: If g_debug_flag = 'Y' then

Line 1475: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.USE_RANGES');

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');
1476: End if;
1477:
1478: EXCEPTION
1479:

Line 1483: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.USE_RANGES');

1479:
1480: WHEN G_DUPLICATE_PROD_ASGN THEN
1481: rollback;
1482: g_retcode := -1;
1483: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.USE_RANGES');
1484: raise;
1485:
1486: WHEN OTHERS THEN
1487: rollback;

Line 1494: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.USE_RANGES');

1490: --------------------------------------
1491: Error occured in Procedure: USE_RANGES
1492: Phase: ' || g_phase || '
1493: Message: ' || sqlerrm);
1494: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.USE_RANGES');
1495: raise;
1496:
1497: END USE_RANGES;
1498:

Line 1509: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.INVALID_PROD_CODE_EXIST');

1505:
1506: BEGIN
1507:
1508: If g_debug_flag = 'Y' then
1509: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.INVALID_PROD_CODE_EXIST');
1510: End if;
1511:
1512: g_phase := 'Check for invalid product code in FII_GL_CCID_DIMENSIONS';
1513:

Line 1537: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.INVALID_PROD_CODE_EXIST');

1533: l_count := 0;
1534: end;
1535:
1536: If g_debug_flag = 'Y' then
1537: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.INVALID_PROD_CODE_EXIST');
1538: End if;
1539:
1540: IF l_count > 0 THEN
1541: RETURN TRUE;

Line 1554: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.INVALID_PROD_CODE_EXIST');

1550: ------------------------
1551: Error in Function: INVALID_PROD_CODE_EXIST
1552: Phase: '||g_phase||'
1553: Message: '||sqlerrm);
1554: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.INVALID_PROD_CODE_EXIST');
1555: raise;
1556:
1557: END INVALID_PROD_CODE_EXIST;
1558:

Line 1608: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.MAINTAIN_PROD_ASSGN');

1604:
1605: BEGIN
1606:
1607: If g_debug_flag = 'Y' then
1608: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.MAINTAIN_PROD_ASSGN');
1609: End if;
1610:
1611: g_phase := 'Maintain Product Assignment for CCIDs';
1612: If g_debug_flag = 'Y' then

Line 1775: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.MAINTAIN_PROD_ASSGN');

1771: End if;
1772: END IF;
1773:
1774: If g_debug_flag = 'Y' then
1775: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.MAINTAIN_PROD_ASSGN');
1776: End if;
1777:
1778: EXCEPTION
1779:

Line 1788: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.MAINTAIN_PROD_ASSGN');

1784: ---------------------------------------
1785: Error occured in Procedure: MAINTAIN_PROD_ASSGN -> NO_PROD_SEG_DEFINED
1786: Phase: '||g_phase||'
1787: Message: '||sqlerrm);
1788: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.MAINTAIN_PROD_ASSGN');
1789: raise;
1790:
1791: WHEN G_INVALID_PROD_CODE_EXIST THEN
1792: g_retcode := -1;

Line 1799: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.MAINTAIN_PROD_ASSGN');

1795: ---------------------------------------
1796: Error occured in Procedure: MAINTAIN_PROD_ASSGN -> INVALID_PROD_CODE_EXIST
1797: Phase: '||g_phase||'
1798: Message: '||sqlerrm);
1799: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.MAINTAIN_PROD_ASSGN');
1800: raise;
1801:
1802: WHEN OTHERS THEN
1803: g_retcode := -1;

Line 1810: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.MAINTAIN_PROD_ASSGN');

1806: ---------------------------------------
1807: Error occured in Procedure: MAINTAIN_PROD_ASSGN
1808: Phase: '||g_phase||'
1809: Message: '||sqlerrm);
1810: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.MAINTAIN_PROD_ASSGN');
1811: raise;
1812:
1813: END MAINTAIN_PROD_ASSGN;
1814:

Line 1831: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.INITIALIZE');

1827: l_ret_code NUMBER;
1828: BEGIN
1829:
1830: If g_debug_flag = 'Y' then
1831: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.INITIALIZE');
1832: End if;
1833:
1834: ----------------------------------------------
1835: -- Do set up for log file

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 2105: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.INITIALIZE');

2101: G_UD2_ENABLED := 'N';
2102: END;
2103:
2104: If g_debug_flag = 'Y' then
2105: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.INITIALIZE');
2106: End if;
2107:
2108: EXCEPTION
2109:

Line 2113: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.INITIALIZE');

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:
2116: WHEN G_NO_UNASSIGNED_ID THEN
2117: FII_UTIL.write_log ('No UNASSIGNED ID');

Line 2119: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.INITIALIZE');

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:
2122: WHEN G_LOGIN_INFO_NOT_AVABLE THEN
2123: FII_UTIL.Write_Log ('Can not get User ID and Login ID, program exit');

Line 2125: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.INITIALIZE');

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:
2128: WHEN G_NEW_PROD_CAT_FOUND THEN
2129: FII_UTIL.Write_Log ('>>New product catalog is detected for incremental update');

Line 2131: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.INITIALIZE');

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:
2134: WHEN OTHERS THEN
2135: g_retcode := -1;

Line 2141: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.INITIALIZE');

2137: ------------------------
2138: Error in Procedure: INITIALIZE
2139: Phase: '||g_phase||'
2140: Message: '||sqlerrm);
2141: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.INITIALIZE');
2142: raise;
2143:
2144: END INITIALIZE;
2145:

Line 2156: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.DETECT_RELOAD');

2152:
2153: BEGIN
2154:
2155: If g_debug_flag = 'Y' then
2156: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.DETECT_RELOAD');
2157: End if;
2158:
2159: g_phase := 'Detect if reload is necessary';
2160: If g_debug_flag = 'Y' then

Line 2236: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.DETECT_RELOAD');

2232: End if;
2233: END IF;
2234:
2235: If g_debug_flag = 'Y' then
2236: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.DETECT_RELOAD');
2237: End if;
2238:
2239: EXCEPTION
2240: WHEN OTHERS THEN

Line 2247: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.DETECT_RELOAD');

2243: -----------------------------
2244: Error occured in Procedure: DETECT_RELOAD
2245: Phase: ' || g_phase || '
2246: Message: ' || sqlerrm);
2247: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.DETECT_RELOAD');
2248: raise;
2249: END DETECT_RELOAD;
2250:
2251: -----------------------------------------------------------------

Line 2263: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.Main');

2259:
2260: BEGIN
2261:
2262: If g_debug_flag = 'Y' then
2263: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.Main');
2264: End if;
2265:
2266: errbuf := NULL;
2267: retcode := 0;

Line 2401: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.Main');

2397:
2398: retcode := g_retcode;
2399:
2400: If g_debug_flag = 'Y' then
2401: FII_MESSAGE.Func_Succ('FII_GL_CCID_C.Main');
2402: End if;
2403:
2404: EXCEPTION
2405: WHEN OTHERS THEN

Line 2414: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.Main');

2410: Error occured in Procedure: MAIN
2411: Phase: ' || g_phase || '
2412: Message: ' || sqlerrm);
2413:
2414: FII_MESSAGE.Func_Fail('FII_GL_CCID_C.Main');
2415:
2416: retcode := g_retcode;
2417: ret_val := FND_CONCURRENT.Set_Completion_Status
2418: (status => 'ERROR', message => substr(sqlerrm,1,180));

Line 2421: END FII_GL_CCID_C;

2417: ret_val := FND_CONCURRENT.Set_Completion_Status
2418: (status => 'ERROR', message => substr(sqlerrm,1,180));
2419: END MAIN;
2420:
2421: END FII_GL_CCID_C;