DBA Data[Home] [Help]

APPS.AR_IREC_PAYMENTS dependencies on AR_IREC_PAYMENT_LIST_GT

Line 704: from AR_IREC_PAYMENT_LIST_GT

700: l_debug_info := 'There are multiple invoices: get customer information';
701: ------------------------------------------------------------------------
702: BEGIN
703: select customer_id,customer_site_use_id,currency_code into l_customer_id,l_site_use_id,l_currency_code
704: from AR_IREC_PAYMENT_LIST_GT
705: where customer_id = p_customer_id
706: and customer_site_use_id = nvl(decode(p_site_use_id, -1, null, p_site_use_id), customer_site_use_id);
707: EXCEPTION
708: when others then

Line 717: from AR_IREC_PAYMENT_LIST_GT

713: if ( l_customer_id is null ) then
714: --Code should not come here ideally
715: BEGIN
716: select currency_code into l_currency_code
717: from AR_IREC_PAYMENT_LIST_GT
718: group by currency_code;
719: EXCEPTION
720: when others then
721: IF (PG_DEBUG = 'Y') THEN

Line 2281: DELETE FROM AR_IREC_PAYMENT_LIST_GT

2277: arp_standard.debug(l_debug_info);
2278: END IF;
2279:
2280: --Bug # 3467287 - The Global Temp table must be striped by Customer and Customer Site.
2281: DELETE FROM AR_IREC_PAYMENT_LIST_GT
2282: WHERE CUSTOMER_ID = p_customer_id
2283: AND CUSTOMER_SITE_USE_ID = nvl(p_customer_site_use_id, CUSTOMER_SITE_USE_ID)
2284: AND CURRENCY_CODE = p_currency_code;
2285:

Line 2353: INSERT INTO AR_IREC_PAYMENT_LIST_GT

2349: END;
2350: end loop;
2351: FORALL trx
2352: IN l_open_invoice_list_rec.first .. l_open_invoice_list_rec.last
2353: INSERT INTO AR_IREC_PAYMENT_LIST_GT
2354: VALUES l_open_invoice_list_rec(trx);
2355:
2356: ----------------------------------------------------------------------------------------
2357: l_debug_info := 'Compute service charge';

Line 2542: INSERT INTO AR_IREC_PAYMENT_LIST_GT

2538:
2539: FORALL trx
2540: IN l_credit_transactions_list_rec.first .. l_credit_transactions_list_rec.last
2541:
2542: INSERT INTO AR_IREC_PAYMENT_LIST_GT
2543: VALUES l_credit_transactions_list_rec(trx);
2544:
2545: COMMIT;
2546:

Line 2627: FROM AR_IREC_PAYMENT_LIST_GT

2623: account_number,
2624: customer_trx_id,
2625: currency_code,
2626: service_charge
2627: FROM AR_IREC_PAYMENT_LIST_GT
2628: WHERE customer_id = p_customer_id
2629: AND customer_site_use_id = nvl(decode(p_site_use_id, -1, null, p_site_use_id), customer_site_use_id)
2630: AND trx_class in ('INV','DEP', 'DM', 'CB')
2631: FOR UPDATE;

Line 2690: UPDATE AR_IREC_PAYMENT_LIST_GT

2686: -----------------------------------------------------------------------------------------
2687: IF (PG_DEBUG = 'Y') THEN
2688: arp_standard.debug(l_debug_info);
2689: END IF;
2690: UPDATE AR_IREC_PAYMENT_LIST_GT
2691: SET discount_amount = l_discount_amount,
2692: receipt_date = trunc(p_receipt_date),
2693: payment_amt = l_payment_amount
2694: WHERE CURRENT OF invoice_list;

Line 3216: FROM ar_irec_payment_list_gt

3212:
3213: --Bug # 3467287 - The Global Temp table must be striped by Customer and Customer Site.
3214: CURSOR credit_trx_list IS
3215: SELECT *
3216: FROM ar_irec_payment_list_gt
3217: WHERE customer_id = p_customer_id
3218: AND customer_site_use_id = nvl(decode(p_site_use_id, -1, null, p_site_use_id), customer_site_use_id)
3219: AND ( trx_class = 'CM'
3220: OR

Line 3226: FROM ar_irec_payment_list_gt

3222: );
3223:
3224: CURSOR debit_trx_list IS
3225: SELECT *
3226: FROM ar_irec_payment_list_gt
3227: WHERE customer_id = p_customer_id
3228: AND customer_site_use_id = nvl(decode(p_site_use_id, -1, null, p_site_use_id), customer_site_use_id)
3229: AND ( trx_class = 'INV' OR
3230: trx_class = 'DM' OR

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

3265: || 'p_site_use_id=' || p_site_use_id || ','
3266: || 'p_cash_receipt_id=' || p_cash_receipt_id);
3267: end if;
3268:
3269: --Pring in the debug log : Total No of rows in ar_irec_payment_list_gt
3270:
3271: SELECT COUNT(*)
3272: INTO total_trx_count
3273: FROM ar_irec_payment_list_gt;

Line 3273: FROM ar_irec_payment_list_gt;

3269: --Pring in the debug log : Total No of rows in ar_irec_payment_list_gt
3270:
3271: SELECT COUNT(*)
3272: INTO total_trx_count
3273: FROM ar_irec_payment_list_gt;
3274:
3275: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3276: 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);
3277: end if;

Line 3276: 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);

3272: INTO total_trx_count
3273: FROM ar_irec_payment_list_gt;
3274:
3275: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3276: 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);
3277: end if;
3278:
3279: --Pring in the debug log : No of rows that will be picked by the cursor credit_trx_list
3280:

Line 3283: FROM ar_irec_payment_list_gt

3279: --Pring in the debug log : No of rows that will be picked by the cursor credit_trx_list
3280:
3281: SELECT COUNT(*)
3282: INTO credit_trx_list_count
3283: FROM ar_irec_payment_list_gt
3284: WHERE customer_id = p_customer_id
3285: AND customer_site_use_id = nvl(decode(p_site_use_id, -1, null, p_site_use_id), customer_site_use_id)
3286: AND ( trx_class = 'CM' OR trx_class = 'PMT' );
3287:

Line 3296: FROM ar_irec_payment_list_gt

3292: --Pring in the debug log : No of rows that will be picked by the cursor debit_trx_list
3293:
3294: SELECT count(*)
3295: INTO debit_trx_list_count
3296: FROM ar_irec_payment_list_gt
3297: WHERE customer_id = p_customer_id
3298: AND customer_site_use_id = nvl(decode(p_site_use_id, -1, null, p_site_use_id), customer_site_use_id)
3299: AND ( trx_class = 'INV' OR
3300: trx_class = 'DM' OR

Line 3542: l_currency_code AR_IREC_PAYMENT_LIST_GT.currency_code%TYPE;

3538:
3539: l_invoice_list ARI_SERVICE_CHARGE_PKG.INVOICE_LIST_TABTYPE;
3540: l_total_service_charge NUMBER;
3541: l_count NUMBER;
3542: l_currency_code AR_IREC_PAYMENT_LIST_GT.currency_code%TYPE;
3543: l_service_charge NUMBER;
3544:
3545: l_procedure_name VARCHAR2(30);
3546: l_debug_info VARCHAR2(200);

Line 3559: FROM AR_IREC_PAYMENT_LIST_GT

3555: account_number,
3556: customer_trx_id,
3557: currency_code,
3558: service_charge
3559: FROM AR_IREC_PAYMENT_LIST_GT
3560: WHERE customer_id = p_customer_id
3561: AND customer_site_use_id = nvl(decode(p_site_use_id, -1, null, p_site_use_id), customer_site_use_id)
3562: AND trx_class IN ('INV','DM','CB','DEP');
3563:

Line 3641: UPDATE ar_irec_payment_list_gt

3637: -----------------------------------------------------------------------------------------
3638: IF (PG_DEBUG = 'Y') THEN
3639: arp_standard.debug(l_debug_info);
3640: END IF;
3641: UPDATE ar_irec_payment_list_gt
3642: SET service_charge = l_service_charge
3643: WHERE payment_schedule_id = l_invoice_list(l_count).payment_schedule_id;
3644:
3645: l_total_service_charge := l_total_service_charge + l_service_charge;

Line 3719: FROM AR_IREC_PAYMENT_LIST_GT

3715: account_number,
3716: customer_trx_id,
3717: currency_code,
3718: service_charge
3719: FROM AR_IREC_PAYMENT_LIST_GT
3720: WHERE customer_id = p_customer_id
3721: AND customer_site_use_id = nvl(decode(p_site_use_id, -1, null, p_site_use_id), customer_site_use_id)
3722: AND ( trx_class = 'INV' OR
3723: trx_class = 'DM' OR

Line 3983: from AR_IREC_PAYMENT_LIST_GT

3979: l_debug_info := 'Get the Payment Schedule Id if there is only one invoice';
3980: ---------------------------------------------------------------------------
3981: BEGIN
3982: select payment_schedule_id into p_payment_schedule_id
3983: from AR_IREC_PAYMENT_LIST_GT
3984: where customer_id = p_customer_id
3985: and customer_site_use_id = nvl(l_site_use_id, customer_site_use_id);
3986: EXCEPTION
3987: when others then

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

4052: END IF;
4053:
4054: --KRMENON DEBUG
4055: IF (l_receipt_currency_code IS NULL OR '' = l_receipt_currency_code) THEN
4056: --Bug2925392: Get Currency from AR_IREC_PAYMENT_LIST_GT. All records will have same currency.
4057: --Bug # 3467287 - The Global Temp table must be striped by Customer and Customer Site.
4058: ---------------------------------------------------------------------------
4059: l_debug_info := 'If the currency code is not set yet, get the currency code';
4060: ---------------------------------------------------------------------------

Line 4063: from AR_IREC_PAYMENT_LIST_GT

4059: l_debug_info := 'If the currency code is not set yet, get the currency code';
4060: ---------------------------------------------------------------------------
4061: BEGIN
4062: select currency_code into l_receipt_currency_code
4063: from AR_IREC_PAYMENT_LIST_GT
4064: where customer_id = p_customer_id
4065: and customer_site_use_id = nvl(l_site_use_id, customer_site_use_id);
4066: --group by currency_code;
4067: EXCEPTION

Line 5035: INSERT INTO AR_IREC_PAYMENT_LIST_GT

5031: IF (PG_DEBUG = 'Y') THEN
5032: arp_standard.debug(l_debug_info);
5033: END IF;
5034:
5035: INSERT INTO AR_IREC_PAYMENT_LIST_GT
5036: ( CUSTOMER_ID,
5037: CUSTOMER_SITE_USE_ID,
5038: ACCOUNT_NUMBER,
5039: CUSTOMER_TRX_ID,

Line 5776: UPDATE AR_IREC_PAYMENT_LIST_GT

5772: END IF;
5773: --Striping by currency code is not required because
5774: --it is not possible to navigate to Payment page with multiple currencies
5775: --in the Transaction List for a cusomer context
5776: UPDATE AR_IREC_PAYMENT_LIST_GT
5777: SET discount_amount = original_discount_amt,
5778: payment_amt = amount_due_remaining - original_discount_amt - nvl(dispute_amt,0)
5779: WHERE customer_id = p_customer_id
5780: AND customer_site_use_id = nvl(decode(p_site_use_id, -1, null, p_site_use_id),customer_site_use_id);

Line 6095: FROM ar_irec_payment_list_gt

6091: e_no_rows_in_GT EXCEPTION;
6092:
6093: CURSOR get_cust_site_use_id_cur IS
6094: SELECT DISTINCT pay_for_customer_site_id
6095: FROM ar_irec_payment_list_gt
6096: WHERE customer_id = p_customer_id;
6097:
6098: BEGIN
6099:

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

6154: l_customer_site_use_id := -1;
6155: EXIT;
6156: ELSIF get_cust_site_use_id_cur%ROWCOUNT = 0 THEN
6157: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6158: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Query on ar_irec_payment_list_gt returned 0 rows');
6159: end if;
6160: RAISE e_no_rows_in_GT;
6161: EXIT;
6162: END IF;

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

6174: RETURN l_customer_site_use_id;
6175:
6176: EXCEPTION
6177: WHEN e_no_rows_in_GT THEN
6178: write_debug_and_log('No rows present in ar_irec_payment_list_gt for the given customer in ' || G_PKG_NAME || l_procedure_name);
6179: write_debug_and_log('p_session_id: '|| p_session_id);
6180: write_debug_and_log('p_user_id: '|| FND_GLOBAL.user_id);
6181: write_debug_and_log('p_customer_id: '|| p_customer_id);
6182: