The following lines contain the word 'select', 'insert', 'update' or 'delete':
| header_pre_insert |
| |
| DESCRIPTION |
| Header Pre-insert logic for commitments |
| |
| SCOPE - PRIVATE |
| |
| EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
| dbms_sql.bind_variable |
| arp_util.debug |
| |
| ARGUMENTS : IN: |
| OUT: |
| RETURNS : NONE |
| |
| NOTES |
| |
| MODIFICATION HISTORY |
| 12-JUL-95 Martin Johnson Created |
| |
+===========================================================================*/
PROCEDURE header_pre_insert IS
BEGIN
arp_util.debug('arp_process_commitment.header_pre_insert()+');
arp_util.debug('arp_process_commitment.header_pre_insert()-');
arp_util.debug('EXCEPTION: arp_process_commitment.header_pre_insert()');
| insert_line_salescredit |
| |
| DESCRIPTION |
| Inserts line level salescredit for commitments. |
| |
| SCOPE - PRIVATE |
| |
| EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
| arp_util.debug |
| |
| ARGUMENTS : IN: |
| OUT: |
| RETURNS : NONE |
| |
| NOTES |
| |
| MODIFICATION HISTORY |
| 07-AUG-95 Martin Johnson Created |
| |
+===========================================================================*/
PROCEDURE insert_line_salescredit(
p_customer_trx_id IN
ra_customer_trx.customer_trx_id%type,
p_customer_trx_line_id IN
ra_customer_trx_lines.customer_trx_line_id%type,
p_salesrep_id IN
ra_cust_trx_line_salesreps.salesrep_id%type,
p_extended_amount IN
ra_customer_trx_lines.extended_amount%type) IS
l_srep_rec
ra_cust_trx_line_salesreps%rowtype;
arp_util.debug('arp_process_commitment.insert_line_salescredit()+',
pg_msg_level_debug);
arp_ctls_pkg.insert_p(l_srep_rec,
l_cust_trx_line_salesrep_id);
arp_util.debug('arp_process_commitment.insert_line_salescredit()-',
pg_msg_level_debug);
'EXCEPTION: arp_process_commitment.insert_line_salescredit()',
pg_msg_level_debug);
| insert_dist_line |
| |
| DESCRIPTION |
| Inserts the revenue distribution for commitments |
| |
| SCOPE - PRIVATE |
| |
| EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
| arp_util.debug |
| |
| ARGUMENTS : IN: |
| OUT: |
| RETURNS : NONE |
| |
| NOTES |
| |
| MODIFICATION HISTORY |
| 07-AUG-95 Martin Johnson Created |
| |
+===========================================================================*/
PROCEDURE insert_dist_line(p_customer_trx_id IN
ra_customer_trx.customer_trx_id%type,
p_customer_trx_line_id IN
ra_customer_trx_lines.customer_trx_line_id%type,
p_gl_date IN
ra_cust_trx_line_gl_dist.gl_date%type,
p_status OUT NOCOPY varchar2)
IS
l_ccid number;
arp_util.debug('arp_process_commitment.insert_dist_line()+',
pg_msg_level_debug);
| Call AutoAccounting to insert the distribution |
+--------------------------------------------------*/
p_status := 'OK';
select cust_trx_type.gl_id_rev
into l_passed_ccid
from ra_customer_trx cust_trx,
ra_cust_trx_types cust_trx_type
where cust_trx_type.type ='DEP' and
cust_trx.cust_trx_type_id =cust_trx_type.cust_trx_type_id and
cust_trx.CUSTOMER_TRX_ID = P_CUSTOMER_TRX_ID;
arp_util.debug('EXCEPTION: arp_process_commitment.insert_dist_line()- no_ccid',
pg_msg_level_debug);
arp_util.debug('EXCEPTION: arp_process_commitment.insert_dist_line()- NO_DATA_FOUND',
pg_msg_level_debug);
arp_util.debug('EXCEPTION: arp_process_commitment.insert_dist_line()- OTHERS',
pg_msg_level_debug);
arp_util.debug('arp_process_commitment.insert_dist_line()-',
pg_msg_level_debug);
'EXCEPTION: arp_process_commitment.insert_dist_line- OTHERS',
pg_msg_level_debug);
| header_post_insert |
| |
| DESCRIPTION |
| Header post-insert logic for commitments |
| |
| SCOPE - PUBLIC |
| |
| EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
| dbms_sql.bind_variable |
| arp_util.debug |
| |
| ARGUMENTS : IN: |
| OUT: |
| RETURNS : NONE |
| |
| NOTES |
| |
| MODIFICATION HISTORY |
| 12-JUL-95 Martin Johnson Created |
| |
+===========================================================================*/
PROCEDURE header_post_insert ( p_customer_trx_id IN
ra_customer_trx.customer_trx_id%type,
p_commitment_rec IN commitment_rec_type,
p_primary_salesrep_id IN
ra_customer_trx.primary_salesrep_id%type,
p_gl_date IN
ra_cust_trx_line_gl_dist.gl_date%type,
p_customer_trx_line_id OUT NOCOPY
ra_customer_trx_lines.customer_trx_line_id%type,
p_status OUT NOCOPY varchar2
)
IS
l_line_rec ra_customer_trx_lines%rowtype;
arp_util.debug('arp_process_commitment.header_post_insert()+');
| Insert row into ra_customer_trx_lines |
+-----------------------------------------*/
l_line_rec.customer_trx_id := p_customer_trx_id;
arp_ctl_pkg.insert_p(l_line_rec,
l_customer_trx_line_id);
| Insert salescredit for the line |
+-----------------------------------*/
insert_line_salescredit(p_customer_trx_id,
l_customer_trx_line_id,
p_primary_salesrep_id,
p_commitment_rec.extended_amount);
| Insert the REV distribution for the line |
+--------------------------------------------*/
insert_dist_line(p_customer_trx_id,
l_customer_trx_line_id,
p_gl_date,
p_status);
arp_util.debug('arp_process_commitment.header_post_insert()-');
arp_util.debug('EXCEPTION: arp_process_commitment.header_post_insert()');
| header_pre_update |
| |
| DESCRIPTION |
| Header pre-update logic for commitments |
| |
| SCOPE - PRIVATE |
| |
| EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
| dbms_sql.bind_variable |
| arp_util.debug |
| |
| ARGUMENTS : IN: |
| OUT: |
| RETURNS : NONE |
| |
| NOTES |
| |
| MODIFICATION HISTORY |
| 12-JUL-95 Martin Johnson Created |
| |
+===========================================================================*/
PROCEDURE header_pre_update IS
BEGIN
arp_util.debug('arp_process_commitment.header_pre_update()+');
arp_util.debug('arp_process_commitment.header_pre_update()-');
arp_util.debug('EXCEPTION: arp_process_commitment.header_pre_update()');
| header_post_update |
| |
| DESCRIPTION |
| Header post-update logic for commitments |
| |
| SCOPE - PUBLIC |
| |
| EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
| arp_util.debug |
| |
| ARGUMENTS : IN: |
| OUT: |
| RETURNS : NONE |
| |
| NOTES |
| |
| MODIFICATION HISTORY |
| 12-JUL-95 Martin Johnson Created |
| |
+===========================================================================*/
PROCEDURE header_post_update( p_commitment_rec IN commitment_rec_type,
p_foreign_currency_code IN
fnd_currencies.currency_code%type,
p_exchange_rate IN
ra_customer_trx.exchange_rate%type,
p_rerun_autoacc_flag IN boolean )
IS
l_changed_flags_rec changed_flags_rec_type;
arp_util.debug('arp_process_commitment.header_post_update()+');
| Call lines table handler to update the line |
+-----------------------------------------------*/
arp_ctl_pkg.update_p( l_line_rec,
p_commitment_rec.customer_trx_line_id );
| If commitment amount changed, update the salescredits and |
| distribution amounts |
+-------------------------------------------------------------*/
IF l_changed_flags_rec.extended_amount_changed_flag
THEN
arp_ctls_pkg.update_amounts_f_ctl_id(
p_commitment_rec.customer_trx_line_id,
p_commitment_rec.extended_amount,
p_foreign_currency_code);
arp_ctlgd_pkg.update_amount_f_ctl_id(
p_commitment_rec.customer_trx_line_id,
p_commitment_rec.extended_amount,
p_foreign_currency_code,
pg_base_curr_code,
p_exchange_rate,
pg_base_precision,
pg_base_min_acc_unit);
arp_util.debug('arp_process_commitment.header_post_update()-');
arp_util.debug('EXCEPTION: arp_process_commitment.header_post_update()');
| header_pre_delete |
| |
| DESCRIPTION |
| Header pre-delete logic for commitments |
| |
| SCOPE - PRIVATE |
| |
| EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
| dbms_sql.bind_variable |
| arp_util.debug |
| |
| ARGUMENTS : IN: |
| OUT: |
| RETURNS : NONE |
| |
| NOTES |
| |
| MODIFICATION HISTORY |
| 12-JUL-95 Martin Johnson Created |
| |
+===========================================================================*/
PROCEDURE header_pre_delete IS
BEGIN
arp_util.debug('arp_process_commitment.header_pre_delete()+');
arp_util.debug('arp_process_commitment.header_pre_delete()-');
arp_util.debug('EXCEPTION: arp_process_commitment.header_pre_delete()');