13: l_user_id NUMBER := FND_GLOBAL.USER_ID();
14: x_msg_count NUMBER;
15: x_msg_data VARCHAR2(240);
16: x_return_status VARCHAR2(1) ;
17: l_init_msg_list VARCHAR2(10) := FND_API.G_FALSE;
18:
19: l_view_name varchar2(30);
20: BEGIN
21: ozf_utility_pvt.write_conc_log('Private API: ' || l_full_name || ': Start');
20: BEGIN
21: ozf_utility_pvt.write_conc_log('Private API: ' || l_full_name || ': Start');
22:
23: -- Initialize API return status to SUCCESS
24: x_return_status := FND_API.G_RET_STS_SUCCESS;
25:
26: IF p_view_name = 'INVENTORY' THEN
27: REFRESH_SUMMARY_TABLE('OZF_INVENTORY_SUMMARY_MV');
28: ELSIF p_view_name = 'ORDER' THEN
54: END IF;
55:
56: ozf_utility_pvt.write_conc_log('Private API: ' || l_full_name || ': End');
57: EXCEPTION
58: WHEN FND_API.G_EXC_ERROR THEN
59: x_return_status := FND_API.g_ret_sts_error ;
60: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,
61: p_count => x_msg_count,
62: p_data => x_msg_data);
55:
56: ozf_utility_pvt.write_conc_log('Private API: ' || l_full_name || ': End');
57: EXCEPTION
58: WHEN FND_API.G_EXC_ERROR THEN
59: x_return_status := FND_API.g_ret_sts_error ;
60: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,
61: p_count => x_msg_count,
62: p_data => x_msg_data);
63: ERRBUF := x_msg_data;
56: ozf_utility_pvt.write_conc_log('Private API: ' || l_full_name || ': End');
57: EXCEPTION
58: WHEN FND_API.G_EXC_ERROR THEN
59: x_return_status := FND_API.g_ret_sts_error ;
60: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,
61: p_count => x_msg_count,
62: p_data => x_msg_data);
63: ERRBUF := x_msg_data;
64: RETCODE := 2;
63: ERRBUF := x_msg_data;
64: RETCODE := 2;
65: ozf_utility_pvt.write_conc_log('Private API: ' || l_api_name || ' Expected Error');
66:
67: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
68: x_return_status := FND_API.g_ret_sts_unexp_error ;
69: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE,
70: p_count => x_msg_count,
71: p_data => x_msg_data);
64: RETCODE := 2;
65: ozf_utility_pvt.write_conc_log('Private API: ' || l_api_name || ' Expected Error');
66:
67: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
68: x_return_status := FND_API.g_ret_sts_unexp_error ;
69: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE,
70: p_count => x_msg_count,
71: p_data => x_msg_data);
72: ERRBUF := x_msg_data;
65: ozf_utility_pvt.write_conc_log('Private API: ' || l_api_name || ' Expected Error');
66:
67: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
68: x_return_status := FND_API.g_ret_sts_unexp_error ;
69: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE,
70: p_count => x_msg_count,
71: p_data => x_msg_data);
72: ERRBUF := x_msg_data;
73: RETCODE := 2;
73: RETCODE := 2;
74: ozf_utility_pvt.write_conc_log('Private API: ' || l_api_name || ' Error');
75:
76: WHEN OTHERS THEN
77: x_return_status := FND_API.g_ret_sts_unexp_error ;
78: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE,
79: p_count => x_msg_count,
80: p_data => x_msg_data);
81:
74: ozf_utility_pvt.write_conc_log('Private API: ' || l_api_name || ' Error');
75:
76: WHEN OTHERS THEN
77: x_return_status := FND_API.g_ret_sts_unexp_error ;
78: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE,
79: p_count => x_msg_count,
80: p_data => x_msg_data);
81:
82: ERRBUF := sqlerrm(sqlcode);
95: l_user_id NUMBER := FND_GLOBAL.USER_ID();
96: x_msg_count NUMBER;
97: x_msg_data VARCHAR2(240);
98: x_return_status VARCHAR2(1) ;
99: l_init_msg_list VARCHAR2(10) := FND_API.G_FALSE;
100: l_table_name varchar2(300);
101: ls_owner varchar2(10);
102:
103: CURSOR dis_obj IS
126:
127: BEGIN
128: ozf_utility_pvt.write_conc_log('Private API: ' || l_full_name || ': Start');
129: -- Initialize API return status to SUCCESS
130: x_return_status := FND_API.G_RET_STS_SUCCESS;
131:
132: select u.oracle_username
133: into ls_owner
134: from fnd_product_installations i,