75: END IF;
76: IF (g_log_to_file = 'N') THEN
77: Pvx_Utility_Pvt.debug_message(p_msg_string);
78: ELSIF (g_log_to_file = 'Y') THEN
79: FND_MESSAGE.Set_Name('PV', p_msg_type);
80: FND_MESSAGE.Set_Token('TEXT', p_msg_string);
81: FND_FILE.PUT_LINE( FND_FILE.LOG, fnd_message.get );
82: END IF;
83: END Debug_Log;
76: IF (g_log_to_file = 'N') THEN
77: Pvx_Utility_Pvt.debug_message(p_msg_string);
78: ELSIF (g_log_to_file = 'Y') THEN
79: FND_MESSAGE.Set_Name('PV', p_msg_type);
80: FND_MESSAGE.Set_Token('TEXT', p_msg_string);
81: FND_FILE.PUT_LINE( FND_FILE.LOG, fnd_message.get );
82: END IF;
83: END Debug_Log;
84:
77: Pvx_Utility_Pvt.debug_message(p_msg_string);
78: ELSIF (g_log_to_file = 'Y') THEN
79: FND_MESSAGE.Set_Name('PV', p_msg_type);
80: FND_MESSAGE.Set_Token('TEXT', p_msg_string);
81: FND_FILE.PUT_LINE( FND_FILE.LOG, fnd_message.get );
82: END IF;
83: END Debug_Log;
84:
85: /*****************************
464: -- Initialize API return status to SUCCESS
465: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
466:
467: IF (p_user_id is null) THEN
468: FND_MESSAGE.SET_NAME ('PV', 'PV_USER_ID_NULL');
469: FND_MSG_PUB.ADD;
470: raise FND_API.G_EXC_ERROR;
471: END IF;
472:
470: raise FND_API.G_EXC_ERROR;
471: END IF;
472:
473: IF (p_resp_id is null) THEN
474: FND_MESSAGE.SET_NAME ('PV', 'PV_RESP_ID_NULL');
475: FND_MSG_PUB.ADD;
476: raise FND_API.G_EXC_ERROR;
477: END IF;
478:
476: raise FND_API.G_EXC_ERROR;
477: END IF;
478:
479: IF (p_app_id is null) THEN
480: FND_MESSAGE.SET_NAME ('PV', 'PV_APPL_ID_NULL');
481: FND_MSG_PUB.ADD;
482: raise FND_API.G_EXC_ERROR;
483: END IF;
484:
856: END IF;
857: END LOOP;
858:
859: IF((not is_partner_user) and (not is_primary_user)) THEN
860: FND_MESSAGE.SET_NAME ('PV', 'PV_NOT_VALID_PARTNER_USER');
861: FND_MSG_PUB.ADD;
862: raise FND_API.G_EXC_ERROR;
863: ELSIF (is_primary_user) THEN
864: x_user_role_code := G_PRIMARY;
984: x_responsibility_id := x.responsibility_id;
985: x_resp_map_rule_id := x.resp_map_rule_id;
986: END LOOP;
987: IF ((x_responsibility_id is null) or (x_resp_map_rule_id is null)) THEN
988: FND_MESSAGE.set_name('PV', 'PV_NO_DEFLT_RESP');
989: FND_MSG_PUB.add;
990: RAISE FND_API.G_EXC_ERROR;
991: END IF;
992: ELSE
1180: x_responsibility_id := x.responsibility_id;
1181: x_resp_map_rule_id := x.resp_map_rule_id;
1182: END LOOP;
1183: IF ((x_responsibility_id is null) or (x_resp_map_rule_id is null)) THEN
1184: FND_MESSAGE.set_name('PV', 'PV_NO_DEFLT_RESP');
1185: FND_MSG_PUB.add;
1186: RAISE FND_API.G_EXC_ERROR;
1187: END IF;
1188: ELSE
1848: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1849: RAISE FND_API.G_EXC_ERROR;
1850: END IF;
1851: ELSE
1852: FND_MESSAGE.set_name('PV', 'PV_NO_DEFAULT_RESP');
1853: FND_MSG_PUB.add;
1854: RAISE FND_API.G_EXC_ERROR;
1855: END IF;
1856:
2137:
2138: l_partner_ids_tbl := get_partners(p_user_id);
2139:
2140: IF (l_partner_ids_tbl.count = 0) THEN
2141: FND_MESSAGE.set_name('PV', 'PV_INVALID_PTNR_USER');
2142: FND_MSG_PUB.add;
2143: RAISE FND_API.G_EXC_ERROR;
2144: END IF;
2145:
2587:
2588: l_partner_ids_tbl := get_partners(p_user_id);
2589:
2590: IF (l_partner_ids_tbl.count = 0) THEN
2591: FND_MESSAGE.set_name('PV', 'PV_INVALID_PTNR_USER');
2592: FND_MSG_PUB.add;
2593: RAISE FND_API.G_EXC_ERROR;
2594: END IF;
2595:
5003:
5004: l_partner_ids_tbl := get_partners(p_user_id);
5005:
5006: IF (l_partner_ids_tbl.count = 0) THEN
5007: FND_MESSAGE.set_name('PV', 'PV_INVALID_PTNR_USER');
5008: FND_MSG_PUB.add;
5009: RAISE FND_API.G_EXC_ERROR;
5010: END IF;
5011:
5284: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
5285:
5286: IF (p_resp_map_rule_id is null) THEN
5287: x_return_status := FND_API.G_RET_STS_ERROR;
5288: FND_MESSAGE.set_name('PV', 'PV_NO_RESP_MAP_RULE_ID');
5289: FND_MSG_PUB.add;
5290: RAISE FND_API.G_EXC_ERROR;
5291: END IF;
5292:
5291: END IF;
5292:
5293: IF (p_resp_id is null) THEN
5294: x_return_status := FND_API.G_RET_STS_ERROR;
5295: FND_MESSAGE.set_name('PV', 'PV_NO_RESP_ID');
5296: FND_MSG_PUB.add;
5297: RAISE FND_API.G_EXC_ERROR;
5298: END IF;
5299:
5298: END IF;
5299:
5300: IF (p_program_id is null) THEN
5301: x_return_status := FND_API.G_RET_STS_ERROR;
5302: FND_MESSAGE.set_name('PV', 'PV_NO_PROGRAM_ID');
5303: FND_MSG_PUB.add;
5304: RAISE FND_API.G_EXC_ERROR;
5305: END IF;
5306:
5508: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
5509:
5510: IF (p_resp_map_rule_id is null) THEN
5511: x_return_status := FND_API.G_RET_STS_ERROR;
5512: FND_MESSAGE.set_name('PV', 'PV_NO_RESP_MAP_RULE_ID');
5513: FND_MSG_PUB.add;
5514: RAISE FND_API.G_EXC_ERROR;
5515: END IF;
5516:
5851: ,p_ge_ptnr_resps_rec => l_ge_ptnr_resps_rec
5852: ,x_ptnr_resp_id => l_ptnr_resp_id
5853: );
5854: ELSE
5855: FND_MESSAGE.set_name('PV', 'PV_NO_DEFAULT_RESP');
5856: FND_MSG_PUB.add;
5857: RAISE FND_API.G_EXC_ERROR;
5858: END IF;
5859:
5926: ,p_ge_ptnr_resps_rec => l_ge_ptnr_resps_rec
5927: ,x_ptnr_resp_id => l_ptnr_resp_id
5928: );
5929: ELSE
5930: FND_MESSAGE.set_name('PV', 'PV_NO_DEFAULT_RESP');
5931: FND_MSG_PUB.add;
5932: RAISE FND_API.G_EXC_ERROR;
5933: END IF;
5934:
6412: END IF;
6413: /*
6414: Pvx_Utility_Pvt.debug_message('g_log_to_file... = ' || g_log_to_file);
6415:
6416: FND_MESSAGE.set_name('PV', 'PV_DEBUG_MESSAGE');
6417: FND_MESSAGE.set_token('TEXT', g_log_to_file);
6418: FND_MSG_PUB.add;
6419: */
6420: -- Debug Message
6413: /*
6414: Pvx_Utility_Pvt.debug_message('g_log_to_file... = ' || g_log_to_file);
6415:
6416: FND_MESSAGE.set_name('PV', 'PV_DEBUG_MESSAGE');
6417: FND_MESSAGE.set_token('TEXT', g_log_to_file);
6418: FND_MSG_PUB.add;
6419: */
6420: -- Debug Message
6421: IF (PV_DEBUG_HIGH_ON) THEN
7276: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
7277: RAISE FND_API.G_EXC_ERROR;
7278: END IF;
7279: ELSE
7280: FND_MESSAGE.set_name('PV', 'PV_NO_DEFAULT_RESP');
7281: FND_MSG_PUB.add;
7282: RAISE FND_API.G_EXC_ERROR;
7283: END IF; -- End of IF (l_responsibility_id is not null) and (l_resp_map_rule_id is not null)
7284: END IF; -- End of IF (l_resp_exist = 'N')