[Home] [Help]
21:
22: PROCEDURE create_code_conversion
23: (
24: p_api_version_number IN NUMBER,
25: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
26: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
27: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
28: x_return_status OUT NOCOPY VARCHAR2,
29: x_msg_count OUT NOCOPY NUMBER,
22: PROCEDURE create_code_conversion
23: (
24: p_api_version_number IN NUMBER,
25: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
26: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
27: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
28: x_return_status OUT NOCOPY VARCHAR2,
29: x_msg_count OUT NOCOPY NUMBER,
30: x_msg_data OUT NOCOPY VARCHAR2,
23: (
24: p_api_version_number IN NUMBER,
25: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
26: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
27: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
28: x_return_status OUT NOCOPY VARCHAR2,
29: x_msg_count OUT NOCOPY NUMBER,
30: x_msg_data OUT NOCOPY VARCHAR2,
31: p_code_conversion_tbl IN code_conversion_tbl_type,
46: -- Standard Start of API savepoint
47: SAVEPOINT create_code_conversion_pvt;
48:
49: -- Standard call to check for call compatibility.
50: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
51: p_api_version_number,
52: l_api_name,
53: G_PKG_NAME)
54: THEN
51: p_api_version_number,
52: l_api_name,
53: G_PKG_NAME)
54: THEN
55: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
56: END IF;
57:
58: -- Initialize message list if p_init_msg_list is set to TRUE.
59: IF FND_API.to_Boolean( p_init_msg_list )
55: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
56: END IF;
57:
58: -- Initialize message list if p_init_msg_list is set to TRUE.
59: IF FND_API.to_Boolean( p_init_msg_list )
60: THEN
61: FND_MSG_PUB.initialize;
62: END IF;
63:
71: THEN
72: FND_MESSAGE.Set_Name('OZF', 'OZF_USER_PROFILE_MISSING');
73: FND_MSG_PUB.ADD;
74: END IF;
75: RAISE FND_API.G_EXC_ERROR;
76: END IF;
77:
78: -- Debug Message
79: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
80: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
81: END IF;
82:
83: -- Initialize API return status to SUCCESS
84: x_return_status := FND_API.G_RET_STS_SUCCESS;
85:
86: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
87: OZF_UTILITY_PVT.debug_message( 'No of records to be created'||p_code_conversion_tbl.count);
88: END IF;
86: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
87: OZF_UTILITY_PVT.debug_message( 'No of records to be created'||p_code_conversion_tbl.count);
88: END IF;
89:
90: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL) THEN
91: -- Debug message
92: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name);
93: -- Invoke validation procedures
94: Validate_Code_Conversion(
92: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name);
93: -- Invoke validation procedures
94: Validate_Code_Conversion(
95: p_api_version_number => 1.0,
96: p_init_msg_list => FND_API.G_FALSE,
97: p_validation_level => p_validation_level,
98: p_validation_mode => JTF_PLSQL_API.G_CREATE,
99: p_code_conversion_tbl => p_code_conversion_tbl,
100: x_return_status => x_return_status,
101: x_msg_count => x_msg_count,
102: x_msg_data => x_msg_data);
103: END IF;
104:
105: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
106: RAISE FND_API.G_EXC_ERROR;
107: END IF;
108:
109: -- Debug Message
102: x_msg_data => x_msg_data);
103: END IF;
104:
105: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
106: RAISE FND_API.G_EXC_ERROR;
107: END IF;
108:
109: -- Debug Message
110: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
176:
177: EXCEPTION
178: WHEN OTHERS THEN
179: OZF_UTILITY_PVT.debug_message (SQLERRM ||' Error in creating code conversion map');
180: RAISE FND_API.G_EXC_ERROR;
181: END;
182: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
183: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || ' after insert call - code conversion id' || l_code_conversion_id);
184: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || ' after insert call - obj version no ' || l_code_conversion_rec.Object_Version_Number);
189:
190: end loop;
191:
192: -- Standard check for p_commit
193: IF FND_API.to_Boolean( p_commit )
194: THEN
195: COMMIT WORK;
196: END IF;
197:
209:
210:
211: EXCEPTION
212: WHEN OZF_UTILITY_PVT.resource_locked THEN
213: x_return_status := FND_API.g_ret_sts_error;
214: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
215: FND_MESSAGE.set_name('OZF', 'OZF_API_RESOURCES_LOCKED');
216: FND_MSG_PUB.add;
217: END IF;
214: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
215: FND_MESSAGE.set_name('OZF', 'OZF_API_RESOURCES_LOCKED');
216: FND_MSG_PUB.add;
217: END IF;
218: WHEN FND_API.G_EXC_ERROR THEN
219: ROLLBACK TO create_code_conversion_pvt;
220: x_return_status := FND_API.G_RET_STS_ERROR;
221: -- Standard call to get message count and if count=1, get the message
222: FND_MSG_PUB.Count_And_Get (
216: FND_MSG_PUB.add;
217: END IF;
218: WHEN FND_API.G_EXC_ERROR THEN
219: ROLLBACK TO create_code_conversion_pvt;
220: x_return_status := FND_API.G_RET_STS_ERROR;
221: -- Standard call to get message count and if count=1, get the message
222: FND_MSG_PUB.Count_And_Get (
223: p_encoded => FND_API.G_FALSE,
224: p_count => x_msg_count,
219: ROLLBACK TO create_code_conversion_pvt;
220: x_return_status := FND_API.G_RET_STS_ERROR;
221: -- Standard call to get message count and if count=1, get the message
222: FND_MSG_PUB.Count_And_Get (
223: p_encoded => FND_API.G_FALSE,
224: p_count => x_msg_count,
225: p_data => x_msg_data
226: );
227: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
223: p_encoded => FND_API.G_FALSE,
224: p_count => x_msg_count,
225: p_data => x_msg_data
226: );
227: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
228: ROLLBACK TO create_code_conversion_pvt;
229: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
230: -- Standard call to get message count and if count=1, get the message
231: FND_MSG_PUB.Count_And_Get (
225: p_data => x_msg_data
226: );
227: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
228: ROLLBACK TO create_code_conversion_pvt;
229: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
230: -- Standard call to get message count and if count=1, get the message
231: FND_MSG_PUB.Count_And_Get (
232: p_encoded => FND_API.G_FALSE,
233: p_count => x_msg_count,
228: ROLLBACK TO create_code_conversion_pvt;
229: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
230: -- Standard call to get message count and if count=1, get the message
231: FND_MSG_PUB.Count_And_Get (
232: p_encoded => FND_API.G_FALSE,
233: p_count => x_msg_count,
234: p_data => x_msg_data
235: );
236: WHEN OTHERS THEN
234: p_data => x_msg_data
235: );
236: WHEN OTHERS THEN
237: ROLLBACK TO create_code_conversion_pvt;
238: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
239: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
240: THEN
241: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
242: END IF;
241: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
242: END IF;
243: -- Standard call to get message count and if count=1, get the message
244: FND_MSG_PUB.Count_And_Get (
245: p_encoded => FND_API.G_FALSE,
246: p_count => x_msg_count,
247: p_data => x_msg_data
248: );
249:
252:
253: PROCEDURE Update_code_conversion
254: (
255: p_api_version_number IN NUMBER,
256: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
257: p_commit IN VARCHAR2 := FND_API.G_FALSE,
258: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
259: x_return_status OUT NOCOPY VARCHAR2,
260: x_msg_count OUT NOCOPY NUMBER,
253: PROCEDURE Update_code_conversion
254: (
255: p_api_version_number IN NUMBER,
256: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
257: p_commit IN VARCHAR2 := FND_API.G_FALSE,
258: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
259: x_return_status OUT NOCOPY VARCHAR2,
260: x_msg_count OUT NOCOPY NUMBER,
261: x_msg_data OUT NOCOPY VARCHAR2,
254: (
255: p_api_version_number IN NUMBER,
256: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
257: p_commit IN VARCHAR2 := FND_API.G_FALSE,
258: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
259: x_return_status OUT NOCOPY VARCHAR2,
260: x_msg_count OUT NOCOPY NUMBER,
261: x_msg_data OUT NOCOPY VARCHAR2,
262: p_code_conversion_tbl IN code_conversion_tbl_type ,
321: -- Standard Start of API savepoint
322: SAVEPOINT update_code_conversion_pvt;
323:
324: -- Standard call to check for call compatibility.
325: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
326: p_api_version_number,
327: l_api_name,
328: G_PKG_NAME)
329: THEN
326: p_api_version_number,
327: l_api_name,
328: G_PKG_NAME)
329: THEN
330: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
331: END IF;
332:
333: -- Initialize message list if p_init_msg_list is set to TRUE.
334: IF FND_API.to_Boolean( p_init_msg_list )
330: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
331: END IF;
332:
333: -- Initialize message list if p_init_msg_list is set to TRUE.
334: IF FND_API.to_Boolean( p_init_msg_list )
335: THEN
336: FND_MSG_PUB.initialize;
337: END IF;
338:
345: THEN
346: FND_MESSAGE.Set_Name('OZF', 'OZF_USER_PROFILE_MISSING');
347: FND_MSG_PUB.ADD;
348: END IF;
349: RAISE FND_API.G_EXC_ERROR;
350: END IF;
351:
352: -- Debug Message
353: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
354: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
355: END IF;
356:
357: -- Initialize API return status to SUCCESS
358: x_return_status := FND_API.G_RET_STS_SUCCESS;
359: x_object_version_number := JTF_NUMBER_TABLE();
360:
361: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
362: OZF_UTILITY_PVT.debug_message('p_code_conversion_tbl(1).description: ' || p_code_conversion_tbl(1).description );
420: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
421: FND_MESSAGE.set_name('OZF', 'OZF_API_RECORD_NOT_FOUND');
422: FND_MSG_PUB.add;
423: END IF;
424: RAISE FND_API.G_EXC_ERROR;
425: END IF;
426: CLOSE csr_code_conversion;
427:
428:
443: THEN
444: FND_MESSAGE.Set_Name('OZF', 'OZF_API_RESOURCE_LOCKED');
445: FND_MSG_PUB.ADD;
446: END IF;
447: RAISE FND_API.G_EXC_ERROR;
448: END IF;
449:
450: -- Update internal code only when it is NUll
451: IF l_code_conversion_rec.internal_code IS NOT NULL AND
455: THEN
456: FND_MESSAGE.Set_Name('OZF', 'OZF_CODE_CONV_UPD_INTLCODE');
457: FND_MSG_PUB.ADD;
458: END IF;
459: RAISE FND_API.G_EXC_ERROR;
460: END IF;
461:
462: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
463: OZF_UTILITY_PVT.debug_message( 'Existing End Date' || l_code_conversion_rec.End_Date_Active);
473: THEN
474: FND_MESSAGE.Set_Name('OZF', 'OZF_CODE_CONV_UPD_ENDDATE');
475: FND_MSG_PUB.ADD;
476: END IF;
477: RAISE FND_API.G_EXC_ERROR;
478: END IF;
479:
480: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
481: OZF_UTILITY_PVT.debug_message( 'Existing Start Date' || l_code_conversion_rec.Start_Date_Active);
492: THEN
493: FND_MESSAGE.Set_Name('OZF', 'OZF_CODE_CONV_UPD_STARTDATE');
494: FND_MSG_PUB.ADD;
495: END IF;
496: RAISE FND_API.G_EXC_ERROR;
497: END IF;
498:
499: IF l_code_conversion_Rec.end_date_active < p_code_conversion_Rec.Start_Date_Active THEN
500: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
500: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
501: THEN
502: OZF_UTILITY_PVT.debug_message ('Cannot update an end dated code conversion map');
503: END IF;
504: raise FND_API.G_EXC_ERROR;
505: END IF;
506:
507: END IF;
508:
513: THEN
514: FND_MESSAGE.Set_Name('OZF', 'OZF_CODE_CONV_UPD_EXTCD');
515: FND_MSG_PUB.ADD;
516: END IF;
517: RAISE FND_API.G_EXC_ERROR;
518: END IF;
519:
520: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL) THEN
521: -- Debug message
516: END IF;
517: RAISE FND_API.G_EXC_ERROR;
518: END IF;
519:
520: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL) THEN
521: -- Debug message
522: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
523: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name);
524: END IF;
524: END IF;
525: -- Invoke validation procedures
526: Validate_Code_Conversion(
527: p_api_version_number => 1.0,
528: p_init_msg_list => FND_API.G_FALSE,
529: p_validation_level => p_validation_level,
530: p_validation_mode => JTF_PLSQL_API.G_UPDATE,
531: p_code_conversion_tbl => p_code_conversion_tbl,
532: x_return_status => x_return_status,
533: x_msg_count => x_msg_count,
534: x_msg_data => x_msg_data);
535: END IF;
536:
537: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
538: RAISE FND_API.G_EXC_ERROR;
539: END IF;
540:
541: IF (l_code_conversion_rec.org_id IS NULL) THEN
534: x_msg_data => x_msg_data);
535: END IF;
536:
537: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
538: RAISE FND_API.G_EXC_ERROR;
539: END IF;
540:
541: IF (l_code_conversion_rec.org_id IS NULL) THEN
542: l_org_id := MO_GLOBAL.GET_CURRENT_ORG_ID(); -- R12 Enhancements
587:
588: EXCEPTION
589: WHEN OTHERS THEN
590: OZF_UTILITY_PVT.debug_message (SQLERRM ||' Error in updating code conversion map');
591: RAISE FND_API.G_EXC_ERROR;
592: END;
593:
594: x_object_version_number.EXTEND;
595: x_object_Version_number(x_object_version_number.count) := p_code_conversion_rec.Object_Version_Number;
597: END LOOP;
598:
599:
600: -- Standard check for p_commit
601: IF FND_API.to_Boolean( p_commit )
602: THEN
603: COMMIT WORK;
604: END IF;
605:
613: (p_count => x_msg_count,
614: p_data => x_msg_data
615: );
616: EXCEPTION
617: WHEN FND_API.G_EXC_ERROR THEN
618: ROLLBACK TO update_code_conversion_pvt;
619: x_return_status := FND_API.G_RET_STS_ERROR;
620: -- Standard call to get message count and if count=1, get the message
621: FND_MSG_PUB.Count_And_Get (
615: );
616: EXCEPTION
617: WHEN FND_API.G_EXC_ERROR THEN
618: ROLLBACK TO update_code_conversion_pvt;
619: x_return_status := FND_API.G_RET_STS_ERROR;
620: -- Standard call to get message count and if count=1, get the message
621: FND_MSG_PUB.Count_And_Get (
622: p_encoded => FND_API.G_FALSE,
623: p_count => x_msg_count,
618: ROLLBACK TO update_code_conversion_pvt;
619: x_return_status := FND_API.G_RET_STS_ERROR;
620: -- Standard call to get message count and if count=1, get the message
621: FND_MSG_PUB.Count_And_Get (
622: p_encoded => FND_API.G_FALSE,
623: p_count => x_msg_count,
624: p_data => x_msg_data
625: );
626: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
622: p_encoded => FND_API.G_FALSE,
623: p_count => x_msg_count,
624: p_data => x_msg_data
625: );
626: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
627: ROLLBACK TO update_code_conversion_pvt;
628: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
629: -- Standard call to get message count and if count=1, get the message
630: FND_MSG_PUB.Count_And_Get (
624: p_data => x_msg_data
625: );
626: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
627: ROLLBACK TO update_code_conversion_pvt;
628: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
629: -- Standard call to get message count and if count=1, get the message
630: FND_MSG_PUB.Count_And_Get (
631: p_encoded => FND_API.G_FALSE,
632: p_count => x_msg_count,
627: ROLLBACK TO update_code_conversion_pvt;
628: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
629: -- Standard call to get message count and if count=1, get the message
630: FND_MSG_PUB.Count_And_Get (
631: p_encoded => FND_API.G_FALSE,
632: p_count => x_msg_count,
633: p_data => x_msg_data
634: );
635: WHEN OTHERS THEN
633: p_data => x_msg_data
634: );
635: WHEN OTHERS THEN
636: ROLLBACK TO update_code_conversion_pvt;
637: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
638: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
639: THEN
640: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
641: END IF;
640: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
641: END IF;
642: -- Standard call to get message count and if count=1, get the message
643: FND_MSG_PUB.Count_And_Get (
644: p_encoded => FND_API.G_FALSE,
645: p_count => x_msg_count,
646: p_data => x_msg_data
647: );
648:
651:
652:
653: PROCEDURE Update_Code_Conversion_Tbl(
654: P_Api_Version_Number IN NUMBER,
655: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
656: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
657: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
658: X_Return_Status OUT NOCOPY VARCHAR2,
659: X_Msg_Count OUT NOCOPY NUMBER,
652:
653: PROCEDURE Update_Code_Conversion_Tbl(
654: P_Api_Version_Number IN NUMBER,
655: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
656: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
657: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
658: X_Return_Status OUT NOCOPY VARCHAR2,
659: X_Msg_Count OUT NOCOPY NUMBER,
660: X_Msg_Data OUT NOCOPY VARCHAR2,
653: PROCEDURE Update_Code_Conversion_Tbl(
654: P_Api_Version_Number IN NUMBER,
655: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
656: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
657: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
658: X_Return_Status OUT NOCOPY VARCHAR2,
659: X_Msg_Count OUT NOCOPY NUMBER,
660: X_Msg_Data OUT NOCOPY VARCHAR2,
661: P_code_conversion_Tbl IN code_conversion_tbl_type
686: OZF_UTILITY_PVT.debug_message('Entered the proc tbl');
687: END IF;
688:
689: -- Standard call to check for call compatibility.
690: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
691: p_api_version_number,
692: l_api_name,
693: G_PKG_NAME)
694: THEN
691: p_api_version_number,
692: l_api_name,
693: G_PKG_NAME)
694: THEN
695: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
696: END IF;
697:
698: -- Initialize message list if p_init_msg_list is set to TRUE.
699: IF FND_API.to_Boolean( p_init_msg_list )
695: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
696: END IF;
697:
698: -- Initialize message list if p_init_msg_list is set to TRUE.
699: IF FND_API.to_Boolean( p_init_msg_list )
700: THEN
701: FND_MSG_PUB.initialize;
702: END IF;
703:
710: THEN
711: FND_MESSAGE.Set_Name('OZF', 'OZF_USER_PROFILE_MISSING');
712: FND_MSG_PUB.ADD;
713: END IF;
714: RAISE FND_API.G_EXC_ERROR;
715: END IF;
716:
717: -- Debug Message
718: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
719: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
720: OZF_UTILITY_PVT.debug_message('Total Number of records '||P_code_conversion_Tbl.count);
721: END IF;
722: -- Initialize API return status to SUCCESS
723: x_return_status := FND_API.G_RET_STS_SUCCESS;
724:
725: v_code_conversion_id := JTF_NUMBER_TABLE();
726: v_object_version_number := JTF_NUMBER_TABLE();
727:
732: P_code_conversion_Rec := P_code_conversion_Tbl(i);
733:
734: -- Fix for 3928270
735:
736: -- IF p_code_conversion_rec.end_date_active = FND_API.g_miss_date
737: -- THEN
738: -- p_code_conversion_rec.end_date_active := NULL;
739: -- END IF;
740:
777: p_code_conversion_tbl => l_create_code_conv_tbl,
778: x_code_conversion_id_tbl => v_code_conversion_id
779: );
780:
781: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
782: RAISE FND_API.G_EXC_ERROR;
783: END IF;
784: END IF;
785:
778: x_code_conversion_id_tbl => v_code_conversion_id
779: );
780:
781: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
782: RAISE FND_API.G_EXC_ERROR;
783: END IF;
784: END IF;
785:
786: IF l_up_cnt > 0 THEN
796: p_code_conversion_tbl => l_update_code_conv_tbl,
797: x_object_version_number => v_object_version_number
798: );
799:
800: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
801: RAISE FND_API.G_EXC_ERROR;
802: END IF;
803: END IF;
804:
797: x_object_version_number => v_object_version_number
798: );
799:
800: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
801: RAISE FND_API.G_EXC_ERROR;
802: END IF;
803: END IF;
804:
805: -- Standard check for p_commit
802: END IF;
803: END IF;
804:
805: -- Standard check for p_commit
806: IF FND_API.to_Boolean( p_commit )
807: THEN
808: COMMIT WORK;
809: END IF;
810:
817: (p_count => x_msg_count,
818: p_data => x_msg_data
819: );
820: EXCEPTION
821: WHEN FND_API.G_EXC_ERROR THEN
822: ROLLBACK TO update_code_conversion_tbl_pvt;
823: x_return_status := FND_API.G_RET_STS_ERROR;
824: -- Standard call to get message count and if count=1, get the message
825: FND_MSG_PUB.Count_And_Get (
819: );
820: EXCEPTION
821: WHEN FND_API.G_EXC_ERROR THEN
822: ROLLBACK TO update_code_conversion_tbl_pvt;
823: x_return_status := FND_API.G_RET_STS_ERROR;
824: -- Standard call to get message count and if count=1, get the message
825: FND_MSG_PUB.Count_And_Get (
826: p_encoded => FND_API.G_FALSE,
827: p_count => x_msg_count,
822: ROLLBACK TO update_code_conversion_tbl_pvt;
823: x_return_status := FND_API.G_RET_STS_ERROR;
824: -- Standard call to get message count and if count=1, get the message
825: FND_MSG_PUB.Count_And_Get (
826: p_encoded => FND_API.G_FALSE,
827: p_count => x_msg_count,
828: p_data => x_msg_data
829: );
830: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
826: p_encoded => FND_API.G_FALSE,
827: p_count => x_msg_count,
828: p_data => x_msg_data
829: );
830: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
831: ROLLBACK TO update_code_conversion_tbl_pvt;
832: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
833: -- Standard call to get message count and if count=1, get the message
834: FND_MSG_PUB.Count_And_Get (
828: p_data => x_msg_data
829: );
830: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
831: ROLLBACK TO update_code_conversion_tbl_pvt;
832: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
833: -- Standard call to get message count and if count=1, get the message
834: FND_MSG_PUB.Count_And_Get (
835: p_encoded => FND_API.G_FALSE,
836: p_count => x_msg_count,
831: ROLLBACK TO update_code_conversion_tbl_pvt;
832: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
833: -- Standard call to get message count and if count=1, get the message
834: FND_MSG_PUB.Count_And_Get (
835: p_encoded => FND_API.G_FALSE,
836: p_count => x_msg_count,
837: p_data => x_msg_data
838: );
839: WHEN OTHERS THEN
837: p_data => x_msg_data
838: );
839: WHEN OTHERS THEN
840: ROLLBACK TO update_code_conversion_tbl_pvt;
841: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
842: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
843: THEN
844: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
845: END IF;
844: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
845: END IF;
846: -- Standard call to get message count and if count=1, get the message
847: FND_MSG_PUB.Count_And_Get (
848: p_encoded => FND_API.G_FALSE,
849: p_count => x_msg_count,
850: p_data => x_msg_data
851: );
852:
856:
857: PROCEDURE Delete_Code_Conversion_Tbl
858: (
859: p_api_version_number IN NUMBER,
860: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
861: p_commit IN VARCHAR2 := FND_API.G_FALSE,
862: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
863: x_return_status OUT NOCOPY VARCHAR2,
864: x_msg_count OUT NOCOPY NUMBER,
857: PROCEDURE Delete_Code_Conversion_Tbl
858: (
859: p_api_version_number IN NUMBER,
860: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
861: p_commit IN VARCHAR2 := FND_API.G_FALSE,
862: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
863: x_return_status OUT NOCOPY VARCHAR2,
864: x_msg_count OUT NOCOPY NUMBER,
865: x_msg_data OUT NOCOPY VARCHAR2,
858: (
859: p_api_version_number IN NUMBER,
860: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
861: p_commit IN VARCHAR2 := FND_API.G_FALSE,
862: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
863: x_return_status OUT NOCOPY VARCHAR2,
864: x_msg_count OUT NOCOPY NUMBER,
865: x_msg_data OUT NOCOPY VARCHAR2,
866: p_code_conversion_tbl IN code_conversion_Tbl_Type
883: OZF_UTILITY_PVT.debug_message('Entered the proc tbl');
884: END IF;
885:
886: -- Standard call to check for call compatibility.
887: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
888: p_api_version_number,
889: l_api_name,
890: G_PKG_NAME)
891: THEN
888: p_api_version_number,
889: l_api_name,
890: G_PKG_NAME)
891: THEN
892: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
893: END IF;
894:
895: -- Initialize message list if p_init_msg_list is set to TRUE.
896: IF FND_API.to_Boolean( p_init_msg_list )
892: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
893: END IF;
894:
895: -- Initialize message list if p_init_msg_list is set to TRUE.
896: IF FND_API.to_Boolean( p_init_msg_list )
897: THEN
898: FND_MSG_PUB.initialize;
899: END IF;
900:
907: THEN
908: FND_MESSAGE.Set_Name('OZF', 'OZF_USER_PROFILE_MISSING');
909: FND_MSG_PUB.ADD;
910: END IF;
911: RAISE FND_API.G_EXC_ERROR;
912: END IF;
913:
914: -- Debug Message
915: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
917: END IF;
918:
919:
920: -- Initialize API return status to SUCCESS
921: x_return_status := FND_API.G_RET_STS_SUCCESS;
922:
923: FOR i IN P_code_conversion_Tbl.first .. P_code_conversion_Tbl.last
924: LOOP
925:
940: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
941: FND_MESSAGE.set_name('OZF', 'OZF_REQ_PARAMETERS_MISSING');
942: FND_MSG_PUB.add;
943: END IF;
944: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
945:
946:
947: ELSE
948:
958: END IF;
959:
960: Delete_Code_Conversion(
961: p_api_version_number => 1.0,
962: p_init_msg_list => FND_API.G_FALSE,
963: p_commit => FND_API.G_FALSE,
964: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
965: x_return_status => X_Return_Status ,
966: x_msg_count => X_Msg_Count ,
959:
960: Delete_Code_Conversion(
961: p_api_version_number => 1.0,
962: p_init_msg_list => FND_API.G_FALSE,
963: p_commit => FND_API.G_FALSE,
964: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
965: x_return_status => X_Return_Status ,
966: x_msg_count => X_Msg_Count ,
967: x_msg_data => X_Msg_Data ,
960: Delete_Code_Conversion(
961: p_api_version_number => 1.0,
962: p_init_msg_list => FND_API.G_FALSE,
963: p_commit => FND_API.G_FALSE,
964: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
965: x_return_status => X_Return_Status ,
966: x_msg_count => X_Msg_Count ,
967: x_msg_data => X_Msg_Data ,
968: p_code_conversion_id => l_code_conversion_id,
970: p_external_code => P_code_conversion_Tbl(i).external_code ,
971: p_code_conversion_type => P_code_conversion_Tbl(i).code_conversion_type);
972:
973:
974: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
975: RAISE FND_API.G_EXC_ERROR;
976: END IF;
977:
978: END IF;
971: p_code_conversion_type => P_code_conversion_Tbl(i).code_conversion_type);
972:
973:
974: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
975: RAISE FND_API.G_EXC_ERROR;
976: END IF;
977:
978: END IF;
979:
980: END LOOP;
981:
982:
983: -- Standard check for p_commit
984: IF FND_API.to_Boolean( p_commit )
985: THEN
986: COMMIT WORK;
987: END IF;
988:
995: (p_count => x_msg_count,
996: p_data => x_msg_data
997: );
998: EXCEPTION
999: WHEN FND_API.G_EXC_ERROR THEN
1000: ROLLBACK TO delete_code_conversion_tbl_pvt;
1001: x_return_status := FND_API.G_RET_STS_ERROR;
1002: -- Standard call to get message count and if count=1, get the message
1003: FND_MSG_PUB.Count_And_Get (
997: );
998: EXCEPTION
999: WHEN FND_API.G_EXC_ERROR THEN
1000: ROLLBACK TO delete_code_conversion_tbl_pvt;
1001: x_return_status := FND_API.G_RET_STS_ERROR;
1002: -- Standard call to get message count and if count=1, get the message
1003: FND_MSG_PUB.Count_And_Get (
1004: p_encoded => FND_API.G_FALSE,
1005: p_count => x_msg_count,
1000: ROLLBACK TO delete_code_conversion_tbl_pvt;
1001: x_return_status := FND_API.G_RET_STS_ERROR;
1002: -- Standard call to get message count and if count=1, get the message
1003: FND_MSG_PUB.Count_And_Get (
1004: p_encoded => FND_API.G_FALSE,
1005: p_count => x_msg_count,
1006: p_data => x_msg_data
1007: );
1008: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1004: p_encoded => FND_API.G_FALSE,
1005: p_count => x_msg_count,
1006: p_data => x_msg_data
1007: );
1008: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1009: ROLLBACK TO delete_code_conversion_tbl_pvt;
1010: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1011: -- Standard call to get message count and if count=1, get the message
1012: FND_MSG_PUB.Count_And_Get (
1006: p_data => x_msg_data
1007: );
1008: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1009: ROLLBACK TO delete_code_conversion_tbl_pvt;
1010: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1011: -- Standard call to get message count and if count=1, get the message
1012: FND_MSG_PUB.Count_And_Get (
1013: p_encoded => FND_API.G_FALSE,
1014: p_count => x_msg_count,
1009: ROLLBACK TO delete_code_conversion_tbl_pvt;
1010: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1011: -- Standard call to get message count and if count=1, get the message
1012: FND_MSG_PUB.Count_And_Get (
1013: p_encoded => FND_API.G_FALSE,
1014: p_count => x_msg_count,
1015: p_data => x_msg_data
1016: );
1017: WHEN OTHERS THEN
1015: p_data => x_msg_data
1016: );
1017: WHEN OTHERS THEN
1018: ROLLBACK TO delete_code_conversion_tbl_pvt;
1019: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1020: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1021: THEN
1022: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1023: END IF;
1022: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1023: END IF;
1024: -- Standard call to get message count and if count=1, get the message
1025: FND_MSG_PUB.Count_And_Get (
1026: p_encoded => FND_API.G_FALSE,
1027: p_count => x_msg_count,
1028: p_data => x_msg_data
1029: );
1030:
1036:
1037: PROCEDURE Delete_Code_Conversion
1038: (
1039: p_api_version_number IN NUMBER,
1040: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1041: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1042: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1043: x_return_status OUT NOCOPY VARCHAR2,
1044: x_msg_count OUT NOCOPY NUMBER,
1037: PROCEDURE Delete_Code_Conversion
1038: (
1039: p_api_version_number IN NUMBER,
1040: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1041: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1042: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1043: x_return_status OUT NOCOPY VARCHAR2,
1044: x_msg_count OUT NOCOPY NUMBER,
1045: x_msg_data OUT NOCOPY VARCHAR2,
1038: (
1039: p_api_version_number IN NUMBER,
1040: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1041: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1042: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1043: x_return_status OUT NOCOPY VARCHAR2,
1044: x_msg_count OUT NOCOPY NUMBER,
1045: x_msg_data OUT NOCOPY VARCHAR2,
1046: p_code_conversion_id IN NUMBER,
1146: -- Standard Start of API savepoint
1147: SAVEPOINT delete_code_conversion_pvt;
1148:
1149: -- Standard call to check for call compatibility.
1150: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1151: p_api_version_number,
1152: l_api_name,
1153: G_PKG_NAME)
1154: THEN
1151: p_api_version_number,
1152: l_api_name,
1153: G_PKG_NAME)
1154: THEN
1155: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1156: END IF;
1157:
1158: -- Initialize message list if p_init_msg_list is set to TRUE.
1159: IF FND_API.to_Boolean( p_init_msg_list )
1155: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1156: END IF;
1157:
1158: -- Initialize message list if p_init_msg_list is set to TRUE.
1159: IF FND_API.to_Boolean( p_init_msg_list )
1160: THEN
1161: FND_MSG_PUB.initialize;
1162: END IF;
1163:
1167: END IF;
1168:
1169:
1170: -- Initialize API return status to SUCCESS
1171: x_return_status := FND_API.G_RET_STS_SUCCESS;
1172:
1173: -- Validate the Delete Condition
1174: --
1175:
1190: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1191: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_RSNMAP_DELETE');
1192: FND_MSG_PUB.ADD;
1193: END IF;
1194: RAISE FND_API.G_EXC_ERROR;
1195: END IF;
1196:
1197: ELSIF p_code_conversion_type = 'OZF_UOM_CODES' THEN
1198:
1300: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1301: FND_MESSAGE.Set_Name('OZF', 'OZF_RESALE_UOM_DELETE');
1302: FND_MSG_PUB.ADD;
1303: END IF;
1304: RAISE FND_API.G_EXC_ERROR;
1305: ELSE
1306: IF g_party_id IS NOT NULL THEN
1307: OPEN csr_code_conv_agrmt_uom ( p_external_code
1308: ,g_party_id
1314: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1315: FND_MESSAGE.Set_Name('OZF', 'OZF_RESALE_UOM_DELETE');
1316: FND_MSG_PUB.ADD;
1317: END IF;
1318: RAISE FND_API.G_EXC_ERROR;
1319: END IF;
1320: ELSE
1321: OPEN csr_code_conv_agmt_uom ( p_external_code);
1322: FETCH csr_code_conv_agmt_uom INTO l_dummy;
1326: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1327: FND_MESSAGE.Set_Name('OZF', 'OZF_RESALE_UOM_DELETE');
1328: FND_MSG_PUB.ADD;
1329: END IF;
1330: RAISE FND_API.G_EXC_ERROR;
1331: END IF;
1332: END IF;
1333: END IF;
1334:
1357: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1358: FND_MESSAGE.Set_Name('OZF', 'OZF_RESALE_AGREEMENT_DELETE');
1359: FND_MSG_PUB.ADD;
1360: END IF;
1361: raise FND_API.G_EXC_ERROR;
1362: END IF;
1363: ELSIF p_code_conversion_type = 'OZF_PRODUCT_CODES' THEN
1364: l_dummy := null;
1365: -- Delete from Trade Profile at Party or Account level
1384: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1385: FND_MESSAGE.Set_Name('OZF', 'OZF_RESALE_PRODUCT_DELETE');
1386: FND_MSG_PUB.ADD;
1387: END IF;
1388: raise FND_API.G_EXC_ERROR;
1389: END IF;
1390: ELSIF p_code_conversion_type = 'OZF_PARTY_CODES' THEN
1391: l_dummy := null;
1392: -- Make this cursor static when application is upgraded to 9i
1475: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1476: FND_MESSAGE.Set_Name('OZF', 'OZF_RESALE_PARTY_DELETE');
1477: FND_MSG_PUB.ADD;
1478: END IF;
1479: RAISE FND_API.G_EXC_ERROR;
1480: END IF;
1481:
1482:
1483: ELSIF p_code_conversion_type = 'OZF_PARTY_SITE_CODES' THEN
1565: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1566: FND_MESSAGE.Set_Name('OZF', 'OZF_RESALE_PARTY_SITE_DELETE');
1567: FND_MSG_PUB.ADD;
1568: END IF;
1569: RAISE FND_API.G_EXC_ERROR;
1570: END IF;
1571: END IF; -- p_code_conversion_type
1572:
1573: END IF; -- p_external_code is not null
1583: OZF_CODE_CONVERSION_PKG.Delete_Row( p_code_conversion_id => p_code_conversion_id,
1584: p_object_version_number => p_object_version_number );
1585: EXCEPTION
1586: WHEN OTHERS THEN
1587: RAISE FND_API.G_EXC_ERROR;
1588: END;
1589:
1590: -- Standard check for p_commit
1591: IF FND_API.to_Boolean( p_commit )
1587: RAISE FND_API.G_EXC_ERROR;
1588: END;
1589:
1590: -- Standard check for p_commit
1591: IF FND_API.to_Boolean( p_commit )
1592: THEN
1593: COMMIT WORK;
1594: END IF;
1595:
1603: (p_count => x_msg_count,
1604: p_data => x_msg_data
1605: );
1606: EXCEPTION
1607: WHEN FND_API.G_EXC_ERROR THEN
1608: ROLLBACK TO delete_code_conversion_pvt;
1609: x_return_status := FND_API.G_RET_STS_ERROR;
1610: -- Standard call to get message count and if count=1, get the message
1611: FND_MSG_PUB.Count_And_Get (
1605: );
1606: EXCEPTION
1607: WHEN FND_API.G_EXC_ERROR THEN
1608: ROLLBACK TO delete_code_conversion_pvt;
1609: x_return_status := FND_API.G_RET_STS_ERROR;
1610: -- Standard call to get message count and if count=1, get the message
1611: FND_MSG_PUB.Count_And_Get (
1612: p_encoded => FND_API.G_FALSE,
1613: p_count => x_msg_count,
1608: ROLLBACK TO delete_code_conversion_pvt;
1609: x_return_status := FND_API.G_RET_STS_ERROR;
1610: -- Standard call to get message count and if count=1, get the message
1611: FND_MSG_PUB.Count_And_Get (
1612: p_encoded => FND_API.G_FALSE,
1613: p_count => x_msg_count,
1614: p_data => x_msg_data
1615: );
1616: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1612: p_encoded => FND_API.G_FALSE,
1613: p_count => x_msg_count,
1614: p_data => x_msg_data
1615: );
1616: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1617: ROLLBACK TO delete_code_conversion_pvt;
1618: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1619: -- Standard call to get message count and if count=1, get the message
1620: FND_MSG_PUB.Count_And_Get (
1614: p_data => x_msg_data
1615: );
1616: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1617: ROLLBACK TO delete_code_conversion_pvt;
1618: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1619: -- Standard call to get message count and if count=1, get the message
1620: FND_MSG_PUB.Count_And_Get (
1621: p_encoded => FND_API.G_FALSE,
1622: p_count => x_msg_count,
1617: ROLLBACK TO delete_code_conversion_pvt;
1618: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1619: -- Standard call to get message count and if count=1, get the message
1620: FND_MSG_PUB.Count_And_Get (
1621: p_encoded => FND_API.G_FALSE,
1622: p_count => x_msg_count,
1623: p_data => x_msg_data
1624: );
1625: WHEN OTHERS THEN
1623: p_data => x_msg_data
1624: );
1625: WHEN OTHERS THEN
1626: ROLLBACK TO delete_code_conversion_pvt;
1627: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1628: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1629: THEN
1630: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1631: END IF;
1630: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1631: END IF;
1632: -- Standard call to get message count and if count=1, get the message
1633: FND_MSG_PUB.Count_And_Get (
1634: p_encoded => FND_API.G_FALSE,
1635: p_count => x_msg_count,
1636: p_data => x_msg_data
1637: );
1638:
1697:
1698:
1699: BEGIN
1700:
1701: x_return_status := FND_API.g_ret_sts_success;
1702: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
1703: OZF_UTILITY_PVT.debug_message('in '||l_api_name);
1704: OZF_UTILITY_PVT.debug_message('Dummy value ' || l_org_dummy);
1705: END IF;
1704: OZF_UTILITY_PVT.debug_message('Dummy value ' || l_org_dummy);
1705: END IF;
1706: IF p_validation_mode = JTF_PLSQL_API.g_create THEN
1707:
1708: IF p_code_conversion_rec.cust_account_id = FND_API.g_miss_num OR
1709: p_code_conversion_rec.cust_account_id IS NULL
1710: THEN
1711: IF p_code_conversion_rec.party_id = FND_API.g_miss_num OR
1712: p_code_conversion_rec.party_id IS NULL
1707:
1708: IF p_code_conversion_rec.cust_account_id = FND_API.g_miss_num OR
1709: p_code_conversion_rec.cust_account_id IS NULL
1710: THEN
1711: IF p_code_conversion_rec.party_id = FND_API.g_miss_num OR
1712: p_code_conversion_rec.party_id IS NULL
1713: THEN
1714: l_org_dummy := 0;
1715:
1736: OZF_UTILITY_PVT.debug_message('and end date active ' || p_code_conversion_rec.end_date_active );
1737: OZF_UTILITY_PVT.debug_message('External Code ' || l_external_code);
1738: END IF;
1739: IF l_org_dummy > 0 THEN
1740: l_valid_flag := FND_API.g_false;
1741: END IF;
1742: ELSE
1743: l_party_dummy := NULL;
1744: OPEN csr_code_conv_4party(p_code_conversion_rec.party_id,
1756: OZF_UTILITY_PVT.debug_message('and end date active ' || p_code_conversion_rec.end_date_active );
1757: END IF;
1758:
1759: IF l_party_dummy > 0 THEN
1760: l_valid_flag := FND_API.g_false;
1761: END IF;
1762:
1763: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
1764: OZF_UTILITY_PVT.debug_message('Count of code map for party ' || l_party_dummy);
1781: OZF_UTILITY_PVT.debug_message('and end date active ' ||nvl(p_code_conversion_rec.end_date_active,sysdate) );
1782: OZF_UTILITY_PVT.debug_message('Count of code map for account ' || l_acct_dummy);
1783: END IF;
1784: IF l_acct_dummy > 0 THEN
1785: l_valid_flag := FND_API.g_false;
1786: END IF;
1787: END IF;
1788: ELSE
1789: l_valid_flag := FND_API.g_true;
1785: l_valid_flag := FND_API.g_false;
1786: END IF;
1787: END IF;
1788: ELSE
1789: l_valid_flag := FND_API.g_true;
1790: END IF;
1791:
1792: IF l_valid_flag = FND_API.g_false THEN
1793: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1788: ELSE
1789: l_valid_flag := FND_API.g_true;
1790: END IF;
1791:
1792: IF l_valid_flag = FND_API.g_false THEN
1793: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1794: FND_MESSAGE.set_name('OZF', 'OZF_CODE_CONVERSION_DUPLICATE');
1795: FND_MSG_PUB.add;
1796: END IF;
1793: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1794: FND_MESSAGE.set_name('OZF', 'OZF_CODE_CONVERSION_DUPLICATE');
1795: FND_MSG_PUB.add;
1796: END IF;
1797: x_return_status := FND_API.G_RET_STS_ERROR;
1798: END IF;
1799:
1800: END Check_Uniq_Code_Conversion;
1801:
1819: l_api_version_number CONSTANT NUMBER := 1.0;
1820:
1821: BEGIN
1822:
1823: x_return_status := FND_API.g_ret_sts_success;
1824:
1825: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
1826: OZF_UTILITY_PVT.debug_message('in '||l_api_name);
1827: END IF;
1825: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
1826: OZF_UTILITY_PVT.debug_message('in '||l_api_name);
1827: END IF;
1828:
1829: IF p_code_conversion_rec.external_code = FND_API.g_miss_char OR
1830: p_code_conversion_rec.external_code IS NULL
1831: THEN
1832: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1833: FND_MESSAGE.set_name('OZF', 'OZF_EXTERNAL_CODE_MISSING'||NVL(p_code_conversion_rec.external_code,'NULL'));
1832: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1833: FND_MESSAGE.set_name('OZF', 'OZF_EXTERNAL_CODE_MISSING'||NVL(p_code_conversion_rec.external_code,'NULL'));
1834: FND_MSG_PUB.add;
1835: END IF;
1836: x_return_status := FND_API.G_RET_STS_ERROR;
1837: RETURN;
1838: END IF;
1839:
1840: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
1861: l_api_version_number CONSTANT NUMBER := 1.0;
1862:
1863: BEGIN
1864:
1865: x_return_status := FND_API.g_ret_sts_success;
1866:
1867: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
1868: OZF_UTILITY_PVT.debug_message('in '||l_api_name);
1869: END IF;
1875: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1876: FND_MESSAGE.set_name('OZF', 'OZF_CODE_CONV_STDATE_BKDATED');
1877: FND_MSG_PUB.add;
1878: END IF;
1879: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1880: END IF;
1881: END IF;
1882:
1883: -- Fix for 3928270
1888: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1889: FND_MESSAGE.set_name('OZF', 'OZF_CODE_CONV_ENDDATE_BKDATED');
1890: FND_MSG_PUB.add;
1891: END IF;
1892: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1893: END IF;
1894:
1895: -- Fix for 3928270
1896:
1902: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1903: FND_MESSAGE.set_name('OZF', 'OZF_CODE_CONV_STDATE_GREATE');
1904: FND_MSG_PUB.add;
1905: END IF;
1906: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1907: END IF;
1908:
1909: END check_code_conversion_dt;
1910:
1920: l_api_version_number CONSTANT NUMBER := 1.0;
1921:
1922: BEGIN
1923:
1924: x_return_status := FND_API.g_ret_sts_success;
1925:
1926: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
1927: OZF_UTILITY_PVT.debug_message('in '||l_api_name);
1928: END IF;
1930: check_code_conv_req_items( p_code_conversion_rec,
1931: p_validation_mode,
1932: x_return_status
1933: );
1934: IF x_return_status <> FND_API.g_ret_sts_success THEN
1935: RETURN;
1936: END IF;
1937:
1938: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
1943: check_uniq_code_conversion( p_code_conversion_rec,
1944: p_validation_mode,
1945: x_return_status
1946: );
1947: IF x_return_status <> FND_API.g_ret_sts_success THEN
1948: RETURN;
1949: END IF;
1950:
1951: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
1955: check_code_conversion_dt (p_code_conversion_rec,
1956: p_validation_mode,
1957: x_return_status
1958: );
1959: IF x_return_status <> FND_API.g_ret_sts_success Then
1960: RETURN;
1961: END IF;
1962:
1963: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
1974: -- End of Comments
1975:
1976: PROCEDURE Validate_Code_Conversion(
1977: p_api_version_number IN NUMBER,
1978: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1979: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1980: p_validation_mode IN VARCHAR2,
1981: p_code_conversion_tbl IN code_conversion_tbl_type,
1982: x_return_status OUT NOCOPY VARCHAR2,
1975:
1976: PROCEDURE Validate_Code_Conversion(
1977: p_api_version_number IN NUMBER,
1978: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1979: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1980: p_validation_mode IN VARCHAR2,
1981: p_code_conversion_tbl IN code_conversion_tbl_type,
1982: x_return_status OUT NOCOPY VARCHAR2,
1983: x_msg_count OUT NOCOPY NUMBER,
1996: -- Standard Start of API savepoint
1997: SAVEPOINT validate_code_conversion_pvt;
1998:
1999: -- Standard call to check for call compatibility.
2000: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2001: p_api_version_number,
2002: l_api_name,
2003: G_PKG_NAME)
2004: THEN
2001: p_api_version_number,
2002: l_api_name,
2003: G_PKG_NAME)
2004: THEN
2005: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2006: END IF;
2007:
2008: -- Initialize message list if p_init_msg_list is set to TRUE.
2009: IF FND_API.to_Boolean( p_init_msg_list )
2005: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2006: END IF;
2007:
2008: -- Initialize message list if p_init_msg_list is set to TRUE.
2009: IF FND_API.to_Boolean( p_init_msg_list )
2010: THEN
2011: FND_MSG_PUB.initialize;
2012: END IF;
2013: -- Call the Validate Item procedure for the item(field level validations )
2013: -- Call the Validate Item procedure for the item(field level validations )
2014: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
2015: OZF_UTILITY_PVT.debug_message('in '||l_api_name );
2016: END IF;
2017: x_return_status := FND_API.g_ret_sts_success;
2018:
2019: IF p_validation_level >= JTF_PLSQL_API.g_valid_level_item THEN
2020:
2021: FOR i in 1 .. p_code_conversion_tbl.count
2036: p_validation_mode => p_validation_mode,
2037: x_return_status => x_return_status);
2038:
2039:
2040: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2041: RAISE FND_API.G_EXC_ERROR;
2042: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2043: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2044: END IF;
2037: x_return_status => x_return_status);
2038:
2039:
2040: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2041: RAISE FND_API.G_EXC_ERROR;
2042: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2043: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2044: END IF;
2045: END LOOP;
2038:
2039:
2040: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2041: RAISE FND_API.G_EXC_ERROR;
2042: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2043: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2044: END IF;
2045: END LOOP;
2046:
2039:
2040: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2041: RAISE FND_API.G_EXC_ERROR;
2042: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2043: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2044: END IF;
2045: END LOOP;
2046:
2047: END IF;
2045: END LOOP;
2046:
2047: END IF;
2048: -- Initialize API return status to SUCCESS
2049: x_return_status := FND_API.G_RET_STS_SUCCESS;
2050: -- Standard call to get message count and if count is 1, get message info.
2051: FND_MSG_PUB.Count_And_Get
2052: (p_count => x_msg_count,
2053: p_data => x_msg_data
2053: p_data => x_msg_data
2054: );
2055: EXCEPTION
2056: WHEN OZF_Utility_PVT.resource_locked THEN
2057: x_return_status := FND_API.g_ret_sts_error;
2058: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2059: FND_MESSAGE.set_name('OZF', 'OZF_API_RESOURCE_LOCKED ');
2060: FND_MSG_PUB.add;
2061: END IF;
2058: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2059: FND_MESSAGE.set_name('OZF', 'OZF_API_RESOURCE_LOCKED ');
2060: FND_MSG_PUB.add;
2061: END IF;
2062: WHEN FND_API.G_EXC_ERROR THEN
2063: ROLLBACK TO validate_code_conversion_pvt;
2064: x_return_status := FND_API.G_RET_STS_ERROR;
2065: -- Standard call to get message count and if count=1, get the message
2066: FND_MSG_PUB.Count_And_Get (
2060: FND_MSG_PUB.add;
2061: END IF;
2062: WHEN FND_API.G_EXC_ERROR THEN
2063: ROLLBACK TO validate_code_conversion_pvt;
2064: x_return_status := FND_API.G_RET_STS_ERROR;
2065: -- Standard call to get message count and if count=1, get the message
2066: FND_MSG_PUB.Count_And_Get (
2067: p_encoded => FND_API.G_FALSE,
2068: p_count => x_msg_count,
2063: ROLLBACK TO validate_code_conversion_pvt;
2064: x_return_status := FND_API.G_RET_STS_ERROR;
2065: -- Standard call to get message count and if count=1, get the message
2066: FND_MSG_PUB.Count_And_Get (
2067: p_encoded => FND_API.G_FALSE,
2068: p_count => x_msg_count,
2069: p_data => x_msg_data
2070: );
2071: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2067: p_encoded => FND_API.G_FALSE,
2068: p_count => x_msg_count,
2069: p_data => x_msg_data
2070: );
2071: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2072: ROLLBACK TO validate_code_conversion_pvt;
2073: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2074: -- Standard call to get message count and if count=1, get the message
2075: FND_MSG_PUB.Count_And_Get (
2069: p_data => x_msg_data
2070: );
2071: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2072: ROLLBACK TO validate_code_conversion_pvt;
2073: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2074: -- Standard call to get message count and if count=1, get the message
2075: FND_MSG_PUB.Count_And_Get (
2076: p_encoded => FND_API.G_FALSE,
2077: p_count => x_msg_count,
2072: ROLLBACK TO validate_code_conversion_pvt;
2073: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2074: -- Standard call to get message count and if count=1, get the message
2075: FND_MSG_PUB.Count_And_Get (
2076: p_encoded => FND_API.G_FALSE,
2077: p_count => x_msg_count,
2078: p_data => x_msg_data
2079: );
2080: WHEN OTHERS THEN
2078: p_data => x_msg_data
2079: );
2080: WHEN OTHERS THEN
2081: ROLLBACK TO validate_code_conversion_pvt;
2082: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2083: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2084: THEN
2085: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2086: END IF;
2085: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2086: END IF;
2087: -- Standard call to get message count and if count=1, get the message
2088: FND_MSG_PUB.Count_And_Get (
2089: p_encoded => FND_API.G_FALSE,
2090: p_count => x_msg_count,
2091: p_data => x_msg_data
2092: );
2093:
2162:
2163:
2164: BEGIN
2165:
2166: X_Return_Status := FND_API.g_ret_sts_success;
2167:
2168: --- in case of multiple rows what will be the result? error out or get the first record.
2169:
2170: OPEN csr_get_internal_code_Acct(p_cust_account_id
2205:
2206: EXCEPTION
2207: WHEN OTHERS THEN
2208:
2209: x_return_status := FND_API.g_ret_sts_unexp_error;
2210:
2211: IF csr_get_internal_code_acct%ISOPEN THEN
2212: CLOSE csr_get_internal_code_acct;
2213: END IF;
2224: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2225: END IF;
2226: -- Standard call to get message count and if count=1, get the message
2227: FND_MSG_PUB.Count_And_Get (
2228: p_encoded => FND_API.G_FALSE,
2229: p_count => x_msg_count,
2230: p_data => x_msg_data
2231: );
2232:
2273: BEGIN
2274: /* 3/25/2008 -gdeepika- Bug 6832508 */
2275: /* For the code conversions at a supplier site , only one valid internal code
2276: should exist for a particular external code on a particular date.*/
2277: x_return_status := FND_API.g_ret_sts_success;
2278: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
2279: OZF_UTILITY_PVT.debug_message('in '||l_api_name);
2280: OZF_UTILITY_PVT.debug_message('Dummy value ' || l_dummy);
2281: END IF;
2309: OZF_UTILITY_PVT.debug_message('and end date active ' || p_supp_code_conversion_rec.end_date_active );
2310: OZF_UTILITY_PVT.debug_message('External Code ' || l_external_code);
2311: END IF;
2312: IF l_dummy > 0 THEN
2313: l_valid_flag := FND_API.g_false;
2314:
2315: ELSE
2316: l_valid_flag := FND_API.g_true;
2317:
2312: IF l_dummy > 0 THEN
2313: l_valid_flag := FND_API.g_false;
2314:
2315: ELSE
2316: l_valid_flag := FND_API.g_true;
2317:
2318: END IF;
2319:
2320: IF l_valid_flag = FND_API.g_false THEN
2316: l_valid_flag := FND_API.g_true;
2317:
2318: END IF;
2319:
2320: IF l_valid_flag = FND_API.g_false THEN
2321: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2322: FND_MESSAGE.set_name('OZF', 'OZF_CODE_CONVERSION_DUPLICATE');
2323: FND_MSG_PUB.add;
2324: END IF;
2321: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2322: FND_MESSAGE.set_name('OZF', 'OZF_CODE_CONVERSION_DUPLICATE');
2323: FND_MSG_PUB.add;
2324: END IF;
2325: x_return_status := FND_API.G_RET_STS_ERROR;
2326: RETURN;
2327: END IF;
2328:
2329:
2348: l_api_version_number CONSTANT NUMBER := 1.0;
2349:
2350: BEGIN
2351:
2352: x_return_status := FND_API.g_ret_sts_success;
2353:
2354: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
2355: OZF_UTILITY_PVT.debug_message('in '||l_api_name);
2356: END IF;
2354: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
2355: OZF_UTILITY_PVT.debug_message('in '||l_api_name);
2356: END IF;
2357:
2358: IF p_supp_code_conversion_rec.external_code = FND_API.g_miss_char OR
2359: p_supp_code_conversion_rec.external_code IS NULL
2360: THEN
2361: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2362: FND_MESSAGE.set_name('OZF', 'OZF_EXTERNAL_CODE_MISSING'||NVL(p_supp_code_conversion_rec.external_code,'NULL'));
2361: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2362: FND_MESSAGE.set_name('OZF', 'OZF_EXTERNAL_CODE_MISSING'||NVL(p_supp_code_conversion_rec.external_code,'NULL'));
2363: FND_MSG_PUB.add;
2364: END IF;
2365: x_return_status := FND_API.G_RET_STS_ERROR;
2366: RETURN;
2367: END IF;
2368:
2369: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
2390: l_api_version_number CONSTANT NUMBER := 1.0;
2391:
2392: BEGIN
2393:
2394: x_return_status := FND_API.g_ret_sts_success;
2395:
2396: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
2397: OZF_UTILITY_PVT.debug_message('in '||l_api_name);
2398: END IF;
2404: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2405: FND_MESSAGE.set_name('OZF', 'OZF_CODE_CONV_STDATE_BKDATED');
2406: FND_MSG_PUB.add;
2407: END IF;
2408: x_return_status := FND_API.G_RET_STS_ERROR;
2409: RETURN;
2410: END IF;
2411: END IF;
2412:
2418: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2419: FND_MESSAGE.set_name('OZF', 'OZF_CODE_CONV_ENDDATE_BKDATED');
2420: FND_MSG_PUB.add;
2421: END IF;
2422: x_return_status := FND_API.G_RET_STS_ERROR;
2423: RETURN;
2424: END IF;
2425:
2426:
2430: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2431: FND_MESSAGE.set_name('OZF', 'OZF_CODE_CONV_STDATE_GREATE');
2432: FND_MSG_PUB.add;
2433: END IF;
2434: x_return_status := FND_API.G_RET_STS_ERROR;
2435: RETURN;
2436: END IF;
2437:
2438: END check_supp_code_conversion_dt;
2487:
2488:
2489: BEGIN
2490:
2491: X_Return_Status := FND_API.g_ret_sts_success;
2492:
2493:
2494: OPEN csr_get_internal_code( p_supp_trade_profile_id
2495: ,p_external_code
2506:
2507: EXCEPTION
2508: WHEN OTHERS THEN
2509:
2510: x_return_status := FND_API.g_ret_sts_unexp_error;
2511:
2512: IF csr_get_internal_code%ISOPEN THEN
2513: CLOSE csr_get_internal_code;
2514: END IF;
2517: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2518: END IF;
2519: -- Standard call to get message count and if count=1, get the message
2520: FND_MSG_PUB.Count_And_Get (
2521: p_encoded => FND_API.G_FALSE,
2522: p_count => x_msg_count,
2523: p_data => x_msg_data
2524: );
2525:
2538: l_api_version_number CONSTANT NUMBER := 1.0;
2539:
2540: BEGIN
2541:
2542: x_return_status := FND_API.g_ret_sts_success;
2543:
2544: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
2545: OZF_UTILITY_PVT.debug_message('in '||l_api_name);
2546: END IF;
2548: check_supp_code_conv_req_items( p_supp_code_conversion_rec,
2549: p_validation_mode,
2550: x_return_status
2551: );
2552: IF x_return_status <> FND_API.g_ret_sts_success THEN
2553: RETURN;
2554: END IF;
2555:
2556: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
2561: check_uniq_supp_code_conv( p_supp_code_conversion_rec,
2562: p_validation_mode,
2563: x_return_status
2564: );
2565: IF x_return_status <> FND_API.g_ret_sts_success THEN
2566: RETURN;
2567: END IF;
2568:
2569: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
2573: check_supp_code_conversion_dt (p_supp_code_conversion_rec,
2574: p_validation_mode,
2575: x_return_status
2576: );
2577: IF x_return_status <> FND_API.g_ret_sts_success Then
2578: RETURN;
2579: END IF;
2580:
2581: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
2584:
2585: END check_supp_code_conv_items;
2586: PROCEDURE Validate_supp_code_Conv(
2587: p_api_version_number IN NUMBER,
2588: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2589: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2590: p_validation_mode IN VARCHAR2,
2591: p_supp_code_conversion_tbl IN supp_code_conversion_tbl_type,
2592: x_return_status OUT NOCOPY VARCHAR2,
2585: END check_supp_code_conv_items;
2586: PROCEDURE Validate_supp_code_Conv(
2587: p_api_version_number IN NUMBER,
2588: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2589: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2590: p_validation_mode IN VARCHAR2,
2591: p_supp_code_conversion_tbl IN supp_code_conversion_tbl_type,
2592: x_return_status OUT NOCOPY VARCHAR2,
2593: x_msg_count OUT NOCOPY NUMBER,
2606: -- Standard Start of API savepoint
2607: SAVEPOINT validate_supp_code_conv_pvt;
2608:
2609: -- Standard call to check for call compatibility.
2610: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2611: p_api_version_number,
2612: l_api_name,
2613: G_PKG_NAME)
2614: THEN
2611: p_api_version_number,
2612: l_api_name,
2613: G_PKG_NAME)
2614: THEN
2615: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2616: END IF;
2617:
2618: -- Initialize message list if p_init_msg_list is set to TRUE.
2619: IF FND_API.to_Boolean( p_init_msg_list )
2615: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2616: END IF;
2617:
2618: -- Initialize message list if p_init_msg_list is set to TRUE.
2619: IF FND_API.to_Boolean( p_init_msg_list )
2620: THEN
2621: FND_MSG_PUB.initialize;
2622: END IF;
2623: -- Call the Validate Item procedure for the item(field level validations )
2623: -- Call the Validate Item procedure for the item(field level validations )
2624: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
2625: OZF_UTILITY_PVT.debug_message('in '||l_api_name );
2626: END IF;
2627: x_return_status := FND_API.g_ret_sts_success;
2628:
2629: IF p_validation_level >= JTF_PLSQL_API.g_valid_level_item THEN
2630:
2631: FOR i in 1 .. p_supp_code_conversion_tbl.count
2645: p_supp_code_conversion_rec => l_supp_code_conversion_rec,
2646: p_validation_mode => p_validation_mode,
2647: x_return_status => x_return_status);
2648:
2649: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2650: RAISE FND_API.G_EXC_ERROR;
2651: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2652: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2653: END IF;
2646: p_validation_mode => p_validation_mode,
2647: x_return_status => x_return_status);
2648:
2649: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2650: RAISE FND_API.G_EXC_ERROR;
2651: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2652: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2653: END IF;
2654: END LOOP;
2647: x_return_status => x_return_status);
2648:
2649: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2650: RAISE FND_API.G_EXC_ERROR;
2651: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2652: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2653: END IF;
2654: END LOOP;
2655:
2648:
2649: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2650: RAISE FND_API.G_EXC_ERROR;
2651: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2652: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2653: END IF;
2654: END LOOP;
2655:
2656: END IF;
2654: END LOOP;
2655:
2656: END IF;
2657: -- Initialize API return status to SUCCESS
2658: x_return_status := FND_API.G_RET_STS_SUCCESS;
2659: -- Standard call to get message count and if count is 1, get message info.
2660: FND_MSG_PUB.Count_And_Get
2661: (p_count => x_msg_count,
2662: p_data => x_msg_data
2662: p_data => x_msg_data
2663: );
2664: EXCEPTION
2665: WHEN OZF_Utility_PVT.resource_locked THEN
2666: x_return_status := FND_API.g_ret_sts_error;
2667: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2668: FND_MESSAGE.set_name('OZF', 'OZF_API_RESOURCE_LOCKED ');
2669: FND_MSG_PUB.add;
2670: END IF;
2667: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2668: FND_MESSAGE.set_name('OZF', 'OZF_API_RESOURCE_LOCKED ');
2669: FND_MSG_PUB.add;
2670: END IF;
2671: WHEN FND_API.G_EXC_ERROR THEN
2672: ROLLBACK TO validate_supp_code_conv_pvt;
2673: x_return_status := FND_API.G_RET_STS_ERROR;
2674: -- Standard call to get message count and if count=1, get the message
2675: FND_MSG_PUB.Count_And_Get (
2669: FND_MSG_PUB.add;
2670: END IF;
2671: WHEN FND_API.G_EXC_ERROR THEN
2672: ROLLBACK TO validate_supp_code_conv_pvt;
2673: x_return_status := FND_API.G_RET_STS_ERROR;
2674: -- Standard call to get message count and if count=1, get the message
2675: FND_MSG_PUB.Count_And_Get (
2676: p_encoded => FND_API.G_FALSE,
2677: p_count => x_msg_count,
2672: ROLLBACK TO validate_supp_code_conv_pvt;
2673: x_return_status := FND_API.G_RET_STS_ERROR;
2674: -- Standard call to get message count and if count=1, get the message
2675: FND_MSG_PUB.Count_And_Get (
2676: p_encoded => FND_API.G_FALSE,
2677: p_count => x_msg_count,
2678: p_data => x_msg_data
2679: );
2680: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2676: p_encoded => FND_API.G_FALSE,
2677: p_count => x_msg_count,
2678: p_data => x_msg_data
2679: );
2680: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2681: ROLLBACK TO validate_supp_code_conv_pvt;
2682: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2683: -- Standard call to get message count and if count=1, get the message
2684: FND_MSG_PUB.Count_And_Get (
2678: p_data => x_msg_data
2679: );
2680: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2681: ROLLBACK TO validate_supp_code_conv_pvt;
2682: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2683: -- Standard call to get message count and if count=1, get the message
2684: FND_MSG_PUB.Count_And_Get (
2685: p_encoded => FND_API.G_FALSE,
2686: p_count => x_msg_count,
2681: ROLLBACK TO validate_supp_code_conv_pvt;
2682: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2683: -- Standard call to get message count and if count=1, get the message
2684: FND_MSG_PUB.Count_And_Get (
2685: p_encoded => FND_API.G_FALSE,
2686: p_count => x_msg_count,
2687: p_data => x_msg_data
2688: );
2689: WHEN OTHERS THEN
2687: p_data => x_msg_data
2688: );
2689: WHEN OTHERS THEN
2690: ROLLBACK TO validate_supp_code_conv_pvt;
2691: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2692: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2693: THEN
2694: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2695: END IF;
2694: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2695: END IF;
2696: -- Standard call to get message count and if count=1, get the message
2697: FND_MSG_PUB.Count_And_Get (
2698: p_encoded => FND_API.G_FALSE,
2699: p_count => x_msg_count,
2700: p_data => x_msg_data
2701: );
2702:
2704:
2705: PROCEDURE create_supp_code_conversion
2706: (
2707: p_api_version_number IN NUMBER,
2708: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2709: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
2710: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2711: x_return_status OUT NOCOPY VARCHAR2,
2712: x_msg_count OUT NOCOPY NUMBER,
2705: PROCEDURE create_supp_code_conversion
2706: (
2707: p_api_version_number IN NUMBER,
2708: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2709: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
2710: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2711: x_return_status OUT NOCOPY VARCHAR2,
2712: x_msg_count OUT NOCOPY NUMBER,
2713: x_msg_data OUT NOCOPY VARCHAR2,
2706: (
2707: p_api_version_number IN NUMBER,
2708: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2709: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
2710: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2711: x_return_status OUT NOCOPY VARCHAR2,
2712: x_msg_count OUT NOCOPY NUMBER,
2713: x_msg_data OUT NOCOPY VARCHAR2,
2714: p_supp_code_conversion_tbl IN supp_code_conversion_tbl_type,
2729: -- Standard Start of API savepoint
2730: SAVEPOINT create_supp_code_conv_pvt;
2731:
2732: -- Standard call to check for call compatibility.
2733: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2734: p_api_version_number,
2735: l_api_name,
2736: G_PKG_NAME)
2737: THEN
2734: p_api_version_number,
2735: l_api_name,
2736: G_PKG_NAME)
2737: THEN
2738: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2739: END IF;
2740:
2741: -- Initialize message list if p_init_msg_list is set to TRUE.
2742: IF FND_API.to_Boolean( p_init_msg_list )
2738: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2739: END IF;
2740:
2741: -- Initialize message list if p_init_msg_list is set to TRUE.
2742: IF FND_API.to_Boolean( p_init_msg_list )
2743: THEN
2744: FND_MSG_PUB.initialize;
2745: END IF;
2746:
2754: THEN
2755: FND_MESSAGE.Set_Name('OZF', 'OZF_USER_PROFILE_MISSING');
2756: FND_MSG_PUB.ADD;
2757: END IF;
2758: RAISE FND_API.G_EXC_ERROR;
2759: END IF;
2760:
2761: -- Debug Message
2762: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
2763: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
2764: END IF;
2765:
2766: -- Initialize API return status to SUCCESS
2767: x_return_status := FND_API.G_RET_STS_SUCCESS;
2768:
2769: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
2770: OZF_UTILITY_PVT.debug_message( 'No of records to be created'||p_supp_code_conversion_tbl.count);
2771: END IF;
2769: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
2770: OZF_UTILITY_PVT.debug_message( 'No of records to be created'||p_supp_code_conversion_tbl.count);
2771: END IF;
2772:
2773: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL) THEN
2774: -- Debug message
2775: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name);
2776: -- Invoke validation procedures
2777: Validate_supp_code_Conv(
2775: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name);
2776: -- Invoke validation procedures
2777: Validate_supp_code_Conv(
2778: p_api_version_number => 1.0,
2779: p_init_msg_list => FND_API.G_FALSE,
2780: p_validation_level => p_validation_level,
2781: p_validation_mode => JTF_PLSQL_API.G_CREATE,
2782: p_supp_code_conversion_tbl => p_supp_code_conversion_tbl,
2783: x_return_status => x_return_status,
2784: x_msg_count => x_msg_count,
2785: x_msg_data => x_msg_data);
2786: END IF;
2787:
2788: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2789: RAISE FND_API.G_EXC_ERROR;
2790: END IF;
2791:
2792: -- Debug Message
2785: x_msg_data => x_msg_data);
2786: END IF;
2787:
2788: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2789: RAISE FND_API.G_EXC_ERROR;
2790: END IF;
2791:
2792: -- Debug Message
2793: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
2858:
2859: EXCEPTION
2860: WHEN OTHERS THEN
2861: OZF_UTILITY_PVT.debug_message (SQLERRM ||' Error in creating supp_code conversion map');
2862: RAISE FND_API.G_EXC_ERROR;
2863: END;
2864: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
2865: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || ' after insert call - supp_code conversion id' || l_code_conversion_id);
2866: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || ' after insert call - obj version no ' || l_supp_code_conversion_rec.Object_Version_Number);
2871:
2872: end loop;
2873:
2874: -- Standard check for p_commit
2875: IF FND_API.to_Boolean( p_commit )
2876: THEN
2877: COMMIT WORK;
2878: END IF;
2879:
2891:
2892:
2893: EXCEPTION
2894: WHEN OZF_UTILITY_PVT.resource_locked THEN
2895: x_return_status := FND_API.g_ret_sts_error;
2896: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2897: FND_MESSAGE.set_name('OZF', 'OZF_API_RESOURCES_LOCKED');
2898: FND_MSG_PUB.add;
2899: END IF;
2896: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2897: FND_MESSAGE.set_name('OZF', 'OZF_API_RESOURCES_LOCKED');
2898: FND_MSG_PUB.add;
2899: END IF;
2900: WHEN FND_API.G_EXC_ERROR THEN
2901: ROLLBACK TO create_supp_code_conv_pvt;
2902: x_return_status := FND_API.G_RET_STS_ERROR;
2903: -- Standard call to get message count and if count=1, get the message
2904: FND_MSG_PUB.Count_And_Get (
2898: FND_MSG_PUB.add;
2899: END IF;
2900: WHEN FND_API.G_EXC_ERROR THEN
2901: ROLLBACK TO create_supp_code_conv_pvt;
2902: x_return_status := FND_API.G_RET_STS_ERROR;
2903: -- Standard call to get message count and if count=1, get the message
2904: FND_MSG_PUB.Count_And_Get (
2905: p_encoded => FND_API.G_FALSE,
2906: p_count => x_msg_count,
2901: ROLLBACK TO create_supp_code_conv_pvt;
2902: x_return_status := FND_API.G_RET_STS_ERROR;
2903: -- Standard call to get message count and if count=1, get the message
2904: FND_MSG_PUB.Count_And_Get (
2905: p_encoded => FND_API.G_FALSE,
2906: p_count => x_msg_count,
2907: p_data => x_msg_data
2908: );
2909: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2905: p_encoded => FND_API.G_FALSE,
2906: p_count => x_msg_count,
2907: p_data => x_msg_data
2908: );
2909: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2910: ROLLBACK TO create_code_conversion_pvt;
2911: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2912: -- Standard call to get message count and if count=1, get the message
2913: FND_MSG_PUB.Count_And_Get (
2907: p_data => x_msg_data
2908: );
2909: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2910: ROLLBACK TO create_code_conversion_pvt;
2911: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2912: -- Standard call to get message count and if count=1, get the message
2913: FND_MSG_PUB.Count_And_Get (
2914: p_encoded => FND_API.G_FALSE,
2915: p_count => x_msg_count,
2910: ROLLBACK TO create_code_conversion_pvt;
2911: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2912: -- Standard call to get message count and if count=1, get the message
2913: FND_MSG_PUB.Count_And_Get (
2914: p_encoded => FND_API.G_FALSE,
2915: p_count => x_msg_count,
2916: p_data => x_msg_data
2917: );
2918: WHEN OTHERS THEN
2916: p_data => x_msg_data
2917: );
2918: WHEN OTHERS THEN
2919: ROLLBACK TO create_supp_code_conv_pvt;
2920: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2921: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2922: THEN
2923: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2924: END IF;
2923: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2924: END IF;
2925: -- Standard call to get message count and if count=1, get the message
2926: FND_MSG_PUB.Count_And_Get (
2927: p_encoded => FND_API.G_FALSE,
2928: p_count => x_msg_count,
2929: p_data => x_msg_data
2930: );
2931:
2934:
2935: PROCEDURE Update_supp_code_conversion
2936: (
2937: p_api_version_number IN NUMBER,
2938: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2939: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2940: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2941: x_return_status OUT NOCOPY VARCHAR2,
2942: x_msg_count OUT NOCOPY NUMBER,
2935: PROCEDURE Update_supp_code_conversion
2936: (
2937: p_api_version_number IN NUMBER,
2938: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2939: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2940: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2941: x_return_status OUT NOCOPY VARCHAR2,
2942: x_msg_count OUT NOCOPY NUMBER,
2943: x_msg_data OUT NOCOPY VARCHAR2,
2936: (
2937: p_api_version_number IN NUMBER,
2938: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2939: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2940: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2941: x_return_status OUT NOCOPY VARCHAR2,
2942: x_msg_count OUT NOCOPY NUMBER,
2943: x_msg_data OUT NOCOPY VARCHAR2,
2944: p_supp_code_conversion_tbl IN supp_code_conversion_tbl_type ,
3002: -- Standard Start of API savepoint
3003: SAVEPOINT update_supp_code_conv_pvt;
3004:
3005: -- Standard call to check for call compatibility.
3006: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3007: p_api_version_number,
3008: l_api_name,
3009: G_PKG_NAME)
3010: THEN
3007: p_api_version_number,
3008: l_api_name,
3009: G_PKG_NAME)
3010: THEN
3011: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3012: END IF;
3013:
3014: -- Initialize message list if p_init_msg_list is set to TRUE.
3015: IF FND_API.to_Boolean( p_init_msg_list )
3011: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3012: END IF;
3013:
3014: -- Initialize message list if p_init_msg_list is set to TRUE.
3015: IF FND_API.to_Boolean( p_init_msg_list )
3016: THEN
3017: FND_MSG_PUB.initialize;
3018: END IF;
3019:
3026: THEN
3027: FND_MESSAGE.Set_Name('OZF', 'OZF_USER_PROFILE_MISSING');
3028: FND_MSG_PUB.ADD;
3029: END IF;
3030: RAISE FND_API.G_EXC_ERROR;
3031: END IF;
3032:
3033: -- Debug Message
3034: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
3035: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
3036: END IF;
3037:
3038: -- Initialize API return status to SUCCESS
3039: x_return_status := FND_API.G_RET_STS_SUCCESS;
3040: x_object_version_number := JTF_NUMBER_TABLE();
3041:
3042: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
3043: OZF_UTILITY_PVT.debug_message('p_supp_code_conversion_tbl(1).description: ' || p_supp_code_conversion_tbl(1).description );
3100: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
3101: FND_MESSAGE.set_name('OZF', 'OZF_API_RECORD_NOT_FOUND');
3102: FND_MSG_PUB.add;
3103: END IF;
3104: RAISE FND_API.G_EXC_ERROR;
3105: END IF;
3106: CLOSE csr_supp_code_conversion;
3107:
3108:
3123: THEN
3124: FND_MESSAGE.Set_Name('OZF', 'OZF_API_RESOURCE_LOCKED');
3125: FND_MSG_PUB.ADD;
3126: END IF;
3127: RAISE FND_API.G_EXC_ERROR;
3128: END IF;
3129:
3130:
3131: -- Update internal code only when it is NUll
3136: THEN
3137: FND_MESSAGE.Set_Name('OZF', 'OZF_CODE_CONV_UPD_INTLCODE');
3138: FND_MSG_PUB.ADD;
3139: END IF;
3140: RAISE FND_API.G_EXC_ERROR;
3141: END IF;
3142:
3143: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
3144: OZF_UTILITY_PVT.debug_message( 'Existing End Date' || l_supp_code_conversion_rec.End_Date_Active);
3154: THEN
3155: FND_MESSAGE.Set_Name('OZF', 'OZF_CODE_CONV_UPD_ENDDATE');
3156: FND_MSG_PUB.ADD;
3157: END IF;
3158: RAISE FND_API.G_EXC_ERROR;
3159: END IF;
3160:
3161: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
3162: OZF_UTILITY_PVT.debug_message( 'Existing Start Date' || l_supp_code_conversion_rec.Start_Date_Active);
3173: THEN
3174: FND_MESSAGE.Set_Name('OZF', 'OZF_CODE_CONV_UPD_STARTDATE');
3175: FND_MSG_PUB.ADD;
3176: END IF;
3177: RAISE FND_API.G_EXC_ERROR;
3178: END IF;
3179:
3180: IF l_supp_code_conversion_Rec.end_date_active < p_supp_code_conversion_Rec.Start_Date_Active THEN
3181: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3181: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3182: THEN
3183: OZF_UTILITY_PVT.debug_message ('Cannot update an end dated code conversion map');
3184: END IF;
3185: raise FND_API.G_EXC_ERROR;
3186: END IF;
3187:
3188: END IF;
3189:
3194: THEN
3195: FND_MESSAGE.Set_Name('OZF', 'OZF_CODE_CONV_UPD_EXTCD');
3196: FND_MSG_PUB.ADD;
3197: END IF;
3198: RAISE FND_API.G_EXC_ERROR;
3199: END IF;
3200:
3201: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL) THEN
3202: -- Debug message
3197: END IF;
3198: RAISE FND_API.G_EXC_ERROR;
3199: END IF;
3200:
3201: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL) THEN
3202: -- Debug message
3203: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
3204: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name);
3205: END IF;
3205: END IF;
3206: -- Invoke validation procedures
3207: Validate_supp_code_Conv(
3208: p_api_version_number => 1.0,
3209: p_init_msg_list => FND_API.G_FALSE,
3210: p_validation_level => p_validation_level,
3211: p_validation_mode => JTF_PLSQL_API.G_UPDATE,
3212: p_supp_code_conversion_tbl => p_supp_code_conversion_tbl,
3213: x_return_status => x_return_status,
3214: x_msg_count => x_msg_count,
3215: x_msg_data => x_msg_data);
3216: END IF;
3217:
3218: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
3219: RAISE FND_API.G_EXC_ERROR;
3220: END IF;
3221:
3222: IF (l_supp_code_conversion_rec.org_id IS NULL) THEN
3215: x_msg_data => x_msg_data);
3216: END IF;
3217:
3218: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
3219: RAISE FND_API.G_EXC_ERROR;
3220: END IF;
3221:
3222: IF (l_supp_code_conversion_rec.org_id IS NULL) THEN
3223: l_org_id := MO_GLOBAL.GET_CURRENT_ORG_ID(); -- R12 Enhancements
3267:
3268: EXCEPTION
3269: WHEN OTHERS THEN
3270: OZF_UTILITY_PVT.debug_message (SQLERRM ||' Error in updating code conversion map');
3271: RAISE FND_API.G_EXC_ERROR;
3272: END;
3273:
3274: x_object_version_number.EXTEND;
3275: x_object_Version_number(x_object_version_number.count) := p_supp_code_conversion_rec.Object_Version_Number;
3277: END LOOP;
3278:
3279:
3280: -- Standard check for p_commit
3281: IF FND_API.to_Boolean( p_commit )
3282: THEN
3283: COMMIT WORK;
3284: END IF;
3285:
3293: (p_count => x_msg_count,
3294: p_data => x_msg_data
3295: );
3296: EXCEPTION
3297: WHEN FND_API.G_EXC_ERROR THEN
3298: ROLLBACK TO update_supp_code_conv_pvt;
3299: x_return_status := FND_API.G_RET_STS_ERROR;
3300: -- Standard call to get message count and if count=1, get the message
3301: FND_MSG_PUB.Count_And_Get (
3295: );
3296: EXCEPTION
3297: WHEN FND_API.G_EXC_ERROR THEN
3298: ROLLBACK TO update_supp_code_conv_pvt;
3299: x_return_status := FND_API.G_RET_STS_ERROR;
3300: -- Standard call to get message count and if count=1, get the message
3301: FND_MSG_PUB.Count_And_Get (
3302: p_encoded => FND_API.G_FALSE,
3303: p_count => x_msg_count,
3298: ROLLBACK TO update_supp_code_conv_pvt;
3299: x_return_status := FND_API.G_RET_STS_ERROR;
3300: -- Standard call to get message count and if count=1, get the message
3301: FND_MSG_PUB.Count_And_Get (
3302: p_encoded => FND_API.G_FALSE,
3303: p_count => x_msg_count,
3304: p_data => x_msg_data
3305: );
3306: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3302: p_encoded => FND_API.G_FALSE,
3303: p_count => x_msg_count,
3304: p_data => x_msg_data
3305: );
3306: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3307: ROLLBACK TO update_supp_code_conv_pvt;
3308: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3309: -- Standard call to get message count and if count=1, get the message
3310: FND_MSG_PUB.Count_And_Get (
3304: p_data => x_msg_data
3305: );
3306: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3307: ROLLBACK TO update_supp_code_conv_pvt;
3308: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3309: -- Standard call to get message count and if count=1, get the message
3310: FND_MSG_PUB.Count_And_Get (
3311: p_encoded => FND_API.G_FALSE,
3312: p_count => x_msg_count,
3307: ROLLBACK TO update_supp_code_conv_pvt;
3308: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3309: -- Standard call to get message count and if count=1, get the message
3310: FND_MSG_PUB.Count_And_Get (
3311: p_encoded => FND_API.G_FALSE,
3312: p_count => x_msg_count,
3313: p_data => x_msg_data
3314: );
3315: WHEN OTHERS THEN
3313: p_data => x_msg_data
3314: );
3315: WHEN OTHERS THEN
3316: ROLLBACK TO update_supp_code_conv_pvt;
3317: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3318: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3319: THEN
3320: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3321: END IF;
3320: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3321: END IF;
3322: -- Standard call to get message count and if count=1, get the message
3323: FND_MSG_PUB.Count_And_Get (
3324: p_encoded => FND_API.G_FALSE,
3325: p_count => x_msg_count,
3326: p_data => x_msg_data
3327: );
3328:
3331:
3332:
3333: PROCEDURE Update_supp_code_Conv_Tbl(
3334: P_Api_Version_Number IN NUMBER,
3335: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
3336: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
3337: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3338: X_Return_Status OUT NOCOPY VARCHAR2,
3339: X_Msg_Count OUT NOCOPY NUMBER,
3332:
3333: PROCEDURE Update_supp_code_Conv_Tbl(
3334: P_Api_Version_Number IN NUMBER,
3335: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
3336: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
3337: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3338: X_Return_Status OUT NOCOPY VARCHAR2,
3339: X_Msg_Count OUT NOCOPY NUMBER,
3340: X_Msg_Data OUT NOCOPY VARCHAR2,
3333: PROCEDURE Update_supp_code_Conv_Tbl(
3334: P_Api_Version_Number IN NUMBER,
3335: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
3336: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
3337: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3338: X_Return_Status OUT NOCOPY VARCHAR2,
3339: X_Msg_Count OUT NOCOPY NUMBER,
3340: X_Msg_Data OUT NOCOPY VARCHAR2,
3341: P_supp_code_conversion_Tbl IN supp_code_conversion_tbl_type
3366: OZF_UTILITY_PVT.debug_message('Entered the proc tbl');
3367: END IF;
3368:
3369: -- Standard call to check for call compatibility.
3370: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3371: p_api_version_number,
3372: l_api_name,
3373: G_PKG_NAME)
3374: THEN
3371: p_api_version_number,
3372: l_api_name,
3373: G_PKG_NAME)
3374: THEN
3375: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3376: END IF;
3377:
3378: -- Initialize message list if p_init_msg_list is set to TRUE.
3379: IF FND_API.to_Boolean( p_init_msg_list )
3375: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3376: END IF;
3377:
3378: -- Initialize message list if p_init_msg_list is set to TRUE.
3379: IF FND_API.to_Boolean( p_init_msg_list )
3380: THEN
3381: FND_MSG_PUB.initialize;
3382: END IF;
3383:
3390: THEN
3391: FND_MESSAGE.Set_Name('OZF', 'OZF_USER_PROFILE_MISSING');
3392: FND_MSG_PUB.ADD;
3393: END IF;
3394: RAISE FND_API.G_EXC_ERROR;
3395: END IF;
3396:
3397: -- Debug Message
3398: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
3399: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
3400: OZF_UTILITY_PVT.debug_message('Total Number of records '||P_supp_code_conversion_Tbl.count);
3401: END IF;
3402: -- Initialize API return status to SUCCESS
3403: x_return_status := FND_API.G_RET_STS_SUCCESS;
3404:
3405: v_code_conversion_id := JTF_NUMBER_TABLE();
3406: v_object_version_number := JTF_NUMBER_TABLE();
3407:
3412: P_supp_code_conversion_Rec := P_supp_code_conversion_Tbl(i);
3413:
3414: -- Fix for 3928270
3415:
3416: -- IF p_supp_code_conversion_rec.end_date_active = FND_API.g_miss_date
3417: -- THEN
3418: -- p_supp_code_conversion_rec.end_date_active := NULL;
3419: -- END IF;
3420:
3457: p_supp_code_conversion_tbl => l_create_supp_code_conv_tbl,
3458: x_supp_code_conversion_id_tbl => v_code_conversion_id
3459: );
3460:
3461: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
3462: RAISE FND_API.G_EXC_ERROR;
3463: END IF;
3464: END IF;
3465:
3458: x_supp_code_conversion_id_tbl => v_code_conversion_id
3459: );
3460:
3461: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
3462: RAISE FND_API.G_EXC_ERROR;
3463: END IF;
3464: END IF;
3465:
3466: IF l_up_cnt > 0 THEN
3476: p_supp_code_conversion_tbl => l_update_supp_code_conv_tbl,
3477: x_object_version_number => v_object_version_number
3478: );
3479:
3480: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
3481: RAISE FND_API.G_EXC_ERROR;
3482: END IF;
3483: END IF;
3484:
3477: x_object_version_number => v_object_version_number
3478: );
3479:
3480: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
3481: RAISE FND_API.G_EXC_ERROR;
3482: END IF;
3483: END IF;
3484:
3485: -- Standard check for p_commit
3482: END IF;
3483: END IF;
3484:
3485: -- Standard check for p_commit
3486: IF FND_API.to_Boolean( p_commit )
3487: THEN
3488: COMMIT WORK;
3489: END IF;
3490:
3497: (p_count => x_msg_count,
3498: p_data => x_msg_data
3499: );
3500: EXCEPTION
3501: WHEN FND_API.G_EXC_ERROR THEN
3502: ROLLBACK TO update_supp_code_conv_tbl_pvt;
3503: x_return_status := FND_API.G_RET_STS_ERROR;
3504: -- Standard call to get message count and if count=1, get the message
3505: FND_MSG_PUB.Count_And_Get (
3499: );
3500: EXCEPTION
3501: WHEN FND_API.G_EXC_ERROR THEN
3502: ROLLBACK TO update_supp_code_conv_tbl_pvt;
3503: x_return_status := FND_API.G_RET_STS_ERROR;
3504: -- Standard call to get message count and if count=1, get the message
3505: FND_MSG_PUB.Count_And_Get (
3506: p_encoded => FND_API.G_FALSE,
3507: p_count => x_msg_count,
3502: ROLLBACK TO update_supp_code_conv_tbl_pvt;
3503: x_return_status := FND_API.G_RET_STS_ERROR;
3504: -- Standard call to get message count and if count=1, get the message
3505: FND_MSG_PUB.Count_And_Get (
3506: p_encoded => FND_API.G_FALSE,
3507: p_count => x_msg_count,
3508: p_data => x_msg_data
3509: );
3510: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3506: p_encoded => FND_API.G_FALSE,
3507: p_count => x_msg_count,
3508: p_data => x_msg_data
3509: );
3510: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3511: ROLLBACK TO update_supp_code_conv_tbl_pvt;
3512: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3513: -- Standard call to get message count and if count=1, get the message
3514: FND_MSG_PUB.Count_And_Get (
3508: p_data => x_msg_data
3509: );
3510: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3511: ROLLBACK TO update_supp_code_conv_tbl_pvt;
3512: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3513: -- Standard call to get message count and if count=1, get the message
3514: FND_MSG_PUB.Count_And_Get (
3515: p_encoded => FND_API.G_FALSE,
3516: p_count => x_msg_count,
3511: ROLLBACK TO update_supp_code_conv_tbl_pvt;
3512: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3513: -- Standard call to get message count and if count=1, get the message
3514: FND_MSG_PUB.Count_And_Get (
3515: p_encoded => FND_API.G_FALSE,
3516: p_count => x_msg_count,
3517: p_data => x_msg_data
3518: );
3519: WHEN OTHERS THEN
3517: p_data => x_msg_data
3518: );
3519: WHEN OTHERS THEN
3520: ROLLBACK TO update_supp_code_conv_tbl_pvt;
3521: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3522: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3523: THEN
3524: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3525: END IF;
3524: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3525: END IF;
3526: -- Standard call to get message count and if count=1, get the message
3527: FND_MSG_PUB.Count_And_Get (
3528: p_encoded => FND_API.G_FALSE,
3529: p_count => x_msg_count,
3530: p_data => x_msg_data
3531: );
3532:
3536:
3537: PROCEDURE Delete_Supp_Code_Conv_Tbl
3538: (
3539: p_api_version_number IN NUMBER,
3540: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
3541: p_commit IN VARCHAR2 := FND_API.G_FALSE,
3542: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3543: x_return_status OUT NOCOPY VARCHAR2,
3544: x_msg_count OUT NOCOPY NUMBER,
3537: PROCEDURE Delete_Supp_Code_Conv_Tbl
3538: (
3539: p_api_version_number IN NUMBER,
3540: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
3541: p_commit IN VARCHAR2 := FND_API.G_FALSE,
3542: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3543: x_return_status OUT NOCOPY VARCHAR2,
3544: x_msg_count OUT NOCOPY NUMBER,
3545: x_msg_data OUT NOCOPY VARCHAR2,
3538: (
3539: p_api_version_number IN NUMBER,
3540: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
3541: p_commit IN VARCHAR2 := FND_API.G_FALSE,
3542: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3543: x_return_status OUT NOCOPY VARCHAR2,
3544: x_msg_count OUT NOCOPY NUMBER,
3545: x_msg_data OUT NOCOPY VARCHAR2,
3546: p_supp_code_conversion_tbl IN supp_code_conversion_Tbl_Type
3563: OZF_UTILITY_PVT.debug_message('Entered the proc tbl');
3564: END IF;
3565:
3566: -- Standard call to check for call compatibility.
3567: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3568: p_api_version_number,
3569: l_api_name,
3570: G_PKG_NAME)
3571: THEN
3568: p_api_version_number,
3569: l_api_name,
3570: G_PKG_NAME)
3571: THEN
3572: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3573: END IF;
3574:
3575: -- Initialize message list if p_init_msg_list is set to TRUE.
3576: IF FND_API.to_Boolean( p_init_msg_list )
3572: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3573: END IF;
3574:
3575: -- Initialize message list if p_init_msg_list is set to TRUE.
3576: IF FND_API.to_Boolean( p_init_msg_list )
3577: THEN
3578: FND_MSG_PUB.initialize;
3579: END IF;
3580:
3587: THEN
3588: FND_MESSAGE.Set_Name('OZF', 'OZF_USER_PROFILE_MISSING');
3589: FND_MSG_PUB.ADD;
3590: END IF;
3591: RAISE FND_API.G_EXC_ERROR;
3592: END IF;
3593:
3594: -- Debug Message
3595: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low) THEN
3597: END IF;
3598:
3599:
3600: -- Initialize API return status to SUCCESS
3601: x_return_status := FND_API.G_RET_STS_SUCCESS;
3602:
3603: FOR i IN P_supp_code_conversion_Tbl.first .. P_supp_code_conversion_Tbl.last
3604: LOOP
3605:
3620: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
3621: FND_MESSAGE.set_name('OZF', 'OZF_REQ_PARAMETERS_MISSING');
3622: FND_MSG_PUB.add;
3623: END IF;
3624: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3625: ELSE
3626: Delete_supp_code_Conversion(
3627: p_api_version_number => 1.0,
3628: p_init_msg_list => FND_API.G_FALSE,
3624: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3625: ELSE
3626: Delete_supp_code_Conversion(
3627: p_api_version_number => 1.0,
3628: p_init_msg_list => FND_API.G_FALSE,
3629: p_commit => FND_API.G_FALSE,
3630: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
3631: x_return_status => X_Return_Status ,
3632: x_msg_count => X_Msg_Count ,
3625: ELSE
3626: Delete_supp_code_Conversion(
3627: p_api_version_number => 1.0,
3628: p_init_msg_list => FND_API.G_FALSE,
3629: p_commit => FND_API.G_FALSE,
3630: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
3631: x_return_status => X_Return_Status ,
3632: x_msg_count => X_Msg_Count ,
3633: x_msg_data => X_Msg_Data ,
3626: Delete_supp_code_Conversion(
3627: p_api_version_number => 1.0,
3628: p_init_msg_list => FND_API.G_FALSE,
3629: p_commit => FND_API.G_FALSE,
3630: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
3631: x_return_status => X_Return_Status ,
3632: x_msg_count => X_Msg_Count ,
3633: x_msg_data => X_Msg_Data ,
3634: p_code_conversion_id => l_code_conversion_id,
3635: p_object_version_number => l_object_version_number
3636: );
3637:
3638:
3639: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
3640: RAISE FND_API.G_EXC_ERROR;
3641: END IF;
3642:
3643: END IF;
3636: );
3637:
3638:
3639: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
3640: RAISE FND_API.G_EXC_ERROR;
3641: END IF;
3642:
3643: END IF;
3644:
3645: END LOOP;
3646:
3647:
3648: -- Standard check for p_commit
3649: IF FND_API.to_Boolean( p_commit )
3650: THEN
3651: COMMIT WORK;
3652: END IF;
3653:
3660: (p_count => x_msg_count,
3661: p_data => x_msg_data
3662: );
3663: EXCEPTION
3664: WHEN FND_API.G_EXC_ERROR THEN
3665: ROLLBACK TO delete_supp_code_conv_tbl_pvt;
3666: x_return_status := FND_API.G_RET_STS_ERROR;
3667: -- Standard call to get message count and if count=1, get the message
3668: FND_MSG_PUB.Count_And_Get (
3662: );
3663: EXCEPTION
3664: WHEN FND_API.G_EXC_ERROR THEN
3665: ROLLBACK TO delete_supp_code_conv_tbl_pvt;
3666: x_return_status := FND_API.G_RET_STS_ERROR;
3667: -- Standard call to get message count and if count=1, get the message
3668: FND_MSG_PUB.Count_And_Get (
3669: p_encoded => FND_API.G_FALSE,
3670: p_count => x_msg_count,
3665: ROLLBACK TO delete_supp_code_conv_tbl_pvt;
3666: x_return_status := FND_API.G_RET_STS_ERROR;
3667: -- Standard call to get message count and if count=1, get the message
3668: FND_MSG_PUB.Count_And_Get (
3669: p_encoded => FND_API.G_FALSE,
3670: p_count => x_msg_count,
3671: p_data => x_msg_data
3672: );
3673: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3669: p_encoded => FND_API.G_FALSE,
3670: p_count => x_msg_count,
3671: p_data => x_msg_data
3672: );
3673: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3674: ROLLBACK TO delete_supp_code_conv_tbl_pvt;
3675: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3676: -- Standard call to get message count and if count=1, get the message
3677: FND_MSG_PUB.Count_And_Get (
3671: p_data => x_msg_data
3672: );
3673: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3674: ROLLBACK TO delete_supp_code_conv_tbl_pvt;
3675: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3676: -- Standard call to get message count and if count=1, get the message
3677: FND_MSG_PUB.Count_And_Get (
3678: p_encoded => FND_API.G_FALSE,
3679: p_count => x_msg_count,
3674: ROLLBACK TO delete_supp_code_conv_tbl_pvt;
3675: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3676: -- Standard call to get message count and if count=1, get the message
3677: FND_MSG_PUB.Count_And_Get (
3678: p_encoded => FND_API.G_FALSE,
3679: p_count => x_msg_count,
3680: p_data => x_msg_data
3681: );
3682: WHEN OTHERS THEN
3680: p_data => x_msg_data
3681: );
3682: WHEN OTHERS THEN
3683: ROLLBACK TO delete_supp_code_conv_tbl_pvt;
3684: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3685: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3686: THEN
3687: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3688: END IF;
3687: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3688: END IF;
3689: -- Standard call to get message count and if count=1, get the message
3690: FND_MSG_PUB.Count_And_Get (
3691: p_encoded => FND_API.G_FALSE,
3692: p_count => x_msg_count,
3693: p_data => x_msg_data
3694: );
3695:
3701:
3702: PROCEDURE Delete_supp_code_Conversion
3703: (
3704: p_api_version_number IN NUMBER,
3705: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
3706: p_commit IN VARCHAR2 := FND_API.G_FALSE,
3707: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3708: x_return_status OUT NOCOPY VARCHAR2,
3709: x_msg_count OUT NOCOPY NUMBER,
3702: PROCEDURE Delete_supp_code_Conversion
3703: (
3704: p_api_version_number IN NUMBER,
3705: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
3706: p_commit IN VARCHAR2 := FND_API.G_FALSE,
3707: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3708: x_return_status OUT NOCOPY VARCHAR2,
3709: x_msg_count OUT NOCOPY NUMBER,
3710: x_msg_data OUT NOCOPY VARCHAR2,
3703: (
3704: p_api_version_number IN NUMBER,
3705: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
3706: p_commit IN VARCHAR2 := FND_API.G_FALSE,
3707: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3708: x_return_status OUT NOCOPY VARCHAR2,
3709: x_msg_count OUT NOCOPY NUMBER,
3710: x_msg_data OUT NOCOPY VARCHAR2,
3711: p_code_conversion_id IN NUMBER,
3722: -- Standard Start of API savepoint
3723: SAVEPOINT delete_supp_code_conv_pvt;
3724:
3725: -- Standard call to check for call compatibility.
3726: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3727: p_api_version_number,
3728: l_api_name,
3729: G_PKG_NAME)
3730: THEN
3727: p_api_version_number,
3728: l_api_name,
3729: G_PKG_NAME)
3730: THEN
3731: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3732: END IF;
3733:
3734: -- Initialize message list if p_init_msg_list is set to TRUE.
3735: IF FND_API.to_Boolean( p_init_msg_list )
3731: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3732: END IF;
3733:
3734: -- Initialize message list if p_init_msg_list is set to TRUE.
3735: IF FND_API.to_Boolean( p_init_msg_list )
3736: THEN
3737: FND_MSG_PUB.initialize;
3738: END IF;
3739:
3743: END IF;
3744:
3745:
3746: -- Initialize API return status to SUCCESS
3747: x_return_status := FND_API.G_RET_STS_SUCCESS;
3748:
3749:
3750:
3751:
3760: OZF_CODE_CONVERSION_PKG.Delete_Supp_Code_Conv_Row( p_code_conversion_id => p_code_conversion_id,
3761: p_object_version_number => p_object_version_number );
3762: EXCEPTION
3763: WHEN OTHERS THEN
3764: RAISE FND_API.G_EXC_ERROR;
3765: END;
3766:
3767: -- Standard check for p_commit
3768: IF FND_API.to_Boolean( p_commit )
3764: RAISE FND_API.G_EXC_ERROR;
3765: END;
3766:
3767: -- Standard check for p_commit
3768: IF FND_API.to_Boolean( p_commit )
3769: THEN
3770: COMMIT WORK;
3771: END IF;
3772:
3780: (p_count => x_msg_count,
3781: p_data => x_msg_data
3782: );
3783: EXCEPTION
3784: WHEN FND_API.G_EXC_ERROR THEN
3785: ROLLBACK TO delete_supp_code_conv_pvt;
3786: x_return_status := FND_API.G_RET_STS_ERROR;
3787: -- Standard call to get message count and if count=1, get the message
3788: FND_MSG_PUB.Count_And_Get (
3782: );
3783: EXCEPTION
3784: WHEN FND_API.G_EXC_ERROR THEN
3785: ROLLBACK TO delete_supp_code_conv_pvt;
3786: x_return_status := FND_API.G_RET_STS_ERROR;
3787: -- Standard call to get message count and if count=1, get the message
3788: FND_MSG_PUB.Count_And_Get (
3789: p_encoded => FND_API.G_FALSE,
3790: p_count => x_msg_count,
3785: ROLLBACK TO delete_supp_code_conv_pvt;
3786: x_return_status := FND_API.G_RET_STS_ERROR;
3787: -- Standard call to get message count and if count=1, get the message
3788: FND_MSG_PUB.Count_And_Get (
3789: p_encoded => FND_API.G_FALSE,
3790: p_count => x_msg_count,
3791: p_data => x_msg_data
3792: );
3793: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3789: p_encoded => FND_API.G_FALSE,
3790: p_count => x_msg_count,
3791: p_data => x_msg_data
3792: );
3793: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3794: ROLLBACK TO delete_supp_code_conv_pvt;
3795: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3796: -- Standard call to get message count and if count=1, get the message
3797: FND_MSG_PUB.Count_And_Get (
3791: p_data => x_msg_data
3792: );
3793: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3794: ROLLBACK TO delete_supp_code_conv_pvt;
3795: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3796: -- Standard call to get message count and if count=1, get the message
3797: FND_MSG_PUB.Count_And_Get (
3798: p_encoded => FND_API.G_FALSE,
3799: p_count => x_msg_count,
3794: ROLLBACK TO delete_supp_code_conv_pvt;
3795: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3796: -- Standard call to get message count and if count=1, get the message
3797: FND_MSG_PUB.Count_And_Get (
3798: p_encoded => FND_API.G_FALSE,
3799: p_count => x_msg_count,
3800: p_data => x_msg_data
3801: );
3802: WHEN OTHERS THEN
3800: p_data => x_msg_data
3801: );
3802: WHEN OTHERS THEN
3803: ROLLBACK TO delete_supp_code_conv_pvt;
3804: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3805: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3806: THEN
3807: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3808: END IF;
3807: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3808: END IF;
3809: -- Standard call to get message count and if count=1, get the message
3810: FND_MSG_PUB.Count_And_Get (
3811: p_encoded => FND_API.G_FALSE,
3812: p_count => x_msg_count,
3813: p_data => x_msg_data
3814: );
3815: