DBA Data[Home] [Help]

APPS.OZF_BASELINESALES_LIFT_PVT dependencies on FND_API

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

28: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME ||'.'|| l_api_name;
29: x_msg_count NUMBER;
30: x_msg_data VARCHAR2(240);
31: x_return_status VARCHAR2(1);
32: l_init_msg_list VARCHAR2(10) := FND_API.G_FALSE;
33: l_del_tbl_stmt1 VARCHAR2(100) := ' DELETE FROM ';
34: l_del_err_tbl_stmt1 VARCHAR2(250) :=
35: ' DELETE FROM OZF_INTERFACE_ERRORS ERR '
36: || ' WHERE ERR.ENTITY_NAME = :1 '

Line 60: x_return_status := FND_API.G_RET_STS_SUCCESS;

56:
57: SAVEPOINT START_PURGE;
58:
59: -- Initialize API return status to SUCCESS
60: x_return_status := FND_API.G_RET_STS_SUCCESS;
61:
62: ozf_utility_pvt.write_conc_log('-- p_data_source is : ' || p_data_source ) ;
63: ozf_utility_pvt.write_conc_log('-- p_data_type is : ' || p_data_type ) ;
64: ozf_utility_pvt.write_conc_log('-- p_curr_or_hist is : ' || p_curr_or_hist ) ;

Line 73: RAISE FND_API.g_exc_error;

69: IF p_data_source is NULL THEN
70: FND_MESSAGE.set_name('OZF', 'OZF_BASE_DATA_SRC_MISSING');
71: FND_MSG_PUB.add;
72: ozf_utility_pvt.write_conc_log(FND_MESSAGE.Get);
73: RAISE FND_API.g_exc_error;
74: END IF;
75:
76: -- check if data_type is null
77: IF p_data_type is NULL THEN

Line 81: RAISE FND_API.g_exc_error;

77: IF p_data_type is NULL THEN
78: FND_MESSAGE.set_name('OZF', 'OZF_BASE_DATA_TYPE_MISSING');
79: FND_MSG_PUB.add;
80: ozf_utility_pvt.write_conc_log(FND_MESSAGE.Get);
81: RAISE FND_API.g_exc_error;
82: END IF;
83:
84: -- check if p_curr_or_hist is null
85: IF p_curr_or_hist is NULL THEN

Line 89: RAISE FND_API.g_exc_error;

85: IF p_curr_or_hist is NULL THEN
86: FND_MESSAGE.set_name('OZF', 'OZF_BASE_CURR_OR_HIST_MISSING');
87: FND_MSG_PUB.add;
88: ozf_utility_pvt.write_conc_log(FND_MESSAGE.Get);
89: RAISE FND_API.g_exc_error;
90: END IF;
91:
92: -- check if purging current data and p_record_type is null
93: IF p_curr_or_hist = 'CURR_DATA' AND p_record_type is NULL THEN

Line 97: RAISE FND_API.g_exc_error;

93: IF p_curr_or_hist = 'CURR_DATA' AND p_record_type is NULL THEN
94: FND_MESSAGE.set_name('OZF', 'OZF_BASE_RECORD_TYPE_MISSING');
95: FND_MSG_PUB.add;
96: ozf_utility_pvt.write_conc_log(FND_MESSAGE.Get);
97: RAISE FND_API.g_exc_error;
98: END IF;
99:
100: -- check if purging historical data and p_as_of_date is null
101: IF p_curr_or_hist = 'HIST_DATA' AND p_as_of_date is NULL THEN

Line 105: RAISE FND_API.g_exc_error;

101: IF p_curr_or_hist = 'HIST_DATA' AND p_as_of_date is NULL THEN
102: FND_MESSAGE.set_name('OZF', 'OZF_BASE_AS_OF_DATE_MISSING');
103: FND_MSG_PUB.add;
104: ozf_utility_pvt.write_conc_log(FND_MESSAGE.Get);
105: RAISE FND_API.g_exc_error;
106: END IF;
107:
108:
109: ----------------------------------------------------------

Line 234: WHEN FND_API.G_EXC_ERROR THEN

230: ozf_utility_pvt.write_conc_log(' -- End: Purging Program at : ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));
231: ozf_utility_pvt.write_conc_log('End: Private API: ' || l_full_name || ' (+)');
232:
233: EXCEPTION
234: WHEN FND_API.G_EXC_ERROR THEN
235: ROLLBACK TO START_PURGE;
236: x_return_status := FND_API.g_ret_sts_error ;
237: ERRBUF := x_msg_data;
238: RETCODE := 2;

Line 236: x_return_status := FND_API.g_ret_sts_error ;

232:
233: EXCEPTION
234: WHEN FND_API.G_EXC_ERROR THEN
235: ROLLBACK TO START_PURGE;
236: x_return_status := FND_API.g_ret_sts_error ;
237: ERRBUF := x_msg_data;
238: RETCODE := 2;
239: ozf_utility_pvt.write_conc_log('Private API: ' || l_full_name || ' Expected Error ' );
240: ozf_utility_pvt.write_conc_log(sqlerrm(sqlcode) );

Line 242: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

238: RETCODE := 2;
239: ozf_utility_pvt.write_conc_log('Private API: ' || l_full_name || ' Expected Error ' );
240: ozf_utility_pvt.write_conc_log(sqlerrm(sqlcode) );
241:
242: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
243: ROLLBACK TO START_PURGE;
244: x_return_status := FND_API.g_ret_sts_unexp_error ;
245: ERRBUF := sqlerrm(sqlcode);
246: RETCODE := 2;

Line 244: x_return_status := FND_API.g_ret_sts_unexp_error ;

240: ozf_utility_pvt.write_conc_log(sqlerrm(sqlcode) );
241:
242: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
243: ROLLBACK TO START_PURGE;
244: x_return_status := FND_API.g_ret_sts_unexp_error ;
245: ERRBUF := sqlerrm(sqlcode);
246: RETCODE := 2;
247: ozf_utility_pvt.write_conc_log('Private API: ' || l_full_name || ' Unexpected Error ' );
248: ozf_utility_pvt.write_conc_log(sqlerrm(sqlcode) );

Line 252: x_return_status := FND_API.g_ret_sts_unexp_error ;

248: ozf_utility_pvt.write_conc_log(sqlerrm(sqlcode) );
249:
250: WHEN OTHERS THEN
251: ROLLBACK TO START_PURGE;
252: x_return_status := FND_API.g_ret_sts_unexp_error ;
253: ERRBUF := sqlerrm(sqlcode);
254: RETCODE := 2;
255: ozf_utility_pvt.write_conc_log('Private API: ' || l_full_name || ' Other Error ' );
256: ozf_utility_pvt.write_conc_log(sqlerrm(sqlcode) );