544:
545: BEGIN
546: IF G_debug_flag = 'Y'
547: THEN
548: OE_DEBUG_PUB.Add(' ');
549: OE_DEBUG_PUB.ADD('OEXUCERB: IN Get_exposure_amount',1);
550: END IF;
551:
552: x_return_status := FND_API.G_RET_STS_SUCCESS;
545: BEGIN
546: IF G_debug_flag = 'Y'
547: THEN
548: OE_DEBUG_PUB.Add(' ');
549: OE_DEBUG_PUB.ADD('OEXUCERB: IN Get_exposure_amount',1);
550: END IF;
551:
552: x_return_status := FND_API.G_RET_STS_SUCCESS;
553:
552: x_return_status := FND_API.G_RET_STS_SUCCESS;
553:
554: IF G_debug_flag = 'Y'
555: THEN
556: OE_DEBUG_PUB.Add('Exposure Input parameters ');
557: OE_DEBUG_PUB.Add('--------------------------------------');
558: OE_DEBUG_PUB.Add('p_customer_id = '|| p_customer_id, 1);
559: OE_DEBUG_PUB.Add('p_site_use_id = '|| p_site_use_id, 1);
560: OE_DEBUG_PUB.Add('p_header_id = '|| p_header_id);
553:
554: IF G_debug_flag = 'Y'
555: THEN
556: OE_DEBUG_PUB.Add('Exposure Input parameters ');
557: OE_DEBUG_PUB.Add('--------------------------------------');
558: OE_DEBUG_PUB.Add('p_customer_id = '|| p_customer_id, 1);
559: OE_DEBUG_PUB.Add('p_site_use_id = '|| p_site_use_id, 1);
560: OE_DEBUG_PUB.Add('p_header_id = '|| p_header_id);
561: OE_DEBUG_PUB.Add('p_credit_check_rule_id = '|| p_credit_check_rule_rec.credit_check_rule_id);
554: IF G_debug_flag = 'Y'
555: THEN
556: OE_DEBUG_PUB.Add('Exposure Input parameters ');
557: OE_DEBUG_PUB.Add('--------------------------------------');
558: OE_DEBUG_PUB.Add('p_customer_id = '|| p_customer_id, 1);
559: OE_DEBUG_PUB.Add('p_site_use_id = '|| p_site_use_id, 1);
560: OE_DEBUG_PUB.Add('p_header_id = '|| p_header_id);
561: OE_DEBUG_PUB.Add('p_credit_check_rule_id = '|| p_credit_check_rule_rec.credit_check_rule_id);
562: OE_DEBUG_PUB.Add('Conversion type = '|| p_credit_check_rule_rec.conversion_type);
555: THEN
556: OE_DEBUG_PUB.Add('Exposure Input parameters ');
557: OE_DEBUG_PUB.Add('--------------------------------------');
558: OE_DEBUG_PUB.Add('p_customer_id = '|| p_customer_id, 1);
559: OE_DEBUG_PUB.Add('p_site_use_id = '|| p_site_use_id, 1);
560: OE_DEBUG_PUB.Add('p_header_id = '|| p_header_id);
561: OE_DEBUG_PUB.Add('p_credit_check_rule_id = '|| p_credit_check_rule_rec.credit_check_rule_id);
562: OE_DEBUG_PUB.Add('Conversion type = '|| p_credit_check_rule_rec.conversion_type);
563: OE_DEBUG_PUB.Add('p_credit_level = '|| p_credit_level, 1);
556: OE_DEBUG_PUB.Add('Exposure Input parameters ');
557: OE_DEBUG_PUB.Add('--------------------------------------');
558: OE_DEBUG_PUB.Add('p_customer_id = '|| p_customer_id, 1);
559: OE_DEBUG_PUB.Add('p_site_use_id = '|| p_site_use_id, 1);
560: OE_DEBUG_PUB.Add('p_header_id = '|| p_header_id);
561: OE_DEBUG_PUB.Add('p_credit_check_rule_id = '|| p_credit_check_rule_rec.credit_check_rule_id);
562: OE_DEBUG_PUB.Add('Conversion type = '|| p_credit_check_rule_rec.conversion_type);
563: OE_DEBUG_PUB.Add('p_credit_level = '|| p_credit_level, 1);
564: OE_DEBUG_PUB.Add('p_limit_curr_code = '|| p_limit_curr_code);
557: OE_DEBUG_PUB.Add('--------------------------------------');
558: OE_DEBUG_PUB.Add('p_customer_id = '|| p_customer_id, 1);
559: OE_DEBUG_PUB.Add('p_site_use_id = '|| p_site_use_id, 1);
560: OE_DEBUG_PUB.Add('p_header_id = '|| p_header_id);
561: OE_DEBUG_PUB.Add('p_credit_check_rule_id = '|| p_credit_check_rule_rec.credit_check_rule_id);
562: OE_DEBUG_PUB.Add('Conversion type = '|| p_credit_check_rule_rec.conversion_type);
563: OE_DEBUG_PUB.Add('p_credit_level = '|| p_credit_level, 1);
564: OE_DEBUG_PUB.Add('p_limit_curr_code = '|| p_limit_curr_code);
565: OE_DEBUG_PUB.Add('p_global_exposure_flag = '|| p_global_exposure_flag, 1);
558: OE_DEBUG_PUB.Add('p_customer_id = '|| p_customer_id, 1);
559: OE_DEBUG_PUB.Add('p_site_use_id = '|| p_site_use_id, 1);
560: OE_DEBUG_PUB.Add('p_header_id = '|| p_header_id);
561: OE_DEBUG_PUB.Add('p_credit_check_rule_id = '|| p_credit_check_rule_rec.credit_check_rule_id);
562: OE_DEBUG_PUB.Add('Conversion type = '|| p_credit_check_rule_rec.conversion_type);
563: OE_DEBUG_PUB.Add('p_credit_level = '|| p_credit_level, 1);
564: OE_DEBUG_PUB.Add('p_limit_curr_code = '|| p_limit_curr_code);
565: OE_DEBUG_PUB.Add('p_global_exposure_flag = '|| p_global_exposure_flag, 1);
566: OE_DEBUG_PUB.Add(' l_include_tax_flag = '|| l_include_tax_flag );
559: OE_DEBUG_PUB.Add('p_site_use_id = '|| p_site_use_id, 1);
560: OE_DEBUG_PUB.Add('p_header_id = '|| p_header_id);
561: OE_DEBUG_PUB.Add('p_credit_check_rule_id = '|| p_credit_check_rule_rec.credit_check_rule_id);
562: OE_DEBUG_PUB.Add('Conversion type = '|| p_credit_check_rule_rec.conversion_type);
563: OE_DEBUG_PUB.Add('p_credit_level = '|| p_credit_level, 1);
564: OE_DEBUG_PUB.Add('p_limit_curr_code = '|| p_limit_curr_code);
565: OE_DEBUG_PUB.Add('p_global_exposure_flag = '|| p_global_exposure_flag, 1);
566: OE_DEBUG_PUB.Add(' l_include_tax_flag = '|| l_include_tax_flag );
567: OE_DEBUG_PUB.Add(' l_freight_charges_flag = '|| l_freight_charges_flag );
560: OE_DEBUG_PUB.Add('p_header_id = '|| p_header_id);
561: OE_DEBUG_PUB.Add('p_credit_check_rule_id = '|| p_credit_check_rule_rec.credit_check_rule_id);
562: OE_DEBUG_PUB.Add('Conversion type = '|| p_credit_check_rule_rec.conversion_type);
563: OE_DEBUG_PUB.Add('p_credit_level = '|| p_credit_level, 1);
564: OE_DEBUG_PUB.Add('p_limit_curr_code = '|| p_limit_curr_code);
565: OE_DEBUG_PUB.Add('p_global_exposure_flag = '|| p_global_exposure_flag, 1);
566: OE_DEBUG_PUB.Add(' l_include_tax_flag = '|| l_include_tax_flag );
567: OE_DEBUG_PUB.Add(' l_freight_charges_flag = '|| l_freight_charges_flag );
568: OE_DEBUG_PUB.Add(' l_include_returns_flag = '|| l_include_returns_flag );
561: OE_DEBUG_PUB.Add('p_credit_check_rule_id = '|| p_credit_check_rule_rec.credit_check_rule_id);
562: OE_DEBUG_PUB.Add('Conversion type = '|| p_credit_check_rule_rec.conversion_type);
563: OE_DEBUG_PUB.Add('p_credit_level = '|| p_credit_level, 1);
564: OE_DEBUG_PUB.Add('p_limit_curr_code = '|| p_limit_curr_code);
565: OE_DEBUG_PUB.Add('p_global_exposure_flag = '|| p_global_exposure_flag, 1);
566: OE_DEBUG_PUB.Add(' l_include_tax_flag = '|| l_include_tax_flag );
567: OE_DEBUG_PUB.Add(' l_freight_charges_flag = '|| l_freight_charges_flag );
568: OE_DEBUG_PUB.Add(' l_include_returns_flag = '|| l_include_returns_flag );
569: OE_DEBUG_PUB.Add(' l_include_uninvoiced_flag= '|| l_include_uninvoiced_flag );
562: OE_DEBUG_PUB.Add('Conversion type = '|| p_credit_check_rule_rec.conversion_type);
563: OE_DEBUG_PUB.Add('p_credit_level = '|| p_credit_level, 1);
564: OE_DEBUG_PUB.Add('p_limit_curr_code = '|| p_limit_curr_code);
565: OE_DEBUG_PUB.Add('p_global_exposure_flag = '|| p_global_exposure_flag, 1);
566: OE_DEBUG_PUB.Add(' l_include_tax_flag = '|| l_include_tax_flag );
567: OE_DEBUG_PUB.Add(' l_freight_charges_flag = '|| l_freight_charges_flag );
568: OE_DEBUG_PUB.Add(' l_include_returns_flag = '|| l_include_returns_flag );
569: OE_DEBUG_PUB.Add(' l_include_uninvoiced_flag= '|| l_include_uninvoiced_flag );
570:
563: OE_DEBUG_PUB.Add('p_credit_level = '|| p_credit_level, 1);
564: OE_DEBUG_PUB.Add('p_limit_curr_code = '|| p_limit_curr_code);
565: OE_DEBUG_PUB.Add('p_global_exposure_flag = '|| p_global_exposure_flag, 1);
566: OE_DEBUG_PUB.Add(' l_include_tax_flag = '|| l_include_tax_flag );
567: OE_DEBUG_PUB.Add(' l_freight_charges_flag = '|| l_freight_charges_flag );
568: OE_DEBUG_PUB.Add(' l_include_returns_flag = '|| l_include_returns_flag );
569: OE_DEBUG_PUB.Add(' l_include_uninvoiced_flag= '|| l_include_uninvoiced_flag );
570:
571: OE_DEBUG_PUB.Add('--------------End Parameters---------- ');
564: OE_DEBUG_PUB.Add('p_limit_curr_code = '|| p_limit_curr_code);
565: OE_DEBUG_PUB.Add('p_global_exposure_flag = '|| p_global_exposure_flag, 1);
566: OE_DEBUG_PUB.Add(' l_include_tax_flag = '|| l_include_tax_flag );
567: OE_DEBUG_PUB.Add(' l_freight_charges_flag = '|| l_freight_charges_flag );
568: OE_DEBUG_PUB.Add(' l_include_returns_flag = '|| l_include_returns_flag );
569: OE_DEBUG_PUB.Add(' l_include_uninvoiced_flag= '|| l_include_uninvoiced_flag );
570:
571: OE_DEBUG_PUB.Add('--------------End Parameters---------- ');
572: END IF;
565: OE_DEBUG_PUB.Add('p_global_exposure_flag = '|| p_global_exposure_flag, 1);
566: OE_DEBUG_PUB.Add(' l_include_tax_flag = '|| l_include_tax_flag );
567: OE_DEBUG_PUB.Add(' l_freight_charges_flag = '|| l_freight_charges_flag );
568: OE_DEBUG_PUB.Add(' l_include_returns_flag = '|| l_include_returns_flag );
569: OE_DEBUG_PUB.Add(' l_include_uninvoiced_flag= '|| l_include_uninvoiced_flag );
570:
571: OE_DEBUG_PUB.Add('--------------End Parameters---------- ');
572: END IF;
573:
567: OE_DEBUG_PUB.Add(' l_freight_charges_flag = '|| l_freight_charges_flag );
568: OE_DEBUG_PUB.Add(' l_include_returns_flag = '|| l_include_returns_flag );
569: OE_DEBUG_PUB.Add(' l_include_uninvoiced_flag= '|| l_include_uninvoiced_flag );
570:
571: OE_DEBUG_PUB.Add('--------------End Parameters---------- ');
572: END IF;
573:
574: IF p_credit_level = 'SITE'
575: THEN
583: AND su.cust_acct_site_id = cas.cust_acct_site_id ;
584:
585: IF G_debug_flag = 'Y'
586: THEN
587: OE_DEBUG_PUB.ADD(' Customer ID : ' || l_customer_id ,1);
588: OE_DEBUG_PUB.ADD(' Customer site ID : ' || l_cust_acct_site_id ,1); -- bug 8744491
589: END IF;
590: EXCEPTION
591: WHEN NO_DATA_FOUND
584:
585: IF G_debug_flag = 'Y'
586: THEN
587: OE_DEBUG_PUB.ADD(' Customer ID : ' || l_customer_id ,1);
588: OE_DEBUG_PUB.ADD(' Customer site ID : ' || l_cust_acct_site_id ,1); -- bug 8744491
589: END IF;
590: EXCEPTION
591: WHEN NO_DATA_FOUND
592: THEN
591: WHEN NO_DATA_FOUND
592: THEN
593: IF G_debug_flag = 'Y'
594: THEN
595: OE_DEBUG_PUB.ADD(' No Data found for Customer ID using Site Use ID',1);
596: END IF;
597: END;
598: END IF;
599:
601: THEN
602: -- Select total amount exposure using CUSTOMER/SITE CURSORs
603: IF G_debug_flag = 'Y'
604: THEN
605: OE_DEBUG_PUB.Add('Begin AR Exposure calculation ');
606: END IF;
607:
608: -- The exposure calculation must be done for all the usage currencies
609: -- as part of the multi currency set up.
617: l_current_usage_cur := NULL ;
618:
619: IF G_debug_flag = 'Y'
620: THEN
621: OE_DEBUG_PUB.ADD(' ');
622: OE_DEBUG_PUB.ADD('############################### ');
623: OE_DEBUG_PUB.ADD('USAGE CURR = '|| p_usage_curr(i).usage_curr_code );
624: OE_DEBUG_PUB.ADD('############################### ');
625: OE_DEBUG_PUB.ADD(' ');
618:
619: IF G_debug_flag = 'Y'
620: THEN
621: OE_DEBUG_PUB.ADD(' ');
622: OE_DEBUG_PUB.ADD('############################### ');
623: OE_DEBUG_PUB.ADD('USAGE CURR = '|| p_usage_curr(i).usage_curr_code );
624: OE_DEBUG_PUB.ADD('############################### ');
625: OE_DEBUG_PUB.ADD(' ');
626: END IF;
619: IF G_debug_flag = 'Y'
620: THEN
621: OE_DEBUG_PUB.ADD(' ');
622: OE_DEBUG_PUB.ADD('############################### ');
623: OE_DEBUG_PUB.ADD('USAGE CURR = '|| p_usage_curr(i).usage_curr_code );
624: OE_DEBUG_PUB.ADD('############################### ');
625: OE_DEBUG_PUB.ADD(' ');
626: END IF;
627:
620: THEN
621: OE_DEBUG_PUB.ADD(' ');
622: OE_DEBUG_PUB.ADD('############################### ');
623: OE_DEBUG_PUB.ADD('USAGE CURR = '|| p_usage_curr(i).usage_curr_code );
624: OE_DEBUG_PUB.ADD('############################### ');
625: OE_DEBUG_PUB.ADD(' ');
626: END IF;
627:
628: l_current_usage_cur := p_usage_curr(i).usage_curr_code ;
621: OE_DEBUG_PUB.ADD(' ');
622: OE_DEBUG_PUB.ADD('############################### ');
623: OE_DEBUG_PUB.ADD('USAGE CURR = '|| p_usage_curr(i).usage_curr_code );
624: OE_DEBUG_PUB.ADD('############################### ');
625: OE_DEBUG_PUB.ADD(' ');
626: END IF;
627:
628: l_current_usage_cur := p_usage_curr(i).usage_curr_code ;
629:
633: IF l_include_uninvoiced_flag = 'Y'
634: THEN
635: IF G_debug_flag = 'Y'
636: THEN
637: OE_DEBUG_PUB.Add('Select cust_glb_orders ');
638: END IF;
639:
640: OPEN cust_glb_orders(p_usage_curr(i).usage_curr_code,l_cust_acct_site_id); --bug 8744491
641: FETCH cust_glb_orders INTO l_total_on_order;
641: FETCH cust_glb_orders INTO l_total_on_order;
642:
643: IF G_debug_flag = 'Y'
644: THEN
645: OE_DEBUG_PUB.ADD(' l_total_on_order = ' || nvl(l_total_on_order,0));
646: END IF;
647:
648: IF cust_glb_orders%NOTFOUND
649: THEN
647:
648: IF cust_glb_orders%NOTFOUND
649: THEN
650: l_total_on_order := 0 ;
651: OE_DEBUG_PUB.Add('No Uninvoiced order amount found ');
652: END IF;
653: CLOSE cust_glb_orders;
654: END IF;
655:
656: IF l_include_returns_flag = 'Y'
657: THEN
658: IF G_debug_flag = 'Y'
659: THEN
660: OE_DEBUG_PUB.Add('Select cust_glb_orders_return ');
661: END IF;
662:
663: OPEN cust_glb_orders_return(p_usage_curr(i).usage_curr_code,l_cust_acct_site_id); --bug 8744491
664: FETCH cust_glb_orders_return INTO l_total_on_return;
664: FETCH cust_glb_orders_return INTO l_total_on_return;
665:
666: IF G_debug_flag = 'Y'
667: THEN
668: OE_DEBUG_PUB.ADD(' l_total_on_return = ' || nvl(l_total_on_return,0));
669: END IF;
670:
671: IF cust_glb_orders_return%NOTFOUND
672: THEN
670:
671: IF cust_glb_orders_return%NOTFOUND
672: THEN
673: l_total_on_return := 0 ;
674: OE_DEBUG_PUB.Add('No Return order amount found ');
675: END IF;
676:
677: CLOSE cust_glb_orders_return;
678: END IF;
680: IF l_freight_charges_flag ='Y'
681: THEN
682: IF G_debug_flag = 'Y'
683: THEN
684: OE_DEBUG_PUB.Add('Select cust_glb_orders_freight1 ');
685: END IF;
686:
687: OPEN cust_glb_orders_freight1 (p_usage_curr(i).usage_curr_code,l_cust_acct_site_id); --bug 8744491
688: --TaxER FETCH cust_glb_orders_freight1 INTO l_total_on_freight1;
695: --TaxER end
696:
697: IF G_debug_flag = 'Y'
698: THEN
699: OE_DEBUG_PUB.ADD(' l_total_on_freight1 = ' || nvl(l_total_on_freight1,0));
700: END IF;
701:
702: --Tax ER IF cust_glb_orders_freight1%NOTFOUND
703: IF l_total_on_freight1 = 0 --TaxER
702: --Tax ER IF cust_glb_orders_freight1%NOTFOUND
703: IF l_total_on_freight1 = 0 --TaxER
704: THEN
705: l_total_on_freight1 := 0 ;
706: OE_DEBUG_PUB.Add('No Freight order amount found ');
707: END IF;
708:
709: CLOSE cust_glb_orders_freight1;
710:
709: CLOSE cust_glb_orders_freight1;
710:
711: IF G_debug_flag = 'Y'
712: THEN
713: OE_DEBUG_PUB.Add('Select cust_glb_orders_freight2 ');
714: END IF;
715:
716: OPEN cust_glb_orders_freight2 (p_usage_curr(i).usage_curr_code,l_cust_acct_site_id); --bug 8744491
717: --TaxER FETCH cust_glb_orders_freight2 INTO l_total_on_freight2;
724: --TaxER end
725:
726: IF G_debug_flag = 'Y'
727: THEN
728: OE_DEBUG_PUB.ADD(' l_total_on_freight2 = ' || nvl(l_total_on_freight2,0));
729: END IF;
730:
731: --TaxER IF cust_glb_orders_freight2%NOTFOUND
732: IF l_total_on_freight2 = 0 --TaxER
731: --TaxER IF cust_glb_orders_freight2%NOTFOUND
732: IF l_total_on_freight2 = 0 --TaxER
733: THEN
734: l_total_on_freight2 := 0 ;
735: OE_DEBUG_PUB.Add('No Freight order amount found ');
736: END IF;
737:
738: CLOSE cust_glb_orders_freight2;
739: END IF;
741: IF l_include_uninvoiced_flag = 'Y'
742: THEN
743: IF G_debug_flag = 'Y'
744: THEN
745: OE_DEBUG_PUB.Add('Select cust_reg_orders ');
746: END IF;
747:
748: OPEN cust_reg_orders(p_usage_curr(i).usage_curr_code,l_cust_acct_site_id); --bug 8744491
749: FETCH cust_reg_orders INTO l_total_on_order;
749: FETCH cust_reg_orders INTO l_total_on_order;
750:
751: IF G_debug_flag = 'Y'
752: THEN
753: OE_DEBUG_PUB.ADD(' l_total_on_order = ' || nvl(l_total_on_order,0));
754: END IF;
755:
756: IF cust_reg_orders%NOTFOUND
757: THEN
755:
756: IF cust_reg_orders%NOTFOUND
757: THEN
758: l_total_on_order := 0 ;
759: OE_DEBUG_PUB.Add('No Uninvoiced order amount found ');
760: END IF;
761:
762: CLOSE cust_reg_orders;
763: END IF;
765: IF l_include_returns_flag = 'Y'
766: THEN
767: IF G_debug_flag = 'Y'
768: THEN
769: OE_DEBUG_PUB.Add('Select cust_reg_orders_return ');
770: END IF;
771:
772: OPEN cust_reg_orders_return(p_usage_curr(i).usage_curr_code,l_cust_acct_site_id); --bug 8744491
773: FETCH cust_reg_orders_return INTO l_total_on_return;
773: FETCH cust_reg_orders_return INTO l_total_on_return;
774:
775: IF G_debug_flag = 'Y'
776: THEN
777: OE_DEBUG_PUB.ADD(' l_total_on_return = ' || nvl(l_total_on_return,0));
778: END IF;
779:
780: IF cust_reg_orders_return%NOTFOUND
781: THEN
779:
780: IF cust_reg_orders_return%NOTFOUND
781: THEN
782: l_total_on_return := 0 ;
783: OE_DEBUG_PUB.Add('No Return order amount found ');
784: END IF;
785:
786: CLOSE cust_reg_orders_return;
787: END IF;
789: IF l_freight_charges_flag ='Y'
790: THEN
791: IF G_debug_flag = 'Y'
792: THEN
793: OE_DEBUG_PUB.Add('Select open cust_reg_orders_freight1 ');
794: END IF;
795:
796: OPEN cust_reg_orders_freight1 (p_usage_curr(i).usage_curr_code,l_cust_acct_site_id); --bug 8744491
797: --TaxER FETCH cust_reg_orders_freight1 INTO l_total_on_freight1;
804: --TaxER end
805:
806: IF G_debug_flag = 'Y'
807: THEN
808: OE_DEBUG_PUB.ADD(' l_total_on_freight1 = ' || nvl(l_total_on_freight1,0));
809: END IF;
810:
811: --TaxER IF cust_reg_orders_freight1%NOTFOUND
812: IF l_total_on_freight1 = 0 --TaxER
811: --TaxER IF cust_reg_orders_freight1%NOTFOUND
812: IF l_total_on_freight1 = 0 --TaxER
813: THEN
814: l_total_on_freight1 := 0 ;
815: OE_DEBUG_PUB.Add('No Freight order amount found ');
816: END IF;
817:
818: CLOSE cust_reg_orders_freight1;
819:
818: CLOSE cust_reg_orders_freight1;
819:
820: IF G_debug_flag = 'Y'
821: THEN
822: OE_DEBUG_PUB.Add('Select open cust_reg_orders_freight2 ');
823: END IF;
824:
825: OPEN cust_reg_orders_freight2 (p_usage_curr(i).usage_curr_code,l_cust_acct_site_id); --bug 8744491
826: --TaxER FETCH cust_reg_orders_freight2 INTO l_total_on_freight2;
833: --TaxER end
834:
835: IF G_debug_flag = 'Y'
836: THEN
837: OE_DEBUG_PUB.ADD(' l_total_on_freight2 = ' || nvl(l_total_on_freight2,0));
838: END IF;
839:
840: --TaxER IF cust_reg_orders_freight2%NOTFOUND
841: IF l_total_on_freight2 = 0 --TaxER
840: --TaxER IF cust_reg_orders_freight2%NOTFOUND
841: IF l_total_on_freight2 = 0 --TaxER
842: THEN
843: l_total_on_freight2 := 0 ;
844: OE_DEBUG_PUB.Add('No Freight order amount found ');
845: END IF;
846:
847: CLOSE cust_reg_orders_freight2;
848: END IF;
859: + NVL(l_cum_total_on_freight1,0) + NVL(l_cum_total_on_freight2,0);
860:
861: IF G_debug_flag = 'Y'
862: THEN
863: OE_DEBUG_PUB.ADD(' ');
864: OE_DEBUG_PUB.ADD(' l_cum_total_on_order = ' || nvl(l_cum_total_on_order,0));
865: OE_DEBUG_PUB.ADD(' l_cum_total_on_return = ' || nvl(l_cum_total_on_return,0));
866: OE_DEBUG_PUB.ADD(' l_cum_total_on_freight1 = ' || nvl(l_total_on_freight1,0));
867: OE_DEBUG_PUB.ADD(' l_cum_total_on_freight2 = ' || nvl(l_total_on_freight2,0));
860:
861: IF G_debug_flag = 'Y'
862: THEN
863: OE_DEBUG_PUB.ADD(' ');
864: OE_DEBUG_PUB.ADD(' l_cum_total_on_order = ' || nvl(l_cum_total_on_order,0));
865: OE_DEBUG_PUB.ADD(' l_cum_total_on_return = ' || nvl(l_cum_total_on_return,0));
866: OE_DEBUG_PUB.ADD(' l_cum_total_on_freight1 = ' || nvl(l_total_on_freight1,0));
867: OE_DEBUG_PUB.ADD(' l_cum_total_on_freight2 = ' || nvl(l_total_on_freight2,0));
868: OE_DEBUG_PUB.ADD(' l_usage_total_exposure = ' || nvl(l_usage_total_exposure,0));
861: IF G_debug_flag = 'Y'
862: THEN
863: OE_DEBUG_PUB.ADD(' ');
864: OE_DEBUG_PUB.ADD(' l_cum_total_on_order = ' || nvl(l_cum_total_on_order,0));
865: OE_DEBUG_PUB.ADD(' l_cum_total_on_return = ' || nvl(l_cum_total_on_return,0));
866: OE_DEBUG_PUB.ADD(' l_cum_total_on_freight1 = ' || nvl(l_total_on_freight1,0));
867: OE_DEBUG_PUB.ADD(' l_cum_total_on_freight2 = ' || nvl(l_total_on_freight2,0));
868: OE_DEBUG_PUB.ADD(' l_usage_total_exposure = ' || nvl(l_usage_total_exposure,0));
869:
862: THEN
863: OE_DEBUG_PUB.ADD(' ');
864: OE_DEBUG_PUB.ADD(' l_cum_total_on_order = ' || nvl(l_cum_total_on_order,0));
865: OE_DEBUG_PUB.ADD(' l_cum_total_on_return = ' || nvl(l_cum_total_on_return,0));
866: OE_DEBUG_PUB.ADD(' l_cum_total_on_freight1 = ' || nvl(l_total_on_freight1,0));
867: OE_DEBUG_PUB.ADD(' l_cum_total_on_freight2 = ' || nvl(l_total_on_freight2,0));
868: OE_DEBUG_PUB.ADD(' l_usage_total_exposure = ' || nvl(l_usage_total_exposure,0));
869:
870: OE_DEBUG_PUB.ADD(' Call currency conversion for exposure ' );
863: OE_DEBUG_PUB.ADD(' ');
864: OE_DEBUG_PUB.ADD(' l_cum_total_on_order = ' || nvl(l_cum_total_on_order,0));
865: OE_DEBUG_PUB.ADD(' l_cum_total_on_return = ' || nvl(l_cum_total_on_return,0));
866: OE_DEBUG_PUB.ADD(' l_cum_total_on_freight1 = ' || nvl(l_total_on_freight1,0));
867: OE_DEBUG_PUB.ADD(' l_cum_total_on_freight2 = ' || nvl(l_total_on_freight2,0));
868: OE_DEBUG_PUB.ADD(' l_usage_total_exposure = ' || nvl(l_usage_total_exposure,0));
869:
870: OE_DEBUG_PUB.ADD(' Call currency conversion for exposure ' );
871: OE_DEBUG_PUB.Add(' GL_CURRENCY = '|| OE_Credit_Engine_GRP.GL_currency );
864: OE_DEBUG_PUB.ADD(' l_cum_total_on_order = ' || nvl(l_cum_total_on_order,0));
865: OE_DEBUG_PUB.ADD(' l_cum_total_on_return = ' || nvl(l_cum_total_on_return,0));
866: OE_DEBUG_PUB.ADD(' l_cum_total_on_freight1 = ' || nvl(l_total_on_freight1,0));
867: OE_DEBUG_PUB.ADD(' l_cum_total_on_freight2 = ' || nvl(l_total_on_freight2,0));
868: OE_DEBUG_PUB.ADD(' l_usage_total_exposure = ' || nvl(l_usage_total_exposure,0));
869:
870: OE_DEBUG_PUB.ADD(' Call currency conversion for exposure ' );
871: OE_DEBUG_PUB.Add(' GL_CURRENCY = '|| OE_Credit_Engine_GRP.GL_currency );
872: END IF;
866: OE_DEBUG_PUB.ADD(' l_cum_total_on_freight1 = ' || nvl(l_total_on_freight1,0));
867: OE_DEBUG_PUB.ADD(' l_cum_total_on_freight2 = ' || nvl(l_total_on_freight2,0));
868: OE_DEBUG_PUB.ADD(' l_usage_total_exposure = ' || nvl(l_usage_total_exposure,0));
869:
870: OE_DEBUG_PUB.ADD(' Call currency conversion for exposure ' );
871: OE_DEBUG_PUB.Add(' GL_CURRENCY = '|| OE_Credit_Engine_GRP.GL_currency );
872: END IF;
873:
874: IF OE_Credit_Engine_GRP.GL_currency IS NULL
867: OE_DEBUG_PUB.ADD(' l_cum_total_on_freight2 = ' || nvl(l_total_on_freight2,0));
868: OE_DEBUG_PUB.ADD(' l_usage_total_exposure = ' || nvl(l_usage_total_exposure,0));
869:
870: OE_DEBUG_PUB.ADD(' Call currency conversion for exposure ' );
871: OE_DEBUG_PUB.Add(' GL_CURRENCY = '|| OE_Credit_Engine_GRP.GL_currency );
872: END IF;
873:
874: IF OE_Credit_Engine_GRP.GL_currency IS NULL
875: THEN
872: END IF;
873:
874: IF OE_Credit_Engine_GRP.GL_currency IS NULL
875: THEN
876: OE_DEBUG_PUB.ADD(' Call GET_GL_currency ');
877:
878: OE_Credit_Engine_GRP.GL_currency := OE_CREDIT_CHECK_UTIL.GET_GL_currency ;
879:
880: OE_DEBUG_PUB.ADD(' GL_CURRENCY after = ' || OE_Credit_Engine_GRP.GL_currency );
876: OE_DEBUG_PUB.ADD(' Call GET_GL_currency ');
877:
878: OE_Credit_Engine_GRP.GL_currency := OE_CREDIT_CHECK_UTIL.GET_GL_currency ;
879:
880: OE_DEBUG_PUB.ADD(' GL_CURRENCY after = ' || OE_Credit_Engine_GRP.GL_currency );
881: END IF;
882:
883: l_limit_total_exposure :=
884: OE_CREDIT_CHECK_UTIL.CONVERT_CURRENCY_AMOUNT
893: l_total_exposure := NVL(l_total_exposure,0) + NVL(l_limit_total_exposure,0) ;
894:
895: IF G_debug_flag = 'Y'
896: THEN
897: OE_DEBUG_PUB.ADD('l_total_exposure = ' || nvl(l_total_exposure,0));
898: END IF;
899:
900: l_cum_total_on_order := 0;
901: l_cum_total_on_return := 0;
918: x_exposure_amount := NVL(l_total_exposure,0) ;
919:
920: IF G_debug_flag = 'Y'
921: THEN
922: OE_DEBUG_PUB.Add(' ');
923: OE_DEBUG_PUB.Add('---------------##########----------------' );
924: OE_DEBUG_PUB.Add(' ');
925: OE_DEBUG_PUB.Add('Total exposure amount in Interface table = '|| x_exposure_amount,1);
926: OE_DEBUG_PUB.Add(' ');
919:
920: IF G_debug_flag = 'Y'
921: THEN
922: OE_DEBUG_PUB.Add(' ');
923: OE_DEBUG_PUB.Add('---------------##########----------------' );
924: OE_DEBUG_PUB.Add(' ');
925: OE_DEBUG_PUB.Add('Total exposure amount in Interface table = '|| x_exposure_amount,1);
926: OE_DEBUG_PUB.Add(' ');
927: OE_DEBUG_PUB.Add('-------------- ##########----------------' );
920: IF G_debug_flag = 'Y'
921: THEN
922: OE_DEBUG_PUB.Add(' ');
923: OE_DEBUG_PUB.Add('---------------##########----------------' );
924: OE_DEBUG_PUB.Add(' ');
925: OE_DEBUG_PUB.Add('Total exposure amount in Interface table = '|| x_exposure_amount,1);
926: OE_DEBUG_PUB.Add(' ');
927: OE_DEBUG_PUB.Add('-------------- ##########----------------' );
928: OE_DEBUG_PUB.Add(' ');
921: THEN
922: OE_DEBUG_PUB.Add(' ');
923: OE_DEBUG_PUB.Add('---------------##########----------------' );
924: OE_DEBUG_PUB.Add(' ');
925: OE_DEBUG_PUB.Add('Total exposure amount in Interface table = '|| x_exposure_amount,1);
926: OE_DEBUG_PUB.Add(' ');
927: OE_DEBUG_PUB.Add('-------------- ##########----------------' );
928: OE_DEBUG_PUB.Add(' ');
929: OE_DEBUG_PUB.ADD('OEXUCERB: OUT NOCOPY Get_exposure_amount ',1);
922: OE_DEBUG_PUB.Add(' ');
923: OE_DEBUG_PUB.Add('---------------##########----------------' );
924: OE_DEBUG_PUB.Add(' ');
925: OE_DEBUG_PUB.Add('Total exposure amount in Interface table = '|| x_exposure_amount,1);
926: OE_DEBUG_PUB.Add(' ');
927: OE_DEBUG_PUB.Add('-------------- ##########----------------' );
928: OE_DEBUG_PUB.Add(' ');
929: OE_DEBUG_PUB.ADD('OEXUCERB: OUT NOCOPY Get_exposure_amount ',1);
930: END IF;
923: OE_DEBUG_PUB.Add('---------------##########----------------' );
924: OE_DEBUG_PUB.Add(' ');
925: OE_DEBUG_PUB.Add('Total exposure amount in Interface table = '|| x_exposure_amount,1);
926: OE_DEBUG_PUB.Add(' ');
927: OE_DEBUG_PUB.Add('-------------- ##########----------------' );
928: OE_DEBUG_PUB.Add(' ');
929: OE_DEBUG_PUB.ADD('OEXUCERB: OUT NOCOPY Get_exposure_amount ',1);
930: END IF;
931:
924: OE_DEBUG_PUB.Add(' ');
925: OE_DEBUG_PUB.Add('Total exposure amount in Interface table = '|| x_exposure_amount,1);
926: OE_DEBUG_PUB.Add(' ');
927: OE_DEBUG_PUB.Add('-------------- ##########----------------' );
928: OE_DEBUG_PUB.Add(' ');
929: OE_DEBUG_PUB.ADD('OEXUCERB: OUT NOCOPY Get_exposure_amount ',1);
930: END IF;
931:
932: EXCEPTION
925: OE_DEBUG_PUB.Add('Total exposure amount in Interface table = '|| x_exposure_amount,1);
926: OE_DEBUG_PUB.Add(' ');
927: OE_DEBUG_PUB.Add('-------------- ##########----------------' );
928: OE_DEBUG_PUB.Add(' ');
929: OE_DEBUG_PUB.ADD('OEXUCERB: OUT NOCOPY Get_exposure_amount ',1);
930: END IF;
931:
932: EXCEPTION
933: WHEN GL_CURRENCY_API.NO_RATE THEN
930: END IF;
931:
932: EXCEPTION
933: WHEN GL_CURRENCY_API.NO_RATE THEN
934: OE_DEBUG_PUB.ADD('EXCEPTION: GL_CURRENCY_API.NO_RATE in get_exposure_amount',1);
935: OE_DEBUG_PUB.ADD('l_current_usage_cur = '|| l_current_usage_cur );
936: x_conversion_status(1).usage_curr_code := l_current_usage_cur ;
937:
938: fnd_message.set_name('ONT', 'OE_CONVERSION_ERROR');
931:
932: EXCEPTION
933: WHEN GL_CURRENCY_API.NO_RATE THEN
934: OE_DEBUG_PUB.ADD('EXCEPTION: GL_CURRENCY_API.NO_RATE in get_exposure_amount',1);
935: OE_DEBUG_PUB.ADD('l_current_usage_cur = '|| l_current_usage_cur );
936: x_conversion_status(1).usage_curr_code := l_current_usage_cur ;
937:
938: fnd_message.set_name('ONT', 'OE_CONVERSION_ERROR');
939: OE_DEBUG_PUB.ADD('Exception table added ');
935: OE_DEBUG_PUB.ADD('l_current_usage_cur = '|| l_current_usage_cur );
936: x_conversion_status(1).usage_curr_code := l_current_usage_cur ;
937:
938: fnd_message.set_name('ONT', 'OE_CONVERSION_ERROR');
939: OE_DEBUG_PUB.ADD('Exception table added ');
940: WHEN OTHERS THEN
941: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
942: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
943: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, '