105: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME ||'.'|| l_api_name;
106: --
107: l_return_status varchar2(30);
108: BEGIN
109: -- Standard begin of API savepoint
110: SAVEPOINT Global_Header_Pub;
111: -- Standard call to check for call compatibility.
112: IF NOT FND_API.Compatible_API_Call (
113: l_api_version,
107: l_return_status varchar2(30);
108: BEGIN
109: -- Standard begin of API savepoint
110: SAVEPOINT Global_Header_Pub;
111: -- Standard call to check for call compatibility.
112: IF NOT FND_API.Compatible_API_Call (
113: l_api_version,
114: p_api_version,
115: l_api_name,
146: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
147: FND_MESSAGE.Set_Token('TEXT',l_full_name||': End');
148: FND_MSG_PUB.Add;
149: END IF;
150: --Standard call to get message count and if count=1, get the message
151: FND_MSG_PUB.Count_And_Get (
152: p_encoded => FND_API.G_FALSE,
153: p_count => x_msg_count,
154: p_data => x_msg_data
156: EXCEPTION
157: WHEN FND_API.G_EXC_ERROR THEN
158: ROLLBACK TO Global_Header_Pub ;
159: x_return_status := FND_API.G_RET_STS_ERROR;
160: -- Standard call to get message count and if count=1, get the message
161: FND_MSG_PUB.Count_And_Get (
162: p_encoded => FND_API.G_FALSE,
163: p_count => x_msg_count,
164: p_data => x_msg_data
165: );
166: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
167: ROLLBACK TO Global_Header_Pub;
168: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
169: -- Standard call to get message count and if count=1, get the message
170: FND_MSG_PUB.Count_And_Get (
171: p_encoded => FND_API.G_FALSE,
172: p_count => x_msg_count,
173: p_data => x_msg_data
174: );
175: WHEN OTHERS THEN
176: ROLLBACK TO Global_Header_Pub;
177: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
178: -- Standard call to get message count and if count=1, get the message
179: FND_MSG_PUB.Count_And_Get (
180: p_encoded => FND_API.G_FALSE,
181: p_count => x_msg_count,
182: p_data => x_msg_data
217: --
218: l_return_status varchar2(30);
219:
220: BEGIN
221: -- Standard begin of API savepoint
222: SAVEPOINT Global_Line_Pub;
223: -- Standard call to check for call compatibility.
224: IF NOT FND_API.Compatible_API_Call (
225: l_api_version,
219:
220: BEGIN
221: -- Standard begin of API savepoint
222: SAVEPOINT Global_Line_Pub;
223: -- Standard call to check for call compatibility.
224: IF NOT FND_API.Compatible_API_Call (
225: l_api_version,
226: p_api_version,
227: l_api_name,
259: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
260: FND_MESSAGE.Set_Token('TEXT',l_full_name||': End');
261: FND_MSG_PUB.Add;
262: END IF;
263: --Standard call to get message count and if count=1, get the message
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
269: EXCEPTION
270: WHEN FND_API.G_EXC_ERROR THEN
271: ROLLBACK TO Global_Line_Pub ;
272: x_return_status := FND_API.G_RET_STS_ERROR;
273: -- Standard call to get message count and if count=1, get the message
274: FND_MSG_PUB.Count_And_Get (
275: p_encoded => FND_API.G_FALSE,
276: p_count => x_msg_count,
277: p_data => x_msg_data
278: );
279: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
280: ROLLBACK TO Global_Line_Pub;
281: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
282: -- Standard call to get message count and if count=1, get the message
283: FND_MSG_PUB.Count_And_Get (
284: p_encoded => FND_API.G_FALSE,
285: p_count => x_msg_count,
286: p_data => x_msg_data
287: );
288: WHEN OTHERS THEN
289: ROLLBACK TO Global_Line_Pub;
290: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
291: -- Standard call to get message count and if count=1, get the message
292: FND_MSG_PUB.Count_And_Get (
293: p_encoded => FND_API.G_FALSE,
294: p_count => x_msg_count,
295: p_data => x_msg_data