[Home] [Help]
480: EXCEPTION
481:
482: WHEN OTHERS THEN
483:
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;
481:
482: WHEN OTHERS THEN
483:
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:
482: WHEN OTHERS THEN
483:
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;
483:
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;
527: EXCEPTION
528:
529: WHEN OTHERS THEN
530:
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;
528:
529: WHEN OTHERS THEN
530:
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:
529: WHEN OTHERS THEN
530:
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;
530:
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;
575: EXCEPTION
576:
577: WHEN OTHERS THEN
578:
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;
576:
577: WHEN OTHERS THEN
578:
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:
577: WHEN OTHERS THEN
578:
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;
578:
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;
624: EXCEPTION
625:
626: WHEN OTHERS THEN
627:
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;
625:
626: WHEN OTHERS THEN
627:
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:
626: WHEN OTHERS THEN
627:
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;
627:
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;
668: EXCEPTION
669:
670: WHEN OTHERS THEN
671:
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;
669:
670: WHEN OTHERS THEN
671:
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:
670: WHEN OTHERS THEN
671:
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;
671:
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;
726: EXCEPTION
727:
728: WHEN OTHERS THEN
729:
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;
727:
728: WHEN OTHERS THEN
729:
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:
728: WHEN OTHERS THEN
729:
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;
729:
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;
889: EXCEPTION
890:
891: WHEN OTHERS THEN
892:
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;
890:
891: WHEN OTHERS THEN
892:
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:
891: WHEN OTHERS THEN
892:
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;
892:
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;
990: EXCEPTION
991:
992: WHEN OTHERS THEN
993:
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;
991:
992: WHEN OTHERS THEN
993:
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:
992: WHEN OTHERS THEN
993:
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;
993:
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;
1042: EXCEPTION
1043:
1044: WHEN OTHERS THEN
1045:
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;
1043:
1044: WHEN OTHERS THEN
1045:
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:
1044: WHEN OTHERS THEN
1045:
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;
1045:
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;
1121: EXCEPTION
1122:
1123: WHEN OTHERS THEN
1124:
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;
1122:
1123: WHEN OTHERS THEN
1124:
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:
1123: WHEN OTHERS THEN
1124:
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;
1124:
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;
1165: EXCEPTION
1166:
1167: WHEN OTHERS THEN
1168:
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;
1166:
1167: WHEN OTHERS THEN
1168:
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:
1167: WHEN OTHERS THEN
1168:
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;
1168:
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;
1214: EXCEPTION
1215:
1216: WHEN OTHERS THEN
1217:
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;
1215:
1216: WHEN OTHERS THEN
1217:
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:
1216: WHEN OTHERS THEN
1217:
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;
1217:
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;
1265: EXCEPTION
1266:
1267: WHEN OTHERS THEN
1268:
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;
1266:
1267: WHEN OTHERS THEN
1268:
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:
1267: WHEN OTHERS THEN
1268:
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;
1268:
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;
1325: EXCEPTION
1326:
1327: WHEN OTHERS THEN
1328:
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;
1326:
1327: WHEN OTHERS THEN
1328:
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:
1327: WHEN OTHERS THEN
1328:
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;
1328:
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;
1376:
1377: WHEN OTHERS THEN
1378: --DBMS_OUTPUT.PUT_LINE('MAYA');
1379:
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;
1377: WHEN OTHERS THEN
1378: --DBMS_OUTPUT.PUT_LINE('MAYA');
1379:
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:
1378: --DBMS_OUTPUT.PUT_LINE('MAYA');
1379:
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;
1379:
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;
1424: EXCEPTION
1425:
1426: WHEN OTHERS THEN
1427:
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;
1425:
1426: WHEN OTHERS THEN
1427:
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:
1426: WHEN OTHERS THEN
1427:
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;
1427:
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;
1502: EXCEPTION
1503:
1504: WHEN OTHERS THEN
1505:
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;
1503:
1504: WHEN OTHERS THEN
1505:
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:
1504: WHEN OTHERS THEN
1505:
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;
1505:
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;
1549: EXCEPTION
1550:
1551: WHEN OTHERS THEN
1552:
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;
1550:
1551: WHEN OTHERS THEN
1552:
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:
1551: WHEN OTHERS THEN
1552:
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;
1552:
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;
1590: EXCEPTION
1591:
1592: WHEN OTHERS THEN
1593:
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;
1591:
1592: WHEN OTHERS THEN
1593:
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:
1592: WHEN OTHERS THEN
1593:
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;
1593:
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;
1635: EXCEPTION
1636:
1637: WHEN OTHERS THEN
1638:
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;
1636:
1637: WHEN OTHERS THEN
1638:
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:
1637: WHEN OTHERS THEN
1638:
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;
1638:
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;
1684: EXCEPTION
1685:
1686: WHEN OTHERS THEN
1687:
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;
1685:
1686: WHEN OTHERS THEN
1687:
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:
1686: WHEN OTHERS THEN
1687:
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;
1687:
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;
1843: p_est_detail_rec => p_est_detail_rec);
1844:
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;
1844:
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:
1878: p_est_detail_rec => p_est_detail_rec);
1879:
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;
1879:
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:
1934: END IF;
1935:
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;
1935:
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:
2290: p_est_detail_rec => p_est_detail_rec);
2291:
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;
2291:
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;
2326: p_est_detail_rec => p_est_detail_rec);
2327:
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;
2327:
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;
2533: p_transaction_control => p_transaction_control,
2534: p_est_detail_rec => p_est_detail_rec);
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;
2534: p_est_detail_rec => p_est_detail_rec);
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:
2566: p_transaction_control => p_transaction_control,
2567: p_est_detail_rec => p_est_detail_rec);
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;
2567: p_est_detail_rec => p_est_detail_rec);
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:
2605: x_msg_count => x_msg_count,
2606: x_return_status => l_return_status);
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;
2606: x_return_status => l_return_status);
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:
2916: p_est_detail_rec => p_est_detail_rec);
2917:
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;
2917:
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:
2950: p_est_detail_rec => p_est_detail_rec);
2951:
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;
2951:
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:
3316: -- Validate the incoming estimate_detail_id
3317: -- =========================================
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;
3317: -- =========================================
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:
3328: OPEN c_charges_rec(p_estimate_detail_id);
3329: FETCH c_charges_rec INTO v_charges_rec;
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;
3329: FETCH c_charges_rec INTO v_charges_rec;
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:
3339: --DBMS_OUTPUT.PUT_LINE('passed 2ndst val');
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;
3339: --DBMS_OUTPUT.PUT_LINE('passed 2ndst val');
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:
3666: OPEN c_currency_code(p_price_list_id,p_currency_code);
3667: FETCH c_currency_code INTO lv_exists_flag;
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
3667: FETCH c_currency_code INTO lv_exists_flag;
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;
3686: ,p_data => x_msg_data);
3687:
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
3687:
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);
4179: IF p_validation_mode = 'I' THEN
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
4186: END IF;
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;
4458: IF p_charges_detail_rec.org_id IS NOT NULL THEN
4459: IF p_charges_detail_rec.org_id <> l_org_id THEN
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
4459: IF p_charges_detail_rec.org_id <> l_org_id THEN
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;
4518:
4519: ELSE
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
4519: ELSE
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;
4538: --DBMS_OUTPUT.PUT_LINE('Validate Original Source ...');
4539: IF p_validation_mode = 'I' THEN
4540: IF (p_charges_detail_rec.original_source_code IS NULL) OR (p_charges_detail_rec.original_source_id IS NULL) THEN
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;
4539: IF p_validation_mode = 'I' THEN
4540: IF (p_charges_detail_rec.original_source_code IS NULL) OR (p_charges_detail_rec.original_source_id IS NULL) THEN
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:
4540: IF (p_charges_detail_rec.original_source_code IS NULL) OR (p_charges_detail_rec.original_source_id IS NULL) THEN
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
4560:
4561: --IF l_return_status <> 'S' THEN
4562: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
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;
4561: --IF l_return_status <> 'S' THEN
4562: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
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;
4562: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
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:
4715: x_charges_detail_rec.source_code := p_charges_detail_rec.source_code ;
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:
4897: p_charges_detail_rec.pricing_attribute98 <> 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
5124: THEN
5125: --RAISE FND_API.G_EXC_ERROR;
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;
5125: --RAISE FND_API.G_EXC_ERROR;
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:
5217: END IF;
5218:
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;
5218:
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
5228: x_charges_detail_rec.charge_line_type := l_db_det_rec.charge_line_type;
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;
5228: x_charges_detail_rec.charge_line_type := l_db_det_rec.charge_line_type;
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;
5315: IF l_business_process_id IS NOT NULL THEN
5316: x_charges_detail_rec.business_process_id := l_business_process_id;
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;
5316: x_charges_detail_rec.business_process_id := l_business_process_id;
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
5323: END IF;
5324: ELSE
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;
5324: ELSE
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;
5414:
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:
5618: IF p_charges_detail_rec.line_category_code IS NOT NULL THEN
5619:
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
5619:
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
5646: IF p_charges_detail_rec.line_category_code <> FND_API.G_MISS_CHAR AND
5647: p_charges_detail_rec.line_category_code IS NOT NULL THEN
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
5647: p_charges_detail_rec.line_category_code IS NOT NULL THEN
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
5667: IF p_charges_detail_rec.line_category_code <> FND_API.G_MISS_CHAR AND
5668: p_charges_detail_rec.line_category_code IS NOT NULL THEN
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
5668: p_charges_detail_rec.line_category_code IS NOT NULL THEN
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
5843:
5844: --DBMS_OUTPUT.PUT_LINE('Back from VALIDATE_ITEM '||l_return_status);
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
5844: --DBMS_OUTPUT.PUT_LINE('Back from VALIDATE_ITEM '||l_return_status);
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
5897:
5898: --DBMS_OUTPUT.PUT_LINE('l_return_status = '||l_return_status);
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;
5898: --DBMS_OUTPUT.PUT_LINE('l_return_status = '||l_return_status);
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:
5975: END IF;
5976: ELSE
5977: --item is revision controlled but item revsion is null
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;
5976: ELSE
5977: --item is revision controlled but item revsion is null
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;
5977: --item is revision controlled but item revsion is null
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;
6015: END IF;
6016:
6017: 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;
6016:
6017: 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;
6017: 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;
6152:
6153: --IF l_return_status <> 'S' THEN
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;
6153: --IF l_return_status <> 'S' THEN
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:
6215:
6216: --IF l_return_status <> 'S' THEN
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;
6216: --IF l_return_status <> 'S' THEN
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:
6311: IF p_charges_detail_rec.billing_flag = l_billing_flag THEN
6312: x_charges_detail_rec.billing_flag := p_charges_detail_rec.billing_flag;
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;
6312: x_charges_detail_rec.billing_flag := p_charges_detail_rec.billing_flag;
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
6350: x_charges_detail_rec.billing_flag := p_charges_detail_rec.billing_flag;
6351: ELSE
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;
6351: ELSE
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:
6413: IF p_charges_detail_rec.txn_billing_type_id IS NOT NULL THEN
6414:
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 --
6414:
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
6454: IF p_charges_detail_rec.txn_billing_type_id <> FND_API.G_MISS_NUM AND
6455: p_charges_detail_rec.txn_billing_type_id IS NOT NULL THEN
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 --
6455: p_charges_detail_rec.txn_billing_type_id IS NOT NULL THEN
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
6523:
6524: IF p_charges_detail_rec.line_type_id <> l_line_type_id THEN
6525: --RAISE ERROR
6526: --DBMS_OUTPUT.PUT_LINE('here is the error');
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;
6524: IF p_charges_detail_rec.line_type_id <> l_line_type_id THEN
6525: --RAISE ERROR
6526: --DBMS_OUTPUT.PUT_LINE('here is the error');
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;
6525: --RAISE ERROR
6526: --DBMS_OUTPUT.PUT_LINE('here is the error');
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 --
6526: --DBMS_OUTPUT.PUT_LINE('here is the error');
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
6567: IF p_charges_detail_rec.line_type_id <> FND_API.G_MISS_NUM AND
6568: p_charges_detail_rec.line_type_id IS NOT NULL THEN
6569: IF p_charges_detail_rec.line_type_id <> l_line_type_id THEN
6570: --RAISE ERROR
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;
6568: p_charges_detail_rec.line_type_id IS NOT NULL THEN
6569: IF p_charges_detail_rec.line_type_id <> l_line_type_id THEN
6570: --RAISE ERROR
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;
6569: IF p_charges_detail_rec.line_type_id <> l_line_type_id THEN
6570: --RAISE ERROR
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 --
6570: --RAISE ERROR
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
7758: IF p_validation_mode = 'I' THEN
7759: IF p_charges_detail_rec.sold_to_party_id IS NOT NULL THEN
7760: IF p_charges_detail_rec.sold_to_party_id <> l_customer_id THEN
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;
7759: IF p_charges_detail_rec.sold_to_party_id IS NOT NULL THEN
7760: IF p_charges_detail_rec.sold_to_party_id <> l_customer_id THEN
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
7760: IF p_charges_detail_rec.sold_to_party_id <> l_customer_id THEN
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
7783: IF p_charges_detail_rec.sold_to_party_id <> FND_API.G_MISS_NUM AND
7784: p_charges_detail_rec.sold_to_party_id IS NOT NULL THEN
7785: IF p_charges_detail_rec.sold_to_party_id <> l_customer_id THEN
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;
7784: p_charges_detail_rec.sold_to_party_id IS NOT NULL THEN
7785: IF p_charges_detail_rec.sold_to_party_id <> l_customer_id THEN
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
7785: IF p_charges_detail_rec.sold_to_party_id <> l_customer_id THEN
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
7838:
7839: -- --DBMS_OUTPUT.PUT_LINE('Customer product id null');
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
7839: -- --DBMS_OUTPUT.PUT_LINE('Customer product id null');
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
7864: END IF;
7865:
7866: IF l_valid_check <> 'Y' THEN
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;
7865:
7866: IF l_valid_check <> 'Y' THEN
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
7866: IF l_valid_check <> 'Y' THEN
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:
7915:
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
7955: RAISE FND_API.G_EXC_ERROR;
7956: END IF;
7957:
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;
7956: END IF;
7957:
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
7957:
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
7980: IF p_charges_detail_rec.customer_product_id IS NULL THEN
7981: --DBMS_OUTPUT.PUT_LINE('Customer product id null');
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
7981: --DBMS_OUTPUT.PUT_LINE('Customer product id null');
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:
8002: --DBMS_OUTPUT.PUT_LINE('Instance is l_valid_check'||l_valid_check);
8003:
8004: IF l_valid_check <> 'Y' THEN
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;
8003:
8004: IF l_valid_check <> 'Y' THEN
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:
8004: IF l_valid_check <> 'Y' THEN
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
8044: END IF;
8045:
8046: IF l_valid_check <> 'Y' THEN
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;
8045:
8046: IF l_valid_check <> 'Y' THEN
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:
8046: IF l_valid_check <> 'Y' THEN
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
8087: RAISE FND_API.G_EXC_ERROR;
8088: END IF;
8089:
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;
8088: END IF;
8089:
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
8089:
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
8108: --DBMS_OUTPUT.PUT_LINE('In the IF1');
8109: -- Added customer_product_id is not null condition
8110: IF (p_charges_detail_rec.customer_product_id IS NOT NULL AND -- IF2
8111: p_charges_detail_rec.customer_product_id <> FND_API.G_MISS_NUM) THEN
8112: -- Added the FND Messages for Bug# 5141369
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);
8110: IF (p_charges_detail_rec.customer_product_id IS NOT NULL AND -- IF2
8111: p_charges_detail_rec.customer_product_id <> FND_API.G_MISS_NUM) THEN
8112: -- Added the FND Messages for Bug# 5141369
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;
8111: p_charges_detail_rec.customer_product_id <> FND_API.G_MISS_NUM) THEN
8112: -- Added the FND Messages for Bug# 5141369
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
8112: -- Added the FND Messages for Bug# 5141369
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
8167: --DBMS_OUTPUT.PUT_LINE('l_valid_check'||l_valid_check);
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');
8211: RAISE FND_API.G_EXC_ERROR;
8212: END IF;
8213:
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;
8212: END IF;
8213:
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
8213:
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
8240: l_comms_trackable_flag = 'Y' THEN
8241: IF p_charges_detail_rec.installed_cp_return_by_date IS NULL THEN
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
8241: IF p_charges_detail_rec.installed_cp_return_by_date IS NULL THEN
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
8265:
8266: IF p_charges_detail_rec.installed_cp_return_by_date IS NULL THEN
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
8266: IF p_charges_detail_rec.installed_cp_return_by_date IS NULL THEN
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
8304: l_line_order_category_code = 'ORDER' AND
8305: l_comms_trackable_flag = 'Y' AND
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
8305: l_comms_trackable_flag = 'Y' AND
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;
8322: l_line_order_category_code = 'ORDER' AND
8323: l_comms_trackable_flag = 'Y' AND
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
8323: l_comms_trackable_flag = 'Y' AND
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;
8343: l_comms_trackable_flag = 'Y' THEN
8344: IF p_charges_detail_rec.new_cp_return_by_date IS NULL THEN
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
8344: IF p_charges_detail_rec.new_cp_return_by_date IS NULL THEN
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;
8395: END IF;
8396:
8397: IF l_valid_check <> 'Y' THEN
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;
8396:
8397: IF l_valid_check <> 'Y' THEN
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:
8397: IF l_valid_check <> 'Y' THEN
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
8446:
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
8492: RAISE FND_API.G_EXC_ERROR;
8493: END IF;
8494:
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;
8493: END IF;
8494:
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 */
8494:
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:
8527: RAISE FND_API.G_EXC_ERROR;
8528: END IF;
8529:
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;
8528: END IF;
8529:
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
8529:
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
8557: --DBMS_OUTPUT.PUT_LINE('Customer product id null');
8558:
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:
8558:
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
8570: (l_comms_trackable_flag = 'Y') THEN
8571: --DBMS_OUTPUT.PUT_LINE('Customer product id null');
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
8571: --DBMS_OUTPUT.PUT_LINE('Customer product id null');
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;
8589: IF p_charges_detail_rec.customer_product_id <> FND_API.G_MISS_NUM AND
8590: p_charges_detail_rec.customer_product_id IS NOT NULL AND
8591: x_charges_detail_rec.line_category_code = 'RETURN' THEN
8592:
8593: -- Added the FND Messages for Bug# 5141369
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);
8591: x_charges_detail_rec.line_category_code = 'RETURN' THEN
8592:
8593: -- Added the FND Messages for Bug# 5141369
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;
8592:
8593: -- Added the FND Messages for Bug# 5141369
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:
8593: -- Added the FND Messages for Bug# 5141369
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
8617: END IF;
8618:
8619: IF l_valid_check <> 'Y' THEN
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;
8618:
8619: IF l_valid_check <> 'Y' THEN
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:
8619: IF l_valid_check <> 'Y' THEN
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
8668:
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
8710: RAISE FND_API.G_EXC_ERROR;
8711: END IF;
8712:
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;
8711: END IF;
8712:
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
8712:
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
8739: RAISE FND_API.G_EXC_ERROR;
8740: END IF;
8741:
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;
8740: END IF;
8741:
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
8741:
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
8763: p_charges_detail_rec.customer_product_id <> FND_API.G_MISS_NUM AND
8764: p_charges_detail_rec.customer_product_id IS NOT NULL AND
8765: x_charges_detail_rec.line_category_code = 'ORDER' THEN
8766:
8767: -- Added the FND Messages for Bug# 5141369
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);
8765: x_charges_detail_rec.line_category_code = 'ORDER' THEN
8766:
8767: -- Added the FND Messages for Bug# 5141369
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;
8766:
8767: -- Added the FND Messages for Bug# 5141369
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
8767: -- Added the FND Messages for Bug# 5141369
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
8787: END IF;
8788:
8789: IF l_valid_check <> 'Y' THEN
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;
8788:
8789: IF l_valid_check <> 'Y' THEN
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:
8789: IF l_valid_check <> 'Y' THEN
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
8832: RAISE FND_API.G_EXC_ERROR;
8833: END IF;
8834:
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;
8833: END IF;
8834:
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
8834:
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
8873: RAISE FND_API.G_EXC_ERROR;
8874: END IF;
8875:
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;
8874: END IF;
8875:
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
8875:
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
8904: l_comms_trackable_flag = 'Y' THEN
8905: IF p_charges_detail_rec.installed_cp_return_by_date IS NULL THEN
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
8905: IF p_charges_detail_rec.installed_cp_return_by_date IS NULL THEN
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
8943: l_line_order_category_code = 'ORDER' AND
8944: l_comms_trackable_flag = 'Y' AND
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
8944: l_comms_trackable_flag = 'Y' AND
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;
8967: l_line_order_category_code = 'ORDER' AND
8968: l_comms_trackable_flag = 'Y' AND
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
8968: l_comms_trackable_flag = 'Y' AND
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.
9000: l_comms_trackable_flag = 'Y' THEN
9001: IF p_charges_detail_rec.new_cp_return_by_date IS NULL THEN
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
9001: IF p_charges_detail_rec.new_cp_return_by_date IS NULL THEN
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
9046: RAISE FND_API.G_EXC_ERROR;
9047: END IF;
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
9047: END IF;
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;
9066: If l_sr_instance_id is not null AND l_sr_instance_id = p_charges_detail_rec.parent_instance_id
9067: AND l_sr_inventory_item_id <> x_charges_detail_rec.inventory_item_id_in Then
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;
9067: AND l_sr_inventory_item_id <> x_charges_detail_rec.inventory_item_id_in Then
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
9096: RAISE FND_API.G_EXC_ERROR;
9097: END IF;
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
9097: END IF;
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;
9116: If l_sr_instance_id is not null AND l_sr_instance_id = p_charges_detail_rec.parent_instance_id
9117: AND l_sr_inventory_item_id <> x_charges_detail_rec.inventory_item_id_in Then
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;
9117: AND l_sr_inventory_item_id <> x_charges_detail_rec.inventory_item_id_in Then
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:
9141: IF l_line_order_category_code = 'RETURN' THEN
9142: IF p_charges_detail_rec.return_reason_code IS NULL 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
9142: IF p_charges_detail_rec.return_reason_code IS NULL 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:
9163: END IF;
9164:
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
9164:
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;
9179: IF l_line_order_category_code = 'ORDER' OR l_line_order_category_code IS NULL THEN
9180: IF p_charges_detail_rec.return_reason_code IS NOT NULL THEN
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;
9180: IF p_charges_detail_rec.return_reason_code IS NOT NULL THEN
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;
9209: END IF;
9210:
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
9210:
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;
9354: RAISE FND_API.G_EXC_ERROR;
9355: 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:
9355: 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
9376: x_msg_count => l_msg_count,
9377: x_return_status => l_return_status);
9378:
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;
9377: x_return_status => l_return_status);
9378:
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 ;
9378:
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:
9405: x_charges_detail_rec.currency_code := p_charges_detail_rec.currency_code;
9406: l_curr_in_conversion_list := 'Y';
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:
9406: l_curr_in_conversion_list := 'Y';
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;
9417: and (p_charges_detail_rec.list_price is null OR p_charges_detail_rec.list_price = FND_API.G_MISS_NUM
9418: OR p_charges_detail_rec.selling_price is null OR p_charges_detail_rec.selling_price = FND_API.G_MISS_NUM
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:
9418: OR p_charges_detail_rec.selling_price is null OR p_charges_detail_rec.selling_price = FND_API.G_MISS_NUM
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;
9424: RAISE FND_API.G_EXC_ERROR;
9425:
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;
9425:
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:
9495: END IF;
9496:
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
9496:
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
9570: END IF;
9571:
9572: IF l_valid_check <> 'Y' THEN
9573:
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;
9571:
9572: IF l_valid_check <> 'Y' THEN
9573:
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;
9572: IF l_valid_check <> 'Y' THEN
9573:
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:
9573:
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
9614: x_msg_count => l_msg_count,
9615: x_return_status => l_return_status);
9616:
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;
9615: x_return_status => l_return_status);
9616:
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 ;
9616:
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
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;
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
9651: x_msg_count => l_msg_count,
9652: x_return_status => l_return_status);
9653:
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;
9652: x_return_status => l_return_status);
9653:
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 ;
9653:
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:
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;
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
9694: x_msg_count => l_msg_count,
9695: x_return_status => l_return_status);
9696:
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;
9695: x_return_status => l_return_status);
9696:
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 ;
9696:
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
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
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;
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
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
9755:
9756: --DBMS_OUTPUT.PUT_LINE('l_contract_id = ' || l_contract_id);
9757:
9758: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
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;
9756: --DBMS_OUTPUT.PUT_LINE('l_contract_id = ' || l_contract_id);
9757:
9758: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
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;
9757:
9758: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
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;
9758: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
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:
9800: x_msg_count => l_msg_count,
9801: x_return_status => l_return_status);
9802:
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;
9801: x_return_status => l_return_status);
9802:
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 ;
9802:
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:
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;
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
9837: x_msg_count => l_msg_count,
9838: x_return_status => l_return_status);
9839:
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;
9838: x_return_status => l_return_status);
9839:
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 ;
9839:
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:
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;
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
9880: x_msg_count => l_msg_count,
9881: x_return_status => l_return_status);
9882:
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;
9881: x_return_status => l_return_status);
9882:
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 ;
9882:
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
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
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;
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
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
9915: x_return_status => l_return_status);
9916:
9917: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
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;
9916:
9917: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
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 ;
9917: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
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
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
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;
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
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
9946: x_msg_count => l_msg_count,
9947: x_return_status => l_return_status);
9948: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
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;
9947: x_return_status => l_return_status);
9948: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
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 ;
9948: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
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
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
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;
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
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
9982: x_msg_count => l_msg_count,
9983: x_return_status => l_return_status);
9984:
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;
9983: x_return_status => l_return_status);
9984:
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 ;
9984:
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
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
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;
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
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
10013: x_msg_count => l_msg_count,
10014: x_return_status => l_return_status);
10015: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
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;
10014: x_return_status => l_return_status);
10015: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
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 ;
10015: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
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
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
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;
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
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
10077: END IF;
10078:
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
10078:
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
10147: END IF;
10148:
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:
10148:
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
10189: x_msg_count => l_msg_count,
10190: x_return_status => l_return_status);
10191:
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;
10190: x_return_status => l_return_status);
10191:
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 ;
10191:
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:
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;
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
10246: x_msg_count => l_msg_count,
10247: x_return_status => l_return_status);
10248:
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;
10247: x_return_status => l_return_status);
10248:
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 ;
10248:
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:
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;
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
10289: x_msg_count => l_msg_count,
10290: x_return_status => l_return_status);
10291:
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;
10290: x_return_status => l_return_status);
10291:
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 ;
10291:
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
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
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;
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
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
10354: x_msg_count => l_msg_count,
10355: x_return_status => l_return_status);
10356:
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;
10355: x_return_status => l_return_status);
10356:
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 ;
10356:
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:
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;
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
10395: x_msg_count => l_msg_count,
10396: x_return_status => l_return_status);
10397:
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;
10396: x_return_status => l_return_status);
10397:
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 ;
10397:
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
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
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;
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
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
10450: x_msg_count => l_msg_count,
10451: x_return_status => l_return_status);
10452:
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;
10451: x_return_status => l_return_status);
10452:
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 ;
10452:
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);
10481: x_msg_count => l_msg_count,
10482: x_return_status => l_return_status);
10483:
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;
10482: x_return_status => l_return_status);
10483:
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 ;
10483:
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:
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;
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
10546: x_msg_count => l_msg_count,
10547: x_return_status => l_return_status);
10548:
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;
10547: x_return_status => l_return_status);
10548:
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 ;
10548:
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:
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;
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
10588: x_msg_count => l_msg_count,
10589: x_return_status => l_return_status);
10590:
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;
10589: x_return_status => l_return_status);
10590:
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 ;
10590:
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
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;
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
10636: x_msg_count => l_msg_count,
10637: x_return_status => l_return_status);
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 ;
10637: x_return_status => l_return_status);
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:
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;
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
10676: x_msg_count => l_msg_count,
10677: x_return_status => l_return_status);
10678:
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;
10677: x_return_status => l_return_status);
10678:
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 ;
10678:
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
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
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;
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
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
10714: x_msg_count => l_msg_count,
10715: x_return_status => l_return_status);
10716:
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;
10715: x_return_status => l_return_status);
10716:
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 ;
10716:
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
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
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;
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
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
10787:
10788: --DBMS_OUTPUT.PUT_LINE('l_rate '||l_rate);
10789:
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;
10788: --DBMS_OUTPUT.PUT_LINE('l_rate '||l_rate);
10789:
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;
10789:
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
10805: --this should be an error because what comes in must mastch the derived currency code
10806: --RAISE FND_API.G_EXC_ERROR;
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
10806: --RAISE FND_API.G_EXC_ERROR;
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
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
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
11947:
11948: IF l_curr_in_conversion_list = 'Y' AND
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;
11948: IF l_curr_in_conversion_list = 'Y' AND
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;
12004: X_MSG_COUNT => l_msg_count,
12005: X_MSG_DATA => l_msg_data);
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;
12005: X_MSG_DATA => l_msg_data);
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:
12048: x_charges_detail_rec.billing_flag IN ('E','M', 'L') AND
12049: p_charges_detail_rec.after_warranty_cost IS NULL AND
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;
12049: p_charges_detail_rec.after_warranty_cost IS NULL AND
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:
12205: --DBMS_OUTPUT.PUT_LINE('After calling CS_Pricing_Item_Pkg.Call_Pricing_Item ...');
12206: --DBMS_OUTPUT.PUT_LINE('l_msg_data '||l_msg_data);
12207:
12208: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
12209: FND_MESSAGE.Set_Name('CS', 'CS_CHG_API_PRICING_ITEM_ERROR');
12210: FND_MESSAGE.set_token('INV_ID', x_charges_detail_rec.inventory_item_id_in);
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);
12206: --DBMS_OUTPUT.PUT_LINE('l_msg_data '||l_msg_data);
12207:
12208: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
12209: FND_MESSAGE.Set_Name('CS', 'CS_CHG_API_PRICING_ITEM_ERROR');
12210: FND_MESSAGE.set_token('INV_ID', x_charges_detail_rec.inventory_item_id_in);
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);
12207:
12208: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
12209: FND_MESSAGE.Set_Name('CS', 'CS_CHG_API_PRICING_ITEM_ERROR');
12210: FND_MESSAGE.set_token('INV_ID', x_charges_detail_rec.inventory_item_id_in);
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;
12208: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
12209: FND_MESSAGE.Set_Name('CS', 'CS_CHG_API_PRICING_ITEM_ERROR');
12210: FND_MESSAGE.set_token('INV_ID', x_charges_detail_rec.inventory_item_id_in);
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;
12209: FND_MESSAGE.Set_Name('CS', 'CS_CHG_API_PRICING_ITEM_ERROR');
12210: FND_MESSAGE.set_token('INV_ID', x_charges_detail_rec.inventory_item_id_in);
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;
12210: FND_MESSAGE.set_token('INV_ID', x_charges_detail_rec.inventory_item_id_in);
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:
12297: X_MSG_COUNT => l_msg_count,
12298: X_MSG_DATA => l_msg_data);
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;
12298: X_MSG_DATA => l_msg_data);
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:
12359: p_charges_detail_rec.after_warranty_cost IS NOT NULL THEN
12360:
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;
12360:
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;
12444: X_MSG_COUNT => l_msg_count,
12445: X_MSG_DATA => l_msg_data);
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;
12445: X_MSG_DATA => l_msg_data);
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:
12485: p_charges_detail_rec.after_warranty_cost IS NOT NULL THEN
12486:
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;
12486:
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;
12627: --DBMS_OUTPUT.PUT_LINE('After calling CS_Pricing_Item_Pkg.Call_Pricing_Item ...');
12628: --DBMS_OUTPUT.PUT_LINE('l_msg_data '||l_msg_data);
12629:
12630: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
12631: FND_MESSAGE.Set_Name('CS', 'CS_CHG_API_PRICING_ITEM_ERROR');
12632: FND_MESSAGE.set_token('INV_ID', x_charges_detail_rec.inventory_item_id_in);
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);
12628: --DBMS_OUTPUT.PUT_LINE('l_msg_data '||l_msg_data);
12629:
12630: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
12631: FND_MESSAGE.Set_Name('CS', 'CS_CHG_API_PRICING_ITEM_ERROR');
12632: FND_MESSAGE.set_token('INV_ID', x_charges_detail_rec.inventory_item_id_in);
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);
12629:
12630: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
12631: FND_MESSAGE.Set_Name('CS', 'CS_CHG_API_PRICING_ITEM_ERROR');
12632: FND_MESSAGE.set_token('INV_ID', x_charges_detail_rec.inventory_item_id_in);
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;
12630: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
12631: FND_MESSAGE.Set_Name('CS', 'CS_CHG_API_PRICING_ITEM_ERROR');
12632: FND_MESSAGE.set_token('INV_ID', x_charges_detail_rec.inventory_item_id_in);
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;
12631: FND_MESSAGE.Set_Name('CS', 'CS_CHG_API_PRICING_ITEM_ERROR');
12632: FND_MESSAGE.set_token('INV_ID', x_charges_detail_rec.inventory_item_id_in);
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;
12632: FND_MESSAGE.set_token('INV_ID', x_charges_detail_rec.inventory_item_id_in);
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;
12713: X_MSG_COUNT => l_msg_count,
12714: X_MSG_DATA => l_msg_data);
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;
12714: X_MSG_DATA => l_msg_data);
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:
12759: End If;
12760: ELSIF p_validation_mode = 'U' THEN
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;
12760: ELSIF p_validation_mode = 'U' THEN
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');
12831: X_MSG_COUNT => l_msg_count,
12832: X_MSG_DATA => l_msg_data);
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;
12832: X_MSG_DATA => l_msg_data);
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:
12912: X_MSG_COUNT => l_msg_count,
12913: X_MSG_DATA => l_msg_data);
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;
12913: X_MSG_DATA => l_msg_data);
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:
12962: p_charges_detail_rec.after_warranty_cost IS NULL) AND
12963: (p_charges_detail_rec.list_price = FND_API.G_MISS_NUM OR
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;
12963: (p_charges_detail_rec.list_price = FND_API.G_MISS_NUM OR
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:
13109: --DBMS_OUTPUT.PUT_LINE('After calling CS_Pricing_Item_Pkg.Call_Pricing_Item ...');
13110: --DBMS_OUTPUT.PUT_LINE('l_msg_data '||l_msg_data);
13111:
13112: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
13113: FND_MESSAGE.Set_Name('CS', 'CS_CHG_API_PRICING_ITEM_ERROR');
13114: FND_MESSAGE.set_token('INV_ID', x_charges_detail_rec.inventory_item_id_in);
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);
13110: --DBMS_OUTPUT.PUT_LINE('l_msg_data '||l_msg_data);
13111:
13112: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
13113: FND_MESSAGE.Set_Name('CS', 'CS_CHG_API_PRICING_ITEM_ERROR');
13114: FND_MESSAGE.set_token('INV_ID', x_charges_detail_rec.inventory_item_id_in);
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);
13111:
13112: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
13113: FND_MESSAGE.Set_Name('CS', 'CS_CHG_API_PRICING_ITEM_ERROR');
13114: FND_MESSAGE.set_token('INV_ID', x_charges_detail_rec.inventory_item_id_in);
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;
13112: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
13113: FND_MESSAGE.Set_Name('CS', 'CS_CHG_API_PRICING_ITEM_ERROR');
13114: FND_MESSAGE.set_token('INV_ID', x_charges_detail_rec.inventory_item_id_in);
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;
13113: FND_MESSAGE.Set_Name('CS', 'CS_CHG_API_PRICING_ITEM_ERROR');
13114: FND_MESSAGE.set_token('INV_ID', x_charges_detail_rec.inventory_item_id_in);
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;
13114: FND_MESSAGE.set_token('INV_ID', x_charges_detail_rec.inventory_item_id_in);
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:
13195: X_MSG_COUNT => l_msg_count,
13196: X_MSG_DATA => l_msg_data);
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;
13196: X_MSG_DATA => l_msg_data);
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:
13317: X_MSG_COUNT => l_msg_count,
13318: X_MSG_DATA => l_msg_data);
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;
13318: X_MSG_DATA => l_msg_data);
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:
13361: p_charges_detail_rec.after_warranty_cost IS NOT NULL THEN
13362:
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;
13362:
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;
13508: --DBMS_OUTPUT.PUT_LINE('After calling CS_Pricing_Item_Pkg.Call_Pricing_Item ...');
13509: --DBMS_OUTPUT.PUT_LINE('l_msg_data '||l_msg_data);
13510:
13511: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
13512: FND_MESSAGE.Set_Name('CS', 'CS_CHG_API_PRICING_ITEM_ERROR');
13513: FND_MESSAGE.set_token('INV_ID', x_charges_detail_rec.inventory_item_id_in);
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);
13509: --DBMS_OUTPUT.PUT_LINE('l_msg_data '||l_msg_data);
13510:
13511: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
13512: FND_MESSAGE.Set_Name('CS', 'CS_CHG_API_PRICING_ITEM_ERROR');
13513: FND_MESSAGE.set_token('INV_ID', x_charges_detail_rec.inventory_item_id_in);
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);
13510:
13511: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
13512: FND_MESSAGE.Set_Name('CS', 'CS_CHG_API_PRICING_ITEM_ERROR');
13513: FND_MESSAGE.set_token('INV_ID', x_charges_detail_rec.inventory_item_id_in);
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;
13511: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
13512: FND_MESSAGE.Set_Name('CS', 'CS_CHG_API_PRICING_ITEM_ERROR');
13513: FND_MESSAGE.set_token('INV_ID', x_charges_detail_rec.inventory_item_id_in);
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;
13512: FND_MESSAGE.Set_Name('CS', 'CS_CHG_API_PRICING_ITEM_ERROR');
13513: FND_MESSAGE.set_token('INV_ID', x_charges_detail_rec.inventory_item_id_in);
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;
13513: FND_MESSAGE.set_token('INV_ID', x_charges_detail_rec.inventory_item_id_in);
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;
13598: X_MSG_COUNT => l_msg_count,
13599: X_MSG_DATA => l_msg_data);
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;
13599: X_MSG_DATA => l_msg_data);
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:
13697: X_MSG_COUNT => l_msg_count,
13698: X_MSG_DATA => l_msg_data);
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;
13698: X_MSG_DATA => l_msg_data);
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:
13779: RAISE FND_API.G_EXC_ERROR;
13780: END IF;
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;
13780: END IF;
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:
13811: RAISE FND_API.G_EXC_ERROR;
13812: 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;
13812: 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:
13850: Fetch c_sub_inventory into l_sub_inv_exists;
13851: If c_sub_inventory%FOUND Then
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;
13851: If c_sub_inventory%FOUND Then
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
13936: End If;
13937: End Loop;
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;
13937: End Loop;
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:
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
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;
13944: end if;
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
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');
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;
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');
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'
13991: If p_charges_detail_rec.shipping_method is not null and p_charges_detail_rec.shipping_method <> FND_API.G_MISS_CHAR Then
13992: If l_shipping_method_code = p_charges_detail_rec.shipping_method Then
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;
13992: If l_shipping_method_code = p_charges_detail_rec.shipping_method Then
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
14004: If p_charges_detail_rec.arrival_date_time is not Null and p_charges_detail_rec.arrival_date_time <> FND_API.G_MISS_DATE Then
14005: If trunc(l_arrival_date) = trunc(p_charges_detail_rec.arrival_date_time) then
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;
14005: If trunc(l_arrival_date) = trunc(p_charges_detail_rec.arrival_date_time) then
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
14021: End If;
14022:
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
14022:
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; */
14043: Fetch c_sub_inventory into l_sub_inv_exists;
14044: If c_sub_inventory%FOUND Then
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;
14044: If c_sub_inventory%FOUND Then
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;
14136:
14137: End Loop;
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;
14137: End Loop;
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:
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
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;
14144: end if;
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
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');
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;
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');
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:
14205: x_charges_detail_rec.transaction_sub_inventory := x_subinventory_code;
14206: END IF;
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;
14206: END IF;
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;
14252: x_charges_detail_rec.transaction_sub_inventory := x_subinventory_code;
14253: END IF;
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;
14253: END IF;
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;
14285: --to OM if add to order flag = 'Y'
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:
14304:
14305: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
14306:
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;
14305: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
14306:
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
14306:
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:
14337:
14338: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
14339:
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;
14338: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
14339:
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:
14339:
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
14381: x_msg_data => l_msg_data);
14382:
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
14382:
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;
14394: IF l_db_det_rec.order_header_id IS NOT NULL THEN
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
14401: END IF;
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:
14425:
14426: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
14427:
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;
14426: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
14427:
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:
14427:
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
14452:
14453: --cannot add to order
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;
14453: --cannot add to order
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;
14701: x_charges_detail_rec.project_id := null;
14702: x_charges_detail_rec.project_task_id := null;
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
14702: x_charges_detail_rec.project_task_id := null;
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;
14717: x_charges_detail_rec.project_id := null;
14718: x_charges_detail_rec.project_task_id := null;
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
14718: x_charges_detail_rec.project_task_id := null;
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;
14733: x_charges_detail_rec.project_task_id := null;
14734: x_charges_detail_rec.expenditure_org_id := null;
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:
14734: x_charges_detail_rec.expenditure_org_id := null;
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
14750: x_charges_detail_rec.project_task_id := null;
14751: x_charges_detail_rec.expenditure_org_id := null;
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:
14751: x_charges_detail_rec.expenditure_org_id := null;
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
14784:
14785: EXCEPTION
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;
14785: EXCEPTION
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;
14798: RAISE FND_API.G_EXC_ERROR;
14799: End if;
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:
14799: End if;
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
14814: x_charges_detail_rec.project_id :=null;
14815: x_charges_detail_rec.project_task_id :=null;
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;
14815: x_charges_detail_rec.project_task_id :=null;
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
14862:
14863:
14864: WHEN OTHERS THEN
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
14863:
14864: WHEN OTHERS THEN
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);
14864: WHEN OTHERS THEN
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 ;
15086: IF v_txn_type.line_order_category_code = 'RETURN' THEN
15087: IF v_txn_type.src_change_owner_to_code = 'E' THEN
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;
15087: IF v_txn_type.src_change_owner_to_code = 'E' THEN
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
15097: IF v_txn_type.non_src_change_owner_to_code = 'E' 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;
15097: IF v_txn_type.non_src_change_owner_to_code = 'E' 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;
15128:
15129:
15130:
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:
15129:
15130:
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;
15130:
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:
15147:
15148:
15149: WHEN OTHERS THEN
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:
15148:
15149: WHEN OTHERS THEN
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(
15149: WHEN OTHERS THEN
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
15213:
15214: -- IF NOT (NVL(v_get_inv_item.contract_item_type_code, 'N') = 'N') THEN
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;
15214: -- IF NOT (NVL(v_get_inv_item.contract_item_type_code, 'N') = 'N') THEN
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:
15245: --DBMS_OUTPUT.PUT_LINE('lv_exists_flag '||lv_exists_flag);
15246:
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;
15246:
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:
15261: ,p_data => x_msg_data);
15262:
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
15262:
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);
15318: END LOOP;
15319:
15320: IF lv_exists_flag <> 'Y' THEN
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;
15319:
15320: IF lv_exists_flag <> 'Y' THEN
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;
15320: IF lv_exists_flag <> 'Y' THEN
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:
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(
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
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);
15387:
15388: IF lv_exists_flag <> 'Y' THEN
15389: --RAISE FND_API.G_EXC_ERROR;
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;
15388: IF lv_exists_flag <> 'Y' THEN
15389: --RAISE FND_API.G_EXC_ERROR;
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;
15389: --RAISE FND_API.G_EXC_ERROR;
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:
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(
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
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);
15447: EXCEPTION
15448:
15449: WHEN OTHERS THEN
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(
15448:
15449: WHEN OTHERS THEN
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
15449: WHEN OTHERS THEN
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);
15490:
15491: IF lv_exists_flag = 'N' THEN
15492: --RAISE FND_API.G_EXC_ERROR;
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;
15491: IF lv_exists_flag = 'N' THEN
15492: --RAISE FND_API.G_EXC_ERROR;
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;
15492: --RAISE FND_API.G_EXC_ERROR;
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:
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(
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
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);
15575:
15576: IF lv_exists_flag <> 'Y' THEN
15577: --RAISE FND_API.G_EXC_ERROR;
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;
15576: IF lv_exists_flag <> 'Y' THEN
15577: --RAISE FND_API.G_EXC_ERROR;
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;
15577: --RAISE FND_API.G_EXC_ERROR;
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:
15598:
15599: IF lv_exists_flag <> 'Y' THEN
15600: --RAISE FND_API.G_EXC_ERROR;
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;
15599: IF lv_exists_flag <> 'Y' THEN
15600: --RAISE FND_API.G_EXC_ERROR;
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;
15600: --RAISE FND_API.G_EXC_ERROR;
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:
15621:
15622: IF lv_exists_flag <> 'Y' THEN
15623: --RAISE FND_API.G_EXC_ERROR;
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;
15622: IF lv_exists_flag <> 'Y' THEN
15623: --RAISE FND_API.G_EXC_ERROR;
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;
15623: --RAISE FND_API.G_EXC_ERROR;
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:
15645:
15646: IF lv_exists_flag <> 'Y' THEN
15647: --RAISE FND_API.G_EXC_ERROR;
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;
15646: IF lv_exists_flag <> 'Y' THEN
15647: --RAISE FND_API.G_EXC_ERROR;
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;
15647: --RAISE FND_API.G_EXC_ERROR;
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
15688: --l_ERRM := SQLERRM;
15689: --DBMS_OUTPUT.PUT_LINE('Others Validate Source ' ||l_errm);
15690: --x_return_status := FND_API.G_RET_STS_ERROR ;
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(
15689: --DBMS_OUTPUT.PUT_LINE('Others Validate Source ' ||l_errm);
15690: --x_return_status := FND_API.G_RET_STS_ERROR ;
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
15690: --x_return_status := FND_API.G_RET_STS_ERROR ;
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);
15755:
15756: IF lv_exists_flag = 'N' THEN
15757: --RAISE FND_API.G_EXC_ERROR;
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;
15756: IF lv_exists_flag = 'N' THEN
15757: --RAISE FND_API.G_EXC_ERROR;
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;
15757: --RAISE FND_API.G_EXC_ERROR;
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:
15769: x_return_status := FND_API.G_RET_STS_ERROR;
15770:
15771: WHEN OTHERS THEN
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:
15770:
15771: WHEN OTHERS THEN
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;
15771: WHEN OTHERS THEN
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:
15856: EXCEPTION
15857:
15858: WHEN OTHERS THEN
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(
15857:
15858: WHEN OTHERS THEN
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
15858: WHEN OTHERS THEN
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);
15898:
15899: IF lv_exists_flag <> 'Y' THEN
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;
15899: IF lv_exists_flag <> 'Y' THEN
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
15922: ,p_data => x_msg_data);
15923:
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
15923:
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);
15975: END IF;
15976:
15977: IF p_from_currency IS NULL THEN
15978: -- return error
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;
15976:
15977: IF p_from_currency IS NULL THEN
15978: -- return error
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;
15977: IF p_from_currency IS NULL THEN
15978: -- return error
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;
15978: -- return error
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:
15985: END IF;
15986:
15987: IF p_to_currency IS NULL THEN
15988: -- return error
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;
15986:
15987: IF p_to_currency IS NULL THEN
15988: -- return error
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;
15987: IF p_to_currency IS NULL THEN
15988: -- return error
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;
15988: -- return error
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:
15996:
15997: IF ((l_conversion_type IS NULL) OR
15998: (l_max_roll_days IS NULL)) THEN
15999: -- return error
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;
15997: IF ((l_conversion_type IS NULL) OR
15998: (l_max_roll_days IS NULL)) THEN
15999: -- return error
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;
15998: (l_max_roll_days IS NULL)) THEN
15999: -- return error
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;
15999: -- return error
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:
16019: x_rate => lx_rate );
16020:
16021: IF lx_rate IS NULL THEN
16022: --RAISE FND_API.g_exc_error;
16023: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_CONV_RATE_NOT_FOUND');
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);
16020:
16021: IF lx_rate IS NULL THEN
16022: --RAISE FND_API.g_exc_error;
16023: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_CONV_RATE_NOT_FOUND');
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;
16021: IF lx_rate IS NULL THEN
16022: --RAISE FND_API.g_exc_error;
16023: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_CONV_RATE_NOT_FOUND');
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;
16022: --RAISE FND_API.g_exc_error;
16023: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_CONV_RATE_NOT_FOUND');
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
16023: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_CONV_RATE_NOT_FOUND');
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;
16040: x_return_status := fnd_api.g_ret_sts_error;
16041:
16042: WHEN OTHERS THEN
16043: x_return_status := FND_API.G_RET_STS_ERROR;
16044: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_CONV_RATE_NOT_FOUND');
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);
16041:
16042: WHEN OTHERS THEN
16043: x_return_status := FND_API.G_RET_STS_ERROR;
16044: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_CONV_RATE_NOT_FOUND');
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;
16042: WHEN OTHERS THEN
16043: x_return_status := FND_API.G_RET_STS_ERROR;
16044: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_CONV_RATE_NOT_FOUND');
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:
16043: x_return_status := FND_API.G_RET_STS_ERROR;
16044: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_CONV_RATE_NOT_FOUND');
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;
16044: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_CONV_RATE_NOT_FOUND');
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:
16161: END IF;
16162: ELSE
16163: --RAISE FND_API.G_EXC_ERROR;
16164: --null;
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;
16162: ELSE
16163: --RAISE FND_API.G_EXC_ERROR;
16164: --null;
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;
16163: --RAISE FND_API.G_EXC_ERROR;
16164: --null;
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;
16164: --null;
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:
16222: p_token_an => p_api_name);
16223:
16224: WHEN OTHERS 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(
16223:
16224: WHEN OTHERS 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
16224: WHEN OTHERS 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);
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);
16385: FND_MSG_PUB.Add;
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);
16385: FND_MSG_PUB.Add;
16386:
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);
16385: FND_MSG_PUB.Add;
16386:
16387: END IF;
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);
16385: FND_MSG_PUB.Add;
16386:
16387: END IF;
16388:
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);
16409: FND_MSG_PUB.Add;
16410:
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);
16409: FND_MSG_PUB.Add;
16410:
16411: END IF;
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);
16409: FND_MSG_PUB.Add;
16410:
16411: END IF;
16412:
16419: ( p_token_an IN VARCHAR2
16420: )
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:
16420: )
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:
16434: p_token_cn IN VARCHAR2,
16435: p_token_v IN VARCHAR2
16436: ) IS
16437: BEGIN
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;
16435: p_token_v IN VARCHAR2
16436: ) IS
16437: BEGIN
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;
16436: ) IS
16437: BEGIN
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:
16437: BEGIN
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:
16454: IS
16455:
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:
16455:
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:
16554: FETCH get_line_type_csr
16555: INTO x_line_type_id;
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;
16555: INTO x_line_type_id;
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;
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;
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(
16577: ,p_data => x_msg_data);
16578: WHEN OTHERS THEN
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
16578: WHEN OTHERS THEN
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);
16701: FETCH order_csr
16702: INTO l_order_header_id, l_open_flag;
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;
16702: INTO l_order_header_id, l_open_flag;
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:
16712: --Bug Fix for Bug # 3085106
16713:
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;
16712: --Bug Fix for Bug # 3085106
16713:
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;
16713:
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:
16728: p_count => x_msg_count
16729: ,p_data => x_msg_data);
16730:
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(
16729: ,p_data => x_msg_data);
16730:
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
16730:
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);
16868: , 'p_object_type has to be SR.'
16869: );
16870: END IF ;
16871:
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;
16869: );
16870: END IF ;
16871:
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:
16870: END IF ;
16871:
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;
16871:
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;
16891: , 'p_processing_set_id should not be NULL.'
16892: );
16893: END IF ;
16894:
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;
16892: );
16893: END IF ;
16894:
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:
16893: END IF ;
16894:
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;
16894:
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;
16985: END IF ;
16986:
16987: WHEN OTHERS THEN
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:
16986:
16987: WHEN OTHERS THEN
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
16987: WHEN OTHERS THEN
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
17134: , 'p_object_type has to be SR.'
17135: );
17136: END IF ;
17137:
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;
17135: );
17136: END IF ;
17137:
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:
17136: END IF ;
17137:
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;
17137:
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;
17157: , 'p_processing_set_id should not be NULL.'
17158: );
17159: END IF ;
17160:
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;
17158: );
17159: END IF ;
17160:
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:
17159: END IF ;
17160:
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;
17160:
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;
17239: END IF ;
17240:
17241: WHEN OTHERS THEN
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:
17240:
17241: WHEN OTHERS THEN
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
17241: WHEN OTHERS THEN
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