[Home] [Help]
706: l_norm_str_dt := p_norm_str_dt;
707:
708: /* If Retro is enabled - we need correct p_norm_start_date to be passed to
709: PN_NORM_RENORM_PKG.NORMALIZE_RENORMALIZE procedure. AMT-RETRO */
710: IF NOT PNP_UTIL_FUNC.RETRO_ENABLED THEN
711: OPEN csr_first_draft_sch(g_lease_id, p_norm_str_dt);
712: FETCH csr_first_draft_sch INTO l_first_draft_sch;
713: CLOSE csr_first_draft_sch;
714:
801:
802: */
803:
804: /* AMT-RETRO */
805: IF NOT PNP_UTIL_FUNC.RETRO_ENABLED THEN
806: OPEN csr_last_app_sch (g_lease_id, l_comm_dt);
807: FETCH csr_last_app_sch INTO l_last_app_sch;
808: CLOSE csr_last_app_sch;
809:
2324: FOR i IN (p_counter + 1) .. p_no_sch
2325: LOOP
2326:
2327: /* AMT-RETRO */
2328: IF NOT PNP_UTIL_FUNC.RETRO_ENABLED THEN
2329: create_schedule(g_lease_id, p_lease_change_id, l_sch_dt, l_sch_id, l_pymnt_st_lkp_cd,p_payment_term_id);
2330: ELSE
2331: PN_RETRO_ADJUSTMENT_PKG.find_schedule(g_lease_id,
2332: p_lease_change_id,
2546: IF p_pay_trm_typ_code = 'PRE' AND l_pre_pay_flag = 'N'
2547: AND (l_sch_dt = l_pro_sch_dt) THEN
2548:
2549: /* AMT-RETRO */
2550: IF NOT PNP_UTIL_FUNC.RETRO_ENABLED THEN
2551: create_schedule(g_lease_id, p_lease_change_id, p_trgt_dt, l_sch_id, l_pymnt_st_lkp_cd);
2552: ELSE
2553: PN_RETRO_ADJUSTMENT_PKG.find_schedule(g_lease_id,
2554: p_lease_change_id,
2635:
2636: IF NVL(p_normalize_flag,'N') = 'Y' THEN
2637:
2638: /* AMT-RETRO */
2639: IF NOT PNP_UTIL_FUNC.RETRO_ENABLED THEN
2640: create_normalize_items(p_lease_context => p_lease_context,
2641: p_lease_id => g_lease_id,
2642: p_term_id => p_payment_term_id,
2643: p_vendor_id => p_vendor_id,
3417:
3418: l_norm_str_dt := NVL(con_cur.norm_start_date, Get_First_Item_Date(con_cur.payment_term_id));
3419:
3420: /* AMT-RETRO */
3421: IF NOT PNP_UTIL_FUNC.RETRO_ENABLED THEN
3422: create_normalize_items(p_lease_context => p_lease_context,
3423: p_lease_id => p_lease_id,
3424: p_term_id => con_cur.payment_term_id,
3425: p_vendor_id => con_cur.vendor_id,
3505: l_old_lea_term_dt DATE;
3506: l_norm_str_dt DATE;
3507: l_active_lease_change_id pn_lease_details.lease_change_id%TYPE;
3508: l_norm_trm_exsts BOOLEAN := FALSE;
3509: l_item_end_dt_tbl pnp_util_func.item_end_dt_tbl_type;
3510: i NUMBER;
3511: l_max_item_end_dt DATE := TO_DATE('01/01/0001', 'MM/DD/YYYY');
3512: l_ri_end_dt DATE := TO_DATE('01/01/0001', 'MM/DD/YYYY');
3513: l_term_end_dt DATE := NULL;
3534: OPEN get_old_lea_term_dt;
3535: FETCH get_old_lea_term_dt INTO l_old_lea_term_dt;
3536: CLOSE get_old_lea_term_dt;
3537:
3538: l_item_end_dt_tbl := pnp_util_func.fetch_item_end_dates(p_lease_id);
3539:
3540: /* Call the index rent contraction routine */
3541:
3542: FOR i IN 1 .. l_item_end_dt_tbl.COUNT LOOP
3577: ,p_msg => l_msg
3578: ,p_cutoff_date => NULL
3579: ,p_term_end_dt => l_term_end_dt);
3580:
3581: l_norm_trm_exsts := pnp_util_func.norm_trm_exsts(p_lease_id);
3582: IF l_norm_trm_exsts THEN
3583: FOR i IN 1 .. l_item_end_dt_tbl.COUNT LOOP
3584: IF l_item_end_dt_tbl(i).index_period_id IS NULL THEN
3585: l_item_end_dt_tbl(i).item_end_dt := p_new_lea_term_dt;
4103: l_sch_dt := TO_DATE(TO_CHAR(l_payment_term_rec.schedule_day)||'/'
4104: ||TO_CHAR(ADD_MONTHS(l_old_lea_term_dt,1),'MM/YYYY'),
4105: 'DD/MM/YYYY');
4106:
4107: IF NOT PNP_UTIL_FUNC.RETRO_ENABLED THEN
4108: OPEN csr_first_draft_sch(g_lease_id, l_norm_str_dt);
4109: FETCH csr_first_draft_sch INTO l_first_draft_sch;
4110: CLOSE csr_first_draft_sch;
4111:
4116: END IF;
4117: END IF;
4118:
4119: /* AMT-RETRO */
4120: IF NOT PNP_UTIL_FUNC.RETRO_ENABLED THEN
4121: create_normalize_items(p_lease_context => p_lease_context,
4122: p_lease_id => g_lease_id,
4123: p_term_id => l_payment_term_rec.payment_term_id,
4124: p_vendor_id => l_payment_term_rec.vendor_id,
4712: l_norm_str_dt := NVL(pay_term_con_cur.norm_start_date,
4713: Get_First_Item_Date(pay_term_con_cur.payment_term_id));
4714:
4715: /* AMT-RETRO */
4716: IF NOT PNP_UTIL_FUNC.RETRO_ENABLED THEN
4717: create_normalize_items(p_lease_context => p_lease_context,
4718: p_lease_id => p_lease_id,
4719: p_term_id => pay_term_con_cur.payment_term_id,
4720: p_vendor_id => pay_term_con_cur.vendor_id,
5217: FOR i IN (l_counter + 1) .. l_no_sch
5218: LOOP
5219: pnp_debug_pkg.log('EXTEND_PAYMENT_TERM - Calling create schedule ');
5220: /* AMT-RETRO */
5221: IF NOT PNP_UTIL_FUNC.RETRO_ENABLED THEN
5222: create_schedule(p_payment_term_rec.lease_id,
5223: p_payment_term_rec.lease_change_id,
5224: l_sch_dt,
5225: l_sch_id,
5299: l_cash_est_amt := NULL;
5300: END IF;
5301:
5302: l_rec_found := FALSE;
5303: IF NOT PNP_UTIL_FUNC.RETRO_ENABLED THEN
5304:
5305: pnp_debug_pkg.log('Retro not enabled... ');
5306: FOR existing_items_rec in existing_payment_item_cur(l_sch_id) LOOP
5307: l_rec_found := TRUE;
5624: l_rollover_mode := NULL;
5625: l_schd_day := NULL;
5626: l_schd_date := NULL;
5627: l_payment_term_start_date := l_payment_term_rec.end_date + 1;
5628: IF PNP_UTIL_FUNC.RETRO_ENABLED THEN
5629: IF NVL(l_payment_term_rec.normalize,'N')= 'Y' THEN
5630:
5631: pnp_debug_pkg.log('ROLLOVER - Calling create payment term ..');
5632: l_payment_term_rec.lease_change_id := l_lease_change_id;
7147: IF l_lease_context = 'CON' AND p_called_from = 'MAIN' THEN
7148:
7149: pnp_debug_pkg.log('schedules_items - Contraction +Start+ (+)');
7150: IF NVL(fnd_profile.value('PN_ERLY_TMNT_B4_LST_APP_SCHD'),'N') = 'Y' THEN
7151: IF NOT pnp_util_func.mini_retro_enabled THEN
7152: contraction(p_lease_id => p_lease_id,
7153: p_lease_context => l_lease_context,
7154: p_new_lea_term_dt => g_new_lea_term_dt,
7155: p_new_lea_comm_dt => g_new_lea_comm_dt,
7231: ELSIF l_lease_context = 'CONTERM' AND p_called_from = 'MAIN' THEN
7232:
7233: pnp_debug_pkg.log('schedules_items - Payment Term Contraction +Start+ (+)');
7234: IF NVL(fnd_profile.value('PN_ERLY_TMNT_B4_LST_APP_SCHD'),'N') = 'Y' THEN
7235: IF NOT pnp_util_func.mini_retro_enabled THEN
7236: contract_pay_term(p_lease_id => p_lease_id,
7237: p_lease_context => l_lease_context,
7238: p_new_lea_term_dt => g_new_lea_term_dt,
7239: p_new_lea_comm_dt => g_new_lea_comm_dt,
7269:
7270: -- Retro Start
7271: ELSIF l_lease_context = 'ADJ' AND p_called_from = 'MAIN' THEN
7272:
7273: IF pnp_util_func.retro_enabled THEN
7274:
7275: pnp_debug_pkg.log('schedules_items - Term Adjustment +Start+ (+)');
7276:
7277: term_id_tab.delete;
7315: /* Generate the rent normalization report */
7316: Norm_Report(l_lease_context);
7317:
7318: -- Retro Start
7319: IF pnp_util_func.retro_enabled = TRUE THEN
7320: retro_rec_impact_report;
7321: retro_vr_impact_report;
7322: END IF;
7323: -- Retro End