DBA Data[Home] [Help]

APPS.AR_IREC_PAYMENTS dependencies on AR_IREC_PAYMENTS

Line 1: PACKAGE BODY AR_IREC_PAYMENTS AS

1: PACKAGE BODY AR_IREC_PAYMENTS AS
2: /* $Header: ARIRPMTB.pls 120.55.12010000.10 2009/02/13 09:06:05 avepati ship $ */
3:
4: /*=======================================================================+
5: | Package Global Constants

Line 7: G_PKG_NAME CONSTANT VARCHAR2(30) := 'AR_IREC_PAYMENTS';

3:
4: /*=======================================================================+
5: | Package Global Constants
6: +=======================================================================*/
7: G_PKG_NAME CONSTANT VARCHAR2(30) := 'AR_IREC_PAYMENTS';
8:
9:
10: TYPE INVOICE_REC_TYPE IS RECORD
11: (PAYMENT_SCHEDULE_ID NUMBER(15),

Line 135: arp_util.debug('ar_irec_payments_pkg.is_credit_card_number_valid()+0');

131: l_actual_cc_check_digit number := 0; /* First digit of credit card, numbered from right to left */
132: l_mod10_check_digit number := 0; /* Check digit after mod10 algorithm is applied */
133: j number := 0; /* Product table index */
134: BEGIN
135: arp_util.debug('ar_irec_payments_pkg.is_credit_card_number_valid()+0');
136:
137: SELECT lengthb(p_credit_card_number)
138: INTO l_len_credit_card_num
139: FROM dual;

Line 181: arp_util.debug('ar_irec_payments_pkg.is_credit_card_number_valid()-');

177: -- If actual check digit and check_digit after mod10 don't match, the credit card is an invalid one.
178: IF ( l_mod10_check_digit <> l_actual_cc_check_digit)
179: THEN
180: arp_util.debug('Card is Valid');
181: arp_util.debug('ar_irec_payments_pkg.is_credit_card_number_valid()-');
182: return(0);
183: ELSE
184: arp_util.debug('Card is not Valid');
185: arp_util.debug('ar_irec_payments_pkg.is_credit_card_number_valid()-');

Line 185: arp_util.debug('ar_irec_payments_pkg.is_credit_card_number_valid()-');

181: arp_util.debug('ar_irec_payments_pkg.is_credit_card_number_valid()-');
182: return(0);
183: ELSE
184: arp_util.debug('Card is not Valid');
185: arp_util.debug('ar_irec_payments_pkg.is_credit_card_number_valid()-');
186: return(1);
187: END IF;
188:
189: END is_credit_card_number_valid;

Line 228: -- arp_standard.debug('AR_IREC_PAYMENTS.get_credit_card_type()+');

224: /*-----------------------------------------------------------------------+
225: | Use for file debug or standard output debug |
226: +-----------------------------------------------------------------------*/
227:
228: -- arp_standard.debug('AR_IREC_PAYMENTS.get_credit_card_type()+');
229:
230: -- arp_standard.debug(' p_credit_card_number :' || p_credit_card_number);
231:
232: l_card_issuer iby_creditcard_issuers_b.card_issuer_code%TYPE;

Line 1430: if(ar_irec_payments.is_credit_card_payment_enabled(p_customer_id , p_customer_site_use_id , p_currency_code) = 1) then

1426:
1427: -- bank_branch_id will be always 1 for CC , -- bug 7712779
1428:
1429: if(last_used_instr_rec.bank_branch_id = 1) then
1430: if(ar_irec_payments.is_credit_card_payment_enabled(p_customer_id , p_customer_site_use_id , p_currency_code) = 1) then
1431: p_bank_account_num_masked := last_used_instr_rec.bank_account_num_masked;
1432: p_credit_card_expired := last_used_instr_rec.credit_card_expired;
1433: p_account_type := last_used_instr_rec.account_type;
1434: p_expiry_month := last_used_instr_rec.expiry_month;

Line 1452: if(ar_irec_payments.is_bank_acc_payment_enabled(p_customer_id , p_customer_site_use_id , p_currency_code)=1) then

1448:
1449: else
1450: -- bug 7712779
1451:
1452: if(ar_irec_payments.is_bank_acc_payment_enabled(p_customer_id , p_customer_site_use_id , p_currency_code)=1) then
1453: p_bank_account_num_masked := last_used_instr_rec.bank_account_num_masked;
1454: p_credit_card_expired := last_used_instr_rec.credit_card_expired;
1455: p_account_type := last_used_instr_rec.account_type;
1456: p_expiry_month := last_used_instr_rec.expiry_month;

Line 1512: if(ar_irec_payments.is_bank_acc_payment_enabled(p_customer_id , p_customer_site_use_id , p_currency_code) = 0) then

1508: FOR bank_account_rec IN bank_account_cur LOOP
1509:
1510: -- bug 7712779
1511:
1512: if(ar_irec_payments.is_bank_acc_payment_enabled(p_customer_id , p_customer_site_use_id , p_currency_code) = 0) then
1513: EXIT;
1514: end if;
1515:
1516: --If there are any BA, in the first iteration read those values.

Line 1551: if(ar_irec_payments.is_credit_card_payment_enabled(p_customer_id , p_customer_site_use_id , p_currency_code)=0) then

1547: FOR credit_card_rec IN credit_card_cur LOOP
1548:
1549: -- bug 7712779
1550:
1551: if(ar_irec_payments.is_credit_card_payment_enabled(p_customer_id , p_customer_site_use_id , p_currency_code)=0) then
1552: EXIT;
1553: end if;
1554:
1555: IF(l_ba_count <>1 AND l_cc_count = 0) THEN

Line 2441: DECODE (ps.class, 'PMT', ar_irec_payments.get_pymt_amnt_due_remaining(ps.cash_receipt_id),ps.AMOUNT_DUE_REMAINING) as AMOUNT_DUE_REMAINING,

2437: ps.freight_original freight_amount,
2438: ps.receivables_charges_charged finance_charge,
2439: ps.INVOICE_CURRENCY_CODE,
2440: ps.AMOUNT_DUE_ORIGINAL,
2441: DECODE (ps.class, 'PMT', ar_irec_payments.get_pymt_amnt_due_remaining(ps.cash_receipt_id),ps.AMOUNT_DUE_REMAINING) as AMOUNT_DUE_REMAINING,
2442: 0 payment_amt,
2443: 0 service_charge,
2444: 0 discount_amount,
2445: TRUNC(SYSDATE) receipt_date,

Line 6193: END AR_IREC_PAYMENTS;

6189:
6190:
6191: END get_customer_site_use_id;
6192:
6193: END AR_IREC_PAYMENTS;