56: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
57:
58: BEGIN
59:
60: -- ******* Standard Begins ********
61:
62: -- Standard Start of API savepoint
63: SAVEPOINT CREATE_PERZ_LF_PUB;
64:
58: BEGIN
59:
60: -- ******* Standard Begins ********
61:
62: -- Standard Start of API savepoint
63: SAVEPOINT CREATE_PERZ_LF_PUB;
64:
65: -- Standard call to check for call compatibility.
66: -- IF NOT FND_API.Compatible_API_Call ( l_api_version_number, p_api_version_number, l_api_name, G_PKG_NAME)
61:
62: -- Standard Start of API savepoint
63: SAVEPOINT CREATE_PERZ_LF_PUB;
64:
65: -- Standard call to check for call compatibility.
66: -- IF NOT FND_API.Compatible_API_Call ( l_api_version_number, p_api_version_number, l_api_name, G_PKG_NAME)
67: -- THEN
68: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
69: -- END IF;
96: x_msg_data
97: );
98: x_return_status := l_return_status ;
99:
100: -- ******** Standard Ends ***********
101: --
102: -- End of API body.
103: --
104: -- 7. Commit the whole thing
102: -- End of API body.
103: --
104: -- 7. Commit the whole thing
105:
106: -- Standard check of p_commit.
107: IF FND_API.To_Boolean ( p_commit )
108: THEN
109: COMMIT WORK;
110: END IF;
109: COMMIT WORK;
110: END IF;
111:
112: -- Debug Message
113: -- Standard call to get message count and if count is 1, get message info.
114: FND_MSG_PUB.Count_And_Get
115: (
116: p_count => x_msg_count,
117: p_data => x_msg_data
201: l_return_status VARCHAR2(1) := FND_API.G_TRUE;
202:
203: BEGIN
204:
205: -- ******* Standard Begins ********
206:
207: -- Standard Start of API savepoint
208: SAVEPOINT UPDATE_PERZ_LF_PUB;
209:
203: BEGIN
204:
205: -- ******* Standard Begins ********
206:
207: -- Standard Start of API savepoint
208: SAVEPOINT UPDATE_PERZ_LF_PUB;
209:
210: -- Standard call to check for call compatibility.
211: --IF NOT FND_API.Compatible_API_Call
206:
207: -- Standard Start of API savepoint
208: SAVEPOINT UPDATE_PERZ_LF_PUB;
209:
210: -- Standard call to check for call compatibility.
211: --IF NOT FND_API.Compatible_API_Call
212: --( l_api_version_number, p_api_version_number,
213: -- l_api_name, G_PKG_NAME) THEN
214: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
240: x_msg_data
241: );
242:
243:
244: -- ******** Standard Ends ***********
245: --
246: -- End of API body.
247: --
248: -- 5. Commit the whole thing
246: -- End of API body.
247: --
248: -- 5. Commit the whole thing
249:
250: -- Standard check of p_commit.
251: IF FND_API.To_Boolean ( p_commit )
252: THEN
253: COMMIT WORK;
254: END IF;
253: COMMIT WORK;
254: END IF;
255:
256: -- Debug Message
257: -- Standard call to get message count and if count is 1, get message info.
258: FND_MSG_PUB.Count_And_Get(
259: p_count => x_msg_count,
260: p_data => x_msg_data
261: );
343: l_api_name CONSTANT VARCHAR2(30) := 'Personalize LF Object';
344:
345: BEGIN
346:
347: -- ******* Standard Begins ********
348:
349: -- Standard Start of API savepoint
350: SAVEPOINT PERSONALIZE_LF_OBJECT_PUB;
351:
345: BEGIN
346:
347: -- ******* Standard Begins ********
348:
349: -- Standard Start of API savepoint
350: SAVEPOINT PERSONALIZE_LF_OBJECT_PUB;
351:
352: -- Standard call to check for call compatibility.
353: IF NOT FND_API.Compatible_API_Call ( l_api_version_number, p_api_version_number, l_api_name, G_PKG_NAME)
348:
349: -- Standard Start of API savepoint
350: SAVEPOINT PERSONALIZE_LF_OBJECT_PUB;
351:
352: -- Standard call to check for call compatibility.
353: IF NOT FND_API.Compatible_API_Call ( l_api_version_number, p_api_version_number, l_api_name, G_PKG_NAME)
354: THEN
355: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
356: END IF;
391: UPDATE JTF_PERZ_LF_OBJECT SET OBJECT_DESCRIPTION = p_object_description WHERE OBJECT_ID = x_object_id;
392: end if;
393:
394:
395: -- ******** Standard Ends ***********
396: --
397: -- End of API body.
398: --
399:
396: --
397: -- End of API body.
398: --
399:
400: -- Standard check of p_commit.
401: IF FND_API.To_Boolean ( p_commit )
402: THEN
403: COMMIT WORK;
404: END IF;
403: COMMIT WORK;
404: END IF;
405:
406: -- Debug Message
407: -- Standard call to get message count and if count is 1, get message info.
408: FND_MSG_PUB.Count_And_Get
409: ( p_count => x_msg_count,
410: p_data => x_msg_data
411: );
482: l_api_name CONSTANT VARCHAR2(30) := 'Personalize LF Object';
483:
484: BEGIN
485:
486: -- ******* Standard Begins ********
487:
488: -- Standard call to check for call compatibility.
489: IF NOT FND_API.Compatible_API_Call ( l_api_version_number, p_api_version_number, l_api_name, G_PKG_NAME)
490: THEN
484: BEGIN
485:
486: -- ******* Standard Begins ********
487:
488: -- Standard call to check for call compatibility.
489: IF NOT FND_API.Compatible_API_Call ( l_api_version_number, p_api_version_number, l_api_name, G_PKG_NAME)
490: THEN
491: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
492: END IF;
549:
550: l_obj_type_map_tbl JTF_PERZ_LF_PVT.OBJ_TYPE_MAP_TBL_TYPE;
551: BEGIN
552:
553: -- ******* Standard Begins ********
554:
555: -- Standard Start of API savepoint
556: SAVEPOINT save_lf_object_type;
557:
551: BEGIN
552:
553: -- ******* Standard Begins ********
554:
555: -- Standard Start of API savepoint
556: SAVEPOINT save_lf_object_type;
557:
558: -- Standard call to check for call compatibility.
559: IF NOT FND_API.Compatible_API_Call ( l_api_version_number, p_api_version_number, l_api_name, G_PKG_NAME)
554:
555: -- Standard Start of API savepoint
556: SAVEPOINT save_lf_object_type;
557:
558: -- Standard call to check for call compatibility.
559: IF NOT FND_API.Compatible_API_Call ( l_api_version_number, p_api_version_number, l_api_name, G_PKG_NAME)
560: THEN
561: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
562: END IF;
583: );
584:
585: x_return_status := l_return_status;
586:
587: -- ******** Standard Ends ***********
588: --
589: -- End of API body.
590: --
591:
588: --
589: -- End of API body.
590: --
591:
592: -- Standard check of p_commit.
593: IF FND_API.To_Boolean ( p_commit )
594: THEN
595: COMMIT WORK;
596: END IF;
595: COMMIT WORK;
596: END IF;
597:
598: -- Debug Message
599: -- Standard call to get message count and if count is 1, get message info.
600: FND_MSG_PUB.Count_And_Get
601: ( p_count => x_msg_count,
602: p_data => x_msg_data
603: );
672: l_api_name CONSTANT VARCHAR2(30) := 'Personalize LF Object';
673:
674: BEGIN
675:
676: -- ******* Standard Begins ********
677:
678: -- Standard call to check for call compatibility.
679: IF NOT FND_API.Compatible_API_Call ( l_api_version_number, p_api_version_number, l_api_name, G_PKG_NAME)
680: THEN
674: BEGIN
675:
676: -- ******* Standard Begins ********
677:
678: -- Standard call to check for call compatibility.
679: IF NOT FND_API.Compatible_API_Call ( l_api_version_number, p_api_version_number, l_api_name, G_PKG_NAME)
680: THEN
681: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
682: END IF;