[Home] [Help]
484: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
485: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
486: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
487: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
488: FND_MSG_PUB.add;
489:
490: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
491: RETURN lv_exists_flag;
492:
531: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
532: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
533: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
534: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
535: FND_MSG_PUB.add;
536:
537: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
538: RETURN lv_exists_flag;
539:
579: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
580: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
581: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
582: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
583: FND_MSG_PUB.add;
584:
585: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
586: RETURN lv_exists_flag;
587:
628: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
629: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
630: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
631: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
632: FND_MSG_PUB.add;
633:
634: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
635: RETURN lv_exists_flag;
636:
672: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
673: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
674: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
675: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
676: FND_MSG_PUB.add;
677:
678: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
679: RETURN lv_exists_flag;
680:
730: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
731: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
732: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
733: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
734: FND_MSG_PUB.add;
735:
736: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
737: RETURN lv_exists_flag;
738:
893: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
894: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
895: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
896: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
897: FND_MSG_PUB.add;
898:
899: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
900: RETURN lv_exists_flag;
901:
994: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
995: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
996: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
997: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
998: FND_MSG_PUB.add;
999:
1000: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1001: RETURN lv_exists_flag;
1002:
1046: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
1047: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
1048: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
1049: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
1050: FND_MSG_PUB.add;
1051:
1052: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1053: RETURN l_exists_flag;
1054:
1125: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
1126: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
1127: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
1128: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
1129: FND_MSG_PUB.add;
1130:
1131: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1132: RETURN lv_exists_flag;
1133:
1169: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
1170: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
1171: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
1172: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
1173: FND_MSG_PUB.add;
1174:
1175: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1176: RETURN lv_temp;
1177:
1218: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
1219: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
1220: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
1221: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
1222: FND_MSG_PUB.add;
1223:
1224: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1225: RETURN lv_exists_flag;
1226: END;
1269: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
1270: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
1271: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
1272: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
1273: FND_MSG_PUB.add;
1274:
1275: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1276: RETURN lv_exists_flag;
1277: END;
1329: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
1330: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
1331: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
1332: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
1333: FND_MSG_PUB.add;
1334:
1335: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1336: RETURN lv_exists_flag;
1337: END;
1380: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
1381: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
1382: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
1383: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
1384: FND_MSG_PUB.add;
1385:
1386: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1387: RETURN lv_exists_flag;
1388:
1428: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
1429: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
1430: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
1431: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
1432: FND_MSG_PUB.add;
1433:
1434: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1435: RETURN lv_exists_flag;
1436: END;
1506: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
1507: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
1508: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
1509: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
1510: FND_MSG_PUB.add;
1511:
1512: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1513: RETURN lv_exists_flag;
1514:
1553: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
1554: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
1555: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
1556: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
1557: FND_MSG_PUB.add;
1558:
1559: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1560: RETURN lv_exists_flag;
1561: END;
1594: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
1595: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
1596: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
1597: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
1598: FND_MSG_PUB.add;
1599:
1600: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1601: RETURN lv_exists_flag;
1602:
1639: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
1640: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
1641: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
1642: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
1643: FND_MSG_PUB.add;
1644:
1645: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1646: RETURN lv_exists_flag;
1647:
1688: FND_MESSAGE.SET_NAME(G_APP_NAME, G_DB_ERROR);
1689: FND_MESSAGE.SET_TOKEN(token => G_PROG_NAME_TOKEN, value => l_prog_name);
1690: FND_MESSAGE.SET_TOKEN(token => G_SQLCODE_TOKEN, value => SQLCODE);
1691: FND_MESSAGE.SET_TOKEN(token => G_SQLERRM_TOKEN, value => SQLERRM);
1692: FND_MSG_PUB.add;
1693:
1694: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1695: RETURN lv_exists_flag;
1696:
1756: END IF;
1757:
1758: -- Initialize message list if p_init_msg_list is set to TRUE
1759: IF FND_API.To_Boolean(p_init_msg_list) THEN
1760: FND_MSG_PUB.Initialize;
1761: END IF;
1762:
1763: -- Initialize API return status to success
1764: x_return_status := FND_API.G_RET_STS_SUCCESS;
1845:
1846: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1847: FND_MESSAGE.Set_Name('CS', 'CS_API_CHG_ERR_PRE_CUST_USR_HK');
1848: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
1849: FND_MSG_PUB.Add;
1850: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1851: END IF;
1852:
1853: END IF;
1880:
1881: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1882: FND_MESSAGE.Set_Name('CS', 'CS_API_CHG_ERR_PRE_VERT_USR_HK');
1883: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
1884: FND_MSG_PUB.Add;
1885: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1886: END IF;
1887:
1888: END IF;
1936:
1937: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1938: FND_MESSAGE.Set_Name('CS', 'CS_CHG_VALIDATE_CHRG_DETAIL_ER');
1939: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
1940: FND_MSG_PUB.Add;
1941: RAISE FND_API.G_EXC_ERROR;
1942: END IF;
1943:
1944: --Fixed Bug # 3795144
2292:
2293: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2294: FND_MESSAGE.Set_Name('CS', 'CS_API_CHG_ERR_PST_CUST_USR_HK');
2295: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
2296: FND_MSG_PUB.Add;
2297:
2298: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2299: END IF;
2300:
2328:
2329: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2330: FND_MESSAGE.Set_Name('CS', 'CS_API_CHG_ERR_PST_VERT_USR_HK');
2331: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
2332: FND_MSG_PUB.Add;
2333: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2334: END IF;
2335: END IF;
2336:
2339: IF FND_API.To_Boolean(p_commit) THEN
2340: COMMIT WORK;
2341: END IF;
2342:
2343: FND_MSG_PUB.Count_And_Get
2344: ( p_count => x_msg_count,
2345: p_data => x_msg_data,
2346: p_encoded => FND_API.G_FALSE) ;
2347:
2353: ROLLBACK TO Create_Charge_Details_PVT;
2354: END IF ;
2355:
2356:
2357: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2358: p_data => x_msg_data,
2359: p_encoded => FND_API.G_FALSE) ;
2360:
2361:
2370: END IF ;
2371:
2372: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2373:
2374: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2375: p_data => x_msg_data,
2376: p_encoded => FND_API.G_FALSE) ;
2377: WHEN OTHERS THEN
2378: --l_errm := SQLERRM;
2383: END IF ;
2384:
2385: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2386:
2387: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2388: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2389: END IF;
2390:
2391: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2384:
2385: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2386:
2387: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2388: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2389: END IF;
2390:
2391: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2392: p_data => x_msg_data,
2387: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2388: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2389: END IF;
2390:
2391: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2392: p_data => x_msg_data,
2393: p_encoded => FND_API.G_FALSE) ;
2394:
2395: END Create_Charge_Details;
2448: END IF;
2449:
2450: -- Initialize message list if p_init_msg_list is set to TRUE
2451: IF FND_API.To_Boolean(p_init_msg_list) THEN
2452: FND_MSG_PUB.Initialize;
2453: END IF;
2454:
2455: -- Initialize API return status to success
2456: x_return_status := FND_API.G_RET_STS_SUCCESS;
2535:
2536: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2537: FND_MESSAGE.Set_Name('CS', 'CS_API_CHG_ERR_PRE_CUST_USR_HK');
2538: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
2539: FND_MSG_PUB.Add;
2540: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2541: END IF;
2542:
2543: END IF;
2568:
2569: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2570: FND_MESSAGE.Set_Name('CS', 'CS_API_CHG_ERR_PRE_VERT_USR_HK');
2571: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
2572: FND_MSG_PUB.Add;
2573: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2574: END IF;
2575:
2576: END IF;
2607:
2608: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2609: FND_MESSAGE.Set_Name('CS', 'CS_CHG_VALIDATE_CHRG_DETAIL_ER');
2610: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
2611: FND_MSG_PUB.Add;
2612: RAISE FND_API.G_EXC_ERROR;
2613: END IF;
2614:
2615: --Fixed Bug # 3795144
2918: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2919: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Customer User Hook');
2920: FND_MESSAGE.Set_Name('CS', 'CS_API_CHG_ERR_PST_CUST_USR_HK');
2921: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
2922: FND_MSG_PUB.Add;
2923: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2924: END IF;
2925:
2926: END IF;
2952:
2953: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2954: FND_MESSAGE.Set_Name('CS', 'CS_API_CHG_ERR_PST_VERT_USR_HK');
2955: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
2956: FND_MSG_PUB.Add;
2957: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2958: END IF;
2959:
2960: END IF;
2966: COMMIT WORK;
2967: END IF;
2968:
2969: -- Standard call to get message count and if count is 1, get message info
2970: FND_MSG_PUB.Count_And_Get
2971: (p_count => x_msg_count,
2972: p_data => x_msg_data,
2973: p_encoded => FND_API.G_FALSE) ;
2974:
2977: COMMIT WORK;
2978: END IF;
2979:
2980: -- Standard call to get message count and if count is 1, get message info
2981: FND_MSG_PUB.Count_And_Get
2982: ( p_count => x_msg_count,
2983: p_data => x_msg_data
2984: );
2985:
2989: IF FND_API.To_Boolean(p_transaction_control) THEN
2990: ROLLBACK TO Update_Charge_Details_PVT;
2991: END IF ;
2992: x_return_status := FND_API.G_RET_STS_ERROR;
2993: FND_MSG_PUB.Count_And_Get(
2994: p_count => x_msg_count,
2995: p_data => x_msg_data,
2996: p_encoded => FND_API.G_FALSE) ;
2997:
3001: END IF ;
3002:
3003: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3004:
3005: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3006: p_data => x_msg_data,
3007: p_encoded => FND_API.G_FALSE) ;
3008: WHEN OTHERS THEN
3009: IF FND_API.To_Boolean(p_transaction_control) THEN
3012: END IF ;
3013:
3014: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3015:
3016: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3017: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
3018: END IF;
3019:
3020: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3013:
3014: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3015:
3016: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3017: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
3018: END IF;
3019:
3020: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3021: p_data => x_msg_data,
3016: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3017: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
3018: END IF;
3019:
3020: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3021: p_data => x_msg_data,
3022: p_encoded => FND_API.G_FALSE) ;
3023:
3024: END Update_Charge_Details;
3079: END IF ;
3080:
3081: --Initialize the message list if p_msg_list is set to TRUE
3082: IF FND_API.To_Boolean(p_init_msg_list) THEN
3083: FND_MSG_PUB.initialize ;
3084: END IF ;
3085:
3086: --Initialize the API Return Success to True
3087: x_return_status := FND_API.G_RET_STS_SUCCESS ;
3171: COMMIT WORK ;
3172: END IF ;
3173:
3174: --Standard call to get message count and if count is 1 , get message info
3175: FND_MSG_PUB.Count_And_Get(p_count =>x_msg_count,
3176: p_data => x_msg_data) ;
3177:
3178: --Begin Exception Handling
3179:
3184: ROLLBACK TO Delete_Charge_Details_PUB;
3185: END IF ;
3186: x_return_status := FND_API.G_RET_STS_ERROR ;
3187:
3188: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3189: p_data => x_msg_data,
3190: p_encoded => FND_API.G_FALSE) ;
3191:
3192:
3196: ROLLBACK TO Delete_Charge_Details_PUB;
3197: END IF ;
3198: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3199:
3200: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3201: p_data => x_msg_data,
3202: p_encoded => FND_API.G_FALSE) ;
3203:
3204: WHEN OTHERS THEN
3205: IF FND_API.To_Boolean( p_transaction_control ) THEN
3206: ROLLBACK TO Delete_Charge_Details_PUB;
3207: END IF ;
3208: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3209: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3210: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
3211: END IF ;
3212: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3213: p_data => x_msg_data,
3206: ROLLBACK TO Delete_Charge_Details_PUB;
3207: END IF ;
3208: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3209: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3210: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
3211: END IF ;
3212: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3213: p_data => x_msg_data,
3214: p_encoded => FND_API.G_FALSE) ;
3208: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3209: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3210: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
3211: END IF ;
3212: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3213: p_data => x_msg_data,
3214: p_encoded => FND_API.G_FALSE) ;
3215:
3216: END Delete_Charge_Details; -- End of Procedure Delete Charge Details
3271: END IF;
3272:
3273: -- Initialize message list if p_init_msg_list is set to TRUE
3274: IF FND_API.To_Boolean(p_init_msg_list) THEN
3275: FND_MSG_PUB.Initialize;
3276: END IF;
3277:
3278: -- Initialize API return status to success
3279: x_return_status := FND_API.G_RET_STS_SUCCESS;
3318:
3319: IF p_estimate_detail_id IS NULL THEN
3320: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_NOT_A_VALID_CHARGE_LINE');
3321: FND_MESSAGE.SET_TOKEN('ESTIMATE_DETAIL_ID', p_estimate_detail_id);
3322: FND_MSG_PUB.ADD;
3323: RAISE FND_API.G_EXC_ERROR;
3324: END IF;
3325:
3326: --DBMS_OUTPUT.PUT_LINE('passed 1st val');
3330: IF c_charges_rec%NOTFOUND THEN
3331: CLOSE c_charges_rec;
3332: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_NOT_A_VALID_CHARGE_LINE');
3333: FND_MESSAGE.SET_TOKEN('ESTIMATE_DETAIL_ID', p_estimate_detail_id);
3334: FND_MSG_PUB.ADD;
3335: RAISE FND_API.G_EXC_ERROR;
3336: END IF;
3337: CLOSE c_charges_rec;
3338:
3340:
3341: IF v_charges_rec.charge_line_type <> 'ESTIMATE' THEN
3342: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_NOT_AN_ESTIMATE');
3343: FND_MESSAGE.SET_TOKEN('ESTIMATE_DETAIL_ID', p_estimate_detail_id);
3344: FND_MSG_PUB.ADD;
3345: RAISE FND_API.G_EXC_ERROR;
3346: END IF;
3347:
3348: --DBMS_OUTPUT.PUT_LINE('passed 3rd val');
3594: COMMIT WORK ;
3595: END IF ;
3596:
3597: --Standard call to get message count and if count is 1 , get message info
3598: FND_MSG_PUB.Count_And_Get(p_count =>x_msg_count,
3599: p_data => x_msg_data) ;
3600:
3601:
3602:
3610: END IF ;
3611:
3612: x_return_status := FND_API.G_RET_STS_ERROR ;
3613:
3614: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3615: p_data => x_msg_data,
3616: p_encoded => FND_API.G_FALSE) ;
3617:
3618:
3622: END IF ;
3623:
3624: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3625:
3626: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3627: p_data => x_msg_data,
3628: p_encoded => FND_API.G_FALSE) ;
3629: WHEN OTHERS THEN
3630: IF FND_API.To_Boolean( p_transaction_control ) THEN
3632: END IF ;
3633:
3634: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3635:
3636: IF FND_MSG_PUB.Check_Msg_Level
3637: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3638: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
3639: END IF ;
3640:
3633:
3634: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3635:
3636: IF FND_MSG_PUB.Check_Msg_Level
3637: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3638: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
3639: END IF ;
3640:
3641: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3634: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3635:
3636: IF FND_MSG_PUB.Check_Msg_Level
3637: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3638: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
3639: END IF ;
3640:
3641: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3642: p_data => x_msg_data,
3637: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3638: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
3639: END IF ;
3640:
3641: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3642: p_data => x_msg_data,
3643: p_encoded => FND_API.G_FALSE) ;
3644:
3645: END Copy_Estimate;
3668: CLOSE c_currency_code;
3669: IF lv_exists_flag <> 'Y' THEN
3670: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CURRENCY_CODE');
3671: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_currency_code);
3672: FND_MSG_PUB.Add;
3673: RAISE FND_API.G_EXC_ERROR;
3674: ELSE
3675: x_return_status := FND_API.G_RET_STS_SUCCESS;
3676: END IF;
3680: END IF;
3681: EXCEPTION
3682: WHEN FND_API.G_EXC_ERROR THEN
3683: x_return_status := FND_API.G_RET_STS_ERROR;
3684: fnd_msg_pub.count_and_get(
3685: p_count => x_msg_count
3686: ,p_data => x_msg_data);
3687:
3688: WHEN OTHERS THEN
3688: WHEN OTHERS THEN
3689: x_return_status := FND_API.G_RET_STS_ERROR;
3690: FND_MESSAGE.Set_Name('CS', 'CS_CHG_GET_CURRENCY_FAILED');
3691: FND_MESSAGE.SET_TOKEN('PRICE_LIST_ID', p_price_list_id);
3692: FND_MSG_PUB.Add;
3693: fnd_msg_pub.count_and_get(
3694: p_count => x_msg_count
3695: ,p_data => x_msg_data);
3696:
3689: x_return_status := FND_API.G_RET_STS_ERROR;
3690: FND_MESSAGE.Set_Name('CS', 'CS_CHG_GET_CURRENCY_FAILED');
3691: FND_MESSAGE.SET_TOKEN('PRICE_LIST_ID', p_price_list_id);
3692: FND_MSG_PUB.Add;
3693: fnd_msg_pub.count_and_get(
3694: p_count => x_msg_count
3695: ,p_data => x_msg_data);
3696:
3697: END CURR_IN_CONVERSION_LIST;
4180: IF l_disallow_new_charge = 'Y' THEN
4181: --DBMS_OUTPUT.PUT_LINE('l_disallow_new_charge is '||l_disallow_new_charge);
4182: --raise error
4183: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_CANNOT_INSERT');
4184: FND_MSG_PUB.ADD;
4185: RAISE FND_API.G_EXC_ERROR;
4186: END IF;
4187: ELSIF p_validation_mode = 'U' THEN
4188: IF l_disallow_charge_update = 'Y' THEN
4187: ELSIF p_validation_mode = 'U' THEN
4188: IF l_disallow_charge_update = 'Y' THEN
4189: --raise error
4190: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_CANNOT_UPDATE');
4191: FND_MSG_PUB.ADD;
4192: RAISE FND_API.G_EXC_ERROR;
4193: END IF;
4194: END IF;
4195:
4460: --raise error
4461: --Need to define error here
4462: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_CANNOT_CHANGE_OU');
4463: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
4464: FND_MSG_PUB.ADD;
4465: RAISE FND_API.G_EXC_ERROR;
4466: ELSE
4467: x_charges_detail_rec.org_id := p_charges_detail_rec.org_id;
4468: END IF;
4520: IF p_charges_detail_rec.org_id <> l_db_det_rec.org_id THEN
4521: --raise error
4522: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_CANNOT_CHANGE_OU');
4523: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
4524: FND_MSG_PUB.ADD;
4525: RAISE FND_API.G_EXC_ERROR;
4526: ELSE
4527: x_charges_detail_rec.org_id := p_charges_detail_rec.org_id;
4528: END IF;
4541:
4542: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_ORIGINAL_SOURCE');
4543: FND_MESSAGE.SET_TOKEN('ORIG_SOURCE_ID', p_charges_detail_rec.original_source_id);
4544: FND_MESSAGE.SET_TOKEN('ORIG_SOURCE_CODE', p_charges_detail_rec.original_source_code);
4545: FND_MSG_PUB.ADD;
4546: RAISE FND_API.G_EXC_ERROR;
4547:
4548: ELSE
4549: VALIDATE_SOURCE(
4563: --raise error
4564: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_ORIGINAL_SOURCE');
4565: FND_MESSAGE.SET_TOKEN('ORIG_SOURCE_ID', p_charges_detail_rec.original_source_id);
4566: FND_MESSAGE.SET_TOKEN('ORIG_SOURCE_CODE', p_charges_detail_rec.original_source_code);
4567: FND_MSG_PUB.ADD;
4568: RAISE FND_API.G_EXC_ERROR;
4569: END IF;
4570:
4571: -- assign to out record
4716:
4717: ELSE
4718: --DBMS_OUTPUT.PUT_LINE('Coming to the else');
4719: FND_MESSAGE.Set_Name('CS', 'CS_CHG_CANNOT_UPDATE_CHRG_LINE');
4720: FND_MSG_PUB.Add;
4721: RAISE FND_API.G_EXC_ERROR;
4722: END IF;
4723:
4724: IF (p_charges_detail_rec.charge_line_type <> FND_API.G_MISS_CHAR OR
4898: p_charges_detail_rec.pricing_attribute99 <> FND_API.G_MISS_CHAR OR
4899: p_charges_detail_rec.pricing_attribute100 <> FND_API.G_MISS_CHAR ) THEN
4900:
4901: FND_MESSAGE.Set_Name('CS', 'CS_CHG_CANNOT_UPDATE_CHRG_LINE');
4902: FND_MSG_PUB.Add;
4903: RAISE FND_API.G_EXC_ERROR;
4904: END IF;
4905: ELSE
4906: --l_in_oe_flag = 'N'
5126: --null;
5127:
5128: -- FND_MESSAGE.Set_Name('CS', 'CS_CHG_CANNOT_UPDATE_CHRG_LINE');
5129: FND_MESSAGE.Set_Name('CS', 'CS_CHG_CANNOT_UPDATE_LINE'); --Bug 7445810 created an appropriate message
5130: FND_MSG_PUB.Add;
5131: RAISE FND_API.G_EXC_ERROR;
5132: END IF;
5133:
5134: -- If generated by BCA Engine then cannot update anything except the final amount
5219: ELSE
5220: -- give an error message
5221: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_CANNOT_UPDATE_INPROG');
5222: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
5223: FND_MSG_PUB.ADD;
5224: RAISE FND_API.G_EXC_ERROR;
5225: END IF;
5226: ELSE
5227: --get it from the db record
5229:
5230: IF x_charges_detail_rec.charge_line_type = 'IN PROGRESS' THEN
5231: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_CANNOT_UPDATE_INPROG');
5232: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
5233: FND_MSG_PUB.ADD;
5234: RAISE FND_API.G_EXC_ERROR;
5235: END IF;
5236: END IF;
5237:
5317: ELSE
5318: -- Raise Error
5319: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_BUSS_PROCESS_ID');
5320: FND_MESSAGE.SET_TOKEN('BUSINESS_PROCESS_ID', l_business_process_id);
5321: FND_MSG_PUB.ADD;
5322: RAISE FND_API.G_EXC_ERROR;
5323: END IF;
5324: ELSE
5325: -- Profile to get Business Process From SR = 'N'
5325: -- Profile to get Business Process From SR = 'N'
5326: -- Raise error the Business Process ID IS Null and needed
5327: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_BUSS_PROCESS_ID');
5328: FND_MESSAGE.SET_TOKEN('BUSINESS_PROCESS_ID', p_charges_detail_rec.business_process_id);
5329: FND_MSG_PUB.ADD;
5330: RAISE FND_API.G_EXC_ERROR;
5331: END IF;
5332: END IF;
5333:
5415: IF l_create_charge_flag = 'N' THEN
5416: --DBMS_OUTPUT.PUT_LINE('l_disallow_new_charge is '||l_disallow_new_charge);
5417: --raise error
5418: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CHARGE_FLAG');
5419: FND_MSG_PUB.ADD;
5420: RAISE FND_API.G_EXC_ERROR;
5421: END IF;
5422:
5423: -- end
5620: IF p_charges_detail_rec.line_category_code <> l_line_order_category_code THEN
5621: --raise error
5622: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_LN_ORD_CATEGORY');
5623: FND_MESSAGE.SET_TOKEN('LINE_ORDER_CATEGORY', p_charges_detail_rec.line_category_code);
5624: FND_MSG_PUB.ADD;
5625: RAISE FND_API.G_EXC_ERROR;
5626: ELSE
5627: -- the p_charges_detail_rec.line_category_code
5628: -- matches l_line_order_category_code
5648: IF p_charges_detail_rec.line_category_code <> l_line_order_category_code THEN
5649: --raise error
5650: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_LN_ORD_CATEGORY');
5651: FND_MESSAGE.SET_TOKEN('LINE_ORDER_CATEGORY', p_charges_detail_rec.line_category_code);
5652: FND_MSG_PUB.ADD;
5653: RAISE FND_API.G_EXC_ERROR;
5654: ELSE
5655: -- the p_charges_detail_rec.line_category_code
5656: -- matches l_line_order_category_code
5669: IF p_charges_detail_rec.line_category_code <> l_db_det_rec.line_category_code THEN
5670: --raise error
5671: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_LN_ORD_CATEGORY');
5672: FND_MESSAGE.SET_TOKEN('LINE_ORDER_CATEGORY', p_charges_detail_rec.line_category_code);
5673: FND_MSG_PUB.ADD;
5674: RAISE FND_API.G_EXC_ERROR;
5675: ELSE
5676: -- the p_charges_detail_rec.line_category_code
5677: -- matches l_db_det_rec.line_category_code
5845:
5846: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5847: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_VALIDATE_ITEM_ERROR');
5848: FND_MESSAGE.SET_TOKEN('INV_ID', p_charges_detail_rec.inventory_item_id_in);
5849: FND_MSG_PUB.ADD;
5850: RAISE FND_API.G_EXC_ERROR;
5851: ELSE
5852: --assign to out record
5853: x_charges_detail_rec.inventory_item_id_in := p_charges_detail_rec.inventory_item_id_in;
5899:
5900: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5901: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_VALIDATE_ITEM_ERROR');
5902: FND_MESSAGE.SET_TOKEN('INV_ID', p_charges_detail_rec.inventory_item_id_in);
5903: FND_MSG_PUB.ADD;
5904: RAISE FND_API.G_EXC_ERROR;
5905: END IF;
5906:
5907: --assign to out record
5978: --raise error
5979: --FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_ITEM_REVISION');
5980: --FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_charges_detail_rec.inventory_item_id_in, TRUE);
5981: --FND_MESSAGE.SET_TOKEN('ITEM_REVISION', p_charges_detail_rec.item_revision, TRUE);
5982: --FND_MSG_PUB.ADD;
5983: --RAISE FND_API.G_EXC_ERROR;
5984: x_charges_detail_rec.item_revision := NULL;
5985: END IF;
5986: ELSE
6018: --item is revision controlled but item revsion is null, raise error
6019: --FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_ITEM_REVISION');
6020: --FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_charges_detail_rec.inventory_item_id_in, TRUE);
6021: --FND_MESSAGE.SET_TOKEN('ITEM_REVISION', p_charges_detail_rec.item_revision, TRUE);
6022: --FND_MSG_PUB.ADD;
6023: --RAISE FND_API.G_EXC_ERROR;
6024: x_charges_detail_rec.item_revision := NULL;
6025: END IF;
6026: ELSE
6154: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6155: --raise error
6156: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_PRIMARY_UOM_ERROR');
6157: FND_MESSAGE.SET_TOKEN('INV_ID', p_charges_detail_rec.inventory_item_id_in);
6158: FND_MSG_PUB.ADD;
6159: RAISE FND_API.G_EXC_ERROR;
6160: END IF;
6161:
6162: --assign to out record
6217: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6218: --raise error
6219: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_PRIMARY_UOM_ERROR');
6220: FND_MESSAGE.SET_TOKEN('INV_ID', p_charges_detail_rec.inventory_item_id_in);
6221: FND_MSG_PUB.ADD;
6222: RAISE FND_API.G_EXC_ERROR;
6223: END IF;
6224:
6225: --assign to out record
6313: ELSE
6314: -- Billing Flag does not match, raise Error
6315: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_BILLING_FLAG');
6316: FND_MESSAGE.SET_TOKEN('BILLING_FLAG', p_charges_detail_rec.billing_flag);
6317: FND_MSG_PUB.ADD;
6318: RAISE FND_API.G_EXC_ERROR;
6319: END IF;
6320: ELSE
6321: -- p_charges_detail_rec.billing_flag is null
6352: -- Billing Flag does not match
6353: -- Raise Error
6354: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_BILLING_FLAG');
6355: FND_MESSAGE.SET_TOKEN('BILLING_FLAG', p_charges_detail_rec.billing_flag);
6356: FND_MSG_PUB.ADD;
6357: RAISE FND_API.G_EXC_ERROR;
6358: END IF;
6359:
6360: ELSE
6415: IF p_charges_detail_rec.txn_billing_type_id <> l_txn_billing_type_id THEN
6416: --RAISE ERROR
6417: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_TXN_BILLING_TYP');
6418: FND_MESSAGE.SET_TOKEN('TXN_BILLING_TYPE_ID', p_charges_detail_rec.txn_billing_type_id);
6419: FND_MSG_PUB.ADD;
6420: RAISE FND_API.G_EXC_ERROR;
6421: ELSE --
6422: --the ids match
6423: --assign to the out record
6456: IF p_charges_detail_rec.txn_billing_type_id <> l_txn_billing_type_id THEN
6457: --RAISE ERROR
6458: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_TXN_BILLING_TYP');
6459: FND_MESSAGE.SET_TOKEN('TXN_BILLING_TYPE_ID', p_charges_detail_rec.txn_billing_type_id);
6460: FND_MSG_PUB.ADD;
6461: RAISE FND_API.G_EXC_ERROR;
6462: ELSE --
6463: --the ids match
6464: --assign to the out record
6527: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_LINE_TYPE');
6528: FND_MESSAGE.SET_TOKEN('LINE_TYPE_ID', p_charges_detail_rec.line_type_id);
6529: FND_MESSAGE.SET_TOKEN('TXN_LINE_TYPE_ID', l_line_type_id);
6530: FND_MESSAGE.SET_TOKEN('TXN_BILLING_TYPE_ID', x_charges_detail_rec.txn_billing_type_id);
6531: FND_MSG_PUB.ADD;
6532: RAISE FND_API.G_EXC_ERROR;
6533: ELSE --
6534: --the ids match
6535: --assign to the out record
6571: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_LINE_TYPE');
6572: FND_MESSAGE.SET_TOKEN('LINE_TYPE_ID', p_charges_detail_rec.line_type_id);
6573: FND_MESSAGE.SET_TOKEN('TXN_LINE_TYPE_ID', l_line_type_id);
6574: FND_MESSAGE.SET_TOKEN('TXN_BILLING_TYPE_ID', x_charges_detail_rec.txn_billing_type_id);
6575: FND_MSG_PUB.ADD;
6576: RAISE FND_API.G_EXC_ERROR;
6577: ELSE --
6578: --the ids match
6579: --assign to the out record
7761: --raise error
7762: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_SOLD_TO_PARTY');
7763: FND_MESSAGE.SET_TOKEN('SOLD_TO_PARTY', p_charges_detail_rec.sold_to_party_id);
7764: FND_MESSAGE.SET_TOKEN('INCIDENT_ID', p_charges_detail_rec.incident_id);
7765: FND_MSG_PUB.ADD;
7766: RAISE FND_API.G_EXC_ERROR;
7767: ELSE
7768: --assign the sold to party to the out record
7769: x_charges_detail_rec.sold_to_party_id := l_customer_id;
7786: --raise error
7787: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_SOLD_TO_PARTY');
7788: FND_MESSAGE.SET_TOKEN('SOLD_TO_PARTY', p_charges_detail_rec.sold_to_party_id);
7789: FND_MESSAGE.SET_TOKEN('INCIDENT_ID', p_charges_detail_rec.incident_id);
7790: FND_MSG_PUB.ADD;
7791: RAISE FND_API.G_EXC_ERROR;
7792: ELSE
7793: --assign the sold to party to the out record
7794: x_charges_detail_rec.sold_to_party_id := p_charges_detail_rec.sold_to_party_id;
7840: --RAISE FND_API.G_EXC_ERROR;
7841: --null;
7842: FND_MESSAGE.Set_Name('CS', 'CS_API_CHG_IB_INSTANCE_MISSING');
7843: FND_MESSAGE.Set_Token('API_NAME', p_api_name);
7844: FND_MSG_PUB.Add;
7845: RAISE FND_API.G_EXC_ERROR;
7846: ELSE
7847: -- Check if instance is of the same inventory_item_id
7848: -- If not of the same inv id the error
7867:
7868: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_IB_INSTANCE_INV');
7869: FND_MESSAGE.Set_Token('INVENTORY_ITEM_ID', p_charges_detail_rec.inventory_item_id_in);
7870: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
7871: FND_MSG_PUB.Add;
7872: RAISE FND_API.G_EXC_ERROR;
7873: ELSE
7874:
7875: l_valid_check := IS_INSTANCE_VALID(p_instance_id => p_charges_detail_rec.customer_product_id,
7916:
7917: IF l_valid_check <> 'Y' THEN
7918:
7919: FND_MESSAGE.SET_NAME ('CS', 'CS_CHG_INVALID_INSTANCE_RMA_PT');
7920: FND_MSG_PUB.Add;
7921: RAISE FND_API.G_EXC_ERROR;
7922: --taklam
7923: ELSE
7924: --assign the customer product id to out record
7958: IF l_valid_check <> 'Y' THEN
7959: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_SERIAL_NUMBER');
7960: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
7961: FND_MESSAGE.Set_Token('SERIAL_NUMBER', p_charges_detail_rec.serial_number);
7962: FND_MSG_PUB.Add;
7963: RAISE FND_API.G_EXC_ERROR;
7964: ELSE
7965: --assign the customer product id to out record
7966: x_charges_detail_rec.serial_number := p_charges_detail_rec.serial_number;
7982: --RAISE FND_API.G_EXC_ERROR;
7983: --null;
7984: FND_MESSAGE.Set_Name('CS', 'CS_API_CHG_IB_INSTANCE_MISSING');
7985: FND_MESSAGE.Set_Token('API_NAME', p_api_name);
7986: FND_MSG_PUB.Add;
7987: RAISE FND_API.G_EXC_ERROR;
7988: ELSE
7989:
7990:
8005:
8006: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_IB_INSTANCE_PTY');
8007: FND_MESSAGE.Set_Token('PARTY_ID', x_charges_detail_rec.sold_to_party_id);
8008: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
8009: FND_MSG_PUB.Add;
8010: RAISE FND_API.G_EXC_ERROR;
8011:
8012: ELSE
8013: --assign to out record
8047:
8048: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_IB_INSTANCE_PTY');
8049: FND_MESSAGE.Set_Token('PARTY_ID', x_charges_detail_rec.sold_to_party_id);
8050: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
8051: FND_MSG_PUB.Add;
8052: RAISE FND_API.G_EXC_ERROR;
8053:
8054: ELSE
8055: --assign to out record
8090: IF l_valid_check <> 'Y' THEN
8091: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_SERIAL_NUMBER');
8092: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
8093: FND_MESSAGE.Set_Token('SERIAL_NUMBER', p_charges_detail_rec.serial_number);
8094: FND_MSG_PUB.Add;
8095: RAISE FND_API.G_EXC_ERROR;
8096: ELSE
8097: --assign the customer product id to out record
8098: x_charges_detail_rec.serial_number := p_charges_detail_rec.serial_number;
8113: IF (l_comms_trackable_flag = 'N') THEN
8114: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_INST_AND_INV');
8115: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
8116: FND_MESSAGE.Set_Token('INVENTORY_ITEM_ID', p_charges_detail_rec.inventory_item_id_in);
8117: FND_MSG_PUB.Add;
8118: RAISE FND_API.G_EXC_ERROR;
8119: ELSE
8120: -- Check if the Instance Is Valid for all other cases
8121: l_valid_check := IS_INSTANCE_VALID(
8168:
8169: IF l_valid_check <> 'Y' THEN
8170:
8171: --FND_MESSAGE.SET_NAME ('CS', 'CS_CHG_INVALID_INSTANCE_RMA_PT');
8172: --FND_MSG_PUB.Add;
8173: Add_Invalid_Argument_Msg(l_api_name_full,
8174: to_char(p_charges_detail_rec.customer_product_id),
8175: 'Customer_Product_Id');
8176: RAISE FND_API.G_EXC_ERROR;
8214: IF l_valid_check <> 'Y' THEN
8215: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_SERIAL_NUMBER');
8216: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
8217: FND_MESSAGE.Set_Token('SERIAL_NUMBER', p_charges_detail_rec.serial_number);
8218: FND_MSG_PUB.Add;
8219: RAISE FND_API.G_EXC_ERROR;
8220: ELSE
8221: --assign the customer product id to out record
8222: x_charges_detail_rec.serial_number := p_charges_detail_rec.serial_number;
8242: --RAISE FND_API.G_EXC_ERROR;
8243: --null;
8244: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INST_CP_RETURN_BY_DATE');
8245: FND_MESSAGE.Set_Token('INST_CP_RTN_BY_DATE', p_charges_detail_rec.installed_cp_return_by_date);
8246: FND_MSG_PUB.Add;
8247: RAISE FND_API.G_EXC_ERROR;
8248: ELSE
8249: --assign to out record
8250: x_charges_detail_rec.installed_cp_return_by_date := p_charges_detail_rec.installed_cp_return_by_date;
8267: --RAISE FND_API.G_EXC_ERROR;
8268: --null;
8269: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INST_CP_RETURN_BY_DATE');
8270: FND_MESSAGE.Set_Token('INST_CP_RTN_BY_DATE', p_charges_detail_rec.installed_cp_return_by_date);
8271: FND_MSG_PUB.Add;
8272: RAISE FND_API.G_EXC_ERROR;
8273: ELSE
8274: --assign to out record
8275: x_charges_detail_rec.installed_cp_return_by_date := p_charges_detail_rec.installed_cp_return_by_date;
8306: p_charges_detail_rec.customer_product_id IS NOT NULL THEN
8307: IF p_charges_detail_rec.installed_cp_return_by_date IS NULL THEN
8308: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INSTALLED_CP_RETURN_BY_DATE');
8309: FND_MESSAGE.Set_Token('INSTALLED_CP_RTN_BY_DATE', p_charges_detail_rec.installed_cp_return_by_date);
8310: FND_MSG_PUB.Add;
8311: RAISE FND_API.G_EXC_ERROR;
8312: ELSE
8313: x_charges_detail_rec.installed_cp_return_by_date := p_charges_detail_rec.installed_cp_return_by_date;
8314: END IF;
8324: p_charges_detail_rec.customer_product_id IS NULL THEN
8325: IF p_charges_detail_rec.new_cp_return_by_date IS NULL THEN
8326: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_NEW_CP_RETURN_BY_DATE');
8327: FND_MESSAGE.Set_Token('NEW_CP_RTN_BY_DATE', p_charges_detail_rec.new_cp_return_by_date);
8328: FND_MSG_PUB.Add;
8329: RAISE FND_API.G_EXC_ERROR;
8330: ELSE
8331: x_charges_detail_rec.new_cp_return_by_date := p_charges_detail_rec.new_cp_return_by_date;
8332: END IF;
8345: --RAISE FND_API.G_EXC_ERROR;
8346: --null;
8347: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_NEW_CP_RETURN_BY_DATE');
8348: FND_MESSAGE.Set_Token('NEW_CP_RTN_BY_DATE', p_charges_detail_rec.new_cp_return_by_date);
8349: FND_MSG_PUB.Add;
8350: RAISE FND_API.G_EXC_ERROR;
8351: ELSE
8352: x_charges_detail_rec.new_cp_return_by_date := p_charges_detail_rec.new_cp_return_by_date;
8353: END IF;
8398:
8399: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_IB_INSTANCE_INV');
8400: FND_MESSAGE.Set_Token('INVENTORY_ITEM_ID', p_charges_detail_rec.inventory_item_id_in);
8401: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
8402: FND_MSG_PUB.Add;
8403: RAISE FND_API.G_EXC_ERROR;
8404:
8405: ELSE
8406: l_valid_check := IS_INSTANCE_VALID(p_instance_id => p_charges_detail_rec.customer_product_id,
8447:
8448: IF l_valid_check <> 'Y' THEN
8449:
8450: FND_MESSAGE.SET_NAME ('CS', 'CS_CHG_INVALID_INSTANCE_RMA_PT');
8451: FND_MSG_PUB.Add;
8452: RAISE FND_API.G_EXC_ERROR;
8453: --taklam
8454: ELSE
8455: --assign the customer product id to out record
8495: IF l_valid_check <> 'Y' THEN
8496: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_SERIAL_NUMBER');
8497: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
8498: FND_MESSAGE.Set_Token('SERIAL_NUMBER', p_charges_detail_rec.serial_number);
8499: FND_MSG_PUB.Add;
8500: RAISE FND_API.G_EXC_ERROR;
8501: ELSE */
8502:
8503: --assign the customer product id to out record
8530: IF l_valid_check <> 'Y' THEN
8531: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_SERIAL_NUMBER');
8532: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
8533: FND_MESSAGE.Set_Token('SERIAL_NUMBER', p_charges_detail_rec.serial_number);
8534: FND_MSG_PUB.Add;
8535: RAISE FND_API.G_EXC_ERROR;
8536: ELSE
8537: --assign the serial_number to out record
8538: x_charges_detail_rec.serial_number := p_charges_detail_rec.serial_number;
8559: --RAISE FND_API.G_EXC_ERROR;
8560: --null;
8561: FND_MESSAGE.Set_Name('CS', 'CS_API_CHG_IB_INSTANCE_MISSING');
8562: FND_MESSAGE.Set_Token('API_NAME', p_api_name);
8563: FND_MSG_PUB.Add;
8564: RAISE FND_API.G_EXC_ERROR;
8565:
8566: --fixed Bug # 3362130 - added l_comms_trackable_flag = 'Y' condition
8567: ELSIF (l_update_ib_flag = 'Y') AND
8572: --RAISE FND_API.G_EXC_ERROR;
8573: --null;
8574: FND_MESSAGE.Set_Name('CS', 'CS_API_CHG_IB_INSTANCE_MISSING');
8575: FND_MESSAGE.Set_Token('API_NAME', p_api_name);
8576: FND_MSG_PUB.Add;
8577: RAISE FND_API.G_EXC_ERROR;
8578: ELSE
8579: x_charges_detail_rec.customer_product_id := NULL;
8580: END IF;
8594: IF (l_comms_trackable_flag = 'N') THEN
8595: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_INST_AND_INV');
8596: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
8597: FND_MESSAGE.Set_Token('INVENTORY_ITEM_ID', p_charges_detail_rec.inventory_item_id_in);
8598: FND_MSG_PUB.Add;
8599: RAISE FND_API.G_EXC_ERROR;
8600:
8601: ELSE
8602:
8620:
8621: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_IB_INSTANCE_INV');
8622: FND_MESSAGE.Set_Token('INVENTORY_ITEM_ID', p_charges_detail_rec.inventory_item_id_in);
8623: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
8624: FND_MSG_PUB.Add;
8625: RAISE FND_API.G_EXC_ERROR;
8626:
8627: ELSE
8628: l_valid_check := IS_INSTANCE_VALID(p_instance_id => p_charges_detail_rec.customer_product_id,
8669:
8670: IF l_valid_check <> 'Y' THEN
8671:
8672: FND_MESSAGE.SET_NAME ('CS', 'CS_CHG_INVALID_INSTANCE_RMA_PT');
8673: FND_MSG_PUB.Add;
8674: RAISE FND_API.G_EXC_ERROR;
8675: --taklam
8676: ELSE
8677: --assign the customer product id to out record
8713: IF l_valid_check <> 'Y' THEN
8714: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_SERIAL_NUMBER');
8715: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
8716: FND_MESSAGE.Set_Token('SERIAL_NUMBER', p_charges_detail_rec.serial_number);
8717: FND_MSG_PUB.Add;
8718: RAISE FND_API.G_EXC_ERROR;
8719: ELSE
8720: --assign the customer product id to out record
8721: x_charges_detail_rec.serial_number := p_charges_detail_rec.serial_number;
8742: IF l_valid_check <> 'Y' THEN
8743: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_SERIAL_NUMBER');
8744: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
8745: FND_MESSAGE.Set_Token('SERIAL_NUMBER', p_charges_detail_rec.serial_number);
8746: FND_MSG_PUB.Add;
8747: RAISE FND_API.G_EXC_ERROR;
8748: ELSE
8749: --assign the customer product id to out record
8750: x_charges_detail_rec.serial_number := p_charges_detail_rec.serial_number;
8768: IF (l_comms_trackable_flag = 'N') THEN
8769: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_INST_AND_INV');
8770: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
8771: FND_MESSAGE.Set_Token('INVENTORY_ITEM_ID', p_charges_detail_rec.inventory_item_id_in);
8772: FND_MSG_PUB.Add;
8773: RAISE FND_API.G_EXC_ERROR;
8774: ELSE
8775: --Check if instance is valid for the party
8776: l_valid_check := IS_INSTANCE_VALID(p_instance_id => p_charges_detail_rec.customer_product_id,
8790:
8791: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_IB_INSTANCE_PTY');
8792: FND_MESSAGE.Set_Token('PARTY_ID', x_charges_detail_rec.sold_to_party_id);
8793: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
8794: FND_MSG_PUB.Add;
8795: RAISE FND_API.G_EXC_ERROR;
8796:
8797: ELSE
8798: --assign the customer product id to out record
8835: IF l_valid_check <> 'Y' THEN
8836: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_SERIAL_NUMBER');
8837: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
8838: FND_MESSAGE.Set_Token('SERIAL_NUMBER', p_charges_detail_rec.serial_number);
8839: FND_MSG_PUB.Add;
8840: RAISE FND_API.G_EXC_ERROR;
8841: ELSE
8842: --assign the customer product id to out record
8843: x_charges_detail_rec.serial_number := p_charges_detail_rec.serial_number;
8876: IF l_valid_check <> 'Y' THEN
8877: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_SERIAL_NUMBER');
8878: FND_MESSAGE.Set_Token('INSTANCE_ID', p_charges_detail_rec.customer_product_id);
8879: FND_MESSAGE.Set_Token('SERIAL_NUMBER', p_charges_detail_rec.serial_number);
8880: FND_MSG_PUB.Add;
8881: RAISE FND_API.G_EXC_ERROR;
8882: ELSE
8883: --assign the customer product id to out record
8884: x_charges_detail_rec.serial_number := p_charges_detail_rec.serial_number;
8906: --RAISE FND_API.G_EXC_ERROR;
8907: --null;
8908: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INST_CP_RETURN_BY_DATE');
8909: FND_MESSAGE.Set_Token('INST_CP_RTN_BY_DATE', p_charges_detail_rec.installed_cp_return_by_date);
8910: FND_MSG_PUB.Add;
8911: RAISE FND_API.G_EXC_ERROR;
8912: ELSIF p_charges_detail_rec.installed_cp_return_by_date <> FND_API.G_MISS_DATE THEN
8913: --assign to out record
8914: x_charges_detail_rec.installed_cp_return_by_date := p_charges_detail_rec.installed_cp_return_by_date;
8945: p_charges_detail_rec.customer_product_id IS NOT NULL THEN
8946: IF p_charges_detail_rec.installed_cp_return_by_date IS NULL THEN
8947: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INSTALLED_CP_RETURN_BY_DATE');
8948: FND_MESSAGE.Set_Token('INSTALLED_CP_RTN_BY_DATE', p_charges_detail_rec.installed_cp_return_by_date);
8949: FND_MSG_PUB.Add;
8950: RAISE FND_API.G_EXC_ERROR;
8951: ELSIF p_charges_detail_rec.installed_cp_return_by_date <> FND_API.G_MISS_DATE THEN
8952: x_charges_detail_rec.installed_cp_return_by_date := p_charges_detail_rec.installed_cp_return_by_date;
8953: ELSE
8969: p_charges_detail_rec.customer_product_id IS NULL THEN
8970: IF p_charges_detail_rec.new_cp_return_by_date IS NULL THEN
8971: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_NEW_CP_RETURN_BY_DATE');
8972: FND_MESSAGE.Set_Token('NEW_CP_RTN_BY_DATE', p_charges_detail_rec.new_cp_return_by_date);
8973: FND_MSG_PUB.Add;
8974: RAISE FND_API.G_EXC_ERROR;
8975: ELSIF p_charges_detail_rec.new_cp_return_by_date <> FND_API.G_MISS_DATE THEN
8976: -- Assign whatever value is passed in the parameter.
8977: x_charges_detail_rec.new_cp_return_by_date := p_charges_detail_rec.new_cp_return_by_date;
9002: --RAISE FND_API.G_EXC_ERROR;
9003: --null;
9004: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INST_CP_RETURN_BY_DATE');
9005: FND_MESSAGE.Set_Token('INST_CP_RTN_BY_DATE', p_charges_detail_rec.installed_cp_return_by_date);
9006: FND_MSG_PUB.Add;
9007: RAISE FND_API.G_EXC_ERROR;
9008: ELSIF p_charges_detail_rec.new_cp_return_by_date <> FND_API.G_MISS_DATE THEN
9009: --assign to out record
9010: x_charges_detail_rec.new_cp_return_by_date := p_charges_detail_rec.new_cp_return_by_date;
9048:
9049: IF l_valid_check <> 'Y' THEN
9050: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_PARENT_INST');
9051: FND_MESSAGE.Set_Token('PARENT_INSTANCE_ID', p_charges_detail_rec.parent_instance_id);
9052: FND_MSG_PUB.Add;
9053: RAISE FND_API.G_EXC_ERROR;
9054: Else
9055: x_charges_detail_rec.parent_instance_id := p_charges_detail_rec.parent_instance_id;
9056: END IF;
9068: x_charges_detail_rec.parent_instance_id := p_charges_detail_rec.parent_instance_id;
9069: Else
9070: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_PARENT_INST');
9071: FND_MESSAGE.Set_Token('PARENT_INSTANCE_ID', p_charges_detail_rec.parent_instance_id);
9072: FND_MSG_PUB.Add;
9073: RAISE FND_API.G_EXC_ERROR;
9074: End If;
9075: Else
9076: x_charges_detail_rec.parent_instance_id := NULL;
9098:
9099: IF l_valid_check <> 'Y' THEN
9100: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_PARENT_INST');
9101: FND_MESSAGE.Set_Token('PARENT_INSTANCE_ID', p_charges_detail_rec.parent_instance_id);
9102: FND_MSG_PUB.Add;
9103: RAISE FND_API.G_EXC_ERROR;
9104: Else
9105: x_charges_detail_rec.parent_instance_id := p_charges_detail_rec.parent_instance_id;
9106: End If;
9118: x_charges_detail_rec.parent_instance_id := p_charges_detail_rec.parent_instance_id;
9119: Else
9120: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_PARENT_INST');
9121: FND_MESSAGE.Set_Token('PARENT_INSTANCE_ID', p_charges_detail_rec.parent_instance_id);
9122: FND_MSG_PUB.Add;
9123: RAISE FND_API.G_EXC_ERROR;
9124: End If;
9125:
9126: ELSIF p_charges_detail_rec.parent_instance_id = FND_API.G_MISS_NUM THEN
9143: --RAISE FND_API.G_EXC_ERROR;
9144: --null;
9145: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_RETURN_REASON');
9146: FND_MESSAGE.Set_Token('RETURN_REASON_CODE', p_charges_detail_rec.return_reason_code);
9147: FND_MSG_PUB.Add;
9148: RAISE FND_API.G_EXC_ERROR;
9149: ELSE
9150:
9151: --return reason code is not null
9165: IF l_valid_check <> 'Y' THEN
9166:
9167: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_RETURN_REASON');
9168: FND_MESSAGE.Set_Token('RETURN_REASON_CODE', p_charges_detail_rec.return_reason_code);
9169: FND_MSG_PUB.Add;
9170: RAISE FND_API.G_EXC_ERROR;
9171: ELSE
9172: x_charges_detail_rec.return_reason_code := p_charges_detail_rec.return_reason_code;
9173: END IF;
9181: --RAISE FND_API.G_EXC_ERROR;
9182: --null;
9183: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_RETURN_REASON');
9184: FND_MESSAGE.Set_Token('RETURN_REASON_CODE', p_charges_detail_rec.return_reason_code);
9185: FND_MSG_PUB.Add;
9186: RAISE FND_API.G_EXC_ERROR;
9187: END IF;
9188: END IF;
9189: x_charges_detail_rec.return_reason_code := p_charges_detail_rec.return_reason_code;
9211: IF l_valid_check <> 'Y' THEN
9212:
9213: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_RETURN_REASON');
9214: FND_MESSAGE.Set_Token('RETURN_REASON_CODE', p_charges_detail_rec.return_reason_code);
9215: FND_MSG_PUB.Add;
9216: RAISE FND_API.G_EXC_ERROR;
9217: ELSE
9218: x_charges_detail_rec.return_reason_code := p_charges_detail_rec.return_reason_code;
9219: END IF;
9356:
9357: IF l_valid_check <> 'Y' THEN
9358: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_PRICE_LIST');
9359: FND_MESSAGE.Set_Token('PRICE_LIST_ID', p_charges_detail_rec.price_list_id);
9360: FND_MSG_PUB.Add;
9361: RAISE FND_API.G_EXC_ERROR;
9362:
9363: ELSE
9364:
9379: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
9380: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
9381: FND_MESSAGE.Set_Token('PRICE_LIST_ID', p_charges_detail_rec.price_list_id);
9382: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
9383: FND_MSG_PUB.Add;
9384: RAISE FND_API.G_EXC_ERROR;
9385: END IF ;
9386:
9387: --DBMS_OUTPUT.PUT_LINE('Currency_code '||l_currency_code);
9407:
9408: ELSE
9409: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CURRENCY_CODE');
9410: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
9411: FND_MSG_PUB.Add;
9412: RAISE FND_API.G_EXC_ERROR;
9413:
9414: END IF;
9415:
9419: OR p_charges_detail_rec.after_warranty_cost is null OR p_charges_detail_rec.after_warranty_cost = FND_API.G_MISS_NUM) then
9420:
9421: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_NOT_BASE_CURRENCY');
9422: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
9423: FND_MSG_PUB.Add;
9424: RAISE FND_API.G_EXC_ERROR;
9425:
9426: End If;
9427: ELSE
9426: End If;
9427: ELSE
9428: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CURRENCY_CODE');
9429: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
9430: FND_MSG_PUB.Add;
9431: RAISE FND_API.G_EXC_ERROR;
9432: END IF;
9433:
9434: ELSIF (p_charges_detail_rec.currency_code IS NULL) AND
9497: IF l_valid_check <> 'Y' THEN
9498:
9499: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CONTRACT_LINE');
9500: FND_MESSAGE.Set_Token('CONTRACT_LINE_ID', p_charges_detail_rec.contract_Line_id);
9501: FND_MSG_PUB.Add;
9502: RAISE FND_API.G_EXC_ERROR;
9503: ELSE
9504: --assign this value to the out parameter
9505: x_charges_detail_rec.contract_line_id := p_charges_detail_rec.contract_line_id;
9574: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CONTRACT');
9575: FND_MESSAGE.Set_Token('CONTRACT_ID', p_charges_detail_rec.contract_id);
9576: --FND_MESSAGE.Set_Token('COVERAGE_ID', p_charges_detail_rec.coverage_id, TRUE);
9577: --FND_MESSAGE.Set_Token('BUSINESS_PROCESS_ID', p_charges_detail_rec.business_process_id, TRUE);
9578: FND_MSG_PUB.Add;
9579: RAISE FND_API.G_EXC_ERROR;
9580:
9581: ELSE
9582:
9617: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
9618: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
9619: FND_MESSAGE.Set_Token('PRICE_LIST_ID', p_charges_detail_rec.price_list_id);
9620: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
9621: FND_MSG_PUB.Add;
9622: RAISE FND_API.G_EXC_ERROR;
9623: END IF ;
9624: IF x_charges_detail_rec.currency_code <> l_currency_code
9625: AND l_currency_code is NOT NULL and x_charges_detail_rec.currency_code is not NUll
9626: and x_charges_detail_rec.currency_code <> FND_API.G_MISS_CHAR THEN --12.1.3 , vpremach
9627: IF L_CURR_IN_CONVERSION_LIST <> 'Y' THEN
9628: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CURRENCY_CODE');
9629: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
9630: FND_MSG_PUB.Add;
9631: RAISE FND_API.G_EXC_ERROR;
9632: END IF;
9633: ELSE
9634: 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: IF x_charges_detail_rec.currency_code <> l_currency_code AND l_currency_code is NOT NULL and x_charges_detail_rec.currency_code is not NUll
9663: and x_charges_detail_rec.currency_code <> FND_API.G_MISS_CHAR THEN --12.1.3, vpremach
9664: IF L_CURR_IN_CONVERSION_LIST <> 'Y' THEN
9665: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CURRENCY_CODE');
9666: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
9667: FND_MSG_PUB.Add;
9668: RAISE FND_API.G_EXC_ERROR;
9669: END IF;
9670: ELSE
9671: x_charges_detail_rec.currency_code := l_currency_code;
9697: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
9698: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
9699: FND_MESSAGE.Set_Token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
9700: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
9701: FND_MSG_PUB.Add;
9702: RAISE FND_API.G_EXC_ERROR;
9703: END IF ;
9704: IF x_charges_detail_rec.currency_code <> l_currency_code AND l_currency_code is NOT NULL and x_charges_detail_rec.currency_code is not NUll
9705: and x_charges_detail_rec.currency_code <> FND_API.G_MISS_CHAR THEN --12.1.3, vpremach
9705: and x_charges_detail_rec.currency_code <> FND_API.G_MISS_CHAR THEN --12.1.3, vpremach
9706: IF L_CURR_IN_CONVERSION_LIST <> 'Y' THEN
9707: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CURRENCY_CODE');
9708: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
9709: FND_MSG_PUB.Add;
9710: RAISE FND_API.G_EXC_ERROR;
9711: END IF;
9712: ELSE
9713: x_charges_detail_rec.currency_code := l_currency_code;
9759: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CONTRACT_API_ERROR');
9760: FND_MESSAGE.SET_TOKEN('BUSINESS_PROCESS_ID', p_charges_detail_rec.business_process_id);
9761: FND_MESSAGE.SET_TOKEN('CONTRACT_SERVICE_LINE_ID', l_contract_service_id);
9762: --FND_MESSAGE.SET_TOKEN('TEXT', l_msg_data);
9763: FND_MSG_PUB.Add;
9764: RAISE FND_API.G_EXC_ERROR;
9765: END IF;
9766:
9767: IF l_contract_id IS NOT NULL THEN
9803: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
9804: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
9805: FND_MESSAGE.Set_Token('PRICE_LIST_ID', p_charges_detail_rec.price_list_id);
9806: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
9807: FND_MSG_PUB.Add;
9808: RAISE FND_API.G_EXC_ERROR;
9809: END IF ;
9810:
9811: IF x_charges_detail_rec.currency_code <> l_currency_code AND l_currency_code is NOT NULL and x_charges_detail_rec.currency_code is not NUll
9812: and x_charges_detail_rec.currency_code <> FND_API.G_MISS_CHAR THEN --12.1.3, vpremach
9813: IF L_CURR_IN_CONVERSION_LIST <> 'Y' THEN
9814: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CURRENCY_CODE');
9815: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
9816: FND_MSG_PUB.Add;
9817: RAISE FND_API.G_EXC_ERROR;
9818: END IF;
9819: ELSE
9820: x_charges_detail_rec.currency_code := l_currency_code;
9840: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
9841: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
9842: FND_MESSAGE.Set_Token('PRICE_LIST_ID', p_charges_detail_rec.price_list_id);
9843: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
9844: FND_MSG_PUB.Add;
9845: RAISE FND_API.G_EXC_ERROR;
9846: END IF ;
9847:
9848: IF x_charges_detail_rec.currency_code <> l_currency_code AND l_currency_code is NOT NULL and x_charges_detail_rec.currency_code is not NUll
9849: and x_charges_detail_rec.currency_code <> FND_API.G_MISS_CHAR THEN --12.1.3, vpremach
9850: IF L_CURR_IN_CONVERSION_LIST <> 'Y' THEN
9851: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CURRENCY_CODE');
9852: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
9853: FND_MSG_PUB.Add;
9854: RAISE FND_API.G_EXC_ERROR;
9855: END IF;
9856: ELSE
9857: x_charges_detail_rec.currency_code := l_currency_code;
9883: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
9884: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
9885: FND_MESSAGE.Set_Token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
9886: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
9887: FND_MSG_PUB.Add;
9888: RAISE FND_API.G_EXC_ERROR;
9889: END IF ;
9890: IF x_charges_detail_rec.currency_code <> l_currency_code AND l_currency_code is NOT NULL and x_charges_detail_rec.currency_code is not NUll
9891: and x_charges_detail_rec.currency_code <> FND_API.G_MISS_CHAR THEN --12.1.3, vpremach
9891: and x_charges_detail_rec.currency_code <> FND_API.G_MISS_CHAR THEN --12.1.3, vpremach
9892: IF L_CURR_IN_CONVERSION_LIST <> 'Y' THEN
9893: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CURRENCY_CODE');
9894: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
9895: FND_MSG_PUB.Add;
9896: RAISE FND_API.G_EXC_ERROR;
9897: END IF;
9898: ELSE
9899: x_charges_detail_rec.currency_code := l_currency_code;
9918: --RAISE FND_API.G_EXC_ERROR;
9919: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
9920: FND_MESSAGE.Set_Token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
9921: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
9922: FND_MSG_PUB.Add;
9923: RAISE FND_API.G_EXC_ERROR;
9924: END IF ;
9925: IF x_charges_detail_rec.currency_code <> l_currency_code AND l_currency_code is NOT NULL and x_charges_detail_rec.currency_code is not NUll
9926: and x_charges_detail_rec.currency_code <> FND_API.G_MISS_CHAR THEN --12.1.3, vpremach
9926: and x_charges_detail_rec.currency_code <> FND_API.G_MISS_CHAR THEN --12.1.3, vpremach
9927: IF L_CURR_IN_CONVERSION_LIST <> 'Y' THEN
9928: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CURRENCY_CODE');
9929: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
9930: FND_MSG_PUB.Add;
9931: RAISE FND_API.G_EXC_ERROR;
9932: END IF;
9933: ELSE
9934: x_charges_detail_rec.currency_code := l_currency_code;
9949: --RAISE FND_API.G_EXC_ERROR;
9950: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
9951: FND_MESSAGE.Set_Token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
9952: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
9953: FND_MSG_PUB.Add;
9954: RAISE FND_API.G_EXC_ERROR;
9955: END IF ;
9956: IF x_charges_detail_rec.currency_code <> l_currency_code AND l_currency_code is NOT NULL and x_charges_detail_rec.currency_code is not NUll
9957: and x_charges_detail_rec.currency_code <> FND_API.G_MISS_CHAR THEN --12.1.3, vpremach
9957: and x_charges_detail_rec.currency_code <> FND_API.G_MISS_CHAR THEN --12.1.3, vpremach
9958: IF L_CURR_IN_CONVERSION_LIST <> 'Y' THEN
9959: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CURRENCY_CODE');
9960: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
9961: FND_MSG_PUB.Add;
9962: RAISE FND_API.G_EXC_ERROR;
9963: END IF;
9964: ELSE
9965: x_charges_detail_rec.currency_code := l_currency_code;
9985: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
9986: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
9987: FND_MESSAGE.Set_Token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
9988: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
9989: FND_MSG_PUB.Add;
9990: RAISE FND_API.G_EXC_ERROR;
9991: END IF ;
9992: IF x_charges_detail_rec.currency_code <> l_currency_code AND l_currency_code is NOT NULL and x_charges_detail_rec.currency_code is not NUll
9993: and x_charges_detail_rec.currency_code <> FND_API.G_MISS_CHAR THEN --12.1.3, vpremach
9993: and x_charges_detail_rec.currency_code <> FND_API.G_MISS_CHAR THEN --12.1.3, vpremach
9994: IF L_CURR_IN_CONVERSION_LIST <> 'Y' THEN
9995: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CURRENCY_CODE');
9996: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
9997: FND_MSG_PUB.Add;
9998: RAISE FND_API.G_EXC_ERROR;
9999: END IF;
10000: ELSE
10001: x_charges_detail_rec.currency_code := l_currency_code;
10016: --RAISE FND_API.G_EXC_ERROR;
10017: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
10018: FND_MESSAGE.Set_Token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
10019: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
10020: FND_MSG_PUB.Add;
10021: RAISE FND_API.G_EXC_ERROR;
10022: END IF ;
10023: IF x_charges_detail_rec.currency_code <> l_currency_code AND l_currency_code is NOT NULL and x_charges_detail_rec.currency_code is not NUll
10024: and x_charges_detail_rec.currency_code <> FND_API.G_MISS_CHAR THEN --12.1.3, vpremach
10024: and x_charges_detail_rec.currency_code <> FND_API.G_MISS_CHAR THEN --12.1.3, vpremach
10025: IF L_CURR_IN_CONVERSION_LIST <> 'Y' THEN
10026: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CURRENCY_CODE');
10027: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
10028: FND_MSG_PUB.Add;
10029: RAISE FND_API.G_EXC_ERROR;
10030: END IF;
10031: ELSE
10032: x_charges_detail_rec.currency_code := l_currency_code;
10079: IF l_valid_check <> 'Y' THEN
10080:
10081: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CONTRACT');
10082: FND_MESSAGE.Set_Token('CONTRACT_ID', p_charges_detail_rec.contract_id);
10083: FND_MSG_PUB.Add;
10084: RAISE FND_API.G_EXC_ERROR;
10085: ELSE
10086: --assign this value to the out parameter
10087: x_charges_detail_rec.contract_line_id := p_charges_detail_rec.contract_line_id;
10149: IF l_valid_check <> 'Y' THEN
10150:
10151: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CONTRACT');
10152: FND_MESSAGE.Set_Token('CONTRACT_ID', p_charges_detail_rec.contract_id);
10153: FND_MSG_PUB.Add;
10154: RAISE FND_API.G_EXC_ERROR;
10155:
10156: ELSE
10157:
10192: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
10193: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
10194: FND_MESSAGE.Set_Token('PRICE_LIST_ID', p_charges_detail_rec.price_list_id);
10195: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
10196: FND_MSG_PUB.Add;
10197: RAISE FND_API.G_EXC_ERROR;
10198: END IF ;
10199:
10200: IF x_charges_detail_rec.currency_code <> l_currency_code AND l_currency_code is NOT NULL and x_charges_detail_rec.currency_code is not NUll
10201: and x_charges_detail_rec.currency_code <> FND_API.G_MISS_CHAR THEN --12.1.3, vpremach
10202: IF L_CURR_IN_CONVERSION_LIST <> 'Y' THEN
10203: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CURRENCY_CODE');
10204: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
10205: FND_MSG_PUB.Add;
10206: RAISE FND_API.G_EXC_ERROR;
10207: END IF;
10208: ELSE
10209: x_charges_detail_rec.currency_code := l_currency_code;
10249: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
10250: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
10251: FND_MESSAGE.Set_Token('PRICE_LIST_ID', p_charges_detail_rec.price_list_id);
10252: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
10253: FND_MSG_PUB.Add;
10254: RAISE FND_API.G_EXC_ERROR;
10255: END IF ;
10256:
10257: IF x_charges_detail_rec.currency_code <> l_currency_code AND l_currency_code is NOT NULL and x_charges_detail_rec.currency_code is not NUll
10258: and x_charges_detail_rec.currency_code <> FND_API.G_MISS_CHAR THEN --12.1.3, vpremach
10259: IF L_CURR_IN_CONVERSION_LIST <> 'Y' THEN
10260: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CURRENCY_CODE');
10261: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
10262: FND_MSG_PUB.Add;
10263: RAISE FND_API.G_EXC_ERROR;
10264: END IF;
10265: ELSE
10266: x_charges_detail_rec.currency_code := l_currency_code;
10292: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
10293: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
10294: FND_MESSAGE.Set_Token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
10295: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
10296: FND_MSG_PUB.Add;
10297: RAISE FND_API.G_EXC_ERROR;
10298: END IF ;
10299: IF x_charges_detail_rec.currency_code <> l_currency_code AND l_currency_code is NOT NULL and x_charges_detail_rec.currency_code is not NUll
10300: and x_charges_detail_rec.currency_code <> FND_API.G_MISS_CHAR THEN --12.1.3, vpremach
10300: and x_charges_detail_rec.currency_code <> FND_API.G_MISS_CHAR THEN --12.1.3, vpremach
10301: IF L_CURR_IN_CONVERSION_LIST <> 'Y' THEN
10302: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CURRENCY_CODE');
10303: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
10304: FND_MSG_PUB.Add;
10305: RAISE FND_API.G_EXC_ERROR;
10306: END IF;
10307: ELSE
10308: x_charges_detail_rec.currency_code := l_currency_code;
10357: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
10358: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
10359: FND_MESSAGE.Set_Token('PRICE_LIST_ID', p_charges_detail_rec.price_list_id);
10360: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
10361: FND_MSG_PUB.Add;
10362: RAISE FND_API.G_EXC_ERROR;
10363: END IF ;
10364:
10365: IF x_charges_detail_rec.currency_code <> l_currency_code AND l_currency_code is NOT NULL and x_charges_detail_rec.currency_code is not NUll
10366: and x_charges_detail_rec.currency_code <> FND_API.G_MISS_CHAR THEN --12.1.3, vpremach
10367: IF L_CURR_IN_CONVERSION_LIST <> 'Y' THEN
10368: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CURRENCY_CODE');
10369: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
10370: FND_MSG_PUB.Add;
10371: RAISE FND_API.G_EXC_ERROR;
10372: END IF;
10373: ELSE
10374: x_charges_detail_rec.currency_code := l_currency_code;
10398: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
10399: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
10400: FND_MESSAGE.Set_Token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
10401: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
10402: FND_MSG_PUB.Add;
10403: RAISE FND_API.G_EXC_ERROR;
10404: END IF ;
10405: IF x_charges_detail_rec.currency_code <> l_currency_code AND l_currency_code is NOT NULL and x_charges_detail_rec.currency_code is not NUll
10406: and x_charges_detail_rec.currency_code <> FND_API.G_MISS_CHAR THEN --12.1.3, vpremach
10406: and x_charges_detail_rec.currency_code <> FND_API.G_MISS_CHAR THEN --12.1.3, vpremach
10407: IF L_CURR_IN_CONVERSION_LIST <> 'Y' THEN
10408: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CURRENCY_CODE');
10409: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
10410: FND_MSG_PUB.Add;
10411: RAISE FND_API.G_EXC_ERROR;
10412: END IF;
10413: ELSE
10414: x_charges_detail_rec.currency_code := l_currency_code;
10453: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
10454: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
10455: FND_MESSAGE.Set_Token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
10456: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
10457: FND_MSG_PUB.Add;
10458: RAISE FND_API.G_EXC_ERROR;
10459: END IF ;
10460: --DBMS_OUTPUT.PUT_LINE ('l_price_list_id '||l_price_list_id);
10461: --DBMS_OUTPUT.PUT_LINE (' l_currency_code '||l_currency_code);
10484: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
10485: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
10486: FND_MESSAGE.Set_Token('PRICE_LIST_ID', p_charges_detail_rec.price_list_id);
10487: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
10488: FND_MSG_PUB.Add;
10489: RAISE FND_API.G_EXC_ERROR;
10490: END IF ;
10491:
10492: IF x_charges_detail_rec.currency_code <> l_currency_code AND l_currency_code is NOT NULL and x_charges_detail_rec.currency_code is not NUll
10493: and x_charges_detail_rec.currency_code <> FND_API.G_MISS_CHAR THEN --12.1.3, vpremach
10494: IF L_CURR_IN_CONVERSION_LIST <> 'Y' THEN
10495: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CURRENCY_CODE');
10496: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
10497: FND_MSG_PUB.Add;
10498: RAISE FND_API.G_EXC_ERROR;
10499: END IF;
10500: ELSE
10501: x_charges_detail_rec.currency_code := l_currency_code;
10549: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
10550: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
10551: FND_MESSAGE.Set_Token('PRICE_LIST_ID', p_charges_detail_rec.price_list_id);
10552: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
10553: FND_MSG_PUB.Add;
10554: RAISE FND_API.G_EXC_ERROR;
10555: END IF ;
10556:
10557: IF x_charges_detail_rec.currency_code <> l_currency_code AND l_currency_code is NOT NULL and x_charges_detail_rec.currency_code is not NUll
10558: and x_charges_detail_rec.currency_code <> FND_API.G_MISS_CHAR THEN --12.1.3, vpremach
10559: IF L_CURR_IN_CONVERSION_LIST <> 'Y' THEN
10560: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CURRENCY_CODE');
10561: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
10562: FND_MSG_PUB.Add;
10563: RAISE FND_API.G_EXC_ERROR;
10564: END IF;
10565: ELSE
10566: x_charges_detail_rec.currency_code := l_currency_code;
10591: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
10592: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
10593: FND_MESSAGE.Set_Token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
10594: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
10595: FND_MSG_PUB.Add;
10596: RAISE FND_API.G_EXC_ERROR;
10597: END IF ;
10598: IF x_charges_detail_rec.currency_code <> l_currency_code AND l_currency_code is NOT NULL and x_charges_detail_rec.currency_code is not NUll
10599: and x_charges_detail_rec.currency_code <> FND_API.G_MISS_CHAR THEN --12.1.3, vpremach
10600: IF L_CURR_IN_CONVERSION_LIST <> 'Y' THEN
10601:
10602: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CURRENCY_CODE');
10603: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
10604: FND_MSG_PUB.Add;
10605: RAISE FND_API.G_EXC_ERROR;
10606: END IF;
10607: ELSE
10608: x_charges_detail_rec.currency_code := l_currency_code;
10638:
10639: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
10640: FND_MESSAGE.Set_Token('PRICE_LIST_ID', p_charges_detail_rec.price_list_id);
10641: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
10642: FND_MSG_PUB.Add;
10643: RAISE FND_API.G_EXC_ERROR;
10644: END IF ;
10645:
10646: IF x_charges_detail_rec.currency_code <> l_currency_code AND l_currency_code is NOT NULL and x_charges_detail_rec.currency_code is not NUll
10647: and x_charges_detail_rec.currency_code <> FND_API.G_MISS_CHAR THEN --12.1.3, vpremach
10648: IF L_CURR_IN_CONVERSION_LIST <> 'Y' THEN
10649: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CURRENCY_CODE');
10650: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
10651: FND_MSG_PUB.Add;
10652: RAISE FND_API.G_EXC_ERROR;
10653: END IF;
10654: ELSE
10655: x_charges_detail_rec.currency_code := l_currency_code;
10679: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
10680: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
10681: FND_MESSAGE.Set_Token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
10682: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
10683: FND_MSG_PUB.Add;
10684: RAISE FND_API.G_EXC_ERROR;
10685: END IF ;
10686: IF x_charges_detail_rec.currency_code <> l_currency_code AND l_currency_code is NOT NULL and x_charges_detail_rec.currency_code is not NUll
10687: and x_charges_detail_rec.currency_code <> FND_API.G_MISS_CHAR THEN --12.1.3, vpremach
10687: and x_charges_detail_rec.currency_code <> FND_API.G_MISS_CHAR THEN --12.1.3, vpremach
10688: IF L_CURR_IN_CONVERSION_LIST <> 'Y' THEN
10689: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CURRENCY_CODE');
10690: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
10691: FND_MSG_PUB.Add;
10692: RAISE FND_API.G_EXC_ERROR;
10693: END IF;
10694: ELSE
10695: x_charges_detail_rec.currency_code := l_currency_code;
10717: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
10718: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CURRENCY_CODE_ERROR');
10719: FND_MESSAGE.Set_Token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
10720: --FND_MESSAGE.Set_Token('TEXT', l_msg_data, TRUE);
10721: FND_MSG_PUB.Add;
10722: RAISE FND_API.G_EXC_ERROR;
10723: END IF ;
10724: IF x_charges_detail_rec.currency_code <> l_currency_code AND l_currency_code is NOT NULL and x_charges_detail_rec.currency_code is not NUll
10725: and x_charges_detail_rec.currency_code <> FND_API.G_MISS_CHAR THEN --12.1.3, vpremach
10725: and x_charges_detail_rec.currency_code <> FND_API.G_MISS_CHAR THEN --12.1.3, vpremach
10726: IF L_CURR_IN_CONVERSION_LIST <> 'Y' THEN
10727: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CURRENCY_CODE');
10728: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
10729: FND_MSG_PUB.Add;
10730: RAISE FND_API.G_EXC_ERROR;
10731: END IF;
10732: ELSE
10733: x_charges_detail_rec.currency_code := l_currency_code;
10790: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10791: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_CURRENCY_CONVERSION_ERR');
10792: FND_MESSAGE.Set_Token('FROM_CURRENCY', p_charges_detail_rec.currency_code);
10793: FND_MESSAGE.Set_Token('TO_CURRENCY', x_charges_detail_rec.currency_code);
10794: FND_MSG_PUB.Add;
10795: RAISE FND_API.G_EXC_ERROR;
10796: END IF;
10797: --assign values to out record for conversion_rate, conversion_type_code
10798: --conversion_rate_date
10807: --null;
10808: IF L_CURR_IN_CONVERSION_LIST <> 'Y' THEN --srini
10809: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CURRENCY_CODE');
10810: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
10811: FND_MSG_PUB.Add;
10812: RAISE FND_API.G_EXC_ERROR;
10813: Else--srini
10814: IF p_charges_detail_rec.list_price is not null AND
10815: p_charges_detail_rec.list_price <> FND_API.G_MISS_NUM Then
10816: x_charges_detail_rec.currency_code := p_charges_detail_rec.currency_code; --srini
10817: Else
10818: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CURRENCY_CODE');
10819: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
10820: FND_MSG_PUB.Add;
10821: RAISE FND_API.G_EXC_ERROR;
10822: End IF; --srini
10823: End If;--srini
10824: END IF;
11949: p_charges_detail_rec.list_price is null then --12.1.3, vpremach
11950:
11951: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_NOT_BASE_CURRENCY');
11952: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
11953: FND_MSG_PUB.Add;
11954: RAISE FND_API.G_EXC_ERROR;
11955: END IF;
11956: x_charges_detail_rec.apply_contract_discount := p_charges_detail_rec.apply_contract_discount;
11957:
12006:
12007: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12008: FND_MESSAGE.Set_Name('CS', 'CS_CHG_APPLY_CONTRACT_WARNING');
12009: FND_MESSAGE.SET_TOKEN('REASON', l_msg_data);
12010: FND_MSG_PUB.Add;
12011: RAISE FND_API.G_EXC_ERROR;
12012: END IF;
12013:
12014: --Bug Fix for Bug # 3088397
12050: p_charges_detail_rec.list_price IS NULL THEN
12051: IF l_curr_in_conversion_list = 'Y' THEN --AND fnd_profile.value('CS_ENABLE_CURRENCY_CONVERSION') = 'Y' THEN --12.1.3 Multi Currency, vpremach
12052: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_NOT_BASE_CURRENCY');
12053: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
12054: FND_MSG_PUB.Add;
12055: RAISE FND_API.G_EXC_ERROR;
12056: END IF;
12057:
12058: IF ((((x_charges_detail_rec.inventory_item_id_in IS NOT NULL) AND
12211: FND_MESSAGE.set_token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
12212: FND_MESSAGE.set_token('UOM', x_charges_detail_rec.unit_of_measure_code);
12213: FND_MESSAGE.set_token('CURR_CODE', x_charges_detail_rec.currency_code);
12214: --FND_MESSAGE.SET_TOKEN('TEXT', l_msg_data, TRUE);
12215: FND_MSG_PUB.Add;
12216: RAISE FND_API.G_EXC_ERROR;
12217: END IF;
12218:
12219: --assign to out record
12299:
12300: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12301: FND_MESSAGE.Set_Name('CS', 'CS_CHG_APPLY_CONTRACT_WARNING');
12302: FND_MESSAGE.SET_TOKEN('REASON', l_msg_data);
12303: FND_MSG_PUB.Add;
12304: RAISE FND_API.G_EXC_ERROR;
12305: END IF;
12306:
12307: --Bug Fix for Bug # 3088397
12361: IF p_charges_detail_rec.list_price IS NULL THEN --12.1.3 Multi Currency, vpremach
12362: IF l_curr_in_conversion_list = 'Y' THEN --AND fnd_profile.value('CS_ENABLE_CURRENCY_CONVERSION') = 'Y' THEN
12363: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_NOT_BASE_CURRENCY');
12364: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
12365: FND_MSG_PUB.Add;
12366: RAISE FND_API.G_EXC_ERROR;
12367: END IF;
12368: END IF;
12369: --DBMS_OUTPUT.PUT_LINE('Expense line with after warr cost ');
12446:
12447: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12448: FND_MESSAGE.Set_Name('CS', 'CS_CHG_APPLY_CONTRACT_WARNING');
12449: FND_MESSAGE.SET_TOKEN('REASON', l_msg_data);
12450: FND_MSG_PUB.Add;
12451: RAISE FND_API.G_EXC_ERROR;
12452: END IF;
12453:
12454: IF l_contract_discount IS NOT NULL THEN
12487: IF p_charges_detail_rec.list_price IS NULL THEN --12.1.3 Multi Currency, vpremach
12488: IF l_curr_in_conversion_list = 'Y' THEN --AND fnd_profile.value('CS_ENABLE_CURRENCY_CONVERSION') = 'Y' THEN
12489: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_NOT_BASE_CURRENCY');
12490: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
12491: FND_MSG_PUB.Add;
12492: RAISE FND_API.G_EXC_ERROR;
12493: END IF;
12494: END IF;
12495:
12633: FND_MESSAGE.set_token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
12634: FND_MESSAGE.set_token('UOM', x_charges_detail_rec.unit_of_measure_code);
12635: FND_MESSAGE.set_token('CURR_CODE', x_charges_detail_rec.currency_code);
12636: --FND_MESSAGE.SET_TOKEN('TEXT', l_msg_data, TRUE);
12637: FND_MSG_PUB.Add;
12638: RAISE FND_API.G_EXC_ERROR;
12639: END IF;
12640: END IF;
12641:
12715:
12716: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12717: FND_MESSAGE.Set_Name('CS', 'CS_CHG_APPLY_CONTRACT_WARNING');
12718: FND_MESSAGE.SET_TOKEN('REASON', l_msg_data);
12719: FND_MSG_PUB.Add;
12720: RAISE FND_API.G_EXC_ERROR;
12721: END IF;
12722:
12723: --Bug Fix for Bug # 3088397
12761:
12762: IF l_curr_in_conversion_list = 'Y' AND p_charges_detail_rec.list_price is null then --12.1.3, vpremach
12763: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_NOT_BASE_CURRENCY');
12764: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
12765: FND_MSG_PUB.Add;
12766: RAISE FND_API.G_EXC_ERROR;
12767: END IF;
12768: --DBMS_OUTPUT.PUT_LINE('In Update of Pricing API');
12769: --DBMS_OUTPUT.PUT_LINE('Billing Flag '||x_charges_detail_rec.billing_flag);
12833:
12834: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12835: FND_MESSAGE.Set_Name('CS', 'CS_CHG_APPLY_CONTRACT_WARNING');
12836: FND_MESSAGE.SET_TOKEN('REASON', l_msg_data);
12837: FND_MSG_PUB.Add;
12838: RAISE FND_API.G_EXC_ERROR;
12839: END IF;
12840:
12841: --Bug Fix for Bug # 3088397
12914:
12915: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12916: FND_MESSAGE.Set_Name('CS', 'CS_CHG_APPLY_CONTRACT_WARNING');
12917: FND_MESSAGE.SET_TOKEN('REASON', l_msg_data);
12918: FND_MSG_PUB.Add;
12919: RAISE FND_API.G_EXC_ERROR;
12920: END IF;
12921:
12922: --Bug Fix for Bug # 3088397
12964: p_charges_detail_rec.list_price IS NULL))) THEN
12965: IF nvl(l_curr_in_conversion_list,'N') = 'Y' THEN --12.1.3, vpremach
12966: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_NOT_BASE_CURRENCY');
12967: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
12968: FND_MSG_PUB.Add;
12969: RAISE FND_API.G_EXC_ERROR;
12970: END IF;
12971:
12972: IF l_calc_sp = 'Y' THEN
13115: FND_MESSAGE.set_token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
13116: FND_MESSAGE.set_token('UOM', x_charges_detail_rec.unit_of_measure_code);
13117: FND_MESSAGE.set_token('CURR_CODE', x_charges_detail_rec.currency_code);
13118: --FND_MESSAGE.SET_TOKEN('TEXT', l_msg_data, TRUE);
13119: FND_MSG_PUB.Add;
13120: RAISE FND_API.G_EXC_ERROR;
13121: END IF;
13122:
13123: --bug # 3056622 charge amount is zero for items with negative prices
13197:
13198: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
13199: FND_MESSAGE.Set_Name('CS', 'CS_CHG_APPLY_CONTRACT_WARNING');
13200: FND_MESSAGE.SET_TOKEN('REASON', l_msg_data);
13201: FND_MSG_PUB.Add;
13202: RAISE FND_API.G_EXC_ERROR;
13203: END IF;
13204:
13205: --Bug Fix for Bug # 3088397
13319:
13320: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
13321: FND_MESSAGE.Set_Name('CS', 'CS_CHG_APPLY_CONTRACT_WARNING');
13322: FND_MESSAGE.SET_TOKEN('REASON', l_msg_data);
13323: FND_MSG_PUB.Add;
13324: RAISE FND_API.G_EXC_ERROR;
13325: END IF;
13326:
13327: --Bug Fix for Bug # 3088397
13363: IF p_charges_detail_rec.list_price IS NULL THEN --12.1.3 Multi Currency, vpremach
13364: IF l_curr_in_conversion_list = 'Y' THEN
13365: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_NOT_BASE_CURRENCY');
13366: FND_MESSAGE.Set_Token('CURRENCY_CODE', p_charges_detail_rec.currency_code);
13367: FND_MSG_PUB.Add;
13368: RAISE FND_API.G_EXC_ERROR;
13369: END IF;
13370: END IF;
13371:
13514: FND_MESSAGE.set_token('PRICE_LIST_ID', x_charges_detail_rec.price_list_id);
13515: FND_MESSAGE.set_token('UOM', x_charges_detail_rec.unit_of_measure_code);
13516: FND_MESSAGE.set_token('CURR_CODE', x_charges_detail_rec.currency_code);
13517: --FND_MESSAGE.SET_TOKEN('TEXT', l_msg_data, TRUE);
13518: FND_MSG_PUB.Add;
13519: RAISE FND_API.G_EXC_ERROR;
13520: END IF;
13521: END IF;
13522: -- Assign the after warranty that comes on the line
13600:
13601: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
13602: FND_MESSAGE.Set_Name('CS', 'CS_CHG_APPLY_CONTRACT_WARNING');
13603: FND_MESSAGE.SET_TOKEN('REASON', l_msg_data);
13604: FND_MSG_PUB.Add;
13605: RAISE FND_API.G_EXC_ERROR;
13606: END IF;
13607:
13608: --DBMS_OUTPUT.PUT_LINE('l_contract_discount '||l_contract_discount);
13699:
13700: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
13701: FND_MESSAGE.Set_Name('CS', 'CS_CHG_APPLY_CONTRACT_WARNING');
13702: FND_MESSAGE.SET_TOKEN('REASON', l_msg_data);
13703: FND_MSG_PUB.Add;
13704: RAISE FND_API.G_EXC_ERROR;
13705: END IF;
13706:
13707: --Bug Fix for Bug # 3088397
13781:
13782: IF l_valid_check <> 'Y' THEN
13783: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_TXN_INV_ORG');
13784: FND_MESSAGE.Set_Token('ORG_ID', p_charges_detail_rec.transaction_inventory_org);
13785: FND_MSG_PUB.Add;
13786: RAISE FND_API.G_EXC_ERROR;
13787: END IF;
13788:
13789: END IF;
13813:
13814: IF l_valid_check <> 'Y' THEN
13815: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_TXN_INV_ORG');
13816: FND_MESSAGE.Set_Token('ORG_ID', p_charges_detail_rec.transaction_inventory_org);
13817: FND_MSG_PUB.Add;
13818: RAISE FND_API.G_EXC_ERROR;
13819: END IF;
13820:
13821: x_charges_detail_rec.transaction_inventory_org := p_charges_detail_rec.transaction_inventory_org;
13852: x_charges_detail_rec.transaction_sub_inventory := p_charges_detail_rec.transaction_sub_inventory;
13853: Else
13854: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_SUB_INV');
13855: FND_MESSAGE.Set_Token('SUB_INVENTORY', p_charges_detail_rec.transaction_sub_inventory);
13856: FND_MSG_PUB.Add;
13857: RAISE FND_API.G_EXC_ERROR;
13858: End If;
13859: Else
13860: x_charges_detail_rec.transaction_sub_inventory := Null;
13938:
13939: If (p_charges_detail_rec.shipping_method is not null and l_shipping_method_found ='N' ) then
13940: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_SHIP_METHOD');
13941: FND_MESSAGE.Set_Token('SHIPPING_METHOD', p_charges_detail_rec.shipping_method);
13942: FND_MSG_PUB.Add;
13943: RAISE FND_API.G_EXC_ERROR;
13944: end if;
13945:
13946: If (l_arrival_date_found ='N' and p_charges_detail_rec.arrival_date_time is not null ) Then
13945:
13946: If (l_arrival_date_found ='N' and p_charges_detail_rec.arrival_date_time is not null ) Then
13947: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_ARRV_DT');
13948: FND_MESSAGE.Set_Token('ARRIVAL_DATE', p_charges_detail_rec.arrival_date_time);
13949: FND_MSG_PUB.Add;
13950: RAISE FND_API.G_EXC_ERROR;
13951: End If;
13952: If (l_distance_found ='N' and p_charges_detail_rec.distance is not null and p_charges_detail_rec.distance <> FND_API.G_MISS_NUM) Then
13953: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_SHIP_DIST');
13951: End If;
13952: If (l_distance_found ='N' and p_charges_detail_rec.distance is not null and p_charges_detail_rec.distance <> FND_API.G_MISS_NUM) Then
13953: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_SHIP_DIST');
13954: FND_MESSAGE.Set_Token('DISTANCE', p_charges_detail_rec.distance);
13955: FND_MSG_PUB.Add;
13956: RAISE FND_API.G_EXC_ERROR;
13957: end if;
13958: End If; --x_return_status = 'S'
13959: Else
13993: x_charges_detail_rec.shipping_method := p_charges_detail_rec.shipping_method;
13994: Else
13995: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_SHIP_METHOD');
13996: FND_MESSAGE.Set_Token('SHIPPING_METHOD', p_charges_detail_rec.shipping_method);
13997: FND_MSG_PUB.Add;
13998: RAISE FND_API.G_EXC_ERROR;
13999: End If;
14000: Else
14001: x_charges_detail_rec.shipping_method := Null;
14006: x_charges_detail_rec.arrival_date_time := p_charges_detail_rec.arrival_date_time;
14007: Else
14008: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_ARRV_DT');
14009: FND_MESSAGE.Set_Token('ARRIVAL_DATE', p_charges_detail_rec.arrival_date_time);
14010: FND_MSG_PUB.Add;
14011: RAISE FND_API.G_EXC_ERROR;
14012: End If;
14013: Else
14014: x_charges_detail_rec.arrival_date_time := Null;
14023: Else
14024:
14025: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_SUB_INV');
14026: FND_MESSAGE.Set_Token('SUB_INVENTORY', p_charges_detail_rec.transaction_sub_inventory);
14027: FND_MSG_PUB.Add;
14028: RAISE FND_API.G_EXC_ERROR;
14029: End If; --c_sub_inventory
14030: Close c_sub_inventory; */
14031: -- Else
14045: x_charges_detail_rec.transaction_sub_inventory := p_charges_detail_rec.transaction_sub_inventory;
14046: Else
14047: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_SUB_INV');
14048: FND_MESSAGE.Set_Token('SUB_INVENTORY', p_charges_detail_rec.transaction_sub_inventory);
14049: FND_MSG_PUB.Add;
14050: RAISE FND_API.G_EXC_ERROR;
14051: End If;
14052: Close c_sub_inventory;
14053: ELSE
14138:
14139: If (p_charges_detail_rec.shipping_method is not null and l_shipping_method_found ='N' ) then
14140: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_SHIP_METHOD');
14141: FND_MESSAGE.Set_Token('SHIPPING_METHOD', p_charges_detail_rec.shipping_method);
14142: FND_MSG_PUB.Add;
14143: RAISE FND_API.G_EXC_ERROR;
14144: end if;
14145:
14146: If (l_arrival_date_found ='N' and p_charges_detail_rec.arrival_date_time is not null ) Then
14145:
14146: If (l_arrival_date_found ='N' and p_charges_detail_rec.arrival_date_time is not null ) Then
14147: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_ARRV_DT');
14148: FND_MESSAGE.Set_Token('ARRIVAL_DATE', p_charges_detail_rec.arrival_date_time);
14149: FND_MSG_PUB.Add;
14150: RAISE FND_API.G_EXC_ERROR;
14151: End If;
14152: If (l_distance_found ='N' and p_charges_detail_rec.distance is not null and p_charges_detail_rec.distance <> FND_API.G_MISS_NUM) Then
14153: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_SHIP_DIST');
14151: End If;
14152: If (l_distance_found ='N' and p_charges_detail_rec.distance is not null and p_charges_detail_rec.distance <> FND_API.G_MISS_NUM) Then
14153: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_SHIP_DIST');
14154: FND_MESSAGE.Set_Token('DISTANCE', p_charges_detail_rec.distance);
14155: FND_MSG_PUB.Add;
14156: RAISE FND_API.G_EXC_ERROR;
14157: end if;
14158:
14159: End If; -- return status = 'S'
14207: End If;
14208: Else
14209: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_RETURN_TYPE');
14210: FND_MESSAGE.Set_Token('RETURN_TYPE', p_charges_detail_rec.return_type);
14211: FND_MSG_PUB.Add;
14212: RAISE FND_API.G_EXC_ERROR;
14213: End If;
14214: Close c_return_type;
14215: Else
14254: End If;
14255: Else
14256: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_RETURN_TYPE');
14257: FND_MESSAGE.Set_Token('RETURN_TYPE', p_charges_detail_rec.return_type);
14258: FND_MSG_PUB.Add;
14259: RAISE FND_API.G_EXC_ERROR;
14260: End If;
14261: Close c_return_type;
14262: ELSIF p_charges_detail_rec.return_type = FND_API.G_MISS_CHAR THEN
14286:
14287: --RAISE FND_API.G_EXC_ERROR;
14288: --null;
14289: FND_MESSAGE.Set_Name('CS', 'CS_CHG_ORDER_NUMBER_REQUIRED');
14290: FND_MSG_PUB.Add;
14291: RAISE FND_API.G_EXC_ERROR;
14292: ELSE
14293:
14294: -- If order number provided then validate the order
14307: --RAISE FND_API.G_EXC_ERROR ;
14308: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_ORDER');
14309: FND_MESSAGE.SET_TOKEN('ORDER_HEADER_ID', p_charges_detail_rec.order_header_id);
14310: --FND_MESSAGE.SET_TOKEN('TEXT', l_msg_data, TRUE);
14311: FND_MSG_PUB.Add;
14312: RAISE FND_API.G_EXC_ERROR;
14313: ELSE
14314:
14315: x_charges_detail_rec.order_header_id := p_charges_detail_rec.order_header_id;
14340: --RAISE FND_API.G_EXC_ERROR ;
14341: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_ORDER');
14342: FND_MESSAGE.SET_TOKEN('ORDER_HEADER_ID', p_charges_detail_rec.order_header_id);
14343: --FND_MESSAGE.SET_TOKEN('TEXT', l_msg_data, TRUE);
14344: FND_MSG_PUB.Add;
14345: RAISE FND_API.G_EXC_ERROR;
14346:
14347: ELSE
14348:
14383: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
14384: --RAISE FND_API.G_EXC_ERROR ;
14385: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_ORDER');
14386: FND_MESSAGE.SET_TOKEN('ORDER_HEADER_ID', p_charges_detail_rec.order_header_id);
14387: FND_MSG_PUB.Add;
14388: RAISE FND_API.G_EXC_ERROR;
14389: ELSE
14390: x_charges_detail_rec.order_header_id := p_charges_detail_rec.order_header_id;
14391: END IF;
14395: x_charges_detail_rec.order_header_id := l_db_det_rec.order_header_id;
14396: ELSE
14397: --order number required
14398: FND_MESSAGE.Set_Name('CS', 'CS_CHG_ORDER_NUMBER_REQUIRED');
14399: FND_MSG_PUB.Add;
14400: RAISE FND_API.G_EXC_ERROR;
14401: END IF;
14402: ELSE
14403: --order number not passed
14402: ELSE
14403: --order number not passed
14404: --order number required
14405: FND_MESSAGE.Set_Name('CS', 'CS_CHG_ORDER_NUMBER_REQUIRED');
14406: FND_MSG_PUB.Add;
14407: RAISE FND_API.G_EXC_ERROR;
14408: END IF;
14409:
14410:
14428: --RAISE FND_API.G_EXC_ERROR ;
14429: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_ORDER');
14430: FND_MESSAGE.SET_TOKEN('ORDER_HEADER_ID', p_charges_detail_rec.order_header_id);
14431: --FND_MESSAGE.SET_TOKEN('TEXT', l_msg_data, TRUE);
14432: FND_MSG_PUB.Add;
14433: RAISE FND_API.G_EXC_ERROR;
14434:
14435: ELSE
14436:
14454: --line already interfaced to om
14455: --raise error
14456: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_CANNOT_ADD_CHG_TO_ORDER');
14457: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
14458: FND_MSG_PUB.Add;
14459: RAISE FND_API.G_EXC_ERROR;
14460: END IF;
14461: END IF;
14462:
14703: x_charges_detail_rec.expenditure_org_id := null;
14704:
14705: FND_MESSAGE.SET_NAME('CS', 'CS_SR_NO_TASK_NUM');
14706: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
14707: FND_MSG_PUB.Add;
14708:
14709: IF (p_validation_mode ='U') then
14710: RAISE FND_API.G_EXC_ERROR;
14711: End if;
14719: x_charges_detail_rec.expenditure_org_id := null;
14720:
14721: FND_MESSAGE.SET_NAME('CS', 'CS_SR_NO_PROJ_NUM');
14722: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
14723: FND_MSG_PUB.Add;
14724:
14725: IF (p_validation_mode ='U') then
14726: RAISE FND_API.G_EXC_ERROR;
14727: End if;
14735:
14736:
14737: FND_MESSAGE.SET_NAME('CS', 'CS_SR_NO_EXPENDITURE_ORG');
14738: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
14739: FND_MSG_PUB.Add;
14740:
14741:
14742: IF (p_validation_mode ='U') then
14743: RAISE FND_API.G_EXC_ERROR;
14752:
14753:
14754: FND_MESSAGE.SET_NAME('CS', 'CS_SR_NO_PROJ_DETAILS');
14755: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
14756: FND_MSG_PUB.Add;
14757:
14758:
14759: IF (p_validation_mode ='U') then
14760: RAISE FND_API.G_EXC_ERROR;
14786: when no_data_found then
14787:
14788: FND_MESSAGE.SET_NAME('CS', 'CS_SR_INVALID_PROJECT_DETAILS');
14789: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
14790: FND_MSG_PUB.Add;
14791:
14792: /* x_charges_detail_rec.project_id := null;
14793: x_charges_detail_rec.project_task_id := null;
14794: x_charges_detail_rec.expenditure_org_id := null;
14800:
14801: when others then
14802: FND_MESSAGE.SET_NAME('CS', 'CS_SR_INVALID_PROJECT_DETAILS');
14803: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
14804: FND_MSG_PUB.Add;
14805:
14806:
14807: IF (p_validation_mode ='U') then
14808: RAISE FND_API.G_EXC_ERROR;
14816: x_charges_detail_rec.expenditure_org_id :=null;
14817:
14818: FND_MESSAGE.SET_NAME('CS', 'CS_INC_CLEAR_PROJECT_INFO');
14819: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
14820: FND_MSG_PUB.Add;
14821:
14822: End if;
14823: End if; --null checks
14824:
14838: WHEN FND_API.G_EXC_ERROR THEN
14839: ROLLBACK TO Validate_Charge_Details_PUB;
14840:
14841: x_return_status := FND_API.G_RET_STS_ERROR;
14842: FND_MSG_PUB.Count_And_Get(
14843: p_count => x_msg_count,
14844: p_data => x_msg_data,
14845: p_encoded => FND_API.G_FALSE);
14846:
14846:
14847: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
14848: ROLLBACK TO Validate_Charge_Details_PUB;
14849: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
14850: FND_MSG_PUB.Count_And_Get(
14851: p_count => x_msg_count,
14852: p_data => x_msg_data,
14853: p_encoded => FND_API.G_FALSE);
14854:
14854:
14855: WHEN G_WARNING THEN
14856: ROLLBACK TO Validate_Charge_Details_PUB;
14857: x_return_status := FND_API.G_RET_STS_SUCCESS;
14858: FND_MSG_PUB.Count_And_Get(
14859: p_count => x_msg_count,
14860: p_data => x_msg_data,
14861: p_encoded => FND_API.G_FALSE);
14862:
14865: ROLLBACK TO Validate_Charge_Details_PUB;
14866: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_UNEXPECTED_EXEC_ERRORS');
14867: FND_MESSAGE.SET_TOKEN('ROUTINE', l_api_name);
14868: FND_MESSAGE.SET_TOKEN('SQLERRM', sqlerrm);
14869: FND_MSG_PUB.ADD;
14870: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
14871: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
14872: END IF ;
14873: fnd_msg_pub.count_and_get(
14866: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_UNEXPECTED_EXEC_ERRORS');
14867: FND_MESSAGE.SET_TOKEN('ROUTINE', l_api_name);
14868: FND_MESSAGE.SET_TOKEN('SQLERRM', sqlerrm);
14869: FND_MSG_PUB.ADD;
14870: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
14871: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
14872: END IF ;
14873: fnd_msg_pub.count_and_get(
14874: p_count => x_msg_count
14867: FND_MESSAGE.SET_TOKEN('ROUTINE', l_api_name);
14868: FND_MESSAGE.SET_TOKEN('SQLERRM', sqlerrm);
14869: FND_MSG_PUB.ADD;
14870: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
14871: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
14872: END IF ;
14873: fnd_msg_pub.count_and_get(
14874: p_count => x_msg_count
14875: ,p_data => x_msg_data);
14869: FND_MSG_PUB.ADD;
14870: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
14871: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
14872: END IF ;
14873: fnd_msg_pub.count_and_get(
14874: p_count => x_msg_count
14875: ,p_data => x_msg_data);
14876: x_return_status := FND_API.G_RET_STS_ERROR;
14877:
14981: EXCEPTION
14982:
14983: WHEN OTHERS THEN
14984: x_return_status := FND_API.G_RET_STS_ERROR;
14985: fnd_msg_pub.count_and_get(
14986: p_count => x_msg_count,
14987: p_data => x_msg_data);
14988:
14989: END GET_SR_DEFAULTS;
15088: --RAISE FND_API.G_EXC_ERROR;
15089: --null;
15090: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_TXN_TYPE_OWNER');
15091: FND_MESSAGE.SET_TOKEN('TXN_TYPE_ID', p_txn_type_id);
15092: FND_MSG_PUB.Add;
15093: RAISE FND_API.G_EXC_ERROR;
15094: END IF;
15095:
15096: ELSIF v_txn_type.line_order_category_code = 'ORDER' THEN
15098: --RAISE FND_API.G_EXC_ERROR;
15099: --null;
15100: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_TXN_TYPE_OWNER');
15101: FND_MESSAGE.SET_TOKEN('TXN_TYPE_ID', p_txn_type_id);
15102: FND_MSG_PUB.Add;
15103: RAISE FND_API.G_EXC_ERROR;
15104: END IF;
15105: END IF;
15106:
15131: IF lv_exists_flag = 'N' THEN
15132: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_TXN_TYPE');
15133: FND_MESSAGE.SET_TOKEN('TXN_TYPE_ID', p_txn_type_id);
15134: FND_MESSAGE.SET_TOKEN('BUSINESS_PROCESS_ID', p_business_process_id);
15135: FND_MSG_PUB.Add;
15136:
15137: RAISE FND_API.G_EXC_ERROR;
15138:
15139: END IF;
15140:
15141: EXCEPTION
15142: WHEN FND_API.G_EXC_ERROR THEN
15143: x_return_status := FND_API.G_RET_STS_ERROR;
15144: fnd_msg_pub.count_and_get(
15145: p_count => x_msg_count
15146: ,p_data => x_msg_data);
15147:
15148:
15150: x_return_status := FND_API.G_RET_STS_ERROR;
15151: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_TXN_TYPE');
15152: FND_MESSAGE.SET_TOKEN('TXN_TYPE_ID', p_txn_type_id);
15153: FND_MESSAGE.SET_TOKEN('BUSINESS_PROCESS_ID', p_business_process_id);
15154: FND_MSG_PUB.Add;
15155:
15156: fnd_msg_pub.count_and_get(
15157: p_count => x_msg_count
15158: ,p_data => x_msg_data);
15152: FND_MESSAGE.SET_TOKEN('TXN_TYPE_ID', p_txn_type_id);
15153: FND_MESSAGE.SET_TOKEN('BUSINESS_PROCESS_ID', p_business_process_id);
15154: FND_MSG_PUB.Add;
15155:
15156: fnd_msg_pub.count_and_get(
15157: p_count => x_msg_count
15158: ,p_data => x_msg_data);
15159:
15160:
15215: -- lv_exists_flag := 'N';
15216: -- --RAISE FND_API.G_EXC_ERROR;
15217: -- FND_MESSAGE.Set_Name('CS', 'CS_CHG_CONTRACT_ITEM_ERROR');
15218: -- FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_inv_id, TRUE);
15219: -- FND_MSG_PUB.Add;
15220: -- RAISE FND_API.G_EXC_ERROR;
15221: -- END IF;
15222:
15223: ------DBMS_OUTPUT.PUT_LINE('v_get_inv_item.contract_item_type_code '||v_get_inv_item.contract_item_type_code);
15247: IF lv_exists_flag = 'N' THEN
15248: -- --DBMS_OUTPUT.PUT_LINE('lv_exists_flag = ' || 'N');
15249: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_INVENTORY_ITEM');
15250: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_inv_id);
15251: FND_MSG_PUB.Add;
15252: RAISE FND_API.G_EXC_ERROR;
15253: END IF;
15254:
15255: EXCEPTION
15255: EXCEPTION
15256:
15257: WHEN FND_API.G_EXC_ERROR THEN
15258: x_return_status := FND_API.G_RET_STS_ERROR;
15259: fnd_msg_pub.count_and_get(
15260: p_count => x_msg_count
15261: ,p_data => x_msg_data);
15262:
15263: WHEN OTHERS THEN
15263: WHEN OTHERS THEN
15264: x_return_status := FND_API.G_RET_STS_ERROR;
15265: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_INVENTORY_ITEM');
15266: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_inv_id);
15267: FND_MSG_PUB.Add;
15268: fnd_msg_pub.count_and_get(
15269: p_count => x_msg_count
15270: ,p_data => x_msg_data);
15271:
15264: x_return_status := FND_API.G_RET_STS_ERROR;
15265: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_INVENTORY_ITEM');
15266: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_inv_id);
15267: FND_MSG_PUB.Add;
15268: fnd_msg_pub.count_and_get(
15269: p_count => x_msg_count
15270: ,p_data => x_msg_data);
15271:
15272: END VALIDATE_ITEM;
15321: --RAISE FND_API.G_EXC_ERROR;
15322: FND_MESSAGE.Set_Name('CS', 'CS_CHG_ITM_BILL_FLG_NOT_IN_TXN');
15323: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_inv_id);
15324: FND_MESSAGE.SET_TOKEN('TXN_TYPE_ID', p_txn_type_id);
15325: FND_MSG_PUB.Add;
15326: RAISE FND_API.G_EXC_ERROR;
15327: END IF;
15328:
15329: --DBMS_OUTPUT.PUT_LINE('lv_exists_flag = ' || lv_exists_flag);
15332: EXCEPTION
15333:
15334: WHEN FND_API.G_EXC_ERROR THEN
15335: x_return_status := FND_API.G_RET_STS_ERROR;
15336: fnd_msg_pub.count_and_get(
15337: p_count => x_msg_count
15338: ,p_data => x_msg_data);
15339:
15340: WHEN OTHERS THEN
15341: x_return_status := FND_API.G_RET_STS_ERROR;
15342: FND_MESSAGE.Set_Name('CS', 'CS_CHG_ITM_BILL_FLG_NOT_IN_TXN');
15343: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_inv_id);
15344: FND_MESSAGE.SET_TOKEN('TXN_TYPE_ID', p_txn_type_id);
15345: FND_MSG_PUB.Add;
15346: fnd_msg_pub.count_and_get(
15347: p_count => x_msg_count
15348: ,p_data => x_msg_data);
15349:
15342: FND_MESSAGE.Set_Name('CS', 'CS_CHG_ITM_BILL_FLG_NOT_IN_TXN');
15343: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_inv_id);
15344: FND_MESSAGE.SET_TOKEN('TXN_TYPE_ID', p_txn_type_id);
15345: FND_MSG_PUB.Add;
15346: fnd_msg_pub.count_and_get(
15347: p_count => x_msg_count
15348: ,p_data => x_msg_data);
15349:
15350: END GET_BILLING_FLAG;
15390: --null;
15391: FND_MESSAGE.Set_Name('CS', 'CS_CHG_ITM_BILL_TYP_NOT_IN_TXN');
15392: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_inv_id);
15393: FND_MESSAGE.SET_TOKEN('TXN_TYPE_ID', p_txn_type_id);
15394: FND_MSG_PUB.Add;
15395: RAISE FND_API.G_EXC_ERROR;
15396: END IF;
15397:
15398: EXCEPTION
15398: EXCEPTION
15399:
15400: WHEN FND_API.G_EXC_ERROR THEN
15401: x_return_status := FND_API.G_RET_STS_ERROR;
15402: fnd_msg_pub.count_and_get(
15403: p_count => x_msg_count
15404: ,p_data => x_msg_data);
15405:
15406: WHEN OTHERS THEN
15407: x_return_status := FND_API.G_RET_STS_ERROR;
15408: FND_MESSAGE.Set_Name('CS', 'CS_CHG_ITM_BILL_TYP_NOT_IN_TXN');
15409: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_inv_id);
15410: FND_MESSAGE.SET_TOKEN('TXN_TYPE_ID', p_txn_type_id);
15411: FND_MSG_PUB.Add;
15412: fnd_msg_pub.count_and_get(
15413: p_count => x_msg_count
15414: ,p_data => x_msg_data);
15415:
15408: FND_MESSAGE.Set_Name('CS', 'CS_CHG_ITM_BILL_TYP_NOT_IN_TXN');
15409: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_inv_id);
15410: FND_MESSAGE.SET_TOKEN('TXN_TYPE_ID', p_txn_type_id);
15411: FND_MSG_PUB.Add;
15412: fnd_msg_pub.count_and_get(
15413: p_count => x_msg_count
15414: ,p_data => x_msg_data);
15415:
15416: END GET_TXN_BILLING_TYPE;
15450: x_return_status := FND_API.G_RET_STS_ERROR;
15451: FND_MESSAGE.Set_Name('CS', 'CS_CHG_GET_UOM_FAILED');
15452: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_inv_id);
15453: FND_MESSAGE.SET_TOKEN('ORGANIZATION_ID', cs_std.get_item_valdn_orgzn_id);
15454: FND_MSG_PUB.Add;
15455: fnd_msg_pub.count_and_get(
15456: p_count => x_msg_count
15457: ,p_data => x_msg_data);
15458:
15451: FND_MESSAGE.Set_Name('CS', 'CS_CHG_GET_UOM_FAILED');
15452: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_inv_id);
15453: FND_MESSAGE.SET_TOKEN('ORGANIZATION_ID', cs_std.get_item_valdn_orgzn_id);
15454: FND_MSG_PUB.Add;
15455: fnd_msg_pub.count_and_get(
15456: p_count => x_msg_count
15457: ,p_data => x_msg_data);
15458:
15459: END GET_UOM;
15493: --null;
15494: FND_MESSAGE.Set_Name('CS', 'CS_CHG_GET_UOM_FAILED');
15495: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_inv_id);
15496: FND_MESSAGE.SET_TOKEN('ORGANIZATION_ID', cs_std.get_item_valdn_orgzn_id);
15497: FND_MSG_PUB.Add;
15498: RAISE FND_API.G_EXC_ERROR;
15499: END IF;
15500:
15501: EXCEPTION
15501: EXCEPTION
15502:
15503: WHEN FND_API.G_EXC_ERROR THEN
15504: x_return_status := FND_API.G_RET_STS_ERROR;
15505: fnd_msg_pub.count_and_get(
15506: p_count => x_msg_count
15507: ,p_data => x_msg_data);
15508:
15509: WHEN OTHERS THEN
15510: x_return_status := FND_API.G_RET_STS_ERROR;
15511: FND_MESSAGE.Set_Name('CS', 'CS_CHG_GET_UOM_FAILED');
15512: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_inv_id);
15513: FND_MESSAGE.SET_TOKEN('ORGANIZATION_ID', cs_std.get_item_valdn_orgzn_id);
15514: FND_MSG_PUB.Add;
15515: fnd_msg_pub.count_and_get(
15516: p_count => x_msg_count
15517: ,p_data => x_msg_data);
15518:
15511: FND_MESSAGE.Set_Name('CS', 'CS_CHG_GET_UOM_FAILED');
15512: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_inv_id);
15513: FND_MESSAGE.SET_TOKEN('ORGANIZATION_ID', cs_std.get_item_valdn_orgzn_id);
15514: FND_MSG_PUB.Add;
15515: fnd_msg_pub.count_and_get(
15516: p_count => x_msg_count
15517: ,p_data => x_msg_data);
15518:
15519: END GET_PRIMARY_UOM;
15578: --null;
15579: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_SOURCE');
15580: FND_MESSAGE.SET_TOKEN('SOURCE_CODE', p_source_code);
15581: FND_MESSAGE.SET_TOKEN('SOURCE_ID', p_source_id);
15582: FND_MSG_PUB.Add;
15583: RAISE FND_API.G_EXC_ERROR;
15584: END IF;
15585:
15586: ELSE
15601: --null;
15602: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_SOURCE');
15603: FND_MESSAGE.SET_TOKEN('SOURCE_CODE', p_source_code);
15604: FND_MESSAGE.SET_TOKEN('SOURCE_ID', p_source_id);
15605: FND_MSG_PUB.Add;
15606: RAISE FND_API.G_EXC_ERROR;
15607: END IF;
15608:
15609: ELSE
15624: --null;
15625: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_SOURCE');
15626: FND_MESSAGE.SET_TOKEN('SOURCE_CODE', p_source_code);
15627: FND_MESSAGE.SET_TOKEN('SOURCE_ID', p_source_id);
15628: FND_MSG_PUB.Add;
15629: RAISE FND_API.G_EXC_ERROR;
15630: END IF;
15631:
15632: ELSE
15648: --null;
15649: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_SOURCE');
15650: FND_MESSAGE.SET_TOKEN('SOURCE_CODE', p_source_code);
15651: FND_MESSAGE.SET_TOKEN('SOURCE_ID', p_source_id);
15652: FND_MSG_PUB.Add;
15653: RAISE FND_API.G_EXC_ERROR;
15654: END IF;
15655: ELSE
15656: -- cannot be null
15671: EXCEPTION
15672:
15673: WHEN FND_API.G_EXC_ERROR THEN
15674: x_return_status := FND_API.G_RET_STS_ERROR;
15675: fnd_msg_pub.count_and_get(
15676: p_count => x_msg_count
15677: ,p_data => x_msg_data);
15678:
15679: WHEN NO_DATA_FOUND THEN
15691: x_return_status := FND_API.G_RET_STS_ERROR;
15692: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_SOURCE');
15693: FND_MESSAGE.SET_TOKEN('SOURCE_CODE', p_source_code);
15694: FND_MESSAGE.SET_TOKEN('SOURCE_ID', p_source_id);
15695: FND_MSG_PUB.Add;
15696: fnd_msg_pub.count_and_get(
15697: p_count => x_msg_count
15698: ,p_data => x_msg_data);
15699:
15692: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_SOURCE');
15693: FND_MESSAGE.SET_TOKEN('SOURCE_CODE', p_source_code);
15694: FND_MESSAGE.SET_TOKEN('SOURCE_ID', p_source_id);
15695: FND_MSG_PUB.Add;
15696: fnd_msg_pub.count_and_get(
15697: p_count => x_msg_count
15698: ,p_data => x_msg_data);
15699:
15700: END Validate_Source;
15758: --null;
15759: FND_MESSAGE.Set_Name('CS', 'CS_CHG_NO_SITE_FOUND');
15760: FND_MESSAGE.SET_TOKEN('PARTY_ID', p_party_id);
15761: FND_MESSAGE.SET_TOKEN('SITE_USE_ID', p_site_use_id);
15762: FND_MSG_PUB.Add;
15763: RAISE FND_API.G_EXC_ERROR;
15764: END IF;
15765:
15766: EXCEPTION
15772: x_return_status := FND_API.G_RET_STS_ERROR;
15773: FND_MESSAGE.Set_Name('CS', 'CS_CHG_NO_SITE_FOUND');
15774: FND_MESSAGE.SET_TOKEN('PARTY_ID', p_party_id);
15775: FND_MESSAGE.SET_TOKEN('SITE_USE_ID', p_site_use_id);
15776: FND_MSG_PUB.Add;
15777:
15778: END get_site_for_party;
15779:
15780:
15859: x_return_status := FND_API.G_RET_STS_ERROR;
15860: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_UNEXPECTED_EXEC_ERRORS');
15861: FND_MESSAGE.SET_TOKEN('ROUTINE', p_api_name);
15862: FND_MESSAGE.SET_TOKEN('SQLERRM', sqlerrm);
15863: FND_MSG_PUB.ADD;
15864: fnd_msg_pub.count_and_get(
15865: p_count => x_msg_count
15866: ,p_data => x_msg_data);
15867:
15860: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_UNEXPECTED_EXEC_ERRORS');
15861: FND_MESSAGE.SET_TOKEN('ROUTINE', p_api_name);
15862: FND_MESSAGE.SET_TOKEN('SQLERRM', sqlerrm);
15863: FND_MSG_PUB.ADD;
15864: fnd_msg_pub.count_and_get(
15865: p_count => x_msg_count
15866: ,p_data => x_msg_data);
15867:
15868: END get_contract_price_list;
15900: --RAISE FND_API.G_EXC_ERROR;
15901: --null;
15902: FND_MESSAGE.Set_Name('CS', 'CS_CHG_GET_CURRENCY_FAILED');
15903: FND_MESSAGE.SET_TOKEN('PRICE_LIST_ID', p_price_list_id);
15904: FND_MSG_PUB.Add;
15905: RAISE FND_API.G_EXC_ERROR;
15906: END IF;
15907: ELSE
15908: --price list id is null
15916: EXCEPTION
15917:
15918: WHEN FND_API.G_EXC_ERROR THEN
15919: x_return_status := FND_API.G_RET_STS_ERROR;
15920: fnd_msg_pub.count_and_get(
15921: p_count => x_msg_count
15922: ,p_data => x_msg_data);
15923:
15924: WHEN OTHERS THEN
15924: WHEN OTHERS THEN
15925: x_return_status := FND_API.G_RET_STS_ERROR;
15926: FND_MESSAGE.Set_Name('CS', 'CS_CHG_GET_CURRENCY_FAILED');
15927: FND_MESSAGE.SET_TOKEN('PRICE_LIST_ID', p_price_list_id);
15928: FND_MSG_PUB.Add;
15929: fnd_msg_pub.count_and_get(
15930: p_count => x_msg_count
15931: ,p_data => x_msg_data);
15932:
15925: x_return_status := FND_API.G_RET_STS_ERROR;
15926: FND_MESSAGE.Set_Name('CS', 'CS_CHG_GET_CURRENCY_FAILED');
15927: FND_MESSAGE.SET_TOKEN('PRICE_LIST_ID', p_price_list_id);
15928: FND_MSG_PUB.Add;
15929: fnd_msg_pub.count_and_get(
15930: p_count => x_msg_count
15931: ,p_data => x_msg_data);
15932:
15933: END get_currency_code;
15979: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_UNDEFINED_CONV_CURRENCY');
15980: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
15981: FND_MESSAGE.SET_TOKEN('FROM_CURRENCY', p_from_currency);
15982: FND_MESSAGE.SET_TOKEN('TO_CURRENCY', p_to_currency);
15983: FND_MSG_PUB.add;
15984: RAISE FND_API.g_exc_error;
15985: END IF;
15986:
15987: IF p_to_currency IS NULL THEN
15989: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_UNDEFINED_CONV_CURRENCY');
15990: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
15991: FND_MESSAGE.SET_TOKEN('FROM_CURRENCY', p_from_currency);
15992: FND_MESSAGE.SET_TOKEN('TO_CURRENCY', p_to_currency);
15993: FND_MSG_PUB.add;
15994: RAISE FND_API.g_exc_error;
15995: END IF;
15996:
15997: IF ((l_conversion_type IS NULL) OR
16000: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_UNDEFINED_CONV_PROFILES');
16001: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
16002: FND_MESSAGE.SET_TOKEN('PROFILE1', 'CS_CHG_DEFAULT_CONVERSION_TYPE');
16003: FND_MESSAGE.SET_TOKEN('PROFILE2', 'CS_CHG_MAX_ROLL_DAYS');
16004: FND_MSG_PUB.add;
16005: RAISE FND_API.g_exc_error;
16006: END IF;
16007:
16008:
16024: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
16025: FND_MESSAGE.SET_TOKEN('FROM_CURRENCY', p_from_currency);
16026: FND_MESSAGE.SET_TOKEN('TO_CURRENCY', p_to_currency);
16027: FND_MESSAGE.SET_TOKEN('CONV_DATE', sysdate);
16028: FND_MSG_PUB.add;
16029: RAISE FND_API.g_exc_error;
16030: ELSE
16031: x_denominator := lx_denominator;
16032: x_numerator := lx_numerator;
16045: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
16046: FND_MESSAGE.SET_TOKEN('FROM_CURRENCY', p_from_currency);
16047: FND_MESSAGE.SET_TOKEN('TO_CURRENCY', p_to_currency);
16048: FND_MESSAGE.SET_TOKEN('CONV_DATE', sysdate);
16049: FND_MSG_PUB.add;
16050:
16051: END Get_Conversion_Rate;
16052:
16053: --============================================================
16165: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CONTRACT_ERROR');
16166: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
16167: FND_MESSAGE.SET_TOKEN('CONTRACT_SERVICE_LINE_ID', p_contract_sr_id);
16168: FND_MESSAGE.SET_TOKEN('BUSINESS_PROCESS_ID', p_business_process_id);
16169: FND_MSG_PUB.add;
16170: RAISE FND_API.g_exc_error;
16171: END IF;
16172:
16173: EXCEPTION
16173: EXCEPTION
16174:
16175: WHEN FND_API.g_exc_error THEN
16176: x_return_status := fnd_api.g_ret_sts_error;
16177: fnd_msg_pub.count_and_get(
16178: p_count => x_msg_count
16179: ,p_data => x_msg_data);
16180:
16181: END get_contract;
16210: CS_Charge_Details_PVT.Add_Invalid_Argument_Msg(
16211: p_token_an => p_api_name,
16212: p_token_v => to_char(p_estimate_detail_id) ,
16213: p_token_p => 'p_estimate_detail_id') ;
16214: fnd_msg_pub.count_and_get(
16215: p_count => x_msg_count
16216: ,p_data => x_msg_data);
16217:
16218: WHEN RECORD_LOCK_EXCEPTION THEN
16225: x_return_status := FND_API.G_RET_STS_ERROR;
16226: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CHARGE_FAILED');
16227: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
16228: FND_MESSAGE.SET_TOKEN('ESTIMATE_DETAIL_ID', p_estimate_detail_id);
16229: FND_MSG_PUB.add;
16230: fnd_msg_pub.count_and_get(
16231: p_count => x_msg_count
16232: ,p_data => x_msg_data);
16233:
16226: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_GET_CHARGE_FAILED');
16227: FND_MESSAGE.SET_TOKEN('API_NAME', p_api_name);
16228: FND_MESSAGE.SET_TOKEN('ESTIMATE_DETAIL_ID', p_estimate_detail_id);
16229: FND_MSG_PUB.add;
16230: fnd_msg_pub.count_and_get(
16231: p_count => x_msg_count
16232: ,p_data => x_msg_data);
16233:
16234: END;
16350: p_token_an => p_api_name,
16351: p_token_v => to_char(p_org_id) ,
16352: p_token_p => 'p_org_id') ;
16353:
16354: fnd_msg_pub.count_and_get(
16355: p_count => x_msg_count
16356: ,p_data => x_msg_data);
16357:
16358: x_return_status := FND_API.G_RET_STS_ERROR ; -- Bug 10359327
16376: IS
16377:
16378: BEGIN
16379:
16380: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
16381: FND_MESSAGE.Set_Name('CS', 'CS_API_ALL_INVALID_ARGUMENT');
16382: FND_MESSAGE.Set_Token('API_NAME', p_token_an);
16383: FND_MESSAGE.Set_Token('VALUE', p_token_v);
16384: FND_MESSAGE.Set_Token('PARAMETER', p_token_p);
16381: FND_MESSAGE.Set_Name('CS', 'CS_API_ALL_INVALID_ARGUMENT');
16382: FND_MESSAGE.Set_Token('API_NAME', p_token_an);
16383: FND_MESSAGE.Set_Token('VALUE', p_token_v);
16384: FND_MESSAGE.Set_Token('PARAMETER', p_token_p);
16385: FND_MSG_PUB.Add;
16386:
16387: END IF;
16388:
16389: END Add_Invalid_Argument_Msg;
16400: IS
16401:
16402: BEGIN
16403:
16404: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
16405:
16406: FND_MESSAGE.Set_Name('CS', 'CS_API_ALL_NULL_PARAMETER');
16407: FND_MESSAGE.Set_Token('API_NAME', p_token_an);
16408: FND_MESSAGE.Set_Token('NULL_PARAM', p_token_np);
16405:
16406: FND_MESSAGE.Set_Name('CS', 'CS_API_ALL_NULL_PARAMETER');
16407: FND_MESSAGE.Set_Token('API_NAME', p_token_an);
16408: FND_MESSAGE.Set_Token('NULL_PARAM', p_token_np);
16409: FND_MSG_PUB.Add;
16410:
16411: END IF;
16412:
16413: END Add_Null_Parameter_Msg;
16421: IS
16422: BEGIN
16423: FND_MESSAGE.Set_Name('CS', 'CS_API_CHG_CANT_DELETE_DET');
16424: FND_MESSAGE.Set_Token('API_NAME', p_token_an);
16425: FND_MSG_PUB.Add;
16426: END;
16427:
16428:
16429: --============================
16438: FND_MESSAGE.Set_Name('CS', 'CS_API_CHG_CANT_UPD_DET_PARAM');
16439: FND_MESSAGE.Set_Token('API_NAME', p_token_an);
16440: FND_MESSAGE.Set_Token('COLUMN_NAME', p_token_cn);
16441: FND_MESSAGE.Set_Token('VALUE', p_token_v);
16442: FND_MSG_PUB.Add;
16443: END;
16444:
16445:
16446:
16456: BEGIN
16457:
16458: FND_MESSAGE.Set_Name('CS', 'CS_API_ALL_CANT_LOCK_RECORD');
16459: FND_MESSAGE.Set_Token('API_NAME', p_token_an);
16460: FND_MSG_PUB.Add;
16461: END Record_IS_Locked_Msg;
16462:
16463:
16464: PROCEDURE Validate_Who_Info(
16556: IF get_line_type_csr%NOTFOUND THEN
16557: CLOSE get_line_type_csr;
16558: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_LINE_TYPE_NOT_FOUND');
16559: FND_MESSAGE.SET_TOKEN('TXN_BILLING_TYPE_ID', p_txn_billing_type_id);
16560: FND_MSG_PUB.ADD;
16561: RAISE FND_API.g_exc_error;
16562: END IF;
16563: CLOSE get_line_type_csr;
16564: --DBMS_OUTPUT.PUT_LINE('x_return_status = ' || x_return_status);
16566: -- Exception Block
16567: EXCEPTION
16568: WHEN FND_API.g_exc_error THEN
16569: x_return_status := fnd_api.g_ret_sts_error;
16570: fnd_msg_pub.count_and_get(
16571: p_count => x_msg_count
16572: ,p_data => x_msg_data);
16573: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
16574: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
16571: p_count => x_msg_count
16572: ,p_data => x_msg_data);
16573: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
16574: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
16575: fnd_msg_pub.count_and_get(
16576: p_count => x_msg_count
16577: ,p_data => x_msg_data);
16578: WHEN OTHERS THEN
16579: x_return_status := FND_API.G_RET_STS_ERROR;
16579: x_return_status := FND_API.G_RET_STS_ERROR;
16580: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_UNEXPECTED_EXEC_ERRORS');
16581: FND_MESSAGE.SET_TOKEN('ROUTINE', p_api_name);
16582: FND_MESSAGE.SET_TOKEN('SQLERRM', sqlerrm);
16583: FND_MSG_PUB.ADD;
16584: fnd_msg_pub.count_and_get(
16585: p_count => x_msg_count
16586: ,p_data => x_msg_data);
16587:
16580: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_UNEXPECTED_EXEC_ERRORS');
16581: FND_MESSAGE.SET_TOKEN('ROUTINE', p_api_name);
16582: FND_MESSAGE.SET_TOKEN('SQLERRM', sqlerrm);
16583: FND_MSG_PUB.ADD;
16584: fnd_msg_pub.count_and_get(
16585: p_count => x_msg_count
16586: ,p_data => x_msg_data);
16587:
16588: END Get_Line_Type;
16703: IF order_csr%NOTFOUND THEN
16704: CLOSE order_csr;
16705: FND_MESSAGE.Set_Name('CS', 'CS_CHG_INVALID_ORDER');
16706: FND_MESSAGE.SET_TOKEN('ORDER_HEADER_ID', p_order_header_id);
16707: FND_MSG_PUB.Add;
16708: RAISE FND_API.G_EXC_ERROR;
16709: END IF;
16710: CLOSE order_csr;
16711:
16714: IF l_open_flag = 'N' THEN
16715: FND_MESSAGE.Set_Name('CS', 'CS_CHG_CANNOT_ADD_TO_ORDER');
16716: FND_MESSAGE.Set_token('API_NAME', p_api_name);
16717: FND_MESSAGE.SET_TOKEN('ORDER_HEADER_ID', p_order_header_id);
16718: FND_MSG_PUB.Add;
16719: RAISE FND_API.G_EXC_ERROR;
16720: END IF;
16721:
16722:
16723: -- Exception Block
16724: EXCEPTION
16725: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
16726: x_return_status := FND_API.G_RET_STS_ERROR;
16727: fnd_msg_pub.count_and_get(
16728: p_count => x_msg_count
16729: ,p_data => x_msg_data);
16730:
16731: WHEN OTHERS THEN
16731: WHEN OTHERS THEN
16732: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_UNEXPECTED_EXEC_ERRORS');
16733: FND_MESSAGE.SET_TOKEN('ROUTINE', p_api_name);
16734: FND_MESSAGE.SET_TOKEN('SQLERRM', sqlerrm);
16735: FND_MSG_PUB.ADD;
16736: fnd_msg_pub.count_and_get(
16737: p_count => x_msg_count
16738: ,p_data => x_msg_data);
16739: x_return_status := FND_API.G_RET_STS_ERROR;
16732: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_UNEXPECTED_EXEC_ERRORS');
16733: FND_MESSAGE.SET_TOKEN('ROUTINE', p_api_name);
16734: FND_MESSAGE.SET_TOKEN('SQLERRM', sqlerrm);
16735: FND_MSG_PUB.ADD;
16736: fnd_msg_pub.count_and_get(
16737: p_count => x_msg_count
16738: ,p_data => x_msg_data);
16739: x_return_status := FND_API.G_RET_STS_ERROR;
16740:
16839: , L_API_NAME
16840: , G_PKG_NAME
16841: )
16842: THEN
16843: FND_MSG_PUB.Count_And_Get
16844: (
16845: p_count => x_msg_count
16846: , p_data => x_msg_data
16847: );
16849: END IF ;
16850:
16851: IF FND_API.to_Boolean(p_init_msg_list)
16852: THEN
16853: FND_MSG_PUB.initialize;
16854: END IF ;
16855:
16856: ------------------------------------------------------------------------------
16857: -- Parameter Validations:
16872: FND_MESSAGE.Set_Name('CS', 'CS_SR_PARAM_VALUE_ERROR');
16873: FND_MESSAGE.Set_Token('API_NAME', L_API_NAME_FULL);
16874: FND_MESSAGE.Set_Token('PARAM', 'p_object_type');
16875: FND_MESSAGE.Set_Token('CURRVAL', p_object_type);
16876: FND_MSG_PUB.ADD;
16877:
16878: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
16879: END IF;
16880:
16895: FND_MESSAGE.Set_Name('CS', 'CS_SR_PARAM_VALUE_ERROR');
16896: FND_MESSAGE.Set_Token('API_NAME', L_API_NAME_FULL);
16897: FND_MESSAGE.Set_Token('PARAM', 'p_processing_set_id');
16898: FND_MESSAGE.Set_Token('CURRVAL', NVL(to_char(p_processing_set_id),'NULL'));
16899: FND_MSG_PUB.ADD;
16900:
16901: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
16902: END IF;
16903:
16988: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
16989: FND_MESSAGE.Set_Name('CS', 'CS_CHG_LINE_VAL_FAIL');
16990: FND_MESSAGE.Set_Token('API_NAME', L_API_NAME_FULL);
16991: FND_MESSAGE.Set_Token('ERROR', SQLERRM);
16992: FND_MSG_PUB.ADD;
16993:
16994: IF FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level
16995: THEN
16996: FND_LOG.String
17105: , L_API_NAME
17106: , G_PKG_NAME
17107: )
17108: THEN
17109: FND_MSG_PUB.Count_And_Get
17110: (
17111: p_count => x_msg_count
17112: , p_data => x_msg_data
17113: );
17115: END IF ;
17116:
17117: IF FND_API.to_Boolean(p_init_msg_list)
17118: THEN
17119: FND_MSG_PUB.initialize;
17120: END IF ;
17121:
17122: ------------------------------------------------------------------------------
17123: -- Parameter Validations:
17138: FND_MESSAGE.Set_Name('CS', 'CS_SR_PARAM_VALUE_ERROR');
17139: FND_MESSAGE.Set_Token('API_NAME', L_API_NAME_FULL);
17140: FND_MESSAGE.Set_Token('PARAM', 'p_object_type');
17141: FND_MESSAGE.Set_Token('CURRVAL', p_object_type);
17142: FND_MSG_PUB.ADD;
17143:
17144: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
17145: END IF;
17146:
17161: FND_MESSAGE.Set_Name('CS', 'CS_SR_PARAM_VALUE_ERROR');
17162: FND_MESSAGE.Set_Token('API_NAME', L_API_NAME_FULL);
17163: FND_MESSAGE.Set_Token('PARAM', 'p_processing_set_id');
17164: FND_MESSAGE.Set_Token('CURRVAL', NVL(to_char(p_processing_set_id),'NULL'));
17165: FND_MSG_PUB.ADD;
17166:
17167: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
17168: END IF;
17169:
17242: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
17243: FND_MESSAGE.Set_Name('CS', 'CS_CHG_LINE_DEL_FAIL');
17244: FND_MESSAGE.Set_Token('API_NAME', L_API_NAME_FULL);
17245: FND_MESSAGE.Set_Token('ERROR', SQLERRM);
17246: FND_MSG_PUB.ADD;
17247:
17248: IF FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level
17249: THEN
17250: FND_LOG.String