[Home] [Help]
465: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
466: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
467: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
468: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
469: FND_MSG_PUB.add;
470:
471: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
472: RETURN lv_exists_flag;
473:
512: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
513: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
514: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
515: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
516: FND_MSG_PUB.add;
517:
518: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
519: RETURN lv_exists_flag;
520:
560: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
561: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
562: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
563: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
564: FND_MSG_PUB.add;
565:
566: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
567: RETURN lv_exists_flag;
568:
609: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
610: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
611: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
612: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
613: FND_MSG_PUB.add;
614:
615: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
616: RETURN lv_exists_flag;
617:
653: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
654: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
655: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
656: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
657: FND_MSG_PUB.add;
658:
659: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
660: RETURN lv_exists_flag;
661:
711: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
712: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
713: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
714: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
715: FND_MSG_PUB.add;
716:
717: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
718: RETURN lv_exists_flag;
719:
856: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
857: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
858: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
859: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
860: FND_MSG_PUB.add;
861:
862: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
863: RETURN lv_exists_flag;
864:
957: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
958: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
959: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
960: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
961: FND_MSG_PUB.add;
962:
963: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
964: RETURN lv_exists_flag;
965:
1009: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
1010: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
1011: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
1012: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
1013: FND_MSG_PUB.add;
1014:
1015: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1016: RETURN l_exists_flag;
1017:
1088: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
1089: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
1090: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
1091: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
1092: FND_MSG_PUB.add;
1093:
1094: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1095: RETURN lv_exists_flag;
1096:
1132: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
1133: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
1134: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
1135: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
1136: FND_MSG_PUB.add;
1137:
1138: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1139: RETURN lv_temp;
1140:
1181: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
1182: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
1183: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
1184: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
1185: FND_MSG_PUB.add;
1186:
1187: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1188: RETURN lv_exists_flag;
1189: END;
1232: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
1233: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
1234: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
1235: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
1236: FND_MSG_PUB.add;
1237:
1238: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1239: RETURN lv_exists_flag;
1240: END;
1290: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
1291: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
1292: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
1293: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
1294: FND_MSG_PUB.add;
1295:
1296: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1297: RETURN lv_exists_flag;
1298: END;
1341: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
1342: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
1343: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
1344: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
1345: FND_MSG_PUB.add;
1346:
1347: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1348: RETURN lv_exists_flag;
1349:
1389: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
1390: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
1391: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
1392: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
1393: FND_MSG_PUB.add;
1394:
1395: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1396: RETURN lv_exists_flag;
1397: END;
1452: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
1453: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
1454: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
1455: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
1456: FND_MSG_PUB.add;
1457:
1458: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1459: RETURN lv_exists_flag;
1460:
1494: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
1495: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
1496: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
1497: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
1498: FND_MSG_PUB.add;
1499:
1500: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1501: RETURN lv_exists_flag;
1502:
1539: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
1540: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
1541: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
1542: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
1543: FND_MSG_PUB.add;
1544:
1545: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1546: RETURN lv_exists_flag;
1547:
1588: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
1589: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
1590: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
1591: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
1592: FND_MSG_PUB.add;
1593:
1594: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1595: RETURN lv_exists_flag;
1596:
1656: END IF;
1657:
1658: -- Initialize message list if p_init_msg_list is set to TRUE
1659: IF FND_API.To_Boolean(p_init_msg_list) THEN
1660: FND_MSG_PUB.Initialize;
1661: END IF;
1662:
1663: -- Initialize API return status to success
1664: x_return_status := FND_API.G_RET_STS_SUCCESS;
1745:
1746: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1747: FND_MESSAGE.Set_Name('CS', 'CS_API_CHG_ERR_PRE_CUST_USR_HK');
1748: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
1749: FND_MSG_PUB.Add;
1750: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1751: END IF;
1752:
1753: END IF;
1780:
1781: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1782: FND_MESSAGE.Set_Name('CS', 'CS_API_CHG_ERR_PRE_VERT_USR_HK');
1783: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
1784: FND_MSG_PUB.Add;
1785: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1786: END IF;
1787:
1788: END IF;
1826:
1827: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1828: FND_MESSAGE.Set_Name('CS', 'CS_CHG_VALIDATE_CHRG_DETAIL_ER');
1829: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
1830: FND_MSG_PUB.Add;
1831: RAISE FND_API.G_EXC_ERROR;
1832: END IF;
1833:
1834: --Fixed Bug # 3795144
2157:
2158: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2159: FND_MESSAGE.Set_Name('CS', 'CS_API_CHG_ERR_PST_CUST_USR_HK');
2160: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
2161: FND_MSG_PUB.Add;
2162:
2163: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2164: END IF;
2165:
2193:
2194: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2195: FND_MESSAGE.Set_Name('CS', 'CS_API_CHG_ERR_PST_VERT_USR_HK');
2196: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
2197: FND_MSG_PUB.Add;
2198: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2199: END IF;
2200: END IF;
2201:
2204: IF FND_API.To_Boolean(p_commit) THEN
2205: COMMIT WORK;
2206: END IF;
2207:
2208: FND_MSG_PUB.Count_And_Get
2209: ( p_count => x_msg_count,
2210: p_data => x_msg_data,
2211: p_encoded => FND_API.G_FALSE) ;
2212:
2218: ROLLBACK TO Create_Charge_Details_PVT;
2219: END IF ;
2220:
2221:
2222: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2223: p_data => x_msg_data,
2224: p_encoded => FND_API.G_FALSE) ;
2225:
2226:
2235: END IF ;
2236:
2237: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2238:
2239: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2240: p_data => x_msg_data,
2241: p_encoded => FND_API.G_FALSE) ;
2242: WHEN OTHERS THEN
2243: --l_errm := SQLERRM;
2248: END IF ;
2249:
2250: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2251:
2252: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2253: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2254: END IF;
2255:
2256: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2249:
2250: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2251:
2252: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2253: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2254: END IF;
2255:
2256: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2257: p_data => x_msg_data,
2252: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2253: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2254: END IF;
2255:
2256: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2257: p_data => x_msg_data,
2258: p_encoded => FND_API.G_FALSE) ;
2259:
2260: END Create_Charge_Details;
2313: END IF;
2314:
2315: -- Initialize message list if p_init_msg_list is set to TRUE
2316: IF FND_API.To_Boolean(p_init_msg_list) THEN
2317: FND_MSG_PUB.Initialize;
2318: END IF;
2319:
2320: -- Initialize API return status to success
2321: x_return_status := FND_API.G_RET_STS_SUCCESS;
2400:
2401: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2402: FND_MESSAGE.Set_Name('CS', 'CS_API_CHG_ERR_PRE_CUST_USR_HK');
2403: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
2404: FND_MSG_PUB.Add;
2405: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2406: END IF;
2407:
2408: END IF;
2433:
2434: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2435: FND_MESSAGE.Set_Name('CS', 'CS_API_CHG_ERR_PRE_VERT_USR_HK');
2436: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
2437: FND_MSG_PUB.Add;
2438: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2439: END IF;
2440:
2441: END IF;
2472:
2473: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2474: FND_MESSAGE.Set_Name('CS', 'CS_CHG_VALIDATE_CHRG_DETAIL_ER');
2475: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
2476: FND_MSG_PUB.Add;
2477: RAISE FND_API.G_EXC_ERROR;
2478: END IF;
2479:
2480: --Fixed Bug # 3795144
2770: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2771: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Customer User Hook');
2772: FND_MESSAGE.Set_Name('CS', 'CS_API_CHG_ERR_PST_CUST_USR_HK');
2773: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
2774: FND_MSG_PUB.Add;
2775: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2776: END IF;
2777:
2778: END IF;
2804:
2805: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2806: FND_MESSAGE.Set_Name('CS', 'CS_API_CHG_ERR_PST_VERT_USR_HK');
2807: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
2808: FND_MSG_PUB.Add;
2809: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2810: END IF;
2811:
2812: END IF;
2818: COMMIT WORK;
2819: END IF;
2820:
2821: -- Standard call to get message count and if count is 1, get message info
2822: FND_MSG_PUB.Count_And_Get
2823: (p_count => x_msg_count,
2824: p_data => x_msg_data,
2825: p_encoded => FND_API.G_FALSE) ;
2826:
2829: COMMIT WORK;
2830: END IF;
2831:
2832: -- Standard call to get message count and if count is 1, get message info
2833: FND_MSG_PUB.Count_And_Get
2834: ( p_count => x_msg_count,
2835: p_data => x_msg_data
2836: );
2837:
2841: IF FND_API.To_Boolean(p_transaction_control) THEN
2842: ROLLBACK TO Update_Charge_Details_PVT;
2843: END IF ;
2844: x_return_status := FND_API.G_RET_STS_ERROR;
2845: FND_MSG_PUB.Count_And_Get(
2846: p_count => x_msg_count,
2847: p_data => x_msg_data,
2848: p_encoded => FND_API.G_FALSE) ;
2849:
2853: END IF ;
2854:
2855: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2856:
2857: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2858: p_data => x_msg_data,
2859: p_encoded => FND_API.G_FALSE) ;
2860: WHEN OTHERS THEN
2861: IF FND_API.To_Boolean(p_transaction_control) THEN
2864: END IF ;
2865:
2866: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2867:
2868: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2869: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2870: END IF;
2871:
2872: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2865:
2866: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2867:
2868: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2869: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2870: END IF;
2871:
2872: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2873: p_data => x_msg_data,
2868: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2869: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2870: END IF;
2871:
2872: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2873: p_data => x_msg_data,
2874: p_encoded => FND_API.G_FALSE) ;
2875:
2876: END Update_Charge_Details;
2931: END IF ;
2932:
2933: --Initialize the message list if p_msg_list is set to TRUE
2934: IF FND_API.To_Boolean(p_init_msg_list) THEN
2935: FND_MSG_PUB.initialize ;
2936: END IF ;
2937:
2938: --Initialize the API Return Success to True
2939: x_return_status := FND_API.G_RET_STS_SUCCESS ;
3023: COMMIT WORK ;
3024: END IF ;
3025:
3026: --Standard call to get message count and if count is 1 , get message info
3027: FND_MSG_PUB.Count_And_Get(p_count =>x_msg_count,
3028: p_data => x_msg_data) ;
3029:
3030: --Begin Exception Handling
3031:
3036: ROLLBACK TO Delete_Charge_Details_PUB;
3037: END IF ;
3038: x_return_status := FND_API.G_RET_STS_ERROR ;
3039:
3040: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3041: p_data => x_msg_data,
3042: p_encoded => FND_API.G_FALSE) ;
3043:
3044:
3048: ROLLBACK TO Delete_Charge_Details_PUB;
3049: END IF ;
3050: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3051:
3052: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3053: p_data => x_msg_data,
3054: p_encoded => FND_API.G_FALSE) ;
3055:
3056: WHEN OTHERS THEN
3057: IF FND_API.To_Boolean( p_transaction_control ) THEN
3058: ROLLBACK TO Delete_Charge_Details_PUB;
3059: END IF ;
3060: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3061: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3062: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
3063: END IF ;
3064: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3065: p_data => x_msg_data,
3058: ROLLBACK TO Delete_Charge_Details_PUB;
3059: END IF ;
3060: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3061: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3062: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
3063: END IF ;
3064: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3065: p_data => x_msg_data,
3066: p_encoded => FND_API.G_FALSE) ;
3060: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3061: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3062: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
3063: END IF ;
3064: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3065: p_data => x_msg_data,
3066: p_encoded => FND_API.G_FALSE) ;
3067:
3068: END Delete_Charge_Details; -- End of Procedure Delete Charge Details
3123: END IF;
3124:
3125: -- Initialize message list if p_init_msg_list is set to TRUE
3126: IF FND_API.To_Boolean(p_init_msg_list) THEN
3127: FND_MSG_PUB.Initialize;
3128: END IF;
3129:
3130: -- Initialize API return status to success
3131: x_return_status := FND_API.G_RET_STS_SUCCESS;
3170:
3171: IF p_estimate_detail_id IS NULL THEN
3172: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_NOT_A_VALID_CHARGE_LINE');
3173: FND_MESSAGE.SET_TOKEN('ESTIMATE_DETAIL_ID', p_estimate_detail_id);
3174: FND_MSG_PUB.ADD;
3175: RAISE FND_API.G_EXC_ERROR;
3176: END IF;
3177:
3178: --DBMS_OUTPUT.PUT_LINE('passed 1st val');
3182: IF c_charges_rec%NOTFOUND THEN
3183: CLOSE c_charges_rec;
3184: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_NOT_A_VALID_CHARGE_LINE');
3185: FND_MESSAGE.SET_TOKEN('ESTIMATE_DETAIL_ID', p_estimate_detail_id);
3186: FND_MSG_PUB.ADD;
3187: RAISE FND_API.G_EXC_ERROR;
3188: END IF;
3189: CLOSE c_charges_rec;
3190:
3192:
3193: IF v_charges_rec.charge_line_type <> 'ESTIMATE' THEN
3194: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_NOT_AN_ESTIMATE');
3195: FND_MESSAGE.SET_TOKEN('ESTIMATE_DETAIL_ID', p_estimate_detail_id);
3196: FND_MSG_PUB.ADD;
3197: RAISE FND_API.G_EXC_ERROR;
3198: END IF;
3199:
3200: --DBMS_OUTPUT.PUT_LINE('passed 3rd val');
3444: COMMIT WORK ;
3445: END IF ;
3446:
3447: --Standard call to get message count and if count is 1 , get message info
3448: FND_MSG_PUB.Count_And_Get(p_count =>x_msg_count,
3449: p_data => x_msg_data) ;
3450:
3451:
3452:
3460: END IF ;
3461:
3462: x_return_status := FND_API.G_RET_STS_ERROR ;
3463:
3464: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3465: p_data => x_msg_data,
3466: p_encoded => FND_API.G_FALSE) ;
3467:
3468:
3472: END IF ;
3473:
3474: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3475:
3476: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3477: p_data => x_msg_data,
3478: p_encoded => FND_API.G_FALSE) ;
3479: WHEN OTHERS THEN
3480: IF FND_API.To_Boolean( p_transaction_control ) THEN
3482: END IF ;
3483:
3484: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3485:
3486: IF FND_MSG_PUB.Check_Msg_Level
3487: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3488: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
3489: END IF ;
3490:
3483:
3484: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3485:
3486: IF FND_MSG_PUB.Check_Msg_Level
3487: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3488: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
3489: END IF ;
3490:
3491: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3484: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3485:
3486: IF FND_MSG_PUB.Check_Msg_Level
3487: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3488: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
3489: END IF ;
3490:
3491: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3492: p_data => x_msg_data,
3487: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3488: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
3489: END IF ;
3490:
3491: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3492: p_data => x_msg_data,
3493: p_encoded => FND_API.G_FALSE) ;
3494:
3495: END Copy_Estimate;
3903: IF l_disallow_new_charge = 'Y' THEN
3904: --DBMS_OUTPUT.PUT_LINE('l_disallow_new_charge is '||l_disallow_new_charge);
3905: --raise error
3906: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_CANNOT_INSERT');
3907: FND_MSG_PUB.ADD;
3908: RAISE FND_API.G_EXC_ERROR;
3909: END IF;
3910: ELSIF p_validation_mode = 'U' THEN
3911: IF l_disallow_charge_update = 'Y' THEN
3910: ELSIF p_validation_mode = 'U' THEN
3911: IF l_disallow_charge_update = 'Y' THEN
3912: --raise error
3913: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_CANNOT_UPDATE');
3914: FND_MSG_PUB.ADD;
3915: RAISE FND_API.G_EXC_ERROR;
3916: END IF;
3917: END IF;
3918:
4182: --raise error
4183: --Need to define error here
4184: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_CANNOT_CHANGE_OU');
4185: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
4186: FND_MSG_PUB.ADD;
4187: RAISE FND_API.G_EXC_ERROR;
4188: ELSE
4189: x_charges_detail_rec.org_id := p_charges_detail_rec.org_id;
4190: END IF;
4242: IF p_charges_detail_rec.org_id <> l_db_det_rec.org_id THEN
4243: --raise error
4244: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_CANNOT_CHANGE_OU');
4245: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
4246: FND_MSG_PUB.ADD;
4247: RAISE FND_API.G_EXC_ERROR;
4248: ELSE
4249: x_charges_detail_rec.org_id := p_charges_detail_rec.org_id;
4250: END IF;
4263:
4264: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_ORIGINAL_SOURCE');
4265: FND_MESSAGE.SET_TOKEN('ORIG_SOURCE_ID', p_charges_detail_rec.original_source_id);
4266: FND_MESSAGE.SET_TOKEN('ORIG_SOURCE_CODE', p_charges_detail_rec.original_source_code);
4267: FND_MSG_PUB.ADD;
4268: RAISE FND_API.G_EXC_ERROR;
4269:
4270: ELSE
4271: VALIDATE_SOURCE(
4285: --raise error
4286: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_ORIGINAL_SOURCE');
4287: FND_MESSAGE.SET_TOKEN('ORIG_SOURCE_ID', p_charges_detail_rec.original_source_id);
4288: FND_MESSAGE.SET_TOKEN('ORIG_SOURCE_CODE', p_charges_detail_rec.original_source_code);
4289: FND_MSG_PUB.ADD;
4290: RAISE FND_API.G_EXC_ERROR;
4291: END IF;
4292:
4293: -- assign to out record
4438:
4439: ELSE
4440: --DBMS_OUTPUT.PUT_LINE('Coming to the else');
4441: FND_MESSAGE.Set_Name('CS', 'CS_CHG_CANNOT_UPDATE_CHRG_LINE');
4442: FND_MSG_PUB.Add;
4443: RAISE FND_API.G_EXC_ERROR;
4444: END IF;
4445:
4446: IF (p_charges_detail_rec.charge_line_type <> FND_API.G_MISS_CHAR OR
4620: p_charges_detail_rec.pricing_attribute99 <> FND_API.G_MISS_CHAR OR
4621: p_charges_detail_rec.pricing_attribute100 <> FND_API.G_MISS_CHAR ) THEN
4622:
4623: FND_MESSAGE.Set_Name('CS', 'CS_CHG_CANNOT_UPDATE_CHRG_LINE');
4624: FND_MSG_PUB.Add;
4625: RAISE FND_API.G_EXC_ERROR;
4626: END IF;
4627: ELSE
4628: --l_in_oe_flag = 'N'
4833:
4834: --RAISE FND_API.G_EXC_ERROR;
4835: --null;
4836: FND_MESSAGE.Set_Name('CS', 'CS_CHG_CANNOT_UPDATE_CHRG_LINE');
4837: FND_MSG_PUB.Add;
4838: RAISE FND_API.G_EXC_ERROR;
4839: END IF;
4840:
4841: -- If generated by BCA Engine then cannot update anything except the final amount
4926: ELSE
4927: -- give an error message
4928: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_CANNOT_UPDATE_INPROG');
4929: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
4930: FND_MSG_PUB.ADD;
4931: RAISE FND_API.G_EXC_ERROR;
4932: END IF;
4933: ELSE
4934: --get it from the db record
4936:
4937: IF x_charges_detail_rec.charge_line_type = 'IN PROGRESS' THEN
4938: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_CANNOT_UPDATE_INPROG');
4939: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
4940: FND_MSG_PUB.ADD;
4941: RAISE FND_API.G_EXC_ERROR;
4942: END IF;
4943: END IF;
4944:
5024: ELSE
5025: -- Raise Error
5026: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_BUSS_PROCESS_ID');
5027: FND_MESSAGE.SET_TOKEN('BUSINESS_PROCESS_ID', l_business_process_id);
5028: FND_MSG_PUB.ADD;
5029: RAISE FND_API.G_EXC_ERROR;
5030: END IF;
5031: ELSE
5032: -- Profile to get Business Process From SR = 'N'
5032: -- Profile to get Business Process From SR = 'N'
5033: -- Raise error the Business Process ID IS Null and needed
5034: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_BUSS_PROCESS_ID');
5035: FND_MESSAGE.SET_TOKEN('BUSINESS_PROCESS_ID', p_charges_detail_rec.business_process_id);
5036: FND_MSG_PUB.ADD;
5037: RAISE FND_API.G_EXC_ERROR;
5038: END IF;
5039: END IF;
5040:
5122: IF l_create_charge_flag = 'N' THEN
5123: --DBMS_OUTPUT.PUT_LINE('l_disallow_new_charge is '||l_disallow_new_charge);
5124: --raise error
5125: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CHARGE_FLAG');
5126: FND_MSG_PUB.ADD;
5127: RAISE FND_API.G_EXC_ERROR;
5128: END IF;
5129:
5130: -- end
5327: IF p_charges_detail_rec.line_category_code <> l_line_order_category_code THEN
5328: --raise error
5329: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_LN_ORD_CATEGORY');
5330: FND_MESSAGE.SET_TOKEN('LINE_ORDER_CATEGORY', p_charges_detail_rec.line_category_code);
5331: FND_MSG_PUB.ADD;
5332: RAISE FND_API.G_EXC_ERROR;
5333: ELSE
5334: -- the p_charges_detail_rec.line_category_code
5335: -- matches l_line_order_category_code
5355: IF p_charges_detail_rec.line_category_code <> l_line_order_category_code THEN
5356: --raise error
5357: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_LN_ORD_CATEGORY');
5358: FND_MESSAGE.SET_TOKEN('LINE_ORDER_CATEGORY', p_charges_detail_rec.line_category_code);
5359: FND_MSG_PUB.ADD;
5360: RAISE FND_API.G_EXC_ERROR;
5361: ELSE
5362: -- the p_charges_detail_rec.line_category_code
5363: -- matches l_line_order_category_code
5376: IF p_charges_detail_rec.line_category_code <> l_db_det_rec.line_category_code THEN
5377: --raise error
5378: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_LN_ORD_CATEGORY');
5379: FND_MESSAGE.SET_TOKEN('LINE_ORDER_CATEGORY', p_charges_detail_rec.line_category_code);
5380: FND_MSG_PUB.ADD;
5381: RAISE FND_API.G_EXC_ERROR;
5382: ELSE
5383: -- the p_charges_detail_rec.line_category_code
5384: -- matches l_db_det_rec.line_category_code
5552:
5553: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5554: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_VALIDATE_ITEM_ERROR');
5555: FND_MESSAGE.SET_TOKEN('INV_ID', p_charges_detail_rec.inventory_item_id_in);
5556: FND_MSG_PUB.ADD;
5557: RAISE FND_API.G_EXC_ERROR;
5558: ELSE
5559: --assign to out record
5560: x_charges_detail_rec.inventory_item_id_in := p_charges_detail_rec.inventory_item_id_in;
5606:
5607: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5608: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_VALIDATE_ITEM_ERROR');
5609: FND_MESSAGE.SET_TOKEN('INV_ID', p_charges_detail_rec.inventory_item_id_in);
5610: FND_MSG_PUB.ADD;
5611: RAISE FND_API.G_EXC_ERROR;
5612: END IF;
5613:
5614: --assign to out record
5685: --raise error
5686: --FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_ITEM_REVISION');
5687: --FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_charges_detail_rec.inventory_item_id_in, TRUE);
5688: --FND_MESSAGE.SET_TOKEN('ITEM_REVISION', p_charges_detail_rec.item_revision, TRUE);
5689: --FND_MSG_PUB.ADD;
5690: --RAISE FND_API.G_EXC_ERROR;
5691: x_charges_detail_rec.item_revision := NULL;
5692: END IF;
5693: ELSE
5725: --item is revision controlled but item revsion is null, raise error
5726: --FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_ITEM_REVISION');
5727: --FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_charges_detail_rec.inventory_item_id_in, TRUE);
5728: --FND_MESSAGE.SET_TOKEN('ITEM_REVISION', p_charges_detail_rec.item_revision, TRUE);
5729: --FND_MSG_PUB.ADD;
5730: --RAISE FND_API.G_EXC_ERROR;
5731: x_charges_detail_rec.item_revision := NULL;
5732: END IF;
5733: ELSE
5861: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5862: --raise error
5863: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_PRIMARY_UOM_ERROR');
5864: FND_MESSAGE.SET_TOKEN('INV_ID', p_charges_detail_rec.inventory_item_id_in);
5865: FND_MSG_PUB.ADD;
5866: RAISE FND_API.G_EXC_ERROR;
5867: END IF;
5868:
5869: --assign to out record
5924: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5925: --raise error
5926: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_PRIMARY_UOM_ERROR');
5927: FND_MESSAGE.SET_TOKEN('INV_ID', p_charges_detail_rec.inventory_item_id_in);
5928: FND_MSG_PUB.ADD;
5929: RAISE FND_API.G_EXC_ERROR;
5930: END IF;
5931:
5932: --assign to out record
6020: ELSE
6021: -- Billing Flag does not match, raise Error
6022: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_BILLING_FLAG');
6023: FND_MESSAGE.SET_TOKEN('BILLING_FLAG', p_charges_detail_rec.billing_flag);
6024: FND_MSG_PUB.ADD;
6025: RAISE FND_API.G_EXC_ERROR;
6026: END IF;
6027: ELSE
6028: -- p_charges_detail_rec.billing_flag is null
6059: -- Billing Flag does not match
6060: -- Raise Error
6061: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_BILLING_FLAG');
6062: FND_MESSAGE.SET_TOKEN('BILLING_FLAG', p_charges_detail_rec.billing_flag);
6063: FND_MSG_PUB.ADD;
6064: RAISE FND_API.G_EXC_ERROR;
6065: END IF;
6066:
6067: ELSE
6122: IF p_charges_detail_rec.txn_billing_type_id <> l_txn_billing_type_id THEN
6123: --RAISE ERROR
6124: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_TXN_BILLING_TYP');
6125: FND_MESSAGE.SET_TOKEN('TXN_BILLING_TYPE_ID', p_charges_detail_rec.txn_billing_type_id);
6126: FND_MSG_PUB.ADD;
6127: RAISE FND_API.G_EXC_ERROR;
6128: ELSE --
6129: --the ids match
6130: --assign to the out record
6163: IF p_charges_detail_rec.txn_billing_type_id <> l_txn_billing_type_id THEN
6164: --RAISE ERROR
6165: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_TXN_BILLING_TYP');
6166: FND_MESSAGE.SET_TOKEN('TXN_BILLING_TYPE_ID', p_charges_detail_rec.txn_billing_type_id);
6167: FND_MSG_PUB.ADD;
6168: RAISE FND_API.G_EXC_ERROR;
6169: ELSE --
6170: --the ids match
6171: --assign to the out record
6234: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_LINE_TYPE');
6235: FND_MESSAGE.SET_TOKEN('LINE_TYPE_ID', p_charges_detail_rec.line_type_id);
6236: FND_MESSAGE.SET_TOKEN('TXN_LINE_TYPE_ID', l_line_type_id);
6237: FND_MESSAGE.SET_TOKEN('TXN_BILLING_TYPE_ID', x_charges_detail_rec.txn_billing_type_id);
6238: FND_MSG_PUB.ADD;
6239: RAISE FND_API.G_EXC_ERROR;
6240: ELSE --
6241: --the ids match
6242: --assign to the out record
6278: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_LINE_TYPE');
6279: FND_MESSAGE.SET_TOKEN('LINE_TYPE_ID', p_charges_detail_rec.line_type_id);
6280: FND_MESSAGE.SET_TOKEN('TXN_LINE_TYPE_ID', l_line_type_id);
6281: FND_MESSAGE.SET_TOKEN('TXN_BILLING_TYPE_ID', x_charges_detail_rec.txn_billing_type_id);
6282: FND_MSG_PUB.ADD;
6283: RAISE FND_API.G_EXC_ERROR;
6284: ELSE --
6285: --the ids match
6286: --assign to the out record
7468: --raise error
7469: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_SOLD_TO_PARTY');
7470: FND_MESSAGE.SET_TOKEN('SOLD_TO_PARTY', p_charges_detail_rec.sold_to_party_id);
7471: FND_MESSAGE.SET_TOKEN('INCIDENT_ID', p_charges_detail_rec.incident_id);
7472: FND_MSG_PUB.ADD;
7473: RAISE FND_API.G_EXC_ERROR;
7474: ELSE
7475: --assign the sold to party to the out record
7476: x_charges_detail_rec.sold_to_party_id := l_customer_id;
7493: --raise error
7494: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_SOLD_TO_PARTY');
7495: FND_MESSAGE.SET_TOKEN('SOLD_TO_PARTY', p_charges_detail_rec.sold_to_party_id);
7496: FND_MESSAGE.SET_TOKEN('INCIDENT_ID', p_charges_detail_rec.incident_id);
7497: FND_MSG_PUB.ADD;
7498: RAISE FND_API.G_EXC_ERROR;
7499: ELSE
7500: --assign the sold to party to the out record
7501: x_charges_detail_rec.sold_to_party_id := p_charges_detail_rec.sold_to_party_id;
7546: --RAISE FND_API.G_EXC_ERROR;
7547: --null;
7548: FND_MESSAGE.Set_Name('CS', 'CS_API_CHG_IB_INSTANCE_MISSING');
7549: FND_MESSAGE.Set_Token('API_NAME', p_api_name);
7550: FND_MSG_PUB.Add;
7551: RAISE FND_API.G_EXC_ERROR;
7552: ELSE
7553: -- Check if instance is of the same inventory_item_id
7554: -- If not of the same inv id the error
7573:
7574: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_IB_INSTANCE_INV');
7575: FND_MESSAGE.Set_Token('INVENTORY_ITEM_ID', p_charges_detail_rec.inventory_item_id_in);
7576: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
7577: FND_MSG_PUB.Add;
7578: RAISE FND_API.G_EXC_ERROR;
7579: ELSE
7580:
7581: l_valid_check := IS_INSTANCE_VALID(p_instance_id => p_charges_detail_rec.customer_product_id,
7622:
7623: IF l_valid_check <> 'Y' THEN
7624:
7625: FND_MESSAGE.SET_NAME ('CS', 'CS_CHG_INVALID_INSTANCE_RMA_PT');
7626: FND_MSG_PUB.Add;
7627: RAISE FND_API.G_EXC_ERROR;
7628: --taklam
7629: ELSE
7630: --assign the customer product id to out record
7664: IF l_valid_check <> 'Y' THEN
7665: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_SERIAL_NUMBER');
7666: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
7667: FND_MESSAGE.Set_Token('SERIAL_NUMBER', p_charges_detail_rec.serial_number);
7668: FND_MSG_PUB.Add;
7669: RAISE FND_API.G_EXC_ERROR;
7670: ELSE
7671: --assign the customer product id to out record
7672: x_charges_detail_rec.serial_number := p_charges_detail_rec.serial_number;
7687: --RAISE FND_API.G_EXC_ERROR;
7688: --null;
7689: FND_MESSAGE.Set_Name('CS', 'CS_API_CHG_IB_INSTANCE_MISSING');
7690: FND_MESSAGE.Set_Token('API_NAME', p_api_name);
7691: FND_MSG_PUB.Add;
7692: RAISE FND_API.G_EXC_ERROR;
7693: ELSE
7694:
7695:
7710:
7711: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_IB_INSTANCE_PTY');
7712: FND_MESSAGE.Set_Token('PARTY_ID', x_charges_detail_rec.sold_to_party_id);
7713: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
7714: FND_MSG_PUB.Add;
7715: RAISE FND_API.G_EXC_ERROR;
7716:
7717: ELSE
7718: --assign to out record
7752: IF l_valid_check <> 'Y' THEN
7753: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_SERIAL_NUMBER');
7754: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
7755: FND_MESSAGE.Set_Token('SERIAL_NUMBER', p_charges_detail_rec.serial_number);
7756: FND_MSG_PUB.Add;
7757: RAISE FND_API.G_EXC_ERROR;
7758: ELSE
7759: --assign the customer product id to out record
7760: x_charges_detail_rec.serial_number := p_charges_detail_rec.serial_number;
7775: IF (l_comms_trackable_flag = 'N') THEN
7776: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_INST_AND_INV');
7777: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
7778: FND_MESSAGE.Set_Token('INVENTORY_ITEM_ID', p_charges_detail_rec.inventory_item_id_in);
7779: FND_MSG_PUB.Add;
7780: RAISE FND_API.G_EXC_ERROR;
7781: ELSE
7782: -- Check if the Instance Is Valid for all other cases
7783: l_valid_check := IS_INSTANCE_VALID(
7830:
7831: IF l_valid_check <> 'Y' THEN
7832:
7833: --FND_MESSAGE.SET_NAME ('CS', 'CS_CHG_INVALID_INSTANCE_RMA_PT');
7834: --FND_MSG_PUB.Add;
7835: Add_Invalid_Argument_Msg(l_api_name_full,
7836: to_char(p_charges_detail_rec.customer_product_id),
7837: 'Customer_Product_Id');
7838: RAISE FND_API.G_EXC_ERROR;
7876: IF l_valid_check <> 'Y' THEN
7877: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_SERIAL_NUMBER');
7878: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
7879: FND_MESSAGE.Set_Token('SERIAL_NUMBER', p_charges_detail_rec.serial_number);
7880: FND_MSG_PUB.Add;
7881: RAISE FND_API.G_EXC_ERROR;
7882: ELSE
7883: --assign the customer product id to out record
7884: x_charges_detail_rec.serial_number := p_charges_detail_rec.serial_number;
7904: --RAISE FND_API.G_EXC_ERROR;
7905: --null;
7906: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INST_CP_RETURN_BY_DATE');
7907: FND_MESSAGE.Set_Token('INST_CP_RTN_BY_DATE', p_charges_detail_rec.installed_cp_return_by_date);
7908: FND_MSG_PUB.Add;
7909: RAISE FND_API.G_EXC_ERROR;
7910: ELSE
7911: --assign to out record
7912: x_charges_detail_rec.installed_cp_return_by_date := p_charges_detail_rec.installed_cp_return_by_date;
7929: --RAISE FND_API.G_EXC_ERROR;
7930: --null;
7931: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INST_CP_RETURN_BY_DATE');
7932: FND_MESSAGE.Set_Token('INST_CP_RTN_BY_DATE', p_charges_detail_rec.installed_cp_return_by_date);
7933: FND_MSG_PUB.Add;
7934: RAISE FND_API.G_EXC_ERROR;
7935: ELSE
7936: --assign to out record
7937: x_charges_detail_rec.installed_cp_return_by_date := p_charges_detail_rec.installed_cp_return_by_date;
7968: p_charges_detail_rec.customer_product_id IS NOT NULL THEN
7969: IF p_charges_detail_rec.installed_cp_return_by_date IS NULL THEN
7970: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INSTALLED_CP_RETURN_BY_DATE');
7971: FND_MESSAGE.Set_Token('INSTALLED_CP_RTN_BY_DATE', p_charges_detail_rec.installed_cp_return_by_date);
7972: FND_MSG_PUB.Add;
7973: RAISE FND_API.G_EXC_ERROR;
7974: ELSE
7975: x_charges_detail_rec.installed_cp_return_by_date := p_charges_detail_rec.installed_cp_return_by_date;
7976: END IF;
7986: p_charges_detail_rec.customer_product_id IS NULL THEN
7987: IF p_charges_detail_rec.new_cp_return_by_date IS NULL THEN
7988: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_NEW_CP_RETURN_BY_DATE');
7989: FND_MESSAGE.Set_Token('NEW_CP_RTN_BY_DATE', p_charges_detail_rec.new_cp_return_by_date);
7990: FND_MSG_PUB.Add;
7991: RAISE FND_API.G_EXC_ERROR;
7992: ELSE
7993: x_charges_detail_rec.new_cp_return_by_date := p_charges_detail_rec.new_cp_return_by_date;
7994: END IF;
8007: --RAISE FND_API.G_EXC_ERROR;
8008: --null;
8009: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_NEW_CP_RETURN_BY_DATE');
8010: FND_MESSAGE.Set_Token('NEW_CP_RTN_BY_DATE', p_charges_detail_rec.new_cp_return_by_date);
8011: FND_MSG_PUB.Add;
8012: RAISE FND_API.G_EXC_ERROR;
8013: ELSE
8014: x_charges_detail_rec.new_cp_return_by_date := p_charges_detail_rec.new_cp_return_by_date;
8015: END IF;
8060:
8061: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_IB_INSTANCE_INV');
8062: FND_MESSAGE.Set_Token('INVENTORY_ITEM_ID', p_charges_detail_rec.inventory_item_id_in);
8063: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
8064: FND_MSG_PUB.Add;
8065: RAISE FND_API.G_EXC_ERROR;
8066:
8067: ELSE
8068: l_valid_check := IS_INSTANCE_VALID(p_instance_id => p_charges_detail_rec.customer_product_id,
8109:
8110: IF l_valid_check <> 'Y' THEN
8111:
8112: FND_MESSAGE.SET_NAME ('CS', 'CS_CHG_INVALID_INSTANCE_RMA_PT');
8113: FND_MSG_PUB.Add;
8114: RAISE FND_API.G_EXC_ERROR;
8115: --taklam
8116: ELSE
8117: --assign the customer product id to out record
8157: IF l_valid_check <> 'Y' THEN
8158: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_SERIAL_NUMBER');
8159: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
8160: FND_MESSAGE.Set_Token('SERIAL_NUMBER', p_charges_detail_rec.serial_number);
8161: FND_MSG_PUB.Add;
8162: RAISE FND_API.G_EXC_ERROR;
8163: ELSE */
8164:
8165: --assign the customer product id to out record
8192: IF l_valid_check <> 'Y' THEN
8193: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_SERIAL_NUMBER');
8194: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
8195: FND_MESSAGE.Set_Token('SERIAL_NUMBER', p_charges_detail_rec.serial_number);
8196: FND_MSG_PUB.Add;
8197: RAISE FND_API.G_EXC_ERROR;
8198: ELSE
8199: --assign the serial_number to out record
8200: x_charges_detail_rec.serial_number := p_charges_detail_rec.serial_number;
8221: --RAISE FND_API.G_EXC_ERROR;
8222: --null;
8223: FND_MESSAGE.Set_Name('CS', 'CS_API_CHG_IB_INSTANCE_MISSING');
8224: FND_MESSAGE.Set_Token('API_NAME', p_api_name);
8225: FND_MSG_PUB.Add;
8226: RAISE FND_API.G_EXC_ERROR;
8227:
8228: --fixed Bug # 3362130 - added l_comms_trackable_flag = 'Y' condition
8229: ELSIF (l_non_src_reference_reqd_flag = 'Y') AND
8233: --RAISE FND_API.G_EXC_ERROR;
8234: --null;
8235: FND_MESSAGE.Set_Name('CS', 'CS_API_CHG_IB_INSTANCE_MISSING');
8236: FND_MESSAGE.Set_Token('API_NAME', p_api_name);
8237: FND_MSG_PUB.Add;
8238: RAISE FND_API.G_EXC_ERROR;
8239: ELSE
8240: x_charges_detail_rec.customer_product_id := NULL;
8241: END IF;
8255: IF (l_comms_trackable_flag = 'N') THEN
8256: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_INST_AND_INV');
8257: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
8258: FND_MESSAGE.Set_Token('INVENTORY_ITEM_ID', p_charges_detail_rec.inventory_item_id_in);
8259: FND_MSG_PUB.Add;
8260: RAISE FND_API.G_EXC_ERROR;
8261:
8262: ELSE
8263:
8281:
8282: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_IB_INSTANCE_INV');
8283: FND_MESSAGE.Set_Token('INVENTORY_ITEM_ID', p_charges_detail_rec.inventory_item_id_in);
8284: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
8285: FND_MSG_PUB.Add;
8286: RAISE FND_API.G_EXC_ERROR;
8287:
8288: ELSE
8289: l_valid_check := IS_INSTANCE_VALID(p_instance_id => p_charges_detail_rec.customer_product_id,
8330:
8331: IF l_valid_check <> 'Y' THEN
8332:
8333: FND_MESSAGE.SET_NAME ('CS', 'CS_CHG_INVALID_INSTANCE_RMA_PT');
8334: FND_MSG_PUB.Add;
8335: RAISE FND_API.G_EXC_ERROR;
8336: --taklam
8337: ELSE
8338: --assign the customer product id to out record
8374: IF l_valid_check <> 'Y' THEN
8375: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_SERIAL_NUMBER');
8376: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
8377: FND_MESSAGE.Set_Token('SERIAL_NUMBER', p_charges_detail_rec.serial_number);
8378: FND_MSG_PUB.Add;
8379: RAISE FND_API.G_EXC_ERROR;
8380: ELSE
8381: --assign the customer product id to out record
8382: x_charges_detail_rec.serial_number := p_charges_detail_rec.serial_number;
8403: IF l_valid_check <> 'Y' THEN
8404: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_SERIAL_NUMBER');
8405: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
8406: FND_MESSAGE.Set_Token('SERIAL_NUMBER', p_charges_detail_rec.serial_number);
8407: FND_MSG_PUB.Add;
8408: RAISE FND_API.G_EXC_ERROR;
8409: ELSE
8410: --assign the customer product id to out record
8411: x_charges_detail_rec.serial_number := p_charges_detail_rec.serial_number;
8429: IF (l_comms_trackable_flag = 'N') THEN
8430: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_INST_AND_INV');
8431: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
8432: FND_MESSAGE.Set_Token('INVENTORY_ITEM_ID', p_charges_detail_rec.inventory_item_id_in);
8433: FND_MSG_PUB.Add;
8434: RAISE FND_API.G_EXC_ERROR;
8435: ELSE
8436: --Check if instance is valid for the party
8437: l_valid_check := IS_INSTANCE_VALID(p_instance_id => p_charges_detail_rec.customer_product_id,
8451:
8452: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_IB_INSTANCE_PTY');
8453: FND_MESSAGE.Set_Token('PARTY_ID', x_charges_detail_rec.sold_to_party_id);
8454: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
8455: FND_MSG_PUB.Add;
8456: RAISE FND_API.G_EXC_ERROR;
8457:
8458: ELSE
8459: --assign the customer product id to out record
8496: IF l_valid_check <> 'Y' THEN
8497: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_SERIAL_NUMBER');
8498: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
8499: FND_MESSAGE.Set_Token('SERIAL_NUMBER', p_charges_detail_rec.serial_number);
8500: FND_MSG_PUB.Add;
8501: RAISE FND_API.G_EXC_ERROR;
8502: ELSE
8503: --assign the customer product id to out record
8504: x_charges_detail_rec.serial_number := p_charges_detail_rec.serial_number;
8537: IF l_valid_check <> 'Y' THEN
8538: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_SERIAL_NUMBER');
8539: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
8540: FND_MESSAGE.Set_Token('SERIAL_NUMBER', p_charges_detail_rec.serial_number);
8541: FND_MSG_PUB.Add;
8542: RAISE FND_API.G_EXC_ERROR;
8543: ELSE
8544: --assign the customer product id to out record
8545: x_charges_detail_rec.serial_number := p_charges_detail_rec.serial_number;
8567: --RAISE FND_API.G_EXC_ERROR;
8568: --null;
8569: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INST_CP_RETURN_BY_DATE');
8570: FND_MESSAGE.Set_Token('INST_CP_RTN_BY_DATE', p_charges_detail_rec.installed_cp_return_by_date);
8571: FND_MSG_PUB.Add;
8572: RAISE FND_API.G_EXC_ERROR;
8573: ELSIF p_charges_detail_rec.installed_cp_return_by_date <> FND_API.G_MISS_DATE THEN
8574: --assign to out record
8575: x_charges_detail_rec.installed_cp_return_by_date := p_charges_detail_rec.installed_cp_return_by_date;
8606: p_charges_detail_rec.customer_product_id IS NOT NULL THEN
8607: IF p_charges_detail_rec.installed_cp_return_by_date IS NULL THEN
8608: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INSTALLED_CP_RETURN_BY_DATE');
8609: FND_MESSAGE.Set_Token('INSTALLED_CP_RTN_BY_DATE', p_charges_detail_rec.installed_cp_return_by_date);
8610: FND_MSG_PUB.Add;
8611: RAISE FND_API.G_EXC_ERROR;
8612: ELSIF p_charges_detail_rec.installed_cp_return_by_date <> FND_API.G_MISS_DATE THEN
8613: x_charges_detail_rec.installed_cp_return_by_date := p_charges_detail_rec.installed_cp_return_by_date;
8614: ELSE
8630: p_charges_detail_rec.customer_product_id IS NULL THEN
8631: IF p_charges_detail_rec.new_cp_return_by_date IS NULL THEN
8632: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_NEW_CP_RETURN_BY_DATE');
8633: FND_MESSAGE.Set_Token('NEW_CP_RTN_BY_DATE', p_charges_detail_rec.new_cp_return_by_date);
8634: FND_MSG_PUB.Add;
8635: RAISE FND_API.G_EXC_ERROR;
8636: ELSIF p_charges_detail_rec.new_cp_return_by_date <> FND_API.G_MISS_DATE THEN
8637: -- Assign whatever value is passed in the parameter.
8638: x_charges_detail_rec.new_cp_return_by_date := p_charges_detail_rec.new_cp_return_by_date;
8663: --RAISE FND_API.G_EXC_ERROR;
8664: --null;
8665: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INST_CP_RETURN_BY_DATE');
8666: FND_MESSAGE.Set_Token('INST_CP_RTN_BY_DATE', p_charges_detail_rec.installed_cp_return_by_date);
8667: FND_MSG_PUB.Add;
8668: RAISE FND_API.G_EXC_ERROR;
8669: ELSIF p_charges_detail_rec.new_cp_return_by_date <> FND_API.G_MISS_DATE THEN
8670: --assign to out record
8671: x_charges_detail_rec.new_cp_return_by_date := p_charges_detail_rec.new_cp_return_by_date;
8698: --RAISE FND_API.G_EXC_ERROR;
8699: --null;
8700: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_RETURN_REASON');
8701: FND_MESSAGE.Set_Token('RETURN_REASON_CODE', p_charges_detail_rec.return_reason_code);
8702: FND_MSG_PUB.Add;
8703: RAISE FND_API.G_EXC_ERROR;
8704: ELSE
8705:
8706: --return reason code is not null
8720: IF l_valid_check <> 'Y' THEN
8721:
8722: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_RETURN_REASON');
8723: FND_MESSAGE.Set_Token('RETURN_REASON_CODE', p_charges_detail_rec.return_reason_code);
8724: FND_MSG_PUB.Add;
8725: RAISE FND_API.G_EXC_ERROR;
8726: ELSE
8727: x_charges_detail_rec.return_reason_code := p_charges_detail_rec.return_reason_code;
8728: END IF;
8736: --RAISE FND_API.G_EXC_ERROR;
8737: --null;
8738: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_RETURN_REASON');
8739: FND_MESSAGE.Set_Token('RETURN_REASON_CODE', p_charges_detail_rec.return_reason_code);
8740: FND_MSG_PUB.Add;
8741: RAISE FND_API.G_EXC_ERROR;
8742: END IF;
8743: END IF;
8744: x_charges_detail_rec.return_reason_code := p_charges_detail_rec.return_reason_code;
8766: IF l_valid_check <> 'Y' THEN
8767:
8768: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_RETURN_REASON');
8769: FND_MESSAGE.Set_Token('RETURN_REASON_CODE', p_charges_detail_rec.return_reason_code);
8770: FND_MSG_PUB.Add;
8771: RAISE FND_API.G_EXC_ERROR;
8772: ELSE
8773: x_charges_detail_rec.return_reason_code := p_charges_detail_rec.return_reason_code;
8774: END IF;
8911:
8912: IF l_valid_check <> 'Y' THEN
8913: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_PRICE_LIST');
8914: FND_MESSAGE.Set_Token('PRICE_LIST_ID', p_charges_detail_rec.price_list_id);
8915: FND_MSG_PUB.Add;
8916: RAISE FND_API.G_EXC_ERROR;
8917:
8918: ELSE
8919:
8934: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
8935: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
8936: FND_MESSAGE.Set_Token('PRICE_LIST_ID', p_charges_detail_rec.price_list_id);
8937: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
8938: FND_MSG_PUB.Add;
8939: RAISE FND_API.G_EXC_ERROR;
8940: END IF ;
8941:
8942: --DBMS_OUTPUT.PUT_LINE('Currency_code '||l_currency_code);
8948: --RAISE FND_API.G_EXC_ERROR;
8949: --null;
8950: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CURRENCY_CODE');
8951: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
8952: FND_MSG_PUB.Add;
8953: RAISE FND_API.G_EXC_ERROR;
8954: ELSIF (p_charges_detail_rec.currency_code IS NULL) AND
8955: (l_currency_code IS NOT NULL) THEN
8956:
9018: IF l_valid_check <> 'Y' THEN
9019:
9020: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CONTRACT_LINE');
9021: FND_MESSAGE.Set_Token('CONTRACT_LINE_ID', p_charges_detail_rec.contract_Line_id);
9022: FND_MSG_PUB.Add;
9023: RAISE FND_API.G_EXC_ERROR;
9024: ELSE
9025: --assign this value to the out parameter
9026: x_charges_detail_rec.contract_line_id := p_charges_detail_rec.contract_line_id;
9088: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CONTRACT');
9089: FND_MESSAGE.Set_Token('CONTRACT_ID', p_charges_detail_rec.contract_id);
9090: --FND_MESSAGE.Set_Token('COVERAGE_ID', p_charges_detail_rec.coverage_id, TRUE);
9091: --FND_MESSAGE.Set_Token('BUSINESS_PROCESS_ID', p_charges_detail_rec.business_process_id, TRUE);
9092: FND_MSG_PUB.Add;
9093: RAISE FND_API.G_EXC_ERROR;
9094:
9095: ELSE
9096:
9131: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
9132: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
9133: FND_MESSAGE.Set_Token('PRICE_LIST_ID', p_charges_detail_rec.price_list_id);
9134: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
9135: FND_MSG_PUB.Add;
9136: RAISE FND_API.G_EXC_ERROR;
9137: END IF ;
9138:
9139: x_charges_detail_rec.currency_code := l_currency_code;
9159: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
9160: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
9161: FND_MESSAGE.Set_Token('PRICE_LIST_ID', p_charges_detail_rec.price_list_id);
9162: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
9163: FND_MSG_PUB.Add;
9164: RAISE FND_API.G_EXC_ERROR;
9165: END IF ;
9166:
9167: x_charges_detail_rec.currency_code := l_currency_code;
9192: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
9193: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
9194: FND_MESSAGE.Set_Token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
9195: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
9196: FND_MSG_PUB.Add;
9197: RAISE FND_API.G_EXC_ERROR;
9198: END IF ;
9199: x_charges_detail_rec.currency_code := l_currency_code;
9200:
9244: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CONTRACT_API_ERROR');
9245: FND_MESSAGE.SET_TOKEN('BUSINESS_PROCESS_ID', p_charges_detail_rec.business_process_id);
9246: FND_MESSAGE.SET_TOKEN('CONTRACT_SERVICE_LINE_ID', l_contract_service_id);
9247: --FND_MESSAGE.SET_TOKEN('TEXT', l_msg_data);
9248: FND_MSG_PUB.Add;
9249: RAISE FND_API.G_EXC_ERROR;
9250: END IF;
9251:
9252: IF l_contract_id IS NOT NULL THEN
9288: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
9289: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
9290: FND_MESSAGE.Set_Token('PRICE_LIST_ID', p_charges_detail_rec.price_list_id);
9291: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
9292: FND_MSG_PUB.Add;
9293: RAISE FND_API.G_EXC_ERROR;
9294: END IF ;
9295:
9296: x_charges_detail_rec.currency_code := l_currency_code;
9315: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
9316: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
9317: FND_MESSAGE.Set_Token('PRICE_LIST_ID', p_charges_detail_rec.price_list_id);
9318: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
9319: FND_MSG_PUB.Add;
9320: RAISE FND_API.G_EXC_ERROR;
9321: END IF ;
9322:
9323: x_charges_detail_rec.currency_code := l_currency_code;
9348: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
9349: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
9350: FND_MESSAGE.Set_Token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
9351: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
9352: FND_MSG_PUB.Add;
9353: RAISE FND_API.G_EXC_ERROR;
9354: END IF ;
9355: x_charges_detail_rec.currency_code := l_currency_code;
9356: END IF;
9373: --RAISE FND_API.G_EXC_ERROR;
9374: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
9375: FND_MESSAGE.Set_Token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
9376: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
9377: FND_MSG_PUB.Add;
9378: RAISE FND_API.G_EXC_ERROR;
9379: END IF ;
9380: x_charges_detail_rec.currency_code := l_currency_code;
9381: ELSE
9394: --RAISE FND_API.G_EXC_ERROR;
9395: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
9396: FND_MESSAGE.Set_Token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
9397: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
9398: FND_MSG_PUB.Add;
9399: RAISE FND_API.G_EXC_ERROR;
9400: END IF ;
9401: x_charges_detail_rec.currency_code := l_currency_code;
9402: END IF;
9420: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
9421: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
9422: FND_MESSAGE.Set_Token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
9423: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
9424: FND_MSG_PUB.Add;
9425: RAISE FND_API.G_EXC_ERROR;
9426: END IF ;
9427: x_charges_detail_rec.currency_code := l_currency_code;
9428:
9441: --RAISE FND_API.G_EXC_ERROR;
9442: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
9443: FND_MESSAGE.Set_Token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
9444: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
9445: FND_MSG_PUB.Add;
9446: RAISE FND_API.G_EXC_ERROR;
9447: END IF ;
9448: x_charges_detail_rec.currency_code := l_currency_code;
9449: END IF;
9494: IF l_valid_check <> 'Y' THEN
9495:
9496: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CONTRACT');
9497: FND_MESSAGE.Set_Token('CONTRACT_ID', p_charges_detail_rec.contract_id);
9498: FND_MSG_PUB.Add;
9499: RAISE FND_API.G_EXC_ERROR;
9500: ELSE
9501: --assign this value to the out parameter
9502: x_charges_detail_rec.contract_line_id := p_charges_detail_rec.contract_line_id;
9564: IF l_valid_check <> 'Y' THEN
9565:
9566: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CONTRACT');
9567: FND_MESSAGE.Set_Token('CONTRACT_ID', p_charges_detail_rec.contract_id);
9568: FND_MSG_PUB.Add;
9569: RAISE FND_API.G_EXC_ERROR;
9570:
9571: ELSE
9572:
9607: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
9608: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
9609: FND_MESSAGE.Set_Token('PRICE_LIST_ID', p_charges_detail_rec.price_list_id);
9610: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
9611: FND_MSG_PUB.Add;
9612: RAISE FND_API.G_EXC_ERROR;
9613: END IF ;
9614:
9615: x_charges_detail_rec.currency_code := l_currency_code;
9654: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
9655: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
9656: FND_MESSAGE.Set_Token('PRICE_LIST_ID', p_charges_detail_rec.price_list_id);
9657: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
9658: FND_MSG_PUB.Add;
9659: RAISE FND_API.G_EXC_ERROR;
9660: END IF ;
9661:
9662: x_charges_detail_rec.currency_code := l_currency_code;
9687: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
9688: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
9689: FND_MESSAGE.Set_Token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
9690: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
9691: FND_MSG_PUB.Add;
9692: RAISE FND_API.G_EXC_ERROR;
9693: END IF ;
9694: x_charges_detail_rec.currency_code := l_currency_code;
9695:
9742: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
9743: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
9744: FND_MESSAGE.Set_Token('PRICE_LIST_ID', p_charges_detail_rec.price_list_id);
9745: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
9746: FND_MSG_PUB.Add;
9747: RAISE FND_API.G_EXC_ERROR;
9748: END IF ;
9749:
9750: x_charges_detail_rec.currency_code := l_currency_code;
9773: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
9774: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
9775: FND_MESSAGE.Set_Token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
9776: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
9777: FND_MSG_PUB.Add;
9778: RAISE FND_API.G_EXC_ERROR;
9779: END IF ;
9780: x_charges_detail_rec.currency_code := l_currency_code;
9781:
9818: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
9819: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
9820: FND_MESSAGE.Set_Token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
9821: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
9822: FND_MSG_PUB.Add;
9823: RAISE FND_API.G_EXC_ERROR;
9824: END IF ;
9825: --DBMS_OUTPUT.PUT_LINE ('l_price_list_id '||l_price_list_id);
9826: --DBMS_OUTPUT.PUT_LINE (' l_currency_code '||l_currency_code);
9849: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
9850: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
9851: FND_MESSAGE.Set_Token('PRICE_LIST_ID', p_charges_detail_rec.price_list_id);
9852: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
9853: FND_MSG_PUB.Add;
9854: RAISE FND_API.G_EXC_ERROR;
9855: END IF ;
9856:
9857: x_charges_detail_rec.currency_code := l_currency_code;
9904: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
9905: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
9906: FND_MESSAGE.Set_Token('PRICE_LIST_ID', p_charges_detail_rec.price_list_id);
9907: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
9908: FND_MSG_PUB.Add;
9909: RAISE FND_API.G_EXC_ERROR;
9910: END IF ;
9911:
9912: x_charges_detail_rec.currency_code := l_currency_code;
9936: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
9937: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
9938: FND_MESSAGE.Set_Token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
9939: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
9940: FND_MSG_PUB.Add;
9941: RAISE FND_API.G_EXC_ERROR;
9942: END IF ;
9943: x_charges_detail_rec.currency_code := l_currency_code;
9944:
9972:
9973: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
9974: FND_MESSAGE.Set_Token('PRICE_LIST_ID', p_charges_detail_rec.price_list_id);
9975: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
9976: FND_MSG_PUB.Add;
9977: RAISE FND_API.G_EXC_ERROR;
9978: END IF ;
9979:
9980: x_charges_detail_rec.currency_code := l_currency_code;
10003: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
10004: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
10005: FND_MESSAGE.Set_Token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
10006: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
10007: FND_MSG_PUB.Add;
10008: RAISE FND_API.G_EXC_ERROR;
10009: END IF ;
10010: x_charges_detail_rec.currency_code := l_currency_code;
10011:
10031: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
10032: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
10033: FND_MESSAGE.Set_Token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
10034: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
10035: FND_MSG_PUB.Add;
10036: RAISE FND_API.G_EXC_ERROR;
10037: END IF ;
10038: x_charges_detail_rec.currency_code := l_currency_code;
10039:
10094: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10095: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_CURRENCY_CONVERSION_ERR');
10096: FND_MESSAGE.Set_Token('FROM_CURRENCY', p_charges_detail_rec.currency_code);
10097: FND_MESSAGE.Set_Token('TO_CURRENCY', x_charges_detail_rec.currency_code);
10098: FND_MSG_PUB.Add;
10099: RAISE FND_API.G_EXC_ERROR;
10100: END IF;
10101: --assign values to out record for conversion_rate, conversion_type_code
10102: --conversion_rate_date
10110: --RAISE FND_API.G_EXC_ERROR;
10111: --null;
10112: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CURRENCY_CODE');
10113: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
10114: FND_MSG_PUB.Add;
10115: RAISE FND_API.G_EXC_ERROR;
10116:
10117: END IF;
10118:
11290:
11291: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11292: FND_MESSAGE.Set_Name('CS', 'CS_CHG_APPLY_CONTRACT_WARNING');
11293: FND_MESSAGE.SET_TOKEN('REASON', l_msg_data);
11294: FND_MSG_PUB.Add;
11295: RAISE FND_API.G_EXC_ERROR;
11296: END IF;
11297:
11298: --Bug Fix for Bug # 3088397
11490: FND_MESSAGE.set_token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
11491: FND_MESSAGE.set_token('UOM', x_charges_detail_rec.unit_of_measure_code);
11492: FND_MESSAGE.set_token('CURR_CODE', x_charges_detail_rec.currency_code);
11493: --FND_MESSAGE.SET_TOKEN('TEXT', l_msg_data, TRUE);
11494: FND_MSG_PUB.Add;
11495: RAISE FND_API.G_EXC_ERROR;
11496: END IF;
11497:
11498: --assign to out record
11580:
11581: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11582: FND_MESSAGE.Set_Name('CS', 'CS_CHG_APPLY_CONTRACT_WARNING');
11583: FND_MESSAGE.SET_TOKEN('REASON', l_msg_data);
11584: FND_MSG_PUB.Add;
11585: RAISE FND_API.G_EXC_ERROR;
11586: END IF;
11587:
11588: --Bug Fix for Bug # 3088397
11719:
11720: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11721: FND_MESSAGE.Set_Name('CS', 'CS_CHG_APPLY_CONTRACT_WARNING');
11722: FND_MESSAGE.SET_TOKEN('REASON', l_msg_data);
11723: FND_MSG_PUB.Add;
11724: RAISE FND_API.G_EXC_ERROR;
11725: END IF;
11726:
11727: IF l_contract_discount IS NOT NULL THEN
11895: FND_MESSAGE.set_token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
11896: FND_MESSAGE.set_token('UOM', x_charges_detail_rec.unit_of_measure_code);
11897: FND_MESSAGE.set_token('CURR_CODE', x_charges_detail_rec.currency_code);
11898: --FND_MESSAGE.SET_TOKEN('TEXT', l_msg_data, TRUE);
11899: FND_MSG_PUB.Add;
11900: RAISE FND_API.G_EXC_ERROR;
11901: END IF;
11902:
11903:
11965:
11966: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11967: FND_MESSAGE.Set_Name('CS', 'CS_CHG_APPLY_CONTRACT_WARNING');
11968: FND_MESSAGE.SET_TOKEN('REASON', l_msg_data);
11969: FND_MSG_PUB.Add;
11970: RAISE FND_API.G_EXC_ERROR;
11971: END IF;
11972:
11973: --Bug Fix for Bug # 3088397
12077:
12078: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12079: FND_MESSAGE.Set_Name('CS', 'CS_CHG_APPLY_CONTRACT_WARNING');
12080: FND_MESSAGE.SET_TOKEN('REASON', l_msg_data);
12081: FND_MSG_PUB.Add;
12082: RAISE FND_API.G_EXC_ERROR;
12083: END IF;
12084:
12085: --Bug Fix for Bug # 3088397
12155:
12156: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12157: FND_MESSAGE.Set_Name('CS', 'CS_CHG_APPLY_CONTRACT_WARNING');
12158: FND_MESSAGE.SET_TOKEN('REASON', l_msg_data);
12159: FND_MSG_PUB.Add;
12160: RAISE FND_API.G_EXC_ERROR;
12161: END IF;
12162:
12163: --Bug Fix for Bug # 3088397
12351: FND_MESSAGE.set_token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
12352: FND_MESSAGE.set_token('UOM', x_charges_detail_rec.unit_of_measure_code);
12353: FND_MESSAGE.set_token('CURR_CODE', x_charges_detail_rec.currency_code);
12354: --FND_MESSAGE.SET_TOKEN('TEXT', l_msg_data, TRUE);
12355: FND_MSG_PUB.Add;
12356: RAISE FND_API.G_EXC_ERROR;
12357: END IF;
12358:
12359: --bug # 3056622 charge amount is zero for items with negative prices
12435:
12436: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12437: FND_MESSAGE.Set_Name('CS', 'CS_CHG_APPLY_CONTRACT_WARNING');
12438: FND_MESSAGE.SET_TOKEN('REASON', l_msg_data);
12439: FND_MSG_PUB.Add;
12440: RAISE FND_API.G_EXC_ERROR;
12441: END IF;
12442:
12443: --Bug Fix for Bug # 3088397
12558:
12559: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12560: FND_MESSAGE.Set_Name('CS', 'CS_CHG_APPLY_CONTRACT_WARNING');
12561: FND_MESSAGE.SET_TOKEN('REASON', l_msg_data);
12562: FND_MSG_PUB.Add;
12563: RAISE FND_API.G_EXC_ERROR;
12564: END IF;
12565:
12566: --Bug Fix for Bug # 3088397
12744: FND_MESSAGE.set_token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
12745: FND_MESSAGE.set_token('UOM', x_charges_detail_rec.unit_of_measure_code);
12746: FND_MESSAGE.set_token('CURR_CODE', x_charges_detail_rec.currency_code);
12747: --FND_MESSAGE.SET_TOKEN('TEXT', l_msg_data, TRUE);
12748: FND_MSG_PUB.Add;
12749: RAISE FND_API.G_EXC_ERROR;
12750: END IF;
12751:
12752: -- Assign the after warranty that comes on the line
12821:
12822: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12823: FND_MESSAGE.Set_Name('CS', 'CS_CHG_APPLY_CONTRACT_WARNING');
12824: FND_MESSAGE.SET_TOKEN('REASON', l_msg_data);
12825: FND_MSG_PUB.Add;
12826: RAISE FND_API.G_EXC_ERROR;
12827: END IF;
12828:
12829: --DBMS_OUTPUT.PUT_LINE('l_contract_discount '||l_contract_discount);
12920:
12921: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12922: FND_MESSAGE.Set_Name('CS', 'CS_CHG_APPLY_CONTRACT_WARNING');
12923: FND_MESSAGE.SET_TOKEN('REASON', l_msg_data);
12924: FND_MSG_PUB.Add;
12925: RAISE FND_API.G_EXC_ERROR;
12926: END IF;
12927:
12928: --Bug Fix for Bug # 3088397
13000:
13001: IF l_valid_check <> 'Y' THEN
13002: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_TXN_INV_ORG');
13003: FND_MESSAGE.Set_Token('ORG_ID', p_charges_detail_rec.transaction_inventory_org);
13004: FND_MSG_PUB.Add;
13005: RAISE FND_API.G_EXC_ERROR;
13006: END IF;
13007:
13008: END IF;
13031:
13032: IF l_valid_check <> 'Y' THEN
13033: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_TXN_INV_ORG');
13034: FND_MESSAGE.Set_Token('ORG_ID', p_charges_detail_rec.transaction_inventory_org);
13035: FND_MSG_PUB.Add;
13036: RAISE FND_API.G_EXC_ERROR;
13037: END IF;
13038:
13039: x_charges_detail_rec.transaction_inventory_org := p_charges_detail_rec.transaction_inventory_org;
13066:
13067: --RAISE FND_API.G_EXC_ERROR;
13068: --null;
13069: FND_MESSAGE.Set_Name('CS', 'CS_CHG_ORDER_NUMBER_REQUIRED');
13070: FND_MSG_PUB.Add;
13071: RAISE FND_API.G_EXC_ERROR;
13072: ELSE
13073:
13074: -- If order number provided then validate the order
13087: --RAISE FND_API.G_EXC_ERROR ;
13088: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_ORDER');
13089: FND_MESSAGE.SET_TOKEN('ORDER_HEADER_ID', p_charges_detail_rec.order_header_id);
13090: --FND_MESSAGE.SET_TOKEN('TEXT', l_msg_data, TRUE);
13091: FND_MSG_PUB.Add;
13092: RAISE FND_API.G_EXC_ERROR;
13093: ELSE
13094:
13095: x_charges_detail_rec.order_header_id := p_charges_detail_rec.order_header_id;
13120: --RAISE FND_API.G_EXC_ERROR ;
13121: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_ORDER');
13122: FND_MESSAGE.SET_TOKEN('ORDER_HEADER_ID', p_charges_detail_rec.order_header_id);
13123: --FND_MESSAGE.SET_TOKEN('TEXT', l_msg_data, TRUE);
13124: FND_MSG_PUB.Add;
13125: RAISE FND_API.G_EXC_ERROR;
13126:
13127: ELSE
13128:
13163: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
13164: --RAISE FND_API.G_EXC_ERROR ;
13165: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_ORDER');
13166: FND_MESSAGE.SET_TOKEN('ORDER_HEADER_ID', p_charges_detail_rec.order_header_id);
13167: FND_MSG_PUB.Add;
13168: RAISE FND_API.G_EXC_ERROR;
13169: ELSE
13170: x_charges_detail_rec.order_header_id := p_charges_detail_rec.order_header_id;
13171: END IF;
13175: x_charges_detail_rec.order_header_id := l_db_det_rec.order_header_id;
13176: ELSE
13177: --order number required
13178: FND_MESSAGE.Set_Name('CS', 'CS_CHG_ORDER_NUMBER_REQUIRED');
13179: FND_MSG_PUB.Add;
13180: RAISE FND_API.G_EXC_ERROR;
13181: END IF;
13182: ELSE
13183: --order number not passed
13182: ELSE
13183: --order number not passed
13184: --order number required
13185: FND_MESSAGE.Set_Name('CS', 'CS_CHG_ORDER_NUMBER_REQUIRED');
13186: FND_MSG_PUB.Add;
13187: RAISE FND_API.G_EXC_ERROR;
13188: END IF;
13189:
13190:
13208: --RAISE FND_API.G_EXC_ERROR ;
13209: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_ORDER');
13210: FND_MESSAGE.SET_TOKEN('ORDER_HEADER_ID', p_charges_detail_rec.order_header_id);
13211: --FND_MESSAGE.SET_TOKEN('TEXT', l_msg_data, TRUE);
13212: FND_MSG_PUB.Add;
13213: RAISE FND_API.G_EXC_ERROR;
13214:
13215: ELSE
13216:
13234: --line already interfaced to om
13235: --raise error
13236: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_CANNOT_ADD_CHG_TO_ORDER');
13237: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
13238: FND_MSG_PUB.Add;
13239: RAISE FND_API.G_EXC_ERROR;
13240: END IF;
13241: END IF;
13242:
13312: WHEN FND_API.G_EXC_ERROR THEN
13313: ROLLBACK TO Validate_Charge_Details_PUB;
13314:
13315: x_return_status := FND_API.G_RET_STS_ERROR;
13316: FND_MSG_PUB.Count_And_Get(
13317: p_count => x_msg_count,
13318: p_data => x_msg_data,
13319: p_encoded => FND_API.G_FALSE);
13320:
13320:
13321: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
13322: ROLLBACK TO Validate_Charge_Details_PUB;
13323: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13324: FND_MSG_PUB.Count_And_Get(
13325: p_count => x_msg_count,
13326: p_data => x_msg_data,
13327: p_encoded => FND_API.G_FALSE);
13328:
13330: ROLLBACK TO Validate_Charge_Details_PUB;
13331: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_UNEXPECTED_EXEC_ERRORS');
13332: FND_MESSAGE.SET_TOKEN('ROUTINE', l_api_name);
13333: FND_MESSAGE.SET_TOKEN('SQLERRM', sqlerrm);
13334: FND_MSG_PUB.ADD;
13335: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
13336: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
13337: END IF ;
13338: fnd_msg_pub.count_and_get(
13331: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_UNEXPECTED_EXEC_ERRORS');
13332: FND_MESSAGE.SET_TOKEN('ROUTINE', l_api_name);
13333: FND_MESSAGE.SET_TOKEN('SQLERRM', sqlerrm);
13334: FND_MSG_PUB.ADD;
13335: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
13336: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
13337: END IF ;
13338: fnd_msg_pub.count_and_get(
13339: p_count => x_msg_count
13332: FND_MESSAGE.SET_TOKEN('ROUTINE', l_api_name);
13333: FND_MESSAGE.SET_TOKEN('SQLERRM', sqlerrm);
13334: FND_MSG_PUB.ADD;
13335: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
13336: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
13337: END IF ;
13338: fnd_msg_pub.count_and_get(
13339: p_count => x_msg_count
13340: ,p_data => x_msg_data);
13334: FND_MSG_PUB.ADD;
13335: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
13336: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
13337: END IF ;
13338: fnd_msg_pub.count_and_get(
13339: p_count => x_msg_count
13340: ,p_data => x_msg_data);
13341: x_return_status := FND_API.G_RET_STS_ERROR;
13342:
13444: EXCEPTION
13445:
13446: WHEN OTHERS THEN
13447: x_return_status := FND_API.G_RET_STS_ERROR;
13448: fnd_msg_pub.count_and_get(
13449: p_count => x_msg_count,
13450: p_data => x_msg_data);
13451:
13452: END GET_SR_DEFAULTS;
13551: --RAISE FND_API.G_EXC_ERROR;
13552: --null;
13553: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_TXN_TYPE_OWNER');
13554: FND_MESSAGE.SET_TOKEN('TXN_TYPE_ID', p_txn_type_id);
13555: FND_MSG_PUB.Add;
13556: RAISE FND_API.G_EXC_ERROR;
13557: END IF;
13558:
13559: ELSIF v_txn_type.line_order_category_code = 'ORDER' THEN
13561: --RAISE FND_API.G_EXC_ERROR;
13562: --null;
13563: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_TXN_TYPE_OWNER');
13564: FND_MESSAGE.SET_TOKEN('TXN_TYPE_ID', p_txn_type_id);
13565: FND_MSG_PUB.Add;
13566: RAISE FND_API.G_EXC_ERROR;
13567: END IF;
13568: END IF;
13569:
13594: IF lv_exists_flag = 'N' THEN
13595: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_TXN_TYPE');
13596: FND_MESSAGE.SET_TOKEN('TXN_TYPE_ID', p_txn_type_id);
13597: FND_MESSAGE.SET_TOKEN('BUSINESS_PROCESS_ID', p_business_process_id);
13598: FND_MSG_PUB.Add;
13599:
13600: RAISE FND_API.G_EXC_ERROR;
13601:
13602: END IF;
13603:
13604: EXCEPTION
13605: WHEN FND_API.G_EXC_ERROR THEN
13606: x_return_status := FND_API.G_RET_STS_ERROR;
13607: fnd_msg_pub.count_and_get(
13608: p_count => x_msg_count
13609: ,p_data => x_msg_data);
13610:
13611:
13613: x_return_status := FND_API.G_RET_STS_ERROR;
13614: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_TXN_TYPE');
13615: FND_MESSAGE.SET_TOKEN('TXN_TYPE_ID', p_txn_type_id);
13616: FND_MESSAGE.SET_TOKEN('BUSINESS_PROCESS_ID', p_business_process_id);
13617: FND_MSG_PUB.Add;
13618:
13619: fnd_msg_pub.count_and_get(
13620: p_count => x_msg_count
13621: ,p_data => x_msg_data);
13615: FND_MESSAGE.SET_TOKEN('TXN_TYPE_ID', p_txn_type_id);
13616: FND_MESSAGE.SET_TOKEN('BUSINESS_PROCESS_ID', p_business_process_id);
13617: FND_MSG_PUB.Add;
13618:
13619: fnd_msg_pub.count_and_get(
13620: p_count => x_msg_count
13621: ,p_data => x_msg_data);
13622:
13623:
13678: -- lv_exists_flag := 'N';
13679: -- --RAISE FND_API.G_EXC_ERROR;
13680: -- FND_MESSAGE.Set_Name('CS', 'CS_CHG_CONTRACT_ITEM_ERROR');
13681: -- FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_inv_id, TRUE);
13682: -- FND_MSG_PUB.Add;
13683: -- RAISE FND_API.G_EXC_ERROR;
13684: -- END IF;
13685:
13686: ------DBMS_OUTPUT.PUT_LINE('v_get_inv_item.contract_item_type_code '||v_get_inv_item.contract_item_type_code);
13710: IF lv_exists_flag = 'N' THEN
13711: -- --DBMS_OUTPUT.PUT_LINE('lv_exists_flag = ' || 'N');
13712: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_INVENTORY_ITEM');
13713: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_inv_id);
13714: FND_MSG_PUB.Add;
13715: RAISE FND_API.G_EXC_ERROR;
13716: END IF;
13717:
13718: EXCEPTION
13718: EXCEPTION
13719:
13720: WHEN FND_API.G_EXC_ERROR THEN
13721: x_return_status := FND_API.G_RET_STS_ERROR;
13722: fnd_msg_pub.count_and_get(
13723: p_count => x_msg_count
13724: ,p_data => x_msg_data);
13725:
13726: WHEN OTHERS THEN
13726: WHEN OTHERS THEN
13727: x_return_status := FND_API.G_RET_STS_ERROR;
13728: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_INVENTORY_ITEM');
13729: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_inv_id);
13730: FND_MSG_PUB.Add;
13731: fnd_msg_pub.count_and_get(
13732: p_count => x_msg_count
13733: ,p_data => x_msg_data);
13734:
13727: x_return_status := FND_API.G_RET_STS_ERROR;
13728: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_INVENTORY_ITEM');
13729: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_inv_id);
13730: FND_MSG_PUB.Add;
13731: fnd_msg_pub.count_and_get(
13732: p_count => x_msg_count
13733: ,p_data => x_msg_data);
13734:
13735: END VALIDATE_ITEM;
13784: --RAISE FND_API.G_EXC_ERROR;
13785: FND_MESSAGE.Set_Name('CS', 'CS_CHG_ITM_BILL_FLG_NOT_IN_TXN');
13786: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_inv_id);
13787: FND_MESSAGE.SET_TOKEN('TXN_TYPE_ID', p_txn_type_id);
13788: FND_MSG_PUB.Add;
13789: RAISE FND_API.G_EXC_ERROR;
13790: END IF;
13791:
13792: --DBMS_OUTPUT.PUT_LINE('lv_exists_flag = ' || lv_exists_flag);
13795: EXCEPTION
13796:
13797: WHEN FND_API.G_EXC_ERROR THEN
13798: x_return_status := FND_API.G_RET_STS_ERROR;
13799: fnd_msg_pub.count_and_get(
13800: p_count => x_msg_count
13801: ,p_data => x_msg_data);
13802:
13803: WHEN OTHERS THEN
13804: x_return_status := FND_API.G_RET_STS_ERROR;
13805: FND_MESSAGE.Set_Name('CS', 'CS_CHG_ITM_BILL_FLG_NOT_IN_TXN');
13806: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_inv_id);
13807: FND_MESSAGE.SET_TOKEN('TXN_TYPE_ID', p_txn_type_id);
13808: FND_MSG_PUB.Add;
13809: fnd_msg_pub.count_and_get(
13810: p_count => x_msg_count
13811: ,p_data => x_msg_data);
13812:
13805: FND_MESSAGE.Set_Name('CS', 'CS_CHG_ITM_BILL_FLG_NOT_IN_TXN');
13806: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_inv_id);
13807: FND_MESSAGE.SET_TOKEN('TXN_TYPE_ID', p_txn_type_id);
13808: FND_MSG_PUB.Add;
13809: fnd_msg_pub.count_and_get(
13810: p_count => x_msg_count
13811: ,p_data => x_msg_data);
13812:
13813: END GET_BILLING_FLAG;
13853: --null;
13854: FND_MESSAGE.Set_Name('CS', 'CS_CHG_ITM_BILL_TYP_NOT_IN_TXN');
13855: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_inv_id);
13856: FND_MESSAGE.SET_TOKEN('TXN_TYPE_ID', p_txn_type_id);
13857: FND_MSG_PUB.Add;
13858: RAISE FND_API.G_EXC_ERROR;
13859: END IF;
13860:
13861: EXCEPTION
13861: EXCEPTION
13862:
13863: WHEN FND_API.G_EXC_ERROR THEN
13864: x_return_status := FND_API.G_RET_STS_ERROR;
13865: fnd_msg_pub.count_and_get(
13866: p_count => x_msg_count
13867: ,p_data => x_msg_data);
13868:
13869: WHEN OTHERS THEN
13870: x_return_status := FND_API.G_RET_STS_ERROR;
13871: FND_MESSAGE.Set_Name('CS', 'CS_CHG_ITM_BILL_TYP_NOT_IN_TXN');
13872: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_inv_id);
13873: FND_MESSAGE.SET_TOKEN('TXN_TYPE_ID', p_txn_type_id);
13874: FND_MSG_PUB.Add;
13875: fnd_msg_pub.count_and_get(
13876: p_count => x_msg_count
13877: ,p_data => x_msg_data);
13878:
13871: FND_MESSAGE.Set_Name('CS', 'CS_CHG_ITM_BILL_TYP_NOT_IN_TXN');
13872: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_inv_id);
13873: FND_MESSAGE.SET_TOKEN('TXN_TYPE_ID', p_txn_type_id);
13874: FND_MSG_PUB.Add;
13875: fnd_msg_pub.count_and_get(
13876: p_count => x_msg_count
13877: ,p_data => x_msg_data);
13878:
13879: END GET_TXN_BILLING_TYPE;
13913: x_return_status := FND_API.G_RET_STS_ERROR;
13914: FND_MESSAGE.Set_Name('CS', 'CS_CHG_GET_UOM_FAILED');
13915: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_inv_id);
13916: FND_MESSAGE.SET_TOKEN('ORGANIZATION_ID', cs_std.get_item_valdn_orgzn_id);
13917: FND_MSG_PUB.Add;
13918: fnd_msg_pub.count_and_get(
13919: p_count => x_msg_count
13920: ,p_data => x_msg_data);
13921:
13914: FND_MESSAGE.Set_Name('CS', 'CS_CHG_GET_UOM_FAILED');
13915: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_inv_id);
13916: FND_MESSAGE.SET_TOKEN('ORGANIZATION_ID', cs_std.get_item_valdn_orgzn_id);
13917: FND_MSG_PUB.Add;
13918: fnd_msg_pub.count_and_get(
13919: p_count => x_msg_count
13920: ,p_data => x_msg_data);
13921:
13922: END GET_UOM;
13956: --null;
13957: FND_MESSAGE.Set_Name('CS', 'CS_CHG_GET_UOM_FAILED');
13958: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_inv_id);
13959: FND_MESSAGE.SET_TOKEN('ORGANIZATION_ID', cs_std.get_item_valdn_orgzn_id);
13960: FND_MSG_PUB.Add;
13961: RAISE FND_API.G_EXC_ERROR;
13962: END IF;
13963:
13964: EXCEPTION
13964: EXCEPTION
13965:
13966: WHEN FND_API.G_EXC_ERROR THEN
13967: x_return_status := FND_API.G_RET_STS_ERROR;
13968: fnd_msg_pub.count_and_get(
13969: p_count => x_msg_count
13970: ,p_data => x_msg_data);
13971:
13972: WHEN OTHERS THEN
13973: x_return_status := FND_API.G_RET_STS_ERROR;
13974: FND_MESSAGE.Set_Name('CS', 'CS_CHG_GET_UOM_FAILED');
13975: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_inv_id);
13976: FND_MESSAGE.SET_TOKEN('ORGANIZATION_ID', cs_std.get_item_valdn_orgzn_id);
13977: FND_MSG_PUB.Add;
13978: fnd_msg_pub.count_and_get(
13979: p_count => x_msg_count
13980: ,p_data => x_msg_data);
13981:
13974: FND_MESSAGE.Set_Name('CS', 'CS_CHG_GET_UOM_FAILED');
13975: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_inv_id);
13976: FND_MESSAGE.SET_TOKEN('ORGANIZATION_ID', cs_std.get_item_valdn_orgzn_id);
13977: FND_MSG_PUB.Add;
13978: fnd_msg_pub.count_and_get(
13979: p_count => x_msg_count
13980: ,p_data => x_msg_data);
13981:
13982: END GET_PRIMARY_UOM;
14041: --null;
14042: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_SOURCE');
14043: FND_MESSAGE.SET_TOKEN('SOURCE_CODE', p_source_code);
14044: FND_MESSAGE.SET_TOKEN('SOURCE_ID', p_source_id);
14045: FND_MSG_PUB.Add;
14046: RAISE FND_API.G_EXC_ERROR;
14047: END IF;
14048:
14049: ELSE
14064: --null;
14065: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_SOURCE');
14066: FND_MESSAGE.SET_TOKEN('SOURCE_CODE', p_source_code);
14067: FND_MESSAGE.SET_TOKEN('SOURCE_ID', p_source_id);
14068: FND_MSG_PUB.Add;
14069: RAISE FND_API.G_EXC_ERROR;
14070: END IF;
14071:
14072: ELSE
14087: --null;
14088: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_SOURCE');
14089: FND_MESSAGE.SET_TOKEN('SOURCE_CODE', p_source_code);
14090: FND_MESSAGE.SET_TOKEN('SOURCE_ID', p_source_id);
14091: FND_MSG_PUB.Add;
14092: RAISE FND_API.G_EXC_ERROR;
14093: END IF;
14094:
14095: ELSE
14111: --null;
14112: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_SOURCE');
14113: FND_MESSAGE.SET_TOKEN('SOURCE_CODE', p_source_code);
14114: FND_MESSAGE.SET_TOKEN('SOURCE_ID', p_source_id);
14115: FND_MSG_PUB.Add;
14116: RAISE FND_API.G_EXC_ERROR;
14117: END IF;
14118: ELSE
14119: -- cannot be null
14134: EXCEPTION
14135:
14136: WHEN FND_API.G_EXC_ERROR THEN
14137: x_return_status := FND_API.G_RET_STS_ERROR;
14138: fnd_msg_pub.count_and_get(
14139: p_count => x_msg_count
14140: ,p_data => x_msg_data);
14141:
14142: WHEN NO_DATA_FOUND THEN
14154: x_return_status := FND_API.G_RET_STS_ERROR;
14155: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_SOURCE');
14156: FND_MESSAGE.SET_TOKEN('SOURCE_CODE', p_source_code);
14157: FND_MESSAGE.SET_TOKEN('SOURCE_ID', p_source_id);
14158: FND_MSG_PUB.Add;
14159: fnd_msg_pub.count_and_get(
14160: p_count => x_msg_count
14161: ,p_data => x_msg_data);
14162:
14155: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_SOURCE');
14156: FND_MESSAGE.SET_TOKEN('SOURCE_CODE', p_source_code);
14157: FND_MESSAGE.SET_TOKEN('SOURCE_ID', p_source_id);
14158: FND_MSG_PUB.Add;
14159: fnd_msg_pub.count_and_get(
14160: p_count => x_msg_count
14161: ,p_data => x_msg_data);
14162:
14163: END Validate_Source;
14221: --null;
14222: FND_MESSAGE.Set_Name('CS', 'CS_CHG_NO_SITE_FOUND');
14223: FND_MESSAGE.SET_TOKEN('PARTY_ID', p_party_id);
14224: FND_MESSAGE.SET_TOKEN('SITE_USE_ID', p_site_use_id);
14225: FND_MSG_PUB.Add;
14226: RAISE FND_API.G_EXC_ERROR;
14227: END IF;
14228:
14229: EXCEPTION
14235: x_return_status := FND_API.G_RET_STS_ERROR;
14236: FND_MESSAGE.Set_Name('CS', 'CS_CHG_NO_SITE_FOUND');
14237: FND_MESSAGE.SET_TOKEN('PARTY_ID', p_party_id);
14238: FND_MESSAGE.SET_TOKEN('SITE_USE_ID', p_site_use_id);
14239: FND_MSG_PUB.Add;
14240:
14241: END get_site_for_party;
14242:
14243:
14322: x_return_status := FND_API.G_RET_STS_ERROR;
14323: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_UNEXPECTED_EXEC_ERRORS');
14324: FND_MESSAGE.SET_TOKEN('ROUTINE', p_api_name);
14325: FND_MESSAGE.SET_TOKEN('SQLERRM', sqlerrm);
14326: FND_MSG_PUB.ADD;
14327: fnd_msg_pub.count_and_get(
14328: p_count => x_msg_count
14329: ,p_data => x_msg_data);
14330:
14323: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_UNEXPECTED_EXEC_ERRORS');
14324: FND_MESSAGE.SET_TOKEN('ROUTINE', p_api_name);
14325: FND_MESSAGE.SET_TOKEN('SQLERRM', sqlerrm);
14326: FND_MSG_PUB.ADD;
14327: fnd_msg_pub.count_and_get(
14328: p_count => x_msg_count
14329: ,p_data => x_msg_data);
14330:
14331: END get_contract_price_list;
14363: --RAISE FND_API.G_EXC_ERROR;
14364: --null;
14365: FND_MESSAGE.Set_Name('CS', 'CS_CHG_GET_CURRENCY_FAILED');
14366: FND_MESSAGE.SET_TOKEN('PRICE_LIST_ID', p_price_list_id);
14367: FND_MSG_PUB.Add;
14368: RAISE FND_API.G_EXC_ERROR;
14369: END IF;
14370: ELSE
14371: --price list id is null
14379: EXCEPTION
14380:
14381: WHEN FND_API.G_EXC_ERROR THEN
14382: x_return_status := FND_API.G_RET_STS_ERROR;
14383: fnd_msg_pub.count_and_get(
14384: p_count => x_msg_count
14385: ,p_data => x_msg_data);
14386:
14387: WHEN OTHERS THEN
14387: WHEN OTHERS THEN
14388: x_return_status := FND_API.G_RET_STS_ERROR;
14389: FND_MESSAGE.Set_Name('CS', 'CS_CHG_GET_CURRENCY_FAILED');
14390: FND_MESSAGE.SET_TOKEN('PRICE_LIST_ID', p_price_list_id);
14391: FND_MSG_PUB.Add;
14392: fnd_msg_pub.count_and_get(
14393: p_count => x_msg_count
14394: ,p_data => x_msg_data);
14395:
14388: x_return_status := FND_API.G_RET_STS_ERROR;
14389: FND_MESSAGE.Set_Name('CS', 'CS_CHG_GET_CURRENCY_FAILED');
14390: FND_MESSAGE.SET_TOKEN('PRICE_LIST_ID', p_price_list_id);
14391: FND_MSG_PUB.Add;
14392: fnd_msg_pub.count_and_get(
14393: p_count => x_msg_count
14394: ,p_data => x_msg_data);
14395:
14396: END get_currency_code;
14442: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_UNDEFINED_CONV_CURRENCY');
14443: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
14444: FND_MESSAGE.SET_TOKEN('FROM_CURRENCY', p_from_currency);
14445: FND_MESSAGE.SET_TOKEN('TO_CURRENCY', p_to_currency);
14446: FND_MSG_PUB.add;
14447: RAISE FND_API.g_exc_error;
14448: END IF;
14449:
14450: IF p_to_currency IS NULL THEN
14452: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_UNDEFINED_CONV_CURRENCY');
14453: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
14454: FND_MESSAGE.SET_TOKEN('FROM_CURRENCY', p_from_currency);
14455: FND_MESSAGE.SET_TOKEN('TO_CURRENCY', p_to_currency);
14456: FND_MSG_PUB.add;
14457: RAISE FND_API.g_exc_error;
14458: END IF;
14459:
14460: IF ((l_conversion_type IS NULL) OR
14463: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_UNDEFINED_CONV_PROFILES');
14464: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
14465: FND_MESSAGE.SET_TOKEN('PROFILE1', 'CS_CHG_DEFAULT_CONVERSION_TYPE');
14466: FND_MESSAGE.SET_TOKEN('PROFILE2', 'CS_CHG_MAX_ROLL_DAYS');
14467: FND_MSG_PUB.add;
14468: RAISE FND_API.g_exc_error;
14469: END IF;
14470:
14471:
14487: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
14488: FND_MESSAGE.SET_TOKEN('FROM_CURRENCY', p_from_currency);
14489: FND_MESSAGE.SET_TOKEN('TO_CURRENCY', p_to_currency);
14490: FND_MESSAGE.SET_TOKEN('CONV_DATE', sysdate);
14491: FND_MSG_PUB.add;
14492: RAISE FND_API.g_exc_error;
14493: ELSE
14494: x_denominator := lx_denominator;
14495: x_numerator := lx_numerator;
14508: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
14509: FND_MESSAGE.SET_TOKEN('FROM_CURRENCY', p_from_currency);
14510: FND_MESSAGE.SET_TOKEN('TO_CURRENCY', p_to_currency);
14511: FND_MESSAGE.SET_TOKEN('CONV_DATE', sysdate);
14512: FND_MSG_PUB.add;
14513:
14514: END Get_Conversion_Rate;
14515:
14516: --============================================================
14628: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CONTRACT_ERROR');
14629: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
14630: FND_MESSAGE.SET_TOKEN('CONTRACT_SERVICE_LINE_ID', p_contract_sr_id);
14631: FND_MESSAGE.SET_TOKEN('BUSINESS_PROCESS_ID', p_business_process_id);
14632: FND_MSG_PUB.add;
14633: RAISE FND_API.g_exc_error;
14634: END IF;
14635:
14636: EXCEPTION
14636: EXCEPTION
14637:
14638: WHEN FND_API.g_exc_error THEN
14639: x_return_status := fnd_api.g_ret_sts_error;
14640: fnd_msg_pub.count_and_get(
14641: p_count => x_msg_count
14642: ,p_data => x_msg_data);
14643:
14644: END get_contract;
14673: CS_Charge_Details_PVT.Add_Invalid_Argument_Msg(
14674: p_token_an => p_api_name,
14675: p_token_v => to_char(p_estimate_detail_id) ,
14676: p_token_p => 'p_estimate_detail_id') ;
14677: fnd_msg_pub.count_and_get(
14678: p_count => x_msg_count
14679: ,p_data => x_msg_data);
14680:
14681: WHEN RECORD_LOCK_EXCEPTION THEN
14688: x_return_status := FND_API.G_RET_STS_ERROR;
14689: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CHARGE_FAILED');
14690: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
14691: FND_MESSAGE.SET_TOKEN('ESTIMATE_DETAIL_ID', p_estimate_detail_id);
14692: FND_MSG_PUB.add;
14693: fnd_msg_pub.count_and_get(
14694: p_count => x_msg_count
14695: ,p_data => x_msg_data);
14696:
14689: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CHARGE_FAILED');
14690: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
14691: FND_MESSAGE.SET_TOKEN('ESTIMATE_DETAIL_ID', p_estimate_detail_id);
14692: FND_MSG_PUB.add;
14693: fnd_msg_pub.count_and_get(
14694: p_count => x_msg_count
14695: ,p_data => x_msg_data);
14696:
14697: END;
14781: p_token_an => p_api_name,
14782: p_token_v => to_char(p_org_id) ,
14783: p_token_p => 'p_org_id') ;
14784:
14785: fnd_msg_pub.count_and_get(
14786: p_count => x_msg_count
14787: ,p_data => x_msg_data);
14788:
14789:
14805: IS
14806:
14807: BEGIN
14808:
14809: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
14810: FND_MESSAGE.Set_Name('CS', 'CS_API_ALL_INVALID_ARGUMENT');
14811: FND_MESSAGE.Set_Token('API_NAME', p_token_an);
14812: FND_MESSAGE.Set_Token('VALUE', p_token_v);
14813: FND_MESSAGE.Set_Token('PARAMETER', p_token_p);
14810: FND_MESSAGE.Set_Name('CS', 'CS_API_ALL_INVALID_ARGUMENT');
14811: FND_MESSAGE.Set_Token('API_NAME', p_token_an);
14812: FND_MESSAGE.Set_Token('VALUE', p_token_v);
14813: FND_MESSAGE.Set_Token('PARAMETER', p_token_p);
14814: FND_MSG_PUB.Add;
14815:
14816: END IF;
14817:
14818: END Add_Invalid_Argument_Msg;
14829: IS
14830:
14831: BEGIN
14832:
14833: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
14834:
14835: FND_MESSAGE.Set_Name('CS', 'CS_API_ALL_NULL_PARAMETER');
14836: FND_MESSAGE.Set_Token('API_NAME', p_token_an);
14837: FND_MESSAGE.Set_Token('NULL_PARAM', p_token_np);
14834:
14835: FND_MESSAGE.Set_Name('CS', 'CS_API_ALL_NULL_PARAMETER');
14836: FND_MESSAGE.Set_Token('API_NAME', p_token_an);
14837: FND_MESSAGE.Set_Token('NULL_PARAM', p_token_np);
14838: FND_MSG_PUB.Add;
14839:
14840: END IF;
14841:
14842: END Add_Null_Parameter_Msg;
14850: IS
14851: BEGIN
14852: FND_MESSAGE.Set_Name('CS', 'CS_API_CHG_CANT_DELETE_DET');
14853: FND_MESSAGE.Set_Token('API_NAME', p_token_an);
14854: FND_MSG_PUB.Add;
14855: END;
14856:
14857:
14858: --============================
14867: FND_MESSAGE.Set_Name('CS', 'CS_API_CHG_CANT_UPD_DET_PARAM');
14868: FND_MESSAGE.Set_Token('API_NAME', p_token_an);
14869: FND_MESSAGE.Set_Token('COLUMN_NAME', p_token_cn);
14870: FND_MESSAGE.Set_Token('VALUE', p_token_v);
14871: FND_MSG_PUB.Add;
14872: END;
14873:
14874:
14875:
14885: BEGIN
14886:
14887: FND_MESSAGE.Set_Name('CS', 'CS_API_ALL_CANT_LOCK_RECORD');
14888: FND_MESSAGE.Set_Token('API_NAME', p_token_an);
14889: FND_MSG_PUB.Add;
14890: END Record_IS_Locked_Msg;
14891:
14892:
14893: PROCEDURE Validate_Who_Info(
14985: IF get_line_type_csr%NOTFOUND THEN
14986: CLOSE get_line_type_csr;
14987: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_LINE_TYPE_NOT_FOUND');
14988: FND_MESSAGE.SET_TOKEN('TXN_BILLING_TYPE_ID', p_txn_billing_type_id);
14989: FND_MSG_PUB.ADD;
14990: RAISE FND_API.g_exc_error;
14991: END IF;
14992: CLOSE get_line_type_csr;
14993: --DBMS_OUTPUT.PUT_LINE('x_return_status = ' || x_return_status);
14995: -- Exception Block
14996: EXCEPTION
14997: WHEN FND_API.g_exc_error THEN
14998: x_return_status := fnd_api.g_ret_sts_error;
14999: fnd_msg_pub.count_and_get(
15000: p_count => x_msg_count
15001: ,p_data => x_msg_data);
15002: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
15003: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
15000: p_count => x_msg_count
15001: ,p_data => x_msg_data);
15002: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
15003: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
15004: fnd_msg_pub.count_and_get(
15005: p_count => x_msg_count
15006: ,p_data => x_msg_data);
15007: WHEN OTHERS THEN
15008: x_return_status := FND_API.G_RET_STS_ERROR;
15008: x_return_status := FND_API.G_RET_STS_ERROR;
15009: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_UNEXPECTED_EXEC_ERRORS');
15010: FND_MESSAGE.SET_TOKEN('ROUTINE', p_api_name);
15011: FND_MESSAGE.SET_TOKEN('SQLERRM', sqlerrm);
15012: FND_MSG_PUB.ADD;
15013: fnd_msg_pub.count_and_get(
15014: p_count => x_msg_count
15015: ,p_data => x_msg_data);
15016:
15009: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_UNEXPECTED_EXEC_ERRORS');
15010: FND_MESSAGE.SET_TOKEN('ROUTINE', p_api_name);
15011: FND_MESSAGE.SET_TOKEN('SQLERRM', sqlerrm);
15012: FND_MSG_PUB.ADD;
15013: fnd_msg_pub.count_and_get(
15014: p_count => x_msg_count
15015: ,p_data => x_msg_data);
15016:
15017: END Get_Line_Type;
15132: IF order_csr%NOTFOUND THEN
15133: CLOSE order_csr;
15134: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_ORDER');
15135: FND_MESSAGE.SET_TOKEN('ORDER_HEADER_ID', p_order_header_id);
15136: FND_MSG_PUB.Add;
15137: RAISE FND_API.G_EXC_ERROR;
15138: END IF;
15139: CLOSE order_csr;
15140:
15143: IF l_open_flag = 'N' THEN
15144: FND_MESSAGE.Set_Name('CS', 'CS_CHG_CANNOT_ADD_TO_ORDER');
15145: FND_MESSAGE.Set_token('API_NAME', p_api_name);
15146: FND_MESSAGE.SET_TOKEN('ORDER_HEADER_ID', p_order_header_id);
15147: FND_MSG_PUB.Add;
15148: RAISE FND_API.G_EXC_ERROR;
15149: END IF;
15150:
15151:
15152: -- Exception Block
15153: EXCEPTION
15154: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
15155: x_return_status := FND_API.G_RET_STS_ERROR;
15156: fnd_msg_pub.count_and_get(
15157: p_count => x_msg_count
15158: ,p_data => x_msg_data);
15159:
15160: WHEN OTHERS THEN
15160: WHEN OTHERS THEN
15161: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_UNEXPECTED_EXEC_ERRORS');
15162: FND_MESSAGE.SET_TOKEN('ROUTINE', p_api_name);
15163: FND_MESSAGE.SET_TOKEN('SQLERRM', sqlerrm);
15164: FND_MSG_PUB.ADD;
15165: fnd_msg_pub.count_and_get(
15166: p_count => x_msg_count
15167: ,p_data => x_msg_data);
15168: x_return_status := FND_API.G_RET_STS_ERROR;
15161: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_UNEXPECTED_EXEC_ERRORS');
15162: FND_MESSAGE.SET_TOKEN('ROUTINE', p_api_name);
15163: FND_MESSAGE.SET_TOKEN('SQLERRM', sqlerrm);
15164: FND_MSG_PUB.ADD;
15165: fnd_msg_pub.count_and_get(
15166: p_count => x_msg_count
15167: ,p_data => x_msg_data);
15168: x_return_status := FND_API.G_RET_STS_ERROR;
15169:
15268: , L_API_NAME
15269: , G_PKG_NAME
15270: )
15271: THEN
15272: FND_MSG_PUB.Count_And_Get
15273: (
15274: p_count => x_msg_count
15275: , p_data => x_msg_data
15276: );
15278: END IF ;
15279:
15280: IF FND_API.to_Boolean(p_init_msg_list)
15281: THEN
15282: FND_MSG_PUB.initialize;
15283: END IF ;
15284:
15285: ------------------------------------------------------------------------------
15286: -- Parameter Validations:
15301: FND_MESSAGE.Set_Name('CS', 'CS_SR_PARAM_VALUE_ERROR');
15302: FND_MESSAGE.Set_Token('API_NAME', L_API_NAME_FULL);
15303: FND_MESSAGE.Set_Token('PARAM', 'p_object_type');
15304: FND_MESSAGE.Set_Token('CURRVAL', p_object_type);
15305: FND_MSG_PUB.ADD;
15306:
15307: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
15308: END IF;
15309:
15324: FND_MESSAGE.Set_Name('CS', 'CS_SR_PARAM_VALUE_ERROR');
15325: FND_MESSAGE.Set_Token('API_NAME', L_API_NAME_FULL);
15326: FND_MESSAGE.Set_Token('PARAM', 'p_processing_set_id');
15327: FND_MESSAGE.Set_Token('CURRVAL', NVL(to_char(p_processing_set_id),'NULL'));
15328: FND_MSG_PUB.ADD;
15329:
15330: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
15331: END IF;
15332:
15417: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
15418: FND_MESSAGE.Set_Name('CS', 'CS_CHG_LINE_VAL_FAIL');
15419: FND_MESSAGE.Set_Token('API_NAME', L_API_NAME_FULL);
15420: FND_MESSAGE.Set_Token('ERROR', SQLERRM);
15421: FND_MSG_PUB.ADD;
15422:
15423: IF FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level
15424: THEN
15425: FND_LOG.String
15534: , L_API_NAME
15535: , G_PKG_NAME
15536: )
15537: THEN
15538: FND_MSG_PUB.Count_And_Get
15539: (
15540: p_count => x_msg_count
15541: , p_data => x_msg_data
15542: );
15544: END IF ;
15545:
15546: IF FND_API.to_Boolean(p_init_msg_list)
15547: THEN
15548: FND_MSG_PUB.initialize;
15549: END IF ;
15550:
15551: ------------------------------------------------------------------------------
15552: -- Parameter Validations:
15567: FND_MESSAGE.Set_Name('CS', 'CS_SR_PARAM_VALUE_ERROR');
15568: FND_MESSAGE.Set_Token('API_NAME', L_API_NAME_FULL);
15569: FND_MESSAGE.Set_Token('PARAM', 'p_object_type');
15570: FND_MESSAGE.Set_Token('CURRVAL', p_object_type);
15571: FND_MSG_PUB.ADD;
15572:
15573: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
15574: END IF;
15575:
15590: FND_MESSAGE.Set_Name('CS', 'CS_SR_PARAM_VALUE_ERROR');
15591: FND_MESSAGE.Set_Token('API_NAME', L_API_NAME_FULL);
15592: FND_MESSAGE.Set_Token('PARAM', 'p_processing_set_id');
15593: FND_MESSAGE.Set_Token('CURRVAL', NVL(to_char(p_processing_set_id),'NULL'));
15594: FND_MSG_PUB.ADD;
15595:
15596: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
15597: END IF;
15598:
15670: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
15671: FND_MESSAGE.Set_Name('CS', 'CS_CHG_LINE_DEL_FAIL');
15672: FND_MESSAGE.Set_Token('API_NAME', L_API_NAME_FULL);
15673: FND_MESSAGE.Set_Token('ERROR', SQLERRM);
15674: FND_MSG_PUB.ADD;
15675:
15676: IF FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level
15677: THEN
15678: FND_LOG.String