116: x_msg_data => x_msg_data
117: );
118:
119: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
120: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_CREATE_MSITE_PRTY_FL');
121: FND_MSG_PUB.Add;
122: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
123: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
124: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_CREATE_MSITE_PRTY_FL');
120: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_CREATE_MSITE_PRTY_FL');
121: FND_MSG_PUB.Add;
122: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
123: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
124: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_CREATE_MSITE_PRTY_FL');
125: FND_MSG_PUB.Add;
126: RAISE FND_API.G_EXC_ERROR;
127: END IF;
128:
160: p_encoded => 'F');
161:
162: WHEN OTHERS THEN
163: ROLLBACK TO Associate_Parties_To_Msite_Pvt;
164: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
165: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
166: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
167: FND_MESSAGE.Set_Token('REASON', SQLERRM);
168: FND_MSG_PUB.Add;
161:
162: WHEN OTHERS THEN
163: ROLLBACK TO Associate_Parties_To_Msite_Pvt;
164: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
165: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
166: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
167: FND_MESSAGE.Set_Token('REASON', SQLERRM);
168: FND_MSG_PUB.Add;
169: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
162: WHEN OTHERS THEN
163: ROLLBACK TO Associate_Parties_To_Msite_Pvt;
164: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
165: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
166: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
167: FND_MESSAGE.Set_Token('REASON', SQLERRM);
168: FND_MSG_PUB.Add;
169: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
170:
163: ROLLBACK TO Associate_Parties_To_Msite_Pvt;
164: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
165: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
166: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
167: FND_MESSAGE.Set_Token('REASON', SQLERRM);
168: FND_MSG_PUB.Add;
169: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
170:
171: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
249: x_msg_data => x_msg_data
250: );
251:
252: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
253: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_DELETE_MSITE_PRTY_FL');
254: FND_MSG_PUB.Add;
255: RAISE FND_API.G_EXC_ERROR;
256: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
257: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_DELETE_MSITE_PRTY_FL');
253: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_DELETE_MSITE_PRTY_FL');
254: FND_MSG_PUB.Add;
255: RAISE FND_API.G_EXC_ERROR;
256: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
257: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_DELETE_MSITE_PRTY_FL');
258: FND_MSG_PUB.Add;
259: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
260: END IF;
261:
278: x_msg_data => x_msg_data
279: );
280:
281: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
282: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_UPDATE_MSITE_PRTY_FL');
283: FND_MSG_PUB.Add;
284: RAISE FND_API.G_EXC_ERROR;
285: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
286: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_UPDATE_MSITE_PRTY_FL');
282: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_UPDATE_MSITE_PRTY_FL');
283: FND_MSG_PUB.Add;
284: RAISE FND_API.G_EXC_ERROR;
285: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
286: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_UPDATE_MSITE_PRTY_FL');
287: FND_MSG_PUB.Add;
288: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
289: END IF;
290:
298: -- Check for validity of party access code
299: IF ((p_party_access_code IS NULL) OR
300: (p_party_access_code = FND_API.G_MISS_CHAR))
301: THEN
302: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_INVLD_PRTY_ACSS_CODE');
303: FND_MSG_PUB.Add;
304: RAISE FND_API.G_EXC_ERROR;
305: END IF;
306:
309: SET party_access_code = p_party_access_code
310: WHERE msite_id = p_msite_id;
311: EXCEPTION
312: WHEN OTHERS THEN
313: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
314: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
315: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
316: FND_MESSAGE.Set_Token('REASON', SQLERRM);
317: FND_MSG_PUB.Add;
310: WHERE msite_id = p_msite_id;
311: EXCEPTION
312: WHEN OTHERS THEN
313: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
314: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
315: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
316: FND_MESSAGE.Set_Token('REASON', SQLERRM);
317: FND_MSG_PUB.Add;
318:
311: EXCEPTION
312: WHEN OTHERS THEN
313: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
314: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
315: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
316: FND_MESSAGE.Set_Token('REASON', SQLERRM);
317: FND_MSG_PUB.Add;
318:
319: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_PRTY_ACCSS_CODE_FAIL');
312: WHEN OTHERS THEN
313: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
314: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
315: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
316: FND_MESSAGE.Set_Token('REASON', SQLERRM);
317: FND_MSG_PUB.Add;
318:
319: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_PRTY_ACCSS_CODE_FAIL');
320: FND_MESSAGE.Set_Token('PARTY_ACCESS_CODE', p_party_access_code);
315: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
316: FND_MESSAGE.Set_Token('REASON', SQLERRM);
317: FND_MSG_PUB.Add;
318:
319: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_PRTY_ACCSS_CODE_FAIL');
320: FND_MESSAGE.Set_Token('PARTY_ACCESS_CODE', p_party_access_code);
321: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
322: FND_MSG_PUB.Add;
323: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
316: FND_MESSAGE.Set_Token('REASON', SQLERRM);
317: FND_MSG_PUB.Add;
318:
319: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_PRTY_ACCSS_CODE_FAIL');
320: FND_MESSAGE.Set_Token('PARTY_ACCESS_CODE', p_party_access_code);
321: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
322: FND_MSG_PUB.Add;
323: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
324: END;
317: FND_MSG_PUB.Add;
318:
319: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_PRTY_ACCSS_CODE_FAIL');
320: FND_MESSAGE.Set_Token('PARTY_ACCESS_CODE', p_party_access_code);
321: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
322: FND_MSG_PUB.Add;
323: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
324: END;
325:
536: -- Based on the query criteria
537: --
538: IF (p_query_criteria IS NULL) THEN
539:
540: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_QUERY_CRIT_NULL');
541: FND_MSG_PUB.Add;
542: RAISE FND_API.G_EXC_ERROR;
543:
544: ELSIF (p_query_criteria = 'PARTY_NAME') THEN
557: AND P.party_type = 'ORGANIZATION');
558:
559: ELSE
560: -- none of the query criteria specified
561: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_INVLD_QUERY_CRIT');
562: FND_MESSAGE.Set_Token('QUERY_CRITERIA', p_query_criteria);
563: FND_MSG_PUB.Add;
564: RAISE FND_API.G_EXC_ERROR;
565: END IF;
558:
559: ELSE
560: -- none of the query criteria specified
561: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_INVLD_QUERY_CRIT');
562: FND_MESSAGE.Set_Token('QUERY_CRITERIA', p_query_criteria);
563: FND_MSG_PUB.Add;
564: RAISE FND_API.G_EXC_ERROR;
565: END IF;
566:
591: p_data => x_msg_data,
592: p_encoded => 'F');
593:
594: WHEN OTHERS THEN
595: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
596: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
597: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
598: FND_MESSAGE.Set_Token('REASON', SQLERRM);
599: FND_MSG_PUB.Add;
592: p_encoded => 'F');
593:
594: WHEN OTHERS THEN
595: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
596: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
597: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
598: FND_MESSAGE.Set_Token('REASON', SQLERRM);
599: FND_MSG_PUB.Add;
600: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
593:
594: WHEN OTHERS THEN
595: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
596: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
597: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
598: FND_MESSAGE.Set_Token('REASON', SQLERRM);
599: FND_MSG_PUB.Add;
600: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
601:
594: WHEN OTHERS THEN
595: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
596: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
597: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
598: FND_MESSAGE.Set_Token('REASON', SQLERRM);
599: FND_MSG_PUB.Add;
600: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
601:
602: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
657: --
658: -- If there are no parties in the input, then return error
659: --
660: IF (p_party_ids.COUNT <= 0) THEN
661: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_NO_PRTYS_SPECIFIED');
662: FND_MSG_PUB.Add;
663: RAISE FND_API.G_EXC_ERROR;
664: END IF;
665:
726: p_data => x_msg_data,
727: p_encoded => 'F');
728:
729: WHEN OTHERS THEN
730: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
731: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
732: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
733: FND_MESSAGE.Set_Token('REASON', SQLERRM);
734: FND_MSG_PUB.Add;
727: p_encoded => 'F');
728:
729: WHEN OTHERS THEN
730: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
731: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
732: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
733: FND_MESSAGE.Set_Token('REASON', SQLERRM);
734: FND_MSG_PUB.Add;
735: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
728:
729: WHEN OTHERS THEN
730: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
731: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
732: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
733: FND_MESSAGE.Set_Token('REASON', SQLERRM);
734: FND_MSG_PUB.Add;
735: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
736:
729: WHEN OTHERS THEN
730: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
731: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
732: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
733: FND_MESSAGE.Set_Token('REASON', SQLERRM);
734: FND_MSG_PUB.Add;
735: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
736:
737: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)