[Home] [Help]
271: SELECT GRP_DATE_ID,
272: GRP_START_DATE,
273: GRP_END_DATE,
274: ORG_ID
275: FROM pn_var_grp_dates_all
276: WHERE var_rent_id = p_var_rent_id;
277:
278:
279: CURSOR get_dates_frequency IS
365:
366: /*============================================================================+
367: -- NAME : INSERT_REPORT_DATE_ROW
368: -- DESCRIPTION : create records in the pn_var_report_dates table based on
369: -- values in pn_var_grp_dates_all
370: -- PURPOSE :
371: -- INVOKED FROM :
372: -- ARGUMENTS : IN:
373: -- X_ROWID
403: -- X_REPORT_DATE_ID
404: --
405: -- REFERENCE : PN_COMMON.debug()
406: -- NOTES : create records in the pn_var_report_dates table based on values
407: -- in pn_var_grp_dates_all
408: -- HISTORY :
409: --
410: -- 09-JAN-2006 Prabhakar o Created.
411: +=============================================================================*/
662: ) IS
663:
664: CURSOR C IS
665: SELECT ROWID
666: FROM PN_VAR_GRP_DATES_ALL
667: WHERE GRP_DATE_ID = X_GRP_DATE_ID;
668:
669: CURSOR org_id_cur IS
670: SELECT org_id
693: ELSE
694: l_org_id := X_ORG_ID;
695: END IF;
696:
697: INSERT INTO PN_VAR_GRP_DATES_ALL
698: (
699: GRP_DATE_ID,
700: LAST_UPDATE_DATE,
701: LAST_UPDATED_BY,
793: pnp_debug_pkg.debug ('PN_VAR_RENT_PKG.DELETE_GRP_DATE_ROW (+)');
794:
795: l_date := NVL(x_term_date,(TO_DATE('01/01/1776','mm/dd/yyyy')));
796:
797: DELETE FROM PN_VAR_GRP_DATES_ALL
798: WHERE VAR_RENT_ID = X_VAR_RENT_ID
799: AND GRP_START_DATE > l_date
800: AND GRP_END_DATE > l_date;
801:
1021:
1022: /* Fetches the group id which starts on a specified date for a VR agreement */
1023: CURSOR group_cur (p_start_date DATE) IS
1024: SELECT grp_end_date, grp_date_id
1025: FROM pn_var_grp_dates_all
1026: WHERE var_rent_id = p_var_rent_id
1027: AND grp_start_date = p_start_date;
1028:
1029: /* Fetches the period id which starts on a specified date for a VR agreement */
1035:
1036: /* Fetches the group id in which a specified invoice date lies for a VR agreement */
1037: CURSOR invoice_cur(p_inv_start_date DATE, p_inv_end_date DATE, p_period_id NUMBER) IS
1038: SELECT inv_start_date, inv_end_date
1039: FROM pn_var_grp_dates_all
1040: WHERE inv_start_date = p_inv_start_date
1041: AND inv_end_date = p_inv_end_date
1042: AND period_id = p_period_id;
1043:
1410: pnp_debug_pkg.debug ('updating end date as '||p_grp_end_date);
1411: pnp_debug_pkg.debug ('updating proration factor as '||p_proration_factor);
1412: pnp_debug_pkg.debug ('updating due date as '||p_due_date);
1413: /* Updte the end date and proration factor for the group */
1414: UPDATE pn_var_grp_dates_all
1415: SET grp_end_date = p_grp_end_date,
1416: proration_Factor = round(p_proration_factor,10),
1417: reptg_due_date = p_due_date --Bug # 5937888
1418: WHERE grp_date_id = l_grp_date_id;
1517: pnp_debug_pkg.debug ('updating end date as '||p_grp_end_date);
1518: pnp_debug_pkg.debug ('updating proration factor as '||p_proration_factor);
1519: pnp_debug_pkg.debug ('updating due date as '||p_due_date);
1520: /* Updte the end date and proration factor for the group */
1521: UPDATE pn_var_grp_dates_all
1522: SET grp_end_date = p_grp_end_date,
1523: proration_Factor = round(p_proration_factor,10),
1524: reptg_due_date = p_due_date --Bug # 5937888
1525: WHERE grp_date_id = l_grp_date_id;
1626: pnp_debug_pkg.debug ('updating end date as '||p_grp_end_date);
1627: pnp_debug_pkg.debug ('updating proration factor as '||p_proration_factor);
1628: pnp_debug_pkg.debug ('updating due date as '||p_due_date);
1629: /* Updte the end date and proration factor for the group */
1630: UPDATE pn_var_grp_dates_all
1631: SET grp_end_date = p_grp_end_date,
1632: proration_Factor = round(p_proration_factor,10),
1633: reptg_due_date = p_due_date --Bug # 5937888
1634: WHERE grp_date_id = l_grp_date_id;
1734: pnp_debug_pkg.debug ('updating end date as '||p_grp_end_date);
1735: pnp_debug_pkg.debug ('updating proration factor as '||p_proration_factor);
1736: pnp_debug_pkg.debug ('updating due date as '||p_due_date);
1737: /* Updte the end date and proration factor for the group */
1738: UPDATE pn_var_grp_dates_all
1739: SET grp_end_date = p_grp_end_date,
1740: proration_Factor = round(p_proration_factor,10),
1741: reptg_due_date = p_due_date --Bug # 5937888
1742: WHERE grp_date_id = l_grp_date_id;
2198:
2199: /* Fetches the group id which starts on a specified date for a VR agreement */
2200: CURSOR group_cur (p_start_date DATE) IS
2201: SELECT grp_end_date, grp_date_id
2202: FROM pn_var_grp_dates_all
2203: WHERE var_rent_id = p_var_rent_id
2204: AND grp_start_date = p_start_date;
2205:
2206: /* Fetches the period id which starts on a specified date for a VR agreement */
2605: pnp_debug_pkg.debug ('updating proration factor as '||l_proration_Factor);
2606: pnp_debug_pkg.debug ('updating due date of group '||VR_grp_dates(j).l_reptg_due_date);
2607: /* Updte the end date and proration factor for the group */
2608:
2609: UPDATE pn_var_grp_dates_all
2610: SET grp_end_date = VR_grp_dates(j).l_grp_end_date,
2611: proration_Factor = round(l_proration_Factor,10),
2612: reptg_due_date = VR_grp_dates(j).l_reptg_due_date --Bug # 5937888
2613: WHERE grp_date_id = l_grp_date_id;
2884: -- updated with the new proration factor after lease contraction
2885:
2886: SELECT grp.grp_start_date
2887: INTO p_grp_start_date
2888: FROM pn_var_grp_dates_all grp
2889: WHERE grp.var_rent_id = p_var_rent_id
2890: AND grp.grp_start_date <= p_term_date
2891: AND grp.grp_end_date >= p_term_date
2892: AND rownum < 2;
2931: END IF;
2932:
2933: --call to update PN_VAR_GRP_DATES;
2934:
2935: UPDATE pn_var_grp_dates_all
2936: SET grp_end_date = p_term_date,
2937: proration_factor = round(p_proration_factor,10),
2938: last_update_date = p_last_update_date,
2939: last_updated_by = p_last_updated_by,
4300: pnp_debug_pkg.debug ('PN_VAR_RENT_PKG.FIND_REPORTING_PERIODS (+)');
4301:
4302: SELECT count(GRP_START_DATE)
4303: INTO l_reporting_periods
4304: FROM pn_var_grp_dates_all
4305: WHERE period_id = p_period_id;
4306:
4307: RETURN l_reporting_periods;
4308:
4533: invoice_date,
4534: inv_schedule_date,
4535: forecasted_exp_code
4536: INTO l_grp_date_info
4537: FROM pn_var_grp_dates_all
4538: WHERE var_rent_id = p_var_rent_id
4539: AND period_id = p_period_id
4540: AND grp_start_date <= p_start_date
4541: AND grp_start_date <= p_end_date
4603: (g2.grp_end_date-g2.grp_start_date)+1 last_group_pro_days,
4604: g2.proration_factor last_group_gl_days
4605: INTO l_proration_factor
4606: FROM pn_var_periods_ALL p1, pn_var_periods_ALL p2,
4607: pn_var_grp_dates_ALL g1, pn_var_grp_dates_ALL g2
4608: WHERE p1.var_rent_id = p2.var_rent_id
4609: AND p1.var_rent_id = p_var_rent_id
4610: AND g1.var_rent_id = g2.var_rent_id
4611: AND g1.var_rent_id = p_var_rent_id
4792: SELECT 1
4793: INTO l_exported
4794: FROM dual
4795: WHERE EXISTS ( SELECT grp_date_id
4796: FROM pn_var_grp_dates_all
4797: WHERE var_rent_id = p_id
4798: AND (actual_exp_code = 'Y' OR
4799: forecasted_exp_code = 'Y')
4800: );
4804: SELECT 1
4805: INTO l_exported
4806: FROM dual
4807: WHERE EXISTS ( SELECT grp_date_id
4808: FROM pn_var_grp_dates_all
4809: WHERE period_id = p_id
4810: AND (actual_exp_code = 'Y' OR
4811: forecasted_exp_code = 'Y')
4812: );
4816: SELECT 1
4817: INTO l_exported
4818: FROM dual
4819: WHERE EXISTS ( SELECT grp_date_id
4820: FROM pn_var_grp_dates_all
4821: WHERE period_id IN (SELECT period_id
4822: FROM pn_var_lines_ALL
4823: WHERE line_item_id = p_id)
4824: AND (actual_exp_code = 'Y' OR
4830: SELECT 1
4831: INTO l_exported
4832: FROM dual
4833: WHERE EXISTS ( SELECT grp_date_id
4834: FROM pn_var_grp_dates_all
4835: WHERE period_id IN (SELECT period_id
4836: FROM pn_var_lines_ALL
4837: WHERE line_default_id = p_id)
4838: AND (actual_exp_code = 'Y' OR
4843: SELECT 1
4844: INTO l_exported
4845: FROM dual
4846: WHERE EXISTS ( SELECT grp_date_id
4847: FROM pn_var_grp_dates_all a,
4848: pn_var_periods_all b,
4849: pn_var_lines_all c
4850: WHERE a.period_id = b.period_id
4851: AND b.period_id = c.period_id
4993: INTO l_status
4994: FROM dual
4995: WHERE NOT EXISTS
4996: (SELECT grp_date_id
4997: FROM pn_var_grp_dates_all
4998: WHERE period_id = p_period_id
4999: AND ((actual_exp_code = 'N' AND FORECASTED_exp_code ='N' AND variance_exp_code = 'N') OR
5000: (actual_exp_code = 'N' AND FORECASTED_exp_code ='Y' AND variance_exp_code = 'Y')
5001: )
5021: SELECT 'RECONCILED'
5022: INTO l_status
5023: FROM dual
5024: WHERE NOT EXISTS(SELECT grp_date_id
5025: FROM pn_var_grp_dates_all
5026: WHERE period_id = p_period_id
5027: AND variance_exp_code = 'N')
5028: AND NOT EXISTS(SELECT vol_hist_id
5029: FROM pn_var_vol_hist_all
5282: FROM pn_var_vol_hist_all vh
5283: WHERE actual_exp_code = 'N'
5284: AND period_id = p_period_id
5285: AND EXISTS (SELECT grp.grp_date_id
5286: FROM pn_var_grp_dates_all grp
5287: WHERE actual_exp_code = 'Y'
5288: AND grp.grp_date_id = vh.grp_date_id));
5289:
5290: ELSIF p_invoice_on = 'FORECASTED' THEN
5296: FROM pn_var_vol_hist_all vh
5297: WHERE forecasted_exp_code = 'N'
5298: AND period_id = p_period_id
5299: AND EXISTS (SELECT grp.grp_date_id
5300: FROM pn_var_grp_dates_all grp
5301: WHERE forecasted_exp_code = 'Y'
5302: AND grp.grp_date_id = vh.grp_date_id));
5303:
5304: END IF;
6557:
6558: CURSOR pn_var_grp_dates_cur
6559: IS
6560: SELECT *
6561: FROM pn_var_grp_dates_all
6562: WHERE period_id = p_period_id
6563: ORDER BY grp_start_date;
6564:
6565: v_inv_dates_tbl group_dates_tbl;
6856: put_log(' Group Date While Updating Group Dates:'||vr_grp_dates(i).l_group_date);
6857: --vr_grp_dates(i).l_proration_factor := 1;
6858: END IF;
6859:
6860: UPDATE pn_var_grp_dates_all
6861: SET grp_end_date = vr_grp_dates(i).l_grp_end_date ,
6862: proration_factor = round(vr_grp_dates(i).l_proration_factor,10), --Chris.T. 20MAY2004
6863: last_update_date = sysdate,
6864: last_updated_by = FND_GLOBAL.USER_ID,
7877: WHERE var_rent_id = p_var_rent_id);
7878:
7879: DELETE pn_var_rent_summ_all
7880: WHERE grp_date_id IN (SELECT grp_date_id
7881: FROM pn_var_grp_dates_all
7882: WHERE var_rent_id = p_var_rent_id
7883: AND grp_start_date > p_new_termn_date);
7884:
7885: DELETE pn_var_constraints_all
8120: ELSE
8121:
8122: pnp_debug_pkg.debug ('deleting group date and periods ...');
8123: /* Delete group dates and periods for which there exists no invoice */
8124: DELETE pn_var_grp_dates_all
8125: WHERE period_id = period_rec.period_id;
8126:
8127: DELETE pn_var_periods_all
8128: WHERE period_id = period_rec.period_id;
8300: inv_end_date,
8301: group_date,
8302: invoice_date,
8303: period_id
8304: FROM pn_var_grp_dates_all
8305: WHERE var_rent_id = p_var_rent_id
8306: AND p_new_termn_date BETWEEN grp_start_date AND grp_end_date;
8307:
8308: /* Get the details of breakpoint header default */
8337:
8338: /* Get the max invoice end date corresponding to the new termination date*/
8339: CURSOR inv_end_dt_cur(p_var_rent_id IN NUMBER) IS
8340: SELECT max(inv_end_date) inv_end_date
8341: FROM pn_var_grp_dates_all
8342: WHERE var_rent_id = p_var_rent_id
8343: AND inv_end_date <= p_new_termn_date;
8344:
8345: l_reptg_day_of_month NUMBER := 0;
8407: /*l_inv_sch_date := pn_var_rent_calc_pkg.inv_sch_date( inv_start_date => l_invoice_date
8408: ,vr_id => p_var_rent_id
8409: ,p_period_id => l_period_id);*/
8410:
8411: UPDATE pn_var_grp_dates_all
8412: SET grp_end_date = p_new_termn_date,
8413: proration_factor = round(l_proration_factor,10),
8414: reptg_due_date = l_due_date
8415: WHERE var_rent_id = p_var_rent_id
8427: l_inv_sch_date := pn_var_rent_calc_pkg.inv_sch_date( inv_start_date => l_invoice_date
8428: ,vr_id => p_var_rent_id
8429: ,p_period_id => l_period_id);
8430:
8431: UPDATE pn_var_grp_dates_all
8432: SET inv_end_date = p_new_termn_date,
8433: inv_schedule_date = l_inv_sch_date
8434: WHERE var_rent_id = p_var_rent_id
8435: AND p_new_termn_date BETWEEN inv_start_date AND inv_end_date;
8771: WHERE var_rent_id = p_var_rent_id);
8772:
8773: DELETE pn_var_rent_summ_all
8774: WHERE grp_date_id IN (SELECT grp_date_id
8775: FROM pn_var_grp_dates_all
8776: WHERE var_rent_id = p_var_rent_id);
8777:
8778: DELETE pn_var_constraints_all
8779: WHERE period_id IN (SELECT period_id
8806:
8807: DELETE pn_var_rent_inv_all
8808: WHERE var_rent_id = p_var_rent_id;
8809:
8810: DELETE pn_var_grp_dates_all
8811: WHERE var_rent_id = p_var_rent_id;
8812:
8813: DELETE pn_var_periods_all
8814: WHERE var_rent_id = p_var_rent_id;
8904:
8905: /* Get the max invoice end date corresponding to the new termination date*/
8906: CURSOR inv_end_dt_cur(p_var_rent_id IN NUMBER) IS
8907: SELECT max(inv_end_date) inv_end_date
8908: FROM pn_var_grp_dates_all
8909: WHERE var_rent_id = p_var_rent_id
8910: AND inv_end_date <= p_new_termn_date;
8911:
8912: BEGIN