DBA Data[Home] [Help]

PACKAGE: APPS.JTF_PERZ_PROFILE_PVT

Source


1 PACKAGE JTF_PERZ_PROFILE_PVT AS
2 /* $Header: jtfzvpfs.pls 120.2 2005/11/02 22:47:53 skothe ship $ */
3 --
4 --
5 -- Start of Comments
6 --
7 -- NAME
8 --   JTF_PERZ_PROFILE_PVT
9 --
10 -- PURPOSE
11 --   Private API for managing common functionality across the personalization
12 --	framework.
13 --
14 -- NOTES
15 --   This is used by public as well as private APIs.
16 --
17 -- HISTORY
18 --   06/03/99   SMATTEGU      Created
19 --   06/10/99   SMATTEGU      Added Update_Profile, Get_Profile
20 --   06/11/99   SMATTEGU      Added check_profile_duplicates,
21 --				check_prof_attrib_duplicates
22 -- 09/30/99  SMATTEGU	Chnaged the create_profile() to handle profile_id also.
23 --
24 -- *****************************************************************************
25 --
26 -- USAGE NOTES :
27 --
28 --	Procedure Name: Create_Profile
29 --		This procedure will insert the profile header and profile attributes
30 --		This procedure will in turn call
31 --			insert_profile() to insert Profile.
32 --			insert_profile_attributes() to insert the attributes
33 --				for a given profile.
34 --	Input Paramaters:
35 --		p_api_version_number
36 --		p_init_msg_list
37 --		p_commit
38 --		p_profile_id
39 --		p_profile_name
40 --		p_profile_desc
41 --		p_Profile_ATTRIB_Tbl
42 --	Output Paramaters:
43 --		x_Profile_Tbl
44 --		x_return_status
45 --		x_msg_count
46 --		x_msg_data
47 -- *****************************************************************************
48 
49 PROCEDURE Create_Profile
50 ( 	p_api_version_number	IN	NUMBER,
51 	p_init_msg_list		    IN	VARCHAR2 := FND_API.G_FALSE,
52 	p_commit				IN	VARCHAR2 := FND_API.G_FALSE,
53 
54 	p_profile_id		IN	NUMBER,
55 	p_profile_name          IN	VARCHAR2 := NULL,
56 	p_profile_type			IN VARCHAR2 := NULL,
57 	p_profile_desc          IN	VARCHAR2 := NULL,
58 	p_profile_attrib_tbl	IN	JTF_PERZ_PROFILE_PUB.PROFILE_ATTRIB_TBL_TYPE
59 						 	:= JTF_PERZ_PROFILE_PUB.G_MISS_PROFILE_ATTRIB_TBL,
60 
61 	x_profile_name      OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
62 	x_profile_id        OUT NOCOPY /* file.sql.39 change */ NUMBER,
63 	x_return_status	 OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
64 	x_msg_count		 OUT NOCOPY /* file.sql.39 change */ NUMBER,
65 	x_msg_data		 OUT NOCOPY /* file.sql.39 change */ VARCHAR2
66 );
67 
68 
69 -- *****************************************************************************
70 --
71 -- USAGE NOTES :
72 --
73 --	Procedure Name: Update
74 --		This procedure will update the profile header and profile attributes
75 --		This procedure will in turn call
76 --			update_profile() to update Profile.
77 --			update_profile_attributes() to update the attributes
78 --				for a given profile.
79 --	Input Paramaters:
80 --		p_api_version_number
81 --		p_init_msg_list
82 --		p_profile_name
83 --		p_profile_desc
84 --		p_profile_attrib_tbl
85 --	Output Paramaters:
86 --		x_Profile_Tbl
87 --		x_return_status
88 --		x_msg_count
89 --		x_msg_data
90 -- *****************************************************************************
91 
92 PROCEDURE Update_Profile
93 ( 	p_api_version_number	IN	NUMBER,
94 	p_init_msg_list		IN	VARCHAR2 := FND_API.G_FALSE,
95 	p_commit		IN	VARCHAR2 := FND_API.G_FALSE,
96 
97 	p_profile_id            IN	NUMBER,
98 	p_profile_name          IN	VARCHAR2,
99 	p_profile_type		IN VARCHAR2 := NULL,
100 	p_profile_desc          IN	VARCHAR2,
101 	p_active_flag		IN VARCHAR2,
102 	p_Profile_ATTRIB_Tbl	IN	JTF_PERZ_PROFILE_PUB.PROFILE_ATTRIB_TBL_TYPE,
103 
104 	x_profile_id	 OUT NOCOPY /* file.sql.39 change */ NUMBER,
105 	x_return_status	 OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
106 	x_msg_count	 OUT NOCOPY /* file.sql.39 change */ NUMBER,
107 	x_msg_data	 OUT NOCOPY /* file.sql.39 change */ VARCHAR2
108 );
109 
110 
111 -- *****************************************************************************
112 PROCEDURE Get_Profile
113 ( 	p_api_version_number	IN	NUMBER,
114 	p_init_msg_list		IN	VARCHAR2  := FND_API.G_FALSE,
115 
116 	p_profile_id            IN	NUMBER := NULL,
117 	p_profile_name          IN	VARCHAR2 := NULL,
118 	p_profile_type		IN VARCHAR2 := NULL,
119 	p_profile_attrib_tbl	IN	JTF_PERZ_PROFILE_PUB.PROFILE_ATTRIB_TBL_TYPE
120 				:= JTF_PERZ_PROFILE_PUB.G_MISS_PROFILE_ATTRIB_TBL,
121 
122 	x_profile_tbl	 OUT NOCOPY /* file.sql.39 change */ JTF_PERZ_PROFILE_PUB.PROFILE_OUT_TBL_TYPE,
123 	x_return_status	 OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
124 	x_msg_count	 OUT NOCOPY /* file.sql.39 change */ NUMBER,
125 	x_msg_data	 OUT NOCOPY /* file.sql.39 change */ VARCHAR2
126 );
127 
128 -- *****************************************************************************
129 --
130 -- USAGE NOTES :
131 --
132 --	check_profile_duplicates procedure checks the duplicate  entries in
133 --	profile table.
134 --	Input Paramaters:
135 --		p_profile_name
136 --			This specifies the profile name which is used to check the
137 --			duplicates
138 --	Output Parameters:
139 --		x_profile_id
140 --			If the duplicate exists, the profile id of the existing profile
141 --			will be returned
142 --		x_return_status
143 --			This will be Yes if there is already an entry.
144 --			Otherwise,this will be No.
145 --		x_return_count
146 --			This returns the number of duplicates (if any)
147 --
148 --
149 -- *****************************************************************************
150 PROCEDURE check_profile_duplicates(
151 	p_profile_name      IN   VARCHAR2,
152 	x_return_status     OUT NOCOPY /* file.sql.39 change */  VARCHAR2,
153  	x_profile_id        IN OUT NOCOPY /* file.sql.39 change */  NUMBER
154 );
155 
156 -- *****************************************************************************
157 --
158 -- USAGE NOTES :
159 --
160 --	check_prof_attrib_duplicates procedure checks the duplicate  entries in
161 --	profile attribute table.
162 --	Input Paramaters:
163 --		p_Profile_ATTRIB_Tbl
164 --			This specifies the profile attribute set which is used to check
165 --			the duplicates
166 --	Output Parameters:
167 --		x_profile_id
168 --			If the duplicate exists, the profile id of the existing profile
169 --			will be returned
170 --		x_return_status
171 --			This will be Yes if there is already an entry.
172 --			Otherwise,this will be No.
173 --		x_return_count
174 --			This returns the number of duplicates (if any)
175 --
176 --
177 -- *****************************************************************************
178 
179 -- PROCEDURE check_prof_attrib_duplicates
180 -- (	p_profile_attrib_tbl    IN   JTF_PERZ_PROFILE_PUB.PROFILE_ATTRIB_TBL_TYPE,
181 --  	x_return_status	 OUT  	BOOLEAN,
182 -- 	x_profile_id	 OUT  NUMBER
183 -- );
184 -- ****************************************************************************
185 -- ****************************************************************************
186 END JTF_PERZ_PROFILE_PVT;