DBA Data[Home] [Help]

APPS.IBY_FNDCPT_SETUP_PUB dependencies on IBY_FNDCPT_COMMON_PUB

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

149: IF (c_bankaccount%ISOPEN) THEN
150: CLOSE c_bankaccount;
151: END IF;
152:
153: IF (p_instr.Instrument_Type = IBY_FNDCPT_COMMON_PUB.G_INSTR_TYPE_CREDITCARD)
154: THEN
155: OPEN c_creditcard(p_instr.Instrument_Id);
156: FETCH c_creditcard INTO l_instr_count;
157: CLOSE c_creditcard;

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

154: THEN
155: OPEN c_creditcard(p_instr.Instrument_Id);
156: FETCH c_creditcard INTO l_instr_count;
157: CLOSE c_creditcard;
158: ELSIF (p_instr.Instrument_Type = IBY_FNDCPT_COMMON_PUB.G_INSTR_TYPE_BANKACCT)
159: THEN
160: OPEN c_bankaccount(p_instr.Instrument_Id);
161: FETCH c_bankaccount INTO l_instr_count;
162: CLOSE c_bankaccount;

Line 182: lx_result IBY_FNDCPT_COMMON_PUB.Result_rec_type;

178:
179: lx_return_status VARCHAR2(1);
180: lx_msg_count NUMBER;
181: lx_msg_data VARCHAR2(3000);
182: lx_result IBY_FNDCPT_COMMON_PUB.Result_rec_type;
183: lx_channel_attribs PmtChannel_AttribUses_rec_type;
184:
185: l_addressid iby_creditcard.addressid%TYPE;
186: l_billing_zip iby_creditcard.billing_addr_postal_code%TYPE;

Line 261: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,

257: END Validate_CC_Billing;
258:
259: PROCEDURE Get_Payer_Id
260: (
261: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
262: p_validation_level IN VARCHAR2,
263: x_payer_level OUT NOCOPY VARCHAR2,
264: x_payer_id OUT NOCOPY iby_external_payers_all.ext_payer_id%TYPE,
265: x_payer_attribs OUT NOCOPY PayerAttributes_rec_type

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

292: CLOSE c_payer;
293: END IF;
294:
295: x_payer_level :=
296: IBY_FNDCPT_COMMON_PUB.Validate_Payer(p_payer,p_validation_level);
297:
298: IF (x_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN
299: x_payer_id := NULL;
300: RETURN;

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

294:
295: x_payer_level :=
296: IBY_FNDCPT_COMMON_PUB.Validate_Payer(p_payer,p_validation_level);
297:
298: IF (x_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN
299: x_payer_id := NULL;
300: RETURN;
301: END IF;
302:

Line 322: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,

318: p_commit IN VARCHAR2 := FND_API.G_TRUE,
319: x_return_status OUT NOCOPY VARCHAR2,
320: x_msg_count OUT NOCOPY NUMBER,
321: x_msg_data OUT NOCOPY VARCHAR2,
322: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
323: p_payer_attributes IN PayerAttributes_rec_type,
324: x_payer_attribs_id OUT NOCOPY NUMBER,
325: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
326: )

Line 325: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

321: x_msg_data OUT NOCOPY VARCHAR2,
322: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
323: p_payer_attributes IN PayerAttributes_rec_type,
324: x_payer_attribs_id OUT NOCOPY NUMBER,
325: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
326: )
327: IS
328: l_api_version CONSTANT NUMBER := 1.0;
329: l_module CONSTANT VARCHAR2(30) := 'Set_Payer_Attributes';

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

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:
357: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN
358: x_response.Result_Code := l_payer_level;
359: ELSIF (x_payer_attribs_id IS NULL) THEN
360:
361: SELECT iby_external_payers_all_s.nextval

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

401: IF FND_API.To_Boolean(p_commit) THEN
402: COMMIT;
403: END IF;
404:
405: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
406: iby_fndcpt_common_pub.Prepare_Result
407: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
408:
409: EXCEPTION

Line 406: iby_fndcpt_common_pub.Prepare_Result

402: COMMIT;
403: END IF;
404:
405: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
406: iby_fndcpt_common_pub.Prepare_Result
407: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
408:
409: EXCEPTION
410:

Line 435: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);

431: iby_debug_pub.add(debug_msg => 'In OTHERS Exception',
432: debug_level => FND_LOG.LEVEL_UNEXPECTED,
433: module => G_DEBUG_MODULE || l_module);
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));

Line 454: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,

450: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
451: x_return_status OUT NOCOPY VARCHAR2,
452: x_msg_count OUT NOCOPY NUMBER,
453: x_msg_data OUT NOCOPY VARCHAR2,
454: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
455: x_payer_attributes OUT NOCOPY PayerAttributes_rec_type,
456: x_payer_attribs_id OUT NOCOPY NUMBER,
457: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
458: )

Line 457: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

453: x_msg_data OUT NOCOPY VARCHAR2,
454: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
455: x_payer_attributes OUT NOCOPY PayerAttributes_rec_type,
456: x_payer_attribs_id OUT NOCOPY NUMBER,
457: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
458: )
459: IS
460: l_api_version CONSTANT NUMBER := 1.0;
461: l_module CONSTANT VARCHAR2(30) := 'Get_Payer_Attributes';

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

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
488: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
489: ELSE
490: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
491: END IF;
492:

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

486: l_payer_level,x_payer_attribs_id,x_payer_attributes);
487: IF (x_payer_attribs_id IS NULL) THEN
488: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
489: ELSE
490: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
491: END IF;
492:
493: iby_fndcpt_common_pub.Prepare_Result
494: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);

Line 493: iby_fndcpt_common_pub.Prepare_Result

489: ELSE
490: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
491: END IF;
492:
493: iby_fndcpt_common_pub.Prepare_Result
494: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
495:
496: EXCEPTION
497:

Line 540: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

536: x_msg_count OUT NOCOPY NUMBER,
537: x_msg_data OUT NOCOPY VARCHAR2,
538: p_channel_code IN VARCHAR2,
539: x_channel_attrib_uses OUT NOCOPY PmtChannel_AttribUses_rec_type,
540: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
541: )
542: IS
543: l_api_version CONSTANT NUMBER := 1.0;
544: l_module CONSTANT VARCHAR2(30) := 'Get_Payment_Channel_Attribs';

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

629:
630: IF (c_appl_attribs%NOTFOUND) THEN
631: x_response.Result_Code := G_RC_INVALID_CHNNL;
632: ELSE
633: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
634: END IF;
635:
636: CLOSE c_appl_attribs;
637:

Line 638: iby_fndcpt_common_pub.Prepare_Result

634: END IF;
635:
636: CLOSE c_appl_attribs;
637:
638: iby_fndcpt_common_pub.Prepare_Result
639: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
640:
641: EXCEPTION
642:

Line 667: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);

663: iby_debug_pub.add(debug_msg => 'In OTHERS Exception',
664: debug_level => FND_LOG.LEVEL_UNEXPECTED,
665: module => G_DEBUG_MODULE || l_module);
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));

Line 687: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,

683: p_commit IN VARCHAR2 := FND_API.G_TRUE,
684: x_return_status OUT NOCOPY VARCHAR2,
685: x_msg_count OUT NOCOPY NUMBER,
686: x_msg_data OUT NOCOPY VARCHAR2,
687: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
688: p_channel_assignment IN PmtChannelAssignment_rec_type,
689: x_assignment_id OUT NOCOPY NUMBER,
690: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
691: )

Line 690: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

686: x_msg_data OUT NOCOPY VARCHAR2,
687: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
688: p_channel_assignment IN PmtChannelAssignment_rec_type,
689: x_assignment_id OUT NOCOPY NUMBER,
690: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
691: )
692: IS
693: l_api_version CONSTANT NUMBER := 1.0;
694: l_module CONSTANT VARCHAR2(30) := 'Set_Payer_Default_Pmt_Channel';

Line 699: l_result IBY_FNDCPT_COMMON_PUB.Result_rec_type;

695: l_payer_level VARCHAR2(30);
696: l_payer_id iby_external_payers_all.ext_payer_id%TYPE;
697: l_payer_attribs PayerAttributes_rec_type;
698:
699: l_result IBY_FNDCPT_COMMON_PUB.Result_rec_type;
700: l_prev_msg_count NUMBER;
701:
702: CURSOR c_chnnl_assign
703: (ci_payer_id IN iby_ext_party_pmt_mthds.ext_pmt_party_id%TYPE)

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

734:
735: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,l_payer_level,
736: l_payer_id,l_payer_attribs);
737:
738: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN
739: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
740: ELSIF (NOT Exists_Pmt_Channel(p_channel_assignment.Pmt_Channel_Code)) THEN
741: x_response.Result_Code := G_RC_INVALID_CHNNL;
742: ELSE

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

735: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,l_payer_level,
736: l_payer_id,l_payer_attribs);
737:
738: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN
739: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
740: ELSIF (NOT Exists_Pmt_Channel(p_channel_assignment.Pmt_Channel_Code)) THEN
741: x_response.Result_Code := G_RC_INVALID_CHNNL;
742: ELSE
743:

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

757: l_payer_id,
758: l_result
759: );
760:
761: IF (l_result.Result_Code <> IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS) THEN
762: x_response := l_result;
763: RETURN;
764: END IF;
765: END IF;

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

797: WHERE ext_party_pmt_mthd_id = x_assignment_id;
798:
799: END IF;
800:
801: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
802: END IF;
803:
804:
805: iby_fndcpt_common_pub.Prepare_Result

Line 805: iby_fndcpt_common_pub.Prepare_Result

801: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
802: END IF;
803:
804:
805: iby_fndcpt_common_pub.Prepare_Result
806: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
807:
808: IF FND_API.To_Boolean(p_commit) THEN
809: COMMIT;

Line 839: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);

835: iby_debug_pub.add(debug_msg => 'In OTHERS Exception',
836: debug_level => FND_LOG.LEVEL_UNEXPECTED,
837: module => G_DEBUG_MODULE || l_module);
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));

Line 858: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,

854: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
855: x_return_status OUT NOCOPY VARCHAR2,
856: x_msg_count OUT NOCOPY NUMBER,
857: x_msg_data OUT NOCOPY VARCHAR2,
858: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
859: x_channel_assignment OUT NOCOPY PmtChannelAssignment_rec_type,
860: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
861: )
862: IS

Line 860: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

856: x_msg_count OUT NOCOPY NUMBER,
857: x_msg_data OUT NOCOPY VARCHAR2,
858: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
859: x_channel_assignment OUT NOCOPY PmtChannelAssignment_rec_type,
860: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
861: )
862: IS
863: l_api_version CONSTANT NUMBER := 1.0;
864: l_module CONSTANT VARCHAR2(30) := 'Get_Payer_Default_Pmt_Channel';

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

903:
904: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
905: l_payer_level,l_payer_id,l_payer_attribs);
906:
907: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN
908: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
909: ELSE
910: OPEN c_chnnl_assign(l_payer_id);
911: FETCH c_chnnl_assign INTO x_channel_assignment.Pmt_Channel_Code,

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

904: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
905: l_payer_level,l_payer_id,l_payer_attribs);
906:
907: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN
908: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
909: ELSE
910: OPEN c_chnnl_assign(l_payer_id);
911: FETCH c_chnnl_assign INTO x_channel_assignment.Pmt_Channel_Code,
912: x_channel_assignment.Default_Flag, x_channel_assignment.Inactive_Date;

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

910: OPEN c_chnnl_assign(l_payer_id);
911: FETCH c_chnnl_assign INTO x_channel_assignment.Pmt_Channel_Code,
912: x_channel_assignment.Default_Flag, x_channel_assignment.Inactive_Date;
913: IF (c_chnnl_assign%NOTFOUND) THEN
914: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
915: ELSE
916: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
917: END IF;
918: CLOSE c_chnnl_assign;

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

912: x_channel_assignment.Default_Flag, x_channel_assignment.Inactive_Date;
913: IF (c_chnnl_assign%NOTFOUND) THEN
914: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
915: ELSE
916: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
917: END IF;
918: CLOSE c_chnnl_assign;
919: END IF;
920:

Line 921: iby_fndcpt_common_pub.Prepare_Result

917: END IF;
918: CLOSE c_chnnl_assign;
919: END IF;
920:
921: iby_fndcpt_common_pub.Prepare_Result
922: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
923:
924: EXCEPTION
925:

Line 950: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);

946: iby_debug_pub.add(debug_msg => 'In OTHERS Exception',
947: debug_level => FND_LOG.LEVEL_UNEXPECTED,
948: module => G_DEBUG_MODULE || l_module);
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));

Line 969: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,

965: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
966: x_return_status OUT NOCOPY VARCHAR2,
967: x_msg_count OUT NOCOPY NUMBER,
968: x_msg_data OUT NOCOPY VARCHAR2,
969: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
970: p_payer_equivalency IN VARCHAR2
971: := IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,
972: p_conditions IN IBY_FNDCPT_COMMON_PUB.TrxnContext_rec_type,
973: p_result_limit IN IBY_FNDCPT_COMMON_PUB.ResultLimit_rec_type,

Line 971: := IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,

967: x_msg_count OUT NOCOPY NUMBER,
968: x_msg_data OUT NOCOPY VARCHAR2,
969: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
970: p_payer_equivalency IN VARCHAR2
971: := IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,
972: p_conditions IN IBY_FNDCPT_COMMON_PUB.TrxnContext_rec_type,
973: p_result_limit IN IBY_FNDCPT_COMMON_PUB.ResultLimit_rec_type,
974: x_channels OUT NOCOPY PmtChannel_tbl_type,
975: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

Line 972: p_conditions IN IBY_FNDCPT_COMMON_PUB.TrxnContext_rec_type,

968: x_msg_data OUT NOCOPY VARCHAR2,
969: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
970: p_payer_equivalency IN VARCHAR2
971: := IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,
972: p_conditions IN IBY_FNDCPT_COMMON_PUB.TrxnContext_rec_type,
973: p_result_limit IN IBY_FNDCPT_COMMON_PUB.ResultLimit_rec_type,
974: x_channels OUT NOCOPY PmtChannel_tbl_type,
975: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
976: )

Line 973: p_result_limit IN IBY_FNDCPT_COMMON_PUB.ResultLimit_rec_type,

969: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
970: p_payer_equivalency IN VARCHAR2
971: := IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,
972: p_conditions IN IBY_FNDCPT_COMMON_PUB.TrxnContext_rec_type,
973: p_result_limit IN IBY_FNDCPT_COMMON_PUB.ResultLimit_rec_type,
974: x_channels OUT NOCOPY PmtChannel_tbl_type,
975: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
976: )
977: IS

Line 975: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

971: := IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,
972: p_conditions IN IBY_FNDCPT_COMMON_PUB.TrxnContext_rec_type,
973: p_result_limit IN IBY_FNDCPT_COMMON_PUB.ResultLimit_rec_type,
974: x_channels OUT NOCOPY PmtChannel_tbl_type,
975: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
976: )
977: IS
978: l_api_version CONSTANT NUMBER := 1.0;
979: l_module CONSTANT VARCHAR2(30) := 'Get_Trxn_Appl_Pmt_Channels';

Line 992: (ci_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,

988: -- all system channels are applicable that are not site-wide
989: -- deactivated (end-dated)
990: --
991: CURSOR c_trxn_channels
992: (ci_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
993: ci_payer_level IN VARCHAR2,
994: ci_payer_equiv IN VARCHAR2)
995: IS
996: SELECT c.payment_channel_code, c.instrument_type

Line 1008: AND (IBY_FNDCPT_COMMON_PUB.Compare_Payer

1004: SELECT ext_payer_id
1005: FROM iby_external_payers_all
1006: WHERE (payment_function = ci_payer.Payment_Function)
1007: AND (party_id = ci_payer.Party_Id)
1008: AND (IBY_FNDCPT_COMMON_PUB.Compare_Payer
1009: (ci_payer.org_type, ci_payer.org_id,
1010: ci_payer.Cust_Account_Id, ci_payer.Account_Site_Id,
1011: ci_payer_level,ci_payer_equiv,org_type,org_id,
1012: cust_account_id,acct_site_use_id) = 'T')

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

1037:
1038: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
1039: l_payer_level,l_payer_id,l_payer_attribs);
1040:
1041: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN
1042: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
1043: ELSE
1044: l_channel_count := 0;
1045:

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

1038: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
1039: l_payer_level,l_payer_id,l_payer_attribs);
1040:
1041: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN
1042: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
1043: ELSE
1044: l_channel_count := 0;
1045:
1046: FOR channel_rec IN c_trxn_channels(p_payer,l_payer_level,

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

1051: channel_rec.payment_channel_code;
1052: x_channels(l_channel_count).Instrument_Type := channel_rec.instrument_type;
1053: END LOOP;
1054:
1055: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
1056: END IF;
1057:
1058: iby_fndcpt_common_pub.Prepare_Result
1059: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);

Line 1058: iby_fndcpt_common_pub.Prepare_Result

1054:
1055: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
1056: END IF;
1057:
1058: iby_fndcpt_common_pub.Prepare_Result
1059: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
1060:
1061: EXCEPTION
1062:

Line 1087: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);

1083: iby_debug_pub.add(debug_msg => 'In OTHERS Exception',
1084: debug_level => FND_LOG.LEVEL_UNEXPECTED,
1085: module => G_DEBUG_MODULE || l_module);
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));

Line 1108: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,

1104: p_commit IN VARCHAR2 := FND_API.G_TRUE,
1105: x_return_status OUT NOCOPY VARCHAR2,
1106: x_msg_count OUT NOCOPY NUMBER,
1107: x_msg_data OUT NOCOPY VARCHAR2,
1108: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
1109: p_assignment_attribs IN PmtInstrAssignment_rec_type,
1110: x_assign_id OUT NOCOPY NUMBER,
1111: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
1112: )

Line 1111: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

1107: x_msg_data OUT NOCOPY VARCHAR2,
1108: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
1109: p_assignment_attribs IN PmtInstrAssignment_rec_type,
1110: x_assign_id OUT NOCOPY NUMBER,
1111: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
1112: )
1113: IS
1114: l_api_version CONSTANT NUMBER := 1.0;
1115: l_module CONSTANT VARCHAR2(30) := 'Set_Payer_Instr_Assignment';

Line 1121: l_result IBY_FNDCPT_COMMON_PUB.Result_rec_type;

1117: l_payer_id iby_external_payers_all.ext_payer_id%TYPE;
1118: l_payer_attribs PayerAttributes_rec_type;
1119: l_prev_msg_count NUMBER;
1120:
1121: l_result IBY_FNDCPT_COMMON_PUB.Result_rec_type;
1122:
1123: l_assign_id NUMBER;
1124: l_instr_id NUMBER;
1125: l_priority NUMBER;

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

1221: OPEN c_bnkacct_owner(p_payer.Party_Id, p_assignment_attribs.Instrument.Instrument_Id);
1222: FETCH c_bnkacct_owner INTO l_bnkacct_owner_cnt;
1223:
1224: IF (l_bnkacct_owner_cnt <= 0) THEN
1225: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
1226: RETURN;
1227: END IF;
1228: END IF;
1229:

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

1232:
1233: iby_debug_pub.add('l_payer_id = '|| l_payer_id,iby_debug_pub.G_LEVEL_PROCEDURE,l_dbg_mod);
1234:
1235:
1236: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN
1237: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
1238: --
1239: -- CHANGE?: does PL/SQL do logical short circuiting? If not then
1240: -- change the condition evaluations as the exists_instrument

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

1233: iby_debug_pub.add('l_payer_id = '|| l_payer_id,iby_debug_pub.G_LEVEL_PROCEDURE,l_dbg_mod);
1234:
1235:
1236: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN
1237: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
1238: --
1239: -- CHANGE?: does PL/SQL do logical short circuiting? If not then
1240: -- change the condition evaluations as the exists_instrument
1241: -- function is relatively expensive

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

1259: l_payer_attribs,
1260: l_payer_id,
1261: l_result
1262: );
1263: IF (l_result.Result_Code <> IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS) THEN
1264: x_response := l_result;
1265: RETURN;
1266: END IF;
1267: END IF;

Line 1315: iby_fndcpt_common_pub.Prepare_Result

1311: iby_debug_pub.add('l_instrtype = '|| l_instrtype,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
1312: -- assignment id passed is non-NULL but no instruments found
1313: IF ((x_assign_id IS NULL) AND (NOT l_assign_id IS NULL)) THEN
1314: x_response.Result_Code := G_RC_INVALID_INSTR_ASSIGN;
1315: iby_fndcpt_common_pub.Prepare_Result
1316: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
1317: RETURN;
1318: END IF;
1319:

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

1441: x_msg_data => x_msg_data
1442: );
1443: END IF;
1444:
1445: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
1446: END IF;
1447:
1448: IF FND_API.To_Boolean(p_commit) THEN
1449: COMMIT;

Line 1452: iby_fndcpt_common_pub.Prepare_Result

1448: IF FND_API.To_Boolean(p_commit) THEN
1449: COMMIT;
1450: END IF;
1451:
1452: iby_fndcpt_common_pub.Prepare_Result
1453: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
1454:
1455: iby_debug_pub.add('Exit',iby_debug_pub.G_LEVEL_PROCEDURE,l_dbg_mod);
1456: EXCEPTION

Line 1482: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);

1478: iby_debug_pub.add(debug_msg => 'In OTHERS Exception',
1479: debug_level => FND_LOG.LEVEL_UNEXPECTED,
1480: module => G_DEBUG_MODULE || l_module);
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));

Line 1502: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,

1498: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1499: x_return_status OUT NOCOPY VARCHAR2,
1500: x_msg_count OUT NOCOPY NUMBER,
1501: x_msg_data OUT NOCOPY VARCHAR2,
1502: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
1503: x_assignments OUT NOCOPY PmtInstrAssignment_tbl_type,
1504: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
1505: )
1506: IS

Line 1504: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

1500: x_msg_count OUT NOCOPY NUMBER,
1501: x_msg_data OUT NOCOPY VARCHAR2,
1502: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
1503: x_assignments OUT NOCOPY PmtInstrAssignment_tbl_type,
1504: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
1505: )
1506: IS
1507: l_api_version CONSTANT NUMBER := 1.0;
1508: l_module CONSTANT VARCHAR2(30) := 'Get_Payer_Instr_Assignments';

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

1547:
1548: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
1549: l_payer_level,l_payer_id,l_payer_attribs);
1550:
1551: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN
1552: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
1553: ELSE
1554: l_assign_count := 0;
1555: FOR assign_rec IN c_instr_assignments(l_payer_id) LOOP

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

1548: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
1549: l_payer_level,l_payer_id,l_payer_attribs);
1550:
1551: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN
1552: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
1553: ELSE
1554: l_assign_count := 0;
1555: FOR assign_rec IN c_instr_assignments(l_payer_id) LOOP
1556: l_assign_count := l_assign_count + 1;

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

1565: x_assignments(l_assign_count).Start_Date := assign_rec.start_date;
1566: x_assignments(l_assign_count).End_Date := assign_rec.end_date;
1567: END LOOP;
1568:
1569: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
1570:
1571: END IF;
1572:
1573: iby_fndcpt_common_pub.Prepare_Result

Line 1573: iby_fndcpt_common_pub.Prepare_Result

1569: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
1570:
1571: END IF;
1572:
1573: iby_fndcpt_common_pub.Prepare_Result
1574: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
1575:
1576: EXCEPTION
1577:

Line 1602: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);

1598: iby_debug_pub.add(debug_msg => 'In OTHERS Exception',
1599: debug_level => FND_LOG.LEVEL_UNEXPECTED,
1600: module => G_DEBUG_MODULE || l_module);
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));

Line 1624: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

1620: x_msg_count OUT NOCOPY NUMBER,
1621: x_msg_data OUT NOCOPY VARCHAR2,
1622: p_party_id IN NUMBER,
1623: x_instruments OUT NOCOPY PmtInstrument_tbl_type,
1624: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
1625: )
1626: IS
1627: l_api_version CONSTANT NUMBER := 1.0;
1628: l_module CONSTANT VARCHAR2(30) := 'Get_Payer_All_Assignments';

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

1672: x_instruments(l_instr_count).Instrument_Id :=
1673: assign_rec.instrument_id;
1674: END LOOP;
1675:
1676: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
1677:
1678: iby_fndcpt_common_pub.Prepare_Result
1679: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
1680:

Line 1678: iby_fndcpt_common_pub.Prepare_Result

1674: END LOOP;
1675:
1676: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
1677:
1678: iby_fndcpt_common_pub.Prepare_Result
1679: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
1680:
1681: EXCEPTION
1682:

Line 1707: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);

1703: iby_debug_pub.add(debug_msg => 'In OTHERS Exception',
1704: debug_level => FND_LOG.LEVEL_UNEXPECTED,
1705: module => G_DEBUG_MODULE || l_module);
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));

Line 1734: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,

1730: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1731: x_return_status OUT NOCOPY VARCHAR2,
1732: x_msg_count OUT NOCOPY NUMBER,
1733: x_msg_data OUT NOCOPY VARCHAR2,
1734: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
1735: p_payer_equivalency IN VARCHAR2 :=
1736: IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,
1737: p_conditions IN IBY_FNDCPT_COMMON_PUB.TrxnContext_rec_type,
1738: p_result_limit IN IBY_FNDCPT_COMMON_PUB.ResultLimit_rec_type,

Line 1736: IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,

1732: x_msg_count OUT NOCOPY NUMBER,
1733: x_msg_data OUT NOCOPY VARCHAR2,
1734: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
1735: p_payer_equivalency IN VARCHAR2 :=
1736: IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,
1737: p_conditions IN IBY_FNDCPT_COMMON_PUB.TrxnContext_rec_type,
1738: p_result_limit IN IBY_FNDCPT_COMMON_PUB.ResultLimit_rec_type,
1739: x_assignments OUT NOCOPY PmtInstrAssignment_tbl_type,
1740: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

Line 1737: p_conditions IN IBY_FNDCPT_COMMON_PUB.TrxnContext_rec_type,

1733: x_msg_data OUT NOCOPY VARCHAR2,
1734: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
1735: p_payer_equivalency IN VARCHAR2 :=
1736: IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,
1737: p_conditions IN IBY_FNDCPT_COMMON_PUB.TrxnContext_rec_type,
1738: p_result_limit IN IBY_FNDCPT_COMMON_PUB.ResultLimit_rec_type,
1739: x_assignments OUT NOCOPY PmtInstrAssignment_tbl_type,
1740: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
1741: )

Line 1738: p_result_limit IN IBY_FNDCPT_COMMON_PUB.ResultLimit_rec_type,

1734: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
1735: p_payer_equivalency IN VARCHAR2 :=
1736: IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,
1737: p_conditions IN IBY_FNDCPT_COMMON_PUB.TrxnContext_rec_type,
1738: p_result_limit IN IBY_FNDCPT_COMMON_PUB.ResultLimit_rec_type,
1739: x_assignments OUT NOCOPY PmtInstrAssignment_tbl_type,
1740: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
1741: )
1742: IS

Line 1740: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

1736: IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,
1737: p_conditions IN IBY_FNDCPT_COMMON_PUB.TrxnContext_rec_type,
1738: p_result_limit IN IBY_FNDCPT_COMMON_PUB.ResultLimit_rec_type,
1739: x_assignments OUT NOCOPY PmtInstrAssignment_tbl_type,
1740: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
1741: )
1742: IS
1743: l_api_version CONSTANT NUMBER := 1.0;
1744: l_module CONSTANT VARCHAR2(30) := 'Get_Trxn_Appl_Instr_Assign';

Line 1754: (ci_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,

1750:
1751: l_assign_count NUMBER;
1752:
1753: CURSOR c_instr_assigns
1754: (ci_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
1755: ci_payer_level IN VARCHAR2,
1756: ci_payer_equiv IN VARCHAR2,
1757: ci_instrument_type IN VARCHAR2)
1758: IS

Line 1792: (IBY_FNDCPT_COMMON_PUB.COMPARE_PAYER (ci_payer.org_type, ci_payer.org_id,

1788: AND (payer.PAYMENT_FUNCTION = ci_payer.Payment_Function)
1789: AND (payer.PARTY_ID = ci_payer.Party_Id )
1790: AND inst.EXT_PMT_PARTY_ID = payer.ext_payer_id
1791: and
1792: (IBY_FNDCPT_COMMON_PUB.COMPARE_PAYER (ci_payer.org_type, ci_payer.org_id,
1793: ci_payer.Cust_Account_Id, ci_payer.Account_Site_Id,
1794: ci_payer_level,ci_payer_equiv ,payer.ORG_TYPE,payer.ORG_ID,
1795: payer.CUST_ACCOUNT_ID, payer.ACCT_SITE_USE_ID) = 'T')
1796: ) X,

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

1838:
1839: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
1840: l_payer_level,l_payer_id,l_payer_attribs);
1841:
1842: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN
1843: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
1844: ELSE
1845: l_assign_count := 1;
1846: FOR assign_rec IN c_instr_assigns(p_payer,l_payer_level,p_payer_equivalency,p_conditions.payment_instrtype)

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

1839: Get_Payer_Id(p_payer,FND_API.G_VALID_LEVEL_FULL,
1840: l_payer_level,l_payer_id,l_payer_attribs);
1841:
1842: IF (l_payer_level = IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER) THEN
1843: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_INVALID_PAYER;
1844: ELSE
1845: l_assign_count := 1;
1846: FOR assign_rec IN c_instr_assigns(p_payer,l_payer_level,p_payer_equivalency,p_conditions.payment_instrtype)
1847: LOOP

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

1855:
1856: EXIT WHEN p_result_limit.default_flag='Y';
1857: END LOOP;
1858:
1859: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
1860: END IF;
1861:
1862: iby_fndcpt_common_pub.Prepare_Result
1863: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);

Line 1862: iby_fndcpt_common_pub.Prepare_Result

1858:
1859: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
1860: END IF;
1861:
1862: iby_fndcpt_common_pub.Prepare_Result
1863: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
1864:
1865: EXCEPTION
1866:

Line 1891: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);

1887: iby_debug_pub.add(debug_msg => 'In OTHERS Exception',
1888: debug_level => FND_LOG.LEVEL_UNEXPECTED,
1889: module => G_DEBUG_MODULE || l_module);
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));

Line 1970: x_response IBY_FNDCPT_COMMON_PUB.Result_rec_type;

1966: x_instr_id OUT NOCOPY iby_creditcard.instrid%TYPE
1967: )
1968: IS
1969: -- create a record type and populate it
1970: x_response IBY_FNDCPT_COMMON_PUB.Result_rec_type;
1971: x_card_instrument CreditCard_rec_type;
1972: x_msg_count NUMBER;
1973: x_msg_data VARCHAR2(3000);
1974: Begin

Line 2053: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

2049: x_msg_count OUT NOCOPY NUMBER,
2050: x_msg_data OUT NOCOPY VARCHAR2,
2051: p_card_instrument IN CreditCard_rec_type,
2052: x_card_id OUT NOCOPY NUMBER,
2053: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
2054: )
2055: IS
2056:
2057: l_api_version CONSTANT NUMBER := 1.0;

Line 2062: lx_result IBY_FNDCPT_COMMON_PUB.Result_rec_type;

2058: l_module CONSTANT VARCHAR2(30) := 'Create_Card';
2059: l_prev_msg_count NUMBER;
2060:
2061: lx_result_code VARCHAR2(30);
2062: lx_result IBY_FNDCPT_COMMON_PUB.Result_rec_type;
2063: lx_card_rec CreditCard_rec_type;
2064:
2065: l_info_only iby_creditcard.information_only_flag%TYPE := NULL;
2066: l_sec_mode iby_sys_security_options.cc_encryption_mode%TYPE;

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

2111: p_card_instrument.Owner_Id,
2112: p_card_instrument.Card_Number,
2113: lx_card_rec,
2114: lx_result,
2115: NVL(p_card_instrument.Instrument_Type,IBY_FNDCPT_COMMON_PUB.G_INSTR_TYPE_CREDITCARD)
2116: );
2117:
2118: iby_debug_pub.add('fetched card id:='||lx_card_rec.Card_Id,
2119: iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);

Line 2129: iby_fndcpt_common_pub.Prepare_Result

2125:
2126: -- validate billing address information
2127: IF (NOT Validate_CC_Billing(FND_API.G_FALSE,p_card_instrument)) THEN
2128: x_response.Result_Code := iby_creditcard_pkg.G_RC_INVALID_ADDRESS;
2129: iby_fndcpt_common_pub.Prepare_Result
2130: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
2131: RETURN;
2132: END IF;
2133:

Line 2155: iby_fndcpt_common_pub.Prepare_Result

2151: p_card_instrument.Owner_Id);
2152: IF (l_billing_site IS NULL) THEN
2153: x_response.Result_Code := IBY_CREDITCARD_PKG.G_RC_INVALID_ADDRESS;
2154: iby_debug_pub.add('Invalid Billing site.',iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
2155: iby_fndcpt_common_pub.Prepare_Result
2156: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
2157: RETURN;
2158: END IF;
2159: END IF;

Line 2173: iby_fndcpt_common_pub.Prepare_Result

2169: IF (NOT iby_utility_pvt.Validate_Territory(p_card_instrument.Billing_Address_Territory)) THEN
2170: x_response.Result_Code := IBY_CREDITCARD_PKG.G_RC_INVALID_ADDRESS;
2171: iby_debug_pub.add('Invalid Territory '|| p_card_instrument.Billing_Address_Territory,
2172: iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
2173: iby_fndcpt_common_pub.Prepare_Result
2174: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
2175: RETURN;
2176: END IF;
2177: END IF;

Line 2184: iby_fndcpt_common_pub.Prepare_Result

2180: IF (NOT iby_utility_pvt.validate_party_id(p_card_instrument.Owner_Id)) THEN
2181: x_response.Result_Code := IBY_CREDITCARD_PKG.G_RC_INVALID_PARTY;
2182: iby_debug_pub.add('Invalid Owner party '||p_card_instrument.Owner_Id,
2183: iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
2184: iby_fndcpt_common_pub.Prepare_Result
2185: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
2186: RETURN;
2187: END IF;
2188: END IF;

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

2200: l_cc_reg.FIName := p_card_instrument.FI_Name;
2201: l_cc_reg.CC_Type := p_card_instrument.Card_Issuer;
2202: l_cc_reg.CC_Num := p_card_instrument.Card_Number;
2203: l_cc_reg.CC_ExpDate := p_card_instrument.Expiration_Date;
2204: l_cc_reg.Instrument_Type := NVL(p_card_instrument.Instrument_Type,IBY_FNDCPT_COMMON_PUB.G_INSTR_TYPE_CREDITCARD);
2205: l_cc_reg.Owner_Id := p_card_instrument.Owner_Id;
2206: l_cc_reg.CC_HolderName := p_card_instrument.Card_Holder_Name;
2207: l_cc_reg.CC_Desc := p_card_instrument.Card_Description;
2208: l_cc_reg.Billing_Address_Id := l_billing_site;

Line 2246: --IBY_FNDCPT_COMMON_PUB.G_RC_GENERIC_SYS_ERROR;

2242: iby_debug_pub.add('result code:=' || lx_result.Result_Code,
2243: iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
2244: IF (lx_result.Result_Code IS NULL) THEN
2245: x_response.Result_Code := 'COMMUNICATION_ERROR';
2246: --IBY_FNDCPT_COMMON_PUB.G_RC_GENERIC_SYS_ERROR;
2247: iby_fndcpt_common_pub.Prepare_Result
2248: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,
2249: x_response);
2250: ELSE

Line 2247: iby_fndcpt_common_pub.Prepare_Result

2243: iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
2244: IF (lx_result.Result_Code IS NULL) THEN
2245: x_response.Result_Code := 'COMMUNICATION_ERROR';
2246: --IBY_FNDCPT_COMMON_PUB.G_RC_GENERIC_SYS_ERROR;
2247: iby_fndcpt_common_pub.Prepare_Result
2248: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,
2249: x_response);
2250: ELSE
2251: x_response.Result_Code := lx_result.Result_Code;

Line 2253: iby_fndcpt_common_pub.Prepare_Result

2249: x_response);
2250: ELSE
2251: x_response.Result_Code := lx_result.Result_Code;
2252:
2253: iby_fndcpt_common_pub.Prepare_Result
2254: (IBY_INSTRREG_PUB.G_INTERFACE_CODE,lx_result.Result_Message,
2255: l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,
2256: x_response);
2257: END IF;

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

2268: p_card_instrument.Address_Type,
2269: p_card_instrument.Billing_Postal_Code,
2270: p_card_instrument.Billing_Address_Territory,
2271: p_card_instrument.Card_Number, p_card_instrument.Expiration_Date,
2272: NVL(p_card_instrument.Instrument_Type,IBY_FNDCPT_COMMON_PUB.G_INSTR_TYPE_CREDITCARD),
2273: p_card_instrument.PurchaseCard_Flag,
2274: p_card_instrument.PurchaseCard_SubType, p_card_instrument.Card_Issuer,
2275: p_card_instrument.FI_Name, p_card_instrument.Single_Use_Flag,
2276: p_card_instrument.Info_Only_Flag, p_card_instrument.Card_Purpose,

Line 2327: iby_fndcpt_common_pub.Prepare_Result

2323:
2324: -- validate billing address information
2325: IF (NOT Validate_CC_Billing(FND_API.G_TRUE,p_card_instrument)) THEN
2326: x_response.Result_Code := iby_creditcard_pkg.G_RC_INVALID_ADDRESS;
2327: iby_fndcpt_common_pub.Prepare_Result
2328: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
2329: RETURN;
2330: END IF;
2331: -- validate expiration date

Line 2335: iby_fndcpt_common_pub.Prepare_Result

2331: -- validate expiration date
2332: IF (TRUNC(p_card_instrument.Expiration_Date,'DD') < TRUNC(SYSDATE,'DD'))
2333: THEN
2334: x_response.Result_Code := iby_creditcard_pkg.G_RC_INVALID_CCEXPIRY;
2335: iby_fndcpt_common_pub.Prepare_Result
2336: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
2337: RETURN;
2338: END IF;
2339:

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

2370: null,null);
2371: x_card_id := lx_card_rec.Card_Id;
2372: END IF;
2373:
2374: x_response.Result_Code := NVL(lx_result_code,IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS);
2375: iby_fndcpt_common_pub.Prepare_Result
2376: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
2377:
2378: IF FND_API.To_Boolean(p_commit) THEN

Line 2375: iby_fndcpt_common_pub.Prepare_Result

2371: x_card_id := lx_card_rec.Card_Id;
2372: END IF;
2373:
2374: x_response.Result_Code := NVL(lx_result_code,IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS);
2375: iby_fndcpt_common_pub.Prepare_Result
2376: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
2377:
2378: IF FND_API.To_Boolean(p_commit) THEN
2379: COMMIT;

Line 2408: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);

2404: iby_debug_pub.add(debug_msg => 'In OTHERS Exception'||SQLERRM,
2405: debug_level => FND_LOG.LEVEL_UNEXPECTED,
2406: module => G_DEBUG_MODULE || l_module);
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));

Line 2485: x_response IBY_FNDCPT_COMMON_PUB.Result_rec_type;

2481: x_return_status OUT NOCOPY VARCHAR2
2482: )
2483: IS
2484: -- create a record type and populate it
2485: x_response IBY_FNDCPT_COMMON_PUB.Result_rec_type;
2486: x_card_instrument CreditCard_rec_type;
2487: x_msg_count NUMBER;
2488: x_msg_data VARCHAR2(3000);
2489: Begin

Line 2564: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

2560: x_return_status OUT NOCOPY VARCHAR2,
2561: x_msg_count OUT NOCOPY NUMBER,
2562: x_msg_data OUT NOCOPY VARCHAR2,
2563: p_card_instrument IN CreditCard_rec_type,
2564: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
2565: )
2566: IS
2567:
2568: l_api_version CONSTANT NUMBER := 1.0;

Line 2604: iby_fndcpt_common_pub.Prepare_Result

2600: END IF;
2601: -- validate billing address information
2602: IF (NOT Validate_CC_Billing(FND_API.G_TRUE,p_card_instrument)) THEN
2603: x_response.Result_Code := iby_creditcard_pkg.G_RC_INVALID_ADDRESS;
2604: iby_fndcpt_common_pub.Prepare_Result
2605: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
2606: RETURN;
2607: END IF;
2608:

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

2639: p_card_instrument.Register_Invalid_Card,
2640: p_card_instrument.Card_Issuer);
2641:
2642: x_response.Result_Code :=
2643: NVL(lx_result_code,IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS);
2644: iby_fndcpt_common_pub.Prepare_Result
2645: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
2646:
2647: IF FND_API.To_Boolean(p_commit) THEN

Line 2644: iby_fndcpt_common_pub.Prepare_Result

2640: p_card_instrument.Card_Issuer);
2641:
2642: x_response.Result_Code :=
2643: NVL(lx_result_code,IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS);
2644: iby_fndcpt_common_pub.Prepare_Result
2645: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
2646:
2647: IF FND_API.To_Boolean(p_commit) THEN
2648: COMMIT;

Line 2677: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);

2673: iby_debug_pub.add(debug_msg => 'In OTHERS Exception',
2674: debug_level => FND_LOG.LEVEL_UNEXPECTED,
2675: module => G_DEBUG_MODULE || l_module);
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));

Line 2706: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

2702: x_msg_count OUT NOCOPY NUMBER,
2703: x_msg_data OUT NOCOPY VARCHAR2,
2704: p_card_id NUMBER,
2705: x_card_instrument OUT NOCOPY CreditCard_rec_type,
2706: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
2707: )
2708: IS
2709: l_api_version CONSTANT NUMBER := 1.0;
2710: l_module CONSTANT VARCHAR2(30) := 'Get_Card';

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

2755:
2756: IF (c_card%NOTFOUND) THEN
2757: x_response.Result_Code := G_RC_INVALID_INSTRUMENT;
2758: ELSE
2759: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
2760: x_card_instrument.Card_Id := p_card_id;
2761: END IF;
2762:
2763: iby_fndcpt_common_pub.Prepare_Result

Line 2763: iby_fndcpt_common_pub.Prepare_Result

2759: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
2760: x_card_instrument.Card_Id := p_card_id;
2761: END IF;
2762:
2763: iby_fndcpt_common_pub.Prepare_Result
2764: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
2765:
2766: EXCEPTION
2767:

Line 2792: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);

2788: iby_debug_pub.add(debug_msg => 'In OTHERS Exception',
2789: debug_level => FND_LOG.LEVEL_UNEXPECTED,
2790: module => G_DEBUG_MODULE || l_module);
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));

Line 2821: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type,

2817: x_msg_data OUT NOCOPY VARCHAR2,
2818: p_owner_id NUMBER,
2819: p_card_number VARCHAR2,
2820: x_card_instrument OUT NOCOPY CreditCard_rec_type,
2821: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type,
2822: p_card_instr_type VARCHAR2 DEFAULT NULL
2823: )
2824: IS
2825: l_api_version CONSTANT NUMBER := 1.0;

Line 2837: lx_result IBY_FNDCPT_COMMON_PUB.Result_rec_type;

2833: lx_return_status VARCHAR2(1);
2834: lx_msg_count NUMBER;
2835: lx_msg_data VARCHAR2(200);
2836: lx_cc_number iby_creditcard.ccnumber%TYPE;
2837: lx_result IBY_FNDCPT_COMMON_PUB.Result_rec_type;
2838:
2839: CURSOR c_card
2840: (ci_cc_hash1 IN iby_creditcard.cc_number_hash1%TYPE,
2841: ci_cc_hash2 IN iby_creditcard.cc_number_hash2%TYPE,

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

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:
2879: iby_cc_validate.StripCC

Line 2886: iby_fndcpt_common_pub.Prepare_Result

2882: );
2883:
2884: IF (lx_cc_number IS NULL) THEN
2885: x_response.Result_Code := iby_creditcard_pkg.G_RC_INVALID_CCNUMBER;
2886: iby_fndcpt_common_pub.Prepare_Result
2887: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
2888: RETURN;
2889: END IF;
2890:

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

2908: l_card_id,
2909: x_card_instrument,
2910: lx_result
2911: );
2912: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
2913: END IF;
2914: iby_fndcpt_common_pub.Prepare_Result
2915: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
2916:

Line 2914: iby_fndcpt_common_pub.Prepare_Result

2910: lx_result
2911: );
2912: x_response.Result_Code := IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS;
2913: END IF;
2914: iby_fndcpt_common_pub.Prepare_Result
2915: (l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
2916:
2917: EXCEPTION
2918:

Line 2943: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);

2939: iby_debug_pub.add(debug_msg => 'In OTHERS Exception',
2940: debug_level => FND_LOG.LEVEL_UNEXPECTED,
2941: module => G_DEBUG_MODULE || l_module);
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));

Line 2970: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,

2966: p_commit IN VARCHAR2 := FND_API.G_TRUE,
2967: x_return_status OUT NOCOPY VARCHAR2,
2968: x_msg_count OUT NOCOPY NUMBER,
2969: x_msg_data OUT NOCOPY VARCHAR2,
2970: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
2971: p_credit_card IN CreditCard_rec_type,
2972: p_assignment_attribs IN PmtInstrAssignment_rec_type,
2973: x_assign_id OUT NOCOPY NUMBER,
2974: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

Line 2974: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type

2970: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
2971: p_credit_card IN CreditCard_rec_type,
2972: p_assignment_attribs IN PmtInstrAssignment_rec_type,
2973: x_assign_id OUT NOCOPY NUMBER,
2974: x_response OUT NOCOPY IBY_FNDCPT_COMMON_PUB.Result_rec_type
2975: )
2976: IS
2977: l_api_version CONSTANT NUMBER := 1.0;
2978: l_module CONSTANT VARCHAR2(30) := 'Process_Credit_Card';

Line 2986: lx_response IBY_FNDCPT_COMMON_PUB.Result_rec_type;

2982: lx_return_status VARCHAR2(1);
2983: lx_msg_count NUMBER;
2984: lx_msg_data VARCHAR2(2000);
2985:
2986: lx_response IBY_FNDCPT_COMMON_PUB.Result_rec_type;
2987: lx_assign_attribs PmtInstrAssignment_rec_type;
2988:
2989: l_dbg_mod VARCHAR2(100) := G_DEBUG_MODULE || '.' || l_module;
2990: BEGIN

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

3022: lx_assign_attribs.Instrument.Instrument_Id,
3023: lx_response
3024: );
3025:
3026: IF (lx_response.Result_Code <> IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS) THEN
3027: iby_debug_pub.add('rollback',iby_debug_pub.G_LEVEL_ERROR,l_dbg_mod);
3028: ROLLBACK TO Process_Credit_Card;
3029: x_response := lx_response;
3030: ELSE

Line 3033: IBY_FNDCPT_COMMON_PUB.G_INSTR_TYPE_CREDITCARD;

3029: x_response := lx_response;
3030: ELSE
3031:
3032: lx_assign_attribs.Instrument.Instrument_Type :=
3033: IBY_FNDCPT_COMMON_PUB.G_INSTR_TYPE_CREDITCARD;
3034: Set_Payer_Instr_Assignment
3035: (1.0, FND_API.G_FALSE, FND_API.G_FALSE, x_return_status, x_msg_count,
3036: x_msg_data, p_payer, lx_assign_attribs, x_assign_id,
3037: x_response

Line 3041: iby_fndcpt_common_pub.Prepare_Result

3037: x_response
3038: );
3039: END IF;
3040:
3041: iby_fndcpt_common_pub.Prepare_Result
3042: (iby_fndcpt_common_pub.G_INTERFACE_CODE,x_response.Result_Message,
3043: l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
3044:
3045: IF FND_API.To_Boolean(p_commit) THEN

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

3038: );
3039: END IF;
3040:
3041: iby_fndcpt_common_pub.Prepare_Result
3042: (iby_fndcpt_common_pub.G_INTERFACE_CODE,x_response.Result_Message,
3043: l_prev_msg_count,x_return_status,x_msg_count,x_msg_data,x_response);
3044:
3045: IF FND_API.To_Boolean(p_commit) THEN
3046: COMMIT;

Line 3075: iby_fndcpt_common_pub.Clear_Msg_Stack(l_prev_msg_count);

3071: iby_debug_pub.add(debug_msg => 'In OTHERS Exception',
3072: debug_level => FND_LOG.LEVEL_UNEXPECTED,
3073: module => G_DEBUG_MODULE || l_module);
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));

Line 3119: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,

3115: END Get_Hash;
3116:
3117: PROCEDURE Get_Trxn_Payer_Attributes
3118: (
3119: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
3120: p_payer_equivalency IN VARCHAR2
3121: := IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,
3122: x_payer_attributes OUT NOCOPY PayerAttributes_rec_type
3123: )

Line 3121: := IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,

3117: PROCEDURE Get_Trxn_Payer_Attributes
3118: (
3119: p_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
3120: p_payer_equivalency IN VARCHAR2
3121: := IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,
3122: x_payer_attributes OUT NOCOPY PayerAttributes_rec_type
3123: )
3124: IS
3125:

Line 3131: ci_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,

3127: l_payer_id iby_external_payers_all.ext_payer_id%TYPE;
3128: l_payer_attribs IBY_FNDCPT_SETUP_PUB.PayerAttributes_rec_type;
3129:
3130: CURSOR l_payer_attr_cur (
3131: ci_payer IN IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type,
3132: ci_payer_level IN VARCHAR2,
3133: ci_payer_equiv IN VARCHAR2
3134: )
3135: IS

Line 3139: AND IBY_FNDCPT_COMMON_PUB.Compare_Payer

3135: IS
3136: SELECT bank_charge_bearer_code, dirdeb_instruction_code
3137: FROM iby_external_payers_all p
3138: WHERE p.party_id = ci_payer.Party_Id
3139: AND IBY_FNDCPT_COMMON_PUB.Compare_Payer
3140: (ci_payer.org_type, ci_payer.org_id,
3141: ci_payer.Cust_Account_Id, ci_payer.Account_Site_Id,
3142: ci_payer_level,ci_payer_equiv,p.org_type,p.org_id,
3143: p.cust_account_id,p.acct_site_use_id) = 'T'