168: --
169: IF p_init_msg_list IS NOT NULL AND
170: FND_API.to_Boolean(p_init_msg_list)
171: THEN
172: FND_MSG_PUB.initialize;
173: END IF;
174:
175: --- initialize API return status to success.
176: x_return_status := FND_API.G_RET_STS_SUCCESS;
188: IF c_check_user%NOTFOUND THEN
189: CLOSE c_check_user;
190: FND_MESSAGE.SET_NAME('AR', 'HZ_DSS_INVALID_USER');
191: FND_MESSAGE.SET_TOKEN('USER_NAME', p_user_name);
192: FND_MSG_PUB.ADD;
193: RAISE FND_API.G_EXC_ERROR;
194: END IF;
195: CLOSE c_check_user;
196: */
201: IF c_check_table%NOTFOUND THEN
202: CLOSE c_check_table;
203: FND_MESSAGE.SET_NAME('AR', 'HZ_DSS_INVALID_OBJECT');
204: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',p_db_object_name);
205: FND_MSG_PUB.ADD;
206: RAISE FND_API.G_EXC_ERROR;
207: END IF;
208: CLOSE c_check_table;
209:
213: IF c_check_operation_code%NOTFOUND THEN
214: CLOSE c_check_operation_code;
215: FND_MESSAGE.SET_NAME('AR', 'HZ_DSS_INVALID_OPER');
216: FND_MESSAGE.SET_TOKEN('OPER_NAME',p_operation_code);
217: FND_MSG_PUB.ADD;
218: RAISE FND_API.G_EXC_ERROR;
219: END IF;
220: CLOSE c_check_operation_code;
221:
243: EXIT;
244: ELSIF l_result = 'U' THEN
245: FND_MESSAGE.SET_NAME('AR', 'HZ_API_CALLING_ERROR');
246: FND_MESSAGE.SET_TOKEN('PROC_NAME', 'FND_DATA_SECURITY.check_function');
247: FND_MSG_PUB.ADD;
248: RAISE FND_API.G_EXC_ERROR;
249: END IF;
250: END LOOP;
251: CLOSE get_functions_for_op;
260: EXCEPTION
261: WHEN FND_API.G_EXC_ERROR THEN
262: x_return_status := FND_API.G_RET_STS_ERROR;
263:
264: FND_MSG_PUB.COUNT_AND_GET(
265: p_encoded => fnd_api.g_false,
266: p_count => x_msg_count,
267: p_data => x_msg_data
268: );
273: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
274:
275: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
276: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
277: FND_MSG_PUB.ADD;
278:
279: FND_MSG_PUB.COUNT_AND_GET(
280: p_encoded => fnd_api.g_false,
281: p_count => x_msg_count,
275: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
276: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
277: FND_MSG_PUB.ADD;
278:
279: FND_MSG_PUB.COUNT_AND_GET(
280: p_encoded => fnd_api.g_false,
281: p_count => x_msg_count,
282: p_data => x_msg_data
283: );
367:
368: BEGIN
369:
370: ---initialize the message
371: FND_MSG_PUB.initialize;
372:
373: --- initialize API return status to success.
374: x_return_status := FND_API.G_RET_STS_SUCCESS;
375:
386: and ( end_date is null or end_date >= sysdate );
387:
388: exception when no_data_found then
389: FND_MESSAGE.SET_NAME('AR','HZ_DSS_INVALID_USER');
390: FND_MSG_PUB.ADD;
391: RAISE FND_API.G_EXC_ERROR;
392: end;
393:
394: begin
401:
402: exception when no_data_found then
403: FND_MESSAGE.SET_NAME('AR', 'HZ_DSS_INVALID_OPER');
404: FND_MESSAGE.SET_TOKEN('OPER_NAME',p_operation_code);
405: FND_MSG_PUB.ADD;
406: RAISE FND_API.G_EXC_ERROR;
407: end;
408:
409: i := 1;
443:
444: EXCEPTION
445: WHEN fnd_api.g_exc_error THEN
446: x_return_status := FND_API.G_RET_STS_ERROR;
447: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
448: p_count => x_msg_count,
449: p_data => x_msg_data);
450:
451:
1270: l_msg_data VARCHAR2(2000);
1271:
1272: begin
1273: ---initialize the message
1274: FND_MSG_PUB.initialize;
1275:
1276: --- initialize API return status to success.
1277: x_return_status := FND_API.G_RET_STS_SUCCESS;
1278:
1302:
1303: end loop;
1304: ELSE
1305: x_return_status := FND_API.G_RET_STS_ERROR;
1306: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
1307: p_count => x_msg_count,
1308: p_data => x_msg_data);
1309: END IF;
1310:
1382:
1383: BEGIN
1384:
1385: ---initialize the message
1386: FND_MSG_PUB.initialize;
1387:
1388: --- initialize API return status to success.
1389: x_return_status := FND_API.G_RET_STS_SUCCESS;
1390:
1390:
1391: --- validation passed in group code should be valid
1392: IF HZ_DSS_VALIDATE_PKG.exist_in_dss_groups_b(p_dss_group_code)= 'N' THEN
1393: FND_MESSAGE.SET_NAME('AR', 'HZ_DSS_GR_CODE_INVALID');
1394: FND_MSG_PUB.ADD;
1395: RAISE FND_API.G_EXC_ERROR;
1396: END IF;
1397:
1398: -- entity id validation
1397:
1398: -- entity id validation
1399: IF HZ_DSS_VALIDATE_PKG.exist_in_dss_entities(p_entity_id) = 'N' THEN
1400: FND_MESSAGE.SET_NAME('AR', 'HZ_DSS_ENT_ID_INVALID');
1401: FND_MSG_PUB.ADD;
1402: RAISE FND_API.G_EXC_ERROR;
1403: END IF;
1404:
1405: OPEN c_find_objects;
1437: EXCEPTION
1438: WHEN FND_API.G_EXC_ERROR THEN
1439: x_return_status := FND_API.G_RET_STS_ERROR;
1440:
1441: FND_MSG_PUB.COUNT_AND_GET(
1442: p_encoded => fnd_api.g_false,
1443: p_count => x_msg_count,
1444: p_data => x_msg_data
1445: );
1448: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1449:
1450: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1451: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1452: FND_MSG_PUB.ADD;
1453:
1454: FND_MSG_PUB.COUNT_AND_GET(
1455: p_encoded => fnd_api.g_false,
1456: p_count => x_msg_count,
1450: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1451: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1452: FND_MSG_PUB.ADD;
1453:
1454: FND_MSG_PUB.COUNT_AND_GET(
1455: p_encoded => fnd_api.g_false,
1456: p_count => x_msg_count,
1457: p_data => x_msg_data
1458: );