16: -- Pre-reqs : None.
17: -- Parameters :
18: -- IN : p_api_version IN NUMBER Required
19: -- p_init_msg_list IN VARCHAR2 Optional
20: -- Default = FND_API.G_FALSE
21: -- p_commit IN VARCHAR2 Optional
22: -- Default = FND_API.G_FALSE
23: -- p_validation_level IN NUMBER Optional
24: -- Default = FND_API.G_VALID_LEVEL_FULL
18: -- IN : p_api_version IN NUMBER Required
19: -- p_init_msg_list IN VARCHAR2 Optional
20: -- Default = FND_API.G_FALSE
21: -- p_commit IN VARCHAR2 Optional
22: -- Default = FND_API.G_FALSE
23: -- p_validation_level IN NUMBER Optional
24: -- Default = FND_API.G_VALID_LEVEL_FULL
25: -- p_ruleset_rec IN
26: -- CN_Ruleset_PUB.ruleset_rec_type
20: -- Default = FND_API.G_FALSE
21: -- p_commit IN VARCHAR2 Optional
22: -- Default = FND_API.G_FALSE
23: -- p_validation_level IN NUMBER Optional
24: -- Default = FND_API.G_VALID_LEVEL_FULL
25: -- p_ruleset_rec IN
26: -- CN_Ruleset_PUB.ruleset_rec_type
27: --
28: -- OUT : x_return_status OUT VARCHAR2(1)
41: -- End of comments
42:
43: PROCEDURE create_ruleset
44: ( p_api_version IN NUMBER,
45: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
46: p_commit IN VARCHAR2 := FND_API.G_FALSE,
47: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
48: x_return_status OUT NOCOPY VARCHAR2,
49: x_msg_count OUT NOCOPY NUMBER,
42:
43: PROCEDURE create_ruleset
44: ( p_api_version IN NUMBER,
45: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
46: p_commit IN VARCHAR2 := FND_API.G_FALSE,
47: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
48: x_return_status OUT NOCOPY VARCHAR2,
49: x_msg_count OUT NOCOPY NUMBER,
50: x_msg_data OUT NOCOPY VARCHAR2,
43: PROCEDURE create_ruleset
44: ( p_api_version IN NUMBER,
45: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
46: p_commit IN VARCHAR2 := FND_API.G_FALSE,
47: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
48: x_return_status OUT NOCOPY VARCHAR2,
49: x_msg_count OUT NOCOPY NUMBER,
50: x_msg_data OUT NOCOPY VARCHAR2,
51: x_loading_status OUT NOCOPY VARCHAR2,
81:
82: --
83: -- Standard call to check for call compatibility.
84: --
85: IF NOT FND_API.Compatible_API_Call ( l_api_version,
86: p_api_version,
87: l_api_name,
88: G_PKG_NAME )
89: THEN
86: p_api_version,
87: l_api_name,
88: G_PKG_NAME )
89: THEN
90: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
91: END IF;
92:
93: -- Initialize message list if p_init_msg_list is set to TRUE.
94: IF FND_API.to_Boolean( p_init_msg_list )
90: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
91: END IF;
92:
93: -- Initialize message list if p_init_msg_list is set to TRUE.
94: IF FND_API.to_Boolean( p_init_msg_list )
95: THEN
96: FND_MSG_PUB.initialize;
97: END IF;
98:
98:
99: --
100: -- Initialize API return status to success
101: --
102: x_return_status := FND_API.G_RET_STS_SUCCESS;
103: x_loading_status := 'CN_INSERTED';
104:
105:
106: --
129: x_msg_data => x_msg_data,
130: x_loading_status => x_loading_status,
131: p_ruleset_rec => l_ruleset_rec);
132:
133: IF x_return_status = fnd_api.g_ret_sts_error
134: THEN
135: RAISE fnd_api.g_exc_error;
136: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
137: THEN
131: p_ruleset_rec => l_ruleset_rec);
132:
133: IF x_return_status = fnd_api.g_ret_sts_error
134: THEN
135: RAISE fnd_api.g_exc_error;
136: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
137: THEN
138: RAISE fnd_api.g_exc_unexpected_error;
139: END IF;
132:
133: IF x_return_status = fnd_api.g_ret_sts_error
134: THEN
135: RAISE fnd_api.g_exc_error;
136: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
137: THEN
138: RAISE fnd_api.g_exc_unexpected_error;
139: END IF;
140: END IF;
134: THEN
135: RAISE fnd_api.g_exc_error;
136: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
137: THEN
138: RAISE fnd_api.g_exc_unexpected_error;
139: END IF;
140: END IF;
141:
142: -- vertical industry pre-processing section
156: x_msg_data => x_msg_data,
157: x_loading_status => x_loading_status,
158: p_ruleset_rec => l_ruleset_rec);
159:
160: IF x_return_status = fnd_api.g_ret_sts_error
161: THEN
162: RAISE fnd_api.g_exc_error;
163: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
164: THEN
158: p_ruleset_rec => l_ruleset_rec);
159:
160: IF x_return_status = fnd_api.g_ret_sts_error
161: THEN
162: RAISE fnd_api.g_exc_error;
163: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
164: THEN
165: RAISE fnd_api.g_exc_unexpected_error;
166: END IF;
159:
160: IF x_return_status = fnd_api.g_ret_sts_error
161: THEN
162: RAISE fnd_api.g_exc_error;
163: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
164: THEN
165: RAISE fnd_api.g_exc_unexpected_error;
166: END IF;
167: END IF;
161: THEN
162: RAISE fnd_api.g_exc_error;
163: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
164: THEN
165: RAISE fnd_api.g_exc_unexpected_error;
166: END IF;
167: END IF;
168:
169: --
175: IF (cn_api.chk_miss_null_char_para
176: ( l_ruleset_rec.ruleset_name,
177: cn_api.get_lkup_meaning('RULESET_NAME', 'RULESET_TYPE'),
178: x_loading_status,
179: x_loading_status) = FND_API.G_TRUE )
180: THEN
181: RAISE fnd_api.g_exc_error;
182: END IF;
183: IF (cn_api.chk_miss_null_char_para
177: cn_api.get_lkup_meaning('RULESET_NAME', 'RULESET_TYPE'),
178: x_loading_status,
179: x_loading_status) = FND_API.G_TRUE )
180: THEN
181: RAISE fnd_api.g_exc_error;
182: END IF;
183: IF (cn_api.chk_miss_null_char_para
184: ( l_ruleset_rec.module_type,
185: cn_api.get_lkup_meaning('MODULE_TYPE', 'RULESET_TYPE'),
183: IF (cn_api.chk_miss_null_char_para
184: ( l_ruleset_rec.module_type,
185: cn_api.get_lkup_meaning('MODULE_TYPE', 'RULESET_TYPE'),
186: x_loading_status,
187: x_loading_status) = FND_API.G_TRUE )
188: THEN
189: RAISE fnd_api.g_exc_error;
190: END IF;
191:
185: cn_api.get_lkup_meaning('MODULE_TYPE', 'RULESET_TYPE'),
186: x_loading_status,
187: x_loading_status) = FND_API.G_TRUE )
188: THEN
189: RAISE fnd_api.g_exc_error;
190: END IF;
191:
192: IF cn_api.chk_miss_null_date_para
193: ( l_ruleset_rec.end_date,
192: IF cn_api.chk_miss_null_date_para
193: ( l_ruleset_rec.end_date,
194: cn_api.get_lkup_meaning('END_DATE', 'RULESET_TYPE'),
195: x_loading_status,
196: x_loading_status) = fnd_api.g_true
197: THEN
198: RAISE fnd_api.g_exc_error;
199: END IF;
200:
194: cn_api.get_lkup_meaning('END_DATE', 'RULESET_TYPE'),
195: x_loading_status,
196: x_loading_status) = fnd_api.g_true
197: THEN
198: RAISE fnd_api.g_exc_error;
199: END IF;
200:
201: IF cn_api.chk_miss_null_date_para
202: (l_ruleset_rec.start_date,
201: IF cn_api.chk_miss_null_date_para
202: (l_ruleset_rec.start_date,
203: cn_api.get_lkup_meaning('START_DATE', 'RULESET_TYPE'),
204: x_loading_status,
205: x_loading_status)= fnd_api.g_true
206: THEN
207: RAISE fnd_api.g_exc_error;
208: END IF;
209:
203: cn_api.get_lkup_meaning('START_DATE', 'RULESET_TYPE'),
204: x_loading_status,
205: x_loading_status)= fnd_api.g_true
206: THEN
207: RAISE fnd_api.g_exc_error;
208: END IF;
209:
210: --Now check if the ruleset exists.
211: --If it does, then raise error
230: fnd_msg_pub.add;
231: END IF;
232:
233: x_loading_status := 'CN_RULESET_EXISTS';
234: RAISE FND_API.G_EXC_ERROR;
235:
236: END IF;
237:
238: l_ruleset_rec_pvt.ruleset_name := p_ruleset_rec.ruleset_name;
257: x_loading_status => x_loading_status,
258: x_ruleset_id => l_ruleset_id,
259: p_ruleset_rec => l_ruleset_rec_pvt);
260:
261: IF x_return_status = fnd_api.g_ret_sts_error
262: THEN
263: RAISE fnd_api.g_exc_error;
264: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
265: THEN
259: p_ruleset_rec => l_ruleset_rec_pvt);
260:
261: IF x_return_status = fnd_api.g_ret_sts_error
262: THEN
263: RAISE fnd_api.g_exc_error;
264: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
265: THEN
266: RAISE fnd_api.g_exc_unexpected_error;
267: END IF;
260:
261: IF x_return_status = fnd_api.g_ret_sts_error
262: THEN
263: RAISE fnd_api.g_exc_error;
264: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
265: THEN
266: RAISE fnd_api.g_exc_unexpected_error;
267: END IF;
268:
262: THEN
263: RAISE fnd_api.g_exc_error;
264: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
265: THEN
266: RAISE fnd_api.g_exc_unexpected_error;
267: END IF;
268:
269: --
270: -- End of API body.
293: x_msg_data => x_msg_data,
294: x_loading_status => x_loading_status,
295: p_ruleset_rec => l_ruleset_rec);
296:
297: IF x_return_status = fnd_api.g_ret_sts_error
298: THEN
299: RAISE fnd_api.g_exc_error;
300: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
301: THEN
295: p_ruleset_rec => l_ruleset_rec);
296:
297: IF x_return_status = fnd_api.g_ret_sts_error
298: THEN
299: RAISE fnd_api.g_exc_error;
300: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
301: THEN
302: RAISE fnd_api.g_exc_unexpected_error;
303: END IF;
296:
297: IF x_return_status = fnd_api.g_ret_sts_error
298: THEN
299: RAISE fnd_api.g_exc_error;
300: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
301: THEN
302: RAISE fnd_api.g_exc_unexpected_error;
303: END IF;
304: END IF;
298: THEN
299: RAISE fnd_api.g_exc_error;
300: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
301: THEN
302: RAISE fnd_api.g_exc_unexpected_error;
303: END IF;
304: END IF;
305:
306: -- customer post processing section
320: x_msg_data => x_msg_data,
321: x_loading_status => x_loading_status,
322: p_ruleset_rec => l_ruleset_rec);
323:
324: IF x_return_status = fnd_api.g_ret_sts_error
325: THEN
326: RAISE fnd_api.g_exc_error;
327: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
328: THEN
322: p_ruleset_rec => l_ruleset_rec);
323:
324: IF x_return_status = fnd_api.g_ret_sts_error
325: THEN
326: RAISE fnd_api.g_exc_error;
327: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
328: THEN
329: RAISE fnd_api.g_exc_unexpected_error;
330: END IF;
323:
324: IF x_return_status = fnd_api.g_ret_sts_error
325: THEN
326: RAISE fnd_api.g_exc_error;
327: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
328: THEN
329: RAISE fnd_api.g_exc_unexpected_error;
330: END IF;
331: END IF;
325: THEN
326: RAISE fnd_api.g_exc_error;
327: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
328: THEN
329: RAISE fnd_api.g_exc_unexpected_error;
330: END IF;
331: END IF;
332: -- SK End of post processing hooks
333:
361: p_action_code => 'I',
362: p_bind_data_id => l_bind_data_id,
363: x_return_code => l_return_code) ;
364:
365: IF (l_return_code = FND_API.G_RET_STS_ERROR)
366: THEN
367: RAISE FND_API.G_EXC_ERROR;
368: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR )
369: THEN
363: x_return_code => l_return_code) ;
364:
365: IF (l_return_code = FND_API.G_RET_STS_ERROR)
366: THEN
367: RAISE FND_API.G_EXC_ERROR;
368: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR )
369: THEN
370: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
371: END IF;
364:
365: IF (l_return_code = FND_API.G_RET_STS_ERROR)
366: THEN
367: RAISE FND_API.G_EXC_ERROR;
368: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR )
369: THEN
370: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
371: END IF;
372:
366: THEN
367: RAISE FND_API.G_EXC_ERROR;
368: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR )
369: THEN
370: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
371: END IF;
372:
373:
374: /*
381: p_oai_param => null,
382: p_oai_array => l_oai_array,
383: x_return_code => x_return_status) ;
384:
385: IF (x_return_status = FND_API.G_RET_STS_ERROR)
386: THEN
387: RAISE FND_API.G_EXC_ERROR;
388: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR )
389: THEN
383: x_return_code => x_return_status) ;
384:
385: IF (x_return_status = FND_API.G_RET_STS_ERROR)
386: THEN
387: RAISE FND_API.G_EXC_ERROR;
388: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR )
389: THEN
390: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
391: END IF;
384:
385: IF (x_return_status = FND_API.G_RET_STS_ERROR)
386: THEN
387: RAISE FND_API.G_EXC_ERROR;
388: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR )
389: THEN
390: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
391: END IF;
392: */
386: THEN
387: RAISE FND_API.G_EXC_ERROR;
388: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR )
389: THEN
390: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
391: END IF;
392: */
393: END IF;
394: END IF;
395:
396:
397:
398: -- Standard check of p_commit.
399: IF FND_API.To_Boolean( p_commit )
400: THEN
401:
402: COMMIT WORK;
403: END IF;
410: FND_MSG_PUB.Count_And_Get
411: (
412: p_count => x_msg_count ,
413: p_data => x_msg_data ,
414: p_encoded => FND_API.G_FALSE
415: );
416: EXCEPTION
417: WHEN FND_API.G_EXC_ERROR THEN
418: ROLLBACK TO Create_Ruleset;
413: p_data => x_msg_data ,
414: p_encoded => FND_API.G_FALSE
415: );
416: EXCEPTION
417: WHEN FND_API.G_EXC_ERROR THEN
418: ROLLBACK TO Create_Ruleset;
419: x_return_status := FND_API.G_RET_STS_ERROR ;
420: FND_MSG_PUB.Count_And_Get
421: (
415: );
416: EXCEPTION
417: WHEN FND_API.G_EXC_ERROR THEN
418: ROLLBACK TO Create_Ruleset;
419: x_return_status := FND_API.G_RET_STS_ERROR ;
420: FND_MSG_PUB.Count_And_Get
421: (
422: p_count => x_msg_count ,
423: p_data => x_msg_data ,
420: FND_MSG_PUB.Count_And_Get
421: (
422: p_count => x_msg_count ,
423: p_data => x_msg_data ,
424: p_encoded => FND_API.G_FALSE
425: );
426: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
427: ROLLBACK TO Create_Ruleset;
428: x_loading_status := 'UNEXPECTED_ERR';
422: p_count => x_msg_count ,
423: p_data => x_msg_data ,
424: p_encoded => FND_API.G_FALSE
425: );
426: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
427: ROLLBACK TO Create_Ruleset;
428: x_loading_status := 'UNEXPECTED_ERR';
429: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
430: FND_MSG_PUB.Count_And_Get
425: );
426: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
427: ROLLBACK TO Create_Ruleset;
428: x_loading_status := 'UNEXPECTED_ERR';
429: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
430: FND_MSG_PUB.Count_And_Get
431: (
432: p_count => x_msg_count ,
433: p_data => x_msg_data ,
430: FND_MSG_PUB.Count_And_Get
431: (
432: p_count => x_msg_count ,
433: p_data => x_msg_data ,
434: p_encoded => FND_API.G_FALSE
435: );
436: WHEN OTHERS THEN
437: ROLLBACK TO Create_Ruleset;
438: x_loading_status := 'UNEXPECTED_ERR';
435: );
436: WHEN OTHERS THEN
437: ROLLBACK TO Create_Ruleset;
438: x_loading_status := 'UNEXPECTED_ERR';
439: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
440: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
441: THEN
442: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
443: END IF;
444: FND_MSG_PUB.Count_And_Get
445: (
446: p_count => x_msg_count ,
447: p_data => x_msg_data ,
448: p_encoded => FND_API.G_FALSE
449: );
450: END Create_Ruleset;
451:
452: -- Start of comments
458: -- Pre-reqs : None.
459: -- Parameters :
460: -- IN : p_api_version IN NUMBER Required
461: -- p_init_msg_list IN VARCHAR2 Optional
462: -- Default = FND_API.G_FALSE
463: -- p_commit IN VARCHAR2 Optional
464: -- Default = FND_API.G_FALSE
465: -- p_validation_level IN NUMBER Optional
466: -- Default = FND_API.G_VALID_LEVEL_FULL
460: -- IN : p_api_version IN NUMBER Required
461: -- p_init_msg_list IN VARCHAR2 Optional
462: -- Default = FND_API.G_FALSE
463: -- p_commit IN VARCHAR2 Optional
464: -- Default = FND_API.G_FALSE
465: -- p_validation_level IN NUMBER Optional
466: -- Default = FND_API.G_VALID_LEVEL_FULL
467: -- p_ruleset_rec_type IN
468: -- CN_Ruleset_PUB.ruleset_rec_type
462: -- Default = FND_API.G_FALSE
463: -- p_commit IN VARCHAR2 Optional
464: -- Default = FND_API.G_FALSE
465: -- p_validation_level IN NUMBER Optional
466: -- Default = FND_API.G_VALID_LEVEL_FULL
467: -- p_ruleset_rec_type IN
468: -- CN_Ruleset_PUB.ruleset_rec_type
469: --
470: -- OUT : x_return_status OUT VARCHAR2(1)
484:
485:
486: PROCEDURE Update_Ruleset
487: ( p_api_version IN NUMBER,
488: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
489: p_commit IN VARCHAR2 := FND_API.G_FALSE,
490: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
491: x_return_status OUT NOCOPY VARCHAR2,
492: x_msg_count OUT NOCOPY NUMBER,
485:
486: PROCEDURE Update_Ruleset
487: ( p_api_version IN NUMBER,
488: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
489: p_commit IN VARCHAR2 := FND_API.G_FALSE,
490: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
491: x_return_status OUT NOCOPY VARCHAR2,
492: x_msg_count OUT NOCOPY NUMBER,
493: x_msg_data OUT NOCOPY VARCHAR2,
486: PROCEDURE Update_Ruleset
487: ( p_api_version IN NUMBER,
488: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
489: p_commit IN VARCHAR2 := FND_API.G_FALSE,
490: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
491: x_return_status OUT NOCOPY VARCHAR2,
492: x_msg_count OUT NOCOPY NUMBER,
493: x_msg_data OUT NOCOPY VARCHAR2,
494: x_loading_status OUT NOCOPY VARCHAR2,
517:
518: -- Standard Start of API savepoint
519: SAVEPOINT Update_Ruleset;
520: -- Standard call to check for call compatibility.
521: IF NOT FND_API.Compatible_API_Call ( l_api_version,
522: p_api_version,
523: l_api_name,
524: G_PKG_NAME )
525: THEN
522: p_api_version,
523: l_api_name,
524: G_PKG_NAME )
525: THEN
526: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
527: END IF;
528:
529: -- Initialize message list if p_init_msg_list is set to TRUE.
530: IF FND_API.to_Boolean( p_init_msg_list )
526: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
527: END IF;
528:
529: -- Initialize message list if p_init_msg_list is set to TRUE.
530: IF FND_API.to_Boolean( p_init_msg_list )
531: THEN
532: FND_MSG_PUB.initialize;
533: END IF;
534:
534:
535: --
536: -- Initialize API return status to success
537: --
538: x_return_status := FND_API.G_RET_STS_SUCCESS;
539: x_loading_status := 'CN_UPDATED';
540:
541: --
542: -- Assign the parameter to a local variable
566: x_loading_status => x_loading_status,
567: p_ruleset_rec => l_ruleset_rec,
568: p_old_ruleset_rec => l_old_ruleset_rec);
569:
570: IF x_return_status = fnd_api.g_ret_sts_error
571: THEN
572: RAISE fnd_api.g_exc_error;
573: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
574: THEN
568: p_old_ruleset_rec => l_old_ruleset_rec);
569:
570: IF x_return_status = fnd_api.g_ret_sts_error
571: THEN
572: RAISE fnd_api.g_exc_error;
573: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
574: THEN
575: RAISE fnd_api.g_exc_unexpected_error;
576: END IF;
569:
570: IF x_return_status = fnd_api.g_ret_sts_error
571: THEN
572: RAISE fnd_api.g_exc_error;
573: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
574: THEN
575: RAISE fnd_api.g_exc_unexpected_error;
576: END IF;
577: END IF;
571: THEN
572: RAISE fnd_api.g_exc_error;
573: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
574: THEN
575: RAISE fnd_api.g_exc_unexpected_error;
576: END IF;
577: END IF;
578:
579: -- vertical industry pre-processing section
593: x_loading_status => x_loading_status,
594: p_ruleset_rec => l_ruleset_rec,
595: p_old_ruleset_rec => l_old_ruleset_rec);
596:
597: IF x_return_status = fnd_api.g_ret_sts_error
598: THEN
599: RAISE fnd_api.g_exc_error;
600: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
601: THEN
595: p_old_ruleset_rec => l_old_ruleset_rec);
596:
597: IF x_return_status = fnd_api.g_ret_sts_error
598: THEN
599: RAISE fnd_api.g_exc_error;
600: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
601: THEN
602: RAISE fnd_api.g_exc_unexpected_error;
603: END IF;
596:
597: IF x_return_status = fnd_api.g_ret_sts_error
598: THEN
599: RAISE fnd_api.g_exc_error;
600: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
601: THEN
602: RAISE fnd_api.g_exc_unexpected_error;
603: END IF;
604: END IF;
598: THEN
599: RAISE fnd_api.g_exc_error;
600: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
601: THEN
602: RAISE fnd_api.g_exc_unexpected_error;
603: END IF;
604: END IF;
605:
606: --
620: IF (cn_api.chk_miss_null_char_para
621: ( l_old_ruleset_rec.ruleset_name,
622: cn_api.get_lkup_meaning('RULESET_NAME', 'RULESET_TYPE'),
623: x_loading_status,
624: x_loading_status) = FND_API.G_TRUE )
625: THEN
626: RAISE fnd_api.g_exc_error;
627: END IF;
628:
622: cn_api.get_lkup_meaning('RULESET_NAME', 'RULESET_TYPE'),
623: x_loading_status,
624: x_loading_status) = FND_API.G_TRUE )
625: THEN
626: RAISE fnd_api.g_exc_error;
627: END IF;
628:
629: IF cn_api.chk_miss_null_date_para
630: ( l_old_ruleset_rec.end_date,
629: IF cn_api.chk_miss_null_date_para
630: ( l_old_ruleset_rec.end_date,
631: cn_api.get_lkup_meaning('END_DATE', 'RULESET_TYPE'),
632: x_loading_status,
633: x_loading_status) = fnd_api.g_true
634: THEN
635: RAISE fnd_api.g_exc_error;
636: END IF;
637:
631: cn_api.get_lkup_meaning('END_DATE', 'RULESET_TYPE'),
632: x_loading_status,
633: x_loading_status) = fnd_api.g_true
634: THEN
635: RAISE fnd_api.g_exc_error;
636: END IF;
637:
638: IF cn_api.chk_miss_null_date_para
639: (l_old_ruleset_rec.start_date,
638: IF cn_api.chk_miss_null_date_para
639: (l_old_ruleset_rec.start_date,
640: cn_api.get_lkup_meaning('START_DATE', 'RULESET_TYPE'),
641: x_loading_status,
642: x_loading_status)= fnd_api.g_true
643: THEN
644: RAISE fnd_api.g_exc_error;
645: END IF;
646:
640: cn_api.get_lkup_meaning('START_DATE', 'RULESET_TYPE'),
641: x_loading_status,
642: x_loading_status)= fnd_api.g_true
643: THEN
644: RAISE fnd_api.g_exc_error;
645: END IF;
646:
647:
648: --Check for missing parameters in the p_ruleset_rec parameter
650: IF (cn_api.chk_miss_null_char_para
651: ( l_ruleset_rec.ruleset_name,
652: cn_api.get_lkup_meaning('RULESET_NAME', 'RULESET_TYPE'),
653: x_loading_status,
654: x_loading_status) = FND_API.G_TRUE )
655: THEN
656: RAISE fnd_api.g_exc_error;
657: END IF;
658:
652: cn_api.get_lkup_meaning('RULESET_NAME', 'RULESET_TYPE'),
653: x_loading_status,
654: x_loading_status) = FND_API.G_TRUE )
655: THEN
656: RAISE fnd_api.g_exc_error;
657: END IF;
658:
659: IF cn_api.chk_miss_null_date_para
660: ( l_ruleset_rec.end_date,
659: IF cn_api.chk_miss_null_date_para
660: ( l_ruleset_rec.end_date,
661: cn_api.get_lkup_meaning('END_DATE', 'RULESET_TYPE'),
662: x_loading_status,
663: x_loading_status) = fnd_api.g_true
664: THEN
665: RAISE fnd_api.g_exc_error;
666: END IF;
667:
661: cn_api.get_lkup_meaning('END_DATE', 'RULESET_TYPE'),
662: x_loading_status,
663: x_loading_status) = fnd_api.g_true
664: THEN
665: RAISE fnd_api.g_exc_error;
666: END IF;
667:
668: IF cn_api.chk_miss_null_date_para
669: (l_ruleset_rec.start_date,
668: IF cn_api.chk_miss_null_date_para
669: (l_ruleset_rec.start_date,
670: cn_api.get_lkup_meaning('START_DATE', 'RULESET_TYPE'),
671: x_loading_status,
672: x_loading_status)= fnd_api.g_true
673: THEN
674: RAISE fnd_api.g_exc_error;
675: END IF;
676:
670: cn_api.get_lkup_meaning('START_DATE', 'RULESET_TYPE'),
671: x_loading_status,
672: x_loading_status)= fnd_api.g_true
673: THEN
674: RAISE fnd_api.g_exc_error;
675: END IF;
676:
677:
678: --Now check if the ruleset exists.
694: fnd_msg_pub.add;
695: END IF;
696:
697: x_loading_status := 'CN_INVALID_RULESET';
698: RAISE FND_API.G_EXC_ERROR;
699: ELSE
700: SELECT ruleset_id
701: INTO l_old_ruleset_rec_pvt.ruleset_id
702: FROM cn_rulesets
771: x_loading_status => x_loading_status,
772: p_ruleset_rec => l_ruleset_rec,
773: p_old_ruleset_rec => l_old_ruleset_rec);
774:
775: IF x_return_status = fnd_api.g_ret_sts_error
776: THEN
777: RAISE fnd_api.g_exc_error;
778: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
779: THEN
773: p_old_ruleset_rec => l_old_ruleset_rec);
774:
775: IF x_return_status = fnd_api.g_ret_sts_error
776: THEN
777: RAISE fnd_api.g_exc_error;
778: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
779: THEN
780: RAISE fnd_api.g_exc_unexpected_error;
781: END IF;
774:
775: IF x_return_status = fnd_api.g_ret_sts_error
776: THEN
777: RAISE fnd_api.g_exc_error;
778: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
779: THEN
780: RAISE fnd_api.g_exc_unexpected_error;
781: END IF;
782: END IF;
776: THEN
777: RAISE fnd_api.g_exc_error;
778: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
779: THEN
780: RAISE fnd_api.g_exc_unexpected_error;
781: END IF;
782: END IF;
783:
784: -- customer post processing section
798: x_loading_status => x_loading_status,
799: p_ruleset_rec => l_ruleset_rec,
800: p_old_ruleset_rec => l_old_ruleset_rec);
801:
802: IF x_return_status = fnd_api.g_ret_sts_error
803: THEN
804: RAISE fnd_api.g_exc_error;
805: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
806: THEN
800: p_old_ruleset_rec => l_old_ruleset_rec);
801:
802: IF x_return_status = fnd_api.g_ret_sts_error
803: THEN
804: RAISE fnd_api.g_exc_error;
805: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
806: THEN
807: RAISE fnd_api.g_exc_unexpected_error;
808: END IF;
801:
802: IF x_return_status = fnd_api.g_ret_sts_error
803: THEN
804: RAISE fnd_api.g_exc_error;
805: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
806: THEN
807: RAISE fnd_api.g_exc_unexpected_error;
808: END IF;
809: END IF;
803: THEN
804: RAISE fnd_api.g_exc_error;
805: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error
806: THEN
807: RAISE fnd_api.g_exc_unexpected_error;
808: END IF;
809: END IF;
810: -- SK End of post processing hooks
811:
838: p_action_code => 'U',
839: p_bind_data_id => l_bind_data_id,
840: x_return_code => l_return_code) ;
841:
842: IF (l_return_code = FND_API.G_RET_STS_ERROR)
843: THEN
844: RAISE FND_API.G_EXC_ERROR;
845: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR )
846: THEN
840: x_return_code => l_return_code) ;
841:
842: IF (l_return_code = FND_API.G_RET_STS_ERROR)
843: THEN
844: RAISE FND_API.G_EXC_ERROR;
845: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR )
846: THEN
847: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
848: END IF;
841:
842: IF (l_return_code = FND_API.G_RET_STS_ERROR)
843: THEN
844: RAISE FND_API.G_EXC_ERROR;
845: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR )
846: THEN
847: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
848: END IF;
849:
843: THEN
844: RAISE FND_API.G_EXC_ERROR;
845: ELSIF (l_return_code = FND_API.G_RET_STS_UNEXP_ERROR )
846: THEN
847: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
848: END IF;
849:
850:
851: /*
858: p_oai_param => null,
859: p_oai_array => l_oai_array,
860: x_return_code => x_return_status) ;
861:
862: IF (x_return_status = FND_API.G_RET_STS_ERROR)
863: THEN
864: RAISE FND_API.G_EXC_ERROR;
865: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR )
866: THEN
860: x_return_code => x_return_status) ;
861:
862: IF (x_return_status = FND_API.G_RET_STS_ERROR)
863: THEN
864: RAISE FND_API.G_EXC_ERROR;
865: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR )
866: THEN
867: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
868: END IF;
861:
862: IF (x_return_status = FND_API.G_RET_STS_ERROR)
863: THEN
864: RAISE FND_API.G_EXC_ERROR;
865: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR )
866: THEN
867: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
868: END IF;
869: */
863: THEN
864: RAISE FND_API.G_EXC_ERROR;
865: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR )
866: THEN
867: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
868: END IF;
869: */
870: END IF;
871: END IF;
872:
873:
874:
875: -- Standard check of p_commit.
876: IF FND_API.To_Boolean( p_commit )
877: THEN
878: COMMIT WORK;
879: END IF;
880:
884: (p_count => x_msg_count,
885: p_data => x_msg_data
886: );
887: EXCEPTION
888: WHEN FND_API.G_EXC_ERROR THEN
889: ROLLBACK TO Update_Ruleset;
890: x_return_status := FND_API.G_RET_STS_ERROR ;
891: FND_MSG_PUB.Count_And_Get
892: (p_count => x_msg_count,
886: );
887: EXCEPTION
888: WHEN FND_API.G_EXC_ERROR THEN
889: ROLLBACK TO Update_Ruleset;
890: x_return_status := FND_API.G_RET_STS_ERROR ;
891: FND_MSG_PUB.Count_And_Get
892: (p_count => x_msg_count,
893: p_data => x_msg_data
894: );
891: FND_MSG_PUB.Count_And_Get
892: (p_count => x_msg_count,
893: p_data => x_msg_data
894: );
895: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
896: ROLLBACK TO Update_Ruleset;
897: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
898: FND_MSG_PUB.Count_And_Get
899: (p_count => x_msg_count,
893: p_data => x_msg_data
894: );
895: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
896: ROLLBACK TO Update_Ruleset;
897: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
898: FND_MSG_PUB.Count_And_Get
899: (p_count => x_msg_count,
900: p_data => x_msg_data
901: );
900: p_data => x_msg_data
901: );
902: WHEN OTHERS THEN
903: ROLLBACK TO Update_Ruleset;
904: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
905: IF FND_MSG_PUB.Check_Msg_Level
906: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
907: THEN
908: FND_MSG_PUB.Add_Exc_Msg