DBA Data[Home] [Help]

APPS.AR_IREC_PAYMENTS dependencies on AR_IREC_PAYMENT_LIST_GT

Line 713: from AR_IREC_PAYMENT_LIST_GT

709: l_debug_info := 'There are multiple invoices: get customer information';
710: ------------------------------------------------------------------------
711: BEGIN
712: select customer_id,customer_site_use_id,currency_code into l_customer_id,l_site_use_id,l_currency_code
713: from AR_IREC_PAYMENT_LIST_GT
714: where customer_id = p_customer_id
715: and customer_site_use_id = nvl(decode(p_site_use_id, -1, null, p_site_use_id), customer_site_use_id);
716: EXCEPTION
717: when others then

Line 726: from AR_IREC_PAYMENT_LIST_GT

722: if ( l_customer_id is null ) then
723: --Code should not come here ideally
724: BEGIN
725: select currency_code into l_currency_code
726: from AR_IREC_PAYMENT_LIST_GT
727: group by currency_code;
728: EXCEPTION
729: when others then
730: IF (PG_DEBUG = 'Y') THEN

Line 2385: --DELETE FROM AR_IREC_PAYMENT_LIST_GT

2381: arp_standard.debug(l_debug_info);
2382: END IF;
2383:
2384: --Bug # 3467287 - The Global Temp table must be striped by Customer and Customer Site.
2385: --DELETE FROM AR_IREC_PAYMENT_LIST_GT
2386: --WHERE CUSTOMER_ID = p_customer_id
2387: --AND CUSTOMER_SITE_USE_ID = nvl(p_customer_site_use_id, CUSTOMER_SITE_USE_ID)
2388: --AND CURRENCY_CODE = p_currency_code;
2389: -- commented the delete sql as part of bug 9173720

Line 2393: DELETE FROM AR_IREC_PAYMENT_LIST_GT

2389: -- commented the delete sql as part of bug 9173720
2390:
2391: --Added for bug # 9696274
2392: if(p_payment_schedule_id is not null) then
2393: DELETE FROM AR_IREC_PAYMENT_LIST_GT
2394: WHERE PAYMENT_SCHEDULE_ID = p_payment_schedule_id
2395: AND CURRENCY_CODE = p_currency_code;
2396: end if;
2397:

Line 2466: -- select 1 into l_trx_rec_exists FROM ar_irec_payment_list_gt where payment_schedule_id = l_open_invoice_list_rec(trx).payment_schedule_id;

2462:
2463: --Commented for bug # 9696274
2464: -- Added for bug 9173720
2465: -- BEGIN
2466: -- select 1 into l_trx_rec_exists FROM ar_irec_payment_list_gt where payment_schedule_id = l_open_invoice_list_rec(trx).payment_schedule_id;
2467: -- EXCEPTION
2468: -- WHEN NO_DATA_FOUND THEN
2469: -- l_trx_rec_Exists :=0;
2470: -- END;

Line 2479: INSERT INTO AR_IREC_PAYMENT_LIST_GT

2475: end loop;
2476:
2477: FORALL trx
2478: IN l_open_invoice_list_rec.first .. l_open_invoice_list_rec.last
2479: INSERT INTO AR_IREC_PAYMENT_LIST_GT
2480: VALUES l_open_invoice_list_rec(trx);
2481:
2482: ----------------------------------------------------------------------------------------
2483: l_debug_info := 'Compute service charge';

Line 2668: INSERT INTO AR_IREC_PAYMENT_LIST_GT

2664:
2665: FORALL trx
2666: IN l_credit_transactions_list_rec.first .. l_credit_transactions_list_rec.last
2667:
2668: INSERT INTO AR_IREC_PAYMENT_LIST_GT
2669: VALUES l_credit_transactions_list_rec(trx);
2670:
2671: COMMIT;
2672:

Line 2762: FROM AR_IREC_PAYMENT_LIST_GT

2758: customer_trx_id,
2759: currency_code,
2760: service_charge,
2761: trx_date
2762: FROM AR_IREC_PAYMENT_LIST_GT
2763: WHERE customer_id = p_customer_id
2764: AND customer_site_use_id = nvl(decode(p_site_use_id, -1, null, p_site_use_id), customer_site_use_id)
2765: AND trx_class in ('INV','DEP', 'DM', 'CB', 'CM') --Modified for Bug 14781706
2766: FOR UPDATE;

Line 2835: UPDATE AR_IREC_PAYMENT_LIST_GT

2831: -----------------------------------------------------------------------------------------
2832: IF (PG_DEBUG = 'Y') THEN
2833: arp_standard.debug(l_debug_info);
2834: END IF;
2835: UPDATE AR_IREC_PAYMENT_LIST_GT
2836: SET discount_amount = l_discount_amount,
2837: receipt_date = trunc(l_receipt_date),
2838: payment_amt = l_payment_amount
2839: WHERE CURRENT OF invoice_list;

Line 3685: FROM ar_irec_payment_list_gt

3681:
3682: --Bug # 3467287 - The Global Temp table must be striped by Customer and Customer Site.
3683: CURSOR credit_trx_list IS
3684: SELECT *
3685: FROM ar_irec_payment_list_gt
3686: WHERE customer_id = p_customer_id
3687: AND customer_site_use_id = nvl(decode(p_site_use_id, -1, null, p_site_use_id), customer_site_use_id)
3688: AND ( trx_class = 'CM'
3689: OR

Line 3695: FROM ar_irec_payment_list_gt

3691: );
3692:
3693: CURSOR debit_trx_list IS
3694: SELECT *
3695: FROM ar_irec_payment_list_gt
3696: WHERE customer_id = p_customer_id
3697: AND customer_site_use_id = nvl(decode(p_site_use_id, -1, null, p_site_use_id), customer_site_use_id)
3698: AND ( trx_class = 'INV' OR
3699: trx_class = 'DM' OR

Line 3738: --Pring in the debug log : Total No of rows in ar_irec_payment_list_gt

3734: || 'p_site_use_id=' || p_site_use_id || ','
3735: || 'p_cash_receipt_id=' || p_cash_receipt_id);
3736: end if;
3737:
3738: --Pring in the debug log : Total No of rows in ar_irec_payment_list_gt
3739:
3740: SELECT COUNT(*)
3741: INTO total_trx_count
3742: FROM ar_irec_payment_list_gt;

Line 3742: FROM ar_irec_payment_list_gt;

3738: --Pring in the debug log : Total No of rows in ar_irec_payment_list_gt
3739:
3740: SELECT COUNT(*)
3741: INTO total_trx_count
3742: FROM ar_irec_payment_list_gt;
3743:
3744: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3745: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Total no of rows in ar_irec_payment_list_gt='||total_trx_count);
3746: end if;

Line 3745: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Total no of rows in ar_irec_payment_list_gt='||total_trx_count);

3741: INTO total_trx_count
3742: FROM ar_irec_payment_list_gt;
3743:
3744: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3745: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Total no of rows in ar_irec_payment_list_gt='||total_trx_count);
3746: end if;
3747:
3748: --Pring in the debug log : No of rows that will be picked by the cursor credit_trx_list
3749:

Line 3752: FROM ar_irec_payment_list_gt

3748: --Pring in the debug log : No of rows that will be picked by the cursor credit_trx_list
3749:
3750: SELECT COUNT(*)
3751: INTO credit_trx_list_count
3752: FROM ar_irec_payment_list_gt
3753: WHERE customer_id = p_customer_id
3754: AND customer_site_use_id = nvl(decode(p_site_use_id, -1, null, p_site_use_id), customer_site_use_id)
3755: AND ( trx_class = 'CM' OR trx_class = 'PMT' );
3756:

Line 3765: FROM ar_irec_payment_list_gt

3761: --Pring in the debug log : No of rows that will be picked by the cursor debit_trx_list
3762:
3763: SELECT count(*)
3764: INTO debit_trx_list_count
3765: FROM ar_irec_payment_list_gt
3766: WHERE customer_id = p_customer_id
3767: AND customer_site_use_id = nvl(decode(p_site_use_id, -1, null, p_site_use_id), customer_site_use_id)
3768: AND ( trx_class = 'INV' OR
3769: trx_class = 'DM' OR

Line 4017: l_currency_code AR_IREC_PAYMENT_LIST_GT.currency_code%TYPE;

4013:
4014: l_invoice_list ARI_SERVICE_CHARGE_PKG.INVOICE_LIST_TABTYPE;
4015: l_total_service_charge NUMBER;
4016: l_count NUMBER;
4017: l_currency_code AR_IREC_PAYMENT_LIST_GT.currency_code%TYPE;
4018: l_service_charge NUMBER;
4019:
4020: l_procedure_name VARCHAR2(30);
4021: l_debug_info VARCHAR2(200);

Line 4034: FROM AR_IREC_PAYMENT_LIST_GT

4030: account_number,
4031: customer_trx_id,
4032: currency_code,
4033: service_charge
4034: FROM AR_IREC_PAYMENT_LIST_GT
4035: WHERE customer_id = p_customer_id
4036: AND customer_site_use_id = nvl(decode(p_site_use_id, -1, null, p_site_use_id), customer_site_use_id)
4037: AND trx_class IN ('INV','DM','CB','DEP');
4038:

Line 4133: UPDATE ar_irec_payment_list_gt

4129: -----------------------------------------------------------------------------------------
4130: IF (PG_DEBUG = 'Y') THEN
4131: arp_standard.debug(l_debug_info);
4132: END IF;
4133: UPDATE ar_irec_payment_list_gt
4134: SET service_charge = l_service_charge
4135: WHERE payment_schedule_id = l_invoice_list(l_count).payment_schedule_id;
4136:
4137: l_total_service_charge := l_total_service_charge + l_service_charge;

Line 4212: FROM AR_IREC_PAYMENT_LIST_GT

4208: customer_trx_id,
4209: currency_code,
4210: service_charge,
4211: receipt_date
4212: FROM AR_IREC_PAYMENT_LIST_GT
4213: WHERE customer_id = p_customer_id
4214: AND customer_site_use_id = nvl(decode(p_site_use_id, -1, null, p_site_use_id), customer_site_use_id)
4215: AND ( trx_class = 'INV' OR
4216: trx_class = 'DM' OR

Line 4557: from AR_IREC_PAYMENT_LIST_GT

4553: l_debug_info := 'Get the Payment Schedule Id if there is only one invoice';
4554: ---------------------------------------------------------------------------
4555: BEGIN
4556: select payment_schedule_id into p_payment_schedule_id
4557: from AR_IREC_PAYMENT_LIST_GT
4558: where customer_id = p_customer_id
4559: and customer_site_use_id = nvl(l_site_use_id, customer_site_use_id);
4560: EXCEPTION
4561: when others then

Line 4630: --Bug2925392: Get Currency from AR_IREC_PAYMENT_LIST_GT. All records will have same currency.

4626: END IF;
4627:
4628: --KRMENON DEBUG
4629: IF (l_receipt_currency_code IS NULL OR '' = l_receipt_currency_code) THEN
4630: --Bug2925392: Get Currency from AR_IREC_PAYMENT_LIST_GT. All records will have same currency.
4631: --Bug # 3467287 - The Global Temp table must be striped by Customer and Customer Site.
4632: ---------------------------------------------------------------------------
4633: l_debug_info := 'If the currency code is not set yet, get the currency code';
4634: ---------------------------------------------------------------------------

Line 4637: from AR_IREC_PAYMENT_LIST_GT

4633: l_debug_info := 'If the currency code is not set yet, get the currency code';
4634: ---------------------------------------------------------------------------
4635: BEGIN
4636: select currency_code into l_receipt_currency_code
4637: from AR_IREC_PAYMENT_LIST_GT
4638: where customer_id = p_customer_id
4639: and customer_site_use_id = nvl(l_site_use_id, customer_site_use_id);
4640: --group by currency_code;
4641: EXCEPTION

Line 5680: INSERT INTO AR_IREC_PAYMENT_LIST_GT

5676: IF (PG_DEBUG = 'Y') THEN
5677: arp_standard.debug(l_debug_info);
5678: END IF;
5679:
5680: INSERT INTO AR_IREC_PAYMENT_LIST_GT
5681: ( CUSTOMER_ID,
5682: CUSTOMER_SITE_USE_ID,
5683: ACCOUNT_NUMBER,
5684: CUSTOMER_TRX_ID,

Line 6424: UPDATE AR_IREC_PAYMENT_LIST_GT

6420: END IF;
6421: --Striping by currency code is not required because
6422: --it is not possible to navigate to Payment page with multiple currencies
6423: --in the Transaction List for a cusomer context
6424: UPDATE AR_IREC_PAYMENT_LIST_GT
6425: SET discount_amount = original_discount_amt,
6426: payment_amt = amount_due_remaining - original_discount_amt - nvl(dispute_amt,0)
6427: WHERE customer_id = p_customer_id
6428: AND customer_site_use_id = nvl(decode(p_site_use_id, -1, null, p_site_use_id),customer_site_use_id);

Line 6743: FROM ar_irec_payment_list_gt

6739: e_no_rows_in_GT EXCEPTION;
6740:
6741: CURSOR get_cust_site_use_id_cur IS
6742: SELECT DISTINCT pay_for_customer_site_id
6743: FROM ar_irec_payment_list_gt
6744: WHERE customer_id = p_customer_id;
6745:
6746: BEGIN
6747:

Line 6806: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Query on ar_irec_payment_list_gt returned 0 rows');

6802: l_customer_site_use_id := -1;
6803: EXIT;
6804: ELSIF get_cust_site_use_id_cur%ROWCOUNT = 0 THEN
6805: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6806: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Query on ar_irec_payment_list_gt returned 0 rows');
6807: end if;
6808: RAISE e_no_rows_in_GT;
6809: EXIT;
6810: END IF;

Line 6826: write_debug_and_log('No rows present in ar_irec_payment_list_gt for the given customer in ' || G_PKG_NAME || l_procedure_name);

6822: RETURN l_customer_site_use_id;
6823:
6824: EXCEPTION
6825: WHEN e_no_rows_in_GT THEN
6826: write_debug_and_log('No rows present in ar_irec_payment_list_gt for the given customer in ' || G_PKG_NAME || l_procedure_name);
6827: write_debug_and_log('p_session_id: '|| p_session_id);
6828: write_debug_and_log('p_user_id: '|| FND_GLOBAL.user_id);
6829: write_debug_and_log('p_customer_id: '|| p_customer_id);
6830: