DBA Data[Home] [Help]

PACKAGE BODY: APPS.IEX_BALI_FILTERS_PKG

Source


1 PACKAGE BODY IEX_BALI_FILTERS_PKG AS
2 /* $Header: iextbflb.pls 120.2 2004/05/14 15:17:46 jsanju noship $ */
3 
4 PG_DEBUG NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
5 
6 PROCEDURE Insert_Row
7     (x_rowid          	        in out nocopy varchar2
8 	,x_bali_filter_id	        in number
9     ,x_bali_filter_name         in varchar2
10     ,x_bali_datasource          in varchar2
11     ,x_bali_user_id             in number
12     ,x_bali_col_alias           in varchar2
13     ,x_bali_col_data_type       in varchar2
14     ,x_bali_col_label_text      in varchar2
15     ,x_bali_col_condition_code  in varchar2
16     ,x_bali_col_condition_value in varchar2
17     ,x_bali_col_value           in varchar2
18     ,x_right_parenthesis_code   in varchar2
19     ,x_left_parenthesis_code    in varchar2
20     ,x_boolean_operator_code    in varchar2
21 	,x_object_version_number  in number
22     ,x_request_id             in  number,
23     x_program_application_id  in  number,
24     x_program_id              in  number,
25     x_program_update_date     in  date,
26     x_attribute_category      in varchar2,
27     x_attribute1              in varchar2,
28     x_attribute2              in varchar2,
29     x_attribute3              in varchar2,
30     x_attribute4              in varchar2,
31     x_attribute5              in varchar2,
32     x_attribute6              in varchar2,
33     x_attribute7              in varchar2,
34     x_attribute8              in varchar2,
35     x_attribute9              in varchar2,
36     x_attribute10             in varchar2,
37     x_attribute11             in varchar2,
38     x_attribute12             in varchar2,
39     x_attribute13             in varchar2,
40     x_attribute14             in varchar2,
41     x_attribute15             in varchar2,
42     x_creation_date           in date,
43     x_created_by              in number,
44     x_last_update_date        in date,
45     x_last_updated_by         in number,
46     x_last_update_login       in number)  IS
47 	CURSOR C IS SELECT ROWID FROM IEX_BALI_FILTERS
48 		WHERE BALI_FILTER_ID = x_BALI_FILTER_ID;
49 
50 BEGIN
51     IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
52     IEX_DEBUG_PUB.LogMessage ('** Start of Procedure =>'||
53                'IEX_BALI_FILTERS_PKG.INSERT_ROW ** ');
54     END IF;
55 	INSERT INTO IEX_BALI_FILTERS
56 	(bali_filter_id,
57      bali_filter_name,
58      bali_datasource,
59      bali_user_id,
60      bali_col_alias,
61      bali_col_data_type,
62      bali_col_label_text,
63      bali_col_condition_code,
64      bali_col_condition_value,
65      bali_col_value,
66      right_parenthesis_code,
67      left_parenthesis_code,
68      boolean_operator_code
69     ,object_version_number
70 	,request_id
71     ,program_application_id
72 	,program_id
73 	,program_update_date
74 	,attribute_category
75 	,attribute1
76 	,attribute2
77 	,attribute3
78 	,attribute4
79 	,attribute5
80 	,attribute6
81 	,attribute7
82 	,attribute8
83 	,attribute9
84 	,attribute10
85 	,attribute11
86 	,attribute12
87 	,attribute13
88 	,attribute14
89 	,attribute15
90 	,created_by
91 	,creation_date
92 	,last_updated_by
93 	,last_update_date
94 	,last_update_login
95     )
96     VALUES (
97      x_bali_filter_id
98     ,x_bali_filter_name
99     ,x_bali_datasource
100     ,x_bali_user_id
101     ,x_bali_col_alias
102     ,x_bali_col_data_type
103     ,x_bali_col_label_text
104     ,x_bali_col_condition_code
105     ,x_bali_col_condition_value
106     ,x_bali_col_value
107     ,decode( x_right_parenthesis_code, FND_API.G_MISS_CHAR, NULL, x_right_parenthesis_code)
108     ,decode( x_left_parenthesis_code, FND_API.G_MISS_CHAR, NULL, x_left_parenthesis_code)
109     ,decode( x_boolean_operator_code, FND_API.G_MISS_CHAR, NULL, x_boolean_operator_code)
110  	,x_object_version_number
111     ,decode( x_REQUEST_ID, FND_API.G_MISS_NUM, NULL, x_REQUEST_ID),
112      decode( x_PROGRAM_APPLICATION_ID, FND_API.G_MISS_NUM, NULL, x_PROGRAM_APPLICATION_ID),
113      decode( x_PROGRAM_ID, FND_API.G_MISS_NUM, NULL, x_PROGRAM_ID),
114      decode( x_PROGRAM_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), x_PROGRAM_UPDATE_DATE),
115      decode( x_ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR, NULL, x_ATTRIBUTE_CATEGORY),
116      decode( x_ATTRIBUTE1, FND_API.G_MISS_CHAR, NULL, x_ATTRIBUTE1),
117      decode( x_ATTRIBUTE2, FND_API.G_MISS_CHAR, NULL, x_ATTRIBUTE2),
118      decode( x_ATTRIBUTE3, FND_API.G_MISS_CHAR, NULL, x_ATTRIBUTE3),
119      decode( x_ATTRIBUTE4, FND_API.G_MISS_CHAR, NULL, x_ATTRIBUTE4),
120      decode( x_ATTRIBUTE5, FND_API.G_MISS_CHAR, NULL, x_ATTRIBUTE5),
121      decode( x_ATTRIBUTE6, FND_API.G_MISS_CHAR, NULL, x_ATTRIBUTE6),
122      decode( x_ATTRIBUTE7, FND_API.G_MISS_CHAR, NULL, x_ATTRIBUTE7),
123      decode( x_ATTRIBUTE8, FND_API.G_MISS_CHAR, NULL, x_ATTRIBUTE8),
124      decode( x_ATTRIBUTE9, FND_API.G_MISS_CHAR, NULL, x_ATTRIBUTE9),
125      decode( x_ATTRIBUTE10, FND_API.G_MISS_CHAR, NULL, x_ATTRIBUTE10),
126      decode( x_ATTRIBUTE11, FND_API.G_MISS_CHAR, NULL, x_ATTRIBUTE11),
127      decode( x_ATTRIBUTE12, FND_API.G_MISS_CHAR, NULL, x_ATTRIBUTE12),
128      decode( x_ATTRIBUTE13, FND_API.G_MISS_CHAR, NULL, x_ATTRIBUTE13),
129      decode( x_ATTRIBUTE14, FND_API.G_MISS_CHAR, NULL, x_ATTRIBUTE14),
130      decode( x_ATTRIBUTE15, FND_API.G_MISS_CHAR, NULL, x_ATTRIBUTE15)
131     ,x_CREATED_BY
132     ,x_CREATION_DATE
133     ,x_LAST_UPDATED_BY
134     ,x_LAST_UPDATE_DATE
135     ,decode( x_LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL, x_LAST_UPDATE_LOGIN)
136     );
137 
138 	OPEN C;
139 	FETCH C INTO x_rowid;
140 	IF (C%NOTFOUND) THEN
141 		CLOSE C;
142 		RAISE NO_DATA_FOUND;
143 	END IF;
144 	CLOSE C;
145     IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
146         IEX_DEBUG_PUB.LogMessage ('** End of Procedure =>'||
147              'IEX_BALI_FILTERS_PKG.INSERT_ROW *** ');
148    END IF;
149 END Insert_Row;
150 
151 /* Update_Row procedure */
152 PROCEDURE Update_Row(
153 	 x_bali_filter_id	        in number
154     ,x_bali_filter_name         in varchar2
155     ,x_bali_datasource          in varchar2
156     ,x_bali_user_id             in number
157     ,x_bali_col_alias           in varchar2
158     ,x_bali_col_data_type       in varchar2
159     ,x_bali_col_label_text      in varchar2
160     ,x_bali_col_condition_code  in varchar2
161     ,x_bali_col_condition_value in varchar2
162     ,x_bali_col_value           in varchar2
163     ,x_right_parenthesis_code   in varchar2
164     ,x_left_parenthesis_code    in varchar2
165     ,x_boolean_operator_code    in varchar2
166 	,x_object_version_number  in number
167     ,x_request_id             in  number,
168     x_program_application_id  in  number,
169     x_program_id              in  number,
170     x_program_update_date     in  date,
171     x_attribute_category      in varchar2,
172     x_attribute1              in varchar2,
173     x_attribute2              in varchar2,
174     x_attribute3              in varchar2,
175     x_attribute4              in varchar2,
176     x_attribute5              in varchar2,
177     x_attribute6              in varchar2,
178     x_attribute7              in varchar2,
179     x_attribute8              in varchar2,
180     x_attribute9              in varchar2,
181     x_attribute10             in varchar2,
182     x_attribute11             in varchar2,
183     x_attribute12             in varchar2,
184     x_attribute13             in varchar2,
185     x_attribute14             in varchar2,
186     x_attribute15             in varchar2,
187     x_last_update_date        in date,
188     x_last_updated_by         in number,
189     x_last_update_login       in number)
190   IS
191 BEGIN
192 	UPDATE IEX_BALI_FILTERS SET
193 	    BALI_FILTER_ID           = decode( x_BALI_FILTER_ID, FND_API.G_MISS_NUM, NULL,
194                                          NULL, BALI_FILTER_ID, x_BALI_FILTER_ID)
195         ,bali_filter_name =decode( x_bali_filter_name, fnd_api.g_miss_char,null,
196                                     null,bali_filter_name, x_bali_filter_name)
197         ,bali_datasource=decode( x_bali_datasource, fnd_api.g_miss_char,null,
198                                     null,bali_datasource, x_bali_datasource)
199         ,bali_user_id  = decode( x_bali_user_id, FND_API.G_MISS_NUM, NULL,
200                                          NULL, bali_user_id, x_bali_user_id)
201         ,bali_col_alias=decode( x_bali_col_alias, fnd_api.g_miss_char,null,
202                                     null,bali_col_alias, x_bali_col_alias)
203         ,bali_col_data_type=decode( x_bali_col_data_type, fnd_api.g_miss_char,null,
204                                     null,bali_col_data_type, x_bali_col_data_type)
205         ,bali_col_label_text=decode( x_bali_col_label_text, fnd_api.g_miss_char,null,
206                                     null,bali_col_label_text, x_bali_col_label_text)
207         ,bali_col_condition_code=decode( x_bali_col_condition_code, fnd_api.g_miss_char,null,
208                                     null,bali_col_condition_code, x_bali_col_condition_code)
209         ,bali_col_condition_value=decode( x_bali_col_condition_value, fnd_api.g_miss_char,null,
210                                     null,bali_col_condition_value, x_bali_col_condition_value)
211         ,bali_col_value=decode( x_bali_col_value, fnd_api.g_miss_char,null,
212                                     null,bali_col_value, x_bali_col_value)
213         ,right_parenthesis_code = decode( x_right_parenthesis_code, fnd_api.g_miss_char,null,
214                                     null,right_parenthesis_code, x_right_parenthesis_code)
215         ,left_parenthesis_code  = decode( x_left_parenthesis_code, fnd_api.g_miss_char,null,
216                                     null,left_parenthesis_code, x_left_parenthesis_code)
217         ,boolean_operator_code    = decode( x_boolean_operator_code, fnd_api.g_miss_char,null,
218                                     null,boolean_operator_code, x_boolean_operator_code)
219 
220 		,object_version_number = decode( x_object_version_number, fnd_api.g_miss_num,null,
221                                        null,object_version_number, x_object_version_number)
222 
223         ,request_id = decode( x_request_id, fnd_api.g_miss_num,null,
224                                null,request_id, x_request_id),
225         program_application_id = decode( x_program_application_id, fnd_api.g_miss_num,null,
226                            null,program_application_id,   x_program_application_id),
227         program_id = decode( x_program_id, fnd_api.g_miss_num,null,
228                                  null,program_id, x_program_id),
229         program_update_date = decode( x_program_update_date, fnd_api.g_miss_date,null,
230                               null,program_update_date, x_program_update_date),
231               attribute_category = decode( x_attribute_category, fnd_api.g_miss_char,null,
232                                            null,attribute_category, x_attribute_category),
233               attribute1 = decode( x_attribute1, fnd_api.g_miss_char,null,
234                                     null,attribute1, x_attribute1),
235               attribute2 = decode( x_attribute2, fnd_api.g_miss_char,null,
236                                       null,attribute2, x_attribute2),
237               attribute3 = decode( x_attribute3, fnd_api.g_miss_char, null,
238                                      null,attribute3, x_attribute3),
239               attribute4 = decode( x_attribute4, fnd_api.g_miss_char,null,
240                                       null,attribute4, x_attribute4),
241               attribute5 = decode( x_attribute5, fnd_api.g_miss_char,null,
242                                       null,attribute5, x_attribute5),
243 
244               attribute6 = decode( x_attribute6, fnd_api.g_miss_char,null,
245                                     null,attribute6, x_attribute6),
246               attribute7 = decode( x_attribute7, fnd_api.g_miss_char,null,
247                                       null,attribute7, x_attribute7),
248               attribute8 = decode( x_attribute8, fnd_api.g_miss_char, null,
249                                      null,attribute8, x_attribute8),
250               attribute9= decode( x_attribute9, fnd_api.g_miss_char,null,
251                                       null,attribute9, x_attribute9),
252               attribute10 = decode( x_attribute10, fnd_api.g_miss_char,null,
253                                       null,attribute10, x_attribute10),
254 
255               attribute11 = decode( x_attribute11, fnd_api.g_miss_char,null,
256                                       null,attribute11, x_attribute11),
257 
258                attribute12 = decode( x_attribute10, fnd_api.g_miss_char,null,
259                                       null,attribute12, x_attribute12),
260 
261                attribute13 = decode( x_attribute10, fnd_api.g_miss_char,null,
262                                       null,attribute13, x_attribute13),
263               attribute14 = decode( x_attribute10, fnd_api.g_miss_char,null,
264                                       null,attribute14, x_attribute14),
265               attribute15 = decode( x_attribute15, fnd_api.g_miss_char,null,
266                                       null,attribute15, x_attribute15),
267 
268               last_updated_by = decode( x_last_updated_by, fnd_api.g_miss_num,null,
269                                        null,last_updated_by, x_last_updated_by),
270               last_update_date = decode( x_last_update_date, fnd_api.g_miss_date,null,
271                                       null,last_update_date, x_last_update_date),
272               last_update_login = decode( x_last_update_login, fnd_api.g_miss_num,null,
273                                      null,last_update_login, x_last_update_login)
274 
275 	 WHERE bali_filter_id = x_bali_filter_ID;
276 
277 	if (sql%notfound) then
278 		raise no_data_found;
279 	end if;
280 END Update_Row;
281 
282 /* Delete_Row procedure */
283  PROCEDURE Delete_Row(x_bali_filter_id IN NUMBER)
284   IS
285 BEGIN
286      IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
287      IEX_DEBUG_PUB.LogMessage ('*** Start of Procedure =>IEX_BALI_FILTERS_PKG.DELETE_ROW *** ');
288      END IF;
289       delete from IEX_BALI_FILTERS
290       where  bali_filter_id = x_bali_filter_id;
291 
292       if (sql%notfound) then
293          raise no_data_found;
294       end if;
295 
296 END Delete_Row;
297 
298 procedure LOCK_ROW (
299   x_bali_filter_id in NUMBER,
300   X_OBJECT_VERSION_NUMBER in NUMBER
301 ) is
302   cursor c is select OBJECT_VERSION_NUMBER
303     from IEX_BALI_FILTERS
304     where bali_filter_id  = X_bali_filter_id
305     and OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER
306     for update of bali_filter_id  nowait;
307   recinfo c%rowtype;
308 
309 
310 begin
311  IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
312  IEX_DEBUG_PUB.LogMessage ('*** Start of Procedure =>IEX_BALI_FILTERS_PKG.LOCK_ROW ** ');
313  END IF;
314   open c;
315   fetch c into recinfo;
316   if (c%notfound) then
317     close c;
318     fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
319     app_exception.raise_exception;
320   end if;
321 
322   close c;
323 
324   if recinfo.OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER then
325     null;
326   else
327     fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
328     app_exception.raise_exception;
329   end if;
330 IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
331 IEX_DEBUG_PUB.LogMessage ('********* End of Procedure =>IEX_BALI_FILTERS_PKG.LOCK_ROW ******** ');
332 END IF;
333 end LOCK_ROW;
334 
335 END IEX_BALI_FILTERS_PKG;
336