The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE delete_transaction(p_customer_trx_id IN ra_customer_trx.customer_trx_id%TYPE);
PROCEDURE delete_transaction_dist(p_customer_trx_id IN ra_customer_trx.customer_trx_id%TYPE);
| Inserts a record into ra_customer_trx for bills receivable transaction |
| |
| SCOPE - PUBLIC |
| |
| EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
| arp_util.debug |
| |
| ARGUMENTS : IN: p_trx_rec |
| OUT: p_trx_number |
| p_customer_trx_id |
| IN/ OUT: |
| |
| RETURNS : NONE |
| |
| MODIFICATION HISTORY |
| 28-MAR-2000 Jani Rautiainen Created |
| |
+===========================================================================*/
PROCEDURE insert_header(p_trx_rec IN OUT NOCOPY ra_customer_trx%rowtype,
p_gl_date IN DATE,
p_trx_number OUT NOCOPY ra_customer_trx.trx_number%type,
p_customer_trx_id OUT NOCOPY ra_customer_trx.customer_trx_id%type) IS
l_trh_rec ar_transaction_history%ROWTYPE;
arp_util.debug('delete_transaction: ' || 'arp_process_br_header.insert_header()+');
arp_ct_pkg.insert_p(p_trx_rec, p_trx_number, p_customer_trx_id);
| program_application_id, program_id, program_update_date, request_id, |
| creation_date, created_by, last_update_login, last_update_date, last_updated_by |
+----------------------------------------------------------------------------------*/
ARP_PROC_TRANSACTION_HISTORY.insert_transaction_history(l_trh_rec, l_transaction_history_id);
arp_util.debug('delete_transaction: ' || 'arp_process_br_header.insert_header()-');
arp_util.debug('delete_transaction: ' || 'EXCEPTION: arp_process_br_header.insert_header()');
END insert_header;
| update_header |
| |
| DESCRIPTION |
| Updates a record into ra_customer_trx for bills receivable transaction.|
| |
| SCOPE - PUBLIC |
| |
| EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
| arp_util.debug |
| |
| ARGUMENTS : IN: |
| OUT: |
| IN/ OUT: p_trx_rec |
| |
| RETURNS : NONE |
| |
| MODIFICATION HISTORY |
| 28-MAR-2000 Jani Rautiainen Created |
| |
+===========================================================================*/
PROCEDURE update_header(p_trx_rec IN OUT NOCOPY ra_customer_trx%rowtype,
p_customer_trx_id IN ra_customer_trx.customer_trx_id%TYPE) IS
BEGIN
IF PG_DEBUG in ('Y', 'C') THEN
arp_util.debug('delete_transaction: ' || 'arp_process_br_header.update_header()+');
arp_ct_pkg.update_p(p_trx_rec, p_customer_trx_id);
arp_util.debug('delete_transaction: ' || 'arp_process_br_header.update_header()-');
arp_util.debug('delete_transaction: ' || 'EXCEPTION: arp_process_br_header.update_header()');
END update_header;
| delete_header |
| |
| DESCRIPTION |
| Deletes row from ra_customer_trx for Bills Receivable Transaction. |
| Also deletes all child rows. |
| |
| SCOPE - PUBLIC |
| |
| EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
| arp_util.debug |
| |
| ARGUMENTS : IN: p_customer_trx_id |
| OUT: |
| IN/ OUT: |
| |
| RETURNS : NONE |
| |
| MODIFICATION HISTORY |
| 28-MAR-2000 Jani Rautiainen Created |
| |
+===========================================================================*/
PROCEDURE delete_header(p_customer_trx_id IN ra_customer_trx.customer_trx_id%TYPE) IS
l_transaction_history_id NUMBER;
arp_util.debug('delete_transaction: ' || 'arp_process_br_header.delete_header()+');
| delete the transaction |
+-------------------------*/
/*Bug7484811, Called ARP_XLA_EVENTS.delete_event to delete XLA record. */
BEGIN
SELECT transaction_history_id
INTO l_transaction_history_id
FROM ar_transaction_history
WHERE customer_trx_id = p_customer_trx_id
AND current_record_flag = 'Y';
arp_util.debug('EXCEPTION: getting trh_id in arp_process_br_header.delete_header() '|| sqlerrm);
ARP_XLA_EVENTS.delete_event( p_document_id => l_transaction_history_id,
p_doc_table => 'TRH');
arp_process_br_header.delete_transaction(p_customer_trx_id);
arp_util.debug('delete_transaction: ' || 'arp_process_br_header.delete_header()-');
arp_util.debug('delete_transaction: ' || 'EXCEPTION: arp_process_br_header.delete_header()');
END delete_header;
| delete_transaction |
| |
| DESCRIPTION |
| Deletes all records in all tables associated with a particular |
| bills receivable transcation. |
| |
| SCOPE - PRIVATE |
| |
| EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
| arp_util.debug |
| |
| ARGUMENTS : IN: p_customer_trx_id |
| OUT: None |
| |
| RETURNS : NONE |
| |
| MODIFICATION HISTORY |
| 28-MAR-2000 Jani Rautiainen Created
| |
+===========================================================================*/
PROCEDURE delete_transaction(p_customer_trx_id IN ra_customer_trx.customer_trx_id%TYPE) IS
BEGIN
IF PG_DEBUG in ('Y', 'C') THEN
arp_util.debug('arp_process_br_header.delete_transaction()+');
savepoint ar_br_delete_transaction_1;
| Delete rows in other tables that reference this customer_trx_id |
+------------------------------------------------------------------*/
arp_ct_pkg.delete_p(p_customer_trx_id);
arp_ctl_pkg.delete_f_ct_id(p_customer_trx_id);
arp_ps_pkg.delete_f_ct_id(p_customer_trx_id);
arp_process_br_header.delete_transaction_dist(p_customer_trx_id);
arp_transaction_history_pkg.delete_p(p_trx_id => p_customer_trx_id);
arp_util.debug('arp_process_br_header.delete_transaction()-');
arp_util.debug('EXCEPTION: arp_process_br_header.delete_transaction()');
rollback to savepoint ar_br_delete_transaction_1;
END delete_transaction;
arp_util.debug('delete_transaction: ' || 'arp_process_br_header.lock_transaction()+');
arp_util.debug('delete_transaction: ' || 'arp_process_br_header.lock_transaction()-');
arp_util.debug('delete_transaction: ' || 'EXCEPTION: arp_process_br_header.lock_transaction');
| delete_transaction_dist |
| |
| DESCRIPTION |
| Deletes distribution rows from ar_distributions for given transaction |
| |
| SCOPE - PUBLIC |
| |
| EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
| arp_util.debug |
| |
| ARGUMENTS : IN: p_customer_trx_id |
| OUT: |
| IN/ OUT: |
| |
| RETURNS : NONE |
| |
| NOTES |
| |
| MODIFICATION HISTORY |
| 28-MAR-2000 Jani Rautiainen Created |
| |
+===========================================================================*/
PROCEDURE delete_transaction_dist(p_customer_trx_id IN ra_customer_trx.customer_trx_id%TYPE) IS
/*----------------------------------------------------------------+
| Cursor for all transaction history rows that have accounting |
+----------------------------------------------------------------*/
CURSOR transaction_history_cur IS
select th.transaction_history_id
from ar_transaction_history th
where customer_trx_id = p_customer_trx_id
and postable_flag = 'Y';
arp_util.debug('arp_process_br_header.delete_transaction_dist()+');
| delete the accounting related to transaction history |
+-------------------------------------------------------*/
arp_proc_transaction_history.delete_transaction_hist_dist(transaction_history_rec.transaction_history_id);
arp_util.debug('arp_process_br_header.delete_transaction_dist()-');
arp_util.debug('EXCEPTION: arp_process_br_header.delete_transaction_dist()');
END delete_transaction_dist;
select 'Y' deferred_tax_moved
from dual
where exists (select 'x'
from ra_customer_trx ct
where ct.customer_trx_id IN (select distinct ctl.br_ref_customer_trx_id
from ra_customer_trx_lines ctl
start with ctl.customer_trx_id = p_customer_trx_id
connect by prior ctl.br_ref_customer_trx_id = ctl.customer_trx_id
)
and ct.drawee_site_use_id IS NULL
and exists (select 'x'
from ra_cust_trx_line_gl_dist gld
where gld.account_class = 'TAX'
and gld.customer_trx_id = ct.customer_trx_id
and gld.collected_tax_ccid IS NOT NULL
)
);