[Home] [Help]
2163: and ra.applied_customer_trx_id = cp_customer_trx_id
2164: -- bug3567865 Don't insert duplicate cash record.
2165: and not exists (
2166: select 'already purged'
2167: from ar_archive_detail aad
2168: where aad.transaction_id = cr.cash_receipt_id
2169: and aad.transaction_class = 'CASH' )
2170: UNION ALL /* Bug 5105156 - fix 5044763 */
2171: ---------------------------------------------------------------------
2298: AND ra1.cash_Receipt_id = ra.cash_receipt_id )
2299: -- bug3567865 Don't insert duplicate cash record.
2300: and not exists (
2301: select 'already purged'
2302: from ar_archive_detail aad
2303: where aad.transaction_id = cr.cash_receipt_id
2304: and aad.transaction_class = 'CASH' )
2305: UNION ALL /* Bug 5105156 - fix 5044763 */
2306: ---------------------------------------------------------------------
2563: cp_customer_trx_id
2564: AND ra1.cash_Receipt_id = ra.cash_receipt_id )
2565: and not exists (
2566: select 'already purged'
2567: from ar_archive_detail aad
2568: where aad.transaction_id = cr.cash_receipt_id
2569: and aad.transaction_class = 'CASH' );
2570:
2571: /* Bug 5105156 - fix 5073245 ends */
2608: IF select_detail.ccid4 > 0 THEN
2609: l_account_combination4 := get_ccid(select_detail.ccid4) ;
2610: END IF ;
2611: --
2612: INSERT INTO ar_archive_detail
2613: ( archive_id,
2614: transaction_class,
2615: transaction_type,
2616: transaction_id,
2831: RETURN TRUE ;
2832:
2833: EXCEPTION
2834: WHEN OTHERS THEN
2835: print( 1, ' ...Failed while inserting into AR_ARCHIVE_DETAIL');
2836: print( 1, 'sqlcode = ' || SQLCODE || SQLERRM ) ;
2837: RAISE ;
2838: END;
2839: --
2862: IF archive_detail( p_customer_trx_id ,
2863: p_archive_level ,
2864: p_archive_id ) = FALSE
2865: THEN
2866: print( 0, ' ...Failed while inserting into AR_ARCHIVE_DETAIL ');
2867: p_archive_status := FALSE ;
2868: ELSE
2869: p_archive_status := TRUE ;
2870: END IF ;