1 PACKAGE JTF_AE_SQLUtil_API AUTHID CURRENT_USER AS
2 /* $Header: jtfaeaps.pls 120.2 2005/10/25 05:13:50 psanyal ship $ */
3
4 -- Register a new profile for a base table
5 PROCEDURE registerProfile(
6 p_ProfileName IN JTF_PROFILE_MAPPINGS_TL.profileName%TYPE,
7 p_BaseTable IN JTF_PROFILE_MAPPINGS_TL.baseTable%TYPE,
8 p_AppID IN JTF_PROFILE_MAPPINGS_B.ownerID%TYPE,
9 p_userID IN JTF_PROFILE_MAPPINGS_B.created_by%TYPE);
10
11 -- Register primary key
12 PROCEDURE registerPrimaryKey(
13 p_ProfileName IN JTF_PROFILE_MAPPINGS_TL.profileName%TYPE,
14 p_appID IN JTF_ProfileProperties_B.last_updated_by%TYPE,
15 p_propertyName IN JTF_ProfileProperties_TL.propertyName%TYPE,
16 p_attrName IN JTF_ProfileProperties_B.attrName%TYPE,
17 p_propDesc IN JTF_ProfileProperties_TL.prop_description%TYPE,
18 p_userID IN JTF_ProfileProperties_B.created_by%TYPE );
19
20 -- Register Object Version
21 PROCEDURE registerObjectVersion(
22 p_ProfileName IN JTF_PROFILE_MAPPINGS_TL.profileName%TYPE,
23 p_appID IN JTF_ProfileProperties_B.last_updated_by%TYPE,
24 p_attrName IN JTF_ProfileProperties_B.attrName%TYPE,
25 p_propDesc IN JTF_ProfileProperties_TL.prop_description%TYPE,
26 p_userID IN JTF_ProfileProperties_B.created_by%TYPE );
27
28 -- Insert a new Profile Owner object into JTF_ProfileProperties_B/TL
29 -- Return the primary key for the newly inserted object.
30 PROCEDURE addAttribute (
31 p_ProfileName IN JTF_PROFILE_MAPPINGS_TL.profileName%TYPE,
32 p_appID IN JTF_ProfileProperties_B.last_updated_by%TYPE,
33 p_OwnerID IN JTF_ProfileProperties_B.owner_application_id%TYPE,
34 p_propertyName IN JTF_ProfileProperties_TL.propertyName%TYPE,
35 p_propDesc IN JTF_ProfileProperties_TL.prop_description%TYPE,
36 p_isBase IN NUMBER,
37 p_userID IN JTF_ProfileProperties_B.created_by%TYPE,
38 p_PK OUT NOCOPY /* file.sql.39 change */ NUMBER,
39 p_OID OUT NOCOPY /* file.sql.39 change */ NUMBER,
40 p_ATTR OUT NOCOPY /* file.sql.39 change */ JTF_ProfileProperties_B.attrname%TYPE);
41
42 -- Insert a new ProfilePropertyDescriptor into JTF_Profile_Metadata_B/TL
43 -- Return the primary key for the newly inserted object.
44 PROCEDURE addAttribute (
45 p_ProfileName IN JTF_PROFILE_MAPPINGS_TL.profileName%TYPE,
46 p_appID IN JTF_Profile_Metadata_B.last_updated_by%TYPE,
47 p_PropertyName IN JTF_ProfileProperties_TL.propertyName%TYPE,
48 p_pID IN JTF_Profile_Metadata_B.profileproperties_ID%TYPE,
49 p_rID IN JTF_Profile_Metadata_B.profile_rules_ID%TYPE,
50 p_disabledCode IN JTF_Profile_Metadata_B.disabled_flag_code%TYPE,
51 p_mandatoryCode IN JTF_Profile_Metadata_B.mandatory_flag_code%TYPE,
52 p_javaTypeCode IN JTF_Profile_Metadata_B.java_datatype_code%TYPE,
53 p_default IN JTF_Profile_Metadata_TL.default_value%TYPE,
54 p_userID IN JTF_Profile_Metadata_B.created_by%TYPE,
55 p_PK OUT NOCOPY /* file.sql.39 change */ NUMBER,
56 p_OID OUT NOCOPY /* file.sql.39 change */ NUMBER,
57 p_SPID OUT NOCOPY /* file.sql.39 change */ NUMBER);
58
59 -- Add an instance specific attribute. If the rule associated
60 -- with the attribute is not registered yet, first register the rule.
61
62 PROCEDURE addAttribute (
63 p_ProfileName IN JTF_PROFILE_MAPPINGS_TL.profileName%TYPE,
64 p_appID IN JTF_Profile_Metadata_B.last_updated_by%TYPE,
65 p_disabledCode IN JTF_Profile_Metadata_B.disabled_flag_code%TYPE,
66 p_mandatoryCode IN JTF_Profile_Metadata_B.mandatory_flag_code%TYPE,
67 p_javaTypeCode IN JTF_Profile_Metadata_B.java_datatype_code%TYPE,
68 p_default IN JTF_Profile_Metadata_TL.default_value%TYPE,
69 p_extPropertyName IN JTF_PROFILEPROPERTIES_TL.propertyName%TYPE,
70 p_basePropertyName IN JTF_PROFILEPROPERTIES_TL.propertyName%TYPE,
71 p_basePropertyVal IN JTF_PROFILE_RULES_TL.base_property_value%TYPE,
72 p_rule IN JTF_Profile_Rules_B.rule%TYPE,
73 p_userID IN JTF_Profile_Rules_B.created_by%TYPE,
74 p_PK OUT NOCOPY /* file.sql.39 change */ NUMBER,
75 p_OID OUT NOCOPY /* file.sql.39 change */ NUMBER,
76 p_SPID OUT NOCOPY /* file.sql.39 change */ NUMBER);
77
78 -- Modify an existing base or instance specific attribute
79 PROCEDURE modifyAttribute (
80 p_appID IN JTF_Profile_Metadata_B.last_updated_by%TYPE,
81 p_Key IN JTF_Profile_Metadata_B.profile_metadata_id%TYPE,
82 p_disabledCode IN JTF_Profile_Metadata_B.disabled_flag_code%TYPE,
83 p_mandatoryCode IN JTF_Profile_Metadata_B.mandatory_flag_code%TYPE,
84 p_javaTypeCode IN JTF_Profile_Metadata_B.java_datatype_code%TYPE,
85 p_default IN JTF_Profile_Metadata_TL.default_value%TYPE,
86 p_version IN JTF_Profile_Metadata_B.object_version_number%TYPE,
87 p_userID IN JTF_Profile_Metadata_B.created_by%TYPE,
88 p_Count OUT NOCOPY /* file.sql.39 change */ NUMBER);
89
90 -- Add a new rule for instance specific attributes to JTF_PROFILE_RULES_B/TL
91 -- Return the PROFILE_RULE_ID generated.
92 PROCEDURE addRule(
93 p_ProfileName IN JTF_PROFILE_MAPPINGS_TL.profileName%TYPE,
94 p_appID IN JTF_PROFILE_RULES_B.last_updated_by%TYPE,
95 p_propertyName IN JTF_ProfileProperties_TL.propertyName%TYPE,
96 p_baseValue IN JTF_PROFILE_RULES_TL.base_property_value%TYPE,
97 p_rule IN JTF_Profile_Rules_B.rule%TYPE,
98 p_userID IN JTF_Profile_Rules_B.created_by%TYPE,
99 p_ruleID OUT NOCOPY /* file.sql.39 change */ JTF_PROFILE_Rules_B.profile_rules_id%TYPE);
100
101
102 -- HELPER FUNCTIONS
103 FUNCTION getProfileID(
104 p_ProfileName IN JTF_PROFILE_MAPPINGS_TL.profileName%TYPE)
105 RETURN NUMBER;
106
107 FUNCTION getAttrName (
108 p_profile_mappings_id IN NUMBER,
109 p_appID IN NUMBER,
110 p_isBase IN NUMBER )
111 RETURN VARCHAR2;
112
113 PROCEDURE getAppProfileID(
114 p_ProfileName IN JTF_PROFILE_MAPPINGS_TL.profileName%TYPE,
115 p_appID IN JTF_SUBSCRIBED_PROFILES.application_id%TYPE,
116 p_PMAPID OUT NOCOPY /* file.sql.39 change */ NUMBER,
117 p_SUBID OUT NOCOPY /* file.sql.39 change */ NUMBER);
118
119 -- Test debug procedure
120 PROCEDURE run;
121
122
123 END JTF_AE_SQLUtil_API;
[Home] [Help]