APPS.CN_PURGE_TABLES_PUB dependencies on FND_API

Line 147: l_init_msg_list VARCHAR2(10) := FND_API.G_FALSE;

143: AND org_id = p_org_id AND closing_status in ('C', 'P') ;
144:
145: l_api_name CONSTANT VARCHAR2(30) := 'purge_cn_tables';
146: l_api_version CONSTANT NUMBER :=1.0;
147: l_init_msg_list VARCHAR2(10) := FND_API.G_FALSE;
148: l_start_period_id NUMBER := -1;
149: l_end_period_id NUMBER := -1;
150: l_error_msg VARCHAR(240);
151: l_time VARCHAR2(20);

Line 182: IF NOT FND_API.Compatible_API_Call ( l_api_version , l_api_version , l_api_name , G_PKG_NAME ) THEN

178: debugmsg('CN_PURGE_TABLES_PUB.archive_purge_cn_tables: p_table_space: ' || p_table_space);
179: debugmsg('CN_PURGE_TABLES_PUB.archive_purge_cn_tables: g_cn_debug: ' || g_cn_debug);
180:
181: -- Standard call to check for call compatibility.
182: IF NOT FND_API.Compatible_API_Call ( l_api_version , l_api_version , l_api_name , G_PKG_NAME ) THEN
183: debugmsg('CN_PURGE_TABLES_PUB.purge_cn_tables api: Not Compatible_API_Call ');
184: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
185: END IF;
186: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 184: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

180:
181: -- Standard call to check for call compatibility.
182: IF NOT FND_API.Compatible_API_Call ( l_api_version , l_api_version , l_api_name , G_PKG_NAME ) THEN
183: debugmsg('CN_PURGE_TABLES_PUB.purge_cn_tables api: Not Compatible_API_Call ');
184: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
185: END IF;
186: -- Initialize message list if p_init_msg_list is set to TRUE.
187: IF FND_API.to_Boolean( l_init_msg_list ) THEN
188: FND_MSG_PUB.initialize;

Line 187: IF FND_API.to_Boolean( l_init_msg_list ) THEN

183: debugmsg('CN_PURGE_TABLES_PUB.purge_cn_tables api: Not Compatible_API_Call ');
184: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
185: END IF;
186: -- Initialize message list if p_init_msg_list is set to TRUE.
187: IF FND_API.to_Boolean( l_init_msg_list ) THEN
188: FND_MSG_PUB.initialize;
189: END IF;
190:
191: -- Initialize API return status to success

Line 192: x_return_status := FND_API.G_RET_STS_SUCCESS;

188: FND_MSG_PUB.initialize;
189: END IF;
190:
191: -- Initialize API return status to success
192: x_return_status := FND_API.G_RET_STS_SUCCESS;
193:
194: IF(p_org_id is null) THEN
195: l_error_msg := 'p_org_id' || g_error_msg;
196: debugmsg('CN_PURGE_TABLES_PUB.archive_purge_cn_tables: l_error_msg: ' || l_error_msg);

Line 394: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

390: debugmsg('CN_PURGE_TABLES_PUB.archive_purge_cn_tables: x_return_status: ' || x_return_status);
391: debugmsg('CN_PURGE_TABLES_PUB.archive_purge_cn_tables: END l_time ' || l_time );
392:
393: IF(x_return_status <> 'S') THEN
394: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
395: END IF;
396:
397:
398: EXCEPTION

Line 406: p_encoded => FND_API.G_FALSE,

402: --errbuf := l_error_msg;
403: debugmsg('CN_PURGE_TABLES_PUB.archive_purge_cn_tables:exception: CN_AIA_REQ_FIELD_NOT_SET_ERROR: ');
404: FND_MSG_PUB.Count_And_Get
405: (
406: p_encoded => FND_API.G_FALSE,
407: p_count => x_msg_count,
408: p_data => x_msg_data
409: );
410: debugmsg('CN_PURGE_TABLES_PUB.archive_purge_cn_tables:exception: x_msg_count: ' || x_msg_count);

Line 420: --RAISE FND_API.G_EXC_ERROR;

416: retcode := '-2';
417: x_return_status := 'F';
418: errbuf := x_msg_data || ' : ' || SQLERRM(SQLCODE());
419: debugmsg('CN_PURGE_TABLES_PUB.archive_purge_cn_tables:exception others: ' || errbuf);
420: --RAISE FND_API.G_EXC_ERROR;
421: raise_application_error (-20002,errbuf);
422: END archive_purge_cn_tables;
423:
424: END CN_PURGE_TABLES_PUB;