eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.IBY_FNDCPT_SETUP_PUB dependencies on IBY_FNDCPT_COMMON_PUB

Line 64: IF (p_instr.Instrument_Type = IBY_FNDCPT_COMMON_PUB.G_INSTR_TYPE_CREDITCARD)

60: IF (c_bankaccount%ISOPEN) THEN
61: CLOSE c_bankaccount;
62: END IF;
63:
64: IF (p_instr.Instrument_Type = IBY_FNDCPT_COMMON_PUB.G_INSTR_TYPE_CREDITCARD)
65: THEN
66: OPEN c_creditcard(p_instr.Instrument_Id);
67: FETCH c_creditcard INTO l_instr_count;
68: CLOSE c_creditcard;

Line 69: ELSIF (p_instr.Instrument_Type = IBY_FNDCPT_COMMON_PUB.G_INSTR_TYPE_BANKACCT)

65: THEN
66: OPEN c_creditcard(p_instr.Instrument_Id);
67: FETCH c_creditcard INTO l_instr_count;
68: CLOSE c_creditcard;
69: ELSIF (p_instr.Instrument_Type = IBY_FNDCPT_COMMON_PUB.G_INSTR_TYPE_BANKACCT)
70: THEN
71: OPEN c_bankaccount(p_instr.Instrument_Id);
72: FETCH c_bankaccount INTO l_instr_count;
73: CLOSE c_bankaccount;

Line 93: lx_result IBY_FNDCPT_COMMON_PUB.Result_rec_type;

89:
90: lx_return_status VARCHAR2(1);
91: lx_msg_count NUMBER;
92: lx_msg_data VARCHAR2(3000);
93: lx_result IBY_FNDCPT_COMMON_PUB.Result_rec_type;
94: lx_channel_attribs PmtChannel_AttribUses_rec_type;
95:
96: l_addressid iby_creditcard.addressid%TYPE;
97: l_billing_zip iby_creditcard.billing_addr_postal_code%TYPE;

Line 172: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,

168: END Validate_CC_Billing;
169:
170: PROCEDURE Get_Payer_Id
171: (
172: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
173: p_validation_level IN VARCHAR2,
174: x_payer_level OUT NOCOPY VARCHAR2,
175: x_payer_id OUT NOCOPY iby_external_payers_all.ext_payer_id%TYPE,
176: x_payer_attribs OUT NOCOPY PayerAttributes_rec_type

Line 207: IBY_FNDCPT_COMMON_PUB.Validate_Payer(p_payer,p_validation_level);

203: CLOSE c_payer;
204: END IF;
205:
206: x_payer_level :=
207: IBY_FNDCPT_COMMON_PUB.Validate_Payer(p_payer,p_validation_level);
208:
209: IF (x_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN
210: x_payer_id := NULL;
211: RETURN;

Line 209: IF (x_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN

205:
206: x_payer_level :=
207: IBY_FNDCPT_COMMON_PUB.Validate_Payer(p_payer,p_validation_level);
208:
209: IF (x_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN
210: x_payer_id := NULL;
211: RETURN;
212: END IF;
213:

Line 233: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,

229: p_commit IN VARCHAR2 := FND_API.G_TRUE,
230: x_return_status OUT NOCOPY VARCHAR2,
231: x_msg_count OUT NOCOPY NUMBER,
232: x_msg_data OUT NOCOPY VARCHAR2,
233: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
234: p_payer_attributes IN PayerAttributes_rec_type,
235: x_payer_attribs_id OUT NOCOPY NUMBER,
236: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
237: )

Line 236: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

232: x_msg_data OUT NOCOPY VARCHAR2,
233: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
234: p_payer_attributes IN PayerAttributes_rec_type,
235: x_payer_attribs_id OUT NOCOPY NUMBER,
236: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
237: )
238: IS
239: l_api_version CONSTANT NUMBER := 1.0;
240: l_module CONSTANT VARCHAR2(30) := 'Set_Payer_Attributes';

Line 268: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN

264:
265: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
266: l_payer_level,x_payer_attribs_id,l_payer_attribs);
267:
268: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN
269: x_response.Result_Code := l_payer_level;
270: ELSIF (x_payer_attribs_id IS NULL) THEN
271:
272: SELECT iby_external_payers_all_s.nextval

Line 315: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;

311: IF FND_API.To_Boolean(p_commit) THEN
312: COMMIT;
313: END IF;
314:
315: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
316: iby_fndcpt_common_pub.Prepare_Result
317: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
318:
319: EXCEPTION

Line 316: iby_fndcpt_common_pub.Prepare_Result

312: COMMIT;
313: END IF;
314:
315: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
316: iby_fndcpt_common_pub.Prepare_Result
317: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
318:
319: EXCEPTION
320:

Line 345: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);

341: iby_debug_pub.add(debug_msg => 'In OTHERS Exception',
342: debug_level => FND_LOG.LEVEL_UNEXPECTED,
343: module => G_DEBUG_MODULE || l_module);
344:
345: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
346:
347: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
348: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
349: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));

Line 364: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,

360: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
361: x_return_status OUT NOCOPY VARCHAR2,
362: x_msg_count OUT NOCOPY NUMBER,
363: x_msg_data OUT NOCOPY VARCHAR2,
364: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
365: x_payer_attributes OUT NOCOPY PayerAttributes_rec_type,
366: x_payer_attribs_id OUT NOCOPY NUMBER,
367: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
368: )

Line 367: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

363: x_msg_data OUT NOCOPY VARCHAR2,
364: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
365: x_payer_attributes OUT NOCOPY PayerAttributes_rec_type,
366: x_payer_attribs_id OUT NOCOPY NUMBER,
367: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
368: )
369: IS
370: l_api_version CONSTANT NUMBER := 1.0;
371: l_module CONSTANT VARCHAR2(30) := 'Get_Payer_Attributes';

Line 398: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;

394:
395: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
396: l_payer_level,x_payer_attribs_id,x_payer_attributes);
397: IF (x_payer_attribs_id IS NULL) THEN
398: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
399: ELSE
400: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
401: END IF;
402:

Line 400: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;

396: l_payer_level,x_payer_attribs_id,x_payer_attributes);
397: IF (x_payer_attribs_id IS NULL) THEN
398: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
399: ELSE
400: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
401: END IF;
402:
403: iby_fndcpt_common_pub.Prepare_Result
404: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);

Line 403: iby_fndcpt_common_pub.Prepare_Result

399: ELSE
400: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
401: END IF;
402:
403: iby_fndcpt_common_pub.Prepare_Result
404: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
405:
406: EXCEPTION
407:

Line 450: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

446: x_msg_count OUT NOCOPY NUMBER,
447: x_msg_data OUT NOCOPY VARCHAR2,
448: p_channel_code IN VARCHAR2,
449: x_channel_attrib_uses OUT NOCOPY PmtChannel_AttribUses_rec_type,
450: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
451: )
452: IS
453: l_api_version CONSTANT NUMBER := 1.0;
454: l_module CONSTANT VARCHAR2(30) := 'Get_Payment_Channel_Attribs';

Line 543: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;

539:
540: IF (c_appl_attribs%NOTFOUND) THEN
541: x_response.Result_Code := G_RC_INVALID_CHNNL;
542: ELSE
543: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
544: END IF;
545:
546: CLOSE c_appl_attribs;
547:

Line 548: iby_fndcpt_common_pub.Prepare_Result

544: END IF;
545:
546: CLOSE c_appl_attribs;
547:
548: iby_fndcpt_common_pub.Prepare_Result
549: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
550:
551: EXCEPTION
552:

Line 577: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);

573: iby_debug_pub.add(debug_msg => 'In OTHERS Exception',
574: debug_level => FND_LOG.LEVEL_UNEXPECTED,
575: module => G_DEBUG_MODULE || l_module);
576:
577: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
578:
579: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
580: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
581: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));

Line 597: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,

593: p_commit IN VARCHAR2 := FND_API.G_TRUE,
594: x_return_status OUT NOCOPY VARCHAR2,
595: x_msg_count OUT NOCOPY NUMBER,
596: x_msg_data OUT NOCOPY VARCHAR2,
597: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
598: p_channel_assignment IN PmtChannelAssignment_rec_type,
599: x_assignment_id OUT NOCOPY NUMBER,
600: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
601: )

Line 600: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

596: x_msg_data OUT NOCOPY VARCHAR2,
597: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
598: p_channel_assignment IN PmtChannelAssignment_rec_type,
599: x_assignment_id OUT NOCOPY NUMBER,
600: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
601: )
602: IS
603: l_api_version CONSTANT NUMBER := 1.0;
604: l_module CONSTANT VARCHAR2(30) := 'Set_Payer_Default_Pmt_Channel';

Line 609: l_result IBY_FNDCPT_COMMON_PUB.Result_rec_type;

605: l_payer_level VARCHAR2(30);
606: l_payer_id iby_external_payers_all.ext_payer_id%TYPE;
607: l_payer_attribs PayerAttributes_rec_type;
608:
609: l_result IBY_FNDCPT_COMMON_PUB.Result_rec_type;
610: l_prev_msg_count NUMBER;
611:
612: CURSOR c_chnnl_assign
613: (ci_payer_id IN iby_ext_party_pmt_mthds.ext_pmt_party_id%TYPE)

Line 648: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN

644:
645: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,l_payer_level,
646: l_payer_id,l_payer_attribs);
647:
648: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN
649: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
650: ELSIF (NOT Exists_Pmt_Channel(p_channel_assignment.Pmt_Channel_Code)) THEN
651: x_response.Result_Code := G_RC_INVALID_CHNNL;
652: ELSE

Line 649: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;

645: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,l_payer_level,
646: l_payer_id,l_payer_attribs);
647:
648: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN
649: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
650: ELSIF (NOT Exists_Pmt_Channel(p_channel_assignment.Pmt_Channel_Code)) THEN
651: x_response.Result_Code := G_RC_INVALID_CHNNL;
652: ELSE
653:

Line 671: IF (l_result.Result_Code <> IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS) THEN

667: l_payer_id,
668: l_result
669: );
670:
671: IF (l_result.Result_Code <> IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS) THEN
672: x_response := l_result;
673: RETURN;
674: END IF;
675: END IF;

Line 711: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;

707: WHERE ext_party_pmt_mthd_id = x_assignment_id;
708:
709: END IF;
710:
711: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
712: END IF;
713:
714:
715: iby_fndcpt_common_pub.Prepare_Result

Line 715: iby_fndcpt_common_pub.Prepare_Result

711: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
712: END IF;
713:
714:
715: iby_fndcpt_common_pub.Prepare_Result
716: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
717:
718: IF FND_API.To_Boolean(p_commit) THEN
719: COMMIT;

Line 749: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);

745: iby_debug_pub.add(debug_msg => 'In OTHERS Exception',
746: debug_level => FND_LOG.LEVEL_UNEXPECTED,
747: module => G_DEBUG_MODULE || l_module);
748:
749: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
750:
751: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
752: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
753: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));

Line 768: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,

764: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
765: x_return_status OUT NOCOPY VARCHAR2,
766: x_msg_count OUT NOCOPY NUMBER,
767: x_msg_data OUT NOCOPY VARCHAR2,
768: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
769: x_channel_assignment OUT NOCOPY PmtChannelAssignment_rec_type,
770: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
771: )
772: IS

Line 770: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

766: x_msg_count OUT NOCOPY NUMBER,
767: x_msg_data OUT NOCOPY VARCHAR2,
768: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
769: x_channel_assignment OUT NOCOPY PmtChannelAssignment_rec_type,
770: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
771: )
772: IS
773: l_api_version CONSTANT NUMBER := 1.0;
774: l_module CONSTANT VARCHAR2(30) := 'Get_Payer_Default_Pmt_Channel';

Line 817: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN

813:
814: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
815: l_payer_level,l_payer_id,l_payer_attribs);
816:
817: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN
818: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
819: ELSE
820: OPEN c_chnnl_assign(l_payer_id);
821: FETCH c_chnnl_assign INTO x_channel_assignment.Pmt_Channel_Code,

Line 818: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;

814: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
815: l_payer_level,l_payer_id,l_payer_attribs);
816:
817: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN
818: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
819: ELSE
820: OPEN c_chnnl_assign(l_payer_id);
821: FETCH c_chnnl_assign INTO x_channel_assignment.Pmt_Channel_Code,
822: x_channel_assignment.Default_Flag, x_channel_assignment.Inactive_Date;

Line 824: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;

820: OPEN c_chnnl_assign(l_payer_id);
821: FETCH c_chnnl_assign INTO x_channel_assignment.Pmt_Channel_Code,
822: x_channel_assignment.Default_Flag, x_channel_assignment.Inactive_Date;
823: IF (c_chnnl_assign%NOTFOUND) THEN
824: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
825: ELSE
826: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
827: END IF;
828: CLOSE c_chnnl_assign;

Line 826: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;

822: x_channel_assignment.Default_Flag, x_channel_assignment.Inactive_Date;
823: IF (c_chnnl_assign%NOTFOUND) THEN
824: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
825: ELSE
826: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
827: END IF;
828: CLOSE c_chnnl_assign;
829: END IF;
830:

Line 831: iby_fndcpt_common_pub.Prepare_Result

827: END IF;
828: CLOSE c_chnnl_assign;
829: END IF;
830:
831: iby_fndcpt_common_pub.Prepare_Result
832: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
833:
834: EXCEPTION
835:

Line 860: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);

856: iby_debug_pub.add(debug_msg => 'In OTHERS Exception',
857: debug_level => FND_LOG.LEVEL_UNEXPECTED,
858: module => G_DEBUG_MODULE || l_module);
859:
860: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
861:
862: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
863: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
864: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));

Line 879: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,

875: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
876: x_return_status OUT NOCOPY VARCHAR2,
877: x_msg_count OUT NOCOPY NUMBER,
878: x_msg_data OUT NOCOPY VARCHAR2,
879: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
880: p_payer_equivalency IN VARCHAR2
881: := IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,
882: p_conditions IN IBY_FNDCPT_COMMON_PUB.TrxnContext_rec_type,
883: p_result_limit IN IBY_FNDCPT_COMMON_PUB.ResultLimit_rec_type,

Line 881: := IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,

877: x_msg_count OUT NOCOPY NUMBER,
878: x_msg_data OUT NOCOPY VARCHAR2,
879: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
880: p_payer_equivalency IN VARCHAR2
881: := IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,
882: p_conditions IN IBY_FNDCPT_COMMON_PUB.TrxnContext_rec_type,
883: p_result_limit IN IBY_FNDCPT_COMMON_PUB.ResultLimit_rec_type,
884: x_channels OUT NOCOPY PmtChannel_tbl_type,
885: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

Line 882: p_conditions IN IBY_FNDCPT_COMMON_PUB.TrxnContext_rec_type,

878: x_msg_data OUT NOCOPY VARCHAR2,
879: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
880: p_payer_equivalency IN VARCHAR2
881: := IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,
882: p_conditions IN IBY_FNDCPT_COMMON_PUB.TrxnContext_rec_type,
883: p_result_limit IN IBY_FNDCPT_COMMON_PUB.ResultLimit_rec_type,
884: x_channels OUT NOCOPY PmtChannel_tbl_type,
885: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
886: )

Line 883: p_result_limit IN IBY_FNDCPT_COMMON_PUB.ResultLimit_rec_type,

879: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
880: p_payer_equivalency IN VARCHAR2
881: := IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,
882: p_conditions IN IBY_FNDCPT_COMMON_PUB.TrxnContext_rec_type,
883: p_result_limit IN IBY_FNDCPT_COMMON_PUB.ResultLimit_rec_type,
884: x_channels OUT NOCOPY PmtChannel_tbl_type,
885: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
886: )
887: IS

Line 885: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

881: := IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,
882: p_conditions IN IBY_FNDCPT_COMMON_PUB.TrxnContext_rec_type,
883: p_result_limit IN IBY_FNDCPT_COMMON_PUB.ResultLimit_rec_type,
884: x_channels OUT NOCOPY PmtChannel_tbl_type,
885: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
886: )
887: IS
888: l_api_version CONSTANT NUMBER := 1.0;
889: l_module CONSTANT VARCHAR2(30) := 'Get_Trxn_Appl_Pmt_Channels';

Line 902: (ci_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,

898: -- all system channels are applicable that are not site-wide
899: -- deactivated (end-dated)
900: --
901: CURSOR c_trxn_channels
902: (ci_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
903: ci_payer_level IN VARCHAR2,
904: ci_payer_equiv IN VARCHAR2)
905: IS
906: SELECT c.payment_channel_code, c.instrument_type

Line 918: AND (IBY_FNDCPT_COMMON_PUB.Compare_Payer

914: SELECT ext_payer_id
915: FROM iby_external_payers_all
916: WHERE (payment_function = ci_payer.Payment_Function)
917: AND (party_id = ci_payer.Party_Id)
918: AND (IBY_FNDCPT_COMMON_PUB.Compare_Payer
919: (ci_payer.org_type, ci_payer.org_id,
920: ci_payer.Cust_Account_Id, ci_payer.Account_Site_Id,
921: ci_payer_level,ci_payer_equiv,org_type,org_id,
922: cust_account_id,acct_site_use_id) = 'T')

Line 951: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN

947:
948: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
949: l_payer_level,l_payer_id,l_payer_attribs);
950:
951: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN
952: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
953: ELSE
954: l_channel_count := 0;
955:

Line 952: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;

948: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
949: l_payer_level,l_payer_id,l_payer_attribs);
950:
951: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN
952: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
953: ELSE
954: l_channel_count := 0;
955:
956: FOR channel_rec IN c_trxn_channels(p_payer,l_payer_level,

Line 965: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;

961: channel_rec.payment_channel_code;
962: x_channels(l_channel_count).Instrument_Type := channel_rec.instrument_type;
963: END LOOP;
964:
965: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
966: END IF;
967:
968: iby_fndcpt_common_pub.Prepare_Result
969: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);

Line 968: iby_fndcpt_common_pub.Prepare_Result

964:
965: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
966: END IF;
967:
968: iby_fndcpt_common_pub.Prepare_Result
969: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
970:
971: EXCEPTION
972:

Line 997: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);

993: iby_debug_pub.add(debug_msg => 'In OTHERS Exception',
994: debug_level => FND_LOG.LEVEL_UNEXPECTED,
995: module => G_DEBUG_MODULE || l_module);
996:
997: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
998:
999: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1000: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1001: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));

Line 1018: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,

1014: p_commit IN VARCHAR2 := FND_API.G_TRUE,
1015: x_return_status OUT NOCOPY VARCHAR2,
1016: x_msg_count OUT NOCOPY NUMBER,
1017: x_msg_data OUT NOCOPY VARCHAR2,
1018: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
1019: p_assignment_attribs IN PmtInstrAssignment_rec_type,
1020: x_assign_id OUT NOCOPY NUMBER,
1021: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
1022: )

Line 1021: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

1017: x_msg_data OUT NOCOPY VARCHAR2,
1018: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
1019: p_assignment_attribs IN PmtInstrAssignment_rec_type,
1020: x_assign_id OUT NOCOPY NUMBER,
1021: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
1022: )
1023: IS
1024: l_api_version CONSTANT NUMBER := 1.0;
1025: l_module CONSTANT VARCHAR2(30) := 'Set_Payer_Instr_Assignment';

Line 1031: l_result IBY_FNDCPT_COMMON_PUB.Result_rec_type;

1027: l_payer_id iby_external_payers_all.ext_payer_id%TYPE;
1028: l_payer_attribs PayerAttributes_rec_type;
1029: l_prev_msg_count NUMBER;
1030:
1031: l_result IBY_FNDCPT_COMMON_PUB.Result_rec_type;
1032:
1033: l_assign_id NUMBER;
1034: l_instr_id NUMBER;
1035: l_priority NUMBER;

Line 1090: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN

1086:
1087: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
1088: l_payer_level,l_payer_id,l_payer_attribs);
1089:
1090: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN
1091: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
1092: --
1093: -- CHANGE?: does PL/SQL do logical short circuiting? If not then
1094: -- change the condition evaluations as the exists_instrument

Line 1091: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;

1087: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
1088: l_payer_level,l_payer_id,l_payer_attribs);
1089:
1090: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN
1091: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
1092: --
1093: -- CHANGE?: does PL/SQL do logical short circuiting? If not then
1094: -- change the condition evaluations as the exists_instrument
1095: -- function is relatively expensive

Line 1117: IF (l_result.Result_Code <> IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS) THEN

1113: l_payer_attribs,
1114: l_payer_id,
1115: l_result
1116: );
1117: IF (l_result.Result_Code <> IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS) THEN
1118: x_response := l_result;
1119: RETURN;
1120: END IF;
1121: END IF;

Line 1144: iby_fndcpt_common_pub.Prepare_Result

1140:
1141: -- assignment id passed is non-NULL but no instruments found
1142: IF ((x_assign_id IS NULL) AND (NOT l_assign_id IS NULL)) THEN
1143: x_response.Result_Code := G_RC_INVALID_INSTR_ASSIGN;
1144: iby_fndcpt_common_pub.Prepare_Result
1145: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
1146: RETURN;
1147: END IF;
1148:

Line 1262: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;

1258: x_msg_data => x_msg_data
1259: );
1260: END IF;
1261:
1262: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
1263: END IF;
1264:
1265: IF FND_API.To_Boolean(p_commit) THEN
1266: COMMIT;

Line 1269: iby_fndcpt_common_pub.Prepare_Result

1265: IF FND_API.To_Boolean(p_commit) THEN
1266: COMMIT;
1267: END IF;
1268:
1269: iby_fndcpt_common_pub.Prepare_Result
1270: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
1271:
1272: iby_debug_pub.add('Exit',iby_debug_pub.G_LEVEL_PROCEDURE,l_dbg_mod);
1273: EXCEPTION

Line 1299: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);

1295: iby_debug_pub.add(debug_msg => 'In OTHERS Exception',
1296: debug_level => FND_LOG.LEVEL_UNEXPECTED,
1297: module => G_DEBUG_MODULE || l_module);
1298:
1299: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
1300:
1301: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1302: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1303: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));

Line 1319: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,

1315: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1316: x_return_status OUT NOCOPY VARCHAR2,
1317: x_msg_count OUT NOCOPY NUMBER,
1318: x_msg_data OUT NOCOPY VARCHAR2,
1319: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
1320: x_assignments OUT NOCOPY PmtInstrAssignment_tbl_type,
1321: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
1322: )
1323: IS

Line 1321: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

1317: x_msg_count OUT NOCOPY NUMBER,
1318: x_msg_data OUT NOCOPY VARCHAR2,
1319: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
1320: x_assignments OUT NOCOPY PmtInstrAssignment_tbl_type,
1321: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
1322: )
1323: IS
1324: l_api_version CONSTANT NUMBER := 1.0;
1325: l_module CONSTANT VARCHAR2(30) := 'Get_Payer_Instr_Assignments';

Line 1368: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN

1364:
1365: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
1366: l_payer_level,l_payer_id,l_payer_attribs);
1367:
1368: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN
1369: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
1370: ELSE
1371: l_assign_count := 0;
1372: FOR assign_rec IN c_instr_assignments(l_payer_id) LOOP

Line 1369: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;

1365: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
1366: l_payer_level,l_payer_id,l_payer_attribs);
1367:
1368: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN
1369: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
1370: ELSE
1371: l_assign_count := 0;
1372: FOR assign_rec IN c_instr_assignments(l_payer_id) LOOP
1373: l_assign_count := l_assign_count + 1;

Line 1386: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;

1382: x_assignments(l_assign_count).Start_Date := assign_rec.start_date;
1383: x_assignments(l_assign_count).End_Date := assign_rec.end_date;
1384: END LOOP;
1385:
1386: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
1387:
1388: END IF;
1389:
1390: iby_fndcpt_common_pub.Prepare_Result

Line 1390: iby_fndcpt_common_pub.Prepare_Result

1386: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
1387:
1388: END IF;
1389:
1390: iby_fndcpt_common_pub.Prepare_Result
1391: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
1392:
1393: EXCEPTION
1394:

Line 1419: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);

1415: iby_debug_pub.add(debug_msg => 'In OTHERS Exception',
1416: debug_level => FND_LOG.LEVEL_UNEXPECTED,
1417: module => G_DEBUG_MODULE || l_module);
1418:
1419: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
1420:
1421: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1422: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1423: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));

Line 1441: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

1437: x_msg_count OUT NOCOPY NUMBER,
1438: x_msg_data OUT NOCOPY VARCHAR2,
1439: p_party_id IN NUMBER,
1440: x_instruments OUT NOCOPY PmtInstrument_tbl_type,
1441: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
1442: )
1443: IS
1444: l_api_version CONSTANT NUMBER := 1.0;
1445: l_module CONSTANT VARCHAR2(30) := 'Get_Payer_All_Assignments';

Line 1493: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;

1489: x_instruments(l_instr_count).Instrument_Id :=
1490: assign_rec.instrument_id;
1491: END LOOP;
1492:
1493: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
1494:
1495: iby_fndcpt_common_pub.Prepare_Result
1496: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
1497:

Line 1495: iby_fndcpt_common_pub.Prepare_Result

1491: END LOOP;
1492:
1493: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
1494:
1495: iby_fndcpt_common_pub.Prepare_Result
1496: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
1497:
1498: EXCEPTION
1499:

Line 1524: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);

1520: iby_debug_pub.add(debug_msg => 'In OTHERS Exception',
1521: debug_level => FND_LOG.LEVEL_UNEXPECTED,
1522: module => G_DEBUG_MODULE || l_module);
1523:
1524: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
1525:
1526: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1527: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1528: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));

Line 1551: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,

1547: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1548: x_return_status OUT NOCOPY VARCHAR2,
1549: x_msg_count OUT NOCOPY NUMBER,
1550: x_msg_data OUT NOCOPY VARCHAR2,
1551: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
1552: p_payer_equivalency IN VARCHAR2 :=
1553: IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,
1554: p_conditions IN IBY_FNDCPT_COMMON_PUB.TrxnContext_rec_type,
1555: p_result_limit IN IBY_FNDCPT_COMMON_PUB.ResultLimit_rec_type,

Line 1553: IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,

1549: x_msg_count OUT NOCOPY NUMBER,
1550: x_msg_data OUT NOCOPY VARCHAR2,
1551: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
1552: p_payer_equivalency IN VARCHAR2 :=
1553: IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,
1554: p_conditions IN IBY_FNDCPT_COMMON_PUB.TrxnContext_rec_type,
1555: p_result_limit IN IBY_FNDCPT_COMMON_PUB.ResultLimit_rec_type,
1556: x_assignments OUT NOCOPY PmtInstrAssignment_tbl_type,
1557: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

Line 1554: p_conditions IN IBY_FNDCPT_COMMON_PUB.TrxnContext_rec_type,

1550: x_msg_data OUT NOCOPY VARCHAR2,
1551: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
1552: p_payer_equivalency IN VARCHAR2 :=
1553: IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,
1554: p_conditions IN IBY_FNDCPT_COMMON_PUB.TrxnContext_rec_type,
1555: p_result_limit IN IBY_FNDCPT_COMMON_PUB.ResultLimit_rec_type,
1556: x_assignments OUT NOCOPY PmtInstrAssignment_tbl_type,
1557: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
1558: )

Line 1555: p_result_limit IN IBY_FNDCPT_COMMON_PUB.ResultLimit_rec_type,

1551: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
1552: p_payer_equivalency IN VARCHAR2 :=
1553: IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,
1554: p_conditions IN IBY_FNDCPT_COMMON_PUB.TrxnContext_rec_type,
1555: p_result_limit IN IBY_FNDCPT_COMMON_PUB.ResultLimit_rec_type,
1556: x_assignments OUT NOCOPY PmtInstrAssignment_tbl_type,
1557: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
1558: )
1559: IS

Line 1557: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

1553: IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,
1554: p_conditions IN IBY_FNDCPT_COMMON_PUB.TrxnContext_rec_type,
1555: p_result_limit IN IBY_FNDCPT_COMMON_PUB.ResultLimit_rec_type,
1556: x_assignments OUT NOCOPY PmtInstrAssignment_tbl_type,
1557: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
1558: )
1559: IS
1560: l_api_version CONSTANT NUMBER := 1.0;
1561: l_module CONSTANT VARCHAR2(30) := 'Get_Trxn_Appl_Instr_Assign';

Line 1571: (ci_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,

1567:
1568: l_assign_count NUMBER;
1569:
1570: CURSOR c_instr_assigns
1571: (ci_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
1572: ci_payer_level IN VARCHAR2,
1573: ci_payer_equiv IN VARCHAR2,
1574: ci_instrument_type IN VARCHAR2)
1575: IS

Line 1592: AND (IBY_FNDCPT_COMMON_PUB.Compare_Payer

1588: (SELECT ext_payer_id
1589: FROM iby_external_payers_all
1590: WHERE (payment_function = ci_payer.Payment_Function)
1591: AND (party_id = ci_payer.Party_Id)
1592: AND (IBY_FNDCPT_COMMON_PUB.Compare_Payer
1593: (ci_payer.org_type, ci_payer.org_id,
1594: ci_payer.Cust_Account_Id, ci_payer.Account_Site_Id,
1595: ci_payer_level,ci_payer_equiv,org_type,org_id,
1596: cust_account_id,acct_site_use_id) = 'T')

Line 1627: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN

1623:
1624: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
1625: l_payer_level,l_payer_id,l_payer_attribs);
1626:
1627: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN
1628: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
1629: ELSE
1630: l_assign_count := 1;
1631: FOR assign_rec IN c_instr_assigns(p_payer,l_payer_level,p_payer_equivalency,p_conditions.payment_instrtype)

Line 1628: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;

1624: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
1625: l_payer_level,l_payer_id,l_payer_attribs);
1626:
1627: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN
1628: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
1629: ELSE
1630: l_assign_count := 1;
1631: FOR assign_rec IN c_instr_assigns(p_payer,l_payer_level,p_payer_equivalency,p_conditions.payment_instrtype)
1632: LOOP

Line 1644: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;

1640:
1641: EXIT WHEN p_result_limit.default_flag='Y';
1642: END LOOP;
1643:
1644: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
1645: END IF;
1646:
1647: iby_fndcpt_common_pub.Prepare_Result
1648: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);

Line 1647: iby_fndcpt_common_pub.Prepare_Result

1643:
1644: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
1645: END IF;
1646:
1647: iby_fndcpt_common_pub.Prepare_Result
1648: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
1649:
1650: EXCEPTION
1651:

Line 1676: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);

1672: iby_debug_pub.add(debug_msg => 'In OTHERS Exception',
1673: debug_level => FND_LOG.LEVEL_UNEXPECTED,
1674: module => G_DEBUG_MODULE || l_module);
1675:
1676: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
1677:
1678: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1679: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1680: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));

Line 1755: x_response IBY_FNDCPT_COMMON_PUB.Result_rec_type;

1751: x_instr_id OUT NOCOPY iby_creditcard.instrid%TYPE
1752: )
1753: IS
1754: -- create a record type and populate it
1755: x_response IBY_FNDCPT_COMMON_PUB.Result_rec_type;
1756: x_card_instrument CreditCard_rec_type;
1757: x_msg_count NUMBER;
1758: x_msg_data VARCHAR2(3000);
1759: Begin

Line 1838: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

1834: x_msg_count OUT NOCOPY NUMBER,
1835: x_msg_data OUT NOCOPY VARCHAR2,
1836: p_card_instrument IN CreditCard_rec_type,
1837: x_card_id OUT NOCOPY NUMBER,
1838: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
1839: )
1840: IS
1841:
1842: l_api_version CONSTANT NUMBER := 1.0;

Line 1847: lx_result IBY_FNDCPT_COMMON_PUB.Result_rec_type;

1843: l_module CONSTANT VARCHAR2(30) := 'Create_Card';
1844: l_prev_msg_count NUMBER;
1845:
1846: lx_result_code VARCHAR2(30);
1847: lx_result IBY_FNDCPT_COMMON_PUB.Result_rec_type;
1848: lx_card_rec CreditCard_rec_type;
1849:
1850: l_info_only iby_creditcard.information_only_flag%TYPE := NULL;
1851: l_sec_mode iby_sys_security_options.cc_encryption_mode%TYPE;

Line 1898: NVL(p_card_instrument.Instrument_Type,IBY_FNDCPT_COMMON_PUB.G_INSTR_TYPE_CREDITCARD)

1894: p_card_instrument.Owner_Id,
1895: p_card_instrument.Card_Number,
1896: lx_card_rec,
1897: lx_result,
1898: NVL(p_card_instrument.Instrument_Type,IBY_FNDCPT_COMMON_PUB.G_INSTR_TYPE_CREDITCARD)
1899: );
1900:
1901: iby_debug_pub.add('fetched card id:='||lx_card_rec.Card_Id,
1902: iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);

Line 1909: iby_fndcpt_common_pub.Prepare_Result

1905:
1906: -- validate billing address information
1907: IF (NOT Validate_CC_Billing(FND_API.G_FALSE,p_card_instrument)) THEN
1908: x_response.Result_Code := iby_creditcard_pkg.G_RC_INVALID_ADDRESS;
1909: iby_fndcpt_common_pub.Prepare_Result
1910: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
1911: RETURN;
1912: END IF;
1913:

Line 1927: l_cc_reg.Instrument_Type := NVL(p_card_instrument.Instrument_Type,IBY_FNDCPT_COMMON_PUB.G_INSTR_TYPE_CREDITCARD);

1923: l_cc_reg.FIName := p_card_instrument.FI_Name;
1924: l_cc_reg.CC_Type := p_card_instrument.Card_Issuer;
1925: l_cc_reg.CC_Num := p_card_instrument.Card_Number;
1926: l_cc_reg.CC_ExpDate := p_card_instrument.Expiration_Date;
1927: l_cc_reg.Instrument_Type := NVL(p_card_instrument.Instrument_Type,IBY_FNDCPT_COMMON_PUB.G_INSTR_TYPE_CREDITCARD);
1928: l_cc_reg.Owner_Id := p_card_instrument.Owner_Id;
1929: l_cc_reg.CC_HolderName := p_card_instrument.Card_Holder_Name;
1930: l_cc_reg.CC_Desc := p_card_instrument.Card_Description;
1931: l_cc_reg.Billing_Address_Id := p_card_instrument.Billing_Address_Id;

Line 1960: --IBY_FNDCPT_COMMON_PUB.G_RC_GENERIC_SYS_ERROR;

1956: iby_debug_pub.add('result code:=' || lx_result.Result_Code,
1957: iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
1958: IF (lx_result.Result_Code IS NULL) THEN
1959: x_response.Result_Code := 'COMMUNICATION_ERROR';
1960: --IBY_FNDCPT_COMMON_PUB.G_RC_GENERIC_SYS_ERROR;
1961: iby_fndcpt_common_pub.Prepare_Result
1962: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,
1963: x_response);
1964: ELSE

Line 1961: iby_fndcpt_common_pub.Prepare_Result

1957: iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
1958: IF (lx_result.Result_Code IS NULL) THEN
1959: x_response.Result_Code := 'COMMUNICATION_ERROR';
1960: --IBY_FNDCPT_COMMON_PUB.G_RC_GENERIC_SYS_ERROR;
1961: iby_fndcpt_common_pub.Prepare_Result
1962: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,
1963: x_response);
1964: ELSE
1965: x_response.Result_Code := lx_result.Result_Code;

Line 1967: iby_fndcpt_common_pub.Prepare_Result

1963: x_response);
1964: ELSE
1965: x_response.Result_Code := lx_result.Result_Code;
1966:
1967: iby_fndcpt_common_pub.Prepare_Result
1968: (IBY_INSTRREG_PUB.G_INTERFACE_CODE,lx_result.Result_Message,
1969: l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,
1970: x_response);
1971: END IF;

Line 1986: NVL(p_card_instrument.Instrument_Type,IBY_FNDCPT_COMMON_PUB.G_INSTR_TYPE_CREDITCARD),

1982: p_card_instrument.Address_Type,
1983: p_card_instrument.Billing_Postal_Code,
1984: p_card_instrument.Billing_Address_Territory,
1985: p_card_instrument.Card_Number, p_card_instrument.Expiration_Date,
1986: NVL(p_card_instrument.Instrument_Type,IBY_FNDCPT_COMMON_PUB.G_INSTR_TYPE_CREDITCARD),
1987: p_card_instrument.PurchaseCard_Flag,
1988: p_card_instrument.PurchaseCard_SubType, p_card_instrument.Card_Issuer,
1989: p_card_instrument.FI_Name, p_card_instrument.Single_Use_Flag,
1990: p_card_instrument.Info_Only_Flag, p_card_instrument.Card_Purpose,

Line 2038: iby_fndcpt_common_pub.Prepare_Result

2034:
2035: -- validate billing address information
2036: IF (NOT Validate_CC_Billing(FND_API.G_TRUE,p_card_instrument)) THEN
2037: x_response.Result_Code := iby_creditcard_pkg.G_RC_INVALID_ADDRESS;
2038: iby_fndcpt_common_pub.Prepare_Result
2039: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
2040: RETURN;
2041: END IF;
2042: -- validate expiration date

Line 2046: iby_fndcpt_common_pub.Prepare_Result

2042: -- validate expiration date
2043: IF (TRUNC(p_card_instrument.Expiration_Date,'DD') < TRUNC(SYSDATE,'DD'))
2044: THEN
2045: x_response.Result_Code := iby_creditcard_pkg.G_RC_INVALID_CCEXPIRY;
2046: iby_fndcpt_common_pub.Prepare_Result
2047: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
2048: RETURN;
2049: END IF;
2050:

Line 2084: x_response.Result_Code := NVL(lx_result_code,IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS);

2080: lx_result_code);
2081: x_card_id := lx_card_rec.Card_Id;
2082: END IF;
2083:
2084: x_response.Result_Code := NVL(lx_result_code,IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS);
2085: iby_fndcpt_common_pub.Prepare_Result
2086: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
2087:
2088: IF FND_API.To_Boolean(p_commit) THEN

Line 2085: iby_fndcpt_common_pub.Prepare_Result

2081: x_card_id := lx_card_rec.Card_Id;
2082: END IF;
2083:
2084: x_response.Result_Code := NVL(lx_result_code,IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS);
2085: iby_fndcpt_common_pub.Prepare_Result
2086: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
2087:
2088: IF FND_API.To_Boolean(p_commit) THEN
2089: COMMIT;

Line 2118: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);

2114: iby_debug_pub.add(debug_msg => 'In OTHERS Exception',
2115: debug_level => FND_LOG.LEVEL_UNEXPECTED,
2116: module => G_DEBUG_MODULE || l_module);
2117:
2118: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
2119:
2120: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2121: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2122: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));

Line 2195: x_response IBY_FNDCPT_COMMON_PUB.Result_rec_type;

2191: x_return_status OUT NOCOPY VARCHAR2
2192: )
2193: IS
2194: -- create a record type and populate it
2195: x_response IBY_FNDCPT_COMMON_PUB.Result_rec_type;
2196: x_card_instrument CreditCard_rec_type;
2197: x_msg_count NUMBER;
2198: x_msg_data VARCHAR2(3000);
2199: Begin

Line 2274: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

2270: x_return_status OUT NOCOPY VARCHAR2,
2271: x_msg_count OUT NOCOPY NUMBER,
2272: x_msg_data OUT NOCOPY VARCHAR2,
2273: p_card_instrument IN CreditCard_rec_type,
2274: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
2275: )
2276: IS
2277:
2278: l_api_version CONSTANT NUMBER := 1.0;

Line 2314: iby_fndcpt_common_pub.Prepare_Result

2310: END IF;
2311: -- validate billing address information
2312: IF (NOT Validate_CC_Billing(FND_API.G_TRUE,p_card_instrument)) THEN
2313: x_response.Result_Code := iby_creditcard_pkg.G_RC_INVALID_ADDRESS;
2314: iby_fndcpt_common_pub.Prepare_Result
2315: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
2316: RETURN;
2317: END IF;
2318:

Line 2352: NVL(lx_result_code,IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS);

2348: lx_result_code);
2349:
2350:
2351: x_response.Result_Code :=
2352: NVL(lx_result_code,IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS);
2353: iby_fndcpt_common_pub.Prepare_Result
2354: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
2355:
2356: IF FND_API.To_Boolean(p_commit) THEN

Line 2353: iby_fndcpt_common_pub.Prepare_Result

2349:
2350:
2351: x_response.Result_Code :=
2352: NVL(lx_result_code,IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS);
2353: iby_fndcpt_common_pub.Prepare_Result
2354: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
2355:
2356: IF FND_API.To_Boolean(p_commit) THEN
2357: COMMIT;

Line 2386: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);

2382: iby_debug_pub.add(debug_msg => 'In OTHERS Exception',
2383: debug_level => FND_LOG.LEVEL_UNEXPECTED,
2384: module => G_DEBUG_MODULE || l_module);
2385:
2386: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
2387:
2388: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2389: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2390: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));

Line 2415: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

2411: x_msg_count OUT NOCOPY NUMBER,
2412: x_msg_data OUT NOCOPY VARCHAR2,
2413: p_card_id NUMBER,
2414: x_card_instrument OUT NOCOPY CreditCard_rec_type,
2415: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
2416: )
2417: IS
2418: l_api_version CONSTANT NUMBER := 1.0;
2419: l_module CONSTANT VARCHAR2(30) := 'Get_Card';

Line 2467: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;

2463:
2464: IF (c_card%NOTFOUND) THEN
2465: x_response.Result_Code := G_RC_INVALID_INSTRUMENT;
2466: ELSE
2467: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
2468: x_card_instrument.Card_Id := p_card_id;
2469: END IF;
2470:
2471: iby_fndcpt_common_pub.Prepare_Result

Line 2471: iby_fndcpt_common_pub.Prepare_Result

2467: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
2468: x_card_instrument.Card_Id := p_card_id;
2469: END IF;
2470:
2471: iby_fndcpt_common_pub.Prepare_Result
2472: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
2473:
2474: EXCEPTION
2475:

Line 2500: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);

2496: iby_debug_pub.add(debug_msg => 'In OTHERS Exception',
2497: debug_level => FND_LOG.LEVEL_UNEXPECTED,
2498: module => G_DEBUG_MODULE || l_module);
2499:
2500: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
2501:
2502: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2503: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2504: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));

Line 2529: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type,

2525: x_msg_data OUT NOCOPY VARCHAR2,
2526: p_owner_id NUMBER,
2527: p_card_number VARCHAR2,
2528: x_card_instrument OUT NOCOPY CreditCard_rec_type,
2529: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type,
2530: p_card_instr_type VARCHAR2 DEFAULT NULL
2531: )
2532: IS
2533: l_api_version CONSTANT NUMBER := 1.0;

Line 2545: lx_result IBY_FNDCPT_COMMON_PUB.Result_rec_type;

2541: lx_return_status VARCHAR2(1);
2542: lx_msg_count NUMBER;
2543: lx_msg_data VARCHAR2(200);
2544: lx_cc_number iby_creditcard.ccnumber%TYPE;
2545: lx_result IBY_FNDCPT_COMMON_PUB.Result_rec_type;
2546:
2547: CURSOR c_card
2548: (ci_cc_hash1 IN iby_creditcard.cc_number_hash1%TYPE,
2549: ci_cc_hash2 IN iby_creditcard.cc_number_hash2%TYPE,

Line 2583: IF (nvl(p_card_instr_type,IBY_FNDCPT_COMMON_PUB.G_INSTR_TYPE_CREDITCARD ) = IBY_FNDCPT_COMMON_PUB.G_INSTR_TYPE_PAYMENTCARD) THEN

2579: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2580: FND_MSG_PUB.initialize;
2581: END IF;
2582: l_prev_msg_count := FND_MSG_PUB.Count_Msg;
2583: IF (nvl(p_card_instr_type,IBY_FNDCPT_COMMON_PUB.G_INSTR_TYPE_CREDITCARD ) = IBY_FNDCPT_COMMON_PUB.G_INSTR_TYPE_PAYMENTCARD) THEN
2584: l_char_allowed := 'Y';
2585: END IF;
2586:
2587: iby_cc_validate.StripCC

Line 2594: iby_fndcpt_common_pub.Prepare_Result

2590: );
2591:
2592: IF (lx_cc_number IS NULL) THEN
2593: x_response.Result_Code := iby_creditcard_pkg.G_RC_INVALID_CCNUMBER;
2594: iby_fndcpt_common_pub.Prepare_Result
2595: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
2596: RETURN;
2597: END IF;
2598:

Line 2620: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;

2616: l_card_id,
2617: x_card_instrument,
2618: lx_result
2619: );
2620: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
2621: END IF;
2622: iby_fndcpt_common_pub.Prepare_Result
2623: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
2624:

Line 2622: iby_fndcpt_common_pub.Prepare_Result

2618: lx_result
2619: );
2620: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
2621: END IF;
2622: iby_fndcpt_common_pub.Prepare_Result
2623: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
2624:
2625: EXCEPTION
2626:

Line 2651: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);

2647: iby_debug_pub.add(debug_msg => 'In OTHERS Exception',
2648: debug_level => FND_LOG.LEVEL_UNEXPECTED,
2649: module => G_DEBUG_MODULE || l_module);
2650:
2651: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
2652:
2653: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2654: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2655: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));

Line 2678: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,

2674: p_commit IN VARCHAR2 := FND_API.G_TRUE,
2675: x_return_status OUT NOCOPY VARCHAR2,
2676: x_msg_count OUT NOCOPY NUMBER,
2677: x_msg_data OUT NOCOPY VARCHAR2,
2678: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
2679: p_credit_card IN CreditCard_rec_type,
2680: p_assignment_attribs IN PmtInstrAssignment_rec_type,
2681: x_assign_id OUT NOCOPY NUMBER,
2682: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

Line 2682: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

2678: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
2679: p_credit_card IN CreditCard_rec_type,
2680: p_assignment_attribs IN PmtInstrAssignment_rec_type,
2681: x_assign_id OUT NOCOPY NUMBER,
2682: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
2683: )
2684: IS
2685: l_api_version CONSTANT NUMBER := 1.0;
2686: l_module CONSTANT VARCHAR2(30) := 'Process_Credit_Card';

Line 2694: lx_response IBY_FNDCPT_COMMON_PUB.Result_rec_type;

2690: lx_return_status VARCHAR2(1);
2691: lx_msg_count NUMBER;
2692: lx_msg_data VARCHAR2(2000);
2693:
2694: lx_response IBY_FNDCPT_COMMON_PUB.Result_rec_type;
2695: lx_assign_attribs PmtInstrAssignment_rec_type;
2696:
2697: l_dbg_mod VARCHAR2(100) := G_DEBUG_MODULE || '.' || l_module;
2698: BEGIN

Line 2734: IF (lx_response.Result_Code <> IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS) THEN

2730: lx_assign_attribs.Instrument.Instrument_Id,
2731: lx_response
2732: );
2733:
2734: IF (lx_response.Result_Code <> IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS) THEN
2735: iby_debug_pub.add('rollback',iby_debug_pub.G_LEVEL_ERROR,l_dbg_mod);
2736: ROLLBACK TO Process_Credit_Card;
2737: x_response := lx_response;
2738: ELSE

Line 2741: IBY_FNDCPT_COMMON_PUB.G_INSTR_TYPE_CREDITCARD;

2737: x_response := lx_response;
2738: ELSE
2739:
2740: lx_assign_attribs.Instrument.Instrument_Type :=
2741: IBY_FNDCPT_COMMON_PUB.G_INSTR_TYPE_CREDITCARD;
2742: Set_Payer_Instr_Assignment
2743: (1.0, FND_API.G_FALSE, FND_API.G_FALSE, x_return_status, x_msg_count,
2744: x_msg_data, p_payer, lx_assign_attribs, x_assign_id,
2745: x_response

Line 2749: iby_fndcpt_common_pub.Prepare_Result

2745: x_response
2746: );
2747: END IF;
2748:
2749: iby_fndcpt_common_pub.Prepare_Result
2750: (iby_fndcpt_common_pub.G_INTERFACE_CODE,x_response.Result_Message,
2751: l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
2752:
2753: IF FND_API.To_Boolean(p_commit) THEN

Line 2750: (iby_fndcpt_common_pub.G_INTERFACE_CODE,x_response.Result_Message,

2746: );
2747: END IF;
2748:
2749: iby_fndcpt_common_pub.Prepare_Result
2750: (iby_fndcpt_common_pub.G_INTERFACE_CODE,x_response.Result_Message,
2751: l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
2752:
2753: IF FND_API.To_Boolean(p_commit) THEN
2754: COMMIT;

Line 2783: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);

2779: iby_debug_pub.add(debug_msg => 'In OTHERS Exception',
2780: debug_level => FND_LOG.LEVEL_UNEXPECTED,
2781: module => G_DEBUG_MODULE || l_module);
2782:
2783: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);
2784:
2785: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2786: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2787: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_module, SUBSTR(SQLERRM,1,100));

Line 2827: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,

2823: END Get_Hash;
2824:
2825: PROCEDURE Get_Trxn_Payer_Attributes
2826: (
2827: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
2828: p_payer_equivalency IN VARCHAR2
2829: := IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,
2830: x_payer_attributes OUT NOCOPY PayerAttributes_rec_type
2831: )

Line 2829: := IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,

2825: PROCEDURE Get_Trxn_Payer_Attributes
2826: (
2827: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
2828: p_payer_equivalency IN VARCHAR2
2829: := IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,
2830: x_payer_attributes OUT NOCOPY PayerAttributes_rec_type
2831: )
2832: IS
2833:

Line 2839: ci_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,

2835: l_payer_id iby_external_payers_all.ext_payer_id%TYPE;
2836: l_payer_attribs IBY_FNDCPT_SETUP_PUB.PayerAttributes_rec_type;
2837:
2838: CURSOR l_payer_attr_cur (
2839: ci_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
2840: ci_payer_level IN VARCHAR2,
2841: ci_payer_equiv IN VARCHAR2
2842: )
2843: IS

Line 2847: AND IBY_FNDCPT_COMMON_PUB.Compare_Payer

2843: IS
2844: SELECT bank_charge_bearer_code, dirdeb_instruction_code
2845: FROM iby_external_payers_all p
2846: WHERE p.party_id = ci_payer.Party_Id
2847: AND IBY_FNDCPT_COMMON_PUB.Compare_Payer
2848: (ci_payer.org_type, ci_payer.org_id,
2849: ci_payer.Cust_Account_Id, ci_payer.Account_Site_Id,
2850: ci_payer_level,ci_payer_equiv,p.org_type,p.org_id,
2851: p.cust_account_id,p.acct_site_use_id) = 'T'