92: END IF;
93: EXCEPTION
94: WHEN UTL_FILE.INVALID_PATH THEN
95: FND_MESSAGE.Set_Name('CSI', 'CSI_CTR_API_INVALID_PATH');
96: FND_MSG_PUB.ADD;
97:
98: IF (g_stop_on_debug_error = 'Y') THEN
99: RAISE FND_API.G_EXC_ERROR;
100: END IF;
100: END IF;
101:
102: WHEN UTL_FILE.INVALID_MODE THEN
103: FND_MESSAGE.Set_Name('CSI', 'CSI_CTR_API_INVALID_MODE');
104: FND_MSG_PUB.ADD;
105: IF (g_stop_on_debug_error = 'Y') THEN
106: RAISE FND_API.G_EXC_ERROR;
107: END IF;
108:
107: END IF;
108:
109: WHEN UTL_FILE.INVALID_FILEHANDLE THEN
110: FND_MESSAGE.Set_Name('CSI', 'CSI_CTR_API_INVALID_FILEHANDLE');
111: FND_MSG_PUB.ADD;
112: IF (g_stop_on_debug_error = 'Y') THEN
113: RAISE FND_API.G_EXC_ERROR;
114: END IF;
115:
114: END IF;
115:
116: WHEN UTL_FILE.INVALID_OPERATION THEN
117: FND_MESSAGE.Set_Name('CSI', 'CSI_CTR_API_INVALID_OPERATION');
118: FND_MSG_PUB.ADD;
119: IF (g_stop_on_debug_error = 'Y') THEN
120: RAISE FND_API.G_EXC_ERROR;
121: END IF;
122:
121: END IF;
122:
123: WHEN UTL_FILE.WRITE_ERROR THEN
124: FND_MESSAGE.Set_Name('CSI', 'CSI_CTR_API_WRITE_ERROR');
125: FND_MSG_PUB.ADD;
126: IF (g_stop_on_debug_error = 'Y') THEN
127: RAISE FND_API.G_EXC_ERROR;
128: END IF;
129:
128: END IF;
129:
130: WHEN OTHERS THEN
131: FND_MESSAGE.Set_Name('CSI', 'CSI_CTR_API_PUT_LINE_ERROR');
132: FND_MSG_PUB.ADD;
133: IF (g_stop_on_debug_error = 'Y') THEN
134: RAISE FND_API.G_EXC_ERROR;
135: END IF;
136: END put_line;
164: FND_MESSAGE.SET_TOKEN(p_token4_name, p_token4_val);
165: END IF;
166: --
167:
168: FND_MSG_PUB.Add;
169: RAISE FND_API.G_EXC_ERROR;
170: END ExitWithErrMsg;
171:
172: PROCEDURE Initialize_Desc_Flex
654:
655: -- Initialize message list if p_init_msg_list is set to TRUE.
656: IF FND_API.to_Boolean( p_init_msg_list )
657: THEN
658: FND_MSG_PUB.initialize;
659: END IF;
660:
661: -- Initialize API return status to SUCCESS
662: x_return_status := FND_API.G_RET_STS_SUCCESS;
749: THEN
750: COMMIT WORK;
751: END IF;
752: -- Standard call to get message count and if count is 1, get message info.
753: FND_MSG_PUB.Count_And_Get
754: ( p_count => x_msg_count,
755: p_data => x_msg_data
756: );
757: EXCEPTION
757: EXCEPTION
758: WHEN FND_API.G_EXC_ERROR THEN
759: ROLLBACK TO VALIDATE_FORMULA;
760: x_return_status := FND_API.G_RET_STS_ERROR ;
761: FND_MSG_PUB.Count_And_Get
762: (p_count => x_msg_count,
763: p_data => x_msg_data
764: );
765: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
764: );
765: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
766: ROLLBACK TO VALIDATE_FORMULA;
767: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
768: FND_MSG_PUB.Count_And_Get
769: (
770: p_count => x_msg_count,
771: p_data => x_msg_data
772: );
773: WHEN OTHERS THEN
774: ROLLBACK TO VALIDATE_FORMULA;
775: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
776:
777: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
778: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name);
779: END IF;
780: FND_MSG_PUB.Count_And_Get
781: (p_count => x_msg_count ,
774: ROLLBACK TO VALIDATE_FORMULA;
775: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
776:
777: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
778: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name);
779: END IF;
780: FND_MSG_PUB.Count_And_Get
781: (p_count => x_msg_count ,
782: p_data => x_msg_data
776:
777: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
778: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name);
779: END IF;
780: FND_MSG_PUB.Count_And_Get
781: (p_count => x_msg_count ,
782: p_data => x_msg_data
783: );
784: END VALIDATE_FORMULA_CTR;
862: -- Initialize message list if p_init_msg_list is set to TRUE.
863:
864: IF FND_API.to_Boolean( p_init_msg_list )
865: THEN
866: FND_MSG_PUB.initialize;
867: END IF;
868:
869: -- Initialize API return status to SUCCESS
870: x_return_status := FND_API.G_RET_STS_SUCCESS;
1028: THEN
1029: COMMIT WORK;
1030: END IF;
1031: -- Standard call to get message count and if count is 1, get message info.
1032: FND_MSG_PUB.Count_And_Get
1033: ( p_count => x_msg_count,
1034: p_data => x_msg_data
1035: );
1036: EXCEPTION
1036: EXCEPTION
1037: WHEN FND_API.G_EXC_ERROR THEN
1038: ROLLBACK TO VALIDATE_GRPOP;
1039: x_return_status := FND_API.G_RET_STS_ERROR ;
1040: FND_MSG_PUB.Count_And_Get
1041: (p_count => x_msg_count,
1042: p_data => x_msg_data
1043: );
1044: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1043: );
1044: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1045: ROLLBACK TO VALIDATE_GRPOP;
1046: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1047: FND_MSG_PUB.Count_And_Get
1048: (
1049: p_count => x_msg_count,
1050: p_data => x_msg_data
1051: );
1051: );
1052: WHEN OTHERS THEN
1053: ROLLBACK TO VALIDATE_GRPOP;
1054: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1055: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1056: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name);
1057: END IF;
1058: FND_MSG_PUB.Count_And_Get
1059: (p_count => x_msg_count ,
1052: WHEN OTHERS THEN
1053: ROLLBACK TO VALIDATE_GRPOP;
1054: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1055: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1056: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name);
1057: END IF;
1058: FND_MSG_PUB.Count_And_Get
1059: (p_count => x_msg_count ,
1060: p_data => x_msg_data
1054: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1055: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1056: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name);
1057: END IF;
1058: FND_MSG_PUB.Count_And_Get
1059: (p_count => x_msg_count ,
1060: p_data => x_msg_data
1061: );
1062: End VALIDATE_GRPOP_CTR;
1073: IF (p_st_dt > p_end_dt) THEN
1074: l_return_value := FALSE;
1075: IF ( p_stack_err_msg = TRUE ) THEN
1076: ExitWithErrMsg('CSI_ALL_START_DATE_AFTER_END','START_DATE',p_st_dt,'END_DATE',p_end_dt);
1077: FND_MSG_PUB.Add;
1078: END IF;
1079: END IF;
1080: RETURN l_return_value;
1081: END Is_StartEndDate_Valid;
1155: PROCEDURE check_ib_active IS
1156: BEGIN
1157: /* IF NOT csi_gen_utility_pvt.IB_ACTIVE THEN
1158: FND_MESSAGE.Set_Name('CSI', 'CSI_IB_NOT_ACTIVE');
1159: FND_MSG_PUB.Add;
1160: RAISE FND_API.G_Exc_Error;
1161: END IF
1162: */
1163: null;
1167: WHEN others THEN
1168: FND_MESSAGE.Set_Name('CSI', 'CSI_UNEXP_SQL_ERROR');
1169: FND_MESSAGE.Set_Token('API_NAME', 'Check_IB_Active');
1170: FND_MESSAGE.Set_Token('SQL_ERROR', sqlerrm);
1171: FND_MSG_PUB.Add;
1172: RAISE fnd_api.g_exc_error;
1173: END check_ib_active;
1174:
1175: PROCEDURE dump_ctr_grp_rec
1220: PUT_LINE ('SECURITY_GROUP_ID :'||p_counter_groups_rec.SECURITY_GROUP_ID);
1221: EXCEPTION
1222: WHEN OTHERS THEN
1223: ROLLBACK TO dump_ctr_grp_rec;
1224: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1225: THEN
1226: FND_MSG_PUB.Add_Exc_Msg(g_pkg_name, l_api_name);
1227: END IF;
1228: END dump_ctr_grp_rec;
1222: WHEN OTHERS THEN
1223: ROLLBACK TO dump_ctr_grp_rec;
1224: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1225: THEN
1226: FND_MSG_PUB.Add_Exc_Msg(g_pkg_name, l_api_name);
1227: END IF;
1228: END dump_ctr_grp_rec;
1229:
1230: PROCEDURE dump_ctr_grp_tbl
1283: END IF;
1284: EXCEPTION
1285: WHEN OTHERS THEN
1286: ROLLBACK TO dump_ctr_grp_tbl;
1287: IF FND_MSG_PUB.Check_Msg_Level
1288: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1289: THEN
1290: FND_MSG_PUB.Add_Exc_Msg
1291: (g_pkg_name,
1284: EXCEPTION
1285: WHEN OTHERS THEN
1286: ROLLBACK TO dump_ctr_grp_tbl;
1287: IF FND_MSG_PUB.Check_Msg_Level
1288: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1289: THEN
1290: FND_MSG_PUB.Add_Exc_Msg
1291: (g_pkg_name,
1292: l_api_name);
1286: ROLLBACK TO dump_ctr_grp_tbl;
1287: IF FND_MSG_PUB.Check_Msg_Level
1288: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1289: THEN
1290: FND_MSG_PUB.Add_Exc_Msg
1291: (g_pkg_name,
1292: l_api_name);
1293: END IF;
1294: END dump_ctr_grp_tbl;
1383: PUT_LINE ('EAM_REQUIRED_FLAG :'||p_counter_template_rec.EAM_REQUIRED_FLAG);
1384: EXCEPTION
1385: WHEN OTHERS THEN
1386: ROLLBACK TO dump_ctr_template_rec;
1387: IF FND_MSG_PUB.Check_Msg_Level
1388: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1389: THEN
1390: FND_MSG_PUB.Add_Exc_Msg
1391: (g_pkg_name,
1384: EXCEPTION
1385: WHEN OTHERS THEN
1386: ROLLBACK TO dump_ctr_template_rec;
1387: IF FND_MSG_PUB.Check_Msg_Level
1388: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1389: THEN
1390: FND_MSG_PUB.Add_Exc_Msg
1391: (g_pkg_name,
1392: l_api_name);
1386: ROLLBACK TO dump_ctr_template_rec;
1387: IF FND_MSG_PUB.Check_Msg_Level
1388: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1389: THEN
1390: FND_MSG_PUB.Add_Exc_Msg
1391: (g_pkg_name,
1392: l_api_name);
1393: END IF;
1394: END dump_ctr_template_rec;
1490: END IF;
1491: EXCEPTION
1492: WHEN OTHERS THEN
1493: ROLLBACK TO dump_ctr_template_tbl;
1494: IF FND_MSG_PUB.Check_Msg_Level
1495: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1496: THEN
1497: FND_MSG_PUB.Add_Exc_Msg
1498: (g_pkg_name,
1491: EXCEPTION
1492: WHEN OTHERS THEN
1493: ROLLBACK TO dump_ctr_template_tbl;
1494: IF FND_MSG_PUB.Check_Msg_Level
1495: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1496: THEN
1497: FND_MSG_PUB.Add_Exc_Msg
1498: (g_pkg_name,
1499: l_api_name);
1493: ROLLBACK TO dump_ctr_template_tbl;
1494: IF FND_MSG_PUB.Check_Msg_Level
1495: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1496: THEN
1497: FND_MSG_PUB.Add_Exc_Msg
1498: (g_pkg_name,
1499: l_api_name);
1500: END IF;
1501: END dump_ctr_template_tbl;
1549:
1550: EXCEPTION
1551: WHEN OTHERS THEN
1552: ROLLBACK TO dump_ctr_item_assoc_rec;
1553: IF FND_MSG_PUB.Check_Msg_Level
1554: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1555: THEN
1556: FND_MSG_PUB.Add_Exc_Msg
1557: (g_pkg_name,
1550: EXCEPTION
1551: WHEN OTHERS THEN
1552: ROLLBACK TO dump_ctr_item_assoc_rec;
1553: IF FND_MSG_PUB.Check_Msg_Level
1554: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1555: THEN
1556: FND_MSG_PUB.Add_Exc_Msg
1557: (g_pkg_name,
1558: l_api_name);
1552: ROLLBACK TO dump_ctr_item_assoc_rec;
1553: IF FND_MSG_PUB.Check_Msg_Level
1554: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1555: THEN
1556: FND_MSG_PUB.Add_Exc_Msg
1557: (g_pkg_name,
1558: l_api_name);
1559: END IF;
1560: END dump_ctr_item_assoc_rec;
1616: END IF;
1617: EXCEPTION
1618: WHEN OTHERS THEN
1619: ROLLBACK TO dump_ctr_item_assoc_tbl;
1620: IF FND_MSG_PUB.Check_Msg_Level
1621: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1622: THEN
1623: FND_MSG_PUB.Add_Exc_Msg
1624: (g_pkg_name,
1617: EXCEPTION
1618: WHEN OTHERS THEN
1619: ROLLBACK TO dump_ctr_item_assoc_tbl;
1620: IF FND_MSG_PUB.Check_Msg_Level
1621: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1622: THEN
1623: FND_MSG_PUB.Add_Exc_Msg
1624: (g_pkg_name,
1625: l_api_name);
1619: ROLLBACK TO dump_ctr_item_assoc_tbl;
1620: IF FND_MSG_PUB.Check_Msg_Level
1621: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1622: THEN
1623: FND_MSG_PUB.Add_Exc_Msg
1624: (g_pkg_name,
1625: l_api_name);
1626: END IF;
1627: END dump_ctr_item_assoc_tbl;
1671: PUT_LINE ('FACTOR :'||p_counter_relationships_rec.FACTOR);
1672: EXCEPTION
1673: WHEN OTHERS THEN
1674: ROLLBACK TO dump_ctr_relationship_rec;
1675: IF FND_MSG_PUB.Check_Msg_Level
1676: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1677: THEN
1678: FND_MSG_PUB.Add_Exc_Msg
1679: (g_pkg_name,
1672: EXCEPTION
1673: WHEN OTHERS THEN
1674: ROLLBACK TO dump_ctr_relationship_rec;
1675: IF FND_MSG_PUB.Check_Msg_Level
1676: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1677: THEN
1678: FND_MSG_PUB.Add_Exc_Msg
1679: (g_pkg_name,
1680: l_api_name);
1674: ROLLBACK TO dump_ctr_relationship_rec;
1675: IF FND_MSG_PUB.Check_Msg_Level
1676: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1677: THEN
1678: FND_MSG_PUB.Add_Exc_Msg
1679: (g_pkg_name,
1680: l_api_name);
1681: END IF;
1682: END dump_ctr_relationship_rec;
1736: END IF;
1737: EXCEPTION
1738: WHEN OTHERS THEN
1739: ROLLBACK TO dump_ctr_relationship_tbl;
1740: IF FND_MSG_PUB.Check_Msg_Level
1741: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1742: THEN
1743: FND_MSG_PUB.Add_Exc_Msg
1744: (g_pkg_name,
1737: EXCEPTION
1738: WHEN OTHERS THEN
1739: ROLLBACK TO dump_ctr_relationship_tbl;
1740: IF FND_MSG_PUB.Check_Msg_Level
1741: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1742: THEN
1743: FND_MSG_PUB.Add_Exc_Msg
1744: (g_pkg_name,
1745: l_api_name);
1739: ROLLBACK TO dump_ctr_relationship_tbl;
1740: IF FND_MSG_PUB.Check_Msg_Level
1741: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1742: THEN
1743: FND_MSG_PUB.Add_Exc_Msg
1744: (g_pkg_name,
1745: l_api_name);
1746: END IF;
1747: END dump_ctr_relationship_tbl;
1795:
1796: EXCEPTION
1797: WHEN OTHERS THEN
1798: ROLLBACK TO dump_ctr_property_template_rec;
1799: IF FND_MSG_PUB.Check_Msg_Level
1800: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1801: THEN
1802: FND_MSG_PUB.Add_Exc_Msg
1803: (g_pkg_name,
1796: EXCEPTION
1797: WHEN OTHERS THEN
1798: ROLLBACK TO dump_ctr_property_template_rec;
1799: IF FND_MSG_PUB.Check_Msg_Level
1800: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1801: THEN
1802: FND_MSG_PUB.Add_Exc_Msg
1803: (g_pkg_name,
1804: l_api_name);
1798: ROLLBACK TO dump_ctr_property_template_rec;
1799: IF FND_MSG_PUB.Check_Msg_Level
1800: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1801: THEN
1802: FND_MSG_PUB.Add_Exc_Msg
1803: (g_pkg_name,
1804: l_api_name);
1805: END IF;
1806: END dump_ctr_property_template_rec;
1863: END IF;
1864: EXCEPTION
1865: WHEN OTHERS THEN
1866: ROLLBACK TO dump_ctr_property_template_tbl;
1867: IF FND_MSG_PUB.Check_Msg_Level
1868: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1869: THEN
1870: FND_MSG_PUB.Add_Exc_Msg
1871: (g_pkg_name,
1864: EXCEPTION
1865: WHEN OTHERS THEN
1866: ROLLBACK TO dump_ctr_property_template_tbl;
1867: IF FND_MSG_PUB.Check_Msg_Level
1868: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1869: THEN
1870: FND_MSG_PUB.Add_Exc_Msg
1871: (g_pkg_name,
1872: l_api_name);
1866: ROLLBACK TO dump_ctr_property_template_tbl;
1867: IF FND_MSG_PUB.Check_Msg_Level
1868: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1869: THEN
1870: FND_MSG_PUB.Add_Exc_Msg
1871: (g_pkg_name,
1872: l_api_name);
1873: END IF;
1874: END dump_ctr_property_template_tbl;
1916: PUT_LINE ('DESCRIPTION :'||p_ctr_estimation_methods_rec.DESCRIPTION);
1917: EXCEPTION
1918: WHEN OTHERS THEN
1919: ROLLBACK TO dm_ctr_estimation_methods_rec;
1920: IF FND_MSG_PUB.Check_Msg_Level
1921: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1922: THEN
1923: FND_MSG_PUB.Add_Exc_Msg
1924: (g_pkg_name,
1917: EXCEPTION
1918: WHEN OTHERS THEN
1919: ROLLBACK TO dm_ctr_estimation_methods_rec;
1920: IF FND_MSG_PUB.Check_Msg_Level
1921: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1922: THEN
1923: FND_MSG_PUB.Add_Exc_Msg
1924: (g_pkg_name,
1925: l_api_name);
1919: ROLLBACK TO dm_ctr_estimation_methods_rec;
1920: IF FND_MSG_PUB.Check_Msg_Level
1921: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1922: THEN
1923: FND_MSG_PUB.Add_Exc_Msg
1924: (g_pkg_name,
1925: l_api_name);
1926: END IF;
1927: END dm_ctr_estimation_methods_rec;
1979: END IF;
1980: EXCEPTION
1981: WHEN OTHERS THEN
1982: ROLLBACK TO dm_ctr_estimation_methods_tbl;
1983: IF FND_MSG_PUB.Check_Msg_Level
1984: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1985: THEN
1986: FND_MSG_PUB.Add_Exc_Msg
1987: (g_pkg_name,
1980: EXCEPTION
1981: WHEN OTHERS THEN
1982: ROLLBACK TO dm_ctr_estimation_methods_tbl;
1983: IF FND_MSG_PUB.Check_Msg_Level
1984: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1985: THEN
1986: FND_MSG_PUB.Add_Exc_Msg
1987: (g_pkg_name,
1988: l_api_name);
1982: ROLLBACK TO dm_ctr_estimation_methods_tbl;
1983: IF FND_MSG_PUB.Check_Msg_Level
1984: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1985: THEN
1986: FND_MSG_PUB.Add_Exc_Msg
1987: (g_pkg_name,
1988: l_api_name);
1989: END IF;
1990: END dm_ctr_estimation_methods_tbl;
2034: PUT_LINE ('SECURITY_GROUP_ID :'||p_ctr_derived_filters_rec.SECURITY_GROUP_ID);
2035: EXCEPTION
2036: WHEN OTHERS THEN
2037: ROLLBACK TO dump_ctr_derived_filters_rec;
2038: IF FND_MSG_PUB.Check_Msg_Level
2039: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2040: THEN
2041: FND_MSG_PUB.Add_Exc_Msg
2042: (g_pkg_name,
2035: EXCEPTION
2036: WHEN OTHERS THEN
2037: ROLLBACK TO dump_ctr_derived_filters_rec;
2038: IF FND_MSG_PUB.Check_Msg_Level
2039: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2040: THEN
2041: FND_MSG_PUB.Add_Exc_Msg
2042: (g_pkg_name,
2043: l_api_name);
2037: ROLLBACK TO dump_ctr_derived_filters_rec;
2038: IF FND_MSG_PUB.Check_Msg_Level
2039: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2040: THEN
2041: FND_MSG_PUB.Add_Exc_Msg
2042: (g_pkg_name,
2043: l_api_name);
2044: END IF;
2045: END dump_ctr_derived_filters_rec;
2099: END IF;
2100: EXCEPTION
2101: WHEN OTHERS THEN
2102: ROLLBACK TO dump_ctr_derived_filters_tbl;
2103: IF FND_MSG_PUB.Check_Msg_Level
2104: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2105: THEN
2106: FND_MSG_PUB.Add_Exc_Msg
2107: (g_pkg_name,
2100: EXCEPTION
2101: WHEN OTHERS THEN
2102: ROLLBACK TO dump_ctr_derived_filters_tbl;
2103: IF FND_MSG_PUB.Check_Msg_Level
2104: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2105: THEN
2106: FND_MSG_PUB.Add_Exc_Msg
2107: (g_pkg_name,
2108: l_api_name);
2102: ROLLBACK TO dump_ctr_derived_filters_tbl;
2103: IF FND_MSG_PUB.Check_Msg_Level
2104: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2105: THEN
2106: FND_MSG_PUB.Add_Exc_Msg
2107: (g_pkg_name,
2108: l_api_name);
2109: END IF;
2110: END dump_ctr_derived_filters_tbl;
2197: PUT_LINE ('EAM_REQUIRED_FLAG :'||p_counter_instance_rec.EAM_REQUIRED_FLAG);
2198: EXCEPTION
2199: WHEN OTHERS THEN
2200: ROLLBACK TO dump_counter_instance_rec;
2201: IF FND_MSG_PUB.Check_Msg_Level
2202: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2203: THEN
2204: FND_MSG_PUB.Add_Exc_Msg
2205: (g_pkg_name,
2198: EXCEPTION
2199: WHEN OTHERS THEN
2200: ROLLBACK TO dump_counter_instance_rec;
2201: IF FND_MSG_PUB.Check_Msg_Level
2202: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2203: THEN
2204: FND_MSG_PUB.Add_Exc_Msg
2205: (g_pkg_name,
2206: l_api_name);
2200: ROLLBACK TO dump_counter_instance_rec;
2201: IF FND_MSG_PUB.Check_Msg_Level
2202: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2203: THEN
2204: FND_MSG_PUB.Add_Exc_Msg
2205: (g_pkg_name,
2206: l_api_name);
2207: END IF;
2208: END dump_counter_instance_rec;
2303: END IF;
2304: EXCEPTION
2305: WHEN OTHERS THEN
2306: ROLLBACK TO dump_counter_instance_tbl;
2307: IF FND_MSG_PUB.Check_Msg_Level
2308: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2309: THEN
2310: FND_MSG_PUB.Add_Exc_Msg
2311: (g_pkg_name,
2304: EXCEPTION
2305: WHEN OTHERS THEN
2306: ROLLBACK TO dump_counter_instance_tbl;
2307: IF FND_MSG_PUB.Check_Msg_Level
2308: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2309: THEN
2310: FND_MSG_PUB.Add_Exc_Msg
2311: (g_pkg_name,
2312: l_api_name);
2306: ROLLBACK TO dump_counter_instance_tbl;
2307: IF FND_MSG_PUB.Check_Msg_Level
2308: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2309: THEN
2310: FND_MSG_PUB.Add_Exc_Msg
2311: (g_pkg_name,
2312: l_api_name);
2313: END IF;
2314: END dump_counter_instance_tbl;
2361: PUT_LINE ('DESCRIPTION :'||p_ctr_properties_rec.DESCRIPTION);
2362: EXCEPTION
2363: WHEN OTHERS THEN
2364: ROLLBACK TO dump_ctr_properties_rec;
2365: IF FND_MSG_PUB.Check_Msg_Level
2366: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2367: THEN
2368: FND_MSG_PUB.Add_Exc_Msg
2369: (g_pkg_name,
2362: EXCEPTION
2363: WHEN OTHERS THEN
2364: ROLLBACK TO dump_ctr_properties_rec;
2365: IF FND_MSG_PUB.Check_Msg_Level
2366: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2367: THEN
2368: FND_MSG_PUB.Add_Exc_Msg
2369: (g_pkg_name,
2370: l_api_name);
2364: ROLLBACK TO dump_ctr_properties_rec;
2365: IF FND_MSG_PUB.Check_Msg_Level
2366: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2367: THEN
2368: FND_MSG_PUB.Add_Exc_Msg
2369: (g_pkg_name,
2370: l_api_name);
2371: END IF;
2372: END dump_ctr_properties_rec;
2429: END IF;
2430: EXCEPTION
2431: WHEN OTHERS THEN
2432: ROLLBACK TO dump_ctr_properties_tbl;
2433: IF FND_MSG_PUB.Check_Msg_Level
2434: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2435: THEN
2436: FND_MSG_PUB.Add_Exc_Msg
2437: (g_pkg_name,
2430: EXCEPTION
2431: WHEN OTHERS THEN
2432: ROLLBACK TO dump_ctr_properties_tbl;
2433: IF FND_MSG_PUB.Check_Msg_Level
2434: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2435: THEN
2436: FND_MSG_PUB.Add_Exc_Msg
2437: (g_pkg_name,
2438: l_api_name);
2432: ROLLBACK TO dump_ctr_properties_tbl;
2433: IF FND_MSG_PUB.Check_Msg_Level
2434: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2435: THEN
2436: FND_MSG_PUB.Add_Exc_Msg
2437: (g_pkg_name,
2438: l_api_name);
2439: END IF;
2440: END dump_ctr_properties_tbl;
2482:
2483: EXCEPTION
2484: WHEN OTHERS THEN
2485: ROLLBACK TO dump_counter_associations_rec;
2486: IF FND_MSG_PUB.Check_Msg_Level
2487: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2488: THEN
2489: FND_MSG_PUB.Add_Exc_Msg
2490: (g_pkg_name,
2483: EXCEPTION
2484: WHEN OTHERS THEN
2485: ROLLBACK TO dump_counter_associations_rec;
2486: IF FND_MSG_PUB.Check_Msg_Level
2487: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2488: THEN
2489: FND_MSG_PUB.Add_Exc_Msg
2490: (g_pkg_name,
2491: l_api_name);
2485: ROLLBACK TO dump_counter_associations_rec;
2486: IF FND_MSG_PUB.Check_Msg_Level
2487: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2488: THEN
2489: FND_MSG_PUB.Add_Exc_Msg
2490: (g_pkg_name,
2491: l_api_name);
2492: END IF;
2493: END dump_counter_associations_rec;
2544: END IF;
2545: EXCEPTION
2546: WHEN OTHERS THEN
2547: ROLLBACK TO dump_counter_associations_tbl;
2548: IF FND_MSG_PUB.Check_Msg_Level
2549: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2550: THEN
2551: FND_MSG_PUB.Add_Exc_Msg
2552: (g_pkg_name,
2545: EXCEPTION
2546: WHEN OTHERS THEN
2547: ROLLBACK TO dump_counter_associations_tbl;
2548: IF FND_MSG_PUB.Check_Msg_Level
2549: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2550: THEN
2551: FND_MSG_PUB.Add_Exc_Msg
2552: (g_pkg_name,
2553: l_api_name);
2547: ROLLBACK TO dump_counter_associations_tbl;
2548: IF FND_MSG_PUB.Check_Msg_Level
2549: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2550: THEN
2551: FND_MSG_PUB.Add_Exc_Msg
2552: (g_pkg_name,
2553: l_api_name);
2554: END IF;
2555: END dump_counter_associations_tbl;
2627: PUT_LINE ('INITIAL_READING_FLAG :'||p_counter_readings_rec.INITIAL_READING_FLAG);
2628: EXCEPTION
2629: WHEN OTHERS THEN
2630: ROLLBACK TO dump_counter_readings_rec;
2631: IF FND_MSG_PUB.Check_Msg_Level
2632: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2633: THEN
2634: FND_MSG_PUB.Add_Exc_Msg
2635: (g_pkg_name,
2628: EXCEPTION
2629: WHEN OTHERS THEN
2630: ROLLBACK TO dump_counter_readings_rec;
2631: IF FND_MSG_PUB.Check_Msg_Level
2632: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2633: THEN
2634: FND_MSG_PUB.Add_Exc_Msg
2635: (g_pkg_name,
2636: l_api_name);
2630: ROLLBACK TO dump_counter_readings_rec;
2631: IF FND_MSG_PUB.Check_Msg_Level
2632: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2633: THEN
2634: FND_MSG_PUB.Add_Exc_Msg
2635: (g_pkg_name,
2636: l_api_name);
2637: END IF;
2638: END dump_counter_readings_rec;
2725: END IF;
2726: EXCEPTION
2727: WHEN OTHERS THEN
2728: ROLLBACK TO dump_counter_readings_tbl;
2729: IF FND_MSG_PUB.Check_Msg_Level
2730: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2731: THEN
2732: FND_MSG_PUB.Add_Exc_Msg
2733: (g_pkg_name,
2726: EXCEPTION
2727: WHEN OTHERS THEN
2728: ROLLBACK TO dump_counter_readings_tbl;
2729: IF FND_MSG_PUB.Check_Msg_Level
2730: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2731: THEN
2732: FND_MSG_PUB.Add_Exc_Msg
2733: (g_pkg_name,
2734: l_api_name);
2728: ROLLBACK TO dump_counter_readings_tbl;
2729: IF FND_MSG_PUB.Check_Msg_Level
2730: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2731: THEN
2732: FND_MSG_PUB.Add_Exc_Msg
2733: (g_pkg_name,
2734: l_api_name);
2735: END IF;
2736: END dump_counter_readings_tbl;
2777:
2778: EXCEPTION
2779: WHEN OTHERS THEN
2780: ROLLBACK TO dump_ctr_property_readings_rec;
2781: IF FND_MSG_PUB.Check_Msg_Level
2782: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2783: THEN
2784: FND_MSG_PUB.Add_Exc_Msg
2785: (g_pkg_name,
2778: EXCEPTION
2779: WHEN OTHERS THEN
2780: ROLLBACK TO dump_ctr_property_readings_rec;
2781: IF FND_MSG_PUB.Check_Msg_Level
2782: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2783: THEN
2784: FND_MSG_PUB.Add_Exc_Msg
2785: (g_pkg_name,
2786: l_api_name);
2780: ROLLBACK TO dump_ctr_property_readings_rec;
2781: IF FND_MSG_PUB.Check_Msg_Level
2782: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2783: THEN
2784: FND_MSG_PUB.Add_Exc_Msg
2785: (g_pkg_name,
2786: l_api_name);
2787: END IF;
2788: END dump_ctr_property_readings_rec;
2836: END IF;
2837: EXCEPTION
2838: WHEN OTHERS THEN
2839: ROLLBACK TO dump_ctr_property_readings_tbl;
2840: IF FND_MSG_PUB.Check_Msg_Level
2841: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2842: THEN
2843: FND_MSG_PUB.Add_Exc_Msg
2844: (g_pkg_name,
2837: EXCEPTION
2838: WHEN OTHERS THEN
2839: ROLLBACK TO dump_ctr_property_readings_tbl;
2840: IF FND_MSG_PUB.Check_Msg_Level
2841: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2842: THEN
2843: FND_MSG_PUB.Add_Exc_Msg
2844: (g_pkg_name,
2845: l_api_name);
2839: ROLLBACK TO dump_ctr_property_readings_tbl;
2840: IF FND_MSG_PUB.Check_Msg_Level
2841: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2842: THEN
2843: FND_MSG_PUB.Add_Exc_Msg
2844: (g_pkg_name,
2845: l_api_name);
2846: END IF;
2847: END dump_ctr_property_readings_tbl;
2869: PUT_LINE ('OBJECT_VERSION_NUMBER :'||p_ctr_usage_forecast_rec.OBJECT_VERSION_NUMBER);
2870: EXCEPTION
2871: WHEN OTHERS THEN
2872: ROLLBACK TO dump_ctr_usage_forecast_rec;
2873: IF FND_MSG_PUB.Check_Msg_Level
2874: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2875: THEN
2876: FND_MSG_PUB.Add_Exc_Msg
2877: (g_pkg_name,
2870: EXCEPTION
2871: WHEN OTHERS THEN
2872: ROLLBACK TO dump_ctr_usage_forecast_rec;
2873: IF FND_MSG_PUB.Check_Msg_Level
2874: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2875: THEN
2876: FND_MSG_PUB.Add_Exc_Msg
2877: (g_pkg_name,
2878: l_api_name);
2872: ROLLBACK TO dump_ctr_usage_forecast_rec;
2873: IF FND_MSG_PUB.Check_Msg_Level
2874: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2875: THEN
2876: FND_MSG_PUB.Add_Exc_Msg
2877: (g_pkg_name,
2878: l_api_name);
2879: END IF;
2880: END dump_ctr_usage_forecast_rec;
2912: END IF;
2913: EXCEPTION
2914: WHEN OTHERS THEN
2915: ROLLBACK TO dump_ctr_usage_forecast_tbl;
2916: IF FND_MSG_PUB.Check_Msg_Level
2917: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2918: THEN
2919: FND_MSG_PUB.Add_Exc_Msg
2920: (g_pkg_name,
2913: EXCEPTION
2914: WHEN OTHERS THEN
2915: ROLLBACK TO dump_ctr_usage_forecast_tbl;
2916: IF FND_MSG_PUB.Check_Msg_Level
2917: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2918: THEN
2919: FND_MSG_PUB.Add_Exc_Msg
2920: (g_pkg_name,
2921: l_api_name);
2915: ROLLBACK TO dump_ctr_usage_forecast_tbl;
2916: IF FND_MSG_PUB.Check_Msg_Level
2917: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2918: THEN
2919: FND_MSG_PUB.Add_Exc_Msg
2920: (g_pkg_name,
2921: l_api_name);
2922: END IF;
2923: END dump_ctr_usage_forecast_tbl;
2944: PUT_LINE ('OBJECT_VERSION_NUMBER :'||p_ctr_reading_lock_rec.OBJECT_VERSION_NUMBER);
2945: EXCEPTION
2946: WHEN OTHERS THEN
2947: ROLLBACK TO dump_ctr_reading_lock_rec;
2948: IF FND_MSG_PUB.Check_Msg_Level
2949: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2950: THEN
2951: FND_MSG_PUB.Add_Exc_Msg
2952: (g_pkg_name,
2945: EXCEPTION
2946: WHEN OTHERS THEN
2947: ROLLBACK TO dump_ctr_reading_lock_rec;
2948: IF FND_MSG_PUB.Check_Msg_Level
2949: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2950: THEN
2951: FND_MSG_PUB.Add_Exc_Msg
2952: (g_pkg_name,
2953: l_api_name);
2947: ROLLBACK TO dump_ctr_reading_lock_rec;
2948: IF FND_MSG_PUB.Check_Msg_Level
2949: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2950: THEN
2951: FND_MSG_PUB.Add_Exc_Msg
2952: (g_pkg_name,
2953: l_api_name);
2954: END IF;
2955: END dump_ctr_reading_lock_rec;
2985: END IF;
2986: EXCEPTION
2987: WHEN OTHERS THEN
2988: ROLLBACK TO dump_ctr_reading_lock_tbl;
2989: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2990: THEN
2991: FND_MSG_PUB.Add_Exc_Msg(g_pkg_name, l_api_name);
2992: END IF;
2993: END dump_ctr_reading_lock_tbl;
2987: WHEN OTHERS THEN
2988: ROLLBACK TO dump_ctr_reading_lock_tbl;
2989: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2990: THEN
2991: FND_MSG_PUB.Add_Exc_Msg(g_pkg_name, l_api_name);
2992: END IF;
2993: END dump_ctr_reading_lock_tbl;
2994:
2995: PROCEDURE dm_ctr_estimated_readings_rec
3035: PUT_LINE ('OBJECT_VERSION_NUMBER :'||p_ctr_estimated_readings_rec.OBJECT_VERSION_NUMBER);
3036: EXCEPTION
3037: WHEN OTHERS THEN
3038: ROLLBACK TO dm_ctr_estimated_readings_rec;
3039: IF FND_MSG_PUB.Check_Msg_Level
3040: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3041: THEN
3042: FND_MSG_PUB.Add_Exc_Msg
3043: (g_pkg_name,
3036: EXCEPTION
3037: WHEN OTHERS THEN
3038: ROLLBACK TO dm_ctr_estimated_readings_rec;
3039: IF FND_MSG_PUB.Check_Msg_Level
3040: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3041: THEN
3042: FND_MSG_PUB.Add_Exc_Msg
3043: (g_pkg_name,
3044: l_api_name);
3038: ROLLBACK TO dm_ctr_estimated_readings_rec;
3039: IF FND_MSG_PUB.Check_Msg_Level
3040: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3041: THEN
3042: FND_MSG_PUB.Add_Exc_Msg
3043: (g_pkg_name,
3044: l_api_name);
3045: END IF;
3046: END dm_ctr_estimated_readings_rec;
3098: END IF;
3099: EXCEPTION
3100: WHEN OTHERS THEN
3101: ROLLBACK TO dm_ctr_estimated_readings_tbl;
3102: IF FND_MSG_PUB.Check_Msg_Level
3103: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3104: THEN
3105: FND_MSG_PUB.Add_Exc_Msg
3106: (g_pkg_name, l_api_name);
3099: EXCEPTION
3100: WHEN OTHERS THEN
3101: ROLLBACK TO dm_ctr_estimated_readings_tbl;
3102: IF FND_MSG_PUB.Check_Msg_Level
3103: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3104: THEN
3105: FND_MSG_PUB.Add_Exc_Msg
3106: (g_pkg_name, l_api_name);
3107: END IF;
3101: ROLLBACK TO dm_ctr_estimated_readings_tbl;
3102: IF FND_MSG_PUB.Check_Msg_Level
3103: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3104: THEN
3105: FND_MSG_PUB.Add_Exc_Msg
3106: (g_pkg_name, l_api_name);
3107: END IF;
3108: END dm_ctr_estimated_readings_tbl;
3109:
3179: PUT_LINE ('SOURCE_COUNTER_VALUE_ID :'||p_ctr_readings_interface_rec.SOURCE_COUNTER_VALUE_ID);
3180: EXCEPTION
3181: WHEN OTHERS THEN
3182: ROLLBACK TO dm_ctr_readings_interface_rec;
3183: IF FND_MSG_PUB.Check_Msg_Level
3184: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3185: THEN
3186: FND_MSG_PUB.Add_Exc_Msg
3187: (g_pkg_name,
3180: EXCEPTION
3181: WHEN OTHERS THEN
3182: ROLLBACK TO dm_ctr_readings_interface_rec;
3183: IF FND_MSG_PUB.Check_Msg_Level
3184: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3185: THEN
3186: FND_MSG_PUB.Add_Exc_Msg
3187: (g_pkg_name,
3188: l_api_name);
3182: ROLLBACK TO dm_ctr_readings_interface_rec;
3183: IF FND_MSG_PUB.Check_Msg_Level
3184: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3185: THEN
3186: FND_MSG_PUB.Add_Exc_Msg
3187: (g_pkg_name,
3188: l_api_name);
3189: END IF;
3190: END dm_ctr_readings_interface_rec;
3269: END IF;
3270: EXCEPTION
3271: WHEN OTHERS THEN
3272: ROLLBACK TO dm_ctr_readings_interface_tbl;
3273: IF FND_MSG_PUB.Check_Msg_Level
3274: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3275: THEN
3276: FND_MSG_PUB.Add_Exc_Msg
3277: (g_pkg_name, l_api_name);
3270: EXCEPTION
3271: WHEN OTHERS THEN
3272: ROLLBACK TO dm_ctr_readings_interface_tbl;
3273: IF FND_MSG_PUB.Check_Msg_Level
3274: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3275: THEN
3276: FND_MSG_PUB.Add_Exc_Msg
3277: (g_pkg_name, l_api_name);
3278: END IF;
3272: ROLLBACK TO dm_ctr_readings_interface_tbl;
3273: IF FND_MSG_PUB.Check_Msg_Level
3274: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3275: THEN
3276: FND_MSG_PUB.Add_Exc_Msg
3277: (g_pkg_name, l_api_name);
3278: END IF;
3279: END dm_ctr_readings_interface_tbl;
3280:
3319: PUT_LINE ('ATTRIBUTE_CATEGORY :'||p_ctr_read_prop_interface_rec.ATTRIBUTE_CATEGORY);
3320: EXCEPTION
3321: WHEN OTHERS THEN
3322: ROLLBACK TO dm_ctr_read_prop_interface_rec;
3323: IF FND_MSG_PUB.Check_Msg_Level
3324: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3325: THEN
3326: FND_MSG_PUB.Add_Exc_Msg
3327: (g_pkg_name,
3320: EXCEPTION
3321: WHEN OTHERS THEN
3322: ROLLBACK TO dm_ctr_read_prop_interface_rec;
3323: IF FND_MSG_PUB.Check_Msg_Level
3324: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3325: THEN
3326: FND_MSG_PUB.Add_Exc_Msg
3327: (g_pkg_name,
3328: l_api_name);
3322: ROLLBACK TO dm_ctr_read_prop_interface_rec;
3323: IF FND_MSG_PUB.Check_Msg_Level
3324: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3325: THEN
3326: FND_MSG_PUB.Add_Exc_Msg
3327: (g_pkg_name,
3328: l_api_name);
3329: END IF;
3330: END dm_ctr_read_prop_interface_rec;
3379: END IF;
3380: EXCEPTION
3381: WHEN OTHERS THEN
3382: ROLLBACK TO dm_ctr_read_prop_interface_tbl;
3383: IF FND_MSG_PUB.Check_Msg_Level
3384: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3385: THEN
3386: FND_MSG_PUB.Add_Exc_Msg
3387: (g_pkg_name, l_api_name);
3380: EXCEPTION
3381: WHEN OTHERS THEN
3382: ROLLBACK TO dm_ctr_read_prop_interface_tbl;
3383: IF FND_MSG_PUB.Check_Msg_Level
3384: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3385: THEN
3386: FND_MSG_PUB.Add_Exc_Msg
3387: (g_pkg_name, l_api_name);
3388: END IF;
3382: ROLLBACK TO dm_ctr_read_prop_interface_tbl;
3383: IF FND_MSG_PUB.Check_Msg_Level
3384: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3385: THEN
3386: FND_MSG_PUB.Add_Exc_Msg
3387: (g_pkg_name, l_api_name);
3388: END IF;
3389: END dm_ctr_read_prop_interface_tbl;
3390:
3445: EXCEPTION
3446: WHEN OTHERS THEN
3447: -- ROLLBACK TO dump_txn_rec;
3448:
3449: IF FND_MSG_PUB.Check_Msg_Level
3450: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3451: THEN
3452: FND_MSG_PUB.Add_Exc_Msg
3453: ( G_PKG_NAME ,
3446: WHEN OTHERS THEN
3447: -- ROLLBACK TO dump_txn_rec;
3448:
3449: IF FND_MSG_PUB.Check_Msg_Level
3450: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3451: THEN
3452: FND_MSG_PUB.Add_Exc_Msg
3453: ( G_PKG_NAME ,
3454: l_api_name
3448:
3449: IF FND_MSG_PUB.Check_Msg_Level
3450: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3451: THEN
3452: FND_MSG_PUB.Add_Exc_Msg
3453: ( G_PKG_NAME ,
3454: l_api_name
3455: );
3456: END IF;
3473: END IF;
3474: EXCEPTION
3475: WHEN OTHERS THEN
3476: ROLLBACK TO dump_txn_tbl;
3477: IF FND_MSG_PUB.Check_Msg_Level
3478: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3479: THEN
3480: FND_MSG_PUB.Add_Exc_Msg
3481: ( G_PKG_NAME ,
3474: EXCEPTION
3475: WHEN OTHERS THEN
3476: ROLLBACK TO dump_txn_tbl;
3477: IF FND_MSG_PUB.Check_Msg_Level
3478: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3479: THEN
3480: FND_MSG_PUB.Add_Exc_Msg
3481: ( G_PKG_NAME ,
3482: l_api_name
3476: ROLLBACK TO dump_txn_tbl;
3477: IF FND_MSG_PUB.Check_Msg_Level
3478: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3479: THEN
3480: FND_MSG_PUB.Add_Exc_Msg
3481: ( G_PKG_NAME ,
3482: l_api_name
3483: );
3484: END IF;