66: --
67: -- End of Comments
68: -- ==============================================================================
69:
70: PV_DEBUG_HIGH_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
71: PV_DEBUG_LOW_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
72: PV_DEBUG_MEDIUM_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
73:
74: PROCEDURE Create_Mmbr_Trans(
67: -- End of Comments
68: -- ==============================================================================
69:
70: PV_DEBUG_HIGH_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
71: PV_DEBUG_LOW_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
72: PV_DEBUG_MEDIUM_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
73:
74: PROCEDURE Create_Mmbr_Trans(
75: p_api_version_number IN NUMBER,
68: -- ==============================================================================
69:
70: PV_DEBUG_HIGH_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
71: PV_DEBUG_LOW_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
72: PV_DEBUG_MEDIUM_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
73:
74: PROCEDURE Create_Mmbr_Trans(
75: p_api_version_number IN NUMBER,
76: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
117:
118: -- Initialize message list if p_init_msg_list is set to TRUE.
119: IF FND_API.to_Boolean( p_init_msg_list )
120: THEN
121: FND_MSG_PUB.initialize;
122: END IF;
123:
124:
125:
229: END IF;
230:
231:
232: -- Standard call to get message count and if count is 1, get message info.
233: FND_MSG_PUB.Count_And_Get
234: (p_count => x_msg_count,
235: p_data => x_msg_data
236: );
237: EXCEPTION
243: WHEN FND_API.G_EXC_ERROR THEN
244: ROLLBACK TO CREATE_Mmbr_Trans_PVT;
245: x_return_status := FND_API.G_RET_STS_ERROR;
246: -- Standard call to get message count and if count=1, get the message
247: FND_MSG_PUB.Count_And_Get (
248: p_encoded => FND_API.G_FALSE,
249: p_count => x_msg_count,
250: p_data => x_msg_data
251: );
253: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
254: ROLLBACK TO CREATE_Mmbr_Trans_PVT;
255: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
256: -- Standard call to get message count and if count=1, get the message
257: FND_MSG_PUB.Count_And_Get (
258: p_encoded => FND_API.G_FALSE,
259: p_count => x_msg_count,
260: p_data => x_msg_data
261: );
262:
263: WHEN OTHERS THEN
264: ROLLBACK TO CREATE_Mmbr_Trans_PVT;
265: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
266: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
267: THEN
268: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
269: END IF;
270: -- Standard call to get message count and if count=1, get the message
264: ROLLBACK TO CREATE_Mmbr_Trans_PVT;
265: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
266: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
267: THEN
268: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
269: END IF;
270: -- Standard call to get message count and if count=1, get the message
271: FND_MSG_PUB.Count_And_Get (
272: p_encoded => FND_API.G_FALSE,
267: THEN
268: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
269: END IF;
270: -- Standard call to get message count and if count=1, get the message
271: FND_MSG_PUB.Count_And_Get (
272: p_encoded => FND_API.G_FALSE,
273: p_count => x_msg_count,
274: p_data => x_msg_data
275: );
357:
358: -- Initialize message list if p_init_msg_list is set to TRUE.
359: IF FND_API.to_Boolean( p_init_msg_list )
360: THEN
361: FND_MSG_PUB.initialize;
362: END IF;
363:
364:
365:
473: END IF;
474:
475:
476: -- Standard call to get message count and if count is 1, get message info.
477: FND_MSG_PUB.Count_And_Get
478: (p_count => x_msg_count,
479: p_data => x_msg_data
480: );
481: EXCEPTION
487: WHEN FND_API.G_EXC_ERROR THEN
488: ROLLBACK TO UPDATE_Mmbr_Trans_PVT;
489: x_return_status := FND_API.G_RET_STS_ERROR;
490: -- Standard call to get message count and if count=1, get the message
491: FND_MSG_PUB.Count_And_Get (
492: p_encoded => FND_API.G_FALSE,
493: p_count => x_msg_count,
494: p_data => x_msg_data
495: );
497: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
498: ROLLBACK TO UPDATE_Mmbr_Trans_PVT;
499: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
500: -- Standard call to get message count and if count=1, get the message
501: FND_MSG_PUB.Count_And_Get (
502: p_encoded => FND_API.G_FALSE,
503: p_count => x_msg_count,
504: p_data => x_msg_data
505: );
506:
507: WHEN OTHERS THEN
508: ROLLBACK TO UPDATE_Mmbr_Trans_PVT;
509: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
510: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
511: THEN
512: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
513: END IF;
514: -- Standard call to get message count and if count=1, get the message
508: ROLLBACK TO UPDATE_Mmbr_Trans_PVT;
509: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
510: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
511: THEN
512: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
513: END IF;
514: -- Standard call to get message count and if count=1, get the message
515: FND_MSG_PUB.Count_And_Get (
516: p_encoded => FND_API.G_FALSE,
511: THEN
512: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
513: END IF;
514: -- Standard call to get message count and if count=1, get the message
515: FND_MSG_PUB.Count_And_Get (
516: p_encoded => FND_API.G_FALSE,
517: p_count => x_msg_count,
518: p_data => x_msg_data
519: );
587:
588: -- Initialize message list if p_init_msg_list is set to TRUE.
589: IF FND_API.to_Boolean( p_init_msg_list )
590: THEN
591: FND_MSG_PUB.initialize;
592: END IF;
593:
594:
595:
635: END IF;
636:
637:
638: -- Standard call to get message count and if count is 1, get message info.
639: FND_MSG_PUB.Count_And_Get
640: (p_count => x_msg_count,
641: p_data => x_msg_data
642: );
643: EXCEPTION
649: WHEN FND_API.G_EXC_ERROR THEN
650: ROLLBACK TO DELETE_Mmbr_Trans_PVT;
651: x_return_status := FND_API.G_RET_STS_ERROR;
652: -- Standard call to get message count and if count=1, get the message
653: FND_MSG_PUB.Count_And_Get (
654: p_encoded => FND_API.G_FALSE,
655: p_count => x_msg_count,
656: p_data => x_msg_data
657: );
659: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
660: ROLLBACK TO DELETE_Mmbr_Trans_PVT;
661: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
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: );
668:
669: WHEN OTHERS THEN
670: ROLLBACK TO DELETE_Mmbr_Trans_PVT;
671: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
672: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
673: THEN
674: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
675: END IF;
676: -- Standard call to get message count and if count=1, get the message
670: ROLLBACK TO DELETE_Mmbr_Trans_PVT;
671: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
672: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
673: THEN
674: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
675: END IF;
676: -- Standard call to get message count and if count=1, get the message
677: FND_MSG_PUB.Count_And_Get (
678: p_encoded => FND_API.G_FALSE,
673: THEN
674: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
675: END IF;
676: -- Standard call to get message count and if count=1, get the message
677: FND_MSG_PUB.Count_And_Get (
678: p_encoded => FND_API.G_FALSE,
679: p_count => x_msg_count,
680: p_data => x_msg_data
681: );
746:
747: -- Initialize message list if p_init_msg_list is set to TRUE.
748: IF FND_API.to_Boolean( p_init_msg_list )
749: THEN
750: FND_MSG_PUB.initialize;
751: END IF;
752:
753:
754:
771: pv_pg_mmbr_transitions_Pkg.Lock_Row(l_mmbr_transition_id,p_object_version);
772:
773:
774: -------------------- finish --------------------------
775: FND_MSG_PUB.count_and_get(
776: p_encoded => FND_API.g_false,
777: p_count => x_msg_count,
778: p_data => x_msg_data);
779: IF (PV_DEBUG_HIGH_ON) THEN
789: WHEN FND_API.G_EXC_ERROR THEN
790: ROLLBACK TO LOCK_Mmbr_Trans_PVT;
791: x_return_status := FND_API.G_RET_STS_ERROR;
792: -- Standard call to get message count and if count=1, get the message
793: FND_MSG_PUB.Count_And_Get (
794: p_encoded => FND_API.G_FALSE,
795: p_count => x_msg_count,
796: p_data => x_msg_data
797: );
799: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
800: ROLLBACK TO LOCK_Mmbr_Trans_PVT;
801: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
802: -- Standard call to get message count and if count=1, get the message
803: FND_MSG_PUB.Count_And_Get (
804: p_encoded => FND_API.G_FALSE,
805: p_count => x_msg_count,
806: p_data => x_msg_data
807: );
808:
809: WHEN OTHERS THEN
810: ROLLBACK TO LOCK_Mmbr_Trans_PVT;
811: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
812: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
813: THEN
814: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
815: END IF;
816: -- Standard call to get message count and if count=1, get the message
810: ROLLBACK TO LOCK_Mmbr_Trans_PVT;
811: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
812: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
813: THEN
814: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
815: END IF;
816: -- Standard call to get message count and if count=1, get the message
817: FND_MSG_PUB.Count_And_Get (
818: p_encoded => FND_API.G_FALSE,
813: THEN
814: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
815: END IF;
816: -- Standard call to get message count and if count=1, get the message
817: FND_MSG_PUB.Count_And_Get (
818: p_encoded => FND_API.G_FALSE,
819: p_count => x_msg_count,
820: p_data => x_msg_data
821: );
1120:
1121: -- Initialize message list if p_init_msg_list is set to TRUE.
1122: IF FND_API.to_Boolean( p_init_msg_list )
1123: THEN
1124: FND_MSG_PUB.initialize;
1125: END IF;
1126:
1127:
1128: IF p_validation_level >= JTF_PLSQL_API.g_valid_level_item THEN
1188: END IF;
1189:
1190:
1191: -- Standard call to get message count and if count is 1, get message info.
1192: FND_MSG_PUB.Count_And_Get
1193: (p_count => x_msg_count,
1194: p_data => x_msg_data
1195: );
1196: EXCEPTION
1202: WHEN FND_API.G_EXC_ERROR THEN
1203: ROLLBACK TO VALIDATE_Mmbr_Trans_;
1204: x_return_status := FND_API.G_RET_STS_ERROR;
1205: -- Standard call to get message count and if count=1, get the message
1206: FND_MSG_PUB.Count_And_Get (
1207: p_encoded => FND_API.G_FALSE,
1208: p_count => x_msg_count,
1209: p_data => x_msg_data
1210: );
1212: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1213: ROLLBACK TO VALIDATE_Mmbr_Trans_;
1214: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1215: -- Standard call to get message count and if count=1, get the message
1216: FND_MSG_PUB.Count_And_Get (
1217: p_encoded => FND_API.G_FALSE,
1218: p_count => x_msg_count,
1219: p_data => x_msg_data
1220: );
1221:
1222: WHEN OTHERS THEN
1223: ROLLBACK TO VALIDATE_Mmbr_Trans_;
1224: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1225: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1226: THEN
1227: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1228: END IF;
1229: -- Standard call to get message count and if count=1, get the message
1223: ROLLBACK TO VALIDATE_Mmbr_Trans_;
1224: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1225: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1226: THEN
1227: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1228: END IF;
1229: -- Standard call to get message count and if count=1, get the message
1230: FND_MSG_PUB.Count_And_Get (
1231: p_encoded => FND_API.G_FALSE,
1226: THEN
1227: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1228: END IF;
1229: -- Standard call to get message count and if count=1, get the message
1230: FND_MSG_PUB.Count_And_Get (
1231: p_encoded => FND_API.G_FALSE,
1232: p_count => x_msg_count,
1233: p_data => x_msg_data
1234: );
1247: BEGIN
1248: -- Initialize message list if p_init_msg_list is set to TRUE.
1249: IF FND_API.to_Boolean( p_init_msg_list )
1250: THEN
1251: FND_MSG_PUB.initialize;
1252: END IF;
1253:
1254:
1255:
1266:
1267: PVX_UTILITY_PVT.debug_message('Private API: Validate_dm_model_rec');
1268: END IF;
1269: -- Standard call to get message count and if count is 1, get message info.
1270: FND_MSG_PUB.Count_And_Get
1271: (p_count => x_msg_count,
1272: p_data => x_msg_data
1273: );
1274: END Validate_mmbr_tran_Rec;