DBA Data[Home] [Help]

APPS.PN_VAR_RENT_CALC_PKG dependencies on PN_VAR_RENT_CALC_PKG

Line 1: PACKAGE BODY pn_var_rent_calc_pkg AS

1: PACKAGE BODY pn_var_rent_calc_pkg AS
2: -- $Header: PNVRCALB.pls 120.9 2011/12/22 12:53:39 bpottipa ship $
3: /* -------------------------------------------------------------------------
4: ------------------------- COMMON DATA STRUCTURES ------------------------
5: ------------------------------------------------------------------------- */

Line 221: vol_hist_status_code = pn_var_rent_calc_pkg.G_SALESVOL_STATUS_APPROVED);

217: pn_var_vol_hist_all
218: WHERE
219: line_item_id = p_line_id AND
220: grp_date_id = p_grp_id AND
221: vol_hist_status_code = pn_var_rent_calc_pkg.G_SALESVOL_STATUS_APPROVED);
222:
223: BEGIN
224:
225: l_exists_approved_sales := FALSE;

Line 403: (p_trx_hdr_rec IN OUT NOCOPY pn_var_rent_calc_pkg.trx_hdr_c%ROWTYPE)

399: --
400: -- dd-mon-yyyy name o Created
401: --------------------------------------------------------------------------------
402: PROCEDURE get_rent_applicable
403: (p_trx_hdr_rec IN OUT NOCOPY pn_var_rent_calc_pkg.trx_hdr_c%ROWTYPE)
404: IS
405:
406: /* cache trx hdr passed */
407: l_trx_hdr_rec pn_var_rent_calc_pkg.trx_hdr_c%ROWTYPE;

Line 407: l_trx_hdr_rec pn_var_rent_calc_pkg.trx_hdr_c%ROWTYPE;

403: (p_trx_hdr_rec IN OUT NOCOPY pn_var_rent_calc_pkg.trx_hdr_c%ROWTYPE)
404: IS
405:
406: /* cache trx hdr passed */
407: l_trx_hdr_rec pn_var_rent_calc_pkg.trx_hdr_c%ROWTYPE;
408:
409: /* get bkpt type */
410: CURSOR bkpt_type_c(p_bkdt_id IN NUMBER) IS
411: SELECT

Line 555: NVL(status, 'A') <> pn_var_rent_calc_pkg.G_PERIOD_REVERSED_STATUS;

551: FROM
552: pn_var_periods_all
553: WHERE
554: var_rent_id = p_vr_id AND
555: NVL(status, 'A') <> pn_var_rent_calc_pkg.G_PERIOD_REVERSED_STATUS;
556:
557: /* get the last partial period */
558: CURSOR last_period_c( p_vr_id IN NUMBER) IS
559: SELECT

Line 618: pn_var_rent_calc_pkg.cache_vr_details

614: g_negative_rent IS NULL
615: THEN
616:
617: /* cache VR details */
618: pn_var_rent_calc_pkg.cache_vr_details
619: (p_var_rent_id => l_trx_hdr_rec.var_rent_id);
620:
621: END IF;
622:

Line 628: OPEN pn_var_rent_calc_pkg.trx_dtl_c(p_hdr_id => p_trx_hdr_rec.trx_header_id);

624:
625: /* cache bkpt details */
626: l_bkpts_t.DELETE;
627:
628: OPEN pn_var_rent_calc_pkg.trx_dtl_c(p_hdr_id => p_trx_hdr_rec.trx_header_id);
629: FETCH pn_var_rent_calc_pkg.trx_dtl_c BULK COLLECT INTO l_bkpts_t;
630: CLOSE pn_var_rent_calc_pkg.trx_dtl_c;
631:
632: /* get the breakpoint type - flat, sliding, stratified */

Line 629: FETCH pn_var_rent_calc_pkg.trx_dtl_c BULK COLLECT INTO l_bkpts_t;

625: /* cache bkpt details */
626: l_bkpts_t.DELETE;
627:
628: OPEN pn_var_rent_calc_pkg.trx_dtl_c(p_hdr_id => p_trx_hdr_rec.trx_header_id);
629: FETCH pn_var_rent_calc_pkg.trx_dtl_c BULK COLLECT INTO l_bkpts_t;
630: CLOSE pn_var_rent_calc_pkg.trx_dtl_c;
631:
632: /* get the breakpoint type - flat, sliding, stratified */
633: FOR rec IN bkpt_type_c(p_bkdt_id => l_bkpts_t(1).bkpt_detail_id)

Line 630: CLOSE pn_var_rent_calc_pkg.trx_dtl_c;

626: l_bkpts_t.DELETE;
627:
628: OPEN pn_var_rent_calc_pkg.trx_dtl_c(p_hdr_id => p_trx_hdr_rec.trx_header_id);
629: FETCH pn_var_rent_calc_pkg.trx_dtl_c BULK COLLECT INTO l_bkpts_t;
630: CLOSE pn_var_rent_calc_pkg.trx_dtl_c;
631:
632: /* get the breakpoint type - flat, sliding, stratified */
633: FOR rec IN bkpt_type_c(p_bkdt_id => l_bkpts_t(1).bkpt_detail_id)
634: LOOP

Line 638: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE

634: LOOP
635: l_bkpt_type := rec.breakpoint_type;
636: END LOOP;
637:
638: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE
639: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)
640: THEN
641: l_net_volume := (l_trx_hdr_rec.prorated_group_sales - NVL(l_trx_hdr_rec.prorated_group_deductions,0));
642:

Line 639: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)

635: l_bkpt_type := rec.breakpoint_type;
636: END LOOP;
637:
638: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE
639: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)
640: THEN
641: l_net_volume := (l_trx_hdr_rec.prorated_group_sales - NVL(l_trx_hdr_rec.prorated_group_deductions,0));
642:
643: ELSIF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_CUMULATIVE

Line 643: ELSIF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_CUMULATIVE

639: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)
640: THEN
641: l_net_volume := (l_trx_hdr_rec.prorated_group_sales - NVL(l_trx_hdr_rec.prorated_group_deductions,0));
642:
643: ELSIF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_CUMULATIVE
644: ,pn_var_rent_calc_pkg.G_CALC_YTD)
645: THEN
646: l_net_volume := (l_trx_hdr_rec.ytd_sales - NVL(l_trx_hdr_rec.ytd_deductions,0));
647:

Line 644: ,pn_var_rent_calc_pkg.G_CALC_YTD)

640: THEN
641: l_net_volume := (l_trx_hdr_rec.prorated_group_sales - NVL(l_trx_hdr_rec.prorated_group_deductions,0));
642:
643: ELSIF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_CUMULATIVE
644: ,pn_var_rent_calc_pkg.G_CALC_YTD)
645: THEN
646: l_net_volume := (l_trx_hdr_rec.ytd_sales - NVL(l_trx_hdr_rec.ytd_deductions,0));
647:
648: END IF;

Line 660: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE

656:
657: /* init the calculated rent to 0 - it will be re-calculated */
658: l_trx_hdr_rec.calculated_rent := 0;
659:
660: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE
661: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)
662: AND
663: ((g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_NP
664: ,pn_var_rent_calc_pkg.G_PRORUL_STD

Line 661: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)

657: /* init the calculated rent to 0 - it will be re-calculated */
658: l_trx_hdr_rec.calculated_rent := 0;
659:
660: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE
661: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)
662: AND
663: ((g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_NP
664: ,pn_var_rent_calc_pkg.G_PRORUL_STD
665: ,pn_var_rent_calc_pkg.G_PRORUL_FY

Line 663: ((g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_NP

659:
660: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE
661: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)
662: AND
663: ((g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_NP
664: ,pn_var_rent_calc_pkg.G_PRORUL_STD
665: ,pn_var_rent_calc_pkg.G_PRORUL_FY
666: ,pn_var_rent_calc_pkg.G_PRORUL_LY
667: ,pn_var_rent_calc_pkg.G_PRORUL_FLY

Line 664: ,pn_var_rent_calc_pkg.G_PRORUL_STD

660: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE
661: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)
662: AND
663: ((g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_NP
664: ,pn_var_rent_calc_pkg.G_PRORUL_STD
665: ,pn_var_rent_calc_pkg.G_PRORUL_FY
666: ,pn_var_rent_calc_pkg.G_PRORUL_LY
667: ,pn_var_rent_calc_pkg.G_PRORUL_FLY
668: ,pn_var_rent_calc_pkg.G_PRORUL_CYP) AND

Line 665: ,pn_var_rent_calc_pkg.G_PRORUL_FY

661: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)
662: AND
663: ((g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_NP
664: ,pn_var_rent_calc_pkg.G_PRORUL_STD
665: ,pn_var_rent_calc_pkg.G_PRORUL_FY
666: ,pn_var_rent_calc_pkg.G_PRORUL_LY
667: ,pn_var_rent_calc_pkg.G_PRORUL_FLY
668: ,pn_var_rent_calc_pkg.G_PRORUL_CYP) AND
669: l_net_volume < l_bkpts_t(1).prorated_grp_vol_start)

Line 666: ,pn_var_rent_calc_pkg.G_PRORUL_LY

662: AND
663: ((g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_NP
664: ,pn_var_rent_calc_pkg.G_PRORUL_STD
665: ,pn_var_rent_calc_pkg.G_PRORUL_FY
666: ,pn_var_rent_calc_pkg.G_PRORUL_LY
667: ,pn_var_rent_calc_pkg.G_PRORUL_FLY
668: ,pn_var_rent_calc_pkg.G_PRORUL_CYP) AND
669: l_net_volume < l_bkpts_t(1).prorated_grp_vol_start)
670: OR

Line 667: ,pn_var_rent_calc_pkg.G_PRORUL_FLY

663: ((g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_NP
664: ,pn_var_rent_calc_pkg.G_PRORUL_STD
665: ,pn_var_rent_calc_pkg.G_PRORUL_FY
666: ,pn_var_rent_calc_pkg.G_PRORUL_LY
667: ,pn_var_rent_calc_pkg.G_PRORUL_FLY
668: ,pn_var_rent_calc_pkg.G_PRORUL_CYP) AND
669: l_net_volume < l_bkpts_t(1).prorated_grp_vol_start)
670: OR
671: (g_proration_rule = pn_var_rent_calc_pkg.G_PRORUL_CYNP AND

Line 668: ,pn_var_rent_calc_pkg.G_PRORUL_CYP) AND

664: ,pn_var_rent_calc_pkg.G_PRORUL_STD
665: ,pn_var_rent_calc_pkg.G_PRORUL_FY
666: ,pn_var_rent_calc_pkg.G_PRORUL_LY
667: ,pn_var_rent_calc_pkg.G_PRORUL_FLY
668: ,pn_var_rent_calc_pkg.G_PRORUL_CYP) AND
669: l_net_volume < l_bkpts_t(1).prorated_grp_vol_start)
670: OR
671: (g_proration_rule = pn_var_rent_calc_pkg.G_PRORUL_CYNP AND
672: l_net_volume < l_bkpts_t(1).pr_grp_blended_vol_start))

Line 671: (g_proration_rule = pn_var_rent_calc_pkg.G_PRORUL_CYNP AND

667: ,pn_var_rent_calc_pkg.G_PRORUL_FLY
668: ,pn_var_rent_calc_pkg.G_PRORUL_CYP) AND
669: l_net_volume < l_bkpts_t(1).prorated_grp_vol_start)
670: OR
671: (g_proration_rule = pn_var_rent_calc_pkg.G_PRORUL_CYNP AND
672: l_net_volume < l_bkpts_t(1).pr_grp_blended_vol_start))
673: THEN
674:
675: pnp_debug_pkg.log('No volumes tripped.');

Line 680: IF (g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_NP

676: pnp_debug_pkg.log('l_net_volume:'||l_net_volume);
677: pnp_debug_pkg.log
678: ('l_bkpts_t(1).prorated_grp_vol_start:'||l_bkpts_t(1).prorated_grp_vol_start);
679: /* Once no breakpoints are tripped, Macerich consider the rent to be = 0 */
680: IF (g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_NP
681: ,pn_var_rent_calc_pkg.G_PRORUL_STD
682: ,pn_var_rent_calc_pkg.G_PRORUL_FY
683: ,pn_var_rent_calc_pkg.G_PRORUL_LY
684: ,pn_var_rent_calc_pkg.G_PRORUL_FLY

Line 681: ,pn_var_rent_calc_pkg.G_PRORUL_STD

677: pnp_debug_pkg.log
678: ('l_bkpts_t(1).prorated_grp_vol_start:'||l_bkpts_t(1).prorated_grp_vol_start);
679: /* Once no breakpoints are tripped, Macerich consider the rent to be = 0 */
680: IF (g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_NP
681: ,pn_var_rent_calc_pkg.G_PRORUL_STD
682: ,pn_var_rent_calc_pkg.G_PRORUL_FY
683: ,pn_var_rent_calc_pkg.G_PRORUL_LY
684: ,pn_var_rent_calc_pkg.G_PRORUL_FLY
685: ,pn_var_rent_calc_pkg.G_PRORUL_CYP)) THEN

Line 682: ,pn_var_rent_calc_pkg.G_PRORUL_FY

678: ('l_bkpts_t(1).prorated_grp_vol_start:'||l_bkpts_t(1).prorated_grp_vol_start);
679: /* Once no breakpoints are tripped, Macerich consider the rent to be = 0 */
680: IF (g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_NP
681: ,pn_var_rent_calc_pkg.G_PRORUL_STD
682: ,pn_var_rent_calc_pkg.G_PRORUL_FY
683: ,pn_var_rent_calc_pkg.G_PRORUL_LY
684: ,pn_var_rent_calc_pkg.G_PRORUL_FLY
685: ,pn_var_rent_calc_pkg.G_PRORUL_CYP)) THEN
686:

Line 683: ,pn_var_rent_calc_pkg.G_PRORUL_LY

679: /* Once no breakpoints are tripped, Macerich consider the rent to be = 0 */
680: IF (g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_NP
681: ,pn_var_rent_calc_pkg.G_PRORUL_STD
682: ,pn_var_rent_calc_pkg.G_PRORUL_FY
683: ,pn_var_rent_calc_pkg.G_PRORUL_LY
684: ,pn_var_rent_calc_pkg.G_PRORUL_FLY
685: ,pn_var_rent_calc_pkg.G_PRORUL_CYP)) THEN
686:
687: l_trx_hdr_rec.calculated_rent

Line 684: ,pn_var_rent_calc_pkg.G_PRORUL_FLY

680: IF (g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_NP
681: ,pn_var_rent_calc_pkg.G_PRORUL_STD
682: ,pn_var_rent_calc_pkg.G_PRORUL_FY
683: ,pn_var_rent_calc_pkg.G_PRORUL_LY
684: ,pn_var_rent_calc_pkg.G_PRORUL_FLY
685: ,pn_var_rent_calc_pkg.G_PRORUL_CYP)) THEN
686:
687: l_trx_hdr_rec.calculated_rent
688: := (l_net_volume - l_bkpts_t(1).prorated_grp_vol_start)

Line 685: ,pn_var_rent_calc_pkg.G_PRORUL_CYP)) THEN

681: ,pn_var_rent_calc_pkg.G_PRORUL_STD
682: ,pn_var_rent_calc_pkg.G_PRORUL_FY
683: ,pn_var_rent_calc_pkg.G_PRORUL_LY
684: ,pn_var_rent_calc_pkg.G_PRORUL_FLY
685: ,pn_var_rent_calc_pkg.G_PRORUL_CYP)) THEN
686:
687: l_trx_hdr_rec.calculated_rent
688: := (l_net_volume - l_bkpts_t(1).prorated_grp_vol_start)
689: * l_bkpts_t(1).bkpt_rate;

Line 703: IF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_STRATIFIED

699:
700: ELSE
701:
702: /* get l_trx_hdr_rec.calculated_rent - CALCULATED RENT */
703: IF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_STRATIFIED
704: THEN
705:
706: l_trx_hdr_rec.calculated_rent := 0;
707:

Line 711: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE

707:
708: /* loop for all bkpt details */
709: FOR i IN l_bkpts_t.FIRST..l_bkpts_t.LAST LOOP
710:
711: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE
712: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)
713: THEN
714:
715: IF g_proration_rule = pn_var_rent_calc_pkg.G_PRORUL_CYNP THEN

Line 712: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)

708: /* loop for all bkpt details */
709: FOR i IN l_bkpts_t.FIRST..l_bkpts_t.LAST LOOP
710:
711: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE
712: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)
713: THEN
714:
715: IF g_proration_rule = pn_var_rent_calc_pkg.G_PRORUL_CYNP THEN
716:

Line 715: IF g_proration_rule = pn_var_rent_calc_pkg.G_PRORUL_CYNP THEN

711: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE
712: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)
713: THEN
714:
715: IF g_proration_rule = pn_var_rent_calc_pkg.G_PRORUL_CYNP THEN
716:
717: l_bkpt_start := NVL(l_bkpts_t(i).pr_grp_blended_vol_start
718: ,l_bkpts_t(i).prorated_grp_vol_start);
719: l_bkpt_end := NVL(l_bkpts_t(i).pr_grp_blended_vol_end

Line 729: ELSIF g_calculation_method = pn_var_rent_calc_pkg.G_CALC_CUMULATIVE

725: l_bkpt_end := l_bkpts_t(i).prorated_grp_vol_end;
726:
727: END IF; /* g_proration_rule */
728:
729: ELSIF g_calculation_method = pn_var_rent_calc_pkg.G_CALC_CUMULATIVE
730: THEN
731:
732: IF g_proration_rule = pn_var_rent_calc_pkg.G_PRORUL_NP THEN
733:

Line 732: IF g_proration_rule = pn_var_rent_calc_pkg.G_PRORUL_NP THEN

728:
729: ELSIF g_calculation_method = pn_var_rent_calc_pkg.G_CALC_CUMULATIVE
730: THEN
731:
732: IF g_proration_rule = pn_var_rent_calc_pkg.G_PRORUL_NP THEN
733:
734: l_bkpt_start := l_bkpts_t(i).prorated_grp_vol_start;
735: l_bkpt_end := l_bkpts_t(i).prorated_grp_vol_end;
736:

Line 744: ELSIF g_calculation_method = pn_var_rent_calc_pkg.G_CALC_YTD

740: l_bkpt_end := l_bkpts_t(i).blended_period_vol_end;
741:
742: END IF;
743:
744: ELSIF g_calculation_method = pn_var_rent_calc_pkg.G_CALC_YTD
745: THEN
746:
747: l_bkpt_start := l_bkpts_t(i).ytd_group_vol_start;
748: l_bkpt_end := l_bkpts_t(i).ytd_group_vol_end;

Line 780: ELSIF l_bkpt_type IN ( pn_var_rent_calc_pkg.G_BKPT_TYP_FLAT

776: END IF; /* net vol > bkpt start */
777:
778: END LOOP; /* loop for all bkpt details */
779:
780: ELSIF l_bkpt_type IN ( pn_var_rent_calc_pkg.G_BKPT_TYP_FLAT
781: ,pn_var_rent_calc_pkg.G_BKPT_TYP_SLIDING)
782: THEN
783:
784: FOR i IN l_bkpts_t.FIRST..l_bkpts_t.LAST LOOP

Line 781: ,pn_var_rent_calc_pkg.G_BKPT_TYP_SLIDING)

777:
778: END LOOP; /* loop for all bkpt details */
779:
780: ELSIF l_bkpt_type IN ( pn_var_rent_calc_pkg.G_BKPT_TYP_FLAT
781: ,pn_var_rent_calc_pkg.G_BKPT_TYP_SLIDING)
782: THEN
783:
784: FOR i IN l_bkpts_t.FIRST..l_bkpts_t.LAST LOOP
785:

Line 786: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE

782: THEN
783:
784: FOR i IN l_bkpts_t.FIRST..l_bkpts_t.LAST LOOP
785:
786: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE
787: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)
788: THEN
789:
790: IF g_proration_rule = pn_var_rent_calc_pkg.G_PRORUL_CYNP THEN

Line 787: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)

783:
784: FOR i IN l_bkpts_t.FIRST..l_bkpts_t.LAST LOOP
785:
786: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE
787: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)
788: THEN
789:
790: IF g_proration_rule = pn_var_rent_calc_pkg.G_PRORUL_CYNP THEN
791:

Line 790: IF g_proration_rule = pn_var_rent_calc_pkg.G_PRORUL_CYNP THEN

786: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE
787: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)
788: THEN
789:
790: IF g_proration_rule = pn_var_rent_calc_pkg.G_PRORUL_CYNP THEN
791:
792: l_bkpt_start := NVL(l_bkpts_t(i).pr_grp_blended_vol_start
793: ,l_bkpts_t(i).prorated_grp_vol_start);
794: l_bkpt_end := NVL(l_bkpts_t(i).pr_grp_blended_vol_end

Line 804: ELSIF g_calculation_method = pn_var_rent_calc_pkg.G_CALC_CUMULATIVE

800: l_bkpt_end := l_bkpts_t(i).prorated_grp_vol_end;
801:
802: END IF; /* g_proration_rule */
803:
804: ELSIF g_calculation_method = pn_var_rent_calc_pkg.G_CALC_CUMULATIVE
805: THEN
806:
807: IF g_proration_rule = pn_var_rent_calc_pkg.G_PRORUL_NP THEN
808:

Line 807: IF g_proration_rule = pn_var_rent_calc_pkg.G_PRORUL_NP THEN

803:
804: ELSIF g_calculation_method = pn_var_rent_calc_pkg.G_CALC_CUMULATIVE
805: THEN
806:
807: IF g_proration_rule = pn_var_rent_calc_pkg.G_PRORUL_NP THEN
808:
809: l_bkpt_start := l_bkpts_t(i).prorated_grp_vol_start;
810: l_bkpt_end := l_bkpts_t(i).prorated_grp_vol_end;
811:

Line 819: ELSIF g_calculation_method = pn_var_rent_calc_pkg.G_CALC_YTD

815: l_bkpt_end := l_bkpts_t(i).blended_period_vol_end;
816:
817: END IF;
818:
819: ELSIF g_calculation_method = pn_var_rent_calc_pkg.G_CALC_YTD
820: THEN
821:
822: l_bkpt_start := l_bkpts_t(i).ytd_group_vol_start;
823: l_bkpt_end := l_bkpts_t(i).ytd_group_vol_end;

Line 835: IF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_SLIDING THEN

831: IF l_net_volume >= l_bkpt_start AND
832: l_net_volume <= NVL(l_bkpt_end, l_net_volume)
833: THEN
834:
835: IF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_SLIDING THEN
836:
837: l_trx_hdr_rec.calculated_rent
838: := l_net_volume * l_bkpts_t(i).bkpt_rate;
839:

Line 840: ELSIF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_FLAT THEN

836:
837: l_trx_hdr_rec.calculated_rent
838: := l_net_volume * l_bkpts_t(i).bkpt_rate;
839:
840: ELSIF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_FLAT THEN
841:
842: l_trx_hdr_rec.calculated_rent
843: := (l_net_volume - l_bkpt_start) * l_bkpts_t(i).bkpt_rate;
844:

Line 879: IF g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_FY

875:
876: pnp_debug_pkg.log('+++ Get Prorated Rent - START +++');
877: pnp_debug_pkg.log('Invoice Flag: '||l_trx_hdr_rec.invoice_flag);
878:
879: IF g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_FY
880: ,pn_var_rent_calc_pkg.G_PRORUL_FLY) AND
881: ((ADD_MONTHS(g_vr_commencement_date, 12) - 1) BETWEEN
882: l_trx_hdr_rec.calc_prd_start_date AND l_trx_hdr_rec.calc_prd_end_date)
883: THEN

Line 880: ,pn_var_rent_calc_pkg.G_PRORUL_FLY) AND

876: pnp_debug_pkg.log('+++ Get Prorated Rent - START +++');
877: pnp_debug_pkg.log('Invoice Flag: '||l_trx_hdr_rec.invoice_flag);
878:
879: IF g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_FY
880: ,pn_var_rent_calc_pkg.G_PRORUL_FLY) AND
881: ((ADD_MONTHS(g_vr_commencement_date, 12) - 1) BETWEEN
882: l_trx_hdr_rec.calc_prd_start_date AND l_trx_hdr_rec.calc_prd_end_date)
883: THEN
884:

Line 897: IF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_STRATIFIED

893: l_net_volume := rec.sales;
894: END LOOP;
895:
896: /* get l_trx_hdr_rec.calculated_rent - CALCULATED RENT */
897: IF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_STRATIFIED
898: THEN
899:
900: l_trx_hdr_rec.prorated_rent_due := 0;
901:

Line 940: ELSIF l_bkpt_type IN ( pn_var_rent_calc_pkg.G_BKPT_TYP_FLAT

936: END IF; /* net vol > bkpt start */
937:
938: END LOOP; /* loop for all bkpt details */
939:
940: ELSIF l_bkpt_type IN ( pn_var_rent_calc_pkg.G_BKPT_TYP_FLAT
941: ,pn_var_rent_calc_pkg.G_BKPT_TYP_SLIDING)
942: THEN
943:
944: /* loop for all bkpt details */

Line 941: ,pn_var_rent_calc_pkg.G_BKPT_TYP_SLIDING)

937:
938: END LOOP; /* loop for all bkpt details */
939:
940: ELSIF l_bkpt_type IN ( pn_var_rent_calc_pkg.G_BKPT_TYP_FLAT
941: ,pn_var_rent_calc_pkg.G_BKPT_TYP_SLIDING)
942: THEN
943:
944: /* loop for all bkpt details */
945: FOR bkpt_rec IN fy_bkpts_c

Line 962: IF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_SLIDING THEN

958: IF l_net_volume >= l_bkpt_start AND
959: l_net_volume <= NVL(l_bkpt_end, l_net_volume)
960: THEN
961:
962: IF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_SLIDING THEN
963:
964: l_trx_hdr_rec.prorated_rent_due
965: := l_net_volume * bkpt_rec.bkpt_rate;
966:

Line 967: ELSIF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_FLAT THEN

963:
964: l_trx_hdr_rec.prorated_rent_due
965: := l_net_volume * bkpt_rec.bkpt_rate;
966:
967: ELSIF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_FLAT THEN
968:
969: l_trx_hdr_rec.prorated_rent_due
970: := (l_net_volume - l_bkpt_start) * bkpt_rec.bkpt_rate;
971:

Line 1007: * pn_var_rent_calc_pkg.

1003: /* Macerich way of calculating */
1004:
1005: l_trx_hdr_rec.prorated_rent_due
1006: := l_trx_hdr_rec.prorated_rent_due
1007: * pn_var_rent_calc_pkg.
1008: get_fy_proration_factor(l_trx_hdr_rec.var_rent_id);
1009:
1010:
1011: l_trx_hdr_rec.first_yr_rent := l_trx_hdr_rec.prorated_rent_due;

Line 1024: IF freq_rec.report_freq_code = pn_var_rent_calc_pkg.G_FREQ_MON THEN

1020: LOOP
1021: l_prorat_factor_sum := rec.proration_factor_sum;
1022: END LOOP;
1023:
1024: IF freq_rec.report_freq_code = pn_var_rent_calc_pkg.G_FREQ_MON THEN
1025: l_trx_hdr_rec.prorated_rent_due
1026: := l_trx_hdr_rec.prorated_rent_due
1027: * l_prorat_factor_sum
1028: / pn_var_rent_calc_pkg.G_CALC_PRD_IN_FREQ_MON;

Line 1028: / pn_var_rent_calc_pkg.G_CALC_PRD_IN_FREQ_MON;

1024: IF freq_rec.report_freq_code = pn_var_rent_calc_pkg.G_FREQ_MON THEN
1025: l_trx_hdr_rec.prorated_rent_due
1026: := l_trx_hdr_rec.prorated_rent_due
1027: * l_prorat_factor_sum
1028: / pn_var_rent_calc_pkg.G_CALC_PRD_IN_FREQ_MON;
1029:
1030: ELSIF freq_rec.report_freq_code = pn_var_rent_calc_pkg.G_FREQ_QTR THEN
1031: l_trx_hdr_rec.prorated_rent_due
1032: := l_trx_hdr_rec.prorated_rent_due

Line 1030: ELSIF freq_rec.report_freq_code = pn_var_rent_calc_pkg.G_FREQ_QTR THEN

1026: := l_trx_hdr_rec.prorated_rent_due
1027: * l_prorat_factor_sum
1028: / pn_var_rent_calc_pkg.G_CALC_PRD_IN_FREQ_MON;
1029:
1030: ELSIF freq_rec.report_freq_code = pn_var_rent_calc_pkg.G_FREQ_QTR THEN
1031: l_trx_hdr_rec.prorated_rent_due
1032: := l_trx_hdr_rec.prorated_rent_due
1033: * l_prorat_factor_sum
1034: / pn_var_rent_calc_pkg.G_CALC_PRD_IN_FREQ_QTR;

Line 1034: / pn_var_rent_calc_pkg.G_CALC_PRD_IN_FREQ_QTR;

1030: ELSIF freq_rec.report_freq_code = pn_var_rent_calc_pkg.G_FREQ_QTR THEN
1031: l_trx_hdr_rec.prorated_rent_due
1032: := l_trx_hdr_rec.prorated_rent_due
1033: * l_prorat_factor_sum
1034: / pn_var_rent_calc_pkg.G_CALC_PRD_IN_FREQ_QTR;
1035:
1036: ELSIF freq_rec.report_freq_code = pn_var_rent_calc_pkg.G_FREQ_SA THEN
1037: l_trx_hdr_rec.prorated_rent_due
1038: := l_trx_hdr_rec.prorated_rent_due

Line 1036: ELSIF freq_rec.report_freq_code = pn_var_rent_calc_pkg.G_FREQ_SA THEN

1032: := l_trx_hdr_rec.prorated_rent_due
1033: * l_prorat_factor_sum
1034: / pn_var_rent_calc_pkg.G_CALC_PRD_IN_FREQ_QTR;
1035:
1036: ELSIF freq_rec.report_freq_code = pn_var_rent_calc_pkg.G_FREQ_SA THEN
1037: l_trx_hdr_rec.prorated_rent_due
1038: := l_trx_hdr_rec.prorated_rent_due
1039: * l_prorat_factor_sum
1040: / pn_var_rent_calc_pkg.G_CALC_PRD_IN_FREQ_SA;

Line 1040: / pn_var_rent_calc_pkg.G_CALC_PRD_IN_FREQ_SA;

1036: ELSIF freq_rec.report_freq_code = pn_var_rent_calc_pkg.G_FREQ_SA THEN
1037: l_trx_hdr_rec.prorated_rent_due
1038: := l_trx_hdr_rec.prorated_rent_due
1039: * l_prorat_factor_sum
1040: / pn_var_rent_calc_pkg.G_CALC_PRD_IN_FREQ_SA;
1041:
1042: ELSIF freq_rec.report_freq_code = pn_var_rent_calc_pkg.G_FREQ_YR THEN
1043: l_trx_hdr_rec.prorated_rent_due
1044: := l_trx_hdr_rec.prorated_rent_due

Line 1042: ELSIF freq_rec.report_freq_code = pn_var_rent_calc_pkg.G_FREQ_YR THEN

1038: := l_trx_hdr_rec.prorated_rent_due
1039: * l_prorat_factor_sum
1040: / pn_var_rent_calc_pkg.G_CALC_PRD_IN_FREQ_SA;
1041:
1042: ELSIF freq_rec.report_freq_code = pn_var_rent_calc_pkg.G_FREQ_YR THEN
1043: l_trx_hdr_rec.prorated_rent_due
1044: := l_trx_hdr_rec.prorated_rent_due
1045: * l_prorat_factor_sum /
1046: pn_var_rent_calc_pkg.G_CALC_PRD_IN_FREQ_YR;

Line 1046: pn_var_rent_calc_pkg.G_CALC_PRD_IN_FREQ_YR;

1042: ELSIF freq_rec.report_freq_code = pn_var_rent_calc_pkg.G_FREQ_YR THEN
1043: l_trx_hdr_rec.prorated_rent_due
1044: := l_trx_hdr_rec.prorated_rent_due
1045: * l_prorat_factor_sum /
1046: pn_var_rent_calc_pkg.G_CALC_PRD_IN_FREQ_YR;
1047:
1048: END IF;
1049:
1050: END LOOP;

Line 1055: IF g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_LY

1051: */
1052:
1053: END IF;
1054:
1055: IF g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_LY
1056: ,pn_var_rent_calc_pkg.G_PRORUL_FLY) AND
1057: g_vr_termination_date = l_trx_hdr_rec.calc_prd_end_date
1058: THEN
1059:

Line 1056: ,pn_var_rent_calc_pkg.G_PRORUL_FLY) AND

1052:
1053: END IF;
1054:
1055: IF g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_LY
1056: ,pn_var_rent_calc_pkg.G_PRORUL_FLY) AND
1057: g_vr_termination_date = l_trx_hdr_rec.calc_prd_end_date
1058: THEN
1059:
1060: pnp_debug_pkg.log('Get Prorated Rent - LY');

Line 1079: IF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_STRATIFIED

1075:
1076:
1077:
1078: /* get l_trx_hdr_rec.prorated_rent_due - PRORATED RENT */
1079: IF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_STRATIFIED
1080: THEN
1081:
1082: l_trx_hdr_rec.prorated_rent_due := 0;
1083:

Line 1132: ELSIF l_bkpt_type IN ( pn_var_rent_calc_pkg.G_BKPT_TYP_FLAT

1128:
1129: END LOOP; /* loop for all bkpt details */
1130:
1131:
1132: ELSIF l_bkpt_type IN ( pn_var_rent_calc_pkg.G_BKPT_TYP_FLAT
1133: ,pn_var_rent_calc_pkg.G_BKPT_TYP_SLIDING)
1134: THEN
1135: pnp_debug_pkg.log('l_bkpt_type:'||l_bkpt_type);
1136: /* loop for all bkpt details */

Line 1133: ,pn_var_rent_calc_pkg.G_BKPT_TYP_SLIDING)

1129: END LOOP; /* loop for all bkpt details */
1130:
1131:
1132: ELSIF l_bkpt_type IN ( pn_var_rent_calc_pkg.G_BKPT_TYP_FLAT
1133: ,pn_var_rent_calc_pkg.G_BKPT_TYP_SLIDING)
1134: THEN
1135: pnp_debug_pkg.log('l_bkpt_type:'||l_bkpt_type);
1136: /* loop for all bkpt details */
1137: FOR bkpt_rec IN ly_bkpts_c

Line 1156: IF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_SLIDING THEN

1152: IF l_net_volume >= l_bkpt_start AND
1153: l_net_volume <= NVL(l_bkpt_end, l_net_volume)
1154: THEN
1155:
1156: IF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_SLIDING THEN
1157:
1158: l_trx_hdr_rec.prorated_rent_due
1159: := l_net_volume * bkpt_rec.bkpt_rate;
1160:

Line 1161: ELSIF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_FLAT THEN

1157:
1158: l_trx_hdr_rec.prorated_rent_due
1159: := l_net_volume * bkpt_rec.bkpt_rate;
1160:
1161: ELSIF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_FLAT THEN
1162:
1163: l_trx_hdr_rec.prorated_rent_due
1164: := (l_net_volume - l_bkpt_start) * bkpt_rec.bkpt_rate;
1165:

Line 1201: * pn_var_rent_calc_pkg.

1197: /* Macerich way of calculating */
1198:
1199: l_trx_hdr_rec.prorated_rent_due
1200: := l_trx_hdr_rec.prorated_rent_due
1201: * pn_var_rent_calc_pkg.
1202: get_ly_proration_factor(l_trx_hdr_rec.var_rent_id);
1203:
1204: /* Ideal way of calculating */
1205: /*

Line 1215: IF freq_rec.report_freq_code = pn_var_rent_calc_pkg.G_FREQ_MON THEN

1211: LOOP
1212: l_prorat_factor_sum := rec.proration_factor_sum;
1213: END LOOP;
1214:
1215: IF freq_rec.report_freq_code = pn_var_rent_calc_pkg.G_FREQ_MON THEN
1216: l_trx_hdr_rec.prorated_rent_due
1217: := l_trx_hdr_rec.prorated_rent_due
1218: * l_prorat_factor_sum
1219: / pn_var_rent_calc_pkg.G_CALC_PRD_IN_FREQ_MON;

Line 1219: / pn_var_rent_calc_pkg.G_CALC_PRD_IN_FREQ_MON;

1215: IF freq_rec.report_freq_code = pn_var_rent_calc_pkg.G_FREQ_MON THEN
1216: l_trx_hdr_rec.prorated_rent_due
1217: := l_trx_hdr_rec.prorated_rent_due
1218: * l_prorat_factor_sum
1219: / pn_var_rent_calc_pkg.G_CALC_PRD_IN_FREQ_MON;
1220:
1221: ELSIF freq_rec.report_freq_code = pn_var_rent_calc_pkg.G_FREQ_QTR THEN
1222: l_trx_hdr_rec.prorated_rent_due
1223: := l_trx_hdr_rec.prorated_rent_due

Line 1221: ELSIF freq_rec.report_freq_code = pn_var_rent_calc_pkg.G_FREQ_QTR THEN

1217: := l_trx_hdr_rec.prorated_rent_due
1218: * l_prorat_factor_sum
1219: / pn_var_rent_calc_pkg.G_CALC_PRD_IN_FREQ_MON;
1220:
1221: ELSIF freq_rec.report_freq_code = pn_var_rent_calc_pkg.G_FREQ_QTR THEN
1222: l_trx_hdr_rec.prorated_rent_due
1223: := l_trx_hdr_rec.prorated_rent_due
1224: * l_prorat_factor_sum
1225: / pn_var_rent_calc_pkg.G_CALC_PRD_IN_FREQ_QTR;

Line 1225: / pn_var_rent_calc_pkg.G_CALC_PRD_IN_FREQ_QTR;

1221: ELSIF freq_rec.report_freq_code = pn_var_rent_calc_pkg.G_FREQ_QTR THEN
1222: l_trx_hdr_rec.prorated_rent_due
1223: := l_trx_hdr_rec.prorated_rent_due
1224: * l_prorat_factor_sum
1225: / pn_var_rent_calc_pkg.G_CALC_PRD_IN_FREQ_QTR;
1226:
1227: ELSIF freq_rec.report_freq_code = pn_var_rent_calc_pkg.G_FREQ_SA THEN
1228: l_trx_hdr_rec.prorated_rent_due
1229: := l_trx_hdr_rec.prorated_rent_due

Line 1227: ELSIF freq_rec.report_freq_code = pn_var_rent_calc_pkg.G_FREQ_SA THEN

1223: := l_trx_hdr_rec.prorated_rent_due
1224: * l_prorat_factor_sum
1225: / pn_var_rent_calc_pkg.G_CALC_PRD_IN_FREQ_QTR;
1226:
1227: ELSIF freq_rec.report_freq_code = pn_var_rent_calc_pkg.G_FREQ_SA THEN
1228: l_trx_hdr_rec.prorated_rent_due
1229: := l_trx_hdr_rec.prorated_rent_due
1230: * l_prorat_factor_sum
1231: / pn_var_rent_calc_pkg.G_CALC_PRD_IN_FREQ_SA;

Line 1231: / pn_var_rent_calc_pkg.G_CALC_PRD_IN_FREQ_SA;

1227: ELSIF freq_rec.report_freq_code = pn_var_rent_calc_pkg.G_FREQ_SA THEN
1228: l_trx_hdr_rec.prorated_rent_due
1229: := l_trx_hdr_rec.prorated_rent_due
1230: * l_prorat_factor_sum
1231: / pn_var_rent_calc_pkg.G_CALC_PRD_IN_FREQ_SA;
1232:
1233: ELSIF freq_rec.report_freq_code = pn_var_rent_calc_pkg.G_FREQ_YR THEN
1234: l_trx_hdr_rec.prorated_rent_due
1235: := l_trx_hdr_rec.prorated_rent_due

Line 1233: ELSIF freq_rec.report_freq_code = pn_var_rent_calc_pkg.G_FREQ_YR THEN

1229: := l_trx_hdr_rec.prorated_rent_due
1230: * l_prorat_factor_sum
1231: / pn_var_rent_calc_pkg.G_CALC_PRD_IN_FREQ_SA;
1232:
1233: ELSIF freq_rec.report_freq_code = pn_var_rent_calc_pkg.G_FREQ_YR THEN
1234: l_trx_hdr_rec.prorated_rent_due
1235: := l_trx_hdr_rec.prorated_rent_due
1236: * l_prorat_factor_sum
1237: / pn_var_rent_calc_pkg.G_CALC_PRD_IN_FREQ_YR;

Line 1237: / pn_var_rent_calc_pkg.G_CALC_PRD_IN_FREQ_YR;

1233: ELSIF freq_rec.report_freq_code = pn_var_rent_calc_pkg.G_FREQ_YR THEN
1234: l_trx_hdr_rec.prorated_rent_due
1235: := l_trx_hdr_rec.prorated_rent_due
1236: * l_prorat_factor_sum
1237: / pn_var_rent_calc_pkg.G_CALC_PRD_IN_FREQ_YR;
1238:
1239: END IF;
1240:
1241: END LOOP;

Line 1260: := pn_var_rent_calc_pkg.find_prev_billed

1256:
1257: IF NVL(l_trx_hdr_rec.invoice_flag, 'Y') = 'P' THEN
1258:
1259: l_prev_billed
1260: := pn_var_rent_calc_pkg.find_prev_billed
1261: ( p_var_rent_id => l_trx_hdr_rec.var_rent_id
1262: ,p_line_item_grp_id => l_trx_hdr_rec.line_item_group_id
1263: ,p_calc_prd_st_dt => l_trx_hdr_rec.calc_prd_start_date
1264: ,p_calc_prd_end_dt => l_trx_hdr_rec.calc_prd_end_date

Line 1270: := pn_var_rent_calc_pkg.find_prev_billed

1266:
1267: ELSE
1268:
1269: l_prev_billed
1270: := pn_var_rent_calc_pkg.find_prev_billed
1271: ( p_var_rent_id => l_trx_hdr_rec.var_rent_id
1272: ,p_period_id => l_trx_hdr_rec.period_id
1273: ,p_line_item_id => l_trx_hdr_rec.line_item_id
1274: ,p_calc_prd_st_dt => l_trx_hdr_rec.calc_prd_start_date

Line 1282: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE

1278: END IF;
1279:
1280: pnp_debug_pkg.log(' get previously billed complete - l_prev_billed: '||l_prev_billed);
1281:
1282: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE
1283: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)
1284: THEN
1285:
1286: l_trx_hdr_rec.percent_rent_due := l_trx_hdr_rec.calculated_rent;

Line 1283: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)

1279:
1280: pnp_debug_pkg.log(' get previously billed complete - l_prev_billed: '||l_prev_billed);
1281:
1282: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE
1283: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)
1284: THEN
1285:
1286: l_trx_hdr_rec.percent_rent_due := l_trx_hdr_rec.calculated_rent;
1287: l_trx_hdr_rec.ytd_percent_rent := l_prev_billed

Line 1290: ELSIF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_CUMULATIVE

1286: l_trx_hdr_rec.percent_rent_due := l_trx_hdr_rec.calculated_rent;
1287: l_trx_hdr_rec.ytd_percent_rent := l_prev_billed
1288: + l_trx_hdr_rec.percent_rent_due;
1289:
1290: ELSIF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_CUMULATIVE
1291: ,pn_var_rent_calc_pkg.G_CALC_YTD)
1292: THEN
1293:
1294: l_trx_hdr_rec.percent_rent_due

Line 1291: ,pn_var_rent_calc_pkg.G_CALC_YTD)

1287: l_trx_hdr_rec.ytd_percent_rent := l_prev_billed
1288: + l_trx_hdr_rec.percent_rent_due;
1289:
1290: ELSIF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_CUMULATIVE
1291: ,pn_var_rent_calc_pkg.G_CALC_YTD)
1292: THEN
1293:
1294: l_trx_hdr_rec.percent_rent_due
1295: := l_trx_hdr_rec.calculated_rent - l_prev_billed;

Line 1332: IF g_proration_rule IN (pn_var_rent_calc_pkg.G_PRORUL_FLY) AND

1328: /* IMP: This condition is to nullify the rents for a special case.
1329: The case is for First-LAst year, when we have just 2 periods and
1330: first year and last year period is partial, in such a case we dont
1331: want to calculate the rent. */
1332: IF g_proration_rule IN (pn_var_rent_calc_pkg.G_PRORUL_FLY) AND
1333: l_period_num = 2 AND l_first_partial = 'Y' AND
1334: l_last_partial = 'Y'
1335: THEN
1336: l_trx_hdr_rec.percent_rent_due := 0;

Line 1866: l_precision := nvl(pn_var_rent_calc_pkg.get_currency_precision(l_org_id),4);

1862: FOR vr_rec IN org_c(p_vr_id => p_var_rent_id) LOOP
1863: l_org_id := vr_rec.org_id;
1864: l_vr_commencement_date := vr_rec.commencement_date;
1865: END LOOP;
1866: l_precision := nvl(pn_var_rent_calc_pkg.get_currency_precision(l_org_id),4);
1867: pnp_debug_pkg.log('l_precision:'||l_precision);
1868: FOR first_period_rec IN first_period_cur(p_vr_id => p_var_rent_id) LOOP
1869: l_period_id := first_period_rec.period_id;
1870: END LOOP;

Line 1928: l_constr_rent := pn_var_rent_calc_pkg.apply_constraints_fy(

1924: /* not sure abt this part
1925: uncomment the AND inv_rec.total_actual_rent <> 0
1926: part if we do not want to create $0 invoices
1927: */
1928: l_constr_rent := pn_var_rent_calc_pkg.apply_constraints_fy(
1929: p_period_id => l_period_id,
1930: p_invoice_date => inv_rec.invoice_date,
1931: p_actual_rent => inv_rec.total_actual_rent);
1932:

Line 1992: l_constr_rent := pn_var_rent_calc_pkg.apply_constraints_fy(

1988: ,p_inv_dt => inv_rec.invoice_date)
1989: LOOP
1990: l_prev_inv_exp_rent := prev_inv_rec.prev_invoiced_amt;
1991: END LOOP;
1992: l_constr_rent := pn_var_rent_calc_pkg.apply_constraints_fy(
1993: p_period_id => l_period_id,
1994: p_invoice_date => inv_rec.invoice_date,
1995: p_actual_rent => inv_rec.total_actual_rent);
1996: /* no invoice to update - create a new one */

Line 2064: status <> pn_var_rent_calc_pkg.G_TERM_STATUS_APPROVED AND

2060: DELETE
2061: pn_payment_terms_all
2062: WHERE
2063: var_rent_inv_id = l_var_rent_inv_id AND
2064: status <> pn_var_rent_calc_pkg.G_TERM_STATUS_APPROVED AND
2065: var_rent_type = pn_var_rent_calc_pkg.G_INV_ON_ACTUAL;
2066:
2067: /* update the invoice */
2068: UPDATE

Line 2065: var_rent_type = pn_var_rent_calc_pkg.G_INV_ON_ACTUAL;

2061: pn_payment_terms_all
2062: WHERE
2063: var_rent_inv_id = l_var_rent_inv_id AND
2064: status <> pn_var_rent_calc_pkg.G_TERM_STATUS_APPROVED AND
2065: var_rent_type = pn_var_rent_calc_pkg.G_INV_ON_ACTUAL;
2066:
2067: /* update the invoice */
2068: UPDATE
2069: pn_var_rent_inv_all

Line 2190: AND vol_hist_status_code = pn_var_rent_calc_pkg.G_SALESVOL_STATUS_APPROVED);

2186: SELECT grp_date_id
2187: FROM pn_var_grp_dates_all
2188: WHERE var_rent_id = ip_var_rent_id
2189: AND invoice_date = ip_invoice_date)
2190: AND vol_hist_status_code = pn_var_rent_calc_pkg.G_SALESVOL_STATUS_APPROVED);
2191:
2192: l_invoice_on VARCHAR2(30);
2193: l_row_id ROWID;
2194: l_var_rent_inv_id NUMBER;

Line 2241: l_precision := nvl(pn_var_rent_calc_pkg.get_currency_precision(l_org_id),4);

2237: l_org_id := vr_rec.org_id;
2238: l_vr_termination_date := vr_rec.termination_date;
2239: END LOOP;
2240:
2241: l_precision := nvl(pn_var_rent_calc_pkg.get_currency_precision(l_org_id),4);
2242: pnp_debug_pkg.log('l_precision:'||l_precision);
2243:
2244: /* loop for all invoice dates in the period */
2245: FOR inv_rec IN invoice_dates_c( p_vr_id => p_var_rent_id

Line 2292: IF g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_LY

2288: END LOOP; /* check if there exists an invoice for this invoice date */
2289:
2290:
2291: /* Create the invoice for first partial year separately */
2292: IF g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_LY
2293: ,pn_var_rent_calc_pkg.G_PRORUL_FLY)
2294: AND g_invoice_on = G_INV_ON_ACTUAL
2295: THEN
2296:

Line 2293: ,pn_var_rent_calc_pkg.G_PRORUL_FLY)

2289:
2290:
2291: /* Create the invoice for first partial year separately */
2292: IF g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_LY
2293: ,pn_var_rent_calc_pkg.G_PRORUL_FLY)
2294: AND g_invoice_on = G_INV_ON_ACTUAL
2295: THEN
2296:
2297: FOR rec IN last_period_cur(p_var_rent_id,l_vr_termination_date ) LOOP

Line 2330: l_constr_rent := pn_var_rent_calc_pkg.apply_constraints(

2326: inv_rec.invoice_date
2327: ) --
2328: LOOP
2329:
2330: l_constr_rent := pn_var_rent_calc_pkg.apply_constraints(
2331: p_period_id => p_period_id,
2332: p_invoice_date => inv_rec.invoice_date,
2333: p_actual_rent => inv_rec.total_actual_rent);
2334:

Line 2397: l_constr_rent := pn_var_rent_calc_pkg.apply_constraints(

2393: ,p_inv_dt => inv_rec.invoice_date)
2394: LOOP
2395: l_prev_inv_exp_rent := prev_inv_rec.prev_invoiced_amt;
2396: END LOOP;
2397: l_constr_rent := pn_var_rent_calc_pkg.apply_constraints(
2398: p_period_id => p_period_id,
2399: p_invoice_date => inv_rec.invoice_date,
2400: p_actual_rent => inv_rec.total_actual_rent);
2401:

Line 2471: status <> pn_var_rent_calc_pkg.G_TERM_STATUS_APPROVED AND

2467: DELETE
2468: pn_payment_terms_all
2469: WHERE
2470: var_rent_inv_id = l_var_rent_inv_id AND
2471: status <> pn_var_rent_calc_pkg.G_TERM_STATUS_APPROVED AND
2472: var_rent_type = pn_var_rent_calc_pkg.G_INV_ON_ACTUAL;
2473:
2474: /* update the invoice */
2475: UPDATE

Line 2472: var_rent_type = pn_var_rent_calc_pkg.G_INV_ON_ACTUAL;

2468: pn_payment_terms_all
2469: WHERE
2470: var_rent_inv_id = l_var_rent_inv_id AND
2471: status <> pn_var_rent_calc_pkg.G_TERM_STATUS_APPROVED AND
2472: var_rent_type = pn_var_rent_calc_pkg.G_INV_ON_ACTUAL;
2473:
2474: /* update the invoice */
2475: UPDATE
2476: pn_var_rent_inv_all

Line 2745: pn_var_rent_calc_pkg.apply_def_neg_rent(p_var_rent_id, p_period_id, inv_rec.var_rent_inv_id, l_abated_rent);

2741: END LOOP;
2742: --
2743: FOR inv_rec IN inv_c(p_var_rent_id, p_period_id, l_vr_termination_date) LOOP
2744: pnp_debug_pkg.log('called apply_def_neg_rent');
2745: pn_var_rent_calc_pkg.apply_def_neg_rent(p_var_rent_id, p_period_id, inv_rec.var_rent_inv_id, l_abated_rent);
2746: pnp_debug_pkg.log('complete');
2747: IF (l_abat_order = pn_var_rent_calc_pkg.G_ALLOWANCE_FIRST) THEN
2748: pnp_debug_pkg.log('call pnp_debug_pkg.log');
2749: pn_var_rent_calc_pkg.apply_allow(p_var_rent_id, p_period_id, inv_rec.var_rent_inv_id, l_abated_rent);

Line 2747: IF (l_abat_order = pn_var_rent_calc_pkg.G_ALLOWANCE_FIRST) THEN

2743: FOR inv_rec IN inv_c(p_var_rent_id, p_period_id, l_vr_termination_date) LOOP
2744: pnp_debug_pkg.log('called apply_def_neg_rent');
2745: pn_var_rent_calc_pkg.apply_def_neg_rent(p_var_rent_id, p_period_id, inv_rec.var_rent_inv_id, l_abated_rent);
2746: pnp_debug_pkg.log('complete');
2747: IF (l_abat_order = pn_var_rent_calc_pkg.G_ALLOWANCE_FIRST) THEN
2748: pnp_debug_pkg.log('call pnp_debug_pkg.log');
2749: pn_var_rent_calc_pkg.apply_allow(p_var_rent_id, p_period_id, inv_rec.var_rent_inv_id, l_abated_rent);
2750: pnp_debug_pkg.log('complete');
2751: END IF;--Apply allowance.

Line 2749: pn_var_rent_calc_pkg.apply_allow(p_var_rent_id, p_period_id, inv_rec.var_rent_inv_id, l_abated_rent);

2745: pn_var_rent_calc_pkg.apply_def_neg_rent(p_var_rent_id, p_period_id, inv_rec.var_rent_inv_id, l_abated_rent);
2746: pnp_debug_pkg.log('complete');
2747: IF (l_abat_order = pn_var_rent_calc_pkg.G_ALLOWANCE_FIRST) THEN
2748: pnp_debug_pkg.log('call pnp_debug_pkg.log');
2749: pn_var_rent_calc_pkg.apply_allow(p_var_rent_id, p_period_id, inv_rec.var_rent_inv_id, l_abated_rent);
2750: pnp_debug_pkg.log('complete');
2751: END IF;--Apply allowance.
2752:
2753: pnp_debug_pkg.log('call populate_abat');

Line 2754: pn_var_rent_calc_pkg.populate_abat(p_var_rent_id , p_period_id, inv_rec.var_rent_inv_id);

2750: pnp_debug_pkg.log('complete');
2751: END IF;--Apply allowance.
2752:
2753: pnp_debug_pkg.log('call populate_abat');
2754: pn_var_rent_calc_pkg.populate_abat(p_var_rent_id , p_period_id, inv_rec.var_rent_inv_id);
2755: pnp_debug_pkg.log('complete');
2756:
2757: pnp_debug_pkg.log('call apply_abat');
2758: pn_var_rent_calc_pkg.apply_abat(p_var_rent_id, p_period_id, inv_rec.var_rent_inv_id, l_abated_rent);

Line 2758: pn_var_rent_calc_pkg.apply_abat(p_var_rent_id, p_period_id, inv_rec.var_rent_inv_id, l_abated_rent);

2754: pn_var_rent_calc_pkg.populate_abat(p_var_rent_id , p_period_id, inv_rec.var_rent_inv_id);
2755: pnp_debug_pkg.log('complete');
2756:
2757: pnp_debug_pkg.log('call apply_abat');
2758: pn_var_rent_calc_pkg.apply_abat(p_var_rent_id, p_period_id, inv_rec.var_rent_inv_id, l_abated_rent);
2759: pnp_debug_pkg.log('complete');
2760:
2761: IF(l_abat_order <> pn_var_rent_calc_pkg.G_ALLOWANCE_FIRST) THEN
2762: pnp_debug_pkg.log('call pnp_debug_pkg.log');

Line 2761: IF(l_abat_order <> pn_var_rent_calc_pkg.G_ALLOWANCE_FIRST) THEN

2757: pnp_debug_pkg.log('call apply_abat');
2758: pn_var_rent_calc_pkg.apply_abat(p_var_rent_id, p_period_id, inv_rec.var_rent_inv_id, l_abated_rent);
2759: pnp_debug_pkg.log('complete');
2760:
2761: IF(l_abat_order <> pn_var_rent_calc_pkg.G_ALLOWANCE_FIRST) THEN
2762: pnp_debug_pkg.log('call pnp_debug_pkg.log');
2763: pn_var_rent_calc_pkg.apply_allow(p_var_rent_id, p_period_id, inv_rec.var_rent_inv_id, l_abated_rent);
2764: pnp_debug_pkg.log('complete');
2765: END IF;--Apply allowance

Line 2763: pn_var_rent_calc_pkg.apply_allow(p_var_rent_id, p_period_id, inv_rec.var_rent_inv_id, l_abated_rent);

2759: pnp_debug_pkg.log('complete');
2760:
2761: IF(l_abat_order <> pn_var_rent_calc_pkg.G_ALLOWANCE_FIRST) THEN
2762: pnp_debug_pkg.log('call pnp_debug_pkg.log');
2763: pn_var_rent_calc_pkg.apply_allow(p_var_rent_id, p_period_id, inv_rec.var_rent_inv_id, l_abated_rent);
2764: pnp_debug_pkg.log('complete');
2765: END IF;--Apply allowance
2766: pnp_debug_pkg.log('called populate_neg_rent');
2767: pn_var_rent_calc_pkg.populate_neg_rent(p_var_rent_id, p_period_id, inv_rec.var_rent_inv_id, l_abated_rent);

Line 2767: pn_var_rent_calc_pkg.populate_neg_rent(p_var_rent_id, p_period_id, inv_rec.var_rent_inv_id, l_abated_rent);

2763: pn_var_rent_calc_pkg.apply_allow(p_var_rent_id, p_period_id, inv_rec.var_rent_inv_id, l_abated_rent);
2764: pnp_debug_pkg.log('complete');
2765: END IF;--Apply allowance
2766: pnp_debug_pkg.log('called populate_neg_rent');
2767: pn_var_rent_calc_pkg.populate_neg_rent(p_var_rent_id, p_period_id, inv_rec.var_rent_inv_id, l_abated_rent);
2768: pnp_debug_pkg.log('complete');
2769:
2770:
2771: --

Line 2791: status <> pn_var_rent_calc_pkg.G_TERM_STATUS_APPROVED AND

2787: DELETE
2788: pn_payment_terms_all
2789: WHERE
2790: var_rent_inv_id = inv_rec.var_rent_inv_id AND
2791: status <> pn_var_rent_calc_pkg.G_TERM_STATUS_APPROVED AND
2792: var_rent_type = pn_var_rent_calc_pkg.G_INV_ON_ACTUAL;
2793:
2794: -- Update the current invoice
2795: pnp_debug_pkg.log('Abatements - updating');

Line 2792: var_rent_type = pn_var_rent_calc_pkg.G_INV_ON_ACTUAL;

2788: pn_payment_terms_all
2789: WHERE
2790: var_rent_inv_id = inv_rec.var_rent_inv_id AND
2791: status <> pn_var_rent_calc_pkg.G_TERM_STATUS_APPROVED AND
2792: var_rent_type = pn_var_rent_calc_pkg.G_INV_ON_ACTUAL;
2793:
2794: -- Update the current invoice
2795: pnp_debug_pkg.log('Abatements - updating');
2796: UPDATE

Line 2987: IF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_IGNORE) THEN

2983: pnp_debug_pkg.log('l_negative_applied:'||l_negative_applied);
2984: END LOOP;
2985: l_negative_remaining := ABS(l_negative_available - l_negative_applied);
2986: pnp_debug_pkg.log('l_negative_remaining:'||l_negative_remaining);
2987: IF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_IGNORE) THEN
2988: l_abated_rent := GREATEST(0, inv_rec.constr_actual_rent);
2989: ELSIF(l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_CREDIT) THEN
2990: l_abated_rent := inv_rec.constr_actual_rent;
2991: ELSE

Line 2989: ELSIF(l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_CREDIT) THEN

2985: l_negative_remaining := ABS(l_negative_available - l_negative_applied);
2986: pnp_debug_pkg.log('l_negative_remaining:'||l_negative_remaining);
2987: IF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_IGNORE) THEN
2988: l_abated_rent := GREATEST(0, inv_rec.constr_actual_rent);
2989: ELSIF(l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_CREDIT) THEN
2990: l_abated_rent := inv_rec.constr_actual_rent;
2991: ELSE
2992: -- negative rent is deffred
2993: IF (l_last_invoice_dt <> inv_rec.invoice_date) THEN

Line 3074: AND NVL(status, pn_var_rent_calc_pkg.G_PERIOD_ACTIVE_STATUS)

3070: WHERE var_rent_id = p_var_rent_id
3071: AND period_id = (SELECT max(period_id)
3072: FROM pn_var_periods_all
3073: WHERE var_rent_id = p_var_rent_id
3074: AND NVL(status, pn_var_rent_calc_pkg.G_PERIOD_ACTIVE_STATUS)
3075: <> pn_var_rent_calc_pkg.G_PERIOD_REVERSED_STATUS);
3076:
3077: CURSOR csr_neg_avail (ip_var_rent_id NUMBER,
3078: ip_invoice_date DATE) IS

Line 3075: <> pn_var_rent_calc_pkg.G_PERIOD_REVERSED_STATUS);

3071: AND period_id = (SELECT max(period_id)
3072: FROM pn_var_periods_all
3073: WHERE var_rent_id = p_var_rent_id
3074: AND NVL(status, pn_var_rent_calc_pkg.G_PERIOD_ACTIVE_STATUS)
3075: <> pn_var_rent_calc_pkg.G_PERIOD_REVERSED_STATUS);
3076:
3077: CURSOR csr_neg_avail (ip_var_rent_id NUMBER,
3078: ip_invoice_date DATE) IS
3079: SELECT ABS(NVL(SUM(def_neg_rent),0)) negative_available

Line 3143: IF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_DEFER) THEN

3139: pnp_debug_pkg.log('l_negative_applied:'||l_negative_applied);
3140: END LOOP;
3141: l_negative_remaining := ABS(l_negative_available - l_negative_applied);
3142: pnp_debug_pkg.log('l_negative_remaining:'||l_negative_remaining);
3143: IF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_DEFER) THEN
3144: -- Deffered negative rent can be applied only when consT-rent >0
3145: IF (l_last_invoice_dt <> inv_rec.invoice_date AND inv_rec.constr_actual_rent > 0) THEN
3146: --This invoice is not the last invoice
3147: l_abated_rent := GREATEST(0, inv_rec.constr_actual_rent - l_negative_remaining);

Line 3221: AND NVL(status, pn_var_rent_calc_pkg.G_PERIOD_ACTIVE_STATUS)

3217: WHERE var_rent_id = p_var_rent_id
3218: AND period_id = (SELECT max(period_id)
3219: FROM pn_var_periods_all
3220: WHERE var_rent_id = p_var_rent_id
3221: AND NVL(status, pn_var_rent_calc_pkg.G_PERIOD_ACTIVE_STATUS)
3222: <> pn_var_rent_calc_pkg.G_PERIOD_REVERSED_STATUS);
3223:
3224: CURSOR csr_get_abt(ip_var_rent_id NUMBER)
3225: IS

Line 3222: <> pn_var_rent_calc_pkg.G_PERIOD_REVERSED_STATUS);

3218: AND period_id = (SELECT max(period_id)
3219: FROM pn_var_periods_all
3220: WHERE var_rent_id = p_var_rent_id
3221: AND NVL(status, pn_var_rent_calc_pkg.G_PERIOD_ACTIVE_STATUS)
3222: <> pn_var_rent_calc_pkg.G_PERIOD_REVERSED_STATUS);
3223:
3224: CURSOR csr_get_abt(ip_var_rent_id NUMBER)
3225: IS
3226: SELECT negative_rent

Line 3252: IF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_IGNORE) THEN

3248: pnp_debug_pkg.log('l_last_invoice_dt:'||l_last_invoice_dt);
3249: END LOOP;
3250: -- Loop for all invoices.
3251: FOR inv_rec IN invoices_c(p_var_rent_id, p_period_id, p_inv_id) LOOP
3252: IF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_IGNORE) THEN
3253: --We are ignoring negative rents. Set abated rent =0, if <0.
3254: l_abated_rent := GREATEST(0, x_abated_rent);
3255:
3256: ELSIF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_CREDIT) THEN

Line 3256: ELSIF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_CREDIT) THEN

3252: IF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_IGNORE) THEN
3253: --We are ignoring negative rents. Set abated rent =0, if <0.
3254: l_abated_rent := GREATEST(0, x_abated_rent);
3255:
3256: ELSIF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_CREDIT) THEN
3257: l_abated_rent := x_abated_rent;
3258: ELSIF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_DEFER
3259: AND inv_rec.invoice_date <> l_last_invoice_dt) THEN
3260: l_abated_rent := GREATEST(0,x_abated_rent);

Line 3258: ELSIF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_DEFER

3254: l_abated_rent := GREATEST(0, x_abated_rent);
3255:
3256: ELSIF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_CREDIT) THEN
3257: l_abated_rent := x_abated_rent;
3258: ELSIF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_DEFER
3259: AND inv_rec.invoice_date <> l_last_invoice_dt) THEN
3260: l_abated_rent := GREATEST(0,x_abated_rent);
3261: l_neg_rent_def := ABS(x_abated_rent - l_abated_rent);
3262: ELSIF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_DEFER

Line 3262: ELSIF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_DEFER

3258: ELSIF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_DEFER
3259: AND inv_rec.invoice_date <> l_last_invoice_dt) THEN
3260: l_abated_rent := GREATEST(0,x_abated_rent);
3261: l_neg_rent_def := ABS(x_abated_rent - l_abated_rent);
3262: ELSIF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_DEFER
3263: AND inv_rec.invoice_date = l_last_invoice_dt) THEN
3264: l_abated_rent := x_abated_rent;
3265: END IF;
3266: pnp_debug_pkg.log('l_abated_rent:'||l_abated_rent);

Line 3328: AND type_code = pn_var_rent_calc_pkg.G_ABAT_TYPE_CODE_ABAT;

3324: FROM PN_VAR_ABAT_DEFAULTS_ALL
3325: WHERE var_rent_id = ip_var_rent_id
3326: AND start_date <= ip_inv_end_date
3327: AND NVL(end_date, ip_inv_end_date) >= ip_inv_start_date
3328: AND type_code = pn_var_rent_calc_pkg.G_ABAT_TYPE_CODE_ABAT;
3329: -- Get the details of
3330: CURSOR EXCESS_ABAT_C(ip_var_rent_id NUMBER) IS
3331: SELECT EXCESS_ABAT_CODE
3332: FROM PN_VAR_RENTS_ALL ABAT

Line 3452: IF (p_period_id = l_ly_max_prd_id AND NOT(p_inv_id = l_ly_max_inv_id) AND l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_FLY, pn_var_rent_calc_pkg.G_PRORUL_LY) ) THEN

3448: pnp_debug_pkg.log('l_ly_max_prd_id:'||l_ly_max_prd_id);
3449:
3450: --For LY/FLY, if last period and not last invoice,
3451: -- Invoices are dummy. Return immdiately.
3452: IF (p_period_id = l_ly_max_prd_id AND NOT(p_inv_id = l_ly_max_inv_id) AND l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_FLY, pn_var_rent_calc_pkg.G_PRORUL_LY) ) THEN
3453: pnp_debug_pkg.log('Ly invoice, not last - return immedietly');
3454: RETURN;
3455: END IF;
3456:

Line 3487: IF ((l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_FY, pn_var_rent_calc_pkg.G_PRORUL_FLY) AND p_inv_id = l_first_inv_id)

3483: l_inv_end_date := inv_dates_rec.inv_end_date;
3484: END LOOP;
3485: --If this invoice is FY/FLY and the first year
3486: --Or proration is LY/FLY and the last invoice
3487: IF ((l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_FY, pn_var_rent_calc_pkg.G_PRORUL_FLY) AND p_inv_id = l_first_inv_id)
3488: OR (l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_LY, pn_var_rent_calc_pkg.G_PRORUL_FLY) AND p_inv_id = l_last_inv_id) ) THEN
3489: --
3490: FOR inv_rec IN invoice_dates_fyly_c(p_inv_id) LOOP
3491: l_inv_start_date := inv_rec.start_date;

Line 3488: OR (l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_LY, pn_var_rent_calc_pkg.G_PRORUL_FLY) AND p_inv_id = l_last_inv_id) ) THEN

3484: END LOOP;
3485: --If this invoice is FY/FLY and the first year
3486: --Or proration is LY/FLY and the last invoice
3487: IF ((l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_FY, pn_var_rent_calc_pkg.G_PRORUL_FLY) AND p_inv_id = l_first_inv_id)
3488: OR (l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_LY, pn_var_rent_calc_pkg.G_PRORUL_FLY) AND p_inv_id = l_last_inv_id) ) THEN
3489: --
3490: FOR inv_rec IN invoice_dates_fyly_c(p_inv_id) LOOP
3491: l_inv_start_date := inv_rec.start_date;
3492: l_inv_end_date := inv_rec.end_date;

Line 3523: IF (l_excess_abat = pn_var_rent_calc_pkg.G_EXC_ABAT_IGNORE

3519: l_total_abat := l_fixed_abat + l_rec_abat;
3520: END IF;
3521:
3522: pnp_debug_pkg.log('l_total_abat:'||l_total_abat);
3523: IF (l_excess_abat = pn_var_rent_calc_pkg.G_EXC_ABAT_IGNORE
3524: AND x_abated_rent>0 ) THEN
3525: l_abated_rent := GREATEST(0, x_abated_rent - l_total_abat);
3526: ELSIF (l_excess_abat = pn_var_rent_calc_pkg.G_EXC_ABAT_NEG_RENT ) THEN
3527: l_abated_rent := x_abated_rent - l_total_abat;

Line 3526: ELSIF (l_excess_abat = pn_var_rent_calc_pkg.G_EXC_ABAT_NEG_RENT ) THEN

3522: pnp_debug_pkg.log('l_total_abat:'||l_total_abat);
3523: IF (l_excess_abat = pn_var_rent_calc_pkg.G_EXC_ABAT_IGNORE
3524: AND x_abated_rent>0 ) THEN
3525: l_abated_rent := GREATEST(0, x_abated_rent - l_total_abat);
3526: ELSIF (l_excess_abat = pn_var_rent_calc_pkg.G_EXC_ABAT_NEG_RENT ) THEN
3527: l_abated_rent := x_abated_rent - l_total_abat;
3528: END IF;
3529:
3530: pnp_debug_pkg.log('l_abated_rent:'||l_abated_rent);

Line 3594: AND type_code = pn_var_rent_calc_pkg.G_ABAT_TYPE_CODE_ALLO

3590: FROM PN_VAR_ABAT_DEFAULTS_ALL
3591: WHERE var_rent_id = ip_var_rent_id
3592: AND start_date <= ip_inv_end_date
3593: AND NVL(end_date, ip_inv_end_date) >= ip_inv_start_date
3594: AND type_code = pn_var_rent_calc_pkg.G_ABAT_TYPE_CODE_ALLO
3595: ORDER BY start_date;
3596: -- Get the details of inv_start, end_date
3597: CURSOR invoice_dates_c(ip_var_rent_id NUMBER,
3598: ip_invoice_date DATE

Line 3687: IF ((l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_FY, pn_var_rent_calc_pkg.G_PRORUL_FLY) AND p_inv_id = l_first_inv_id)

3683: END LOOP;
3684: --Special FY/LY/FLY handling
3685: --If this invoice is FY/FLY and the first year
3686: --Or proration is LY/FLY and the last invoice
3687: IF ((l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_FY, pn_var_rent_calc_pkg.G_PRORUL_FLY) AND p_inv_id = l_first_inv_id)
3688: OR (l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_LY, pn_var_rent_calc_pkg.G_PRORUL_FLY) AND p_inv_id = l_last_inv_id) ) THEN
3689: --
3690: FOR inv_rec IN invoice_dates_fyly_c(p_inv_id) LOOP
3691: l_inv_start_date := inv_rec.start_date;

Line 3688: OR (l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_LY, pn_var_rent_calc_pkg.G_PRORUL_FLY) AND p_inv_id = l_last_inv_id) ) THEN

3684: --Special FY/LY/FLY handling
3685: --If this invoice is FY/FLY and the first year
3686: --Or proration is LY/FLY and the last invoice
3687: IF ((l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_FY, pn_var_rent_calc_pkg.G_PRORUL_FLY) AND p_inv_id = l_first_inv_id)
3688: OR (l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_LY, pn_var_rent_calc_pkg.G_PRORUL_FLY) AND p_inv_id = l_last_inv_id) ) THEN
3689: --
3690: FOR inv_rec IN invoice_dates_fyly_c(p_inv_id) LOOP
3691: l_inv_start_date := inv_rec.start_date;
3692: l_inv_end_date := inv_rec.end_date;

Line 3836: IF ((l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_FY, pn_var_rent_calc_pkg.G_PRORUL_FLY) AND p_inv_id = l_first_inv_id)

3832: 'MAX');
3833: --Special FY/LY/FLY handling
3834: --If this invoice is FY/FLY and the first year
3835: --Or proration is LY/FLY and the last invoice
3836: IF ((l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_FY, pn_var_rent_calc_pkg.G_PRORUL_FLY) AND p_inv_id = l_first_inv_id)
3837: OR (l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_LY, pn_var_rent_calc_pkg.G_PRORUL_FLY) AND p_inv_id = l_last_inv_id) ) THEN
3838: --
3839: FOR inv_rec IN invoice_dates_fyly_c(p_inv_id) LOOP
3840: l_min_grp_date := inv_rec.start_date;

Line 3837: OR (l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_LY, pn_var_rent_calc_pkg.G_PRORUL_FLY) AND p_inv_id = l_last_inv_id) ) THEN

3833: --Special FY/LY/FLY handling
3834: --If this invoice is FY/FLY and the first year
3835: --Or proration is LY/FLY and the last invoice
3836: IF ((l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_FY, pn_var_rent_calc_pkg.G_PRORUL_FLY) AND p_inv_id = l_first_inv_id)
3837: OR (l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_LY, pn_var_rent_calc_pkg.G_PRORUL_FLY) AND p_inv_id = l_last_inv_id) ) THEN
3838: --
3839: FOR inv_rec IN invoice_dates_fyly_c(p_inv_id) LOOP
3840: l_min_grp_date := inv_rec.start_date;
3841: l_max_grp_date := inv_rec.end_date;

Line 3848: g_precision := nvl(pn_var_rent_calc_pkg.get_currency_precision(g_org_id),4);

3844: l_rec_abatement := pn_var_abatement_amount_pkg.calc_abatement(
3845: inv_rec.var_rent_inv_id
3846: ,l_min_grp_date
3847: ,l_max_grp_date);
3848: g_precision := nvl(pn_var_rent_calc_pkg.get_currency_precision(g_org_id),4);
3849: UPDATE pn_var_rent_inv_all
3850: SET rec_abatement = ROUND(l_rec_abatement, g_precision)
3851: WHERE var_rent_inv_id = inv_rec.var_rent_inv_id;
3852:

Line 3931: NVL(status, pn_var_rent_calc_pkg.G_PERIOD_ACTIVE_STATUS)

3927: FROM
3928: pn_var_periods_all
3929: WHERE
3930: var_rent_id = p_vr_id AND
3931: NVL(status, pn_var_rent_calc_pkg.G_PERIOD_ACTIVE_STATUS)
3932: <> pn_var_rent_calc_pkg.G_PERIOD_REVERSED_STATUS
3933: ORDER BY
3934: start_date;
3935:

Line 3932: <> pn_var_rent_calc_pkg.G_PERIOD_REVERSED_STATUS

3928: pn_var_periods_all
3929: WHERE
3930: var_rent_id = p_vr_id AND
3931: NVL(status, pn_var_rent_calc_pkg.G_PERIOD_ACTIVE_STATUS)
3932: <> pn_var_rent_calc_pkg.G_PERIOD_REVERSED_STATUS
3933: ORDER BY
3934: start_date;
3935:
3936: /* get all periods for VR */

Line 3969: NVL(status, pn_var_rent_calc_pkg.G_PERIOD_ACTIVE_STATUS)

3965: FROM
3966: pn_var_periods_all
3967: WHERE
3968: var_rent_id = p_vr_id AND
3969: NVL(status, pn_var_rent_calc_pkg.G_PERIOD_ACTIVE_STATUS)
3970: <> pn_var_rent_calc_pkg.G_PERIOD_REVERSED_STATUS AND
3971: start_date < (SELECT start_date
3972: FROM pn_var_periods_all
3973: WHERE period_id = p_prd_id)

Line 3970: <> pn_var_rent_calc_pkg.G_PERIOD_REVERSED_STATUS AND

3966: pn_var_periods_all
3967: WHERE
3968: var_rent_id = p_vr_id AND
3969: NVL(status, pn_var_rent_calc_pkg.G_PERIOD_ACTIVE_STATUS)
3970: <> pn_var_rent_calc_pkg.G_PERIOD_REVERSED_STATUS AND
3971: start_date < (SELECT start_date
3972: FROM pn_var_periods_all
3973: WHERE period_id = p_prd_id)
3974: ORDER BY

Line 4002: l_trx_hrd_r pn_var_rent_calc_pkg.trx_hdr_c%ROWTYPE;

3998:
3999: l_prev_grp_date_id NUMBER;
4000: l_first_period_id NUMBER := 0;
4001:
4002: l_trx_hrd_r pn_var_rent_calc_pkg.trx_hdr_c%ROWTYPE;
4003: l_trx_hrd_for_r pn_var_rent_calc_pkg.trx_hdr_for_c%ROWTYPE;
4004: l_trx_hrd_t pn_var_rent_calc_pkg.TRX_HDR_TBL;
4005: l_trx_hrd_for_t pn_var_rent_calc_pkg.TRX_HEADER_TBL;
4006:

Line 4003: l_trx_hrd_for_r pn_var_rent_calc_pkg.trx_hdr_for_c%ROWTYPE;

3999: l_prev_grp_date_id NUMBER;
4000: l_first_period_id NUMBER := 0;
4001:
4002: l_trx_hrd_r pn_var_rent_calc_pkg.trx_hdr_c%ROWTYPE;
4003: l_trx_hrd_for_r pn_var_rent_calc_pkg.trx_hdr_for_c%ROWTYPE;
4004: l_trx_hrd_t pn_var_rent_calc_pkg.TRX_HDR_TBL;
4005: l_trx_hrd_for_t pn_var_rent_calc_pkg.TRX_HEADER_TBL;
4006:
4007: l_context VARCHAR2(255);

Line 4004: l_trx_hrd_t pn_var_rent_calc_pkg.TRX_HDR_TBL;

4000: l_first_period_id NUMBER := 0;
4001:
4002: l_trx_hrd_r pn_var_rent_calc_pkg.trx_hdr_c%ROWTYPE;
4003: l_trx_hrd_for_r pn_var_rent_calc_pkg.trx_hdr_for_c%ROWTYPE;
4004: l_trx_hrd_t pn_var_rent_calc_pkg.TRX_HDR_TBL;
4005: l_trx_hrd_for_t pn_var_rent_calc_pkg.TRX_HEADER_TBL;
4006:
4007: l_context VARCHAR2(255);
4008: l_first_inv_dt DATE ;

Line 4005: l_trx_hrd_for_t pn_var_rent_calc_pkg.TRX_HEADER_TBL;

4001:
4002: l_trx_hrd_r pn_var_rent_calc_pkg.trx_hdr_c%ROWTYPE;
4003: l_trx_hrd_for_r pn_var_rent_calc_pkg.trx_hdr_for_c%ROWTYPE;
4004: l_trx_hrd_t pn_var_rent_calc_pkg.TRX_HDR_TBL;
4005: l_trx_hrd_for_t pn_var_rent_calc_pkg.TRX_HEADER_TBL;
4006:
4007: l_context VARCHAR2(255);
4008: l_first_inv_dt DATE ;
4009: l_partial_prd_id NUMBER:=NULL;

Line 4025: l_context := 'Call pn_var_rent_calc_pkg.cache_vr_details';

4021: /* ------------------------------- CODE BEGIN ------------------------------- */
4022: /* -------------------------------------------------------------------------- */
4023:
4024: /* cache VR details */
4025: l_context := 'Call pn_var_rent_calc_pkg.cache_vr_details';
4026:
4027: pn_var_rent_calc_pkg.cache_vr_details(p_var_rent_id => p_var_rent_id);
4028:
4029: pnp_debug_pkg.log(l_context||' COMPLETE');

Line 4027: pn_var_rent_calc_pkg.cache_vr_details(p_var_rent_id => p_var_rent_id);

4023:
4024: /* cache VR details */
4025: l_context := 'Call pn_var_rent_calc_pkg.cache_vr_details';
4026:
4027: pn_var_rent_calc_pkg.cache_vr_details(p_var_rent_id => p_var_rent_id);
4028:
4029: pnp_debug_pkg.log(l_context||' COMPLETE');
4030:
4031: /* check if trx tables need to be updated for change in bkts */

Line 4131: OPEN pn_var_rent_calc_pkg.trx_hdr_c

4127:
4128: /* loop for all trx in the period,
4129: order by line item, calc (sub) period start*/
4130: /*Populate actual rents in trx tables.*/
4131: OPEN pn_var_rent_calc_pkg.trx_hdr_c
4132: ( p_vr_id => p_var_rent_id
4133: ,p_prd_id => l_periods_t(p).period_id);
4134: FETCH pn_var_rent_calc_pkg.trx_hdr_c BULK COLLECT INTO l_trx_hrd_t;
4135: CLOSE pn_var_rent_calc_pkg.trx_hdr_c;

Line 4134: FETCH pn_var_rent_calc_pkg.trx_hdr_c BULK COLLECT INTO l_trx_hrd_t;

4130: /*Populate actual rents in trx tables.*/
4131: OPEN pn_var_rent_calc_pkg.trx_hdr_c
4132: ( p_vr_id => p_var_rent_id
4133: ,p_prd_id => l_periods_t(p).period_id);
4134: FETCH pn_var_rent_calc_pkg.trx_hdr_c BULK COLLECT INTO l_trx_hrd_t;
4135: CLOSE pn_var_rent_calc_pkg.trx_hdr_c;
4136:
4137: pnp_debug_pkg.log(l_context||' COMPLETE');
4138: pnp_debug_pkg.log('');

Line 4135: CLOSE pn_var_rent_calc_pkg.trx_hdr_c;

4131: OPEN pn_var_rent_calc_pkg.trx_hdr_c
4132: ( p_vr_id => p_var_rent_id
4133: ,p_prd_id => l_periods_t(p).period_id);
4134: FETCH pn_var_rent_calc_pkg.trx_hdr_c BULK COLLECT INTO l_trx_hrd_t;
4135: CLOSE pn_var_rent_calc_pkg.trx_hdr_c;
4136:
4137: pnp_debug_pkg.log(l_context||' COMPLETE');
4138: pnp_debug_pkg.log('');
4139:

Line 4161: pn_var_rent_calc_pkg.exists_approved_sales

4157: /* if we need to create an invoice for this calc (sub) period
4158: AND if approved sales exist
4159: */
4160: IF NVL(l_trx_hrd_t(t).invoice_flag, 'Y') <> 'N' AND
4161: pn_var_rent_calc_pkg.exists_approved_sales
4162: ( p_line_item_id => l_trx_hrd_t(t).line_item_id
4163: ,p_grp_date_id => l_trx_hrd_t(t).grp_date_id)
4164: THEN
4165:

Line 4168: l_context := 'Call pn_var_rent_calc_pkg.get_rent_applicable';

4164: THEN
4165:
4166: l_trx_hrd_r := l_trx_hrd_t(t);
4167:
4168: l_context := 'Call pn_var_rent_calc_pkg.get_rent_applicable';
4169: pn_var_rent_calc_pkg.get_rent_applicable(l_trx_hrd_r);
4170: pnp_debug_pkg.log(l_context||' COMPLETE');
4171: pnp_debug_pkg.log('');
4172:

Line 4169: pn_var_rent_calc_pkg.get_rent_applicable(l_trx_hrd_r);

4165:
4166: l_trx_hrd_r := l_trx_hrd_t(t);
4167:
4168: l_context := 'Call pn_var_rent_calc_pkg.get_rent_applicable';
4169: pn_var_rent_calc_pkg.get_rent_applicable(l_trx_hrd_r);
4170: pnp_debug_pkg.log(l_context||' COMPLETE');
4171: pnp_debug_pkg.log('');
4172:
4173: /* if rent changed */

Line 4259: OPEN pn_var_rent_calc_pkg.trx_hdr_for_c

4255: /* loop for all trx in the period,
4256: order by line item, calc (sub) period start*/
4257: /*Populate actual rents in trx tables.*/
4258: /*Populate forecasted rents in the trx tables.*/
4259: OPEN pn_var_rent_calc_pkg.trx_hdr_for_c
4260: ( p_vr_id => p_var_rent_id
4261: ,p_prd_id => l_periods_t(p).period_id);
4262: FETCH pn_var_rent_calc_pkg.trx_hdr_for_c BULK COLLECT INTO l_trx_hrd_for_t;
4263: CLOSE pn_var_rent_calc_pkg.trx_hdr_for_c;

Line 4262: FETCH pn_var_rent_calc_pkg.trx_hdr_for_c BULK COLLECT INTO l_trx_hrd_for_t;

4258: /*Populate forecasted rents in the trx tables.*/
4259: OPEN pn_var_rent_calc_pkg.trx_hdr_for_c
4260: ( p_vr_id => p_var_rent_id
4261: ,p_prd_id => l_periods_t(p).period_id);
4262: FETCH pn_var_rent_calc_pkg.trx_hdr_for_c BULK COLLECT INTO l_trx_hrd_for_t;
4263: CLOSE pn_var_rent_calc_pkg.trx_hdr_for_c;
4264:
4265: pnp_debug_pkg.log(l_context||' COMPLETE');
4266: pnp_debug_pkg.log('');

Line 4263: CLOSE pn_var_rent_calc_pkg.trx_hdr_for_c;

4259: OPEN pn_var_rent_calc_pkg.trx_hdr_for_c
4260: ( p_vr_id => p_var_rent_id
4261: ,p_prd_id => l_periods_t(p).period_id);
4262: FETCH pn_var_rent_calc_pkg.trx_hdr_for_c BULK COLLECT INTO l_trx_hrd_for_t;
4263: CLOSE pn_var_rent_calc_pkg.trx_hdr_for_c;
4264:
4265: pnp_debug_pkg.log(l_context||' COMPLETE');
4266: pnp_debug_pkg.log('');
4267:

Line 4290: pn_var_rent_calc_pkg.exists_approved_sales

4286: */
4287: IF NVL(l_trx_hrd_for_t(t).invoice_flag, 'Y') <> 'N'
4288: /*This will not be needed when invoicing on forecasted
4289: AND
4290: pn_var_rent_calc_pkg.exists_approved_sales
4291: ( p_line_item_id => l_trx_hrd_for_t(t).line_item_id
4292: ,p_grp_date_id => l_trx_hrd_for_t(t).grp_date_id)*/
4293: THEN
4294:

Line 4297: l_context := 'Call pn_var_rent_calc_pkg.get_rent_applicable_for';

4293: THEN
4294:
4295: l_trx_hrd_for_r := l_trx_hrd_for_t(t);
4296:
4297: l_context := 'Call pn_var_rent_calc_pkg.get_rent_applicable_for';
4298: pn_var_rent_calc_pkg.get_rent_applicable_for(l_trx_hrd_for_r);
4299: pnp_debug_pkg.log(l_context||' COMPLETE');
4300: pnp_debug_pkg.log('');
4301:

Line 4298: pn_var_rent_calc_pkg.get_rent_applicable_for(l_trx_hrd_for_r);

4294:
4295: l_trx_hrd_for_r := l_trx_hrd_for_t(t);
4296:
4297: l_context := 'Call pn_var_rent_calc_pkg.get_rent_applicable_for';
4298: pn_var_rent_calc_pkg.get_rent_applicable_for(l_trx_hrd_for_r);
4299: pnp_debug_pkg.log(l_context||' COMPLETE');
4300: pnp_debug_pkg.log('');
4301:
4302: /* if rent changed */

Line 4413: IF g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_FY

4409: END IF;
4410:
4411: pnp_debug_pkg.log('set partial flag');
4412: -- Set l_partial_prd_id if 1st partial period exists and proration rule is FY/FLY
4413: IF g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_FY
4414: ,pn_var_rent_calc_pkg.G_PRORUL_FLY) THEN
4415: FOR fst_rec IN check_fst_partial_prd(p_var_rent_id) LOOP
4416: l_partial_prd_id:= fst_rec.period_id;
4417: END LOOP;

Line 4414: ,pn_var_rent_calc_pkg.G_PRORUL_FLY) THEN

4410:
4411: pnp_debug_pkg.log('set partial flag');
4412: -- Set l_partial_prd_id if 1st partial period exists and proration rule is FY/FLY
4413: IF g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_FY
4414: ,pn_var_rent_calc_pkg.G_PRORUL_FLY) THEN
4415: FOR fst_rec IN check_fst_partial_prd(p_var_rent_id) LOOP
4416: l_partial_prd_id:= fst_rec.period_id;
4417: END LOOP;
4418: END IF;

Line 4427: pn_var_rent_calc_pkg.pop_inv_date_tab_firstyr(p_var_rent_id => p_var_rent_id ,

4423: -- IF 1st partial period exists then call pop_inv_date_tab_firstyr ,to populate
4424: -- invoice dates from 2nd annual period
4425: -- ELSE call pop_inv_date_tab
4426: IF l_partial_prd_id IS NOT NULL THEN
4427: pn_var_rent_calc_pkg.pop_inv_date_tab_firstyr(p_var_rent_id => p_var_rent_id ,
4428: p_status => 'APPROVED');
4429: ELSE
4430: pn_var_rent_calc_pkg.pop_inv_date_tab(p_var_rent_id => p_var_rent_id ,
4431: p_status => 'APPROVED');

Line 4430: pn_var_rent_calc_pkg.pop_inv_date_tab(p_var_rent_id => p_var_rent_id ,

4426: IF l_partial_prd_id IS NOT NULL THEN
4427: pn_var_rent_calc_pkg.pop_inv_date_tab_firstyr(p_var_rent_id => p_var_rent_id ,
4428: p_status => 'APPROVED');
4429: ELSE
4430: pn_var_rent_calc_pkg.pop_inv_date_tab(p_var_rent_id => p_var_rent_id ,
4431: p_status => 'APPROVED');
4432: END IF;
4433:
4434: /*pnp_debug_pkg.log('data in inv_date_tab');

Line 4454: l_context := 'Call pn_var_rent_calc_pkg.post_summary';

4450: LOOP
4451: IF(g_invoice_on=G_INV_ON_ACTUAL) OR (g_invoice_on=G_INV_ON_FORECASTED
4452: AND g_calc_type= G_CALC_TYPE_RECONCILE)
4453: THEN
4454: l_context := 'Call pn_var_rent_calc_pkg.post_summary';
4455:
4456: /* IF NOT ( g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_FY
4457: ,pn_var_rent_calc_pkg.G_PRORUL_FLY)
4458: AND (l_first_period_id = l_periods_t(p).period_id)

Line 4456: /* IF NOT ( g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_FY

4452: AND g_calc_type= G_CALC_TYPE_RECONCILE)
4453: THEN
4454: l_context := 'Call pn_var_rent_calc_pkg.post_summary';
4455:
4456: /* IF NOT ( g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_FY
4457: ,pn_var_rent_calc_pkg.G_PRORUL_FLY)
4458: AND (l_first_period_id = l_periods_t(p).period_id)
4459: AND l_partial_period = 'Y')
4460: THEN*/

Line 4457: ,pn_var_rent_calc_pkg.G_PRORUL_FLY)

4453: THEN
4454: l_context := 'Call pn_var_rent_calc_pkg.post_summary';
4455:
4456: /* IF NOT ( g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_FY
4457: ,pn_var_rent_calc_pkg.G_PRORUL_FLY)
4458: AND (l_first_period_id = l_periods_t(p).period_id)
4459: AND l_partial_period = 'Y')
4460: THEN*/
4461: pn_var_rent_calc_pkg.post_summary

Line 4461: pn_var_rent_calc_pkg.post_summary

4457: ,pn_var_rent_calc_pkg.G_PRORUL_FLY)
4458: AND (l_first_period_id = l_periods_t(p).period_id)
4459: AND l_partial_period = 'Y')
4460: THEN*/
4461: pn_var_rent_calc_pkg.post_summary
4462: ( p_var_rent_id => p_var_rent_id
4463: ,p_period_id => l_periods_t(p).period_id);
4464: pnp_debug_pkg.log(l_context||' COMPLETE');
4465: pnp_debug_pkg.log('');

Line 4470: l_context := 'Call pn_var_rent_calc_pkg.post_summary_for';

4466: /*END IF; */
4467:
4468: ELSIF (g_invoice_on=G_INV_ON_FORECASTED AND g_calc_type= G_CALC_TYPE_CALCULATE)
4469: THEN
4470: l_context := 'Call pn_var_rent_calc_pkg.post_summary_for';
4471: pn_var_rent_calc_pkg.post_summary_for
4472: ( p_var_rent_id => p_var_rent_id
4473: ,p_period_id => l_periods_t(p).period_id);
4474: pnp_debug_pkg.log(l_context||' COMPLETE');

Line 4471: pn_var_rent_calc_pkg.post_summary_for

4467:
4468: ELSIF (g_invoice_on=G_INV_ON_FORECASTED AND g_calc_type= G_CALC_TYPE_CALCULATE)
4469: THEN
4470: l_context := 'Call pn_var_rent_calc_pkg.post_summary_for';
4471: pn_var_rent_calc_pkg.post_summary_for
4472: ( p_var_rent_id => p_var_rent_id
4473: ,p_period_id => l_periods_t(p).period_id);
4474: pnp_debug_pkg.log(l_context||' COMPLETE');
4475: pnp_debug_pkg.log('');

Line 4479: l_context := 'Call pn_var_rent_calc_pkg.insert_invoice';

4475: pnp_debug_pkg.log('');
4476:
4477: END IF;/*End invoice type and calc_type*/
4478:
4479: l_context := 'Call pn_var_rent_calc_pkg.insert_invoice';
4480: IF g_invoice_on = G_INV_ON_ACTUAL THEN
4481:
4482: IF NOT ( g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_FY
4483: ,pn_var_rent_calc_pkg.G_PRORUL_FLY)

Line 4482: IF NOT ( g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_FY

4478:
4479: l_context := 'Call pn_var_rent_calc_pkg.insert_invoice';
4480: IF g_invoice_on = G_INV_ON_ACTUAL THEN
4481:
4482: IF NOT ( g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_FY
4483: ,pn_var_rent_calc_pkg.G_PRORUL_FLY)
4484: AND (l_first_period_id = l_periods_t(p).period_id)
4485: AND l_partial_period = 'Y')
4486: THEN

Line 4483: ,pn_var_rent_calc_pkg.G_PRORUL_FLY)

4479: l_context := 'Call pn_var_rent_calc_pkg.insert_invoice';
4480: IF g_invoice_on = G_INV_ON_ACTUAL THEN
4481:
4482: IF NOT ( g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_FY
4483: ,pn_var_rent_calc_pkg.G_PRORUL_FLY)
4484: AND (l_first_period_id = l_periods_t(p).period_id)
4485: AND l_partial_period = 'Y')
4486: THEN
4487: pn_var_rent_calc_pkg.insert_invoice

Line 4487: pn_var_rent_calc_pkg.insert_invoice

4483: ,pn_var_rent_calc_pkg.G_PRORUL_FLY)
4484: AND (l_first_period_id = l_periods_t(p).period_id)
4485: AND l_partial_period = 'Y')
4486: THEN
4487: pn_var_rent_calc_pkg.insert_invoice
4488: ( p_var_rent_id => p_var_rent_id
4489: ,p_period_id => l_periods_t(p).period_id);
4490: END IF;
4491:

Line 4493: pn_var_rent_calc_pkg.insert_invoice_for

4489: ,p_period_id => l_periods_t(p).period_id);
4490: END IF;
4491:
4492: ELSIF g_invoice_on = G_INV_ON_FORECASTED THEN
4493: pn_var_rent_calc_pkg.insert_invoice_for
4494: ( p_var_rent_id => p_var_rent_id
4495: ,p_period_id => l_periods_t(p).period_id);
4496:
4497: END IF;

Line 4505: IF g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_FY

4501:
4502: END LOOP;/*End loop for all periods*/
4503:
4504: /* Create the invoice for first partial year separately */
4505: IF g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_FY
4506: ,pn_var_rent_calc_pkg.G_PRORUL_FLY)
4507: AND g_invoice_on = G_INV_ON_ACTUAL AND l_partial_period = 'Y'
4508: THEN
4509:

Line 4506: ,pn_var_rent_calc_pkg.G_PRORUL_FLY)

4502: END LOOP;/*End loop for all periods*/
4503:
4504: /* Create the invoice for first partial year separately */
4505: IF g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_FY
4506: ,pn_var_rent_calc_pkg.G_PRORUL_FLY)
4507: AND g_invoice_on = G_INV_ON_ACTUAL AND l_partial_period = 'Y'
4508: THEN
4509:
4510: /*post_summary_firstyr (p_var_rent_id => p_var_rent_id);*/

Line 4512: /*pn_var_rent_calc_pkg.*/insert_invoice_firstyr( p_var_rent_id => p_var_rent_id );

4508: THEN
4509:
4510: /*post_summary_firstyr (p_var_rent_id => p_var_rent_id);*/
4511:
4512: /*pn_var_rent_calc_pkg.*/insert_invoice_firstyr( p_var_rent_id => p_var_rent_id );
4513: END IF;
4514:
4515: END IF;/*End insert invoice/post summary*/
4516:

Line 4523: pn_var_rent_calc_pkg.ROLL_FWD_PARTIAL_PRD(p_var_rent_id => p_var_rent_id);

4519: -- call ROLL_FWD_PARTIAL_PRD ,INCLUDE_INCREASES_FIRSTYR
4520: -- ELSE call ROLL_FWD_SELECNS
4521:
4522: IF l_partial_prd_id IS NOT NULL THEN
4523: pn_var_rent_calc_pkg.ROLL_FWD_PARTIAL_PRD(p_var_rent_id => p_var_rent_id);
4524: pn_var_rent_calc_pkg.INCLUDE_INCREASES_FIRSTYR(p_var_rent_id => p_var_rent_id);
4525: ELSE
4526: pn_var_rent_calc_pkg.ROLL_FWD_SELECNS(p_var_rent_id => p_var_rent_id);
4527: END IF;

Line 4524: pn_var_rent_calc_pkg.INCLUDE_INCREASES_FIRSTYR(p_var_rent_id => p_var_rent_id);

4520: -- ELSE call ROLL_FWD_SELECNS
4521:
4522: IF l_partial_prd_id IS NOT NULL THEN
4523: pn_var_rent_calc_pkg.ROLL_FWD_PARTIAL_PRD(p_var_rent_id => p_var_rent_id);
4524: pn_var_rent_calc_pkg.INCLUDE_INCREASES_FIRSTYR(p_var_rent_id => p_var_rent_id);
4525: ELSE
4526: pn_var_rent_calc_pkg.ROLL_FWD_SELECNS(p_var_rent_id => p_var_rent_id);
4527: END IF;
4528:

Line 4526: pn_var_rent_calc_pkg.ROLL_FWD_SELECNS(p_var_rent_id => p_var_rent_id);

4522: IF l_partial_prd_id IS NOT NULL THEN
4523: pn_var_rent_calc_pkg.ROLL_FWD_PARTIAL_PRD(p_var_rent_id => p_var_rent_id);
4524: pn_var_rent_calc_pkg.INCLUDE_INCREASES_FIRSTYR(p_var_rent_id => p_var_rent_id);
4525: ELSE
4526: pn_var_rent_calc_pkg.ROLL_FWD_SELECNS(p_var_rent_id => p_var_rent_id);
4527: END IF;
4528:
4529: -- If proration rule = LY,FLY then call separate roll forward for last partial period
4530: IF g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_LY

Line 4530: IF g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_LY

4526: pn_var_rent_calc_pkg.ROLL_FWD_SELECNS(p_var_rent_id => p_var_rent_id);
4527: END IF;
4528:
4529: -- If proration rule = LY,FLY then call separate roll forward for last partial period
4530: IF g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_LY
4531: ,pn_var_rent_calc_pkg.G_PRORUL_FLY) THEN
4532: pn_var_rent_calc_pkg.ROLL_FWD_LST_PARTIAL_PRD(p_var_rent_id => p_var_rent_id);
4533: END IF;
4534:

Line 4531: ,pn_var_rent_calc_pkg.G_PRORUL_FLY) THEN

4527: END IF;
4528:
4529: -- If proration rule = LY,FLY then call separate roll forward for last partial period
4530: IF g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_LY
4531: ,pn_var_rent_calc_pkg.G_PRORUL_FLY) THEN
4532: pn_var_rent_calc_pkg.ROLL_FWD_LST_PARTIAL_PRD(p_var_rent_id => p_var_rent_id);
4533: END IF;
4534:
4535: -- Roll forward for including rent increase terms

Line 4532: pn_var_rent_calc_pkg.ROLL_FWD_LST_PARTIAL_PRD(p_var_rent_id => p_var_rent_id);

4528:
4529: -- If proration rule = LY,FLY then call separate roll forward for last partial period
4530: IF g_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_LY
4531: ,pn_var_rent_calc_pkg.G_PRORUL_FLY) THEN
4532: pn_var_rent_calc_pkg.ROLL_FWD_LST_PARTIAL_PRD(p_var_rent_id => p_var_rent_id);
4533: END IF;
4534:
4535: -- Roll forward for including rent increase terms
4536: pn_var_rent_calc_pkg.INCLUDE_INCREASES(p_var_rent_id => p_var_rent_id);

Line 4536: pn_var_rent_calc_pkg.INCLUDE_INCREASES(p_var_rent_id => p_var_rent_id);

4532: pn_var_rent_calc_pkg.ROLL_FWD_LST_PARTIAL_PRD(p_var_rent_id => p_var_rent_id);
4533: END IF;
4534:
4535: -- Roll forward for including rent increase terms
4536: pn_var_rent_calc_pkg.INCLUDE_INCREASES(p_var_rent_id => p_var_rent_id);
4537: inv_date_tab.delete;
4538: g_partial_prd_flag := NULL; -- clearing the roll fwd flag of 1st partial prd
4539:
4540: --Reset abatements for the periods for which we donot re-calculate

Line 4541: pn_var_rent_calc_pkg.reset_abatements(p_var_rent_id);

4537: inv_date_tab.delete;
4538: g_partial_prd_flag := NULL; -- clearing the roll fwd flag of 1st partial prd
4539:
4540: --Reset abatements for the periods for which we donot re-calculate
4541: pn_var_rent_calc_pkg.reset_abatements(p_var_rent_id);
4542: pnp_debug_pkg.log('g_calculation_method3:'||g_calculation_method);
4543: IF l_periods_out_t.COUNT > 0 THEN
4544: FOR p IN l_periods_out_t.FIRST..l_periods_out_t.LAST --
4545: --

Line 4558: pn_var_rent_calc_pkg.apply_abatements

4554: ,p_flag => 'RESET');
4555: ELSE
4556: --No need to take trueup invoices into account.
4557: pnp_debug_pkg.log('Not true up');
4558: pn_var_rent_calc_pkg.apply_abatements
4559: ( p_var_rent_id => p_var_rent_id
4560: ,p_period_id => l_periods_out_t(p).period_id
4561: ,p_flag => 'RESET');
4562:

Line 4584: pn_var_rent_calc_pkg.apply_abatements

4580: ,p_flag => 'CALCULATE');
4581: ELSE
4582: pnp_debug_pkg.log('Not true up');
4583: --No need to take trueup invoices into account.
4584: pn_var_rent_calc_pkg.apply_abatements
4585: ( p_var_rent_id => p_var_rent_id
4586: ,p_period_id => l_periods_t(p).period_id
4587: ,p_flag => 'CALCULATE');
4588:

Line 4606: pn_var_rent_calc_pkg.delete_draft_terms( p_var_rent_id => p_var_rent_id);

4602: END LOOP;
4603: END IF;
4604:
4605: /* deletes the draft term for which invoice_date or term template has changed.*/
4606: pn_var_rent_calc_pkg.delete_draft_terms( p_var_rent_id => p_var_rent_id);
4607:
4608: l_context := 'Loop for all cached periods';
4609: pnp_debug_pkg.log(l_context||' COMPLETE');
4610: pnp_debug_pkg.log('');

Line 4768: l_precision := nvl(pn_var_rent_calc_pkg.get_currency_precision(l_org_id),4);

4764: FOR vr_rec IN org_c(p_vr_id => p_var_rent_id) LOOP
4765: l_org_id := vr_rec.org_id;
4766: END LOOP;
4767:
4768: l_precision := nvl(pn_var_rent_calc_pkg.get_currency_precision(l_org_id),4);
4769: pnp_debug_pkg.log('l_precision:'||l_precision);
4770:
4771: l_calc_type := g_calc_type;
4772: pnp_debug_pkg.log('calc_type:'|| l_calc_type);

Line 4904: status <> pn_var_rent_calc_pkg.G_TERM_STATUS_APPROVED AND

4900: DELETE
4901: pn_payment_terms_all
4902: WHERE
4903: var_rent_inv_id = l_var_rent_inv_id AND
4904: status <> pn_var_rent_calc_pkg.G_TERM_STATUS_APPROVED AND
4905: var_rent_type = pn_var_rent_calc_pkg.G_INV_ON_FORECASTED;
4906:
4907: /* update the invoice */
4908: /*Since forcasted rents are not yet exported, we can update them.*/

Line 4905: var_rent_type = pn_var_rent_calc_pkg.G_INV_ON_FORECASTED;

4901: pn_payment_terms_all
4902: WHERE
4903: var_rent_inv_id = l_var_rent_inv_id AND
4904: status <> pn_var_rent_calc_pkg.G_TERM_STATUS_APPROVED AND
4905: var_rent_type = pn_var_rent_calc_pkg.G_INV_ON_FORECASTED;
4906:
4907: /* update the invoice */
4908: /*Since forcasted rents are not yet exported, we can update them.*/
4909: UPDATE

Line 4986: l_constr_rent := pn_var_rent_calc_pkg.apply_constraints(

4982: LOOP
4983: l_prev_inv_exp_rent := prev_inv_rec.prev_invoiced_amt;
4984: END LOOP;
4985:
4986: l_constr_rent := pn_var_rent_calc_pkg.apply_constraints(
4987: p_period_id => p_period_id,
4988: p_invoice_date => inv_rec.invoice_date,
4989: p_actual_rent => inv_rec.total_actual_rent);
4990: --TODO.......

Line 5056: status <> pn_var_rent_calc_pkg.G_TERM_STATUS_APPROVED AND

5052: DELETE
5053: pn_payment_terms_all
5054: WHERE
5055: var_rent_inv_id = l_var_rent_inv_id AND
5056: status <> pn_var_rent_calc_pkg.G_TERM_STATUS_APPROVED AND
5057: var_rent_type = pn_var_rent_calc_pkg.G_INV_ON_VARIANCE; --bug#12702776
5058: --var_rent_type = pn_var_rent_calc_pkg.G_INV_ON_FORECASTED;
5059:
5060: /* update the invoice */

Line 5057: var_rent_type = pn_var_rent_calc_pkg.G_INV_ON_VARIANCE; --bug#12702776

5053: pn_payment_terms_all
5054: WHERE
5055: var_rent_inv_id = l_var_rent_inv_id AND
5056: status <> pn_var_rent_calc_pkg.G_TERM_STATUS_APPROVED AND
5057: var_rent_type = pn_var_rent_calc_pkg.G_INV_ON_VARIANCE; --bug#12702776
5058: --var_rent_type = pn_var_rent_calc_pkg.G_INV_ON_FORECASTED;
5059:
5060: /* update the invoice */
5061: UPDATE

Line 5058: --var_rent_type = pn_var_rent_calc_pkg.G_INV_ON_FORECASTED;

5054: WHERE
5055: var_rent_inv_id = l_var_rent_inv_id AND
5056: status <> pn_var_rent_calc_pkg.G_TERM_STATUS_APPROVED AND
5057: var_rent_type = pn_var_rent_calc_pkg.G_INV_ON_VARIANCE; --bug#12702776
5058: --var_rent_type = pn_var_rent_calc_pkg.G_INV_ON_FORECASTED;
5059:
5060: /* update the invoice */
5061: UPDATE
5062: pn_var_rent_inv_all

Line 5107: (p_trx_hdr_rec IN OUT NOCOPY pn_var_rent_calc_pkg.trx_hdr_for_c%ROWTYPE)

5103: --
5104: -- 18.Sep.06 Shabda o Created
5105: --------------------------------------------------------------------------------
5106: PROCEDURE get_rent_applicable_for
5107: (p_trx_hdr_rec IN OUT NOCOPY pn_var_rent_calc_pkg.trx_hdr_for_c%ROWTYPE)
5108: IS
5109:
5110: /* cache trx hdr passed */
5111: l_trx_hdr_rec pn_var_rent_calc_pkg.trx_hdr_for_c%ROWTYPE;

Line 5111: l_trx_hdr_rec pn_var_rent_calc_pkg.trx_hdr_for_c%ROWTYPE;

5107: (p_trx_hdr_rec IN OUT NOCOPY pn_var_rent_calc_pkg.trx_hdr_for_c%ROWTYPE)
5108: IS
5109:
5110: /* cache trx hdr passed */
5111: l_trx_hdr_rec pn_var_rent_calc_pkg.trx_hdr_for_c%ROWTYPE;
5112:
5113: /* get bkpt type */
5114: CURSOR bkpt_type_c(p_bkdt_id IN NUMBER) IS
5115: SELECT

Line 5152: NVL(status, 'A') <> pn_var_rent_calc_pkg.G_PERIOD_REVERSED_STATUS;

5148: FROM
5149: pn_var_periods_all
5150: WHERE
5151: var_rent_id = p_vr_id AND
5152: NVL(status, 'A') <> pn_var_rent_calc_pkg.G_PERIOD_REVERSED_STATUS;
5153:
5154: /* get the last partial period */
5155: CURSOR last_period_c( p_vr_id IN NUMBER) IS
5156: SELECT

Line 5207: pn_var_rent_calc_pkg.cache_vr_details

5203: g_negative_rent IS NULL
5204: THEN
5205:
5206: /* cache VR details */
5207: pn_var_rent_calc_pkg.cache_vr_details
5208: (p_var_rent_id => l_trx_hdr_rec.var_rent_id);
5209:
5210: END IF;
5211:

Line 5215: OPEN pn_var_rent_calc_pkg.trx_dtl_c(p_hdr_id => p_trx_hdr_rec.trx_header_id);

5211:
5212: /* cache bkpt details */
5213: l_bkpts_t.DELETE;
5214:
5215: OPEN pn_var_rent_calc_pkg.trx_dtl_c(p_hdr_id => p_trx_hdr_rec.trx_header_id);
5216: FETCH pn_var_rent_calc_pkg.trx_dtl_c BULK COLLECT INTO l_bkpts_t;
5217: CLOSE pn_var_rent_calc_pkg.trx_dtl_c;
5218:
5219: /* get the breakpoint type - flat, sliding, stratified */

Line 5216: FETCH pn_var_rent_calc_pkg.trx_dtl_c BULK COLLECT INTO l_bkpts_t;

5212: /* cache bkpt details */
5213: l_bkpts_t.DELETE;
5214:
5215: OPEN pn_var_rent_calc_pkg.trx_dtl_c(p_hdr_id => p_trx_hdr_rec.trx_header_id);
5216: FETCH pn_var_rent_calc_pkg.trx_dtl_c BULK COLLECT INTO l_bkpts_t;
5217: CLOSE pn_var_rent_calc_pkg.trx_dtl_c;
5218:
5219: /* get the breakpoint type - flat, sliding, stratified */
5220: FOR rec IN bkpt_type_c(p_bkdt_id => l_bkpts_t(1).bkpt_detail_id)

Line 5217: CLOSE pn_var_rent_calc_pkg.trx_dtl_c;

5213: l_bkpts_t.DELETE;
5214:
5215: OPEN pn_var_rent_calc_pkg.trx_dtl_c(p_hdr_id => p_trx_hdr_rec.trx_header_id);
5216: FETCH pn_var_rent_calc_pkg.trx_dtl_c BULK COLLECT INTO l_bkpts_t;
5217: CLOSE pn_var_rent_calc_pkg.trx_dtl_c;
5218:
5219: /* get the breakpoint type - flat, sliding, stratified */
5220: FOR rec IN bkpt_type_c(p_bkdt_id => l_bkpts_t(1).bkpt_detail_id)
5221: LOOP

Line 5226: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE

5222: pnp_debug_pkg.log('Breakpoint Type:'||rec.breakpoint_type);
5223: l_bkpt_type := rec.breakpoint_type;
5224: END LOOP;
5225:
5226: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE
5227: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)
5228: THEN
5229: l_net_volume := l_trx_hdr_rec.prorated_group_sales_for;
5230:

Line 5227: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)

5223: l_bkpt_type := rec.breakpoint_type;
5224: END LOOP;
5225:
5226: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE
5227: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)
5228: THEN
5229: l_net_volume := l_trx_hdr_rec.prorated_group_sales_for;
5230:
5231: ELSIF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_CUMULATIVE

Line 5231: ELSIF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_CUMULATIVE

5227: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)
5228: THEN
5229: l_net_volume := l_trx_hdr_rec.prorated_group_sales_for;
5230:
5231: ELSIF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_CUMULATIVE
5232: ,pn_var_rent_calc_pkg.G_CALC_YTD)
5233: THEN
5234: l_net_volume := l_trx_hdr_rec.ytd_sales_for;
5235:

Line 5232: ,pn_var_rent_calc_pkg.G_CALC_YTD)

5228: THEN
5229: l_net_volume := l_trx_hdr_rec.prorated_group_sales_for;
5230:
5231: ELSIF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_CUMULATIVE
5232: ,pn_var_rent_calc_pkg.G_CALC_YTD)
5233: THEN
5234: l_net_volume := l_trx_hdr_rec.ytd_sales_for;
5235:
5236: END IF;

Line 5241: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE

5237: pnp_debug_pkg.log('l_net_volume'||l_net_volume);
5238: /* handling the case of volume not tripping any bkpts */
5239: /* init the calculated rent to 0 - it will be re-calculated */
5240: l_trx_hdr_rec.calculated_rent_for := 0;
5241: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE
5242: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)
5243: AND
5244: (l_net_volume < l_bkpts_t(1).prorated_grp_vol_start)
5245:

Line 5242: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)

5238: /* handling the case of volume not tripping any bkpts */
5239: /* init the calculated rent to 0 - it will be re-calculated */
5240: l_trx_hdr_rec.calculated_rent_for := 0;
5241: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE
5242: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)
5243: AND
5244: (l_net_volume < l_bkpts_t(1).prorated_grp_vol_start)
5245:
5246: THEN

Line 5264: IF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_STRATIFIED

5260:
5261: /* --------------------- GET calculated_rent START --------------------- */
5262: /* get l_trx_hdr_rec.calculated_rent - CALCULATED RENT */
5263:
5264: IF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_STRATIFIED
5265: THEN
5266:
5267: l_trx_hdr_rec.calculated_rent_for := 0;
5268:

Line 5272: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE

5268:
5269: /* loop for all bkpt details */
5270: FOR i IN l_bkpts_t.FIRST..l_bkpts_t.LAST LOOP
5271:
5272: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE
5273: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)
5274: THEN
5275:
5276: l_bkpt_start := l_bkpts_t(i).prorated_grp_vol_start;

Line 5273: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)

5269: /* loop for all bkpt details */
5270: FOR i IN l_bkpts_t.FIRST..l_bkpts_t.LAST LOOP
5271:
5272: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE
5273: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)
5274: THEN
5275:
5276: l_bkpt_start := l_bkpts_t(i).prorated_grp_vol_start;
5277: l_bkpt_end := l_bkpts_t(i).prorated_grp_vol_end;

Line 5280: ELSIF g_calculation_method = pn_var_rent_calc_pkg.G_CALC_CUMULATIVE

5276: l_bkpt_start := l_bkpts_t(i).prorated_grp_vol_start;
5277: l_bkpt_end := l_bkpts_t(i).prorated_grp_vol_end;
5278:
5279:
5280: ELSIF g_calculation_method = pn_var_rent_calc_pkg.G_CALC_CUMULATIVE
5281: THEN
5282: IF g_proration_rule = pn_var_rent_calc_pkg.G_PRORUL_NP THEN
5283:
5284: l_bkpt_start := l_bkpts_t(i).prorated_grp_vol_start;

Line 5282: IF g_proration_rule = pn_var_rent_calc_pkg.G_PRORUL_NP THEN

5278:
5279:
5280: ELSIF g_calculation_method = pn_var_rent_calc_pkg.G_CALC_CUMULATIVE
5281: THEN
5282: IF g_proration_rule = pn_var_rent_calc_pkg.G_PRORUL_NP THEN
5283:
5284: l_bkpt_start := l_bkpts_t(i).prorated_grp_vol_start;
5285: l_bkpt_end := l_bkpts_t(i).prorated_grp_vol_end;
5286:

Line 5294: ELSIF g_calculation_method = pn_var_rent_calc_pkg.G_CALC_YTD

5290: l_bkpt_end := l_bkpts_t(i).blended_period_vol_end;
5291:
5292: END IF;
5293:
5294: ELSIF g_calculation_method = pn_var_rent_calc_pkg.G_CALC_YTD
5295: THEN
5296:
5297: l_bkpt_start := l_bkpts_t(i).ytd_group_vol_start;
5298: l_bkpt_end := l_bkpts_t(i).ytd_group_vol_end;

Line 5331: ELSIF l_bkpt_type IN ( pn_var_rent_calc_pkg.G_BKPT_TYP_FLAT

5327: END IF; /* net vol > bkpt start */
5328:
5329: END LOOP; /* loop for all bkpt details */
5330:
5331: ELSIF l_bkpt_type IN ( pn_var_rent_calc_pkg.G_BKPT_TYP_FLAT
5332: ,pn_var_rent_calc_pkg.G_BKPT_TYP_SLIDING)
5333: THEN
5334:
5335: FOR i IN l_bkpts_t.FIRST..l_bkpts_t.LAST LOOP

Line 5332: ,pn_var_rent_calc_pkg.G_BKPT_TYP_SLIDING)

5328:
5329: END LOOP; /* loop for all bkpt details */
5330:
5331: ELSIF l_bkpt_type IN ( pn_var_rent_calc_pkg.G_BKPT_TYP_FLAT
5332: ,pn_var_rent_calc_pkg.G_BKPT_TYP_SLIDING)
5333: THEN
5334:
5335: FOR i IN l_bkpts_t.FIRST..l_bkpts_t.LAST LOOP
5336:

Line 5337: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE

5333: THEN
5334:
5335: FOR i IN l_bkpts_t.FIRST..l_bkpts_t.LAST LOOP
5336:
5337: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE
5338: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)
5339: THEN
5340:
5341: l_bkpt_start := l_bkpts_t(i).prorated_grp_vol_start;

Line 5338: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)

5334:
5335: FOR i IN l_bkpts_t.FIRST..l_bkpts_t.LAST LOOP
5336:
5337: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE
5338: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)
5339: THEN
5340:
5341: l_bkpt_start := l_bkpts_t(i).prorated_grp_vol_start;
5342: l_bkpt_end := l_bkpts_t(i).prorated_grp_vol_end;

Line 5345: ELSIF g_calculation_method = pn_var_rent_calc_pkg.G_CALC_CUMULATIVE

5341: l_bkpt_start := l_bkpts_t(i).prorated_grp_vol_start;
5342: l_bkpt_end := l_bkpts_t(i).prorated_grp_vol_end;
5343:
5344:
5345: ELSIF g_calculation_method = pn_var_rent_calc_pkg.G_CALC_CUMULATIVE
5346: THEN
5347:
5348: IF g_proration_rule = pn_var_rent_calc_pkg.G_PRORUL_NP THEN
5349:

Line 5348: IF g_proration_rule = pn_var_rent_calc_pkg.G_PRORUL_NP THEN

5344:
5345: ELSIF g_calculation_method = pn_var_rent_calc_pkg.G_CALC_CUMULATIVE
5346: THEN
5347:
5348: IF g_proration_rule = pn_var_rent_calc_pkg.G_PRORUL_NP THEN
5349:
5350: l_bkpt_start := l_bkpts_t(i).prorated_grp_vol_start;
5351: l_bkpt_end := l_bkpts_t(i).prorated_grp_vol_end;
5352:

Line 5360: ELSIF g_calculation_method = pn_var_rent_calc_pkg.G_CALC_YTD

5356: l_bkpt_end := l_bkpts_t(i).blended_period_vol_end;
5357:
5358: END IF;
5359:
5360: ELSIF g_calculation_method = pn_var_rent_calc_pkg.G_CALC_YTD
5361: THEN
5362:
5363: l_bkpt_start := l_bkpts_t(i).ytd_group_vol_start;
5364: l_bkpt_end := l_bkpts_t(i).ytd_group_vol_end;

Line 5376: IF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_SLIDING THEN

5372: IF l_net_volume >= l_bkpt_start AND
5373: l_net_volume <= NVL(l_bkpt_end, l_net_volume)
5374: THEN
5375:
5376: IF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_SLIDING THEN
5377:
5378: l_trx_hdr_rec.calculated_rent_for
5379: := l_net_volume * l_bkpts_t(i).bkpt_rate;
5380:

Line 5381: ELSIF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_FLAT THEN

5377:
5378: l_trx_hdr_rec.calculated_rent_for
5379: := l_net_volume * l_bkpts_t(i).bkpt_rate;
5380:
5381: ELSIF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_FLAT THEN
5382:
5383: l_trx_hdr_rec.calculated_rent_for
5384: := (l_net_volume - l_bkpt_start) * l_bkpts_t(i).bkpt_rate;
5385: pnp_debug_pkg.log('calculated_rent_for:'||l_trx_hdr_rec.calculated_rent_for);

Line 5407: := pn_var_rent_calc_pkg.find_prev_billed_for

5403: /* ------------ GET percent_rent_due for, ytd_percent_rent_for START ------------ */
5404:
5405:
5406: l_prev_billed
5407: := pn_var_rent_calc_pkg.find_prev_billed_for
5408: ( p_var_rent_id => l_trx_hdr_rec.var_rent_id
5409: ,p_period_id => l_trx_hdr_rec.period_id
5410: ,p_line_item_id => l_trx_hdr_rec.line_item_id
5411: ,p_calc_prd_st_dt => l_trx_hdr_rec.calc_prd_start_date

Line 5416: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE

5412: ,p_calc_prd_end_dt => l_trx_hdr_rec.calc_prd_end_date
5413: ,p_reset_grp_id => l_trx_hdr_rec.reset_group_id);
5414:
5415:
5416: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE
5417: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)
5418: THEN
5419:
5420: l_trx_hdr_rec.ytd_percent_rent_for := l_prev_billed + l_trx_hdr_rec.percent_rent_due_for;

Line 5417: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)

5413: ,p_reset_grp_id => l_trx_hdr_rec.reset_group_id);
5414:
5415:
5416: IF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_NON_CUMULATIVE
5417: ,pn_var_rent_calc_pkg.G_CALC_TRUE_UP)
5418: THEN
5419:
5420: l_trx_hdr_rec.ytd_percent_rent_for := l_prev_billed + l_trx_hdr_rec.percent_rent_due_for;
5421: l_trx_hdr_rec.percent_rent_due_for := l_trx_hdr_rec.calculated_rent_for;

Line 5423: ELSIF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_CUMULATIVE

5419:
5420: l_trx_hdr_rec.ytd_percent_rent_for := l_prev_billed + l_trx_hdr_rec.percent_rent_due_for;
5421: l_trx_hdr_rec.percent_rent_due_for := l_trx_hdr_rec.calculated_rent_for;
5422:
5423: ELSIF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_CUMULATIVE
5424: ,pn_var_rent_calc_pkg.G_CALC_YTD)
5425: THEN
5426:
5427: l_trx_hdr_rec.percent_rent_due_for

Line 5424: ,pn_var_rent_calc_pkg.G_CALC_YTD)

5420: l_trx_hdr_rec.ytd_percent_rent_for := l_prev_billed + l_trx_hdr_rec.percent_rent_due_for;
5421: l_trx_hdr_rec.percent_rent_due_for := l_trx_hdr_rec.calculated_rent_for;
5422:
5423: ELSIF g_calculation_method IN ( pn_var_rent_calc_pkg.G_CALC_CUMULATIVE
5424: ,pn_var_rent_calc_pkg.G_CALC_YTD)
5425: THEN
5426:
5427: l_trx_hdr_rec.percent_rent_due_for
5428: := l_trx_hdr_rec.calculated_rent_for - l_prev_billed;

Line 5464: IF g_proration_rule IN (pn_var_rent_calc_pkg.G_PRORUL_FLY) AND

5460: /* IMP: This condition is to nullify the rents for a special case.
5461: The case is for First-LAst year, when we have just 2 periods and
5462: first year and last year period is partial, in such a case we dont
5463: want to calculate the rent.
5464: IF g_proration_rule IN (pn_var_rent_calc_pkg.G_PRORUL_FLY) AND
5465: l_period_num = 2 AND l_first_partial = 'Y' AND
5466: l_last_partial = 'Y'
5467: THEN
5468: l_trx_hdr_rec.percent_rent_due_for := 0;

Line 5831: IF(pn_var_rent_calc_pkg.inv_end_date(inv_start_date,vr_id,p_period_id) = l_vr_term_date) THEN

5827:
5828: IF l_proration_rule IN ('LY', 'FLY') THEN
5829: FOR rec IN period_last_cur LOOP
5830: IF(rec.period_id = p_period_id) THEN
5831: IF(pn_var_rent_calc_pkg.inv_end_date(inv_start_date,vr_id,p_period_id) = l_vr_term_date) THEN
5832: RETURN rec.start_date;
5833: END IF;
5834: END IF;
5835: END LOOP;

Line 5868: -- Used PN_VAR_RENT_CALC_PKG.INV_END_DATE to find

5864: -- HISTORY :
5865: --
5866: -- 3.Nov.06 Ram Kumar o Created
5867: -- 02-APR-06 sdmahesh o Bug # 5962894
5868: -- Used PN_VAR_RENT_CALC_PKG.INV_END_DATE to find
5869: -- INV_END_DATE
5870: --------------------------------------------------------------------------------
5871:
5872: FUNCTION inv_sch_date(inv_start_date IN DATE

Line 5932: inv_end_date := pn_var_rent_calc_pkg.inv_end_date(inv_start_date,

5928: END LOOP;
5929:
5930: FOR rec_period_csr IN last_period_cur LOOP
5931:
5932: inv_end_date := pn_var_rent_calc_pkg.inv_end_date(inv_start_date,
5933: vr_id,
5934: rec_period_csr.period_id);
5935:
5936: END LOOP;

Line 5943: inv_end_date := pn_var_rent_calc_pkg.inv_end_date(inv_start_date,

5939: FOR rec IN period_cur LOOP
5940: IF(rec.period_id = p_period_id) THEN
5941: --
5942: FOR rec_first_prd IN first_period_cur LOOP
5943: inv_end_date := pn_var_rent_calc_pkg.inv_end_date(inv_start_date,
5944: vr_id,
5945: rec_first_prd.period_id);
5946: END LOOP;
5947: END IF;

Line 5953: NVL( ((ADD_MONTHS(pn_var_rent_calc_pkg.First_Day(inv_end_date),1)-1) + l_invg_day_of_month),

5949: END IF;
5950:
5951:
5952: inv_schedule_date :=
5953: NVL( ((ADD_MONTHS(pn_var_rent_calc_pkg.First_Day(inv_end_date),1)-1) + l_invg_day_of_month),
5954: (inv_end_date + nvl(l_invg_days_after,0)) );
5955:
5956: ------------------------------------------------------------
5957: -- takes care of the only 28 days for the schedule day

Line 5960: inv_schedule_date := (pn_var_rent_calc_pkg.First_Day(inv_schedule_date)+27);

5956: ------------------------------------------------------------
5957: -- takes care of the only 28 days for the schedule day
5958: ------------------------------------------------------------
5959: IF TO_NUMBER(TO_CHAR(inv_schedule_date,'dd')) in (29,30,31) THEN
5960: inv_schedule_date := (pn_var_rent_calc_pkg.First_Day(inv_schedule_date)+27);
5961: END IF;
5962: ------------------------------------------------------------
5963:
5964: RETURN inv_schedule_date;

Line 6380: -- pn_var_rent_calc_pkg.calculate_rent.

6376: -- HISTORY : Shabda. Set global variables g_calc_type and g_invoice_on.
6377: --
6378: -- dd-mon-yyyy name o Created
6379: -- 21-AUG-2008 acprakas o Bug#6849764. Modified to pass rec_get_per.period_id for period id while calling
6380: -- pn_var_rent_calc_pkg.calculate_rent.
6381: -- 15-JUN-2009 jsundara o Bug#6691869. Modified to skip the calculation of VRs having calculation method "Manual".
6382: -- 08-NOV-2010 jsundara o Bug#9765197. Modified cursor csr_get_vrent_wprop
6383: --------------------------------------------------------------------------------
6384: PROCEDURE process_rent_batch ( errbuf OUT NOCOPY VARCHAR2,

Line 6526: pnp_debug_pkg.log('pn_var_rent_calc_pkg.process_rent_batch (+)' );

6522: g_calc_type := p_calc_type;
6523: pnp_debug_pkg.log('g_invoice_on:'||g_invoice_on);
6524: pnp_debug_pkg.log('g_calc_type'||g_calc_type);
6525:
6526: pnp_debug_pkg.log('pn_var_rent_calc_pkg.process_rent_batch (+)' );
6527:
6528:
6529: fnd_message.set_name ('PN','PN_VRAM_PRM');
6530: fnd_message.set_token ('PT_NAME', p_property_name);

Line 6597: g_precision := nvl(pn_var_rent_calc_pkg.get_currency_precision(g_org_id),4);

6593: fnd_message.set_token ('VR_NUM',l_rent_num);
6594: pnp_debug_pkg.put_log_msg(fnd_message.get);
6595: ELSE
6596: g_invoice_on := NVL(p_invoice_on,l_invoice_on);
6597: g_precision := nvl(pn_var_rent_calc_pkg.get_currency_precision(g_org_id),4);
6598:
6599: fnd_message.set_name ('PN','PN_VRAM_VRN_PROC');
6600: fnd_message.set_token ('NUM',l_rent_num);
6601: pnp_debug_pkg.put_log_msg(fnd_message.get);

Line 6624: pn_var_rent_calc_pkg.calculate_rent

6620: pnp_debug_pkg.log ('process_rent_batch - period end date: '||rec_get_per.end_date);
6621:
6622:
6623:
6624: pn_var_rent_calc_pkg.calculate_rent
6625: (p_var_rent_id => l_var_rent_id
6626: ,p_period_id => rec_get_per.period_id); --Bug#6849764
6627:
6628: END LOOP;

Line 6651: pnp_debug_pkg.log('Error in pn_var_rent_calc_pkg.process_rent_batch :'||TO_CHAR(sqlcode)||' : '||sqlerrm);

6647: pnp_debug_pkg.log('++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++');
6648:
6649: EXCEPTION
6650: WHEN OTHERS THEN
6651: pnp_debug_pkg.log('Error in pn_var_rent_calc_pkg.process_rent_batch :'||TO_CHAR(sqlcode)||' : '||sqlerrm);
6652: Errbuf := SQLERRM;
6653: Retcode := 2;
6654: rollback;
6655: raise;

Line 6656: pnp_debug_pkg.log('pn_var_rent_calc_pkg.process_rent_batch (-) ');

6652: Errbuf := SQLERRM;
6653: Retcode := 2;
6654: rollback;
6655: raise;
6656: pnp_debug_pkg.log('pn_var_rent_calc_pkg.process_rent_batch (-) ');
6657:
6658: END process_rent_batch;
6659:
6660: FUNCTION END_BREAKPOINT(bkpt_start IN NUMBER, bkpt_end IN NUMBER) RETURN NUMBER IS

Line 6931: pn_var_rent_calc_pkg.first_year_bkpt(bkpts_rec.var_rent_id,

6927:
6928: ELSIF p_proration_rule IN('FY','FLY') AND l_first_period = 'Y'
6929: THEN
6930:
6931: pn_var_rent_calc_pkg.first_year_bkpt(bkpts_rec.var_rent_id,
6932: l_commencement_date,
6933: bkpts_rec.line_item_group_id,
6934: bkpts_rec.bkpt_rate,
6935: l_bkpt_start,

Line 6941: pn_var_rent_calc_pkg.last_year_bkpt( bkpts_rec.var_rent_id,

6937:
6938: ELSIF p_proration_rule IN('LY','FLY') AND l_last_period = 'Y'
6939: THEN
6940:
6941: pn_var_rent_calc_pkg.last_year_bkpt( bkpts_rec.var_rent_id,
6942: l_termination_date,
6943: bkpts_rec.line_item_group_id,
6944: bkpts_rec.bkpt_rate,
6945: l_bkpt_start,

Line 7040: pn_var_rent_calc_pkg.first_year_bkpt(bkpts_rec.var_rent_id,

7036:
7037: ELSIF p_proration_rule IN('FY','FLY') AND l_first_period = 'Y'
7038: THEN
7039:
7040: pn_var_rent_calc_pkg.first_year_bkpt(bkpts_rec.var_rent_id,
7041: l_commencement_date,
7042: bkpts_rec.line_item_group_id,
7043: bkpts_rec.bkpt_rate,
7044: l_bkpt_start,

Line 7050: pn_var_rent_calc_pkg.last_year_bkpt( bkpts_rec.var_rent_id,

7046:
7047: ELSIF p_proration_rule IN('LY','FLY') AND l_last_period = 'Y'
7048: THEN
7049:
7050: pn_var_rent_calc_pkg.last_year_bkpt( bkpts_rec.var_rent_id,
7051: l_termination_date,
7052: bkpts_rec.line_item_group_id,
7053: bkpts_rec.bkpt_rate,
7054: l_bkpt_start,

Line 7063: l_bkpt_end := pn_var_rent_calc_pkg.end_breakpoint(l_bkpt_start, l_bkpt_end);

7059: l_bkpt_end := bkpts_rec.ytd_group_vol_end;
7060:
7061: END IF;
7062:
7063: l_bkpt_end := pn_var_rent_calc_pkg.end_breakpoint(l_bkpt_start, l_bkpt_end);
7064:
7065: END LOOP;
7066:
7067: RETURN l_bkpt_end;

Line 7167: pn_var_rent_calc_pkg.first_year_bkpt(overage_rec.var_rent_id, l_commencement_date,

7163:
7164: IF p_proration_rule IN('FY','FLY') AND l_first_period = 'Y'
7165: THEN
7166:
7167: pn_var_rent_calc_pkg.first_year_bkpt(overage_rec.var_rent_id, l_commencement_date,
7168: overage_rec.line_item_group_id, overage_rec.bkpt_rate,
7169: l_bkpt_start, l_bkpt_end);
7170:
7171: l_applicable_sales := pn_var_rent_calc_pkg.first_year_sales( overage_rec.var_rent_id

Line 7171: l_applicable_sales := pn_var_rent_calc_pkg.first_year_sales( overage_rec.var_rent_id

7167: pn_var_rent_calc_pkg.first_year_bkpt(overage_rec.var_rent_id, l_commencement_date,
7168: overage_rec.line_item_group_id, overage_rec.bkpt_rate,
7169: l_bkpt_start, l_bkpt_end);
7170:
7171: l_applicable_sales := pn_var_rent_calc_pkg.first_year_sales( overage_rec.var_rent_id
7172: ,l_commencement_date
7173: ,overage_rec.line_item_group_id);
7174:
7175: ELSIF p_proration_rule IN('LY','FLY') AND l_last_period = 'Y'

Line 7178: pn_var_rent_calc_pkg.last_year_bkpt( overage_rec.var_rent_id, l_termination_date,

7174:
7175: ELSIF p_proration_rule IN('LY','FLY') AND l_last_period = 'Y'
7176: THEN
7177:
7178: pn_var_rent_calc_pkg.last_year_bkpt( overage_rec.var_rent_id, l_termination_date,
7179: overage_rec.line_item_group_id, overage_rec.bkpt_rate,
7180: l_bkpt_start, l_bkpt_end);
7181:
7182: l_applicable_sales := pn_var_rent_calc_pkg.last_year_sales( overage_rec.var_rent_id

Line 7182: l_applicable_sales := pn_var_rent_calc_pkg.last_year_sales( overage_rec.var_rent_id

7178: pn_var_rent_calc_pkg.last_year_bkpt( overage_rec.var_rent_id, l_termination_date,
7179: overage_rec.line_item_group_id, overage_rec.bkpt_rate,
7180: l_bkpt_start, l_bkpt_end);
7181:
7182: l_applicable_sales := pn_var_rent_calc_pkg.last_year_sales( overage_rec.var_rent_id
7183: ,l_termination_date
7184: ,overage_rec.line_item_group_id);
7185: ELSE
7186: FOR rec IN total_sales_C(overage_rec.trx_header_id) LOOP

Line 7557: l_applicable_sales := pn_var_rent_calc_pkg.first_year_sales( sales_rec.var_rent_id

7553:
7554: IF p_proration_rule IN('FY','FLY') AND l_first_period = 'Y'
7555: THEN
7556:
7557: l_applicable_sales := pn_var_rent_calc_pkg.first_year_sales( sales_rec.var_rent_id
7558: ,l_commencement_date
7559: ,sales_rec.line_item_group_id);
7560:
7561: ELSIF p_proration_rule IN('LY','FLY') AND l_last_period = 'Y'

Line 7564: l_applicable_sales := pn_var_rent_calc_pkg.last_year_sales( sales_rec.var_rent_id

7560:
7561: ELSIF p_proration_rule IN('LY','FLY') AND l_last_period = 'Y'
7562: THEN
7563:
7564: l_applicable_sales := pn_var_rent_calc_pkg.last_year_sales( sales_rec.var_rent_id
7565: ,l_termination_date
7566: ,sales_rec.line_item_group_id);
7567:
7568: ELSE

Line 7810: l_applicable_sales := pn_var_rent_calc_pkg.first_year_sales( sales_rec.var_rent_id

7806:
7807: IF p_proration_rule IN('FY','FLY') AND l_first_period = 'Y'
7808: THEN
7809:
7810: l_applicable_sales := pn_var_rent_calc_pkg.first_year_sales( sales_rec.var_rent_id
7811: ,l_commencement_date
7812: ,sales_rec.line_item_group_id);
7813:
7814: ELSIF p_proration_rule IN('LY','FLY') AND l_last_period = 'Y'

Line 7817: l_applicable_sales := pn_var_rent_calc_pkg.last_year_sales( sales_rec.var_rent_id

7813:
7814: ELSIF p_proration_rule IN('LY','FLY') AND l_last_period = 'Y'
7815: THEN
7816:
7817: l_applicable_sales := pn_var_rent_calc_pkg.last_year_sales( sales_rec.var_rent_id
7818: ,l_termination_date
7819: ,sales_rec.line_item_group_id);
7820:
7821: ELSE

Line 7925: pn_var_rent_calc_pkg.first_year_bkpt(bkpts_rec.var_rent_id,

7921:
7922: IF p_proration_rule IN('FY','FLY') AND l_first_period = 'Y'
7923: THEN
7924:
7925: pn_var_rent_calc_pkg.first_year_bkpt(bkpts_rec.var_rent_id,
7926: l_commencement_date,
7927: bkpts_rec.line_item_group_id,
7928: bkpts_rec.bkpt_rate,
7929: l_bkpt_start,

Line 7935: pn_var_rent_calc_pkg.last_year_bkpt( bkpts_rec.var_rent_id,

7931:
7932: ELSIF p_proration_rule IN('LY','FLY') AND l_last_period = 'Y'
7933: THEN
7934:
7935: pn_var_rent_calc_pkg.last_year_bkpt( bkpts_rec.var_rent_id,
7936: l_termination_date,
7937: bkpts_rec.line_item_group_id,
7938: bkpts_rec.bkpt_rate,
7939: l_bkpt_start,

Line 7962: IF p_proration_rule = pn_var_rent_calc_pkg.G_PRORUL_NP

7958:
7959: ELSIF (p_cumulative_vol = 'C')
7960: THEN
7961:
7962: IF p_proration_rule = pn_var_rent_calc_pkg.G_PRORUL_NP
7963: THEN
7964: l_bkpt_start := bkpts_rec.prorated_grp_vol_start;
7965: ELSE
7966: l_bkpt_start := bkpts_rec.blended_period_vol_start;

Line 8072: pn_var_rent_calc_pkg.first_year_bkpt(bkpts_rec.var_rent_id,

8068:
8069: IF p_proration_rule IN('FY','FLY') AND l_first_period = 'Y'
8070: THEN
8071:
8072: pn_var_rent_calc_pkg.first_year_bkpt(bkpts_rec.var_rent_id,
8073: l_commencement_date,
8074: bkpts_rec.line_item_group_id,
8075: bkpts_rec.bkpt_rate,
8076: l_bkpt_start,

Line 8082: pn_var_rent_calc_pkg.last_year_bkpt( bkpts_rec.var_rent_id,

8078:
8079: ELSIF p_proration_rule IN('LY','FLY') AND l_last_period = 'Y'
8080: THEN
8081:
8082: pn_var_rent_calc_pkg.last_year_bkpt( bkpts_rec.var_rent_id,
8083: l_termination_date,
8084: bkpts_rec.line_item_group_id,
8085: bkpts_rec.bkpt_rate,
8086: l_bkpt_start,

Line 8111: IF p_proration_rule = pn_var_rent_calc_pkg.G_PRORUL_NP

8107:
8108: ELSIF (p_cumulative_vol = 'C')
8109: THEN
8110:
8111: IF p_proration_rule = pn_var_rent_calc_pkg.G_PRORUL_NP
8112: THEN
8113: l_bkpt_start := bkpts_rec.prorated_grp_vol_start;
8114: l_bkpt_end := bkpts_rec.prorated_grp_vol_end;
8115: ELSE

Line 8123: l_bkpt_end := pn_var_rent_calc_pkg.end_breakpoint(l_bkpt_start, l_bkpt_end);

8119:
8120: END IF;
8121: END IF;
8122:
8123: l_bkpt_end := pn_var_rent_calc_pkg.end_breakpoint(l_bkpt_start, l_bkpt_end);
8124:
8125: END LOOP;
8126:
8127: RETURN l_bkpt_end;

Line 8204: pn_var_rent_calc_pkg.first_year_bkpt(bkpts_rec.var_rent_id,

8200:
8201: IF p_proration_rule IN('FY','FLY') AND l_first_period = 'Y'
8202: THEN
8203:
8204: pn_var_rent_calc_pkg.first_year_bkpt(bkpts_rec.var_rent_id,
8205: l_commencement_date,
8206: bkpts_rec.line_item_group_id,
8207: bkpts_rec.bkpt_rate,
8208: l_bkpt_start,

Line 8214: pn_var_rent_calc_pkg.last_year_bkpt( bkpts_rec.var_rent_id,

8210:
8211: ELSIF p_proration_rule IN('LY','FLY') AND l_last_period = 'Y'
8212: THEN
8213:
8214: pn_var_rent_calc_pkg.last_year_bkpt( bkpts_rec.var_rent_id,
8215: l_termination_date,
8216: bkpts_rec.line_item_group_id,
8217: bkpts_rec.bkpt_rate,
8218: l_bkpt_start,

Line 8315: pn_var_rent_calc_pkg.first_year_bkpt(bkpts_rec.var_rent_id,

8311:
8312: IF p_proration_rule IN('FY','FLY') AND l_first_period = 'Y'
8313: THEN
8314:
8315: pn_var_rent_calc_pkg.first_year_bkpt(bkpts_rec.var_rent_id,
8316: l_commencement_date,
8317: bkpts_rec.line_item_group_id,
8318: bkpts_rec.bkpt_rate,
8319: l_bkpt_start,

Line 8325: pn_var_rent_calc_pkg.last_year_bkpt( bkpts_rec.var_rent_id,

8321:
8322: ELSIF p_proration_rule IN('LY','FLY') AND l_last_period = 'Y'
8323: THEN
8324:
8325: pn_var_rent_calc_pkg.last_year_bkpt( bkpts_rec.var_rent_id,
8326: l_termination_date,
8327: bkpts_rec.line_item_group_id,
8328: bkpts_rec.bkpt_rate,
8329: l_bkpt_start,

Line 8346: l_bkpt_end := pn_var_rent_calc_pkg.end_breakpoint(l_bkpt_start, l_bkpt_end);

8342: l_bkpt_start := bkpts_rec.prorated_grp_vol_start;
8343: l_bkpt_end := bkpts_rec.prorated_grp_vol_end;
8344: END IF;
8345:
8346: l_bkpt_end := pn_var_rent_calc_pkg.end_breakpoint(l_bkpt_start, l_bkpt_end);
8347:
8348: END LOOP;
8349:
8350: RETURN l_bkpt_end;

Line 8774: p_trueup_bkpt_vol_end := pn_var_rent_calc_pkg.end_breakpoint(p_trueup_bkpt_vol_start, p_trueup_bkpt_vol_end);

8770: p_overage := 0;
8771: END IF;
8772: END IF;
8773:
8774: p_trueup_bkpt_vol_end := pn_var_rent_calc_pkg.end_breakpoint(p_trueup_bkpt_vol_start, p_trueup_bkpt_vol_end);
8775:
8776: p_trueup_bkpt_vol_start := round(p_trueup_bkpt_vol_start,2);
8777: p_trueup_bkpt_vol_end := round(p_trueup_bkpt_vol_end,2);
8778: p_trueup_volume := round(p_trueup_volume,2);

Line 10142: l_inv_end_dt := pn_var_rent_calc_pkg.inv_end_date(l_inv_st_dt

10138: FOR gd_rec IN grp_date_cur(l_prd_id,l_gd_id)LOOP
10139: l_inv_st_dt := gd_rec.inv_start_date;
10140: END LOOP;
10141:
10142: l_inv_end_dt := pn_var_rent_calc_pkg.inv_end_date(l_inv_st_dt
10143: ,l_vr_id
10144: ,l_prd_id
10145: );
10146:

Line 10452: /*l_inv_start_date := pn_var_rent_calc_pkg.inv_start_date(inv_start_date => inv_rec.invoice_date

10448:
10449: FOR inv_rec IN invoice_cur (p_var_rent_id)
10450: LOOP
10451:
10452: /*l_inv_start_date := pn_var_rent_calc_pkg.inv_start_date(inv_start_date => inv_rec.invoice_date
10453: ,vr_id => p_var_rent_id
10454: ,approved_status => 'N'); */
10455:
10456: l_payment_start_date := pn_var_rent_calc_pkg.inv_sch_date(inv_start_date => inv_rec.invoice_date

Line 10456: l_payment_start_date := pn_var_rent_calc_pkg.inv_sch_date(inv_start_date => inv_rec.invoice_date

10452: /*l_inv_start_date := pn_var_rent_calc_pkg.inv_start_date(inv_start_date => inv_rec.invoice_date
10453: ,vr_id => p_var_rent_id
10454: ,approved_status => 'N'); */
10455:
10456: l_payment_start_date := pn_var_rent_calc_pkg.inv_sch_date(inv_start_date => inv_rec.invoice_date
10457: ,vr_id => p_var_rent_id
10458: ,p_period_id => inv_rec.period_id);
10459:
10460: FOR rec IN invoice2upd_c ( p_var_rent_id

Line 10905: END pn_var_rent_calc_pkg;

10901: RETURN l_true_up;
10902:
10903: END true_up_header;
10904:
10905: END pn_var_rent_calc_pkg;
10906: