[Home] [Help]
739: ar_receivable_applications ra1, --bug1199027
740: ar_cash_receipt_history crh,
741: ar_cash_receipt_history crh_batch,
742: ar_cash_receipt_history crh_remit,
743: ar_cash_receipts cr
744: WHERE lu1.lookup_code (+) = cr.reversal_category
745: AND lu1.lookup_type (+) = 'REVERSAL_CATEGORY_TYPE'
746: AND lu2.lookup_code (+) = cr.reversal_reason_code
747: AND lu2.lookup_type (+) = 'CKAJST_REASON'
952: '' meaning /* item_exception_reason */
953: FROM
954: ra_cust_trx_types ctt,
955: ar_payment_schedules ps,
956: ar_cash_receipts cr,
957: ar_receivable_applications ra,
958: ra_customer_trx ct,
959: (SELECT distinct cash_Receipt_id
960: FROM ar_receivable_applications
1985: ar_receivable_applications ra1, --bug1199027
1986: ar_cash_receipt_history crh,
1987: ar_cash_receipt_history crh_batch,
1988: ar_cash_receipt_history crh_remit,
1989: ar_cash_receipts cr
1990: WHERE lu1.lookup_code (+) = cr.reversal_category
1991: AND lu1.lookup_type (+) = 'REVERSAL_CATEGORY_TYPE'
1992: AND lu2.lookup_code (+) = cr.reversal_reason_code
1993: AND lu2.lookup_type (+) = 'CKAJST_REASON'
3070: '' /* override_auto_accounting_flag */
3071: FROM
3072: ar_vat_tax vt,
3073: ar_cash_receipt_history crh,
3074: ar_cash_receipts cr ,
3075: ar_receivable_applications ra
3076: WHERE crh.cash_receipt_id = cr.cash_receipt_id
3077: and nvl(crh.current_record_flag, 'N') = 'Y'
3078: and cr.vat_tax_id = vt.vat_tax_id (+)
3201: '' /* override_auto_accounting_flag */
3202: FROM
3203: ra_cust_trx_types ctt,
3204: ar_payment_schedules ps,
3205: ar_cash_receipts cr,
3206: ar_receivable_applications ra,
3207: ra_customer_trx ct
3208: WHERE ctt.cust_trx_type_id = ct.cust_trx_type_id
3209: and ps.payment_schedule_id (+) = ra.applied_payment_schedule_id
3466: to_date(null), /* expiration_date */
3467: to_number(null), /* expiration_days */
3468: '' /* override_auto_accounting_flag */
3469: FROM
3470: ar_cash_receipts cr,
3471: ar_receivable_applications ra
3472: where cr.cash_receipt_id = ra.cash_receipt_id
3473: and ra.applied_payment_schedule_id = -3
3474: and ra.status = 'ACTIVITY'
4719: FOR UPDATE OF ra.cash_receipt_id NOWAIT;
4720:
4721: cursor cr_cur is
4722: select 'Found' record_found
4723: FROM ar_cash_receipts cr
4724: where cr.cash_receipt_id = p_entity_id
4725: FOR UPDATE OF cr.cash_receipt_id NOWAIT;
4726:
4727: BEGIN
4733: FROM ar_distributions dist,
4734: ar_payment_schedules ps,
4735: ar_receivable_applications ra,
4736: ar_cash_receipt_history crh,
4737: ar_cash_receipts cr
4738: WHERE cr.cash_receipt_id = p_entity_id
4739: AND cr.cash_receipt_id = crh.cash_receipt_id
4740: AND cr.cash_receipt_id = ra.cash_receipt_id (+)
4741: AND crh.cash_receipt_history_id = dist.source_id (+)
4800: IF p_customer_id IS NOT NULL THEN
4801: BEGIN
4802: SELECT 'Y'
4803: INTO l_same_customer
4804: FROM ar_cash_receipts
4805: WHERE cash_receipt_id = p_entity_id
4806: AND NVL( pay_from_customer, p_customer_id ) = p_customer_id ;
4807: EXCEPTION
4808: WHEN NO_DATA_FOUND THEN
4964: --
4965: -- bug3975105 added 'N'
4966: print( p_recursive_level, ' ...deleting rows', 'N');
4967: --
4968: -- Call entity handler to delete from ar_cash_Receipts.
4969: -- DELETE FROM ar_cash_receipts
4970: -- WHERE cash_receipt_id = p_entity_id;
4971: ARP_CASH_RECEIPTS_PKG.DELETE_P(p_entity_id);
4972:
4965: -- bug3975105 added 'N'
4966: print( p_recursive_level, ' ...deleting rows', 'N');
4967: --
4968: -- Call entity handler to delete from ar_cash_Receipts.
4969: -- DELETE FROM ar_cash_receipts
4970: -- WHERE cash_receipt_id = p_entity_id;
4971: ARP_CASH_RECEIPTS_PKG.DELETE_P(p_entity_id);
4972:
4973: --
5246: cp_as_of_gl_date DATE,
5247: cp_max_recpt_id NUMBER
5248: ) IS
5249: select CR.CASH_RECEIPT_ID
5250: FROM AR_CASH_RECEIPTS CR,
5251: AR_CASH_RECEIPT_HISTORY CRH
5252: WHERE
5253: CR.CASH_RECEIPT_ID=CRH.CASH_RECEIPT_ID AND
5254: CRH.STATUS ='REVERSED' AND
5269: l_rec_cnt BINARY_INTEGER := 0;
5270: l_rec_rows BINARY_INTEGER := 0;
5271: l_max_record NUMBER;
5272: l_max_rcpt_id NUMBER := 0;
5273: l_rcpt_id AR_CASH_RECEIPTS.cash_receipt_id%TYPE;
5274: l_existence NUMBER;
5275: r_archive_id NUMBER;
5276: r_arch_status BOOLEAN;
5277: ra_total_count NUMBER;
5323: ELSE
5324: print( 0,'Archived Successfully, Now Purging records') ;
5325: DECLARE
5326: CURSOR c_cr ( cr_id NUMBER ) IS
5327: SELECT 'X' FROM AR_CASH_RECEIPTS
5328: WHERE CASH_RECEIPT_ID=cr_id
5329: FOR UPDATE OF CASH_RECEIPT_ID NOWAIT;
5330:
5331: CURSOR c_crh (cr_id NUMBER) IS