DBA Data[Home] [Help]

APPS.ARP_PROCESS_ADJUSTMENT dependencies on ARP_PROCESS_ADJUSTMENT

Line 1: PACKAGE BODY ARP_PROCESS_ADJUSTMENT AS

1: PACKAGE BODY ARP_PROCESS_ADJUSTMENT AS
2: /* $Header: ARTEADJB.pls 120.22.12010000.7 2008/12/08 10:33:45 spdixit ship $ */
3: PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('AFLOG_ENABLED'), 'N');
4:
5: pg_msg_level_debug binary_integer;

Line 56: arp_util.debug('arp_process_adjustment.validate_insert_adjustment()+');

52: l_allow_overapp_flag varchar2(1);
53:
54: BEGIN
55:
56: arp_util.debug('arp_process_adjustment.validate_insert_adjustment()+');
57:
58: SELECT ps.amount_due_original,
59: ps.amount_due_remaining,
60: ctt.creation_sign,

Line 97: arp_util.debug('arp_process_adjustment.validate_insert_adjustment()-');

93: 0,
94: l_amount_due_remaining,
95: l_amount_due_original );
96: END IF;
97: arp_util.debug('arp_process_adjustment.validate_insert_adjustment()-');
98:
99: EXCEPTION
100: WHEN OTHERS THEN
101: arp_util.debug(

Line 102: 'EXCEPTION: arp_process_adjustment.validate_insert_adjustment()');

98:
99: EXCEPTION
100: WHEN OTHERS THEN
101: arp_util.debug(
102: 'EXCEPTION: arp_process_adjustment.validate_insert_adjustment()');
103: RAISE;
104:
105: END;
106:

Line 155: arp_util.debug('arp_process_adjustment.validate_update_adjustment()+');

151: l_tax_original number;
152:
153: BEGIN
154:
155: arp_util.debug('arp_process_adjustment.validate_update_adjustment()+');
156:
157: IF ( p_status_changed_flag ) AND
158: ( p_status = 'A' )
159: THEN

Line 266: arp_util.debug('arp_process_adjustment.validate_update_adjustment()-');

262: END IF;
263:
264: END IF;
265:
266: arp_util.debug('arp_process_adjustment.validate_update_adjustment()-');
267:
268: EXCEPTION
269: WHEN OTHERS THEN
270: FND_MESSAGE.set_name( 'AR', 'GENERIC_MESSAGE' );

Line 273: 'EXCEPTION: arp_process_adjustment.validate_update_adjustment()');

269: WHEN OTHERS THEN
270: FND_MESSAGE.set_name( 'AR', 'GENERIC_MESSAGE' );
271: FND_MESSAGE.set_token( 'GENERIC_TEXT', 'arp_non_db_pkg.check_natural_application exception: '||SQLERRM );
272: arp_util.debug(
273: 'EXCEPTION: arp_process_adjustment.validate_update_adjustment()');
274: RAISE;
275:
276: END;
277:

Line 344: arp_util.debug('EXCEPTION: arp_process_adjustment.set_flags()');

340: /*---------------------------------------------+
341: | Display parameters and raise the exception |
342: +---------------------------------------------*/
343:
344: arp_util.debug('EXCEPTION: arp_process_adjustment.set_flags()');
345:
346: arp_util.debug('');
347: arp_util.debug('---------- parameters for set_flags() ---------');
348:

Line 405: arp_util.debug('arp_process_adjustment.validate_inv_line_amount()+',

401:
402:
403: BEGIN
404:
405: arp_util.debug('arp_process_adjustment.validate_inv_line_amount()+',
406: pg_msg_level_debug);
407:
408: /*----------------------------------------------------------------+
409: | IF the line number is filled in |

Line 519: arp_util.debug( 'EXCEPTION: arp_process_adjustment.' ||

515: l_line_credited -
516: l_line_applied < 0
517: )
518: THEN
519: arp_util.debug( 'EXCEPTION: arp_process_adjustment.' ||
520: 'validate_inv_line_amount ()',
521: pg_msg_level_debug);
522: arp_util.debug( 'Adjustments cannot be more than available ' ||
523: 'invoiced line amount.',

Line 537: arp_util.debug( 'EXCEPTION: arp_process_adjustment.' ||

533: l_line_credited -
534: l_line_applied > 0
535: )
536: THEN
537: arp_util.debug( 'EXCEPTION: arp_process_adjustment.' ||
538: 'validate_inv_line_amount ()',
539: pg_msg_level_debug);
540: arp_util.debug( 'Adjustments cannot be more than available ' ||
541: 'invoiced line amount.',

Line 550: arp_util.debug('arp_process_adjustment.validate_inv_line_amount()-',

546: END IF;
547: END IF; -- end not approved or adjusted and line specified case
548:
549:
550: arp_util.debug('arp_process_adjustment.validate_inv_line_amount()-',
551: pg_msg_level_debug);
552:
553: EXCEPTION
554: WHEN OTHERS THEN

Line 555: arp_util.debug('EXCEPTION: arp_process_adjustment.' ||

551: pg_msg_level_debug);
552:
553: EXCEPTION
554: WHEN OTHERS THEN
555: arp_util.debug('EXCEPTION: arp_process_adjustment.' ||
556: 'validate_inv_line_amount()',
557: pg_msg_level_debug);
558:
559: arp_util.debug('', pg_msg_level_debug);

Line 612: arp_util.debug('arp_process_adjustment.validate_inv_line_amount_cover()+',

608: l_ps_rec ar_payment_schedules%rowtype;
609:
610: BEGIN
611:
612: arp_util.debug('arp_process_adjustment.validate_inv_line_amount_cover()+',
613: pg_msg_level_debug);
614:
615: l_adj_rec.customer_trx_line_id := p_customer_trx_line_id;
616: l_adj_rec.customer_trx_id := p_customer_trx_id;

Line 632: arp_util.debug('arp_process_adjustment.validate_inv_line_amount_cover()-',

628: WHERE payment_schedule_id = p_payment_schedule_id;
629:
630: validate_inv_line_amount( l_adj_rec, l_ps_rec );
631:
632: arp_util.debug('arp_process_adjustment.validate_inv_line_amount_cover()-',
633: pg_msg_level_debug);
634:
635: EXCEPTION
636: WHEN OTHERS THEN

Line 637: arp_util.debug('EXCEPTION: arp_process_adjustment.' ||

633: pg_msg_level_debug);
634:
635: EXCEPTION
636: WHEN OTHERS THEN
637: arp_util.debug('EXCEPTION: arp_process_adjustment.' ||
638: 'validate_inv_line_amount_cover()',
639: pg_msg_level_debug);
640:
641: arp_util.debug('', pg_msg_level_debug);

Line 711: arp_util.debug('arp_process_adjustment.validate_update_approve_adj()+',

707: l_approval_amount_from ar_approval_user_limits.amount_from%type;
708:
709: BEGIN
710:
711: arp_util.debug('arp_process_adjustment.validate_update_approve_adj()+',
712: pg_msg_level_debug);
713:
714:
715: IF ( p_adjustment_code = 'A' )

Line 735: arp_util.debug( 'EXCEPTION: arp_process_adjustment.' ||

731:
732: IF ( l_closing_status not in ('O', 'F' ) )
733: THEN
734:
735: arp_util.debug( 'EXCEPTION: arp_process_adjustment.' ||
736: 'validate_update_approve_adj ()',
737: pg_msg_level_debug);
738: arp_util.debug( 'Invalid date. Enter a GL date in an open or' ||
739: ' future enterable period.',

Line 752: arp_util.debug( 'EXCEPTION: arp_process_adjustment.' ||

748:
749: IF ( p_adj_rec.gl_date < p_ps_rec.gl_date )
750: THEN
751:
752: arp_util.debug( 'EXCEPTION: arp_process_adjustment.' ||
753: 'validate_update_approve_adj ()',
754: pg_msg_level_debug);
755: arp_util.debug( 'The GL date should not be prior to the ' ||
756: 'invoice''s GL date.',

Line 787: arp_util.debug( 'EXCEPTION: arp_process_adjustment.' ||

783: AND aul.document_type = 'ADJ';
784:
785: EXCEPTION
786: WHEN NO_DATA_FOUND THEN
787: arp_util.debug( 'EXCEPTION: arp_process_adjustment.' ||
788: 'validate_update_approve_adj ()',
789: pg_msg_level_debug);
790: arp_util.debug( 'You do not have approval limits for currency ' ||
791: p_ps_rec.invoice_currency_code,

Line 808: arp_util.debug( 'EXCEPTION: arp_process_adjustment.' ||

804: ( p_adj_rec.amount < l_approval_amount_from )
805: )
806: THEN
807:
808: arp_util.debug( 'EXCEPTION: arp_process_adjustment.' ||
809: 'validate_update_approve_adj ()',
810: pg_msg_level_debug);
811: arp_util.debug( 'User ID: ' || arp_adjustments_pkg.pg_user_id ||
812: ' Amount: ' ||

Line 832: arp_util.debug('arp_process_adjustment.validate_update_approve_adj()-',

828:
829: END IF; -- end approved case
830:
831:
832: arp_util.debug('arp_process_adjustment.validate_update_approve_adj()-',
833: pg_msg_level_debug);
834:
835: EXCEPTION
836: WHEN OTHERS THEN

Line 837: arp_util.debug('EXCEPTION: arp_process_adjustment.' ||

833: pg_msg_level_debug);
834:
835: EXCEPTION
836: WHEN OTHERS THEN
837: arp_util.debug('EXCEPTION: arp_process_adjustment.' ||
838: 'validate_update_approve_adj()',
839: pg_msg_level_debug);
840:
841: arp_util.debug('', pg_msg_level_debug);

Line 1509: FND_MESSAGE.set_token( 'GENERIC_TEXT', 'arp_process_adjustment.insert_adjustment exception: '||SQLERRM );

1505:
1506: EXCEPTION
1507: WHEN OTHERS THEN
1508: FND_MESSAGE.set_name( 'AR', 'GENERIC_MESSAGE' );
1509: FND_MESSAGE.set_token( 'GENERIC_TEXT', 'arp_process_adjustment.insert_adjustment exception: '||SQLERRM );
1510: arp_util.debug(
1511: 'EXCEPTION: ar_process_adjustment.insert_adjustment()');
1512: RAISE;
1513:

Line 1968: FND_MESSAGE.set_token( 'GENERIC_TEXT', 'arp_process_adjustment.update_adjustment exception: '||SQLERRM );

1964:
1965: EXCEPTION
1966: WHEN OTHERS THEN
1967: FND_MESSAGE.set_name( 'AR', 'GENERIC_MESSAGE' );
1968: FND_MESSAGE.set_token( 'GENERIC_TEXT', 'arp_process_adjustment.update_adjustment exception: '||SQLERRM );
1969: arp_util.debug(
1970: 'EXCEPTION: ar_process_adjustment.update_adjustment()',
1971: pg_msg_level_debug);
1972: RAISE;

Line 2334: FND_MESSAGE.set_token( 'GENERIC_TEXT', 'arp_process_adjustment.update_approce_adjustment exception: '||SQLERRM );

2330: arp_util.debug(
2331: 'EXCEPTION: ar_process_adjustment.update_approve_adj()',
2332: pg_msg_level_debug);
2333: FND_MESSAGE.set_name( 'AR', 'GENERIC_MESSAGE' );
2334: FND_MESSAGE.set_token( 'GENERIC_TEXT', 'arp_process_adjustment.update_approce_adjustment exception: '||SQLERRM );
2335:
2336: arp_util.debug('', pg_msg_level_debug);
2337: arp_util.debug('---------- parameters for update_approve_adj()'
2338: || ' ---------',

Line 2627: arp_standard.debug( 'arp_process_adjustment.reverse_adjustment()+' );

2623: l_xla_ev_rec arp_xla_events.xla_events_type;
2624:
2625: BEGIN
2626: IF PG_DEBUG in ('Y', 'C') THEN
2627: arp_standard.debug( 'arp_process_adjustment.reverse_adjustment()+' );
2628: arp_standard.debug( 'p_adj_id = '||to_char( p_adj_id ) );
2629: END IF;
2630:
2631: IF (p_module_name IS NOT NULL

Line 2677: 'NO_DATA_FOUND: arp_process_adjustment.reverse_adjustment' );

2673: EXCEPTION
2674: WHEN NO_DATA_FOUND THEN
2675: IF PG_DEBUG in ('Y', 'C') THEN
2676: arp_standard.debug(
2677: 'NO_DATA_FOUND: arp_process_adjustment.reverse_adjustment' );
2678: END IF;
2679:
2680: WHEN OTHERS THEN
2681: IF PG_DEBUG in ('Y', 'C') THEN

Line 2683: 'EXCEPTION: arp_process_adjustment.reverse_adjustment:SELECT' );

2679:
2680: WHEN OTHERS THEN
2681: IF PG_DEBUG in ('Y', 'C') THEN
2682: arp_standard.debug(
2683: 'EXCEPTION: arp_process_adjustment.reverse_adjustment:SELECT' );
2684: END IF;
2685: RAISE;
2686: END;
2687:

Line 2718: arp_standard.debug( 'arp_process_adjustment.reverse_adjustment()-' );

2714: , p_reversal_date );
2715:
2716:
2717: IF PG_DEBUG in ('Y', 'C') THEN
2718: arp_standard.debug( 'arp_process_adjustment.reverse_adjustment()-' );
2719: END IF;
2720:
2721: EXCEPTION
2722: WHEN OTHERS THEN

Line 2725: 'EXCEPTION: arp_process_adjustment.reverse_adjustment' );

2721: EXCEPTION
2722: WHEN OTHERS THEN
2723: IF PG_DEBUG in ('Y', 'C') THEN
2724: arp_standard.debug(
2725: 'EXCEPTION: arp_process_adjustment.reverse_adjustment' );
2726: END IF;
2727: FND_MESSAGE.set_name( 'AR', 'GENERIC_MESSAGE' );
2728: FND_MESSAGE.set_token( 'GENERIC_TEXT', 'arp_process_adjustment.reverse_adjustment exception: '||SQLERRM );
2729:

Line 2728: FND_MESSAGE.set_token( 'GENERIC_TEXT', 'arp_process_adjustment.reverse_adjustment exception: '||SQLERRM );

2724: arp_standard.debug(
2725: 'EXCEPTION: arp_process_adjustment.reverse_adjustment' );
2726: END IF;
2727: FND_MESSAGE.set_name( 'AR', 'GENERIC_MESSAGE' );
2728: FND_MESSAGE.set_token( 'GENERIC_TEXT', 'arp_process_adjustment.reverse_adjustment exception: '||SQLERRM );
2729:
2730: IF PG_DEBUG in ('Y', 'C') THEN
2731: arp_standard.debug ( 'p_adj_id = '|| TO_CHAR(p_adj_id ) );
2732: arp_standard.debug ( 'p_reversal_gl_date = '|| TO_CHAR(p_reversal_gl_date));

Line 2771: arp_standard.debug( 'arp_process_adjustment.validate_args_radj()+' );

2767: p_reversal_gl_date IN DATE,
2768: p_reversal_date IN DATE ) IS
2769: BEGIN
2770: IF PG_DEBUG in ('Y', 'C') THEN
2771: arp_standard.debug( 'arp_process_adjustment.validate_args_radj()+' );
2772: END IF;
2773: IF ( p_adj_id is NULL OR p_reversal_gl_date is NULL OR
2774: p_reversal_date is NULL ) THEN
2775: IF PG_DEBUG in ('Y', 'C') THEN

Line 2783: arp_standard.debug( 'arp_process_adjustment.validate_args_radj()-' );

2779: APP_EXCEPTION.raise_exception;
2780: END IF;
2781: --
2782: IF PG_DEBUG in ('Y', 'C') THEN
2783: arp_standard.debug( 'arp_process_adjustment.validate_args_radj()-' );
2784: END IF;
2785: EXCEPTION
2786: WHEN OTHERS THEN
2787: IF PG_DEBUG in ('Y', 'C') THEN

Line 2789: 'EXCEPTION: arp_process_adjustment.validate_args_radj' );

2785: EXCEPTION
2786: WHEN OTHERS THEN
2787: IF PG_DEBUG in ('Y', 'C') THEN
2788: arp_standard.debug(
2789: 'EXCEPTION: arp_process_adjustment.validate_args_radj' );
2790: END IF;
2791: RAISE;
2792: END;
2793: --

Line 2829: arp_standard.debug( 'arp_process_adjustment.modify_adj_rec()+' );

2825: l_defaulting_rule_used VARCHAR2(100);
2826: l_default_gl_date DATE;
2827: BEGIN
2828: IF PG_DEBUG in ('Y', 'C') THEN
2829: arp_standard.debug( 'arp_process_adjustment.modify_adj_rec()+' );
2830: arp_standard.debug( 'p_adj_id = '||to_char( p_adj_id ) );
2831: END IF;
2832:
2833: arp_adj_pkg.fetch_p( p_adj_id, l_adj_rec );

Line 2887: arp_standard.debug( 'arp_process_adjustment.modify_adj_rec()-' );

2883:
2884: insert_reverse_actions( l_adj_rec, NULL, NULL );
2885:
2886: IF PG_DEBUG in ('Y', 'C') THEN
2887: arp_standard.debug( 'arp_process_adjustment.modify_adj_rec()-' );
2888: END IF;
2889:
2890: EXCEPTION
2891: WHEN OTHERS THEN

Line 2894: 'EXCEPTION: arp_process_adjustment.modify_adj_rec' );

2890: EXCEPTION
2891: WHEN OTHERS THEN
2892: IF PG_DEBUG in ('Y', 'C') THEN
2893: arp_standard.debug(
2894: 'EXCEPTION: arp_process_adjustment.modify_adj_rec' );
2895: END IF;
2896: RAISE;
2897:
2898: END;

Line 2957: arp_standard.debug( 'arp_process_adjustment.insert_reverse_actions()+');

2953: l_xla_ev_rec arp_xla_events.xla_events_type;
2954:
2955: BEGIN
2956: IF PG_DEBUG in ('Y', 'C') THEN
2957: arp_standard.debug( 'arp_process_adjustment.insert_reverse_actions()+');
2958: END IF;
2959:
2960: /* VAT changes: save p_adj_rec.adjustment_id in l_old_adj_id
2961: to be passed to accounting library. Clear p_adj_rec.adjustment_id

Line 3143: arp_standard.debug( 'arp_process_adjustment.insert_reverse_actions()-');

3139: * END IF;
3140: *********************************************************************/
3141:
3142: IF PG_DEBUG in ('Y', 'C') THEN
3143: arp_standard.debug( 'arp_process_adjustment.insert_reverse_actions()-');
3144: END IF;
3145:
3146: EXCEPTION
3147: WHEN OTHERS THEN

Line 3150: 'EXCEPTION: arp_process_adjustment.insert_reverse_actions');

3146: EXCEPTION
3147: WHEN OTHERS THEN
3148: IF PG_DEBUG in ('Y', 'C') THEN
3149: arp_standard.debug(
3150: 'EXCEPTION: arp_process_adjustment.insert_reverse_actions');
3151: END IF;
3152: RAISE;
3153: END insert_reverse_actions;
3154: --

Line 3181: arp_standard.debug( 'arp_process_adjustment.val_insert_rev_actions()+' );

3177: PROCEDURE val_insert_rev_actions(
3178: p_adj_id IN ar_adjustments.adjustment_id%TYPE ) IS
3179: BEGIN
3180: IF PG_DEBUG in ('Y', 'C') THEN
3181: arp_standard.debug( 'arp_process_adjustment.val_insert_rev_actions()+' );
3182: END IF;
3183: IF ( p_adj_id IS NULL ) THEN
3184: IF PG_DEBUG in ('Y', 'C') THEN
3185: arp_standard.debug( ' Null values found in input variable' );

Line 3192: arp_standard.debug( 'arp_process_adjustment.val_insert_rev_actions()-' );

3188: APP_EXCEPTION.raise_exception;
3189: END IF;
3190: --
3191: IF PG_DEBUG in ('Y', 'C') THEN
3192: arp_standard.debug( 'arp_process_adjustment.val_insert_rev_actions()-' );
3193: END IF;
3194: EXCEPTION
3195: WHEN OTHERS THEN
3196: IF PG_DEBUG in ('Y', 'C') THEN

Line 3198: 'EXCEPTION: arp_process_adjustment.val_insert_rev_actions' );

3194: EXCEPTION
3195: WHEN OTHERS THEN
3196: IF PG_DEBUG in ('Y', 'C') THEN
3197: arp_standard.debug(
3198: 'EXCEPTION: arp_process_adjustment.val_insert_rev_actions' );
3199: END IF;
3200: RAISE;
3201: END val_insert_rev_actions;
3202:

Line 3291: arp_util.debug('arp_process_adjustment.cal_prorated_amounts()+');

3287: l_le_id NUMBER;
3288:
3289: BEGIN
3290: IF PG_DEBUG in ('Y', 'C') THEN
3291: arp_util.debug('arp_process_adjustment.cal_prorated_amounts()+');
3292: arp_util.debug( 'p_adj_amount = ' || to_char(p_adj_amount));
3293: arp_util.debug( 'p_payment_schedule_id = ' || to_char(p_payment_schedule_id));
3294: arp_util.debug( 'p_type = ' || p_type);
3295: arp_util.debug( 'p_receivables_trx_id = ' || to_char(p_receivables_trx_id));

Line 3462: arp_util.debug('arp_process_adjustment.cal_prorated_amounts()-');

3458: IF PG_DEBUG in ('Y', 'C') THEN
3459: arp_util.debug( 'p_prorated_amt = ' || to_char(p_prorated_amt));
3460: arp_util.debug( 'p_prorated_tax = ' || to_char(p_prorated_tax));
3461: arp_util.debug( 'p_error_num = ' || to_char(p_error_num));
3462: arp_util.debug('arp_process_adjustment.cal_prorated_amounts()-');
3463: END IF;
3464:
3465: EXCEPTION
3466: WHEN OTHERS THEN

Line 3469: 'EXCEPTION: arp_process_adjustment.cal_prorated_amounts()');

3465: EXCEPTION
3466: WHEN OTHERS THEN
3467: IF PG_DEBUG in ('Y', 'C') THEN
3468: arp_util.debug(
3469: 'EXCEPTION: arp_process_adjustment.cal_prorated_amounts()');
3470: END IF;
3471: FND_MESSAGE.set_name( 'AR', 'GENERIC_MESSAGE' );
3472: FND_MESSAGE.set_token( 'GENERIC_TEXT', 'arp_process_adjustment.cal_prorated_amounts exception: '||SQLERRM );
3473: RAISE;

Line 3472: FND_MESSAGE.set_token( 'GENERIC_TEXT', 'arp_process_adjustment.cal_prorated_amounts exception: '||SQLERRM );

3468: arp_util.debug(
3469: 'EXCEPTION: arp_process_adjustment.cal_prorated_amounts()');
3470: END IF;
3471: FND_MESSAGE.set_name( 'AR', 'GENERIC_MESSAGE' );
3472: FND_MESSAGE.set_token( 'GENERIC_TEXT', 'arp_process_adjustment.cal_prorated_amounts exception: '||SQLERRM );
3473: RAISE;
3474:
3475: END cal_prorated_amounts;
3476:

Line 3494: arp_util.debug('EXCEPTION: arp_process_adjustment.initialization');

3490: pg_base_min_acc_unit := arp_global.base_min_acc_unit;
3491:
3492: EXCEPTION
3493: WHEN OTHERS THEN
3494: arp_util.debug('EXCEPTION: arp_process_adjustment.initialization');
3495: RAISE;
3496:
3497:
3498: END ARP_PROCESS_ADJUSTMENT;

Line 3498: END ARP_PROCESS_ADJUSTMENT;

3494: arp_util.debug('EXCEPTION: arp_process_adjustment.initialization');
3495: RAISE;
3496:
3497:
3498: END ARP_PROCESS_ADJUSTMENT;