[Home] [Help]
49: --R12 CC Encryption
50: l_result_limit IBY_FNDCPT_COMMON_PUB.ResultLimit_rec_type;
51: l_conditions IBY_FNDCPT_COMMON_PUB.TrxnContext_rec_type;
52: l_payer IBY_FNDCPT_COMMON_PUB.PayerContext_rec_type;
53: l_assignments IBY_FNDCPT_SETUP_PUB.PmtInstrAssignment_tbl_type;
54: L_response_code IBY_FNDCPT_COMMON_PUB.Result_rec_type;
55: L_return_status VARCHAR2(30);
56: L_msg_count NUMBER;
57: L_msg_data VARCHAR2(2000);
59: l_org_type VARCHAR2(40) := 'OPERATING_UNIT';
60: l_party_id NUMBER;
61: l_cust_account_id NUMBER;
62: l_trans_curr_code VARCHAR2(20); --Verify
63: l_card_instrument IBY_FNDCPT_SETUP_PUB.CreditCard_rec_Type;
64:
65: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
66:
67: BEGIN
185:
186: --payer equivalency value of g_payer_equiv_upward means to retrieve from
187: --if out found at the current transaction level higher level,
188: --site -> customer -> party level
189: IBY_FNDCPT_SETUP_PUB.Get_Trxn_Appl_Instr_Assign
190: (p_api_version => 1.0,
191: X_return_status => l_return_status,
192: X_msg_count => l_msg_count,
193: X_msg_data => l_msg_data,
220: END IF;
221: END IF;
222:
223: IF l_debug_level > 0 THEN
224: oe_debug_pub.add('Calling IBY_FNDCPT_SETUP_PUB.Get_Card.',3);
225: END IF;
226:
227:
228: IBY_FNDCPT_SETUP_PUB.Get_Card
224: oe_debug_pub.add('Calling IBY_FNDCPT_SETUP_PUB.Get_Card.',3);
225: END IF;
226:
227:
228: IBY_FNDCPT_SETUP_PUB.Get_Card
229: (p_api_version => 1.0,
230: X_return_status => l_return_status,
231: X_msg_count => l_msg_count,
232: X_msg_data => l_msg_data,
234: X_card_instrument => l_card_instrument,
235: X_response => l_response_code);
236:
237: IF l_debug_level > 0 THEN
238: oe_debug_pub.add('Return status after IBY_FNDCPT_SETUP_PUB.Get_Card.'||l_return_status, 3);
239: END IF;
240:
241: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
242: IF l_debug_level > 0 THEN