119: x_msg_data => x_msg_data
120: );
121:
122: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
123: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_CREATE_MSITE_PRTY_FL');
124: FND_MSG_PUB.Add;
125: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
126: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
127: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_CREATE_MSITE_PRTY_FL');
123: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_CREATE_MSITE_PRTY_FL');
124: FND_MSG_PUB.Add;
125: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
126: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
127: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_CREATE_MSITE_PRTY_FL');
128: FND_MSG_PUB.Add;
129: RAISE FND_API.G_EXC_ERROR;
130: END IF;
131:
163: p_encoded => 'F');
164:
165: WHEN OTHERS THEN
166: ROLLBACK TO Associate_Parties_To_Msite_Pvt;
167: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
168: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
169: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
170: FND_MESSAGE.Set_Token('REASON', SQLERRM);
171: FND_MSG_PUB.Add;
164:
165: WHEN OTHERS THEN
166: ROLLBACK TO Associate_Parties_To_Msite_Pvt;
167: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
168: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
169: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
170: FND_MESSAGE.Set_Token('REASON', SQLERRM);
171: FND_MSG_PUB.Add;
172: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
165: WHEN OTHERS THEN
166: ROLLBACK TO Associate_Parties_To_Msite_Pvt;
167: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
168: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
169: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
170: FND_MESSAGE.Set_Token('REASON', SQLERRM);
171: FND_MSG_PUB.Add;
172: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
173:
166: ROLLBACK TO Associate_Parties_To_Msite_Pvt;
167: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
168: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
169: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
170: FND_MESSAGE.Set_Token('REASON', SQLERRM);
171: FND_MSG_PUB.Add;
172: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
173:
174: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
252: x_msg_data => x_msg_data
253: );
254:
255: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
256: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_DELETE_MSITE_PRTY_FL');
257: FND_MSG_PUB.Add;
258: RAISE FND_API.G_EXC_ERROR;
259: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
260: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_DELETE_MSITE_PRTY_FL');
256: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_DELETE_MSITE_PRTY_FL');
257: FND_MSG_PUB.Add;
258: RAISE FND_API.G_EXC_ERROR;
259: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
260: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_DELETE_MSITE_PRTY_FL');
261: FND_MSG_PUB.Add;
262: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
263: END IF;
264:
281: x_msg_data => x_msg_data
282: );
283:
284: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
285: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_UPDATE_MSITE_PRTY_FL');
286: FND_MSG_PUB.Add;
287: RAISE FND_API.G_EXC_ERROR;
288: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
289: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_UPDATE_MSITE_PRTY_FL');
285: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_UPDATE_MSITE_PRTY_FL');
286: FND_MSG_PUB.Add;
287: RAISE FND_API.G_EXC_ERROR;
288: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
289: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_UPDATE_MSITE_PRTY_FL');
290: FND_MSG_PUB.Add;
291: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
292: END IF;
293:
301: -- Check for validity of party access code
302: IF ((p_party_access_code IS NULL) OR
303: (p_party_access_code = FND_API.G_MISS_CHAR))
304: THEN
305: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INVLD_PRTY_ACSS_CODE');
306: FND_MSG_PUB.Add;
307: RAISE FND_API.G_EXC_ERROR;
308: END IF;
309:
312: SET party_access_code = p_party_access_code
313: WHERE msite_id = p_msite_id;
314: EXCEPTION
315: WHEN OTHERS THEN
316: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
317: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
318: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
319: FND_MESSAGE.Set_Token('REASON', SQLERRM);
320: FND_MSG_PUB.Add;
313: WHERE msite_id = p_msite_id;
314: EXCEPTION
315: WHEN OTHERS THEN
316: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
317: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
318: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
319: FND_MESSAGE.Set_Token('REASON', SQLERRM);
320: FND_MSG_PUB.Add;
321:
314: EXCEPTION
315: WHEN OTHERS THEN
316: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
317: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
318: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
319: FND_MESSAGE.Set_Token('REASON', SQLERRM);
320: FND_MSG_PUB.Add;
321:
322: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_PRTY_ACCSS_CODE_FAIL');
315: WHEN OTHERS THEN
316: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
317: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
318: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
319: FND_MESSAGE.Set_Token('REASON', SQLERRM);
320: FND_MSG_PUB.Add;
321:
322: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_PRTY_ACCSS_CODE_FAIL');
323: FND_MESSAGE.Set_Token('PARTY_ACCESS_CODE', p_party_access_code);
318: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
319: FND_MESSAGE.Set_Token('REASON', SQLERRM);
320: FND_MSG_PUB.Add;
321:
322: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_PRTY_ACCSS_CODE_FAIL');
323: FND_MESSAGE.Set_Token('PARTY_ACCESS_CODE', p_party_access_code);
324: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
325: FND_MSG_PUB.Add;
326: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
319: FND_MESSAGE.Set_Token('REASON', SQLERRM);
320: FND_MSG_PUB.Add;
321:
322: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_PRTY_ACCSS_CODE_FAIL');
323: FND_MESSAGE.Set_Token('PARTY_ACCESS_CODE', p_party_access_code);
324: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
325: FND_MSG_PUB.Add;
326: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
327: END;
320: FND_MSG_PUB.Add;
321:
322: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_PRTY_ACCSS_CODE_FAIL');
323: FND_MESSAGE.Set_Token('PARTY_ACCESS_CODE', p_party_access_code);
324: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
325: FND_MSG_PUB.Add;
326: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
327: END;
328: