341: iby_debug_pub.add(debug_msg => 'Incorrect API Version:=' || p_api_version,
342: debug_level => FND_LOG.LEVEL_ERROR,
343: module => G_DEBUG_MODULE || l_module);
344: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
345: FND_MSG_PUB.Add;
346: RAISE FND_API.G_EXC_ERROR;
347: END IF;
348:
349: IF FND_API.to_Boolean( p_init_msg_list ) THEN
346: RAISE FND_API.G_EXC_ERROR;
347: END IF;
348:
349: IF FND_API.to_Boolean( p_init_msg_list ) THEN
350: FND_MSG_PUB.initialize;
351: END IF;
352: l_prev_msg_count := FND_MSG_PUB.Count_Msg;
353:
354: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
348:
349: IF FND_API.to_Boolean( p_init_msg_list ) THEN
350: FND_MSG_PUB.initialize;
351: END IF;
352: l_prev_msg_count := FND_MSG_PUB.Count_Msg;
353:
354: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
355: l_payer_level,x_payer_attribs_id,l_payer_attribs);
356:
413: iby_debug_pub.add(debug_msg => 'In G_EXC_ERROR Exception',
414: debug_level => FND_LOG.LEVEL_ERROR,
415: module => G_DEBUG_MODULE || l_module);
416: x_return_status := FND_API.G_RET_STS_ERROR ;
417: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
418: p_data => x_msg_data
419: );
420: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
421:
422: iby_debug_pub.add(debug_msg => 'In G_EXC_UNEXPECTED_ERROR Exception',
423: debug_level => FND_LOG.LEVEL_UNEXPECTED,
424: module => G_DEBUG_MODULE || l_module);
425: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
426: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
427: p_data => x_msg_data
428: );
429: WHEN OTHERS THEN
430:
434:
435: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
436:
437: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
438: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
439: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
440: END IF;
441:
442: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
435: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
436:
437: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
438: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
439: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
440: END IF;
441:
442: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
443: p_data => x_msg_data
438: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
439: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
440: END IF;
441:
442: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
443: p_data => x_msg_data
444: );
445: END Set_Payer_Attributes;
446:
472: iby_debug_pub.add(debug_msg => 'Incorrect API Version:=' || p_api_version,
473: debug_level => FND_LOG.LEVEL_ERROR,
474: module => G_DEBUG_MODULE || l_module);
475: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
476: FND_MSG_PUB.Add;
477: RAISE FND_API.G_EXC_ERROR;
478: END IF;
479:
480: IF FND_API.to_Boolean( p_init_msg_list ) THEN
477: RAISE FND_API.G_EXC_ERROR;
478: END IF;
479:
480: IF FND_API.to_Boolean( p_init_msg_list ) THEN
481: FND_MSG_PUB.initialize;
482: END IF;
483: l_prev_msg_count := FND_MSG_PUB.Count_Msg;
484:
485: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
479:
480: IF FND_API.to_Boolean( p_init_msg_list ) THEN
481: FND_MSG_PUB.initialize;
482: END IF;
483: l_prev_msg_count := FND_MSG_PUB.Count_Msg;
484:
485: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
486: l_payer_level,x_payer_attribs_id,x_payer_attributes);
487: IF (x_payer_attribs_id IS NULL) THEN
500: iby_debug_pub.add(debug_msg => 'In G_EXC_ERROR Exception',
501: debug_level => FND_LOG.LEVEL_ERROR,
502: module => G_DEBUG_MODULE || l_module);
503: x_return_status := FND_API.G_RET_STS_ERROR ;
504: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
505: p_data => x_msg_data
506: );
507: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
508:
509: iby_debug_pub.add(debug_msg => 'In G_EXC_UNEXPECTED_ERROR Exception',
510: debug_level => FND_LOG.LEVEL_UNEXPECTED,
511: module => G_DEBUG_MODULE || l_module);
512: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
513: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
514: p_data => x_msg_data
515: );
516: WHEN OTHERS THEN
517:
518: iby_debug_pub.add(debug_msg => 'In OTHERS Exception',
519: debug_level => FND_LOG.LEVEL_UNEXPECTED,
520: module => G_DEBUG_MODULE || l_module);
521: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
522: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
523: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_module);
524: END IF;
525:
526: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
519: debug_level => FND_LOG.LEVEL_UNEXPECTED,
520: module => G_DEBUG_MODULE || l_module);
521: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
522: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
523: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_module);
524: END IF;
525:
526: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
527: p_data => x_msg_data
522: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
523: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_module);
524: END IF;
525:
526: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
527: p_data => x_msg_data
528: );
529: END Get_Payer_Attributes;
530:
606: iby_debug_pub.add(debug_msg => 'Incorrect API Version:=' || p_api_version,
607: debug_level => FND_LOG.LEVEL_ERROR,
608: module => G_DEBUG_MODULE || l_module);
609: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
610: FND_MSG_PUB.Add;
611: RAISE FND_API.G_EXC_ERROR;
612: END IF;
613:
614: IF FND_API.to_Boolean( p_init_msg_list ) THEN
611: RAISE FND_API.G_EXC_ERROR;
612: END IF;
613:
614: IF FND_API.to_Boolean( p_init_msg_list ) THEN
615: FND_MSG_PUB.initialize;
616: END IF;
617: l_prev_msg_count := FND_MSG_PUB.Count_Msg;
618:
619: OPEN c_appl_attribs(p_channel_code);
613:
614: IF FND_API.to_Boolean( p_init_msg_list ) THEN
615: FND_MSG_PUB.initialize;
616: END IF;
617: l_prev_msg_count := FND_MSG_PUB.Count_Msg;
618:
619: OPEN c_appl_attribs(p_channel_code);
620: FETCH c_appl_attribs INTO
621: x_channel_attrib_uses.Instr_SecCode_Use,
645: iby_debug_pub.add(debug_msg => 'In G_EXC_ERROR Exception',
646: debug_level => FND_LOG.LEVEL_ERROR,
647: module => G_DEBUG_MODULE || l_module);
648: x_return_status := FND_API.G_RET_STS_ERROR ;
649: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
650: p_data => x_msg_data
651: );
652: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
653:
654: iby_debug_pub.add(debug_msg => 'In G_EXC_UNEXPECTED_ERROR Exception',
655: debug_level => FND_LOG.LEVEL_UNEXPECTED,
656: module => G_DEBUG_MODULE || l_module);
657: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
658: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
659: p_data => x_msg_data
660: );
661: WHEN OTHERS THEN
662:
666:
667: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
668:
669: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
670: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
671: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
672: END IF;
673:
674: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
667: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
668:
669: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
670: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
671: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
672: END IF;
673:
674: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
675: p_data => x_msg_data
670: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
671: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
672: END IF;
673:
674: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
675: p_data => x_msg_data
676: );
677: END Get_Payment_Channel_Attribs;
678:
722: iby_debug_pub.add(debug_msg => 'Incorrect API Version:=' || p_api_version,
723: debug_level => FND_LOG.LEVEL_ERROR,
724: module => G_DEBUG_MODULE || l_module);
725: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
726: FND_MSG_PUB.Add;
727: RAISE FND_API.G_EXC_ERROR;
728: END IF;
729:
730: IF FND_API.to_Boolean( p_init_msg_list ) THEN
727: RAISE FND_API.G_EXC_ERROR;
728: END IF;
729:
730: IF FND_API.to_Boolean( p_init_msg_list ) THEN
731: FND_MSG_PUB.initialize;
732: END IF;
733: l_prev_msg_count := FND_MSG_PUB.Count_Msg;
734:
735: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,l_payer_level,
729:
730: IF FND_API.to_Boolean( p_init_msg_list ) THEN
731: FND_MSG_PUB.initialize;
732: END IF;
733: l_prev_msg_count := FND_MSG_PUB.Count_Msg;
734:
735: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,l_payer_level,
736: l_payer_id,l_payer_attribs);
737:
816: iby_debug_pub.add(debug_msg => 'In G_EXC_ERROR Exception',
817: debug_level => FND_LOG.LEVEL_ERROR,
818: module => G_DEBUG_MODULE || l_module);
819: x_return_status := FND_API.G_RET_STS_ERROR ;
820: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
821: p_data => x_msg_data
822: );
823: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
824: ROLLBACK TO Set_Payer_Default_Pmt_Channel;
825: iby_debug_pub.add(debug_msg => 'In G_EXC_UNEXPECTED_ERROR Exception',
826: debug_level => FND_LOG.LEVEL_UNEXPECTED,
827: module => G_DEBUG_MODULE || l_module);
828: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
829: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
830: p_data => x_msg_data
831: );
832: WHEN OTHERS THEN
833: ROLLBACK TO Set_Payer_Default_Pmt_Channel;
838:
839: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
840:
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) THEN
843: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
844: END IF;
845:
846: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
839: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
840:
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) THEN
843: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
844: END IF;
845:
846: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
847: p_data => x_msg_data
842: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
843: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
844: END IF;
845:
846: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
847: p_data => x_msg_data
848: );
849: END Set_Payer_Default_Pmt_Channel;
850:
891: iby_debug_pub.add(debug_msg => 'Incorrect API Version:=' || p_api_version,
892: debug_level => FND_LOG.LEVEL_ERROR,
893: module => G_DEBUG_MODULE || l_module);
894: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
895: FND_MSG_PUB.Add;
896: RAISE FND_API.G_EXC_ERROR;
897: END IF;
898:
899: IF FND_API.to_Boolean( p_init_msg_list ) THEN
896: RAISE FND_API.G_EXC_ERROR;
897: END IF;
898:
899: IF FND_API.to_Boolean( p_init_msg_list ) THEN
900: FND_MSG_PUB.initialize;
901: END IF;
902: l_prev_msg_count := FND_MSG_PUB.Count_Msg;
903:
904: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
898:
899: IF FND_API.to_Boolean( p_init_msg_list ) THEN
900: FND_MSG_PUB.initialize;
901: END IF;
902: l_prev_msg_count := FND_MSG_PUB.Count_Msg;
903:
904: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
905: l_payer_level,l_payer_id,l_payer_attribs);
906:
928: iby_debug_pub.add(debug_msg => 'In G_EXC_ERROR Exception',
929: debug_level => FND_LOG.LEVEL_ERROR,
930: module => G_DEBUG_MODULE || l_module);
931: x_return_status := FND_API.G_RET_STS_ERROR ;
932: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
933: p_data => x_msg_data
934: );
935: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
936:
937: iby_debug_pub.add(debug_msg => 'In G_EXC_UNEXPECTED_ERROR Exception',
938: debug_level => FND_LOG.LEVEL_UNEXPECTED,
939: module => G_DEBUG_MODULE || l_module);
940: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
941: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
942: p_data => x_msg_data
943: );
944: WHEN OTHERS THEN
945:
949:
950: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
951:
952: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
953: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
954: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
955: END IF;
956:
957: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
950: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
951:
952: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
953: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
954: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
955: END IF;
956:
957: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
958: p_data => x_msg_data
953: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
954: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
955: END IF;
956:
957: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
958: p_data => x_msg_data
959: );
960: END Get_Payer_Default_Pmt_Channel;
961:
1025: iby_debug_pub.add(debug_msg => 'Incorrect API Version:=' || p_api_version,
1026: debug_level => FND_LOG.LEVEL_ERROR,
1027: module => G_DEBUG_MODULE || l_module);
1028: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
1029: FND_MSG_PUB.Add;
1030: RAISE FND_API.G_EXC_ERROR;
1031: END IF;
1032:
1033: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1030: RAISE FND_API.G_EXC_ERROR;
1031: END IF;
1032:
1033: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1034: FND_MSG_PUB.initialize;
1035: END IF;
1036: l_prev_msg_count := FND_MSG_PUB.Count_Msg;
1037:
1038: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
1032:
1033: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1034: FND_MSG_PUB.initialize;
1035: END IF;
1036: l_prev_msg_count := FND_MSG_PUB.Count_Msg;
1037:
1038: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
1039: l_payer_level,l_payer_id,l_payer_attribs);
1040:
1065: iby_debug_pub.add(debug_msg => 'In G_EXC_ERROR Exception',
1066: debug_level => FND_LOG.LEVEL_ERROR,
1067: module => G_DEBUG_MODULE || l_module);
1068: x_return_status := FND_API.G_RET_STS_ERROR ;
1069: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1070: p_data => x_msg_data
1071: );
1072: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1073:
1074: iby_debug_pub.add(debug_msg => 'In G_EXC_UNEXPECTED_ERROR Exception',
1075: debug_level => FND_LOG.LEVEL_UNEXPECTED,
1076: module => G_DEBUG_MODULE || l_module);
1077: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1078: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1079: p_data => x_msg_data
1080: );
1081: WHEN OTHERS THEN
1082:
1086:
1087: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
1088:
1089: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1090: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1091: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
1092: END IF;
1093:
1094: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
1087: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
1088:
1089: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1090: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1091: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
1092: END IF;
1093:
1094: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
1095: p_data => x_msg_data
1090: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1091: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
1092: END IF;
1093:
1094: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
1095: p_data => x_msg_data
1096: );
1097: END Get_Trxn_Appl_Pmt_Channels;
1098:
1202: iby_debug_pub.add(debug_msg => 'Incorrect API Version:=' || p_api_version,
1203: debug_level => FND_LOG.LEVEL_ERROR,
1204: module => G_DEBUG_MODULE || l_module);
1205: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
1206: FND_MSG_PUB.Add;
1207: RAISE FND_API.G_EXC_ERROR;
1208: END IF;
1209:
1210: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1207: RAISE FND_API.G_EXC_ERROR;
1208: END IF;
1209:
1210: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1211: FND_MSG_PUB.initialize;
1212: END IF;
1213: l_prev_msg_count := FND_MSG_PUB.Count_Msg;
1214:
1215: -- Bug# 8470581
1209:
1210: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1211: FND_MSG_PUB.initialize;
1212: END IF;
1213: l_prev_msg_count := FND_MSG_PUB.Count_Msg;
1214:
1215: -- Bug# 8470581
1216: -- Do not allow an assignment if the payer party_id is not a joint
1217: -- account owner
1460: iby_debug_pub.add(debug_msg => 'In G_EXC_ERROR Exception',
1461: debug_level => FND_LOG.LEVEL_ERROR,
1462: module => G_DEBUG_MODULE || l_module);
1463: x_return_status := FND_API.G_RET_STS_ERROR ;
1464: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1465: p_data => x_msg_data
1466: );
1467: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1468: ROLLBACK TO Set_Payer_Instr_Assignment;
1469: iby_debug_pub.add(debug_msg => 'In G_EXC_UNEXPECTED_ERROR Exception',
1470: debug_level => FND_LOG.LEVEL_UNEXPECTED,
1471: module => G_DEBUG_MODULE || l_module);
1472: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1473: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1474: p_data => x_msg_data
1475: );
1476: WHEN OTHERS THEN
1477: ROLLBACK TO Set_Payer_Instr_Assignment;
1481:
1482: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
1483:
1484: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1485: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1486: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
1487: END IF;
1488:
1489: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
1482: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
1483:
1484: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1485: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1486: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
1487: END IF;
1488:
1489: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
1490: p_data => x_msg_data
1485: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1486: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
1487: END IF;
1488:
1489: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
1490: p_data => x_msg_data
1491: );
1492: END Set_Payer_Instr_Assignment;
1493:
1535: iby_debug_pub.add(debug_msg => 'Incorrect API Version:=' || p_api_version,
1536: debug_level => FND_LOG.LEVEL_ERROR,
1537: module => G_DEBUG_MODULE || l_module);
1538: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
1539: FND_MSG_PUB.Add;
1540: RAISE FND_API.G_EXC_ERROR;
1541: END IF;
1542:
1543: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1540: RAISE FND_API.G_EXC_ERROR;
1541: END IF;
1542:
1543: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1544: FND_MSG_PUB.initialize;
1545: END IF;
1546: l_prev_msg_count := FND_MSG_PUB.Count_Msg;
1547:
1548: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
1542:
1543: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1544: FND_MSG_PUB.initialize;
1545: END IF;
1546: l_prev_msg_count := FND_MSG_PUB.Count_Msg;
1547:
1548: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
1549: l_payer_level,l_payer_id,l_payer_attribs);
1550:
1580: iby_debug_pub.add(debug_msg => 'In G_EXC_ERROR Exception',
1581: debug_level => FND_LOG.LEVEL_ERROR,
1582: module => G_DEBUG_MODULE || l_module);
1583: x_return_status := FND_API.G_RET_STS_ERROR ;
1584: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1585: p_data => x_msg_data
1586: );
1587: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1588:
1589: iby_debug_pub.add(debug_msg => 'In G_EXC_UNEXPECTED_ERROR Exception',
1590: debug_level => FND_LOG.LEVEL_UNEXPECTED,
1591: module => G_DEBUG_MODULE || l_module);
1592: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1593: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1594: p_data => x_msg_data
1595: );
1596: WHEN OTHERS THEN
1597:
1601:
1602: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
1603:
1604: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1605: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1606: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
1607: END IF;
1608:
1609: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
1602: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
1603:
1604: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1605: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1606: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
1607: END IF;
1608:
1609: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
1610: p_data => x_msg_data
1605: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1606: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
1607: END IF;
1608:
1609: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
1610: p_data => x_msg_data
1611: );
1612: END Get_Payer_Instr_Assignments;
1613:
1653: iby_debug_pub.add(debug_msg => 'Incorrect API Version:=' || p_api_version,
1654: debug_level => FND_LOG.LEVEL_ERROR,
1655: module => G_DEBUG_MODULE || l_module);
1656: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
1657: FND_MSG_PUB.Add;
1658: RAISE FND_API.G_EXC_ERROR;
1659: END IF;
1660:
1661: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1658: RAISE FND_API.G_EXC_ERROR;
1659: END IF;
1660:
1661: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1662: FND_MSG_PUB.initialize;
1663: END IF;
1664: l_prev_msg_count := FND_MSG_PUB.Count_Msg;
1665:
1666: l_instr_count := 0;
1660:
1661: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1662: FND_MSG_PUB.initialize;
1663: END IF;
1664: l_prev_msg_count := FND_MSG_PUB.Count_Msg;
1665:
1666: l_instr_count := 0;
1667: FOR assign_rec IN c_instr_assignments(p_party_id) LOOP
1668: l_instr_count := l_instr_count + 1;
1685: iby_debug_pub.add(debug_msg => 'In G_EXC_ERROR Exception',
1686: debug_level => FND_LOG.LEVEL_ERROR,
1687: module => G_DEBUG_MODULE || l_module);
1688: x_return_status := FND_API.G_RET_STS_ERROR ;
1689: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1690: p_data => x_msg_data
1691: );
1692: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1693:
1694: iby_debug_pub.add(debug_msg => 'In G_EXC_UNEXPECTED_ERROR Exception',
1695: debug_level => FND_LOG.LEVEL_UNEXPECTED,
1696: module => G_DEBUG_MODULE || l_module);
1697: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1698: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1699: p_data => x_msg_data
1700: );
1701: WHEN OTHERS THEN
1702:
1706:
1707: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
1708:
1709: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1710: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1711: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
1712: END IF;
1713:
1714: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
1707: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
1708:
1709: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1710: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1711: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
1712: END IF;
1713:
1714: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
1715: p_data => x_msg_data
1710: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1711: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
1712: END IF;
1713:
1714: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
1715: p_data => x_msg_data
1716: );
1717:
1718: iby_debug_pub.add(debug_msg => 'x_return_status=' || x_return_status,
1826: iby_debug_pub.add(debug_msg => 'Incorrect API Version:=' || p_api_version,
1827: debug_level => FND_LOG.LEVEL_ERROR,
1828: module => G_DEBUG_MODULE || l_module);
1829: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
1830: FND_MSG_PUB.Add;
1831: RAISE FND_API.G_EXC_ERROR;
1832: END IF;
1833:
1834: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1831: RAISE FND_API.G_EXC_ERROR;
1832: END IF;
1833:
1834: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1835: FND_MSG_PUB.initialize;
1836: END IF;
1837: l_prev_msg_count := FND_MSG_PUB.Count_Msg;
1838:
1839: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
1833:
1834: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1835: FND_MSG_PUB.initialize;
1836: END IF;
1837: l_prev_msg_count := FND_MSG_PUB.Count_Msg;
1838:
1839: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
1840: l_payer_level,l_payer_id,l_payer_attribs);
1841:
1869: iby_debug_pub.add(debug_msg => 'In G_EXC_ERROR Exception',
1870: debug_level => FND_LOG.LEVEL_ERROR,
1871: module => G_DEBUG_MODULE || l_module);
1872: x_return_status := FND_API.G_RET_STS_ERROR ;
1873: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1874: p_data => x_msg_data
1875: );
1876: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1877:
1878: iby_debug_pub.add(debug_msg => 'In G_EXC_UNEXPECTED_ERROR Exception',
1879: debug_level => FND_LOG.LEVEL_UNEXPECTED,
1880: module => G_DEBUG_MODULE || l_module);
1881: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1882: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1883: p_data => x_msg_data
1884: );
1885: WHEN OTHERS THEN
1886:
1890:
1891: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
1892:
1893: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1894: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1895: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
1896: END IF;
1897:
1898: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
1891: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
1892:
1893: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1894: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1895: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
1896: END IF;
1897:
1898: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
1899: p_data => x_msg_data
1894: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1895: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
1896: END IF;
1897:
1898: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
1899: p_data => x_msg_data
1900: );
1901:
1902: iby_debug_pub.add(debug_msg => 'x_return_status=' || x_return_status,
2087: iby_debug_pub.add(debug_msg => 'Incorrect API Version:=' || p_api_version,
2088: debug_level => FND_LOG.LEVEL_ERROR,
2089: module => G_DEBUG_MODULE || l_module);
2090: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
2091: FND_MSG_PUB.Add;
2092: RAISE FND_API.G_EXC_ERROR;
2093: END IF;
2094:
2095: IF (c_sec_mode%ISOPEN) THEN CLOSE c_sec_mode; END IF;
2094:
2095: IF (c_sec_mode%ISOPEN) THEN CLOSE c_sec_mode; END IF;
2096:
2097: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2098: FND_MSG_PUB.initialize;
2099: END IF;
2100: l_prev_msg_count := FND_MSG_PUB.Count_Msg;
2101:
2102: --SAVEPOINT Create_Card;
2096:
2097: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2098: FND_MSG_PUB.initialize;
2099: END IF;
2100: l_prev_msg_count := FND_MSG_PUB.Count_Msg;
2101:
2102: --SAVEPOINT Create_Card;
2103:
2104: IBY_FNDCPT_SETUP_PUB.Card_Exists
2386: iby_debug_pub.add(debug_msg => 'In G_EXC_ERROR Exception',
2387: debug_level => FND_LOG.LEVEL_ERROR,
2388: module => G_DEBUG_MODULE || l_module);
2389: x_return_status := FND_API.G_RET_STS_ERROR ;
2390: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2391: p_data => x_msg_data
2392: );
2393: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2394: --ROLLBACK TO Create_Card;
2395: iby_debug_pub.add(debug_msg => 'In G_EXC_UNEXPECTED_ERROR Exception',
2396: debug_level => FND_LOG.LEVEL_UNEXPECTED,
2397: module => G_DEBUG_MODULE || l_module);
2398: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2399: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2400: p_data => x_msg_data
2401: );
2402: WHEN OTHERS THEN
2403: --ROLLBACK TO Create_Card;
2407:
2408: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
2409:
2410: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2411: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2412: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
2413: END IF;
2414:
2415: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
2408: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
2409:
2410: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2411: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2412: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
2413: END IF;
2414:
2415: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
2416: p_data => x_msg_data
2411: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2412: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
2413: END IF;
2414:
2415: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
2416: p_data => x_msg_data
2417: );
2418:
2419: iby_debug_pub.add(debug_msg => 'x_return_status=' || x_return_status,
2582: iby_debug_pub.add(debug_msg => 'Incorrect API Version:=' || p_api_version,
2583: debug_level => FND_LOG.LEVEL_ERROR,
2584: module => G_DEBUG_MODULE || l_module);
2585: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
2586: FND_MSG_PUB.Add;
2587: RAISE FND_API.G_EXC_ERROR;
2588: END IF;
2589:
2590: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2587: RAISE FND_API.G_EXC_ERROR;
2588: END IF;
2589:
2590: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2591: FND_MSG_PUB.initialize;
2592: END IF;
2593: l_prev_msg_count := FND_MSG_PUB.Count_Msg;
2594:
2595: SAVEPOINT Update_Card;
2589:
2590: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2591: FND_MSG_PUB.initialize;
2592: END IF;
2593: l_prev_msg_count := FND_MSG_PUB.Count_Msg;
2594:
2595: SAVEPOINT Update_Card;
2596:
2597: -- card cannot become info only once this flag is turned off
2655: iby_debug_pub.add(debug_msg => 'In G_EXC_ERROR Exception',
2656: debug_level => FND_LOG.LEVEL_ERROR,
2657: module => G_DEBUG_MODULE || l_module);
2658: x_return_status := FND_API.G_RET_STS_ERROR ;
2659: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2660: p_data => x_msg_data
2661: );
2662: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2663: ROLLBACK TO Update_Card;
2664: iby_debug_pub.add(debug_msg => 'In G_EXC_UNEXPECTED_ERROR Exception',
2665: debug_level => FND_LOG.LEVEL_UNEXPECTED,
2666: module => G_DEBUG_MODULE || l_module);
2667: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2668: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2669: p_data => x_msg_data
2670: );
2671: WHEN OTHERS THEN
2672: ROLLBACK TO Update_Card;
2676:
2677: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
2678:
2679: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2680: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2681: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
2682: END IF;
2683:
2684: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
2677: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
2678:
2679: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2680: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2681: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
2682: END IF;
2683:
2684: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
2685: p_data => x_msg_data
2680: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2681: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
2682: END IF;
2683:
2684: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
2685: p_data => x_msg_data
2686: );
2687:
2688: iby_debug_pub.add(debug_msg => 'x_return_status=' || x_return_status,
2733: iby_debug_pub.add(debug_msg => 'Incorrect API Version:=' || p_api_version,
2734: debug_level => FND_LOG.LEVEL_ERROR,
2735: module => G_DEBUG_MODULE || l_module);
2736: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
2737: FND_MSG_PUB.Add;
2738: RAISE FND_API.G_EXC_ERROR;
2739: END IF;
2740:
2741: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2738: RAISE FND_API.G_EXC_ERROR;
2739: END IF;
2740:
2741: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2742: FND_MSG_PUB.initialize;
2743: END IF;
2744: l_prev_msg_count := FND_MSG_PUB.Count_Msg;
2745:
2746: OPEN c_card(p_card_id);
2740:
2741: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2742: FND_MSG_PUB.initialize;
2743: END IF;
2744: l_prev_msg_count := FND_MSG_PUB.Count_Msg;
2745:
2746: OPEN c_card(p_card_id);
2747: FETCH c_card INTO x_card_instrument.Owner_Id, x_card_instrument.Card_Holder_Name,
2748: x_card_instrument.Billing_Address_Id, x_card_instrument.Card_Number,
2770: iby_debug_pub.add(debug_msg => 'In G_EXC_ERROR Exception',
2771: debug_level => FND_LOG.LEVEL_ERROR,
2772: module => G_DEBUG_MODULE || l_module);
2773: x_return_status := FND_API.G_RET_STS_ERROR ;
2774: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2775: p_data => x_msg_data
2776: );
2777: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2778:
2779: iby_debug_pub.add(debug_msg => 'In G_EXC_UNEXPECTED_ERROR Exception',
2780: debug_level => FND_LOG.LEVEL_UNEXPECTED,
2781: module => G_DEBUG_MODULE || l_module);
2782: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2783: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2784: p_data => x_msg_data
2785: );
2786: WHEN OTHERS THEN
2787:
2791:
2792: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
2793:
2794: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2795: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2796: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
2797: END IF;
2798:
2799: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
2792: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
2793:
2794: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2795: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2796: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
2797: END IF;
2798:
2799: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
2800: p_data => x_msg_data
2795: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2796: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
2797: END IF;
2798:
2799: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
2800: p_data => x_msg_data
2801: );
2802:
2803: iby_debug_pub.add(debug_msg => 'x_return_status=' || x_return_status,
2863: iby_debug_pub.add(debug_msg => 'Incorrect API Version:=' || p_api_version,
2864: debug_level => FND_LOG.LEVEL_ERROR,
2865: module => G_DEBUG_MODULE || l_module);
2866: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
2867: FND_MSG_PUB.Add;
2868: RAISE FND_API.G_EXC_ERROR;
2869: END IF;
2870:
2871: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2868: RAISE FND_API.G_EXC_ERROR;
2869: END IF;
2870:
2871: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2872: FND_MSG_PUB.initialize;
2873: END IF;
2874: l_prev_msg_count := FND_MSG_PUB.Count_Msg;
2875: IF (nvl(p_card_instr_type,IBY_FNDCPT_COMMON_PUB.G_INSTR_TYPE_CREDITCARD ) = IBY_FNDCPT_COMMON_PUB.G_INSTR_TYPE_PAYMENTCARD) THEN
2876: l_char_allowed := 'Y';
2870:
2871: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2872: FND_MSG_PUB.initialize;
2873: END IF;
2874: l_prev_msg_count := FND_MSG_PUB.Count_Msg;
2875: IF (nvl(p_card_instr_type,IBY_FNDCPT_COMMON_PUB.G_INSTR_TYPE_CREDITCARD ) = IBY_FNDCPT_COMMON_PUB.G_INSTR_TYPE_PAYMENTCARD) THEN
2876: l_char_allowed := 'Y';
2877: END IF;
2878:
2921: iby_debug_pub.add(debug_msg => 'In G_EXC_ERROR Exception',
2922: debug_level => FND_LOG.LEVEL_ERROR,
2923: module => G_DEBUG_MODULE || l_module);
2924: x_return_status := FND_API.G_RET_STS_ERROR ;
2925: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2926: p_data => x_msg_data
2927: );
2928: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2929:
2930: iby_debug_pub.add(debug_msg => 'In G_EXC_UNEXPECTED_ERROR Exception',
2931: debug_level => FND_LOG.LEVEL_UNEXPECTED,
2932: module => G_DEBUG_MODULE || l_module);
2933: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2934: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2935: p_data => x_msg_data
2936: );
2937: WHEN OTHERS THEN
2938:
2942:
2943: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
2944:
2945: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2946: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2947: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
2948: END IF;
2949:
2950: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
2943: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
2944:
2945: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2946: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2947: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
2948: END IF;
2949:
2950: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
2951: p_data => x_msg_data
2946: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2947: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
2948: END IF;
2949:
2950: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
2951: p_data => x_msg_data
2952: );
2953:
2954: iby_debug_pub.add(debug_msg => 'x_return_status=' || x_return_status,
2998: iby_debug_pub.add(debug_msg => 'Incorrect API Version:=' || p_api_version,
2999: debug_level => FND_LOG.LEVEL_ERROR,
3000: module => G_DEBUG_MODULE || l_module);
3001: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
3002: FND_MSG_PUB.Add;
3003: RAISE FND_API.G_EXC_ERROR;
3004: END IF;
3005:
3006: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3003: RAISE FND_API.G_EXC_ERROR;
3004: END IF;
3005:
3006: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3007: FND_MSG_PUB.initialize;
3008: END IF;
3009: l_prev_msg_count := FND_MSG_PUB.Count_Msg;
3010:
3011: l_existing_msgs := NVL(x_msg_count,0);
3005:
3006: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3007: FND_MSG_PUB.initialize;
3008: END IF;
3009: l_prev_msg_count := FND_MSG_PUB.Count_Msg;
3010:
3011: l_existing_msgs := NVL(x_msg_count,0);
3012:
3013: SAVEPOINT Process_Credit_Card;
3053: iby_debug_pub.add(debug_msg => 'In G_EXC_ERROR Exception',
3054: debug_level => FND_LOG.LEVEL_ERROR,
3055: module => G_DEBUG_MODULE || l_module);
3056: x_return_status := FND_API.G_RET_STS_ERROR ;
3057: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3058: p_data => x_msg_data
3059: );
3060: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3061: ROLLBACK TO Process_Credit_Card;
3062: iby_debug_pub.add(debug_msg => 'In G_EXC_UNEXPECTED_ERROR Exception',
3063: debug_level => FND_LOG.LEVEL_UNEXPECTED,
3064: module => G_DEBUG_MODULE || l_module);
3065: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3066: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3067: p_data => x_msg_data
3068: );
3069: WHEN OTHERS THEN
3070: ROLLBACK TO Process_Credit_Card;
3074:
3075: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
3076:
3077: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3078: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3079: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
3080: END IF;
3081:
3082: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
3075: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
3076:
3077: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3078: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3079: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
3080: END IF;
3081:
3082: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
3083: p_data => x_msg_data
3078: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3079: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));
3080: END IF;
3081:
3082: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
3083: p_data => x_msg_data
3084: );
3085:
3086: END Process_Credit_Card;