471: RAISE;
472: END;
473:
474: BEGIN
475: arp_auto_accounting.do_autoaccounting(
476: 'U',
477: 'REC',
478: p_customer_trx_id,
479: null,
491: l_ccid,
492: l_concat_segments,
493: l_num_failed_dist_rows);
494: EXCEPTION
495: WHEN arp_auto_accounting.no_ccid THEN
496: l_status1 := 'ARP_AUTO_ACCOUNTING.NO_CCID';
497:
498: WHEN NO_DATA_FOUND THEN
499: null;
492: l_concat_segments,
493: l_num_failed_dist_rows);
494: EXCEPTION
495: WHEN arp_auto_accounting.no_ccid THEN
496: l_status1 := 'ARP_AUTO_ACCOUNTING.NO_CCID';
497:
498: WHEN NO_DATA_FOUND THEN
499: null;
500: WHEN OTHERS THEN
502: END;
503:
504:
505: BEGIN
506: arp_auto_accounting.do_autoaccounting(
507: 'U',
508: 'REV',
509: p_customer_trx_id,
510: null,
522: l_ccid,
523: l_concat_segments,
524: l_num_failed_dist_rows);
525: EXCEPTION
526: WHEN arp_auto_accounting.no_ccid THEN
527: l_status2 := 'ARP_AUTO_ACCOUNTING.NO_CCID';
528:
529: WHEN NO_DATA_FOUND THEN
530: null;
523: l_concat_segments,
524: l_num_failed_dist_rows);
525: EXCEPTION
526: WHEN arp_auto_accounting.no_ccid THEN
527: l_status2 := 'ARP_AUTO_ACCOUNTING.NO_CCID';
528:
529: WHEN NO_DATA_FOUND THEN
530: null;
531: WHEN OTHERS THEN
533: END;
534:
535: /* bug 842360 : added next 2 calls to do_autoaccounting for UNEARN and UNBILL */
536: BEGIN
537: arp_auto_accounting.do_autoaccounting(
538: 'U',
539: 'UNEARN',
540: p_customer_trx_id,
541: null,
553: l_ccid,
554: l_concat_segments,
555: l_num_failed_dist_rows);
556: EXCEPTION
557: WHEN arp_auto_accounting.no_ccid THEN
558: l_status6 := 'ARP_AUTO_ACCOUNTING.NO_CCID';
559:
560: WHEN NO_DATA_FOUND THEN
561: null;
554: l_concat_segments,
555: l_num_failed_dist_rows);
556: EXCEPTION
557: WHEN arp_auto_accounting.no_ccid THEN
558: l_status6 := 'ARP_AUTO_ACCOUNTING.NO_CCID';
559:
560: WHEN NO_DATA_FOUND THEN
561: null;
562: WHEN OTHERS THEN
563: RAISE;
564: END;
565:
566: BEGIN
567: arp_auto_accounting.do_autoaccounting(
568: 'U',
569: 'UNBILL',
570: p_customer_trx_id,
571: null,
583: l_ccid,
584: l_concat_segments,
585: l_num_failed_dist_rows);
586: EXCEPTION
587: WHEN arp_auto_accounting.no_ccid THEN
588: l_status7 := 'ARP_AUTO_ACCOUNTING.NO_CCID';
589:
590: WHEN NO_DATA_FOUND THEN
591: null;
584: l_concat_segments,
585: l_num_failed_dist_rows);
586: EXCEPTION
587: WHEN arp_auto_accounting.no_ccid THEN
588: l_status7 := 'ARP_AUTO_ACCOUNTING.NO_CCID';
589:
590: WHEN NO_DATA_FOUND THEN
591: null;
592: WHEN OTHERS THEN
593: RAISE;
594: END;
595:
596: BEGIN
597: arp_auto_accounting.do_autoaccounting(
598: 'U',
599: 'CHARGES',
600: p_customer_trx_id,
601: null,
613: l_ccid,
614: l_concat_segments,
615: l_num_failed_dist_rows);
616: EXCEPTION
617: WHEN arp_auto_accounting.no_ccid THEN
618: l_status3 := 'ARP_AUTO_ACCOUNTING.NO_CCID';
619:
620: WHEN NO_DATA_FOUND THEN
621: null;
614: l_concat_segments,
615: l_num_failed_dist_rows);
616: EXCEPTION
617: WHEN arp_auto_accounting.no_ccid THEN
618: l_status3 := 'ARP_AUTO_ACCOUNTING.NO_CCID';
619:
620: WHEN NO_DATA_FOUND THEN
621: null;
622: WHEN OTHERS THEN
624: END;
625:
626:
627: BEGIN
628: arp_auto_accounting.do_autoaccounting(
629: 'U',
630: 'TAX',
631: p_customer_trx_id,
632: null,
644: l_ccid,
645: l_concat_segments,
646: l_num_failed_dist_rows);
647: EXCEPTION
648: WHEN arp_auto_accounting.no_ccid THEN
649: l_status4 := 'ARP_AUTO_ACCOUNTING.NO_CCID';
650:
651: WHEN NO_DATA_FOUND THEN
652: null;
645: l_concat_segments,
646: l_num_failed_dist_rows);
647: EXCEPTION
648: WHEN arp_auto_accounting.no_ccid THEN
649: l_status4 := 'ARP_AUTO_ACCOUNTING.NO_CCID';
650:
651: WHEN NO_DATA_FOUND THEN
652: null;
653: WHEN OTHERS THEN
655: END;
656:
657:
658: BEGIN
659: arp_auto_accounting.do_autoaccounting(
660: 'U',
661: 'FREIGHT',
662: p_customer_trx_id,
663: null,
675: l_ccid,
676: l_concat_segments,
677: l_num_failed_dist_rows);
678: EXCEPTION
679: WHEN arp_auto_accounting.no_ccid THEN
680: l_status5 := 'ARP_AUTO_ACCOUNTING.NO_CCID';
681:
682: WHEN NO_DATA_FOUND THEN
683: null;
676: l_concat_segments,
677: l_num_failed_dist_rows);
678: EXCEPTION
679: WHEN arp_auto_accounting.no_ccid THEN
680: l_status5 := 'ARP_AUTO_ACCOUNTING.NO_CCID';
681:
682: WHEN NO_DATA_FOUND THEN
683: null;
684: WHEN OTHERS THEN
1002: THEN
1003:
1004: BEGIN
1005:
1006: arp_auto_accounting.do_autoaccounting(
1007: 'I',
1008: 'REC',
1009: l_customer_trx_id,
1010: null,
1044: APP_EXCEPTION.raise_exception;
1045: END IF;
1046:
1047: EXCEPTION
1048: WHEN arp_auto_accounting.no_ccid THEN
1049: l_status2 := 'ARP_AUTO_ACCOUNTING.NO_CCID';
1050: WHEN NO_DATA_FOUND THEN
1051: null;
1052: WHEN OTHERS THEN
1045: END IF;
1046:
1047: EXCEPTION
1048: WHEN arp_auto_accounting.no_ccid THEN
1049: l_status2 := 'ARP_AUTO_ACCOUNTING.NO_CCID';
1050: WHEN NO_DATA_FOUND THEN
1051: null;
1052: WHEN OTHERS THEN
1053: RAISE;