1: PACKAGE BODY AMS_Ct_Rule_PVT as
2: /* $Header: amsvctrb.pls 120.3 2006/05/30 11:09:34 prageorg noship $ */
3: -- ===============================================================
4: -- Start of Comments
5: -- Package name
2: /* $Header: amsvctrb.pls 120.3 2006/05/30 11:09:34 prageorg noship $ */
3: -- ===============================================================
4: -- Start of Comments
5: -- Package name
6: -- AMS_Ct_Rule_PVT
7: --
8: -- Purpose
9: -- Private api created to Update/insert/Delete general
10: -- and object-specific content rules
21: -- End of Comments
22: -- ===============================================================
23:
24:
25: G_PKG_NAME CONSTANT VARCHAR2(30):= 'AMS_Ct_Rule_PVT';
26: G_FILE_NAME CONSTANT VARCHAR2(12) := 'amsvctrb.pls';
27:
28: G_USER_ID NUMBER := FND_GLOBAL.USER_ID;
29: G_LOGIN_ID NUMBER := FND_GLOBAL.CONC_LOGIN_ID;
294: -- Local Variables
295: l_object_version_number NUMBER;
296: l_CONTENT_RULE_ID NUMBER;
297: l_ref_ct_rule_rec c_get_Ct_Rule%ROWTYPE ;
298: l_tar_ct_rule_rec AMS_Ct_Rule_PVT.ct_rule_rec_type := P_ct_rule_rec;
299: l_rowid ROWID;
300:
301: BEGIN
302: -- Standard Start of API savepoint
1278: IS
1279: L_API_NAME CONSTANT VARCHAR2(30) := 'Validate_Ct_Rule';
1280: L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
1281: l_object_version_number NUMBER;
1282: l_ct_rule_rec AMS_Ct_Rule_PVT.ct_rule_rec_type;
1283:
1284: BEGIN
1285: -- Standard Start of API savepoint
1286: SAVEPOINT VALIDATE_Ct_Rule_;
1857:
1858: END check_content_rule;
1859:
1860:
1861: END AMS_Ct_Rule_PVT;