[Home] [Help]
286: 'QTR', 3,
287: 'SA', 6,
288: 'YR', 12,
289: null) group_frequency
290: FROM pn_var_rent_dates_all
291: WHERE var_rent_id = p_var_rent_id;
292:
293:
294: p_creation_date DATE := SYSDATE;
1109: p_period_type,
1110: l_use_gl_calendar,
1111: l_year_start_date,
1112: l_org_id
1113: FROM PN_VAR_RENTS_ALL vr, PN_VAR_RENT_DATES_ALL cal
1114: WHERE vr.var_rent_id = p_var_rent_id
1115: AND cal.var_rent_id = vr.var_rent_id;
1116:
1117: ----------------------------------
2252: l_invg_freq_code,
2253: l_invg_day_of_month,
2254: l_invg_days_after,
2255: l_org_id
2256: FROM PN_VAR_RENTS_ALL VR, PN_VAR_RENT_DATES_ALL CAL
2257: WHERE VR.var_rent_id = p_var_rent_id
2258: AND CAL.var_rent_id = VR.var_rent_id;
2259:
2260: -- generate periods
2862: 'SA', 6,
2863: 'YR', 12,
2864: null)
2865: INTO p_reptg_freq_code
2866: FROM PN_VAR_RENT_DATES_ALL cal
2867: WHERE cal.var_rent_id = p_var_rent_id;
2868:
2869: -- Get period start date for the last period which has to be
2870: -- updated with the new proration factor after lease contraction
3682: SELECT 1
3683: INTO l_vrdates_exists
3684: FROM dual
3685: WHERE EXISTS ( SELECT dates.var_rent_date_id
3686: FROM pn_var_rent_dates_ALL dates
3687: WHERE dates.var_rent_id = p_var_rent_id);
3688:
3689: RETURN l_vrdates_exists;
3690:
6316: Order by start_date ;
6317:
6318: CURSOR var_rent_dates_cur IS
6319: SELECT *
6320: FROM pn_var_rent_dates_all
6321: WHERE var_rent_id = p_var_rent_id ;
6322:
6323: l_row_found BOOLEAN := FALSE;
6324: l_index NUMBER := 0;
6481: | last partial period are not being prorated. We prorate for the first partial period,
6482: | but use a annual breakpoint in the last period.
6483: |
6484: +===========================================================================*/
6485: PROCEDURE extend_group_dates (p_pn_var_rent_dates_rec IN PN_VAR_RENT_DATES_ALL%ROWTYPE,
6486: p_period_id IN NUMBER,
6487: x_return_status OUT NOCOPY VARCHAR2,
6488: x_return_message OUT NOCOPY VARCHAR2)
6489: IS
6615: WHERE var_rent_id = p_pn_var_rent_dates_rec.var_rent_id;
6616:
6617: SELECT year_start_date
6618: INTO l_year_st_date
6619: FROM pn_var_rent_dates_all
6620: WHERE var_rent_id = p_pn_var_rent_dates_rec.var_rent_id;
6621:
6622: IF p_pn_var_rent_dates_rec.invg_freq_code = 'MON' THEN
6623: l_invg_freq_code := 1;
7110: END LOOP;
7111: RETURN l_proration_rule;
7112: END;
7113:
7114: PROCEDURE generate_cal_periods_tbl(p_var_rent_dates_rec IN PN_VAR_RENT_DATES_ALL%ROWTYPE,
7115: p_start_date IN DATE,
7116: p_end_date IN DATE,
7117: p_extension_end_date IN DATE,
7118: x_cal_periods_tbl OUT NOCOPY cal_periods_tbl)
7170: END IF;
7171: -- end if of use_gl_calendar
7172: END generate_cal_periods_tbl;
7173:
7174: PROCEDURE generate_group_inv_tbl ( p_pn_var_rent_dates_rec IN pn_var_rent_dates_all%rowtype,
7175: p_period_start_date IN DATE,
7176: p_period_end_date IN DATE,
7177: x_group_dates_tbl OUT NOCOPY group_dates_tbl,
7178: x_inv_dates_tbl OUT NOCOPY group_dates_tbl)
7768: +===========================================================================*/
7769: FUNCTION DETERMINE_FREQUENCY (
7770: X_VAR_RENT_START_DATE IN PN_VAR_RENTS_ALL.COMMENCEMENT_DATE%TYPE
7771: ,X_VAR_RENT_END_DATE IN PN_VAR_RENTS_ALL.TERMINATION_DATE%TYPE
7772: ) RETURN PN_VAR_RENT_DATES_ALL.REPTG_FREQ_CODE%TYPE
7773: is
7774:
7775: l_days NUMBER;
7776: l_freq_code PN_VAR_RENT_DATES_ALL.REPTG_FREQ_CODE%TYPE;
7772: ) RETURN PN_VAR_RENT_DATES_ALL.REPTG_FREQ_CODE%TYPE
7773: is
7774:
7775: l_days NUMBER;
7776: l_freq_code PN_VAR_RENT_DATES_ALL.REPTG_FREQ_CODE%TYPE;
7777:
7778: BEGIN
7779:
7780: pnp_debug_pkg.debug ('PN_VAR_RENT_PKG.DETERMINE_FREQUENCY (+)');
8296: 'QTR', 3,
8297: 'SA', 6,
8298: 'YR', 12,
8299: NULL) reptg_freq_code
8300: FROM pn_var_rents_all vr, pn_var_rent_dates_all cal
8301: WHERE vr.var_rent_id = p_var_rent_id
8302: AND cal.var_rent_id = vr.var_rent_id;
8303:
8304: /* Get the details of grp dates for group in which the new termination date falls */
9875: , pvr.proration_rule
9876: , pvd.use_gl_calendar
9877: , pvd.year_start_date
9878: , pvr.commencement_date
9879: FROM pn_var_rents_all pvr, pn_var_rent_dates_all pvd
9880: WHERE pvr.lease_id = NVL (p_lease_id, pvr.lease_id)
9881: AND pvr.var_rent_id = NVL (p_var_rent_id, pvr.var_rent_id)
9882: AND pvr.termination_date = p_old_termn_date
9883: AND pvd.var_rent_id = pvr.var_rent_id;