9: G_USER_ID NUMBER := FND_GLOBAL.USER_ID;
10:
11: PROCEDURE INSERT_FILTER(
12: p_api_version IN NUMBER,
13: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
14: p_commit IN VARCHAR2 := FND_API.G_FALSE,
15:
16: p_filter_id OUT NOCOPY jtf_prefab_filters_b.filter_id%TYPE,
17: p_filter_name IN jtf_prefab_filters_b.filter_name%TYPE,
10:
11: PROCEDURE INSERT_FILTER(
12: p_api_version IN NUMBER,
13: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
14: p_commit IN VARCHAR2 := FND_API.G_FALSE,
15:
16: p_filter_id OUT NOCOPY jtf_prefab_filters_b.filter_id%TYPE,
17: p_filter_name IN jtf_prefab_filters_b.filter_name%TYPE,
18: p_application_id IN jtf_prefab_filters_b.application_id%TYPE,
38: -- Standard Start of API savepoint
39: SAVEPOINT INSERT_FILTER;
40:
41: -- Standard call to check for call compatibility.
42: IF NOT FND_API.Compatible_API_Call (
43: l_api_version,
44: p_api_version,
45: l_api_name,
46: G_PKG_NAME)
44: p_api_version,
45: l_api_name,
46: G_PKG_NAME)
47: THEN
48: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
49: END IF;
50:
51: -- Initialize message list if p_init_msg_list is set to TRUE.
52: IF FND_API.To_Boolean( p_init_msg_list ) THEN
48: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
49: END IF;
50:
51: -- Initialize message list if p_init_msg_list is set to TRUE.
52: IF FND_API.To_Boolean( p_init_msg_list ) THEN
53: FND_MSG_PUB.initialize;
54: END IF;
55:
56: -- Initialize API return status to success
53: FND_MSG_PUB.initialize;
54: END IF;
55:
56: -- Initialize API return status to success
57: x_return_status := FND_API.G_RET_STS_SUCCESS;
58:
59: -- real logic --
60: ----------------
61:
115: -----------------------
116: -- end of real logic --
117:
118: -- Standard check of p_commit.
119: IF (FND_API.To_Boolean(p_commit)) THEN
120: COMMIT WORK;
121: END IF;
122:
123: -- Standard call to get message count and if count is 1, get message info.
125: p_count => x_msg_count,
126: p_data => x_msg_data );
127:
128: EXCEPTION
129: WHEN FND_API.G_EXC_ERROR THEN
130: ROLLBACK TO INSERT_FILTER;
131: x_return_status := FND_API.G_RET_STS_ERROR ;
132:
133: FND_MSG_PUB.Count_And_Get(
127:
128: EXCEPTION
129: WHEN FND_API.G_EXC_ERROR THEN
130: ROLLBACK TO INSERT_FILTER;
131: x_return_status := FND_API.G_RET_STS_ERROR ;
132:
133: FND_MSG_PUB.Count_And_Get(
134: p_count => x_msg_count,
135: p_data => x_msg_data );
133: FND_MSG_PUB.Count_And_Get(
134: p_count => x_msg_count,
135: p_data => x_msg_data );
136:
137: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
138: ROLLBACK TO INSERT_FILTER;
139: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
140:
141: FND_MSG_PUB.Count_And_Get(
135: p_data => x_msg_data );
136:
137: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
138: ROLLBACK TO INSERT_FILTER;
139: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
140:
141: FND_MSG_PUB.Count_And_Get(
142: p_count => x_msg_count,
143: p_data => x_msg_data );
143: p_data => x_msg_data );
144:
145: WHEN OTHERS THEN
146: ROLLBACK TO INSERT_FILTER;
147: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
148:
149: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
150: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
151: END IF;
157: END INSERT_FILTER;
158:
159: PROCEDURE UPDATE_FILTER(
160: p_api_version IN NUMBER,
161: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
162: p_commit IN VARCHAR2 := FND_API.G_FALSE,
163:
164: p_filter_id IN jtf_prefab_filters_b.filter_id%TYPE,
165: p_filter_name IN jtf_prefab_filters_b.filter_name%TYPE,
158:
159: PROCEDURE UPDATE_FILTER(
160: p_api_version IN NUMBER,
161: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
162: p_commit IN VARCHAR2 := FND_API.G_FALSE,
163:
164: p_filter_id IN jtf_prefab_filters_b.filter_id%TYPE,
165: p_filter_name IN jtf_prefab_filters_b.filter_name%TYPE,
166: p_application_id IN jtf_prefab_filters_b.application_id%TYPE,
183: -- Standard Start of API savepoint
184: SAVEPOINT UPDATE_FILTER;
185:
186: -- Standard call to check for call compatibility.
187: IF NOT FND_API.Compatible_API_Call (
188: l_api_version,
189: p_api_version,
190: l_api_name,
191: G_PKG_NAME)
189: p_api_version,
190: l_api_name,
191: G_PKG_NAME)
192: THEN
193: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
194: END IF;
195:
196: -- Initialize message list if p_init_msg_list is set to TRUE.
197: IF FND_API.To_Boolean( p_init_msg_list ) THEN
193: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
194: END IF;
195:
196: -- Initialize message list if p_init_msg_list is set to TRUE.
197: IF FND_API.To_Boolean( p_init_msg_list ) THEN
198: FND_MSG_PUB.initialize;
199: END IF;
200:
201: -- Initialize API return status to success
198: FND_MSG_PUB.initialize;
199: END IF;
200:
201: -- Initialize API return status to success
202: x_return_status := FND_API.G_RET_STS_SUCCESS;
203:
204: -- real logic --
205: ----------------
206:
236: -----------------------
237: -- end of real logic --
238:
239: -- Standard check of p_commit.
240: IF (FND_API.To_Boolean(p_commit)) THEN
241: COMMIT WORK;
242: END IF;
243:
244: -- Standard call to get message count and if count is 1, get message info.
246: p_count => x_msg_count,
247: p_data => x_msg_data );
248:
249: EXCEPTION
250: WHEN FND_API.G_EXC_ERROR THEN
251: ROLLBACK TO UPDATE_FILTER;
252: x_return_status := FND_API.G_RET_STS_ERROR ;
253:
254: FND_MSG_PUB.Count_And_Get(
248:
249: EXCEPTION
250: WHEN FND_API.G_EXC_ERROR THEN
251: ROLLBACK TO UPDATE_FILTER;
252: x_return_status := FND_API.G_RET_STS_ERROR ;
253:
254: FND_MSG_PUB.Count_And_Get(
255: p_count => x_msg_count,
256: p_data => x_msg_data );
254: FND_MSG_PUB.Count_And_Get(
255: p_count => x_msg_count,
256: p_data => x_msg_data );
257:
258: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
259: ROLLBACK TO UPDATE_FILTER;
260: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
261:
262: FND_MSG_PUB.Count_And_Get(
256: p_data => x_msg_data );
257:
258: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
259: ROLLBACK TO UPDATE_FILTER;
260: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
261:
262: FND_MSG_PUB.Count_And_Get(
263: p_count => x_msg_count,
264: p_data => x_msg_data );
264: p_data => x_msg_data );
265:
266: WHEN OTHERS THEN
267: ROLLBACK TO UPDATE_FILTER;
268: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
269:
270: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
271: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
272: END IF;
278: END UPDATE_FILTER;
279:
280: procedure DELETE_FILTER(
281: p_api_version IN NUMBER,
282: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
283: p_commit IN VARCHAR2 := FND_API.G_FALSE,
284:
285: p_filter_id IN jtf_prefab_filters_b.filter_id%TYPE,
286:
279:
280: procedure DELETE_FILTER(
281: p_api_version IN NUMBER,
282: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
283: p_commit IN VARCHAR2 := FND_API.G_FALSE,
284:
285: p_filter_id IN jtf_prefab_filters_b.filter_id%TYPE,
286:
287: p_object_version_number IN jtf_prefab_filters_b.object_version_number%TYPE,
298: -- Standard Start of API savepoint
299: SAVEPOINT DELETE_FILTER;
300:
301: -- Standard call to check for call compatibility.
302: IF NOT FND_API.Compatible_API_Call (
303: l_api_version,
304: p_api_version,
305: l_api_name,
306: G_PKG_NAME)
304: p_api_version,
305: l_api_name,
306: G_PKG_NAME)
307: THEN
308: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
309: END IF;
310:
311: -- Initialize message list if p_init_msg_list is set to TRUE.
312: IF FND_API.To_Boolean( p_init_msg_list ) THEN
308: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
309: END IF;
310:
311: -- Initialize message list if p_init_msg_list is set to TRUE.
312: IF FND_API.To_Boolean( p_init_msg_list ) THEN
313: FND_MSG_PUB.initialize;
314: END IF;
315:
316: -- Initialize API return status to success
313: FND_MSG_PUB.initialize;
314: END IF;
315:
316: -- Initialize API return status to success
317: x_return_status := FND_API.G_RET_STS_SUCCESS;
318:
319: -- real logic --
320: ----------------
321:
329: -----------------------
330: -- end of real logic --
331:
332: -- Standard check of p_commit.
333: IF (FND_API.To_Boolean(p_commit)) THEN
334: COMMIT WORK;
335: END IF;
336:
337: -- Standard call to get message count and if count is 1, get message info.
339: p_count => x_msg_count,
340: p_data => x_msg_data );
341:
342: EXCEPTION
343: WHEN FND_API.G_EXC_ERROR THEN
344: ROLLBACK TO DELETE_FILTER;
345: x_return_status := FND_API.G_RET_STS_ERROR ;
346:
347: FND_MSG_PUB.Count_And_Get(
341:
342: EXCEPTION
343: WHEN FND_API.G_EXC_ERROR THEN
344: ROLLBACK TO DELETE_FILTER;
345: x_return_status := FND_API.G_RET_STS_ERROR ;
346:
347: FND_MSG_PUB.Count_And_Get(
348: p_count => x_msg_count,
349: p_data => x_msg_data );
347: FND_MSG_PUB.Count_And_Get(
348: p_count => x_msg_count,
349: p_data => x_msg_data );
350:
351: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
352: ROLLBACK TO DELETE_FILTER;
353: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
354:
355: FND_MSG_PUB.Count_And_Get(
349: p_data => x_msg_data );
350:
351: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
352: ROLLBACK TO DELETE_FILTER;
353: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
354:
355: FND_MSG_PUB.Count_And_Get(
356: p_count => x_msg_count,
357: p_data => x_msg_data );
357: p_data => x_msg_data );
358:
359: WHEN OTHERS THEN
360: ROLLBACK TO DELETE_FILTER;
361: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
362:
363: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
364: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
365: END IF;