93:
94:
95: BEGIN
96:
97: -- ******* Standard Begins ********
98:
99: -- Standard Start of API savepoint
100: SAVEPOINT CREATE_JTF_PERZ_PROFILE_PUB;
101:
95: BEGIN
96:
97: -- ******* Standard Begins ********
98:
99: -- Standard Start of API savepoint
100: SAVEPOINT CREATE_JTF_PERZ_PROFILE_PUB;
101:
102: -- Standard call to check for call compatibility.
103: -- IF NOT FND_API.Compatible_API_Call ( l_api_version_number, p_api_version_number, l_api_name, G_PKG_NAME)
98:
99: -- Standard Start of API savepoint
100: SAVEPOINT CREATE_JTF_PERZ_PROFILE_PUB;
101:
102: -- Standard call to check for call compatibility.
103: -- IF NOT FND_API.Compatible_API_Call ( l_api_version_number, p_api_version_number, l_api_name, G_PKG_NAME)
104: -- THEN
105: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
106: -- END IF;
129: x_msg_count,
130: x_msg_data
131: );
132: x_return_status := l_return_status;
133: -- ******** Standard Ends ***********
134: --
135: -- End of API body.
136: --
137: -- 7. Commit the whole thing
135: -- End of API body.
136: --
137: -- 7. Commit the whole thing
138:
139: -- Standard check of p_commit.
140: IF FND_API.To_Boolean ( p_commit )
141: THEN
142: COMMIT WORK;
143: END IF;
142: COMMIT WORK;
143: END IF;
144:
145: -- Debug Message
146: -- Standard call to get message count and if count is 1, get message info.
147: FND_MSG_PUB.Count_And_Get
148: (
149: p_count => x_msg_count,
150: p_data => x_msg_data
263:
264:
265: BEGIN
266:
267: -- ******* Standard Begins ********
268:
269: -- Standard Start of API savepoint
270: SAVEPOINT UPDATE_JTF_PERZ_PROFILE_PUB;
271: -- Standard call to check for call compatibility.
265: BEGIN
266:
267: -- ******* Standard Begins ********
268:
269: -- Standard Start of API savepoint
270: SAVEPOINT UPDATE_JTF_PERZ_PROFILE_PUB;
271: -- Standard call to check for call compatibility.
272: IF NOT FND_API.Compatible_API_Call ( l_api_version_number, p_api_version_number, l_api_name, G_PKG_NAME)
273: THEN
267: -- ******* Standard Begins ********
268:
269: -- Standard Start of API savepoint
270: SAVEPOINT UPDATE_JTF_PERZ_PROFILE_PUB;
271: -- Standard call to check for call compatibility.
272: IF NOT FND_API.Compatible_API_Call ( l_api_version_number, p_api_version_number, l_api_name, G_PKG_NAME)
273: THEN
274: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
275: END IF;
301: x_msg_data
302: );
303: x_return_status := l_return_status;
304:
305: -- ******** Standard Ends ***********
306: --
307: -- End of API body.
308: --
309: -- 7. Commit the whole thing
307: -- End of API body.
308: --
309: -- 7. Commit the whole thing
310:
311: -- Standard check of p_commit.
312: IF FND_API.To_Boolean ( p_commit )
313: THEN
314: COMMIT WORK;
315: END IF;
314: COMMIT WORK;
315: END IF;
316:
317: -- Debug Message
318: -- Standard call to get message count and if count is 1, get message info.
319: FND_MSG_PUB.Count_And_Get
320: (
321: p_count => x_msg_count,
322: p_data => x_msg_data
426:
427:
428: BEGIN
429:
430: -- ******* Standard Begins ********
431:
432: -- Standard call to check for call compatibility.
433: -- IF NOT FND_API.Compatible_API_Call ( l_api_version_number, p_api_version_number, l_api_name, G_PKG_NAME)
434: -- THEN
428: BEGIN
429:
430: -- ******* Standard Begins ********
431:
432: -- Standard call to check for call compatibility.
433: -- IF NOT FND_API.Compatible_API_Call ( l_api_version_number, p_api_version_number, l_api_name, G_PKG_NAME)
434: -- THEN
435: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
436: -- END IF;