19: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_CONSTRUCTION_UNIT';
20: l_api_version CONSTANT NUMBER := 1.0;
21: BEGIN
22:
23: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
24: RAISE FND_API.G_EXC_ERROR;
25: END IF;
26:
27: -- Set Debug flag
20: l_api_version CONSTANT NUMBER := 1.0;
21: BEGIN
22:
23: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
24: RAISE FND_API.G_EXC_ERROR;
25: END IF;
26:
27: -- Set Debug flag
28: EAM_CONSTRUCTION_UNIT_PVT.set_debug;
38: ,x_msg_data => x_msg_data
39: );
40:
41: EXCEPTION
42: WHEN FND_API.G_EXC_ERROR THEN
43: x_return_status := fnd_api.g_ret_sts_error;
44: x_msg_data := fnd_message.get;
45: WHEN OTHERS THEN
46: x_return_status := fnd_api.g_ret_sts_error;
39: );
40:
41: EXCEPTION
42: WHEN FND_API.G_EXC_ERROR THEN
43: x_return_status := fnd_api.g_ret_sts_error;
44: x_msg_data := fnd_message.get;
45: WHEN OTHERS THEN
46: x_return_status := fnd_api.g_ret_sts_error;
47: fnd_message.set_name('EAM','EAM_CU_UNEXP_SQL_ERRORR');
42: WHEN FND_API.G_EXC_ERROR THEN
43: x_return_status := fnd_api.g_ret_sts_error;
44: x_msg_data := fnd_message.get;
45: WHEN OTHERS THEN
46: x_return_status := fnd_api.g_ret_sts_error;
47: fnd_message.set_name('EAM','EAM_CU_UNEXP_SQL_ERRORR');
48: fnd_message.set_token('API_NAME',l_api_name);
49: fnd_message.set_token('SQL_ERROR',SQLERRM);
50: FND_MSG_PUB.Add;
64: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_CONSTRUCTION_UNIT';
65: l_api_version CONSTANT NUMBER := 1.0;
66: BEGIN
67:
68: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
69: RAISE FND_API.G_EXC_ERROR;
70: END IF;
71:
72: -- Set Debug flag
65: l_api_version CONSTANT NUMBER := 1.0;
66: BEGIN
67:
68: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
69: RAISE FND_API.G_EXC_ERROR;
70: END IF;
71:
72: -- Set Debug flag
73: EAM_CONSTRUCTION_UNIT_PVT.set_debug;
83: ,x_msg_data => x_msg_data
84: );
85:
86: EXCEPTION
87: WHEN FND_API.G_EXC_ERROR THEN
88: x_return_status := fnd_api.g_ret_sts_error;
89: x_msg_data := fnd_message.get;
90: WHEN OTHERS THEN
91: x_return_status := fnd_api.g_ret_sts_error;
84: );
85:
86: EXCEPTION
87: WHEN FND_API.G_EXC_ERROR THEN
88: x_return_status := fnd_api.g_ret_sts_error;
89: x_msg_data := fnd_message.get;
90: WHEN OTHERS THEN
91: x_return_status := fnd_api.g_ret_sts_error;
92: fnd_message.set_name('EAM','EAM_CU_UNEXP_SQL_ERRORR');
87: WHEN FND_API.G_EXC_ERROR THEN
88: x_return_status := fnd_api.g_ret_sts_error;
89: x_msg_data := fnd_message.get;
90: WHEN OTHERS THEN
91: x_return_status := fnd_api.g_ret_sts_error;
92: fnd_message.set_name('EAM','EAM_CU_UNEXP_SQL_ERRORR');
93: fnd_message.set_token('API_NAME',l_api_name);
94: fnd_message.set_token('SQL_ERROR',SQLERRM);
95: FND_MSG_PUB.Add;
110: l_api_name CONSTANT VARCHAR2(30) := 'COPY_CONSTRUCTION_UNIT';
111: l_api_version CONSTANT NUMBER := 1.0;
112: BEGIN
113:
114: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
115: RAISE FND_API.G_EXC_ERROR;
116: END IF;
117:
118: -- Set Debug flag
111: l_api_version CONSTANT NUMBER := 1.0;
112: BEGIN
113:
114: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
115: RAISE FND_API.G_EXC_ERROR;
116: END IF;
117:
118: -- Set Debug flag
119: EAM_CONSTRUCTION_UNIT_PVT.set_debug;
130: ,x_msg_data => x_msg_data
131: );
132:
133: EXCEPTION
134: WHEN FND_API.G_EXC_ERROR THEN
135: x_return_status := fnd_api.g_ret_sts_error;
136: x_msg_data := fnd_message.get;
137: WHEN OTHERS THEN
138: x_return_status := fnd_api.g_ret_sts_error;
131: );
132:
133: EXCEPTION
134: WHEN FND_API.G_EXC_ERROR THEN
135: x_return_status := fnd_api.g_ret_sts_error;
136: x_msg_data := fnd_message.get;
137: WHEN OTHERS THEN
138: x_return_status := fnd_api.g_ret_sts_error;
139: fnd_message.set_name('EAM','EAM_CU_UNEXP_SQL_ERRORR');
134: WHEN FND_API.G_EXC_ERROR THEN
135: x_return_status := fnd_api.g_ret_sts_error;
136: x_msg_data := fnd_message.get;
137: WHEN OTHERS THEN
138: x_return_status := fnd_api.g_ret_sts_error;
139: fnd_message.set_name('EAM','EAM_CU_UNEXP_SQL_ERRORR');
140: fnd_message.set_token('API_NAME',l_api_name);
141: fnd_message.set_token('SQL_ERROR',SQLERRM);
142: FND_MSG_PUB.Add;