83: Begin
84:
85: SAVEPOINT CREATE_IBY_PAYMENT_INT;
86:
87: aso_debug_pub.g_debug_flag := nvl(fnd_profile.value('ASO_ENABLE_DEBUG'),'N');
88:
89: IF aso_debug_pub.g_debug_flag = 'Y' THEN
90: aso_debug_pub.add('Begin create_iby_payment ', 1, 'Y');
91: END IF;
85: SAVEPOINT CREATE_IBY_PAYMENT_INT;
86:
87: aso_debug_pub.g_debug_flag := nvl(fnd_profile.value('ASO_ENABLE_DEBUG'),'N');
88:
89: IF aso_debug_pub.g_debug_flag = 'Y' THEN
90: aso_debug_pub.add('Begin create_iby_payment ', 1, 'Y');
91: END IF;
92:
93: x_return_status := FND_API.G_RET_STS_SUCCESS;
86:
87: aso_debug_pub.g_debug_flag := nvl(fnd_profile.value('ASO_ENABLE_DEBUG'),'N');
88:
89: IF aso_debug_pub.g_debug_flag = 'Y' THEN
90: aso_debug_pub.add('Begin create_iby_payment ', 1, 'Y');
91: END IF;
92:
93: x_return_status := FND_API.G_RET_STS_SUCCESS;
94:
107: and
108: l_payment_rec.payment_ref_number is not null and
109: l_payment_rec.payment_ref_number <> fnd_api.g_miss_char then
110:
111: IF aso_debug_pub.g_debug_flag = 'Y' THEN
112: aso_debug_pub.add('Inside if for payment type credit card', 1, 'Y');
113: END IF;
114:
115: If (l_payment_rec.instr_assignment_id is null or l_payment_rec.instr_assignment_id = fnd_api.g_miss_num ) then
108: l_payment_rec.payment_ref_number is not null and
109: l_payment_rec.payment_ref_number <> fnd_api.g_miss_char then
110:
111: IF aso_debug_pub.g_debug_flag = 'Y' THEN
112: aso_debug_pub.add('Inside if for payment type credit card', 1, 'Y');
113: END IF;
114:
115: If (l_payment_rec.instr_assignment_id is null or l_payment_rec.instr_assignment_id = fnd_api.g_miss_num ) then
116:
144: l_assignment_attribs.priority := null;
145: l_assignment_attribs.start_date := sysdate;
146: l_assignment_attribs.end_date := null;
147:
148: IF aso_debug_pub.g_debug_flag = 'Y' THEN
149: aso_debug_pub.add('Before calling IBY_FNDCPT_SETUP_PUB.Process_Credit_Card ', 1, 'Y');
150:
151: /* Code change for PA-DSS ER 8499296 Start
152: aso_debug_pub.add('l_credit_card.card_number: '|| l_credit_card.card_number, 1, 'Y');
145: l_assignment_attribs.start_date := sysdate;
146: l_assignment_attribs.end_date := null;
147:
148: IF aso_debug_pub.g_debug_flag = 'Y' THEN
149: aso_debug_pub.add('Before calling IBY_FNDCPT_SETUP_PUB.Process_Credit_Card ', 1, 'Y');
150:
151: /* Code change for PA-DSS ER 8499296 Start
152: aso_debug_pub.add('l_credit_card.card_number: '|| l_credit_card.card_number, 1, 'Y');
153: aso_debug_pub.add('l_credit_card.expiration_date: '|| l_credit_card.expiration_date, 1, 'Y');
148: IF aso_debug_pub.g_debug_flag = 'Y' THEN
149: aso_debug_pub.add('Before calling IBY_FNDCPT_SETUP_PUB.Process_Credit_Card ', 1, 'Y');
150:
151: /* Code change for PA-DSS ER 8499296 Start
152: aso_debug_pub.add('l_credit_card.card_number: '|| l_credit_card.card_number, 1, 'Y');
153: aso_debug_pub.add('l_credit_card.expiration_date: '|| l_credit_card.expiration_date, 1, 'Y');
154: Code change for PA-DSS ER 8499296 End */
155:
156: aso_debug_pub.add('l_credit_card.card_issuer: '|| l_credit_card.card_issuer, 1, 'Y');
149: aso_debug_pub.add('Before calling IBY_FNDCPT_SETUP_PUB.Process_Credit_Card ', 1, 'Y');
150:
151: /* Code change for PA-DSS ER 8499296 Start
152: aso_debug_pub.add('l_credit_card.card_number: '|| l_credit_card.card_number, 1, 'Y');
153: aso_debug_pub.add('l_credit_card.expiration_date: '|| l_credit_card.expiration_date, 1, 'Y');
154: Code change for PA-DSS ER 8499296 End */
155:
156: aso_debug_pub.add('l_credit_card.card_issuer: '|| l_credit_card.card_issuer, 1, 'Y');
157:
152: aso_debug_pub.add('l_credit_card.card_number: '|| l_credit_card.card_number, 1, 'Y');
153: aso_debug_pub.add('l_credit_card.expiration_date: '|| l_credit_card.expiration_date, 1, 'Y');
154: Code change for PA-DSS ER 8499296 End */
155:
156: aso_debug_pub.add('l_credit_card.card_issuer: '|| l_credit_card.card_issuer, 1, 'Y');
157:
158: /* Code change for PA-DSS ER 8499296 Start
159: aso_debug_pub.add('l_credit_card.card_holder_name:'|| l_credit_card.card_holder_name, 1, 'Y');
160: Code change for PA-DSS ER 8499296 End */
155:
156: aso_debug_pub.add('l_credit_card.card_issuer: '|| l_credit_card.card_issuer, 1, 'Y');
157:
158: /* Code change for PA-DSS ER 8499296 Start
159: aso_debug_pub.add('l_credit_card.card_holder_name:'|| l_credit_card.card_holder_name, 1, 'Y');
160: Code change for PA-DSS ER 8499296 End */
161:
162: aso_debug_pub.add('l_credit_card.owner_id: '|| l_credit_card.owner_id, 1, 'Y');
163: aso_debug_pub.add('p_payer.party_id: '|| p_payer.party_id, 1, 'Y');
158: /* Code change for PA-DSS ER 8499296 Start
159: aso_debug_pub.add('l_credit_card.card_holder_name:'|| l_credit_card.card_holder_name, 1, 'Y');
160: Code change for PA-DSS ER 8499296 End */
161:
162: aso_debug_pub.add('l_credit_card.owner_id: '|| l_credit_card.owner_id, 1, 'Y');
163: aso_debug_pub.add('p_payer.party_id: '|| p_payer.party_id, 1, 'Y');
164: END IF;
165:
166: IBY_FNDCPT_SETUP_PUB.Process_Credit_Card
159: aso_debug_pub.add('l_credit_card.card_holder_name:'|| l_credit_card.card_holder_name, 1, 'Y');
160: Code change for PA-DSS ER 8499296 End */
161:
162: aso_debug_pub.add('l_credit_card.owner_id: '|| l_credit_card.owner_id, 1, 'Y');
163: aso_debug_pub.add('p_payer.party_id: '|| p_payer.party_id, 1, 'Y');
164: END IF;
165:
166: IBY_FNDCPT_SETUP_PUB.Process_Credit_Card
167: (
176: p_assignment_attribs => l_assignment_attribs,
177: x_assign_id => lx_assign_id,
178: x_response => lx_response);
179:
180: IF aso_debug_pub.g_debug_flag = 'Y' THEN
181: aso_debug_pub.add('after calling IBY_FNDCPT_SETUP_PUB.Process_Credit_Card ', 1, 'Y');
182: aso_debug_pub.add('IBY Process_Credit_Card Return Status: '||x_return_status, 1, 'Y');
183: aso_debug_pub.add('IBY Process_Credit_Card x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
184: aso_debug_pub.add('IBY Process_Credit_Card x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
177: x_assign_id => lx_assign_id,
178: x_response => lx_response);
179:
180: IF aso_debug_pub.g_debug_flag = 'Y' THEN
181: aso_debug_pub.add('after calling IBY_FNDCPT_SETUP_PUB.Process_Credit_Card ', 1, 'Y');
182: aso_debug_pub.add('IBY Process_Credit_Card Return Status: '||x_return_status, 1, 'Y');
183: aso_debug_pub.add('IBY Process_Credit_Card x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
184: aso_debug_pub.add('IBY Process_Credit_Card x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
185: aso_debug_pub.add('IBY Process_Credit_Card x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
178: x_response => lx_response);
179:
180: IF aso_debug_pub.g_debug_flag = 'Y' THEN
181: aso_debug_pub.add('after calling IBY_FNDCPT_SETUP_PUB.Process_Credit_Card ', 1, 'Y');
182: aso_debug_pub.add('IBY Process_Credit_Card Return Status: '||x_return_status, 1, 'Y');
183: aso_debug_pub.add('IBY Process_Credit_Card x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
184: aso_debug_pub.add('IBY Process_Credit_Card x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
185: aso_debug_pub.add('IBY Process_Credit_Card x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
186: aso_debug_pub.add('IBY Process_Credit_Card x_assign_id: '|| to_char(lx_assign_id), 1, 'Y');
179:
180: IF aso_debug_pub.g_debug_flag = 'Y' THEN
181: aso_debug_pub.add('after calling IBY_FNDCPT_SETUP_PUB.Process_Credit_Card ', 1, 'Y');
182: aso_debug_pub.add('IBY Process_Credit_Card Return Status: '||x_return_status, 1, 'Y');
183: aso_debug_pub.add('IBY Process_Credit_Card x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
184: aso_debug_pub.add('IBY Process_Credit_Card x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
185: aso_debug_pub.add('IBY Process_Credit_Card x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
186: aso_debug_pub.add('IBY Process_Credit_Card x_assign_id: '|| to_char(lx_assign_id), 1, 'Y');
187: END IF;
180: IF aso_debug_pub.g_debug_flag = 'Y' THEN
181: aso_debug_pub.add('after calling IBY_FNDCPT_SETUP_PUB.Process_Credit_Card ', 1, 'Y');
182: aso_debug_pub.add('IBY Process_Credit_Card Return Status: '||x_return_status, 1, 'Y');
183: aso_debug_pub.add('IBY Process_Credit_Card x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
184: aso_debug_pub.add('IBY Process_Credit_Card x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
185: aso_debug_pub.add('IBY Process_Credit_Card x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
186: aso_debug_pub.add('IBY Process_Credit_Card x_assign_id: '|| to_char(lx_assign_id), 1, 'Y');
187: END IF;
188:
181: aso_debug_pub.add('after calling IBY_FNDCPT_SETUP_PUB.Process_Credit_Card ', 1, 'Y');
182: aso_debug_pub.add('IBY Process_Credit_Card Return Status: '||x_return_status, 1, 'Y');
183: aso_debug_pub.add('IBY Process_Credit_Card x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
184: aso_debug_pub.add('IBY Process_Credit_Card x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
185: aso_debug_pub.add('IBY Process_Credit_Card x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
186: aso_debug_pub.add('IBY Process_Credit_Card x_assign_id: '|| to_char(lx_assign_id), 1, 'Y');
187: END IF;
188:
189: if x_return_status <> fnd_api.g_ret_sts_success then
182: aso_debug_pub.add('IBY Process_Credit_Card Return Status: '||x_return_status, 1, 'Y');
183: aso_debug_pub.add('IBY Process_Credit_Card x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
184: aso_debug_pub.add('IBY Process_Credit_Card x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
185: aso_debug_pub.add('IBY Process_Credit_Card x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
186: aso_debug_pub.add('IBY Process_Credit_Card x_assign_id: '|| to_char(lx_assign_id), 1, 'Y');
187: END IF;
188:
189: if x_return_status <> fnd_api.g_ret_sts_success then
190: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
203:
204: end if;-- for instrument id check
205: end if; -- for payment type check
206:
207: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
208: aso_debug_pub.ADD ('END create_iby_payment',1,'N');
209: END IF;
210:
211: EXCEPTION
204: end if;-- for instrument id check
205: end if; -- for payment type check
206:
207: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
208: aso_debug_pub.ADD ('END create_iby_payment',1,'N');
209: END IF;
210:
211: EXCEPTION
212: WHEN FND_API.G_EXC_ERROR THEN
287: Begin
288:
289: SAVEPOINT CREATE_PAYMENT_ROW_INT;
290:
291: aso_debug_pub.g_debug_flag := nvl(fnd_profile.value('ASO_ENABLE_DEBUG'),'N');
292:
293: IF aso_debug_pub.g_debug_flag = 'Y' THEN
294: aso_debug_pub.add('Begin create_payment_row ', 1, 'Y');
295: END IF;
289: SAVEPOINT CREATE_PAYMENT_ROW_INT;
290:
291: aso_debug_pub.g_debug_flag := nvl(fnd_profile.value('ASO_ENABLE_DEBUG'),'N');
292:
293: IF aso_debug_pub.g_debug_flag = 'Y' THEN
294: aso_debug_pub.add('Begin create_payment_row ', 1, 'Y');
295: END IF;
296:
297: x_return_status := FND_API.G_RET_STS_SUCCESS;
290:
291: aso_debug_pub.g_debug_flag := nvl(fnd_profile.value('ASO_ENABLE_DEBUG'),'N');
292:
293: IF aso_debug_pub.g_debug_flag = 'Y' THEN
294: aso_debug_pub.add('Begin create_payment_row ', 1, 'Y');
295: END IF;
296:
297: x_return_status := FND_API.G_RET_STS_SUCCESS;
298:
295: END IF;
296:
297: x_return_status := FND_API.G_RET_STS_SUCCESS;
298:
299: IF aso_debug_pub.g_debug_flag = 'Y' THEN
300: aso_debug_pub.add('l_payment_rec.Quote_Header_Id: '||l_payment_rec.Quote_Header_Id, 1, 'Y');
301: aso_debug_pub.add('l_payment_rec.Quote_Line_Id: '||l_payment_rec.Quote_Line_Id, 1, 'Y');
302: aso_debug_pub.add('l_payment_rec.payment_type_code: '||l_payment_rec.payment_type_code, 1, 'Y');
303: aso_debug_pub.add('l_payment_rec.instr_assignment_id: '||l_payment_rec.instr_assignment_id, 1, 'Y');
296:
297: x_return_status := FND_API.G_RET_STS_SUCCESS;
298:
299: IF aso_debug_pub.g_debug_flag = 'Y' THEN
300: aso_debug_pub.add('l_payment_rec.Quote_Header_Id: '||l_payment_rec.Quote_Header_Id, 1, 'Y');
301: aso_debug_pub.add('l_payment_rec.Quote_Line_Id: '||l_payment_rec.Quote_Line_Id, 1, 'Y');
302: aso_debug_pub.add('l_payment_rec.payment_type_code: '||l_payment_rec.payment_type_code, 1, 'Y');
303: aso_debug_pub.add('l_payment_rec.instr_assignment_id: '||l_payment_rec.instr_assignment_id, 1, 'Y');
304: END IF;
297: x_return_status := FND_API.G_RET_STS_SUCCESS;
298:
299: IF aso_debug_pub.g_debug_flag = 'Y' THEN
300: aso_debug_pub.add('l_payment_rec.Quote_Header_Id: '||l_payment_rec.Quote_Header_Id, 1, 'Y');
301: aso_debug_pub.add('l_payment_rec.Quote_Line_Id: '||l_payment_rec.Quote_Line_Id, 1, 'Y');
302: aso_debug_pub.add('l_payment_rec.payment_type_code: '||l_payment_rec.payment_type_code, 1, 'Y');
303: aso_debug_pub.add('l_payment_rec.instr_assignment_id: '||l_payment_rec.instr_assignment_id, 1, 'Y');
304: END IF;
305:
298:
299: IF aso_debug_pub.g_debug_flag = 'Y' THEN
300: aso_debug_pub.add('l_payment_rec.Quote_Header_Id: '||l_payment_rec.Quote_Header_Id, 1, 'Y');
301: aso_debug_pub.add('l_payment_rec.Quote_Line_Id: '||l_payment_rec.Quote_Line_Id, 1, 'Y');
302: aso_debug_pub.add('l_payment_rec.payment_type_code: '||l_payment_rec.payment_type_code, 1, 'Y');
303: aso_debug_pub.add('l_payment_rec.instr_assignment_id: '||l_payment_rec.instr_assignment_id, 1, 'Y');
304: END IF;
305:
306: -- Check for duplicate payments see bug 5118000
299: IF aso_debug_pub.g_debug_flag = 'Y' THEN
300: aso_debug_pub.add('l_payment_rec.Quote_Header_Id: '||l_payment_rec.Quote_Header_Id, 1, 'Y');
301: aso_debug_pub.add('l_payment_rec.Quote_Line_Id: '||l_payment_rec.Quote_Line_Id, 1, 'Y');
302: aso_debug_pub.add('l_payment_rec.payment_type_code: '||l_payment_rec.payment_type_code, 1, 'Y');
303: aso_debug_pub.add('l_payment_rec.instr_assignment_id: '||l_payment_rec.instr_assignment_id, 1, 'Y');
304: END IF;
305:
306: -- Check for duplicate payments see bug 5118000
307: IF ( l_payment_rec.Quote_Line_Id IS NOT NULL and l_payment_rec.Quote_Line_Id <> fnd_api.g_miss_num) then
304: END IF;
305:
306: -- Check for duplicate payments see bug 5118000
307: IF ( l_payment_rec.Quote_Line_Id IS NOT NULL and l_payment_rec.Quote_Line_Id <> fnd_api.g_miss_num) then
308: IF aso_debug_pub.g_debug_flag = 'Y' THEN
309: aso_debug_pub.add('Checking for duplicate payment records at line level', 1, 'Y');
310: END IF;
311: open c_get_db_line_payment(l_payment_rec.Quote_Header_Id,l_payment_rec.Quote_Line_Id);
312: fetch c_get_db_line_payment into l_existing_payment_id;
305:
306: -- Check for duplicate payments see bug 5118000
307: IF ( l_payment_rec.Quote_Line_Id IS NOT NULL and l_payment_rec.Quote_Line_Id <> fnd_api.g_miss_num) then
308: IF aso_debug_pub.g_debug_flag = 'Y' THEN
309: aso_debug_pub.add('Checking for duplicate payment records at line level', 1, 'Y');
310: END IF;
311: open c_get_db_line_payment(l_payment_rec.Quote_Header_Id,l_payment_rec.Quote_Line_Id);
312: fetch c_get_db_line_payment into l_existing_payment_id;
313: if c_get_db_line_payment%FOUND THEN
318: RAISE FND_API.G_EXC_ERROR;
319: end if;
320: close c_get_db_line_payment;
321: ELSE
322: IF aso_debug_pub.g_debug_flag = 'Y' THEN
323: aso_debug_pub.add('Checking for duplicate payment records at Header level', 1, 'Y');
324: END IF;
325: open c_get_db_hdr_payment(l_payment_rec.Quote_Header_Id);
326: fetch c_get_db_hdr_payment into l_existing_payment_id;
319: end if;
320: close c_get_db_line_payment;
321: ELSE
322: IF aso_debug_pub.g_debug_flag = 'Y' THEN
323: aso_debug_pub.add('Checking for duplicate payment records at Header level', 1, 'Y');
324: END IF;
325: open c_get_db_hdr_payment(l_payment_rec.Quote_Header_Id);
326: fetch c_get_db_hdr_payment into l_existing_payment_id;
327: if c_get_db_hdr_payment%FOUND THEN
336:
337:
338: l_qte_header_rec := ASO_UTILITY_PVT.Query_Header_Row (l_payment_rec.Quote_Header_Id );
339:
340: IF aso_debug_pub.g_debug_flag = 'Y' THEN
341: aso_debug_pub.add('After querying the header row', 1, 'Y');
342: aso_debug_pub.add('l_qte_header_rec.quote_header_id: ' || l_qte_header_rec.quote_header_id, 1, 'Y');
343: END IF;
344:
337:
338: l_qte_header_rec := ASO_UTILITY_PVT.Query_Header_Row (l_payment_rec.Quote_Header_Id );
339:
340: IF aso_debug_pub.g_debug_flag = 'Y' THEN
341: aso_debug_pub.add('After querying the header row', 1, 'Y');
342: aso_debug_pub.add('l_qte_header_rec.quote_header_id: ' || l_qte_header_rec.quote_header_id, 1, 'Y');
343: END IF;
344:
345: IF ( l_payment_rec.Quote_Line_Id IS NOT NULL and l_payment_rec.Quote_Line_Id <> fnd_api.g_miss_num) then
338: l_qte_header_rec := ASO_UTILITY_PVT.Query_Header_Row (l_payment_rec.Quote_Header_Id );
339:
340: IF aso_debug_pub.g_debug_flag = 'Y' THEN
341: aso_debug_pub.add('After querying the header row', 1, 'Y');
342: aso_debug_pub.add('l_qte_header_rec.quote_header_id: ' || l_qte_header_rec.quote_header_id, 1, 'Y');
343: END IF;
344:
345: IF ( l_payment_rec.Quote_Line_Id IS NOT NULL and l_payment_rec.Quote_Line_Id <> fnd_api.g_miss_num) then
346: l_qte_line_rec := ASO_UTILITY_PVT.Query_Qte_Line_Row ( l_payment_rec.Quote_Line_Id );
345: IF ( l_payment_rec.Quote_Line_Id IS NOT NULL and l_payment_rec.Quote_Line_Id <> fnd_api.g_miss_num) then
346: l_qte_line_rec := ASO_UTILITY_PVT.Query_Qte_Line_Row ( l_payment_rec.Quote_Line_Id );
347: END IF;
348:
349: IF aso_debug_pub.g_debug_flag = 'Y' THEN
350: aso_debug_pub.add('After querying the line row', 1, 'Y');
351: END IF;
352:
353: if ( l_payment_rec.payment_type_code = 'CREDIT_CARD' and
346: l_qte_line_rec := ASO_UTILITY_PVT.Query_Qte_Line_Row ( l_payment_rec.Quote_Line_Id );
347: END IF;
348:
349: IF aso_debug_pub.g_debug_flag = 'Y' THEN
350: aso_debug_pub.add('After querying the line row', 1, 'Y');
351: END IF;
352:
353: if ( l_payment_rec.payment_type_code = 'CREDIT_CARD' and
354: ((l_payment_rec.payment_ref_number is not null and l_payment_rec.payment_ref_number <> fnd_api.g_miss_char) or
353: if ( l_payment_rec.payment_type_code = 'CREDIT_CARD' and
354: ((l_payment_rec.payment_ref_number is not null and l_payment_rec.payment_ref_number <> fnd_api.g_miss_char) or
355: (l_payment_rec.instr_assignment_id is not null and l_payment_rec.instr_assignment_id <> fnd_api.g_miss_num)) ) then
356:
357: IF aso_debug_pub.g_debug_flag = 'Y' THEN
358: aso_debug_pub.add('Inside if for payment type credit card', 1, 'Y');
359: END IF;
360:
361: -- do the validation for the payment record
354: ((l_payment_rec.payment_ref_number is not null and l_payment_rec.payment_ref_number <> fnd_api.g_miss_char) or
355: (l_payment_rec.instr_assignment_id is not null and l_payment_rec.instr_assignment_id <> fnd_api.g_miss_num)) ) then
356:
357: IF aso_debug_pub.g_debug_flag = 'Y' THEN
358: aso_debug_pub.add('Inside if for payment type credit card', 1, 'Y');
359: END IF;
360:
361: -- do the validation for the payment record
362: IF aso_debug_pub.g_debug_flag = 'Y' THEN
358: aso_debug_pub.add('Inside if for payment type credit card', 1, 'Y');
359: END IF;
360:
361: -- do the validation for the payment record
362: IF aso_debug_pub.g_debug_flag = 'Y' THEN
363: aso_debug_pub.add('Before calling Validate_cc_info ', 1, 'Y');
364: END IF;
365: aso_validate_pvt.Validate_cc_info
366: (
359: END IF;
360:
361: -- do the validation for the payment record
362: IF aso_debug_pub.g_debug_flag = 'Y' THEN
363: aso_debug_pub.add('Before calling Validate_cc_info ', 1, 'Y');
364: END IF;
365: aso_validate_pvt.Validate_cc_info
366: (
367: p_init_msg_list => fnd_api.g_false,
371: x_return_status => x_return_status,
372: x_msg_count => x_msg_count,
373: x_msg_data => x_msg_data);
374:
375: IF aso_debug_pub.g_debug_flag = 'Y' THEN
376: aso_debug_pub.add('after calling Validate_cc_info ', 1, 'Y');
377: aso_debug_pub.add('Validate_cc_info Return Status: '||x_return_status, 1, 'Y');
378: END IF;
379:
372: x_msg_count => x_msg_count,
373: x_msg_data => x_msg_data);
374:
375: IF aso_debug_pub.g_debug_flag = 'Y' THEN
376: aso_debug_pub.add('after calling Validate_cc_info ', 1, 'Y');
377: aso_debug_pub.add('Validate_cc_info Return Status: '||x_return_status, 1, 'Y');
378: END IF;
379:
380: if x_return_status <> fnd_api.g_ret_sts_success then
373: x_msg_data => x_msg_data);
374:
375: IF aso_debug_pub.g_debug_flag = 'Y' THEN
376: aso_debug_pub.add('after calling Validate_cc_info ', 1, 'Y');
377: aso_debug_pub.add('Validate_cc_info Return Status: '||x_return_status, 1, 'Y');
378: END IF;
379:
380: if x_return_status <> fnd_api.g_ret_sts_success then
381: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
400: l_payer.party_id := l_qte_header_rec.invoice_to_cust_party_id;
401: End If;
402:
403: -- call api to create credit card and assigment , if needed
404: IF aso_debug_pub.g_debug_flag = 'Y' THEN
405: aso_debug_pub.add('Before calling create_iby_payment' , 1, 'Y');
406: END IF;
407:
408: aso_payment_int.create_iby_payment(p_payment_rec => p_payment_rec,
401: End If;
402:
403: -- call api to create credit card and assigment , if needed
404: IF aso_debug_pub.g_debug_flag = 'Y' THEN
405: aso_debug_pub.add('Before calling create_iby_payment' , 1, 'Y');
406: END IF;
407:
408: aso_payment_int.create_iby_payment(p_payment_rec => p_payment_rec,
409: p_payer => l_payer,
411: x_return_status => x_return_status ,
412: x_msg_count => x_msg_count,
413: x_msg_data => x_msg_data);
414:
415: IF aso_debug_pub.g_debug_flag = 'Y' THEN
416: aso_debug_pub.add('after calling create_iby_payment ', 1, 'Y');
417: aso_debug_pub.add('create_iby_payment Return Status: '||x_return_status, 1, 'Y');
418: END IF;
419:
412: x_msg_count => x_msg_count,
413: x_msg_data => x_msg_data);
414:
415: IF aso_debug_pub.g_debug_flag = 'Y' THEN
416: aso_debug_pub.add('after calling create_iby_payment ', 1, 'Y');
417: aso_debug_pub.add('create_iby_payment Return Status: '||x_return_status, 1, 'Y');
418: END IF;
419:
420: if x_return_status <> fnd_api.g_ret_sts_success then
413: x_msg_data => x_msg_data);
414:
415: IF aso_debug_pub.g_debug_flag = 'Y' THEN
416: aso_debug_pub.add('after calling create_iby_payment ', 1, 'Y');
417: aso_debug_pub.add('create_iby_payment Return Status: '||x_return_status, 1, 'Y');
418: END IF;
419:
420: if x_return_status <> fnd_api.g_ret_sts_success then
421: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
431: open c_get_payer_id(p_payment_rec.instr_assignment_id);
432: fetch c_get_payer_id into l_payer.party_id;
433: close c_get_payer_id;
434:
435: IF aso_debug_pub.g_debug_flag = 'Y' THEN
436: aso_debug_pub.add('l_payer.party_id: '|| l_payer.party_id, 1, 'Y');
437: END IF;
438:
439: end if;
432: fetch c_get_payer_id into l_payer.party_id;
433: close c_get_payer_id;
434:
435: IF aso_debug_pub.g_debug_flag = 'Y' THEN
436: aso_debug_pub.add('l_payer.party_id: '|| l_payer.party_id, 1, 'Y');
437: END IF;
438:
439: end if;
440:
457: l_trxn_attribs.Trxn_Ref_Number2 := l_payment_rec.quote_line_id;
458: End if;
459:
460: -- Check to see if cvv2 is mandatory or not
461: IF aso_debug_pub.g_debug_flag = 'Y' THEN
462: aso_debug_pub.add('Before calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
463: END IF;
464:
465: IBY_FNDCPT_SETUP_PUB.Get_Payment_Channel_Attribs
458: End if;
459:
460: -- Check to see if cvv2 is mandatory or not
461: IF aso_debug_pub.g_debug_flag = 'Y' THEN
462: aso_debug_pub.add('Before calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
463: END IF;
464:
465: IBY_FNDCPT_SETUP_PUB.Get_Payment_Channel_Attribs
466: (
472: p_channel_code => 'CREDIT_CARD',
473: x_channel_attrib_uses => lx_channel_attrib_uses,
474: x_response => lx_response);
475:
476: IF aso_debug_pub.g_debug_flag = 'Y' THEN
477: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
478: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
479: aso_debug_pub.add('cvv2 use: '||lx_channel_attrib_uses.Instr_SecCode_Use, 1, 'Y');
480: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
473: x_channel_attrib_uses => lx_channel_attrib_uses,
474: x_response => lx_response);
475:
476: IF aso_debug_pub.g_debug_flag = 'Y' THEN
477: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
478: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
479: aso_debug_pub.add('cvv2 use: '||lx_channel_attrib_uses.Instr_SecCode_Use, 1, 'Y');
480: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
481: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
474: x_response => lx_response);
475:
476: IF aso_debug_pub.g_debug_flag = 'Y' THEN
477: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
478: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
479: aso_debug_pub.add('cvv2 use: '||lx_channel_attrib_uses.Instr_SecCode_Use, 1, 'Y');
480: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
481: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
482: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
475:
476: IF aso_debug_pub.g_debug_flag = 'Y' THEN
477: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
478: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
479: aso_debug_pub.add('cvv2 use: '||lx_channel_attrib_uses.Instr_SecCode_Use, 1, 'Y');
480: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
481: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
482: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
483: END IF;
476: IF aso_debug_pub.g_debug_flag = 'Y' THEN
477: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
478: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
479: aso_debug_pub.add('cvv2 use: '||lx_channel_attrib_uses.Instr_SecCode_Use, 1, 'Y');
480: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
481: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
482: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
483: END IF;
484:
477: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
478: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
479: aso_debug_pub.add('cvv2 use: '||lx_channel_attrib_uses.Instr_SecCode_Use, 1, 'Y');
480: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
481: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
482: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
483: END IF;
484:
485: IF (nvl(lx_channel_attrib_uses.Instr_SecCode_Use,'null') = 'REQUIRED' and
478: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
479: aso_debug_pub.add('cvv2 use: '||lx_channel_attrib_uses.Instr_SecCode_Use, 1, 'Y');
480: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
481: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
482: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
483: END IF;
484:
485: IF (nvl(lx_channel_attrib_uses.Instr_SecCode_Use,'null') = 'REQUIRED' and
486: (l_payment_rec.cvv2 is null or l_payment_rec.cvv2 = fnd_api.g_miss_char)) then
503: l_trxn_attribs.VoiceAuth_Code := null;
504: l_trxn_attribs.Additional_Info := null;
505:
506:
507: IF aso_debug_pub.g_debug_flag = 'Y' THEN
508: aso_debug_pub.add('Before calling IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension ', 1, 'Y');
509: aso_debug_pub.add('Instrument Assignment id: '|| l_payment_rec.instr_assignment_id, 1, 'Y');
510: END IF;
511:
504: l_trxn_attribs.Additional_Info := null;
505:
506:
507: IF aso_debug_pub.g_debug_flag = 'Y' THEN
508: aso_debug_pub.add('Before calling IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension ', 1, 'Y');
509: aso_debug_pub.add('Instrument Assignment id: '|| l_payment_rec.instr_assignment_id, 1, 'Y');
510: END IF;
511:
512: IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension
505:
506:
507: IF aso_debug_pub.g_debug_flag = 'Y' THEN
508: aso_debug_pub.add('Before calling IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension ', 1, 'Y');
509: aso_debug_pub.add('Instrument Assignment id: '|| l_payment_rec.instr_assignment_id, 1, 'Y');
510: END IF;
511:
512: IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension
513: (
524: p_trxn_attribs => l_trxn_attribs,
525: x_entity_id => lx_entity_id,
526: x_response => lx_response);
527:
528: IF aso_debug_pub.g_debug_flag = 'Y' THEN
529: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension ', 1, 'Y');
530: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
531: aso_debug_pub.add('lx_entity_id: '||lx_entity_id, 1, 'Y');
532: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
525: x_entity_id => lx_entity_id,
526: x_response => lx_response);
527:
528: IF aso_debug_pub.g_debug_flag = 'Y' THEN
529: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension ', 1, 'Y');
530: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
531: aso_debug_pub.add('lx_entity_id: '||lx_entity_id, 1, 'Y');
532: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
533: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
526: x_response => lx_response);
527:
528: IF aso_debug_pub.g_debug_flag = 'Y' THEN
529: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension ', 1, 'Y');
530: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
531: aso_debug_pub.add('lx_entity_id: '||lx_entity_id, 1, 'Y');
532: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
533: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
534: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
527:
528: IF aso_debug_pub.g_debug_flag = 'Y' THEN
529: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension ', 1, 'Y');
530: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
531: aso_debug_pub.add('lx_entity_id: '||lx_entity_id, 1, 'Y');
532: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
533: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
534: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
535: END IF;
528: IF aso_debug_pub.g_debug_flag = 'Y' THEN
529: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension ', 1, 'Y');
530: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
531: aso_debug_pub.add('lx_entity_id: '||lx_entity_id, 1, 'Y');
532: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
533: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
534: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
535: END IF;
536:
529: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension ', 1, 'Y');
530: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
531: aso_debug_pub.add('lx_entity_id: '||lx_entity_id, 1, 'Y');
532: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
533: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
534: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
535: END IF;
536:
537: if x_return_status <> fnd_api.g_ret_sts_success then
530: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
531: aso_debug_pub.add('lx_entity_id: '||lx_entity_id, 1, 'Y');
532: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
533: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
534: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
535: END IF;
536:
537: if x_return_status <> fnd_api.g_ret_sts_success then
538: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
557: l_payment_ref_number := l_payment_rec.PAYMENT_REF_NUMBER;
558: END IF;
559:
560:
561: IF aso_debug_pub.g_debug_flag = 'Y' THEN
562: aso_debug_pub.add('Before calling the table handler to insert the data ', 1, 'Y');
563: END IF;
564:
565:
558: END IF;
559:
560:
561: IF aso_debug_pub.g_debug_flag = 'Y' THEN
562: aso_debug_pub.add('Before calling the table handler to insert the data ', 1, 'Y');
563: END IF;
564:
565:
566: ASO_PAYMENTS_PKG.Insert_Row(
623: ( p_count => x_msg_count,
624: p_data => x_msg_data
625: );
626:
627: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
628: aso_debug_pub.ADD ('END create_payment_row',1,'N');
629: END IF;
630:
631: EXCEPTION
624: p_data => x_msg_data
625: );
626:
627: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
628: aso_debug_pub.ADD ('END create_payment_row',1,'N');
629: END IF;
630:
631: EXCEPTION
632: WHEN FND_API.G_EXC_ERROR THEN
743: Begin
744:
745: SAVEPOINT UPDATE_PAYMENT_ROW_INT;
746:
747: aso_debug_pub.g_debug_flag := nvl(fnd_profile.value('ASO_ENABLE_DEBUG'),'N');
748:
749: IF aso_debug_pub.g_debug_flag = 'Y' THEN
750: aso_debug_pub.add('Begin update_payment_row ', 1, 'Y');
751: END IF;
745: SAVEPOINT UPDATE_PAYMENT_ROW_INT;
746:
747: aso_debug_pub.g_debug_flag := nvl(fnd_profile.value('ASO_ENABLE_DEBUG'),'N');
748:
749: IF aso_debug_pub.g_debug_flag = 'Y' THEN
750: aso_debug_pub.add('Begin update_payment_row ', 1, 'Y');
751: END IF;
752:
753: x_return_status := FND_API.G_RET_STS_SUCCESS;
746:
747: aso_debug_pub.g_debug_flag := nvl(fnd_profile.value('ASO_ENABLE_DEBUG'),'N');
748:
749: IF aso_debug_pub.g_debug_flag = 'Y' THEN
750: aso_debug_pub.add('Begin update_payment_row ', 1, 'Y');
751: END IF;
752:
753: x_return_status := FND_API.G_RET_STS_SUCCESS;
754:
772:
773: If (nvl(l_db_payment_rec.payment_type_code,'NULL') = 'CREDIT_CARD') And
774: (l_payment_rec.payment_type_code Is Null Or l_payment_rec.payment_type_code = fnd_api.g_miss_char) Then
775:
776: IF aso_debug_pub.g_debug_flag = 'Y' THEN
777: aso_debug_pub.add('Database payment_type_code is CREDIT_CARD ', 1, 'Y');
778: aso_debug_pub.add('Input payment_type_code is NULL ',1, 'Y');
779: End if;
780:
773: If (nvl(l_db_payment_rec.payment_type_code,'NULL') = 'CREDIT_CARD') And
774: (l_payment_rec.payment_type_code Is Null Or l_payment_rec.payment_type_code = fnd_api.g_miss_char) Then
775:
776: IF aso_debug_pub.g_debug_flag = 'Y' THEN
777: aso_debug_pub.add('Database payment_type_code is CREDIT_CARD ', 1, 'Y');
778: aso_debug_pub.add('Input payment_type_code is NULL ',1, 'Y');
779: End if;
780:
781: If (l_payment_rec.PAYMENT_REF_NUMBER is Not Null or l_payment_rec.PAYMENT_REF_NUMBER <> fnd_api.g_miss_num) Then
774: (l_payment_rec.payment_type_code Is Null Or l_payment_rec.payment_type_code = fnd_api.g_miss_char) Then
775:
776: IF aso_debug_pub.g_debug_flag = 'Y' THEN
777: aso_debug_pub.add('Database payment_type_code is CREDIT_CARD ', 1, 'Y');
778: aso_debug_pub.add('Input payment_type_code is NULL ',1, 'Y');
779: End if;
780:
781: If (l_payment_rec.PAYMENT_REF_NUMBER is Not Null or l_payment_rec.PAYMENT_REF_NUMBER <> fnd_api.g_miss_num) Then
782:
784: lc_payment_rec.payment_type_code := 'CREDIT_CARD';
785:
786: If (l_db_payment_rec.trxn_extension_id Is Not Null) And (l_payment_rec.trxn_extension_id Is Null) Then
787:
788: IF aso_debug_pub.g_debug_flag = 'Y' THEN
789: aso_debug_pub.add('Database trxn_extension_id is Not Null ', 1, 'Y');
790: aso_debug_pub.add('Input trxn_extension_id is NULL ',1, 'Y');
791: End if;
792:
785:
786: If (l_db_payment_rec.trxn_extension_id Is Not Null) And (l_payment_rec.trxn_extension_id Is Null) Then
787:
788: IF aso_debug_pub.g_debug_flag = 'Y' THEN
789: aso_debug_pub.add('Database trxn_extension_id is Not Null ', 1, 'Y');
790: aso_debug_pub.add('Input trxn_extension_id is NULL ',1, 'Y');
791: End if;
792:
793: l_payment_rec.trxn_extension_id := l_db_payment_rec.trxn_extension_id;
786: If (l_db_payment_rec.trxn_extension_id Is Not Null) And (l_payment_rec.trxn_extension_id Is Null) Then
787:
788: IF aso_debug_pub.g_debug_flag = 'Y' THEN
789: aso_debug_pub.add('Database trxn_extension_id is Not Null ', 1, 'Y');
790: aso_debug_pub.add('Input trxn_extension_id is NULL ',1, 'Y');
791: End if;
792:
793: l_payment_rec.trxn_extension_id := l_db_payment_rec.trxn_extension_id;
794: lc_payment_rec.trxn_extension_id := l_db_payment_rec.trxn_extension_id;
797: End If;
798:
799: /*** End : Code Added for Bug 8712439 for HTML Quoting PA-DSS update issue ***/
800:
801: IF aso_debug_pub.g_debug_flag = 'Y' THEN
802: aso_debug_pub.add('Database payment_type_code is : '||l_db_payment_rec.payment_type_code, 1, 'Y');
803: aso_debug_pub.add('Database trxn_extension_id is : '||l_db_payment_rec.trxn_extension_id, 1, 'Y');
804: aso_debug_pub.add('Input payment_type_code is : '|| l_payment_rec.payment_type_code, 1, 'Y');
805: aso_debug_pub.add('Input instr_assignment_id is : '|| l_payment_rec.instr_assignment_id, 1, 'Y');
798:
799: /*** End : Code Added for Bug 8712439 for HTML Quoting PA-DSS update issue ***/
800:
801: IF aso_debug_pub.g_debug_flag = 'Y' THEN
802: aso_debug_pub.add('Database payment_type_code is : '||l_db_payment_rec.payment_type_code, 1, 'Y');
803: aso_debug_pub.add('Database trxn_extension_id is : '||l_db_payment_rec.trxn_extension_id, 1, 'Y');
804: aso_debug_pub.add('Input payment_type_code is : '|| l_payment_rec.payment_type_code, 1, 'Y');
805: aso_debug_pub.add('Input instr_assignment_id is : '|| l_payment_rec.instr_assignment_id, 1, 'Y');
806:
799: /*** End : Code Added for Bug 8712439 for HTML Quoting PA-DSS update issue ***/
800:
801: IF aso_debug_pub.g_debug_flag = 'Y' THEN
802: aso_debug_pub.add('Database payment_type_code is : '||l_db_payment_rec.payment_type_code, 1, 'Y');
803: aso_debug_pub.add('Database trxn_extension_id is : '||l_db_payment_rec.trxn_extension_id, 1, 'Y');
804: aso_debug_pub.add('Input payment_type_code is : '|| l_payment_rec.payment_type_code, 1, 'Y');
805: aso_debug_pub.add('Input instr_assignment_id is : '|| l_payment_rec.instr_assignment_id, 1, 'Y');
806:
807: /* Code change for PA-DSS ER 8499296 Start
800:
801: IF aso_debug_pub.g_debug_flag = 'Y' THEN
802: aso_debug_pub.add('Database payment_type_code is : '||l_db_payment_rec.payment_type_code, 1, 'Y');
803: aso_debug_pub.add('Database trxn_extension_id is : '||l_db_payment_rec.trxn_extension_id, 1, 'Y');
804: aso_debug_pub.add('Input payment_type_code is : '|| l_payment_rec.payment_type_code, 1, 'Y');
805: aso_debug_pub.add('Input instr_assignment_id is : '|| l_payment_rec.instr_assignment_id, 1, 'Y');
806:
807: /* Code change for PA-DSS ER 8499296 Start
808: aso_debug_pub.add('Input payment_ref_number is : '|| l_payment_rec.payment_ref_number, 1, 'Y');
801: IF aso_debug_pub.g_debug_flag = 'Y' THEN
802: aso_debug_pub.add('Database payment_type_code is : '||l_db_payment_rec.payment_type_code, 1, 'Y');
803: aso_debug_pub.add('Database trxn_extension_id is : '||l_db_payment_rec.trxn_extension_id, 1, 'Y');
804: aso_debug_pub.add('Input payment_type_code is : '|| l_payment_rec.payment_type_code, 1, 'Y');
805: aso_debug_pub.add('Input instr_assignment_id is : '|| l_payment_rec.instr_assignment_id, 1, 'Y');
806:
807: /* Code change for PA-DSS ER 8499296 Start
808: aso_debug_pub.add('Input payment_ref_number is : '|| l_payment_rec.payment_ref_number, 1, 'Y');
809: Code change for PA-DSS ER 8499296 End */
804: aso_debug_pub.add('Input payment_type_code is : '|| l_payment_rec.payment_type_code, 1, 'Y');
805: aso_debug_pub.add('Input instr_assignment_id is : '|| l_payment_rec.instr_assignment_id, 1, 'Y');
806:
807: /* Code change for PA-DSS ER 8499296 Start
808: aso_debug_pub.add('Input payment_ref_number is : '|| l_payment_rec.payment_ref_number, 1, 'Y');
809: Code change for PA-DSS ER 8499296 End */
810:
811: aso_debug_pub.add('Input trxn_extension_id is : '|| l_payment_rec.trxn_extension_id, 1, 'Y');
812: aso_debug_pub.add('Input instrument_id is : '|| l_payment_rec.instrument_id, 1, 'Y');
807: /* Code change for PA-DSS ER 8499296 Start
808: aso_debug_pub.add('Input payment_ref_number is : '|| l_payment_rec.payment_ref_number, 1, 'Y');
809: Code change for PA-DSS ER 8499296 End */
810:
811: aso_debug_pub.add('Input trxn_extension_id is : '|| l_payment_rec.trxn_extension_id, 1, 'Y');
812: aso_debug_pub.add('Input instrument_id is : '|| l_payment_rec.instrument_id, 1, 'Y');
813: aso_debug_pub.add('Input cvv2 is : '|| l_payment_rec.cvv2, 1, 'Y');
814: END IF;
815:
808: aso_debug_pub.add('Input payment_ref_number is : '|| l_payment_rec.payment_ref_number, 1, 'Y');
809: Code change for PA-DSS ER 8499296 End */
810:
811: aso_debug_pub.add('Input trxn_extension_id is : '|| l_payment_rec.trxn_extension_id, 1, 'Y');
812: aso_debug_pub.add('Input instrument_id is : '|| l_payment_rec.instrument_id, 1, 'Y');
813: aso_debug_pub.add('Input cvv2 is : '|| l_payment_rec.cvv2, 1, 'Y');
814: END IF;
815:
816:
809: Code change for PA-DSS ER 8499296 End */
810:
811: aso_debug_pub.add('Input trxn_extension_id is : '|| l_payment_rec.trxn_extension_id, 1, 'Y');
812: aso_debug_pub.add('Input instrument_id is : '|| l_payment_rec.instrument_id, 1, 'Y');
813: aso_debug_pub.add('Input cvv2 is : '|| l_payment_rec.cvv2, 1, 'Y');
814: END IF;
815:
816:
817: -- do the validation for the payment record
815:
816:
817: -- do the validation for the payment record
818: IF l_payment_rec.payment_type_code = 'CREDIT_CARD' THEN
819: IF aso_debug_pub.g_debug_flag = 'Y' THEN
820: aso_debug_pub.add('Before calling Validate_cc_info ', 1, 'Y');
821: END IF;
822: aso_validate_pvt.Validate_cc_info
823: (
816:
817: -- do the validation for the payment record
818: IF l_payment_rec.payment_type_code = 'CREDIT_CARD' THEN
819: IF aso_debug_pub.g_debug_flag = 'Y' THEN
820: aso_debug_pub.add('Before calling Validate_cc_info ', 1, 'Y');
821: END IF;
822: aso_validate_pvt.Validate_cc_info
823: (
824: p_init_msg_list => fnd_api.g_false,
828: x_return_status => x_return_status,
829: x_msg_count => x_msg_count,
830: x_msg_data => x_msg_data);
831:
832: IF aso_debug_pub.g_debug_flag = 'Y' THEN
833: aso_debug_pub.add('after calling Validate_cc_info ', 1, 'Y');
834: aso_debug_pub.add('Validate_cc_info Return Status: '||x_return_status, 1, 'Y');
835: END IF;
836:
829: x_msg_count => x_msg_count,
830: x_msg_data => x_msg_data);
831:
832: IF aso_debug_pub.g_debug_flag = 'Y' THEN
833: aso_debug_pub.add('after calling Validate_cc_info ', 1, 'Y');
834: aso_debug_pub.add('Validate_cc_info Return Status: '||x_return_status, 1, 'Y');
835: END IF;
836:
837: if x_return_status <> fnd_api.g_ret_sts_success then
830: x_msg_data => x_msg_data);
831:
832: IF aso_debug_pub.g_debug_flag = 'Y' THEN
833: aso_debug_pub.add('after calling Validate_cc_info ', 1, 'Y');
834: aso_debug_pub.add('Validate_cc_info Return Status: '||x_return_status, 1, 'Y');
835: END IF;
836:
837: if x_return_status <> fnd_api.g_ret_sts_success then
838: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
856:
857: If (l_payment_rec.instr_assignment_id is null or l_payment_rec.instr_assignment_id = fnd_api.g_miss_num ) then
858: -- this is quoting flow
859: -- call api to create credit card and assigment , if needed
860: IF aso_debug_pub.g_debug_flag = 'Y' THEN
861: aso_debug_pub.add('Before calling create_iby_payment' , 1, 'Y');
862: END IF;
863:
864: If ( l_payment_rec.Quote_Line_Id IS NOT NULL and l_payment_rec.Quote_Line_Id <> fnd_api.g_miss_num) then
857: If (l_payment_rec.instr_assignment_id is null or l_payment_rec.instr_assignment_id = fnd_api.g_miss_num ) then
858: -- this is quoting flow
859: -- call api to create credit card and assigment , if needed
860: IF aso_debug_pub.g_debug_flag = 'Y' THEN
861: aso_debug_pub.add('Before calling create_iby_payment' , 1, 'Y');
862: END IF;
863:
864: If ( l_payment_rec.Quote_Line_Id IS NOT NULL and l_payment_rec.Quote_Line_Id <> fnd_api.g_miss_num) then
865: l_payer.party_id := l_qte_line_rec.invoice_to_cust_party_id;
873: x_return_status => x_return_status ,
874: x_msg_count => x_msg_count,
875: x_msg_data => x_msg_data);
876:
877: IF aso_debug_pub.g_debug_flag = 'Y' THEN
878: aso_debug_pub.add('after calling create_iby_payment ', 1, 'Y');
879: aso_debug_pub.add('create_iby_payment Return Status: '||x_return_status, 1, 'Y');
880: END IF;
881:
874: x_msg_count => x_msg_count,
875: x_msg_data => x_msg_data);
876:
877: IF aso_debug_pub.g_debug_flag = 'Y' THEN
878: aso_debug_pub.add('after calling create_iby_payment ', 1, 'Y');
879: aso_debug_pub.add('create_iby_payment Return Status: '||x_return_status, 1, 'Y');
880: END IF;
881:
882: if x_return_status <> fnd_api.g_ret_sts_success then
875: x_msg_data => x_msg_data);
876:
877: IF aso_debug_pub.g_debug_flag = 'Y' THEN
878: aso_debug_pub.add('after calling create_iby_payment ', 1, 'Y');
879: aso_debug_pub.add('create_iby_payment Return Status: '||x_return_status, 1, 'Y');
880: END IF;
881:
882: if x_return_status <> fnd_api.g_ret_sts_success then
883: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
908: End if;
909:
910:
911: -- Check to see if cvv2 is mandatory or not
912: IF aso_debug_pub.g_debug_flag = 'Y' THEN
913: aso_debug_pub.add('Before calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
914: END IF;
915:
916: IBY_FNDCPT_SETUP_PUB.Get_Payment_Channel_Attribs
909:
910:
911: -- Check to see if cvv2 is mandatory or not
912: IF aso_debug_pub.g_debug_flag = 'Y' THEN
913: aso_debug_pub.add('Before calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
914: END IF;
915:
916: IBY_FNDCPT_SETUP_PUB.Get_Payment_Channel_Attribs
917: (
923: p_channel_code => 'CREDIT_CARD',
924: x_channel_attrib_uses => lx_channel_attrib_uses,
925: x_response => lx_response);
926:
927: IF aso_debug_pub.g_debug_flag = 'Y' THEN
928: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
929: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
930: aso_debug_pub.add('cvv2 use: '||lx_channel_attrib_uses.Instr_SecCode_Use, 1, 'Y');
931: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
924: x_channel_attrib_uses => lx_channel_attrib_uses,
925: x_response => lx_response);
926:
927: IF aso_debug_pub.g_debug_flag = 'Y' THEN
928: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
929: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
930: aso_debug_pub.add('cvv2 use: '||lx_channel_attrib_uses.Instr_SecCode_Use, 1, 'Y');
931: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
932: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
925: x_response => lx_response);
926:
927: IF aso_debug_pub.g_debug_flag = 'Y' THEN
928: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
929: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
930: aso_debug_pub.add('cvv2 use: '||lx_channel_attrib_uses.Instr_SecCode_Use, 1, 'Y');
931: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
932: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
933: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
926:
927: IF aso_debug_pub.g_debug_flag = 'Y' THEN
928: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
929: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
930: aso_debug_pub.add('cvv2 use: '||lx_channel_attrib_uses.Instr_SecCode_Use, 1, 'Y');
931: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
932: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
933: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
934: END IF;
927: IF aso_debug_pub.g_debug_flag = 'Y' THEN
928: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
929: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
930: aso_debug_pub.add('cvv2 use: '||lx_channel_attrib_uses.Instr_SecCode_Use, 1, 'Y');
931: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
932: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
933: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
934: END IF;
935:
928: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
929: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
930: aso_debug_pub.add('cvv2 use: '||lx_channel_attrib_uses.Instr_SecCode_Use, 1, 'Y');
931: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
932: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
933: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
934: END IF;
935:
936: IF (nvl(lx_channel_attrib_uses.Instr_SecCode_Use,'null') = 'REQUIRED' and
929: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
930: aso_debug_pub.add('cvv2 use: '||lx_channel_attrib_uses.Instr_SecCode_Use, 1, 'Y');
931: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
932: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
933: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
934: END IF;
935:
936: IF (nvl(lx_channel_attrib_uses.Instr_SecCode_Use,'null') = 'REQUIRED' and
937: (l_payment_rec.cvv2 is null or l_payment_rec.cvv2 = fnd_api.g_miss_char)) then
953: l_trxn_attribs.VoiceAuth_Code := null;
954: l_trxn_attribs.Additional_Info := null;
955:
956:
957: IF aso_debug_pub.g_debug_flag = 'Y' THEN
958: aso_debug_pub.add('Before calling IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension ', 1, 'Y');
959: aso_debug_pub.add('Instrument Assignment id: '|| l_payment_rec.instr_assignment_id, 1, 'Y');
960: END IF;
961:
954: l_trxn_attribs.Additional_Info := null;
955:
956:
957: IF aso_debug_pub.g_debug_flag = 'Y' THEN
958: aso_debug_pub.add('Before calling IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension ', 1, 'Y');
959: aso_debug_pub.add('Instrument Assignment id: '|| l_payment_rec.instr_assignment_id, 1, 'Y');
960: END IF;
961:
962: --bug 5154775
955:
956:
957: IF aso_debug_pub.g_debug_flag = 'Y' THEN
958: aso_debug_pub.add('Before calling IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension ', 1, 'Y');
959: aso_debug_pub.add('Instrument Assignment id: '|| l_payment_rec.instr_assignment_id, 1, 'Y');
960: END IF;
961:
962: --bug 5154775
963: IF (l_payment_rec.instr_assignment_id is not null and l_payment_rec.instr_assignment_id <> fnd_api.g_miss_num) then
976: p_trxn_attribs => l_trxn_attribs,
977: x_entity_id => lx_entity_id,
978: x_response => lx_response);
979:
980: IF aso_debug_pub.g_debug_flag = 'Y' THEN
981: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension ', 1, 'Y');
982: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
983: aso_debug_pub.add('lx_entity_id: '||lx_entity_id, 1, 'Y');
984: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
977: x_entity_id => lx_entity_id,
978: x_response => lx_response);
979:
980: IF aso_debug_pub.g_debug_flag = 'Y' THEN
981: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension ', 1, 'Y');
982: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
983: aso_debug_pub.add('lx_entity_id: '||lx_entity_id, 1, 'Y');
984: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
985: aso_debug_pub.add('x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
978: x_response => lx_response);
979:
980: IF aso_debug_pub.g_debug_flag = 'Y' THEN
981: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension ', 1, 'Y');
982: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
983: aso_debug_pub.add('lx_entity_id: '||lx_entity_id, 1, 'Y');
984: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
985: aso_debug_pub.add('x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
986: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
979:
980: IF aso_debug_pub.g_debug_flag = 'Y' THEN
981: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension ', 1, 'Y');
982: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
983: aso_debug_pub.add('lx_entity_id: '||lx_entity_id, 1, 'Y');
984: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
985: aso_debug_pub.add('x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
986: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
987: END IF;
980: IF aso_debug_pub.g_debug_flag = 'Y' THEN
981: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension ', 1, 'Y');
982: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
983: aso_debug_pub.add('lx_entity_id: '||lx_entity_id, 1, 'Y');
984: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
985: aso_debug_pub.add('x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
986: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
987: END IF;
988:
981: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension ', 1, 'Y');
982: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
983: aso_debug_pub.add('lx_entity_id: '||lx_entity_id, 1, 'Y');
984: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
985: aso_debug_pub.add('x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
986: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
987: END IF;
988:
989: if x_return_status <> fnd_api.g_ret_sts_success then
982: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
983: aso_debug_pub.add('lx_entity_id: '||lx_entity_id, 1, 'Y');
984: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
985: aso_debug_pub.add('x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
986: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
987: END IF;
988:
989: if x_return_status <> fnd_api.g_ret_sts_success then
990: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1008: open c_get_payer_from_trxn(l_db_payment_rec.trxn_extension_id);
1009: fetch c_get_payer_from_trxn into l_payer.party_id;
1010: close c_get_payer_from_trxn;
1011:
1012: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1013: aso_debug_pub.add('Before Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension ', 1, 'Y');
1014: aso_debug_pub.add('l_payer.party_id: '|| l_payer.party_id, 1, 'Y');
1015: aso_debug_pub.add('l_payment_rec.trxn_extension_id: '|| l_db_payment_rec.trxn_extension_id, 1, 'Y');
1016: END IF;
1009: fetch c_get_payer_from_trxn into l_payer.party_id;
1010: close c_get_payer_from_trxn;
1011:
1012: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1013: aso_debug_pub.add('Before Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension ', 1, 'Y');
1014: aso_debug_pub.add('l_payer.party_id: '|| l_payer.party_id, 1, 'Y');
1015: aso_debug_pub.add('l_payment_rec.trxn_extension_id: '|| l_db_payment_rec.trxn_extension_id, 1, 'Y');
1016: END IF;
1017:
1010: close c_get_payer_from_trxn;
1011:
1012: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1013: aso_debug_pub.add('Before Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension ', 1, 'Y');
1014: aso_debug_pub.add('l_payer.party_id: '|| l_payer.party_id, 1, 'Y');
1015: aso_debug_pub.add('l_payment_rec.trxn_extension_id: '|| l_db_payment_rec.trxn_extension_id, 1, 'Y');
1016: END IF;
1017:
1018: IF (l_db_payment_rec.trxn_extension_id is not null and l_db_payment_rec.trxn_extension_id <> fnd_api.g_miss_num ) then
1011:
1012: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1013: aso_debug_pub.add('Before Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension ', 1, 'Y');
1014: aso_debug_pub.add('l_payer.party_id: '|| l_payer.party_id, 1, 'Y');
1015: aso_debug_pub.add('l_payment_rec.trxn_extension_id: '|| l_db_payment_rec.trxn_extension_id, 1, 'Y');
1016: END IF;
1017:
1018: IF (l_db_payment_rec.trxn_extension_id is not null and l_db_payment_rec.trxn_extension_id <> fnd_api.g_miss_num ) then
1019: IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension
1029: p_payer_equivalency => IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,
1030: x_response => lx_response
1031: );
1032:
1033: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1034: aso_debug_pub.add('After Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension ', 1, 'Y');
1035: aso_debug_pub.add('Return Status from IBY Delete API: '||x_return_status, 1, 'Y');
1036: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1037: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
1030: x_response => lx_response
1031: );
1032:
1033: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1034: aso_debug_pub.add('After Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension ', 1, 'Y');
1035: aso_debug_pub.add('Return Status from IBY Delete API: '||x_return_status, 1, 'Y');
1036: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1037: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
1038: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1031: );
1032:
1033: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1034: aso_debug_pub.add('After Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension ', 1, 'Y');
1035: aso_debug_pub.add('Return Status from IBY Delete API: '||x_return_status, 1, 'Y');
1036: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1037: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
1038: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1039: END IF;
1032:
1033: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1034: aso_debug_pub.add('After Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension ', 1, 'Y');
1035: aso_debug_pub.add('Return Status from IBY Delete API: '||x_return_status, 1, 'Y');
1036: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1037: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
1038: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1039: END IF;
1040:
1033: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1034: aso_debug_pub.add('After Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension ', 1, 'Y');
1035: aso_debug_pub.add('Return Status from IBY Delete API: '||x_return_status, 1, 'Y');
1036: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1037: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
1038: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1039: END IF;
1040:
1041: if x_return_status <> fnd_api.g_ret_sts_success then
1034: aso_debug_pub.add('After Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension ', 1, 'Y');
1035: aso_debug_pub.add('Return Status from IBY Delete API: '||x_return_status, 1, 'Y');
1036: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1037: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
1038: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1039: END IF;
1040:
1041: if x_return_status <> fnd_api.g_ret_sts_success then
1042: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1063: if (l_payment_rec.payment_ref_number is not null and l_payment_rec.payment_ref_number <> fnd_api.g_miss_char ) then
1064: -- this is again similar to create flow , create card and assignment, if needed and update extension
1065: -- this is the quoting flow
1066: -- call api to create credit card and assigment , if needed
1067: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1068: aso_debug_pub.add('Before calling create_iby_payment' , 1, 'Y');
1069: END IF;
1070:
1071: If ( l_payment_rec.Quote_Line_Id IS NOT NULL and l_payment_rec.Quote_Line_Id <> fnd_api.g_miss_num) then
1064: -- this is again similar to create flow , create card and assignment, if needed and update extension
1065: -- this is the quoting flow
1066: -- call api to create credit card and assigment , if needed
1067: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1068: aso_debug_pub.add('Before calling create_iby_payment' , 1, 'Y');
1069: END IF;
1070:
1071: If ( l_payment_rec.Quote_Line_Id IS NOT NULL and l_payment_rec.Quote_Line_Id <> fnd_api.g_miss_num) then
1072: l_payer.party_id := l_qte_line_rec.invoice_to_cust_party_id;
1083: x_return_status => x_return_status ,
1084: x_msg_count => x_msg_count,
1085: x_msg_data => x_msg_data);
1086:
1087: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1088: aso_debug_pub.add('after calling create_iby_payment ', 1, 'Y');
1089: aso_debug_pub.add('create_iby_payment Return Status: '||x_return_status, 1, 'Y');
1090: END IF;
1091:
1084: x_msg_count => x_msg_count,
1085: x_msg_data => x_msg_data);
1086:
1087: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1088: aso_debug_pub.add('after calling create_iby_payment ', 1, 'Y');
1089: aso_debug_pub.add('create_iby_payment Return Status: '||x_return_status, 1, 'Y');
1090: END IF;
1091:
1092: if x_return_status <> fnd_api.g_ret_sts_success then
1085: x_msg_data => x_msg_data);
1086:
1087: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1088: aso_debug_pub.add('after calling create_iby_payment ', 1, 'Y');
1089: aso_debug_pub.add('create_iby_payment Return Status: '||x_return_status, 1, 'Y');
1090: END IF;
1091:
1092: if x_return_status <> fnd_api.g_ret_sts_success then
1093: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1138: l_card_instrument.card_issuer := l_payment_rec.credit_card_code;
1139: end if;
1140:
1141:
1142: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1143: aso_debug_pub.add('Before calling IBY_FNDCPT_SETUP_PUB.Update_Card', 1, 'Y');
1144: aso_debug_pub.add('Instrument id: '|| l_payment_rec.instrument_id, 1, 'Y');
1145: END IF;
1146: IBY_FNDCPT_SETUP_PUB.Update_Card
1139: end if;
1140:
1141:
1142: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1143: aso_debug_pub.add('Before calling IBY_FNDCPT_SETUP_PUB.Update_Card', 1, 'Y');
1144: aso_debug_pub.add('Instrument id: '|| l_payment_rec.instrument_id, 1, 'Y');
1145: END IF;
1146: IBY_FNDCPT_SETUP_PUB.Update_Card
1147: (
1140:
1141:
1142: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1143: aso_debug_pub.add('Before calling IBY_FNDCPT_SETUP_PUB.Update_Card', 1, 'Y');
1144: aso_debug_pub.add('Instrument id: '|| l_payment_rec.instrument_id, 1, 'Y');
1145: END IF;
1146: IBY_FNDCPT_SETUP_PUB.Update_Card
1147: (
1148: p_api_version => 1.0,
1152: x_msg_count => x_msg_count,
1153: x_msg_data => x_msg_data,
1154: p_card_instrument => l_card_instrument,
1155: x_response => lx_response);
1156: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1157: aso_debug_pub.add('after calling IBY_FNDCPT_SETUP_PUB.Update_Card', 1, 'Y');
1158: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1159: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1160: aso_debug_pub.add('x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
1153: x_msg_data => x_msg_data,
1154: p_card_instrument => l_card_instrument,
1155: x_response => lx_response);
1156: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1157: aso_debug_pub.add('after calling IBY_FNDCPT_SETUP_PUB.Update_Card', 1, 'Y');
1158: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1159: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1160: aso_debug_pub.add('x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
1161: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1154: p_card_instrument => l_card_instrument,
1155: x_response => lx_response);
1156: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1157: aso_debug_pub.add('after calling IBY_FNDCPT_SETUP_PUB.Update_Card', 1, 'Y');
1158: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1159: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1160: aso_debug_pub.add('x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
1161: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1162: END IF;
1155: x_response => lx_response);
1156: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1157: aso_debug_pub.add('after calling IBY_FNDCPT_SETUP_PUB.Update_Card', 1, 'Y');
1158: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1159: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1160: aso_debug_pub.add('x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
1161: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1162: END IF;
1163:
1156: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1157: aso_debug_pub.add('after calling IBY_FNDCPT_SETUP_PUB.Update_Card', 1, 'Y');
1158: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1159: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1160: aso_debug_pub.add('x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
1161: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1162: END IF;
1163:
1164: if x_return_status <> fnd_api.g_ret_sts_success then
1157: aso_debug_pub.add('after calling IBY_FNDCPT_SETUP_PUB.Update_Card', 1, 'Y');
1158: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1159: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1160: aso_debug_pub.add('x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
1161: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1162: END IF;
1163:
1164: if x_return_status <> fnd_api.g_ret_sts_success then
1165: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1191:
1192: END IF; -- trxn_extension_id not null check
1193: end if;
1194:
1195: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1196: aso_debug_pub.add('l_payer.party_id: '|| l_payer.party_id, 1, 'Y');
1197: aso_debug_pub.add('l_orig_party_id: '|| l_orig_party_id, 1, 'Y');
1198: aso_debug_pub.add('l_shared_cart_scenario: '|| l_shared_cart_scenario, 1, 'Y');
1199: END IF;
1192: END IF; -- trxn_extension_id not null check
1193: end if;
1194:
1195: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1196: aso_debug_pub.add('l_payer.party_id: '|| l_payer.party_id, 1, 'Y');
1197: aso_debug_pub.add('l_orig_party_id: '|| l_orig_party_id, 1, 'Y');
1198: aso_debug_pub.add('l_shared_cart_scenario: '|| l_shared_cart_scenario, 1, 'Y');
1199: END IF;
1200:
1193: end if;
1194:
1195: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1196: aso_debug_pub.add('l_payer.party_id: '|| l_payer.party_id, 1, 'Y');
1197: aso_debug_pub.add('l_orig_party_id: '|| l_orig_party_id, 1, 'Y');
1198: aso_debug_pub.add('l_shared_cart_scenario: '|| l_shared_cart_scenario, 1, 'Y');
1199: END IF;
1200:
1201: l_trxn_attribs.Originating_Application_Id := 697;
1194:
1195: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1196: aso_debug_pub.add('l_payer.party_id: '|| l_payer.party_id, 1, 'Y');
1197: aso_debug_pub.add('l_orig_party_id: '|| l_orig_party_id, 1, 'Y');
1198: aso_debug_pub.add('l_shared_cart_scenario: '|| l_shared_cart_scenario, 1, 'Y');
1199: END IF;
1200:
1201: l_trxn_attribs.Originating_Application_Id := 697;
1202: l_trxn_attribs.Order_Id := to_char(l_payment_rec.payment_id)||'-'||l_qte_header_rec.quote_number;
1210: End if;
1211:
1212: -- Check to see if cvv2 is mandatory or not
1213: /* In case of updating the trxn no need to check for cvv2 see bug 4746260
1214: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1215: aso_debug_pub.add('Before calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
1216: END IF;
1217:
1218: IBY_FNDCPT_SETUP_PUB.Get_Payment_Channel_Attribs
1211:
1212: -- Check to see if cvv2 is mandatory or not
1213: /* In case of updating the trxn no need to check for cvv2 see bug 4746260
1214: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1215: aso_debug_pub.add('Before calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
1216: END IF;
1217:
1218: IBY_FNDCPT_SETUP_PUB.Get_Payment_Channel_Attribs
1219: (
1225: p_channel_code => 'CREDIT_CARD',
1226: x_channel_attrib_uses => lx_channel_attrib_uses,
1227: x_response => lx_response);
1228:
1229: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1230: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
1231: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1232: aso_debug_pub.add('cvv2 use: '||lx_channel_attrib_uses.Instr_SecCode_Use, 1, 'Y');
1233: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1226: x_channel_attrib_uses => lx_channel_attrib_uses,
1227: x_response => lx_response);
1228:
1229: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1230: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
1231: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1232: aso_debug_pub.add('cvv2 use: '||lx_channel_attrib_uses.Instr_SecCode_Use, 1, 'Y');
1233: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1234: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
1227: x_response => lx_response);
1228:
1229: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1230: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
1231: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1232: aso_debug_pub.add('cvv2 use: '||lx_channel_attrib_uses.Instr_SecCode_Use, 1, 'Y');
1233: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1234: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
1235: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1228:
1229: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1230: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
1231: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1232: aso_debug_pub.add('cvv2 use: '||lx_channel_attrib_uses.Instr_SecCode_Use, 1, 'Y');
1233: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1234: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
1235: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1236: END IF;
1229: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1230: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
1231: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1232: aso_debug_pub.add('cvv2 use: '||lx_channel_attrib_uses.Instr_SecCode_Use, 1, 'Y');
1233: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1234: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
1235: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1236: END IF;
1237:
1230: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
1231: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1232: aso_debug_pub.add('cvv2 use: '||lx_channel_attrib_uses.Instr_SecCode_Use, 1, 'Y');
1233: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1234: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
1235: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1236: END IF;
1237:
1238: IF (nvl(lx_channel_attrib_uses.Instr_SecCode_Use,'null') = 'REQUIRED' and
1231: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1232: aso_debug_pub.add('cvv2 use: '||lx_channel_attrib_uses.Instr_SecCode_Use, 1, 'Y');
1233: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1234: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
1235: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1236: END IF;
1237:
1238: IF (nvl(lx_channel_attrib_uses.Instr_SecCode_Use,'null') = 'REQUIRED' and
1239: (l_payment_rec.cvv2 is null or l_payment_rec.cvv2 = fnd_api.g_miss_char)) then
1266: Open c_check_authorized_flag(l_db_payment_rec.trxn_extension_id);
1267: Fetch c_check_authorized_flag Into l_authorized_flag;
1268: Close c_check_authorized_flag;
1269:
1270: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1271: aso_debug_pub.add('update_payment_row , l_authorized_flag : '||l_authorized_flag, 1, 'Y');
1272: END IF;
1273:
1274: IF NVL(l_authorized_flag,'N') = 'N' Then
1267: Fetch c_check_authorized_flag Into l_authorized_flag;
1268: Close c_check_authorized_flag;
1269:
1270: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1271: aso_debug_pub.add('update_payment_row , l_authorized_flag : '||l_authorized_flag, 1, 'Y');
1272: END IF;
1273:
1274: IF NVL(l_authorized_flag,'N') = 'N' Then
1275: /*** End : Code change done for Bug 14619666 ***/
1273:
1274: IF NVL(l_authorized_flag,'N') = 'N' Then
1275: /*** End : Code change done for Bug 14619666 ***/
1276:
1277: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1278: aso_debug_pub.add('Before calling IBY_FNDCPT_TRXN_PUB.Update_Transaction_Extension ', 1, 'Y');
1279: aso_debug_pub.add('Instrument Assignment id: '|| l_payment_rec.instr_assignment_id, 1, 'Y');
1280: END IF;
1281:
1274: IF NVL(l_authorized_flag,'N') = 'N' Then
1275: /*** End : Code change done for Bug 14619666 ***/
1276:
1277: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1278: aso_debug_pub.add('Before calling IBY_FNDCPT_TRXN_PUB.Update_Transaction_Extension ', 1, 'Y');
1279: aso_debug_pub.add('Instrument Assignment id: '|| l_payment_rec.instr_assignment_id, 1, 'Y');
1280: END IF;
1281:
1282: IBY_FNDCPT_TRXN_PUB.Update_Transaction_Extension
1275: /*** End : Code change done for Bug 14619666 ***/
1276:
1277: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1278: aso_debug_pub.add('Before calling IBY_FNDCPT_TRXN_PUB.Update_Transaction_Extension ', 1, 'Y');
1279: aso_debug_pub.add('Instrument Assignment id: '|| l_payment_rec.instr_assignment_id, 1, 'Y');
1280: END IF;
1281:
1282: IBY_FNDCPT_TRXN_PUB.Update_Transaction_Extension
1283: (
1294: p_instr_assignment => l_payment_rec.instr_assignment_id,
1295: p_trxn_attribs => l_trxn_attribs,
1296: x_response => lx_response);
1297:
1298: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1299: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Update_Transaction_Extension ', 1, 'Y');
1300: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1301: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1302: aso_debug_pub.add('x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
1295: p_trxn_attribs => l_trxn_attribs,
1296: x_response => lx_response);
1297:
1298: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1299: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Update_Transaction_Extension ', 1, 'Y');
1300: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1301: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1302: aso_debug_pub.add('x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
1303: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1296: x_response => lx_response);
1297:
1298: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1299: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Update_Transaction_Extension ', 1, 'Y');
1300: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1301: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1302: aso_debug_pub.add('x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
1303: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1304: END IF;
1297:
1298: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1299: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Update_Transaction_Extension ', 1, 'Y');
1300: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1301: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1302: aso_debug_pub.add('x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
1303: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1304: END IF;
1305:
1298: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1299: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Update_Transaction_Extension ', 1, 'Y');
1300: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1301: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1302: aso_debug_pub.add('x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
1303: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1304: END IF;
1305:
1306: IF x_return_status <> fnd_api.g_ret_sts_success then
1299: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Update_Transaction_Extension ', 1, 'Y');
1300: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1301: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1302: aso_debug_pub.add('x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
1303: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1304: END IF;
1305:
1306: IF x_return_status <> fnd_api.g_ret_sts_success then
1307: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1325: and l_db_payment_rec.trxn_extension_id <> fnd_api.g_miss_num ) THEN
1326:
1327: -- set the party id to that of the orig user for deleting the trxn
1328: l_payer.party_id := l_orig_party_id;
1329: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1330: aso_debug_pub.add('Before Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension ', 1, 'Y');
1331: aso_debug_pub.add('l_payer.party_id: '|| l_payer.party_id, 1, 'Y');
1332: aso_debug_pub.add('l_db_payment_rec.trxn_extension_id: '|| l_db_payment_rec.trxn_extension_id, 1, 'Y');
1333: END IF;
1326:
1327: -- set the party id to that of the orig user for deleting the trxn
1328: l_payer.party_id := l_orig_party_id;
1329: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1330: aso_debug_pub.add('Before Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension ', 1, 'Y');
1331: aso_debug_pub.add('l_payer.party_id: '|| l_payer.party_id, 1, 'Y');
1332: aso_debug_pub.add('l_db_payment_rec.trxn_extension_id: '|| l_db_payment_rec.trxn_extension_id, 1, 'Y');
1333: END IF;
1334:
1327: -- set the party id to that of the orig user for deleting the trxn
1328: l_payer.party_id := l_orig_party_id;
1329: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1330: aso_debug_pub.add('Before Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension ', 1, 'Y');
1331: aso_debug_pub.add('l_payer.party_id: '|| l_payer.party_id, 1, 'Y');
1332: aso_debug_pub.add('l_db_payment_rec.trxn_extension_id: '|| l_db_payment_rec.trxn_extension_id, 1, 'Y');
1333: END IF;
1334:
1335: IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension
1328: l_payer.party_id := l_orig_party_id;
1329: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1330: aso_debug_pub.add('Before Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension ', 1, 'Y');
1331: aso_debug_pub.add('l_payer.party_id: '|| l_payer.party_id, 1, 'Y');
1332: aso_debug_pub.add('l_db_payment_rec.trxn_extension_id: '|| l_db_payment_rec.trxn_extension_id, 1, 'Y');
1333: END IF;
1334:
1335: IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension
1336: (
1345: p_payer_equivalency => IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,
1346: x_response => lx_response
1347: );
1348:
1349: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1350: aso_debug_pub.add('After Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension ', 1, 'Y');
1351: aso_debug_pub.add('Return Status from IBY Delete API: '||x_return_status, 1, 'Y');
1352: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1353: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
1346: x_response => lx_response
1347: );
1348:
1349: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1350: aso_debug_pub.add('After Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension ', 1, 'Y');
1351: aso_debug_pub.add('Return Status from IBY Delete API: '||x_return_status, 1, 'Y');
1352: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1353: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
1354: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1347: );
1348:
1349: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1350: aso_debug_pub.add('After Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension ', 1, 'Y');
1351: aso_debug_pub.add('Return Status from IBY Delete API: '||x_return_status, 1, 'Y');
1352: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1353: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
1354: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1355: END IF;
1348:
1349: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1350: aso_debug_pub.add('After Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension ', 1, 'Y');
1351: aso_debug_pub.add('Return Status from IBY Delete API: '||x_return_status, 1, 'Y');
1352: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1353: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
1354: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1355: END IF;
1356:
1349: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1350: aso_debug_pub.add('After Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension ', 1, 'Y');
1351: aso_debug_pub.add('Return Status from IBY Delete API: '||x_return_status, 1, 'Y');
1352: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1353: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
1354: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1355: END IF;
1356:
1357: if x_return_status <> fnd_api.g_ret_sts_success then
1350: aso_debug_pub.add('After Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension ', 1, 'Y');
1351: aso_debug_pub.add('Return Status from IBY Delete API: '||x_return_status, 1, 'Y');
1352: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1353: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
1354: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1355: END IF;
1356:
1357: if x_return_status <> fnd_api.g_ret_sts_success then
1358: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1376: end if; -- end if for the l_shared_cart_scenario flag check
1377:
1378: -- The earlier card stored in the db had no transaction ext id so it must be an Istore Fax CC scenario
1379: -- or this is a shared card scenario and cc has been created by shared user, hence create a new trxn ext
1380: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1381: aso_debug_pub.add('No trx ext id exists for cc iStore Fax CC being updated ', 1, 'Y');
1382: aso_debug_pub.add('Before calling IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension ', 1, 'Y');
1383: aso_debug_pub.add('Instrument Assignment id: '|| l_payment_rec.instr_assignment_id, 1, 'Y');
1384: aso_debug_pub.add('l_payer.party_id: '|| l_payer.party_id,1,'Y');
1377:
1378: -- The earlier card stored in the db had no transaction ext id so it must be an Istore Fax CC scenario
1379: -- or this is a shared card scenario and cc has been created by shared user, hence create a new trxn ext
1380: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1381: aso_debug_pub.add('No trx ext id exists for cc iStore Fax CC being updated ', 1, 'Y');
1382: aso_debug_pub.add('Before calling IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension ', 1, 'Y');
1383: aso_debug_pub.add('Instrument Assignment id: '|| l_payment_rec.instr_assignment_id, 1, 'Y');
1384: aso_debug_pub.add('l_payer.party_id: '|| l_payer.party_id,1,'Y');
1385: END IF;
1378: -- The earlier card stored in the db had no transaction ext id so it must be an Istore Fax CC scenario
1379: -- or this is a shared card scenario and cc has been created by shared user, hence create a new trxn ext
1380: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1381: aso_debug_pub.add('No trx ext id exists for cc iStore Fax CC being updated ', 1, 'Y');
1382: aso_debug_pub.add('Before calling IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension ', 1, 'Y');
1383: aso_debug_pub.add('Instrument Assignment id: '|| l_payment_rec.instr_assignment_id, 1, 'Y');
1384: aso_debug_pub.add('l_payer.party_id: '|| l_payer.party_id,1,'Y');
1385: END IF;
1386:
1379: -- or this is a shared card scenario and cc has been created by shared user, hence create a new trxn ext
1380: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1381: aso_debug_pub.add('No trx ext id exists for cc iStore Fax CC being updated ', 1, 'Y');
1382: aso_debug_pub.add('Before calling IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension ', 1, 'Y');
1383: aso_debug_pub.add('Instrument Assignment id: '|| l_payment_rec.instr_assignment_id, 1, 'Y');
1384: aso_debug_pub.add('l_payer.party_id: '|| l_payer.party_id,1,'Y');
1385: END IF;
1386:
1387: -- Check to see if cvv2 is mandatory or not
1380: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1381: aso_debug_pub.add('No trx ext id exists for cc iStore Fax CC being updated ', 1, 'Y');
1382: aso_debug_pub.add('Before calling IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension ', 1, 'Y');
1383: aso_debug_pub.add('Instrument Assignment id: '|| l_payment_rec.instr_assignment_id, 1, 'Y');
1384: aso_debug_pub.add('l_payer.party_id: '|| l_payer.party_id,1,'Y');
1385: END IF;
1386:
1387: -- Check to see if cvv2 is mandatory or not
1388: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1384: aso_debug_pub.add('l_payer.party_id: '|| l_payer.party_id,1,'Y');
1385: END IF;
1386:
1387: -- Check to see if cvv2 is mandatory or not
1388: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1389: aso_debug_pub.add('Before calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
1390: END IF;
1391:
1392: IBY_FNDCPT_SETUP_PUB.Get_Payment_Channel_Attribs
1385: END IF;
1386:
1387: -- Check to see if cvv2 is mandatory or not
1388: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1389: aso_debug_pub.add('Before calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
1390: END IF;
1391:
1392: IBY_FNDCPT_SETUP_PUB.Get_Payment_Channel_Attribs
1393: (
1399: p_channel_code => 'CREDIT_CARD',
1400: x_channel_attrib_uses => lx_channel_attrib_uses,
1401: x_response => lx_response);
1402:
1403: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1404: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
1405: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1406: aso_debug_pub.add('cvv2 use: '||lx_channel_attrib_uses.Instr_SecCode_Use, 1, 'Y');
1407: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1400: x_channel_attrib_uses => lx_channel_attrib_uses,
1401: x_response => lx_response);
1402:
1403: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1404: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
1405: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1406: aso_debug_pub.add('cvv2 use: '||lx_channel_attrib_uses.Instr_SecCode_Use, 1, 'Y');
1407: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1408: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
1401: x_response => lx_response);
1402:
1403: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1404: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
1405: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1406: aso_debug_pub.add('cvv2 use: '||lx_channel_attrib_uses.Instr_SecCode_Use, 1, 'Y');
1407: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1408: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
1409: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1402:
1403: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1404: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
1405: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1406: aso_debug_pub.add('cvv2 use: '||lx_channel_attrib_uses.Instr_SecCode_Use, 1, 'Y');
1407: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1408: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
1409: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1410: END IF;
1403: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1404: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
1405: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1406: aso_debug_pub.add('cvv2 use: '||lx_channel_attrib_uses.Instr_SecCode_Use, 1, 'Y');
1407: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1408: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
1409: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1410: END IF;
1411:
1404: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Get_Payment_Channel_Attribs ', 1, 'Y');
1405: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1406: aso_debug_pub.add('cvv2 use: '||lx_channel_attrib_uses.Instr_SecCode_Use, 1, 'Y');
1407: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1408: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
1409: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1410: END IF;
1411:
1412: IF (nvl(lx_channel_attrib_uses.Instr_SecCode_Use,'null') = 'REQUIRED' and
1405: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1406: aso_debug_pub.add('cvv2 use: '||lx_channel_attrib_uses.Instr_SecCode_Use, 1, 'Y');
1407: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1408: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
1409: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1410: END IF;
1411:
1412: IF (nvl(lx_channel_attrib_uses.Instr_SecCode_Use,'null') = 'REQUIRED' and
1413: (l_payment_rec.cvv2 is null or l_payment_rec.cvv2 = fnd_api.g_miss_char)) then
1434: p_trxn_attribs => l_trxn_attribs,
1435: x_entity_id => lx_entity_id,
1436: x_response => lx_response);
1437:
1438: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1439: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension ', 1, 'Y');
1440: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1441: aso_debug_pub.add('lx_entity_id: '||lx_entity_id, 1, 'Y');
1442: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1435: x_entity_id => lx_entity_id,
1436: x_response => lx_response);
1437:
1438: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1439: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension ', 1, 'Y');
1440: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1441: aso_debug_pub.add('lx_entity_id: '||lx_entity_id, 1, 'Y');
1442: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1443: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
1436: x_response => lx_response);
1437:
1438: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1439: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension ', 1, 'Y');
1440: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1441: aso_debug_pub.add('lx_entity_id: '||lx_entity_id, 1, 'Y');
1442: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1443: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
1444: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1437:
1438: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1439: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension ', 1, 'Y');
1440: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1441: aso_debug_pub.add('lx_entity_id: '||lx_entity_id, 1, 'Y');
1442: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1443: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
1444: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1445: END IF;
1438: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1439: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension ', 1, 'Y');
1440: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1441: aso_debug_pub.add('lx_entity_id: '||lx_entity_id, 1, 'Y');
1442: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1443: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
1444: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1445: END IF;
1446:
1439: aso_debug_pub.add('after calling IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension ', 1, 'Y');
1440: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1441: aso_debug_pub.add('lx_entity_id: '||lx_entity_id, 1, 'Y');
1442: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1443: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
1444: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1445: END IF;
1446:
1447: if x_return_status <> fnd_api.g_ret_sts_success then
1440: aso_debug_pub.add('Return Status: '||x_return_status, 1, 'Y');
1441: aso_debug_pub.add('lx_entity_id: '||lx_entity_id, 1, 'Y');
1442: aso_debug_pub.add('x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1443: aso_debug_pub.add('x_response.result_category:'|| to_char(lx_response.result_category), 1, 'Y');
1444: aso_debug_pub.add('x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1445: END IF;
1446:
1447: if x_return_status <> fnd_api.g_ret_sts_success then
1448: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1469: else
1470: l_payment_ref_number := l_payment_rec.PAYMENT_REF_NUMBER;
1471: END IF;
1472:
1473: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1474: aso_debug_pub.add('before calling the table handler to update the data ', 1, 'Y');
1475: END IF;
1476:
1477: ASO_PAYMENTS_PKG.Update_Row(
1470: l_payment_ref_number := l_payment_rec.PAYMENT_REF_NUMBER;
1471: END IF;
1472:
1473: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1474: aso_debug_pub.add('before calling the table handler to update the data ', 1, 'Y');
1475: END IF;
1476:
1477: ASO_PAYMENTS_PKG.Update_Row(
1478: p_PAYMENT_ID => l_payment_rec.PAYMENT_ID,
1543: ( p_count => x_msg_count,
1544: p_data => x_msg_data
1545: );
1546:
1547: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
1548: aso_debug_pub.ADD ('END update_payment_row',1,'N');
1549: END IF;
1550:
1551: EXCEPTION
1544: p_data => x_msg_data
1545: );
1546:
1547: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
1548: aso_debug_pub.ADD ('END update_payment_row',1,'N');
1549: END IF;
1550:
1551: EXCEPTION
1552: WHEN FND_API.G_EXC_ERROR THEN
1604:
1605: Begin
1606:
1607: SAVEPOINT DELETE_PAYMENT_ROW_INT;
1608: aso_debug_pub.g_debug_flag := nvl(fnd_profile.value('ASO_ENABLE_DEBUG'),'N');
1609:
1610: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1611: aso_debug_pub.add('Begin delete_payment_row ', 1, 'Y');
1612: END IF;
1606:
1607: SAVEPOINT DELETE_PAYMENT_ROW_INT;
1608: aso_debug_pub.g_debug_flag := nvl(fnd_profile.value('ASO_ENABLE_DEBUG'),'N');
1609:
1610: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1611: aso_debug_pub.add('Begin delete_payment_row ', 1, 'Y');
1612: END IF;
1613:
1614: x_return_status := FND_API.G_RET_STS_SUCCESS;
1607: SAVEPOINT DELETE_PAYMENT_ROW_INT;
1608: aso_debug_pub.g_debug_flag := nvl(fnd_profile.value('ASO_ENABLE_DEBUG'),'N');
1609:
1610: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1611: aso_debug_pub.add('Begin delete_payment_row ', 1, 'Y');
1612: END IF;
1613:
1614: x_return_status := FND_API.G_RET_STS_SUCCESS;
1615:
1628: l_payment_rec := l_payment_tbl(1);
1629:
1630: if l_payment_tbl.count > 0 and l_payment_rec.payment_type_code = 'CREDIT_CARD' then
1631:
1632: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1633: aso_debug_pub.add('Database payment_type_code is : '|| l_payment_rec.payment_type_code, 1, 'Y');
1634: END IF;
1635:
1636: l_payer.payment_function := 'CUSTOMER_PAYMENT';
1629:
1630: if l_payment_tbl.count > 0 and l_payment_rec.payment_type_code = 'CREDIT_CARD' then
1631:
1632: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1633: aso_debug_pub.add('Database payment_type_code is : '|| l_payment_rec.payment_type_code, 1, 'Y');
1634: END IF;
1635:
1636: l_payer.payment_function := 'CUSTOMER_PAYMENT';
1637: l_payer.cust_account_id := null;
1641: fetch c_get_payer_from_trxn into l_payer.party_id;
1642: close c_get_payer_from_trxn;
1643:
1644:
1645: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1646: aso_debug_pub.add('Before Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension ', 1, 'Y');
1647: aso_debug_pub.add('l_payer.party_id: '|| l_payer.party_id, 1, 'Y');
1648: aso_debug_pub.add('l_payment_rec.trxn_extension_id: '|| l_payment_rec.trxn_extension_id, 1, 'Y');
1649: END IF;
1642: close c_get_payer_from_trxn;
1643:
1644:
1645: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1646: aso_debug_pub.add('Before Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension ', 1, 'Y');
1647: aso_debug_pub.add('l_payer.party_id: '|| l_payer.party_id, 1, 'Y');
1648: aso_debug_pub.add('l_payment_rec.trxn_extension_id: '|| l_payment_rec.trxn_extension_id, 1, 'Y');
1649: END IF;
1650:
1643:
1644:
1645: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1646: aso_debug_pub.add('Before Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension ', 1, 'Y');
1647: aso_debug_pub.add('l_payer.party_id: '|| l_payer.party_id, 1, 'Y');
1648: aso_debug_pub.add('l_payment_rec.trxn_extension_id: '|| l_payment_rec.trxn_extension_id, 1, 'Y');
1649: END IF;
1650:
1651: IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension
1644:
1645: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1646: aso_debug_pub.add('Before Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension ', 1, 'Y');
1647: aso_debug_pub.add('l_payer.party_id: '|| l_payer.party_id, 1, 'Y');
1648: aso_debug_pub.add('l_payment_rec.trxn_extension_id: '|| l_payment_rec.trxn_extension_id, 1, 'Y');
1649: END IF;
1650:
1651: IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension
1652: (
1661: p_payer_equivalency => IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_UPWARD,
1662: x_response => lx_response
1663: );
1664:
1665: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1666: aso_debug_pub.add('After Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension ', 1, 'Y');
1667: aso_debug_pub.add('Return Status from IBY Delete API: '||x_return_status, 1, 'Y');
1668: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1669: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
1662: x_response => lx_response
1663: );
1664:
1665: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1666: aso_debug_pub.add('After Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension ', 1, 'Y');
1667: aso_debug_pub.add('Return Status from IBY Delete API: '||x_return_status, 1, 'Y');
1668: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1669: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
1670: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1663: );
1664:
1665: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1666: aso_debug_pub.add('After Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension ', 1, 'Y');
1667: aso_debug_pub.add('Return Status from IBY Delete API: '||x_return_status, 1, 'Y');
1668: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1669: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
1670: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1671: END IF;
1664:
1665: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1666: aso_debug_pub.add('After Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension ', 1, 'Y');
1667: aso_debug_pub.add('Return Status from IBY Delete API: '||x_return_status, 1, 'Y');
1668: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1669: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
1670: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1671: END IF;
1672:
1665: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1666: aso_debug_pub.add('After Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension ', 1, 'Y');
1667: aso_debug_pub.add('Return Status from IBY Delete API: '||x_return_status, 1, 'Y');
1668: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1669: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
1670: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1671: END IF;
1672:
1673: if x_return_status <> fnd_api.g_ret_sts_success then
1666: aso_debug_pub.add('After Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension ', 1, 'Y');
1667: aso_debug_pub.add('Return Status from IBY Delete API: '||x_return_status, 1, 'Y');
1668: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_code: '|| to_char(lx_response.result_code), 1, 'Y');
1669: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_category: '|| to_char(lx_response.result_category), 1, 'Y');
1670: aso_debug_pub.add('Delete_Transaction_Extension x_response.result_message: '|| to_char(lx_response.result_message), 1, 'Y');
1671: END IF;
1672:
1673: if x_return_status <> fnd_api.g_ret_sts_success then
1674: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1697: ( p_count => x_msg_count,
1698: p_data => x_msg_data
1699: );
1700:
1701: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
1702: aso_debug_pub.ADD ('END delete_payment_row',1,'N');
1703: END IF;
1704:
1705: EXCEPTION
1698: p_data => x_msg_data
1699: );
1700:
1701: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
1702: aso_debug_pub.ADD ('END delete_payment_row',1,'N');
1703: END IF;
1704:
1705: EXCEPTION
1706: WHEN FND_API.G_EXC_ERROR THEN
1748: COMMIT;
1749:
1750: EXCEPTION
1751: WHEN OTHERS THEN
1752: aso_debug_pub.ADD('Exception in PURGE_ASO_PAYMENTS_DATA, Sqlerrm :' || SQLERRM,1,'N');
1753: aso_debug_pub.ADD('Exception in PURGE_ASO_PAYMENTS_DATA, SqlCode :' || SQLCODE,1,'N');
1754:
1755: End PURGE_ASO_PAYMENTS_DATA;
1756: /* Code change for Bug 9746746 End */
1749:
1750: EXCEPTION
1751: WHEN OTHERS THEN
1752: aso_debug_pub.ADD('Exception in PURGE_ASO_PAYMENTS_DATA, Sqlerrm :' || SQLERRM,1,'N');
1753: aso_debug_pub.ADD('Exception in PURGE_ASO_PAYMENTS_DATA, SqlCode :' || SQLCODE,1,'N');
1754:
1755: End PURGE_ASO_PAYMENTS_DATA;
1756: /* Code change for Bug 9746746 End */
1757: