[Home] [Help]
1: PACKAGE BODY AMS_Iba_Pl_Pages_PVT as
2: /* $Header: amsvpagb.pls 120.0 2005/05/31 15:32:19 appldev noship $ */
3: -- ===============================================================
4: -- Start of Comments
5: -- Package name
2: /* $Header: amsvpagb.pls 120.0 2005/05/31 15:32:19 appldev noship $ */
3: -- ===============================================================
4: -- Start of Comments
5: -- Package name
6: -- AMS_Iba_Pl_Pages_PVT
7: -- Purpose
8: --
9: -- History
10: --
13: -- End of Comments
14: -- ===============================================================
15:
16:
17: G_PKG_NAME CONSTANT VARCHAR2(30):= 'AMS_Iba_Pl_Pages_PVT';
18: G_FILE_NAME CONSTANT VARCHAR2(12) := 'amsvpagb.pls';
19:
20: -- Returns the no. of placements which uses this page
21: AMS_DEBUG_HIGH_ON constant boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
324: -- Local Variables
325: l_object_version_number NUMBER;
326: l_PAGE_ID NUMBER;
327: l_ref_iba_pl_pages_rec c_get_Iba_Pl_Pages%ROWTYPE ;
328: l_tar_iba_pl_pages_rec AMS_Iba_Pl_Pages_PVT.iba_pl_pages_rec_type := P_iba_pl_pages_rec;
329: l_rowid ROWID;
330: l_page_placements NUMBER;
331: l_pagerefcode_changed VARCHAR2(1);
332:
1199: IS
1200: L_API_NAME CONSTANT VARCHAR2(30) := 'Validate_Iba_Pl_Pages';
1201: L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
1202: l_object_version_number NUMBER;
1203: l_iba_pl_pages_rec AMS_Iba_Pl_Pages_PVT.iba_pl_pages_rec_type;
1204:
1205: BEGIN
1206: -- Standard Start of API savepoint
1207: SAVEPOINT VALIDATE_Iba_Pl_Pages_;
1355: p_data => x_msg_data
1356: );
1357: END Validate_iba_pl_pages_Rec;
1358:
1359: END AMS_Iba_Pl_Pages_PVT;