19:
20: G_PKG_NAME CONSTANT VARCHAR2(30):= 'PV_Batch_Chg_Prtnrs_PVT';
21: G_FILE_NAME CONSTANT VARCHAR2(12) := 'pvxvchpb.pls';
22:
23: PV_DEBUG_HIGH_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
24: PV_DEBUG_LOW_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
25: PV_DEBUG_MEDIUM_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
26:
27: -- G_USER_ID NUMBER := FND_GLOBAL.USER_ID;
20: G_PKG_NAME CONSTANT VARCHAR2(30):= 'PV_Batch_Chg_Prtnrs_PVT';
21: G_FILE_NAME CONSTANT VARCHAR2(12) := 'pvxvchpb.pls';
22:
23: PV_DEBUG_HIGH_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
24: PV_DEBUG_LOW_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
25: PV_DEBUG_MEDIUM_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
26:
27: -- G_USER_ID NUMBER := FND_GLOBAL.USER_ID;
28: -- G_LOGIN_ID NUMBER := FND_GLOBAL.CONC_LOGIN_ID;
21: G_FILE_NAME CONSTANT VARCHAR2(12) := 'pvxvchpb.pls';
22:
23: PV_DEBUG_HIGH_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
24: PV_DEBUG_LOW_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
25: PV_DEBUG_MEDIUM_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
26:
27: -- G_USER_ID NUMBER := FND_GLOBAL.USER_ID;
28: -- G_LOGIN_ID NUMBER := FND_GLOBAL.CONC_LOGIN_ID;
29: --
104:
105: -- Initialize message list if p_init_msg_list is set to TRUE.
106: IF FND_API.to_Boolean( p_init_msg_list )
107: THEN
108: FND_MSG_PUB.initialize;
109: END IF;
110:
111: -- Debug Message
112: IF (PV_DEBUG_HIGH_ON) THEN
131: IF p_batch_chg_prtnrs_rec.partner_id IS NULL OR
132: p_batch_chg_prtnrs_rec.partner_id = FND_API.g_miss_num THEN
133: FND_MESSAGE.set_name('PV', 'PV_API_MISSING_REQ_COLUMN');
134: FND_MESSAGE.set_token('COLUMN', 'PARTNER_ID');
135: FND_MSG_PUB.add;
136: RAISE FND_API.G_EXC_ERROR;
137: ELSE
138: l_partner_id := p_batch_chg_prtnrs_rec.partner_id;
139: END IF;
186: END IF;
187:
188:
189: -- Standard call to get message count and if count is 1, get message info.
190: FND_MSG_PUB.Count_And_Get
191: (p_count => x_msg_count,
192: p_data => x_msg_data
193: );
194: EXCEPTION
201: ROLLBACK TO Create_Batch_Chg_Partners;
202: x_return_status := FND_API.G_RET_STS_ERROR;
203:
204: -- Standard call to get message count and if count=1, get the message
205: FND_MSG_PUB.Count_And_Get (
206: p_encoded => FND_API.G_FALSE,
207: p_count => x_msg_count,
208: p_data => x_msg_data
209: );
212: ROLLBACK TO Create_Batch_Chg_Partners;
213: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
214:
215: -- Standard call to get message count and if count=1, get the message
216: FND_MSG_PUB.Count_And_Get (
217: p_encoded => FND_API.G_FALSE,
218: p_count => x_msg_count,
219: p_data => x_msg_data
220: );
222: WHEN OTHERS THEN
223: ROLLBACK TO Create_Batch_Chg_Partners;
224: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
225:
226: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
227: THEN
228: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
229: END IF;
230:
224: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
225:
226: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
227: THEN
228: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
229: END IF;
230:
231: -- Standard call to get message count and if count=1, get the message
232: FND_MSG_PUB.Count_And_Get (
228: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
229: END IF;
230:
231: -- Standard call to get message count and if count=1, get the message
232: FND_MSG_PUB.Count_And_Get (
233: p_encoded => FND_API.G_FALSE,
234: p_count => x_msg_count,
235: p_data => x_msg_data
236: );
320:
321: -- Initialize message list if p_init_msg_list is set to TRUE.
322: IF FND_API.to_Boolean( p_init_msg_list )
323: THEN
324: FND_MSG_PUB.initialize;
325: END IF;
326:
327:
328:
447: PVX_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
448: END IF;
449:
450: -- Standard call to get message count and if count is 1, get message info.
451: FND_MSG_PUB.Count_And_Get
452: (p_count => x_msg_count,
453: p_data => x_msg_data
454: );
455: EXCEPTION
462: ROLLBACK TO UPDATE_BTCH_Chg_Prtnrs_PVT;
463: x_return_status := FND_API.G_RET_STS_ERROR;
464:
465: -- Standard call to get message count and if count=1, get the message
466: FND_MSG_PUB.Count_And_Get (
467: p_encoded => FND_API.G_FALSE,
468: p_count => x_msg_count,
469: p_data => x_msg_data
470: );
473: ROLLBACK TO UPDATE_BTCH_Chg_Prtnrs_PVT;
474: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
475:
476: -- Standard call to get message count and if count=1, get the message
477: FND_MSG_PUB.Count_And_Get (
478: p_encoded => FND_API.G_FALSE,
479: p_count => x_msg_count,
480: p_data => x_msg_data
481: );
483: WHEN OTHERS THEN
484: ROLLBACK TO UPDATE_BTCH_Chg_Prtnrs_PVT;
485: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
486:
487: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
488: THEN
489: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
490: END IF;
491:
485: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
486:
487: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
488: THEN
489: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
490: END IF;
491:
492: -- Standard call to get message count and if count=1, get the message
493: FND_MSG_PUB.Count_And_Get (
489: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
490: END IF;
491:
492: -- Standard call to get message count and if count=1, get the message
493: FND_MSG_PUB.Count_And_Get (
494: p_encoded => FND_API.G_FALSE,
495: p_count => x_msg_count,
496: p_data => x_msg_data
497: );
566:
567: -- Initialize message list if p_init_msg_list is set to TRUE.
568: IF FND_API.to_Boolean( p_init_msg_list )
569: THEN
570: FND_MSG_PUB.initialize;
571: END IF;
572:
573:
574:
616: PVX_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
617: END IF;
618:
619: -- Standard call to get message count and if count is 1, get message info.
620: FND_MSG_PUB.Count_And_Get
621: (p_count => x_msg_count,
622: p_data => x_msg_data
623: );
624:
632: ROLLBACK TO DELETE_BTCH_Chg_Prtnrs_PVT;
633: x_return_status := FND_API.G_RET_STS_ERROR;
634:
635: -- Standard call to get message count and if count=1, get the message
636: FND_MSG_PUB.Count_And_Get (
637: p_encoded => FND_API.G_FALSE,
638: p_count => x_msg_count,
639: p_data => x_msg_data
640: );
643: ROLLBACK TO DELETE_BTCH_Chg_Prtnrs_PVT;
644: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
645:
646: -- Standard call to get message count and if count=1, get the message
647: FND_MSG_PUB.Count_And_Get (
648: p_encoded => FND_API.G_FALSE,
649: p_count => x_msg_count,
650: p_data => x_msg_data
651: );
653: WHEN OTHERS THEN
654: ROLLBACK TO DELETE_BTCH_Chg_Prtnrs_PVT;
655: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
656:
657: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
658: THEN
659: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
660: END IF;
661:
655: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
656:
657: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
658: THEN
659: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
660: END IF;
661:
662: -- Standard call to get message count and if count=1, get the message
663: FND_MSG_PUB.Count_And_Get (
659: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
660: END IF;
661:
662: -- Standard call to get message count and if count=1, get the message
663: FND_MSG_PUB.Count_And_Get (
664: p_encoded => FND_API.G_FALSE,
665: p_count => x_msg_count,
666: p_data => x_msg_data
667: );
732:
733: -- Initialize message list if p_init_msg_list is set to TRUE.
734: IF FND_API.to_Boolean( p_init_msg_list )
735: THEN
736: FND_MSG_PUB.initialize;
737: END IF;
738:
739:
740:
759: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
760: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
761: END IF;
762:
763: FND_MSG_PUB.count_and_get(
764: p_encoded => FND_API.g_false,
765: p_count => x_msg_count,
766: p_data => x_msg_data);
767:
780: ROLLBACK TO LOCK_BTCH_Chg_Prtnrs_PVT;
781: x_return_status := FND_API.G_RET_STS_ERROR;
782:
783: -- Standard call to get message count and if count=1, get the message
784: FND_MSG_PUB.Count_And_Get (
785: p_encoded => FND_API.G_FALSE,
786: p_count => x_msg_count,
787: p_data => x_msg_data
788: );
791: ROLLBACK TO LOCK_BTCH_Chg_Prtnrs_PVT;
792: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
793:
794: -- Standard call to get message count and if count=1, get the message
795: FND_MSG_PUB.Count_And_Get (
796: p_encoded => FND_API.G_FALSE,
797: p_count => x_msg_count,
798: p_data => x_msg_data
799: );
801: WHEN OTHERS THEN
802: ROLLBACK TO LOCK_BTCH_Chg_Prtnrs_PVT;
803: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
804:
805: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
806: THEN
807: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
808: END IF;
809:
803: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
804:
805: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
806: THEN
807: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
808: END IF;
809:
810: -- Standard call to get message count and if count=1, get the message
811: FND_MSG_PUB.Count_And_Get (
807: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
808: END IF;
809:
810: -- Standard call to get message count and if count=1, get the message
811: FND_MSG_PUB.Count_And_Get (
812: p_encoded => FND_API.G_FALSE,
813: p_count => x_msg_count,
814: p_data => x_msg_data
815: );
1118:
1119: -- Initialize message list if p_init_msg_list is set to TRUE.
1120: IF FND_API.to_Boolean( p_init_msg_list )
1121: THEN
1122: FND_MSG_PUB.initialize;
1123: END IF;
1124:
1125: -- Initialize API return status to SUCCESS
1126: x_return_status := FND_API.G_RET_STS_SUCCESS;
1173: END IF;
1174:
1175:
1176: -- Standard call to get message count and if count is 1, get message info.
1177: FND_MSG_PUB.Count_And_Get
1178: (p_count => x_msg_count,
1179: p_data => x_msg_data
1180: );
1181: EXCEPTION
1188: ROLLBACK TO VALIDATE_BTCH_Chg_Prtnrs_;
1189: x_return_status := FND_API.G_RET_STS_ERROR;
1190:
1191: -- Standard call to get message count and if count=1, get the message
1192: FND_MSG_PUB.Count_And_Get (
1193: p_encoded => FND_API.G_FALSE,
1194: p_count => x_msg_count,
1195: p_data => x_msg_data
1196: );
1199: ROLLBACK TO VALIDATE_BTCH_Chg_Prtnrs_;
1200: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1201:
1202: -- Standard call to get message count and if count=1, get the message
1203: FND_MSG_PUB.Count_And_Get (
1204: p_encoded => FND_API.G_FALSE,
1205: p_count => x_msg_count,
1206: p_data => x_msg_data
1207: );
1209: WHEN OTHERS THEN
1210: ROLLBACK TO VALIDATE_BTCH_Chg_Prtnrs_;
1211: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1212:
1213: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1214: THEN
1215: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1216: END IF;
1217:
1211: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1212:
1213: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1214: THEN
1215: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1216: END IF;
1217:
1218: -- Standard call to get message count and if count=1, get the message
1219: FND_MSG_PUB.Count_And_Get (
1215: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1216: END IF;
1217:
1218: -- Standard call to get message count and if count=1, get the message
1219: FND_MSG_PUB.Count_And_Get (
1220: p_encoded => FND_API.G_FALSE,
1221: p_count => x_msg_count,
1222: p_data => x_msg_data
1223: );
1236: BEGIN
1237: -- Initialize message list if p_init_msg_list is set to TRUE.
1238: IF FND_API.to_Boolean( p_init_msg_list )
1239: THEN
1240: FND_MSG_PUB.initialize;
1241: END IF;
1242:
1243: -- Initialize API return status to SUCCESS
1244: x_return_status := FND_API.G_RET_STS_SUCCESS;
1259: PVX_UTILITY_PVT.debug_message('Private API: Validate_dm_model_rec');
1260: END IF;
1261:
1262: -- Standard call to get message count and if count is 1, get message info.
1263: FND_MSG_PUB.Count_And_Get
1264: (p_count => x_msg_count,
1265: p_data => x_msg_data
1266: );
1267: END Validate_Batch_Chg_Prtnrs_Rec;