41: if p_token4_name is not null then
42: FND_MESSAGE.SET_TOKEN(p_token4_name, p_token4_val);
43: end if;
44: --
45: FND_MSG_PUB.Add;
46: RAISE FND_API.G_EXC_ERROR;
47: end ExitWithErrMsg;
48:
49: --|---------------------------------------------------
626: END IF;
627:
628: -- Initialize message list if p_init_msg_list is set to TRUE.
629: IF FND_API.to_Boolean(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
630: FND_MSG_PUB.initialize;
631: END IF;
632:
633: -- Initialize API return status to success
634: x_return_status := FND_API.G_RET_STS_SUCCESS;
1160: EXCEPTION
1161: WHEN FND_API.G_EXC_ERROR THEN
1162: x_return_status := FND_API.G_RET_STS_ERROR ;
1163: ROLLBACK TO create_counter_pvt;
1164: FND_MSG_PUB.Count_And_Get
1165: (p_count => x_msg_count,
1166: p_data => x_msg_data
1167: );
1168:
1168:
1169: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1170: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1171: ROLLBACK TO create_counter_pvt;
1172: FND_MSG_PUB.Count_And_Get
1173: (p_count => x_msg_count,
1174: p_data => x_msg_data
1175: );
1176: WHEN OTHERS THEN
1175: );
1176: WHEN OTHERS THEN
1177: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1178: ROLLBACK TO create_counter_pvt;
1179: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1180: THEN
1181: FND_MSG_PUB.Add_Exc_Msg
1182: (G_PKG_NAME,
1183: l_api_name
1177: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1178: ROLLBACK TO create_counter_pvt;
1179: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1180: THEN
1181: FND_MSG_PUB.Add_Exc_Msg
1182: (G_PKG_NAME,
1183: l_api_name
1184: );
1185: END IF;
1182: (G_PKG_NAME,
1183: l_api_name
1184: );
1185: END IF;
1186: FND_MSG_PUB.Count_And_Get
1187: (p_count => x_msg_count,
1188: p_data => x_msg_data
1189: );
1190:
1265: END IF;
1266:
1267: -- Initialize message list if p_init_msg_list is set to TRUE.
1268: IF FND_API.to_Boolean(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
1269: FND_MSG_PUB.initialize;
1270: END IF;
1271:
1272: -- Initialize API return status to success
1273: x_return_status := FND_API.G_RET_STS_SUCCESS;
1549: EXCEPTION
1550: WHEN FND_API.G_EXC_ERROR THEN
1551: x_return_status := FND_API.G_RET_STS_ERROR ;
1552: ROLLBACK TO create_ctr_property_pvt;
1553: FND_MSG_PUB.Count_And_Get
1554: (p_count => x_msg_count,
1555: p_data => x_msg_data
1556: );
1557:
1557:
1558: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1559: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1560: ROLLBACK TO create_ctr_property_pvt;
1561: FND_MSG_PUB.Count_And_Get
1562: (p_count => x_msg_count,
1563: p_data => x_msg_data
1564: );
1565: WHEN OTHERS THEN
1564: );
1565: WHEN OTHERS THEN
1566: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1567: ROLLBACK TO create_ctr_property_pvt;
1568: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1569: THEN
1570: FND_MSG_PUB.Add_Exc_Msg
1571: (G_PKG_NAME,
1572: l_api_name
1566: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1567: ROLLBACK TO create_ctr_property_pvt;
1568: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1569: THEN
1570: FND_MSG_PUB.Add_Exc_Msg
1571: (G_PKG_NAME,
1572: l_api_name
1573: );
1574: END IF;
1571: (G_PKG_NAME,
1572: l_api_name
1573: );
1574: END IF;
1575: FND_MSG_PUB.Count_And_Get
1576: (p_count => x_msg_count,
1577: p_data => x_msg_data
1578: );
1579: END create_ctr_property;
1659: END IF;
1660:
1661: -- Initialize message list if p_init_msg_list is set to TRUE.
1662: IF FND_API.to_Boolean(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
1663: FND_MSG_PUB.initialize;
1664: END IF;
1665:
1666: -- Initialize API return status to success
1667: x_return_status := FND_API.G_RET_STS_SUCCESS;
1940: EXCEPTION
1941: WHEN FND_API.G_EXC_ERROR THEN
1942: x_return_status := FND_API.G_RET_STS_ERROR ;
1943: ROLLBACK TO create_ctr_associations_pvt;
1944: FND_MSG_PUB.Count_And_Get
1945: (p_count => x_msg_count,
1946: p_data => x_msg_data
1947: );
1948:
1948:
1949: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1950: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1951: ROLLBACK TO create_ctr_associations_pvt;
1952: FND_MSG_PUB.Count_And_Get
1953: (p_count => x_msg_count,
1954: p_data => x_msg_data
1955: );
1956: WHEN OTHERS THEN
1955: );
1956: WHEN OTHERS THEN
1957: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1958: ROLLBACK TO create_ctr_associations_pvt;
1959: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1960: THEN
1961: FND_MSG_PUB.Add_Exc_Msg
1962: (G_PKG_NAME,
1963: l_api_name
1957: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1958: ROLLBACK TO create_ctr_associations_pvt;
1959: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1960: THEN
1961: FND_MSG_PUB.Add_Exc_Msg
1962: (G_PKG_NAME,
1963: l_api_name
1964: );
1965: END IF;
1962: (G_PKG_NAME,
1963: l_api_name
1964: );
1965: END IF;
1966: FND_MSG_PUB.Count_And_Get
1967: (p_count => x_msg_count,
1968: p_data => x_msg_data
1969: );
1970: END create_ctr_associations;
2038: END IF;
2039:
2040: -- Initialize message list if p_init_msg_list is set to TRUE.
2041: IF FND_API.to_Boolean(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
2042: FND_MSG_PUB.initialize;
2043: END IF;
2044:
2045: -- Initialize API return status to success
2046: x_return_status := FND_API.G_RET_STS_SUCCESS;
2200: EXCEPTION
2201: WHEN FND_API.G_EXC_ERROR THEN
2202: x_return_status := FND_API.G_RET_STS_ERROR ;
2203: ROLLBACK TO create_reading_lock_pvt;
2204: FND_MSG_PUB.Count_And_Get
2205: (p_count => x_msg_count,
2206: p_data => x_msg_data
2207: );
2208:
2208:
2209: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2210: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2211: ROLLBACK TO create_reading_lock_pvt;
2212: FND_MSG_PUB.Count_And_Get
2213: (p_count => x_msg_count,
2214: p_data => x_msg_data
2215: );
2216: WHEN OTHERS THEN
2215: );
2216: WHEN OTHERS THEN
2217: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2218: ROLLBACK TO create_reading_lock_pvt;
2219: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2220: THEN
2221: FND_MSG_PUB.Add_Exc_Msg
2222: (G_PKG_NAME,
2223: l_api_name
2217: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2218: ROLLBACK TO create_reading_lock_pvt;
2219: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2220: THEN
2221: FND_MSG_PUB.Add_Exc_Msg
2222: (G_PKG_NAME,
2223: l_api_name
2224: );
2225: END IF;
2222: (G_PKG_NAME,
2223: l_api_name
2224: );
2225: END IF;
2226: FND_MSG_PUB.Count_And_Get
2227: (p_count => x_msg_count,
2228: p_data => x_msg_data
2229: );
2230: END create_reading_lock;
2283: END IF;
2284:
2285: -- Initialize message list if p_init_msg_list is set to TRUE.
2286: IF FND_API.to_Boolean(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
2287: FND_MSG_PUB.initialize;
2288: END IF;
2289:
2290: -- Initialize API return status to success
2291: x_return_status := FND_API.G_RET_STS_SUCCESS;
2424: EXCEPTION
2425: WHEN FND_API.G_EXC_ERROR THEN
2426: x_return_status := FND_API.G_RET_STS_ERROR ;
2427: ROLLBACK TO create_daily_usage_pvt;
2428: FND_MSG_PUB.Count_And_Get
2429: (p_count => x_msg_count,
2430: p_data => x_msg_data
2431: );
2432:
2432:
2433: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2434: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2435: ROLLBACK TO create_daily_usage_pvt;
2436: FND_MSG_PUB.Count_And_Get
2437: (p_count => x_msg_count,
2438: p_data => x_msg_data
2439: );
2440: WHEN OTHERS THEN
2439: );
2440: WHEN OTHERS THEN
2441: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2442: ROLLBACK TO create_daily_usage_pvt;
2443: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2444: THEN
2445: FND_MSG_PUB.Add_Exc_Msg
2446: (G_PKG_NAME,
2447: l_api_name
2441: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2442: ROLLBACK TO create_daily_usage_pvt;
2443: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2444: THEN
2445: FND_MSG_PUB.Add_Exc_Msg
2446: (G_PKG_NAME,
2447: l_api_name
2448: );
2449: END IF;
2446: (G_PKG_NAME,
2447: l_api_name
2448: );
2449: END IF;
2450: FND_MSG_PUB.Count_And_Get
2451: (p_count => x_msg_count,
2452: p_data => x_msg_data
2453: );
2454: END create_daily_usage;
2524: END IF;
2525:
2526: -- Initialize message list if p_init_msg_list is set to TRUE.
2527: IF FND_API.to_Boolean(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
2528: FND_MSG_PUB.initialize;
2529: END IF;
2530:
2531: -- Initialize API return status to success
2532: x_return_status := FND_API.G_RET_STS_SUCCESS;
3261: EXCEPTION
3262: WHEN FND_API.G_EXC_ERROR THEN
3263: x_return_status := FND_API.G_RET_STS_ERROR ;
3264: ROLLBACK TO update_counter_pvt;
3265: FND_MSG_PUB.Count_And_Get
3266: (p_count => x_msg_count,
3267: p_data => x_msg_data
3268: );
3269:
3269:
3270: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3271: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3272: ROLLBACK TO update_counter_pvt;
3273: FND_MSG_PUB.Count_And_Get
3274: (p_count => x_msg_count,
3275: p_data => x_msg_data
3276: );
3277: WHEN OTHERS THEN
3276: );
3277: WHEN OTHERS THEN
3278: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3279: ROLLBACK TO update_counter_pvt;
3280: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3281: THEN
3282: FND_MSG_PUB.Add_Exc_Msg
3283: (G_PKG_NAME,
3284: l_api_name
3278: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3279: ROLLBACK TO update_counter_pvt;
3280: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3281: THEN
3282: FND_MSG_PUB.Add_Exc_Msg
3283: (G_PKG_NAME,
3284: l_api_name
3285: );
3286: END IF;
3283: (G_PKG_NAME,
3284: l_api_name
3285: );
3286: END IF;
3287: FND_MSG_PUB.Count_And_Get
3288: (p_count => x_msg_count,
3289: p_data => x_msg_data
3290: );
3291: END update_counter;
3340: END IF;
3341:
3342: -- Initialize message list if p_init_msg_list is set to TRUE.
3343: IF FND_API.to_Boolean(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
3344: FND_MSG_PUB.initialize;
3345: END IF;
3346:
3347: -- Initialize API return status to success
3348: x_return_status := FND_API.G_RET_STS_SUCCESS;
3695: EXCEPTION
3696: WHEN FND_API.G_EXC_ERROR THEN
3697: x_return_status := FND_API.G_RET_STS_ERROR ;
3698: ROLLBACK TO update_ctr_property_pvt;
3699: FND_MSG_PUB.Count_And_Get
3700: (p_count => x_msg_count,
3701: p_data => x_msg_data
3702: );
3703:
3703:
3704: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3705: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3706: ROLLBACK TO update_ctr_property_pvt;
3707: FND_MSG_PUB.Count_And_Get
3708: (p_count => x_msg_count,
3709: p_data => x_msg_data
3710: );
3711: WHEN OTHERS THEN
3710: );
3711: WHEN OTHERS THEN
3712: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3713: ROLLBACK TO update_ctr_property_pvt;
3714: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3715: THEN
3716: FND_MSG_PUB.Add_Exc_Msg
3717: (G_PKG_NAME,
3718: l_api_name
3712: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3713: ROLLBACK TO update_ctr_property_pvt;
3714: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3715: THEN
3716: FND_MSG_PUB.Add_Exc_Msg
3717: (G_PKG_NAME,
3718: l_api_name
3719: );
3720: END IF;
3717: (G_PKG_NAME,
3718: l_api_name
3719: );
3720: END IF;
3721: FND_MSG_PUB.Count_And_Get
3722: (p_count => x_msg_count,
3723: p_data => x_msg_data
3724: );
3725: END update_ctr_property;
3769: END IF;
3770:
3771: -- Initialize message list if p_init_msg_list is set to TRUE.
3772: IF FND_API.to_Boolean(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
3773: FND_MSG_PUB.initialize;
3774: END IF;
3775:
3776: -- Initialize API return status to success
3777: x_return_status := FND_API.G_RET_STS_SUCCESS;
4053: EXCEPTION
4054: WHEN FND_API.G_EXC_ERROR THEN
4055: x_return_status := FND_API.G_RET_STS_ERROR ;
4056: ROLLBACK TO update_ctr_associations_pvt;
4057: FND_MSG_PUB.Count_And_Get
4058: (p_count => x_msg_count,
4059: p_data => x_msg_data
4060: );
4061:
4061:
4062: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4063: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4064: ROLLBACK TO update_ctr_associations_pvt;
4065: FND_MSG_PUB.Count_And_Get
4066: (p_count => x_msg_count,
4067: p_data => x_msg_data
4068: );
4069: WHEN OTHERS THEN
4068: );
4069: WHEN OTHERS THEN
4070: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4071: ROLLBACK TO update_ctr_associations_pvt;
4072: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4073: THEN
4074: FND_MSG_PUB.Add_Exc_Msg
4075: (G_PKG_NAME,
4076: l_api_name
4070: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4071: ROLLBACK TO update_ctr_associations_pvt;
4072: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4073: THEN
4074: FND_MSG_PUB.Add_Exc_Msg
4075: (G_PKG_NAME,
4076: l_api_name
4077: );
4078: END IF;
4075: (G_PKG_NAME,
4076: l_api_name
4077: );
4078: END IF;
4079: FND_MSG_PUB.Count_And_Get
4080: (p_count => x_msg_count,
4081: p_data => x_msg_data
4082: );
4083: END update_ctr_associations;
4124: END IF;
4125:
4126: -- Initialize message list if p_init_msg_list is set to TRUE.
4127: IF FND_API.to_Boolean(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
4128: FND_MSG_PUB.initialize;
4129: END IF;
4130:
4131: -- Initialize API return status to success
4132: x_return_status := FND_API.G_RET_STS_SUCCESS;
4326: EXCEPTION
4327: WHEN FND_API.G_EXC_ERROR THEN
4328: x_return_status := FND_API.G_RET_STS_ERROR;
4329: ROLLBACK TO update_ctr_val_max_seq_no;
4330: FND_MSG_PUB.Count_And_Get
4331: (p_count => x_msg_count,
4332: p_data => x_msg_data
4333: );
4334: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4333: );
4334: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4335: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4336: ROLLBACK TO update_ctr_val_max_seq_no;
4337: FND_MSG_PUB.Count_And_Get
4338: (p_count => x_msg_count,
4339: p_data => x_msg_data
4340: );
4341: WHEN OTHERS THEN
4340: );
4341: WHEN OTHERS THEN
4342: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4343: ROLLBACK TO update_ctr_val_max_seq_no;
4344: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4345: THEN
4346: FND_MSG_PUB.Add_Exc_Msg
4347: (G_PKG_NAME,
4348: l_api_name
4342: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4343: ROLLBACK TO update_ctr_val_max_seq_no;
4344: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4345: THEN
4346: FND_MSG_PUB.Add_Exc_Msg
4347: (G_PKG_NAME,
4348: l_api_name
4349: );
4350: END IF;
4347: (G_PKG_NAME,
4348: l_api_name
4349: );
4350: END IF;
4351: FND_MSG_PUB.Count_And_Get
4352: (p_count => x_msg_count,
4353: p_data => x_msg_data
4354: );
4355: END update_ctr_val_max_seq_no;