PACKAGE BODY: APPS.ARP_TRX_PURGE

Source

1 PACKAGE BODY arp_trx_purge AS
2 /* $Header: ARPUPRGB.pls 115.0 99/07/17 00:07:22 porting ship $ */
3 
4   FUNCTION trx_purgeable(p_customer_trx_id IN NUMBER) RETURN BOOLEAN IS
5   allow_purge BOOLEAN := TRUE;
6   BEGIN
7     --
8     -- Place your logic here. Set the value of allow_purge to TRUE if
9     -- you want this invoice to be purge, or FALSE if you don't want it
10     -- purged
11     RETURN allow_purge;
12 
13   END;
14 
15 END arp_trx_purge;