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_UDD2_MAINTAIN_PKG dependencies on FII_UDD2_MAINTAIN_PKG

Line 1: PACKAGE BODY FII_UDD2_MAINTAIN_PKG AS

1: PACKAGE BODY FII_UDD2_MAINTAIN_PKG AS
2: /* $Header: FIIU2CMB.pls 120.1 2005/10/30 05:05:40 appldev noship $ */
3:
4:
5: G_MASTER_VALUE_SET_ID NUMBER(15) := NULL;

Line 149: FII_UTIL.initialize('FII_UDD2_MAINTAIN_PKG.log',

145: -- FII_UTIL.initialize will get profile options FII_DEBUG_MODE
146: -- and BIS_DEBUG_LOG_DIRECTORY and set up the directory where
147: -- the log files and output files are written to
148: ----------------------------------------------------------------
149: FII_UTIL.initialize('FII_UDD2_MAINTAIN_PKG.log',
150: 'FII_UDD2_MAINTAIN_PKG.out',l_dir,'FII_UDD2_MAINTAIN_PKG');
151:
152: -- --------------------------------------------------------
153: -- Check source ledger setup for DBI

Line 150: 'FII_UDD2_MAINTAIN_PKG.out',l_dir,'FII_UDD2_MAINTAIN_PKG');

146: -- and BIS_DEBUG_LOG_DIRECTORY and set up the directory where
147: -- the log files and output files are written to
148: ----------------------------------------------------------------
149: FII_UTIL.initialize('FII_UDD2_MAINTAIN_PKG.log',
150: 'FII_UDD2_MAINTAIN_PKG.out',l_dir,'FII_UDD2_MAINTAIN_PKG');
151:
152: -- --------------------------------------------------------
153: -- Check source ledger setup for DBI
154: -- --------------------------------------------------------

Line 315: FII_UTIL.Write_Log ('FII_UDD2_MAINTAIN_PKG.Initialize : '|| 'User defined error');

311: --Let the main program handle this
312: raise;
313:
314: When UDIM2_fatal_err then
315: FII_UTIL.Write_Log ('FII_UDD2_MAINTAIN_PKG.Initialize : '|| 'User defined error');
316: FND_CONCURRENT.Af_Rollback;
317: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.Initialize');
318: raise;
319:

Line 317: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.Initialize');

313:
314: When UDIM2_fatal_err then
315: FII_UTIL.Write_Log ('FII_UDD2_MAINTAIN_PKG.Initialize : '|| 'User defined error');
316: FND_CONCURRENT.Af_Rollback;
317: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.Initialize');
318: raise;
319:
320: When others then
321: FII_UTIL.Write_Log ('Unexpected error when calling Initialize...');

Line 354: FII_MESSAGE.Func_Ent ('FII_UDD2_MAINTAIN_PKG.Get_NORM_HIERARCHY_TMP');

350:
351: BEGIN
352:
353: IF (FIIDIM_Debug) THEN
354: FII_MESSAGE.Func_Ent ('FII_UDD2_MAINTAIN_PKG.Get_NORM_HIERARCHY_TMP');
355: END IF;
356:
357: --First, insert records for the master value set
358: g_phase := 'insert records for the master value set';

Line 455: FII_MESSAGE.Func_Succ ('FII_UDD2_MAINTAIN_PKG.Get_NORM_HIERARCHY_TMP');

451: (ownname => g_schema_name,
452: tabname => 'FII_DIM_NORM_HIER_GT');
453:
454: IF (FIIDIM_Debug) THEN
455: FII_MESSAGE.Func_Succ ('FII_UDD2_MAINTAIN_PKG.Get_NORM_HIERARCHY_TMP');
456: END IF;
457:
458: Exception
459:

Line 461: FII_UTIL.Write_Log ('FII_UDD2_MAINTAIN_PKG.Get_NORM_HIERARCHY_TMP: '||

457:
458: Exception
459:
460: When UDIM2_fatal_err then
461: FII_UTIL.Write_Log ('FII_UDD2_MAINTAIN_PKG.Get_NORM_HIERARCHY_TMP: '||
462:
463:
464: 'User defined error');
465: FND_CONCURRENT.Af_Rollback;

Line 466: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.Get_NORM_HIERARCHY_TMP');

462:
463:
464: 'User defined error');
465: FND_CONCURRENT.Af_Rollback;
466: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.Get_NORM_HIERARCHY_TMP');
467: raise;
468:
469: When others then
470: FII_UTIL.Write_Log ('Unexpected error when calling Get_NORM_HIERARCHY_TMP.');

Line 516: FII_MESSAGE.Func_Ent ('FII_UDD2_MAINTAIN_PKG.Detect_Diamond_Shape');

512:
513: BEGIN
514:
515: IF (FIIDIM_Debug) THEN
516: FII_MESSAGE.Func_Ent ('FII_UDD2_MAINTAIN_PKG.Detect_Diamond_Shape');
517: END IF;
518:
519: -- check whole TMP hierarhy table: if there is a diamond
520: -- report and raise an exception

Line 559: FII_MESSAGE.Func_Succ ('FII_UDD2_MAINTAIN_PKG.Detect_Diamond_Shape');

555:
556: END LOOP;
557:
558: IF (FIIDIM_Debug) THEN
559: FII_MESSAGE.Func_Succ ('FII_UDD2_MAINTAIN_PKG.Detect_Diamond_Shape');
560: END IF;
561:
562: IF l_count > 0 THEN
563: RAISE UDIM2_MULT_PAR_err;

Line 569: FII_UTIL.Write_Log ('FII_UDD2_MAINTAIN_PKG.Detect_Diamond_Shape: '||

565:
566: Exception
567:
568: When UDIM2_MULT_PAR_err then
569: FII_UTIL.Write_Log ('FII_UDD2_MAINTAIN_PKG.Detect_Diamond_Shape: '||
570: 'diamond shape detected!');
571: RAISE;
572:
573: When others then

Line 684: (func_name => 'FII_UDD2_MAINTAIN_PKG.Insert_Imm_Child_Nodes');

680: EXCEPTION
681: WHEN NO_DATA_FOUND Then
682: FII_UTIL.Write_Log ('Insert Immediate child: No Data Found');
683: FII_MESSAGE.Func_Fail
684: (func_name => 'FII_UDD2_MAINTAIN_PKG.Insert_Imm_Child_Nodes');
685: RAISE;
686:
687: WHEN OTHERS Then
688: FII_UTIL.Write_Log (substr(SQLERRM,1,180));

Line 690: (func_name => 'FII_UDD2_MAINTAIN_PKG.INSERT_IMM_CHILD_NODES');

686:
687: WHEN OTHERS Then
688: FII_UTIL.Write_Log (substr(SQLERRM,1,180));
689: FII_MESSAGE.Func_Fail
690: (func_name => 'FII_UDD2_MAINTAIN_PKG.INSERT_IMM_CHILD_NODES');
691: RAISE;
692:
693: END INSERT_IMM_CHILD_NODES;
694:

Line 712: FII_MESSAGE.Func_Ent(func_name => 'FII_UDD2_MAINTAIN_PKG.'||

708:
709: BEGIN
710:
711: IF (FIIDIM_Debug) THEN
712: FII_MESSAGE.Func_Ent(func_name => 'FII_UDD2_MAINTAIN_PKG.'||
713: 'Flatten_UD2_Dim_Hier');
714: END IF;
715:
716: g_phase := 'Truncate table FII_UDD2_HIER_GT';

Line 915: FII_MESSAGE.Func_Succ(func_name => 'FII_UDD2_MAINTAIN_PKG.'||

911: -- for the full hierarchy since it's not used anywhere
912: ----------------------------------------------------------------------
913:
914: IF (FIIDIM_Debug) THEN
915: FII_MESSAGE.Func_Succ(func_name => 'FII_UDD2_MAINTAIN_PKG.'||
916: 'Flatten_UD2_Dim_Hier');
917: END IF;
918: EXCEPTION
919:

Line 922: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.'||

918: EXCEPTION
919:
920: WHEN NO_DATA_FOUND THEN
921: FII_UTIL.Write_Log ('Flatten_UD2_Dim_Hier: No Data Found');
922: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.'||
923: 'Flatten_UD2_Dim_Hier');
924: raise;
925:
926: WhEN UDIM2_MULT_PAR_err THEN

Line 929: 'FII_UDD2_MAINTAIN_PKG.Flatten_UD2_Dim_Hier');

925:
926: WhEN UDIM2_MULT_PAR_err THEN
927: FII_UTIL.Write_Log ('Flatten_UD2_Dim_Hier: Diamond Shape Detected');
928: FII_MESSAGE.Func_Fail (func_name =>
929: 'FII_UDD2_MAINTAIN_PKG.Flatten_UD2_Dim_Hier');
930: raise;
931:
932: WHEN OTHERS THEN
933: FII_UTIL.Write_Log ('Flatten_UD2_Dim_Hier: '|| substr(sqlerrm,1,180));

Line 934: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.'||

930: raise;
931:
932: WHEN OTHERS THEN
933: FII_UTIL.Write_Log ('Flatten_UD2_Dim_Hier: '|| substr(sqlerrm,1,180));
934: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.'||
935: 'Flatten_UD2_Dim_Hier');
936: FII_UTIL.Write_Log ( 'G_PHASE: ' || G_PHASE);
937: raise;
938:

Line 950: FII_MESSAGE.Func_Ent(func_name => 'FII_UDD2_MAINTAIN_PKG.'||

946:
947: Begin
948:
949: IF (FIIDIM_Debug) THEN
950: FII_MESSAGE.Func_Ent(func_name => 'FII_UDD2_MAINTAIN_PKG.'||
951: 'Get_UD2_Mapping_GT');
952: END IF;
953:
954: --First, populate FII_FIN_CAT_MAPPINGS_GT with the truncated portion

Line 1003: FII_MESSAGE.Func_Succ(func_name => 'FII_UDD2_MAINTAIN_PKG.Get_UD2_Mapping_GT');

999: (ownname => g_schema_name,
1000: tabname => 'FII_UDD2_MAPPING_GT');
1001:
1002: IF (FIIDIM_Debug) THEN
1003: FII_MESSAGE.Func_Succ(func_name => 'FII_UDD2_MAINTAIN_PKG.Get_UD2_Mapping_GT');
1004: END IF;
1005:
1006: EXCEPTION
1007:

Line 1011: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.'||

1007:
1008: WHEN OTHERS THEN
1009: FII_UTIL.Write_Log ('Get_UD2_Mapping_GT -> phase: '|| g_phase);
1010: FII_UTIL.Write_Log ('Get_UD2_Mapping_GT: '|| substr(sqlerrm,1,180));
1011: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.'||
1012: 'Get_UD2_Mapping_GT');
1013: raise;
1014:
1015: END Get_UD2_Mapping_GT;

Line 1026: FII_MESSAGE.Func_Ent(func_name => 'FII_UDD2_MAINTAIN_PKG.'||

1022:
1023: Begin
1024:
1025: IF (FIIDIM_Debug) THEN
1026: FII_MESSAGE.Func_Ent(func_name => 'FII_UDD2_MAINTAIN_PKG.'||
1027: 'Get_Pruned_UD2_GT');
1028: END IF;
1029:
1030: --Delete from FII_UDD2_HIER_GT for child value set not equal to

Line 1076: FII_MESSAGE.Func_Succ(func_name => 'FII_UDD2_MAINTAIN_PKG.'||

1072: FII_UTIL.Write_Log('Updated ' || SQL%ROWCOUNT || ' rows in FII_UDD2_HIER_GT');
1073: END IF;
1074:
1075: IF (FIIDIM_Debug) THEN
1076: FII_MESSAGE.Func_Succ(func_name => 'FII_UDD2_MAINTAIN_PKG.'||
1077: 'Get_Pruned_UD2_GT');
1078: END IF;
1079:
1080: EXCEPTION

Line 1085: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.'||

1081:
1082: WHEN OTHERS THEN
1083: FII_UTIL.Write_Log ('Get_Pruned_UD2_GT -> phase: '|| g_phase);
1084: FII_UTIL.Write_Log ('Get_Pruned_UD2_GT: '|| substr(sqlerrm,1,180));
1085: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.'||
1086: 'Get_Pruned_UD2_GT');
1087: raise;
1088:
1089: END Get_Pruned_UD2_GT;

Line 1103: FII_MESSAGE.Func_Ent(func_name => 'FII_UDD2_MAINTAIN_PKG.'||

1099:
1100: Begin
1101:
1102: IF (FIIDIM_Debug) THEN
1103: FII_MESSAGE.Func_Ent(func_name => 'FII_UDD2_MAINTAIN_PKG.'||
1104: 'Handle_Unenabled_DIM');
1105: END IF;
1106:
1107: g_phase := 'Check if the dimension was already disabled';

Line 1221: FII_MESSAGE.Func_Succ(func_name => 'FII_UDD2_MAINTAIN_PKG.'||

1217: commit;
1218: END IF;
1219:
1220: IF (FIIDIM_Debug) THEN
1221: FII_MESSAGE.Func_Succ(func_name => 'FII_UDD2_MAINTAIN_PKG.'||
1222: 'Handle_Unenabled_DIM');
1223: END IF;
1224:
1225: EXCEPTION

Line 1229: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.'||

1225: EXCEPTION
1226:
1227: WHEN OTHERS THEN
1228: FII_UTIL.Write_Log ('Handle_Unenabled_DIM: '|| substr(sqlerrm,1,180));
1229: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.'||
1230: 'Handle_Unenabled_DIM');
1231: raise;
1232:
1233: END Handle_Unenabled_DIM;

Line 1247: FII_MESSAGE.Func_Ent(func_name => 'FII_UDD2_MAINTAIN_PKG.Init_Load');

1243:
1244: BEGIN
1245:
1246: IF (FIIDIM_Debug) THEN
1247: FII_MESSAGE.Func_Ent(func_name => 'FII_UDD2_MAINTAIN_PKG.Init_Load');
1248: END IF;
1249:
1250: --First do the initialization
1251:

Line 1437: FII_MESSAGE.Func_Succ(func_name => 'FII_UDD2_MAINTAIN_PKG.Init_Load');

1433:
1434: FND_CONCURRENT.Af_Commit;
1435:
1436: IF (FIIDIM_Debug) THEN
1437: FII_MESSAGE.Func_Succ(func_name => 'FII_UDD2_MAINTAIN_PKG.Init_Load');
1438: END IF;
1439:
1440: -- Exception handling
1441:

Line 1446: FII_UTIL.Write_Log ('FII_UDD2_MAINTAIN_PKG.Init_Load: '||

1442: EXCEPTION
1443:
1444: WHEN UDIM2_fatal_err THEN
1445:
1446: FII_UTIL.Write_Log ('FII_UDD2_MAINTAIN_PKG.Init_Load: '||
1447: 'User defined error');
1448:
1449: FND_CONCURRENT.Af_Rollback;
1450: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.Init_Load');

Line 1450: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.Init_Load');

1446: FII_UTIL.Write_Log ('FII_UDD2_MAINTAIN_PKG.Init_Load: '||
1447: 'User defined error');
1448:
1449: FND_CONCURRENT.Af_Rollback;
1450: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.Init_Load');
1451: retcode := sqlcode;
1452: ret_val := FND_CONCURRENT.Set_Completion_Status
1453: (status => 'ERROR', message => substr(sqlerrm,1,180));
1454:

Line 1456: FII_UTIL.Write_Log ('FII_UDD2_MAINTAIN_PKG.Init_Load: '||

1452: ret_val := FND_CONCURRENT.Set_Completion_Status
1453: (status => 'ERROR', message => substr(sqlerrm,1,180));
1454:
1455: WHEN UDIM2_MULT_PAR_err THEN
1456: FII_UTIL.Write_Log ('FII_UDD2_MAINTAIN_PKG.Init_Load: '||
1457: 'Diamond Shape Detected');
1458:
1459: FND_CONCURRENT.Af_Rollback;
1460: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.Init_Load');

Line 1460: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.Init_Load');

1456: FII_UTIL.Write_Log ('FII_UDD2_MAINTAIN_PKG.Init_Load: '||
1457: 'Diamond Shape Detected');
1458:
1459: FND_CONCURRENT.Af_Rollback;
1460: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.Init_Load');
1461: retcode := sqlcode;
1462: ret_val := FND_CONCURRENT.Set_Completion_Status
1463: (status => 'ERROR', message => substr(sqlerrm,1,180));
1464:

Line 1477: 'Other error in FII_UDD2_MAINTAIN_PKG.Init_Load: ' || substr(sqlerrm,1,180));

1473:
1474: WHEN OTHERS THEN
1475: FII_UTIL.Write_Log ('Init_Load -> phase: '|| g_phase);
1476: FII_UTIL.Write_Log (
1477: 'Other error in FII_UDD2_MAINTAIN_PKG.Init_Load: ' || substr(sqlerrm,1,180));
1478:
1479:
1480: FND_CONCURRENT.Af_Rollback;
1481: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.Init_Load');

Line 1481: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.Init_Load');

1477: 'Other error in FII_UDD2_MAINTAIN_PKG.Init_Load: ' || substr(sqlerrm,1,180));
1478:
1479:
1480: FND_CONCURRENT.Af_Rollback;
1481: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.Init_Load');
1482: retcode := sqlcode;
1483: ret_val := FND_CONCURRENT.Set_Completion_Status
1484: (status => 'ERROR', message => substr(sqlerrm,1,180));
1485:

Line 1501: FII_MESSAGE.Func_Ent(func_name => 'FII_UDD2_MAINTAIN_PKG.Incre_Load');

1497:
1498: BEGIN
1499:
1500: IF (FIIDIM_Debug) THEN
1501: FII_MESSAGE.Func_Ent(func_name => 'FII_UDD2_MAINTAIN_PKG.Incre_Load');
1502: END IF;
1503:
1504: --First do the initialization
1505:

Line 1760: FII_MESSAGE.Func_Succ(func_name => 'FII_UDD2_MAINTAIN_PKG.Incre_Load');

1756:
1757: FND_CONCURRENT.Af_Commit;
1758:
1759: IF (FIIDIM_Debug) THEN
1760: FII_MESSAGE.Func_Succ(func_name => 'FII_UDD2_MAINTAIN_PKG.Incre_Load');
1761: END IF;
1762:
1763: -- Exception handling
1764:

Line 1767: FII_UTIL.Write_Log ('FII_UDD2_MAINTAIN_PKG.Incre_Update'||

1763: -- Exception handling
1764:
1765: EXCEPTION
1766: WHEN UDIM2_fatal_err THEN
1767: FII_UTIL.Write_Log ('FII_UDD2_MAINTAIN_PKG.Incre_Update'||
1768: 'User defined error');
1769:
1770: FND_CONCURRENT.Af_Rollback;
1771: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.Incre_Update');

Line 1771: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.Incre_Update');

1767: FII_UTIL.Write_Log ('FII_UDD2_MAINTAIN_PKG.Incre_Update'||
1768: 'User defined error');
1769:
1770: FND_CONCURRENT.Af_Rollback;
1771: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.Incre_Update');
1772: retcode := sqlcode;
1773: ret_val := FND_CONCURRENT.Set_Completion_Status
1774: (status => 'ERROR', message => substr(sqlerrm,1,180));
1775:

Line 1777: FII_UTIL.Write_Log ('FII_UDD2_MAINTAIN_PKG.Incre_Update: '||

1773: ret_val := FND_CONCURRENT.Set_Completion_Status
1774: (status => 'ERROR', message => substr(sqlerrm,1,180));
1775:
1776: WHEN UDIM2_MULT_PAR_err THEN
1777: FII_UTIL.Write_Log ('FII_UDD2_MAINTAIN_PKG.Incre_Update: '||
1778: 'Diamond Shape Detected');
1779:
1780: FND_CONCURRENT.Af_Rollback;
1781: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.Incre_Update');

Line 1781: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.Incre_Update');

1777: FII_UTIL.Write_Log ('FII_UDD2_MAINTAIN_PKG.Incre_Update: '||
1778: 'Diamond Shape Detected');
1779:
1780: FND_CONCURRENT.Af_Rollback;
1781: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.Incre_Update');
1782: retcode := sqlcode;
1783: ret_val := FND_CONCURRENT.Set_Completion_Status
1784: (status => 'ERROR', message => substr(sqlerrm,1,180));
1785:

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

1794:
1795: WHEN OTHERS THEN
1796: FII_UTIL.Write_Log ('Incre_Update -> phase: '|| g_phase);
1797: FII_UTIL.Write_Log (
1798: 'Other error in FII_UDD2_MAINTAIN_PKG.Incre_Update: ' || substr(sqlerrm,1,180));
1799:
1800:
1801: FND_CONCURRENT.Af_Rollback;
1802: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.Incre_Update');

Line 1802: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.Incre_Update');

1798: 'Other error in FII_UDD2_MAINTAIN_PKG.Incre_Update: ' || substr(sqlerrm,1,180));
1799:
1800:
1801: FND_CONCURRENT.Af_Rollback;
1802: FII_MESSAGE.Func_Fail(func_name => 'FII_UDD2_MAINTAIN_PKG.Incre_Update');
1803: retcode := sqlcode;
1804: ret_val := FND_CONCURRENT.Set_Completion_Status
1805: (status => 'ERROR', message => substr(sqlerrm,1,180));
1806:

Line 1809: END FII_UDD2_MAINTAIN_PKG;

1805: (status => 'ERROR', message => substr(sqlerrm,1,180));
1806:
1807: END Incre_Update;
1808:
1809: END FII_UDD2_MAINTAIN_PKG;