[Home] [Help]
232: l_rec_calc_period_id pn_rec_calc_periods_all.rec_calc_period_id%TYPE;
233:
234: BEGIN
235:
236: pnp_debug_pkg.log('PN_REC_CALC_PKG.CALCULATE_REC_AMOUNT_BATCH (+) ');
237:
238: l_start_date := TRUNC(fnd_date.canonical_to_date(p_calc_period_startdate));
239: l_end_date := TRUNC(fnd_date.canonical_to_date(p_calc_period_enddate));
240: l_as_of_date := TRUNC(fnd_date.canonical_to_date(p_as_ofdate));
259: fnd_message.set_token ('PROP_NAME',p_property_name);
260: fnd_message.set_token ('CUST_NAME',p_customer_name);
261: fnd_message.set_token ('CUST_SITE',p_customer_site);
262: fnd_message.set_token ('PRD_END',l_calc_period_ending);
263: pnp_debug_pkg.put_log_msg(fnd_message.get);
264:
265: /* PL/SQL Tables to cache term templates which are lazy upgraded for E-Tax*/
266: template_name_tbl.DELETE;
267: template_id_tbl.DELETE;
272: */
273: IF p_org_id is NOT NULL THEN
274: pn_mo_cache_utils.fnd_req_set_org_id (p_org_id);
275: /* uncomment to debug
276: pnp_debug_pkg.log('Set the org id with value:' || to_char(pn_mo_cache_utils.get_current_org_id)); */
277: END IF;
278:
279: IF ((p_rec_agreement_id IS NOT NULL)
280: or (p_lease_id IS NOT NULL)
409: END LOOP;
410:
411: fnd_message.set_name ('PN','PN_RECALC_AGR_PROC');
412: fnd_message.set_token ('NUM', l_processed);
413: pnp_debug_pkg.put_log_msg(fnd_message.get);
414:
415: fnd_message.set_name ('PN','PN_RECALC_AGR_SUC');
416: fnd_message.set_token ('NUM', l_success_count);
417: pnp_debug_pkg.put_log_msg(fnd_message.get);
413: pnp_debug_pkg.put_log_msg(fnd_message.get);
414:
415: fnd_message.set_name ('PN','PN_RECALC_AGR_SUC');
416: fnd_message.set_token ('NUM', l_success_count);
417: pnp_debug_pkg.put_log_msg(fnd_message.get);
418:
419: fnd_message.set_name ('PN','PN_RECALC_AGR_FAIL');
420: fnd_message.set_token ('NUM', l_fail_count);
421: pnp_debug_pkg.put_log_msg(fnd_message.get);
417: pnp_debug_pkg.put_log_msg(fnd_message.get);
418:
419: fnd_message.set_name ('PN','PN_RECALC_AGR_FAIL');
420: fnd_message.set_token ('NUM', l_fail_count);
421: pnp_debug_pkg.put_log_msg(fnd_message.get);
422:
423: IF calc_rec_amount_wloc_prop%ISOPEN THEN
424: CLOSE calc_rec_amount_wloc_prop;
425: ELSIF calc_rec_amount_wloc%ISOPEN THEN
434: END IF;
435:
436: /*Logging information for upgraded Term Templates*/
437: FOR i IN 1 .. template_id_tbl.COUNT LOOP
438: pnp_debug_pkg.put_log_msg('Term template '||template_name_tbl(i)||
439: ' has an existing tax code or tax group.A corresponding tax classification will replace it');
440: END LOOP;
441:
442: pnp_debug_pkg.log('PN_REC_CALC_PKG.CALCULATE_REC_AMOUNT_BATCH (-) ');
438: pnp_debug_pkg.put_log_msg('Term template '||template_name_tbl(i)||
439: ' has an existing tax code or tax group.A corresponding tax classification will replace it');
440: END LOOP;
441:
442: pnp_debug_pkg.log('PN_REC_CALC_PKG.CALCULATE_REC_AMOUNT_BATCH (-) ');
443:
444: EXCEPTION
445:
446: When OTHERS Then
443:
444: EXCEPTION
445:
446: When OTHERS Then
447: pnp_debug_pkg.log('Error in PN_REC_CALC_PKG.CALCULATE_REC_AMOUNT_BATCH :'||to_char(sqlcode)||' : '||sqlerrm);
448: Errbuf := SQLERRM;
449: Retcode := 2;
450: rollback;
451: raise;
615: l_rec_calc_period_id pn_rec_calc_periods_all.rec_calc_period_id%TYPE;
616:
617: BEGIN
618:
619: pnp_debug_pkg.log('PN_REC_CALC_PKG.CALCULATE_REC_AMOUNT_BATCH (+) ');
620: fnd_message.set_name ('PN','PN_RECALC_AGR_INP_PARAM');
621: fnd_message.set_token ('LEASE_FRM',p_lease_num_from);
622: fnd_message.set_token ('LEASE_TO',p_lease_num_to);
623: fnd_message.set_token ('LOC_CODE_FRM',p_location_code_from);
628: fnd_message.set_token ('CUST_NAME',p_customer_name);
629: fnd_message.set_token ('CUST_SITE',p_customer_site);
630: fnd_message.set_token ('PRD_END',l_calc_period_ending);
631:
632: pnp_debug_pkg.put_log_msg(fnd_message.get);
633:
634: /* if p_org_ID is not null, then set.
635: else if in R12, current org is already set
636: */
636: */
637: IF p_org_id is NOT NULL THEN
638: pn_mo_cache_utils.fnd_req_set_org_id (p_org_id);
639: /* uncomment to debug
640: pnp_debug_pkg.log('Set the org id with value:' || to_char(pn_mo_cache_utils.get_current_org_id)); */
641: END IF;
642:
643: IF p_location_code_from IS NOT NULL or p_location_code_to IS NOT NULL THEN
644: IF p_property_name IS NOT NULL THEN
728: END IF; --l_rec_calc_period_id <> -1
729:
730: END LOOP;
731:
732: pnp_debug_pkg.put_log_msg('
733: ===============================================================================');
734:
735: fnd_message.set_name ('PN','PN_RECALC_AGR_PROC');
736: fnd_message.set_token ('NUM', l_processed);
733: ===============================================================================');
734:
735: fnd_message.set_name ('PN','PN_RECALC_AGR_PROC');
736: fnd_message.set_token ('NUM', l_processed);
737: pnp_debug_pkg.put_log_msg(fnd_message.get);
738:
739: fnd_message.set_name ('PN','PN_RECALC_AGR_SUC');
740: fnd_message.set_token ('NUM', l_success_count);
741: pnp_debug_pkg.put_log_msg(fnd_message.get);
737: pnp_debug_pkg.put_log_msg(fnd_message.get);
738:
739: fnd_message.set_name ('PN','PN_RECALC_AGR_SUC');
740: fnd_message.set_token ('NUM', l_success_count);
741: pnp_debug_pkg.put_log_msg(fnd_message.get);
742:
743: fnd_message.set_name ('PN','PN_RECALC_AGR_FAIL');
744: fnd_message.set_token ('NUM', l_fail_count);
745: pnp_debug_pkg.put_log_msg(fnd_message.get);
741: pnp_debug_pkg.put_log_msg(fnd_message.get);
742:
743: fnd_message.set_name ('PN','PN_RECALC_AGR_FAIL');
744: fnd_message.set_token ('NUM', l_fail_count);
745: pnp_debug_pkg.put_log_msg(fnd_message.get);
746:
747: pnp_debug_pkg.put_log_msg('
748: ===============================================================================');
749:
743: fnd_message.set_name ('PN','PN_RECALC_AGR_FAIL');
744: fnd_message.set_token ('NUM', l_fail_count);
745: pnp_debug_pkg.put_log_msg(fnd_message.get);
746:
747: pnp_debug_pkg.put_log_msg('
748: ===============================================================================');
749:
750: IF calc_rec_amount_wloc_prop%ISOPEN THEN
751: CLOSE calc_rec_amount_wloc_prop;
756: ELSIF calc_rec_amount_woloc%ISOPEN THEN
757: CLOSE calc_rec_amount_woloc;
758: END IF;
759:
760: pnp_debug_pkg.log('PN_REC_CALC_PKG.CALCULATE_REC_AMOUNT_BATCH (-) ');
761:
762: EXCEPTION
763:
764: When OTHERS Then
761:
762: EXCEPTION
763:
764: When OTHERS Then
765: pnp_debug_pkg.log('Error in PN_REC_CALC_PKG.CALCULATE_REC_AMOUNT_BATCH :'||to_char(sqlcode)||' : '||sqlerrm);
766: Errbuf := SQLERRM;
767: Retcode := 2;
768: rollback;
769: raise;
1034: l_org_id NUMBER;
1035:
1036: BEGIN
1037:
1038: pnp_debug_pkg.log('PN_REC_CALC_PKG.CALCULATE_REC_AMOUNT (+) ');
1039:
1040: /* Get currency code and negative recovery value for the agreement */
1041:
1042: FOR rec IN csr_currency_code LOOP
1048: END LOOP;
1049:
1050: l_consolidate := NVL(pn_mo_cache_utils.get_profile_value('PN_REC_CONSOLIDATE_TERMS', l_org_id), 'N');
1051:
1052: pnp_debug_pkg.put_log_msg(' ');
1053: fnd_message.set_name ('PN','PN_RECALC_AGR_NAME');
1054: fnd_message.set_token ('NAME', l_rec_agr_name);
1055: pnp_debug_pkg.put_log_msg(fnd_message.get);
1056:
1051:
1052: pnp_debug_pkg.put_log_msg(' ');
1053: fnd_message.set_name ('PN','PN_RECALC_AGR_NAME');
1054: fnd_message.set_token ('NAME', l_rec_agr_name);
1055: pnp_debug_pkg.put_log_msg(fnd_message.get);
1056:
1057: fnd_message.set_name ('PN','PN_RECALC_AGR_NUMBER');
1058: fnd_message.set_token ('NUM', l_rec_agr_num);
1059: pnp_debug_pkg.put_log_msg(fnd_message.get);
1055: pnp_debug_pkg.put_log_msg(fnd_message.get);
1056:
1057: fnd_message.set_name ('PN','PN_RECALC_AGR_NUMBER');
1058: fnd_message.set_token ('NUM', l_rec_agr_num);
1059: pnp_debug_pkg.put_log_msg(fnd_message.get);
1060:
1061: pnp_debug_pkg.log('calculate_rec_amount - agreement id : '||p_rec_agreement_id);
1062: pnp_debug_pkg.log('calculate_rec_amount - agreement id : '||p_rec_agreement_id);
1063: pnp_debug_pkg.log('calculate_rec_amount - currency code : '||g_currency_code);
1057: fnd_message.set_name ('PN','PN_RECALC_AGR_NUMBER');
1058: fnd_message.set_token ('NUM', l_rec_agr_num);
1059: pnp_debug_pkg.put_log_msg(fnd_message.get);
1060:
1061: pnp_debug_pkg.log('calculate_rec_amount - agreement id : '||p_rec_agreement_id);
1062: pnp_debug_pkg.log('calculate_rec_amount - agreement id : '||p_rec_agreement_id);
1063: pnp_debug_pkg.log('calculate_rec_amount - currency code : '||g_currency_code);
1064: pnp_debug_pkg.log('calculate_rec_amount - -ve rent rule : '||l_negative_recovery);
1065:
1058: fnd_message.set_token ('NUM', l_rec_agr_num);
1059: pnp_debug_pkg.put_log_msg(fnd_message.get);
1060:
1061: pnp_debug_pkg.log('calculate_rec_amount - agreement id : '||p_rec_agreement_id);
1062: pnp_debug_pkg.log('calculate_rec_amount - agreement id : '||p_rec_agreement_id);
1063: pnp_debug_pkg.log('calculate_rec_amount - currency code : '||g_currency_code);
1064: pnp_debug_pkg.log('calculate_rec_amount - -ve rent rule : '||l_negative_recovery);
1065:
1066: IF p_rec_agr_line_id IS NULL THEN
1059: pnp_debug_pkg.put_log_msg(fnd_message.get);
1060:
1061: pnp_debug_pkg.log('calculate_rec_amount - agreement id : '||p_rec_agreement_id);
1062: pnp_debug_pkg.log('calculate_rec_amount - agreement id : '||p_rec_agreement_id);
1063: pnp_debug_pkg.log('calculate_rec_amount - currency code : '||g_currency_code);
1064: pnp_debug_pkg.log('calculate_rec_amount - -ve rent rule : '||l_negative_recovery);
1065:
1066: IF p_rec_agr_line_id IS NULL THEN
1067: OPEN agr_lines_all;
1060:
1061: pnp_debug_pkg.log('calculate_rec_amount - agreement id : '||p_rec_agreement_id);
1062: pnp_debug_pkg.log('calculate_rec_amount - agreement id : '||p_rec_agreement_id);
1063: pnp_debug_pkg.log('calculate_rec_amount - currency code : '||g_currency_code);
1064: pnp_debug_pkg.log('calculate_rec_amount - -ve rent rule : '||l_negative_recovery);
1065:
1066: IF p_rec_agr_line_id IS NULL THEN
1067: OPEN agr_lines_all;
1068: l_calculate_all := TRUE;
1119: l_tenancy_start_date := NULL;
1120: l_tenancy_end_date := NULL;
1121: line_constr_tbl.delete;
1122:
1123: pnp_debug_pkg.log('Processing line id : '||agr_lines_record.rec_agr_line_id);
1124:
1125: /* Test for calculation Method */
1126:
1127: pnp_debug_pkg.log('Calculation Method : '||agr_lines_record.calc_method);
1123: pnp_debug_pkg.log('Processing line id : '||agr_lines_record.rec_agr_line_id);
1124:
1125: /* Test for calculation Method */
1126:
1127: pnp_debug_pkg.log('Calculation Method : '||agr_lines_record.calc_method);
1128:
1129: IF agr_lines_record.calc_method <> 'FIXEDAMT' THEN
1130:
1131: -- Only if calculation method is either Prorata Share, Fixed Pct or Fixed Rate
1131: -- Only if calculation method is either Prorata Share, Fixed Pct or Fixed Rate
1132:
1133: IF agr_lines_record.calc_method IN('PRORATSH','FIXEDPCT') THEN
1134:
1135: pnp_debug_pkg.log('Calculation Method : Prorata Share/Fixed Pct - line id :'||agr_lines_record.rec_agr_line_id);
1136: -- If calculation method is Prorata Share get the expenses for the line
1137: -- and the total area of the property
1138:
1139: pnp_debug_pkg.log('get_line_expenses....Agr line id : '||agr_lines_record.rec_agr_line_id);
1135: pnp_debug_pkg.log('Calculation Method : Prorata Share/Fixed Pct - line id :'||agr_lines_record.rec_agr_line_id);
1136: -- If calculation method is Prorata Share get the expenses for the line
1137: -- and the total area of the property
1138:
1139: pnp_debug_pkg.log('get_line_expenses....Agr line id : '||agr_lines_record.rec_agr_line_id);
1140: pnp_debug_pkg.log('get_line_expenses - Customer id : '||p_customer_id);
1141: pnp_debug_pkg.log('get_line_expenses - Lease id : '||p_lease_id);
1142: pnp_debug_pkg.log('get_line_expenses - Location id : '||p_location_id);
1143: pnp_debug_pkg.log('get_line_expenses - Start Date : '||p_calc_period_start_date);
1136: -- If calculation method is Prorata Share get the expenses for the line
1137: -- and the total area of the property
1138:
1139: pnp_debug_pkg.log('get_line_expenses....Agr line id : '||agr_lines_record.rec_agr_line_id);
1140: pnp_debug_pkg.log('get_line_expenses - Customer id : '||p_customer_id);
1141: pnp_debug_pkg.log('get_line_expenses - Lease id : '||p_lease_id);
1142: pnp_debug_pkg.log('get_line_expenses - Location id : '||p_location_id);
1143: pnp_debug_pkg.log('get_line_expenses - Start Date : '||p_calc_period_start_date);
1144: pnp_debug_pkg.log('get_line_expenses - End Date : '||p_calc_period_end_date);
1137: -- and the total area of the property
1138:
1139: pnp_debug_pkg.log('get_line_expenses....Agr line id : '||agr_lines_record.rec_agr_line_id);
1140: pnp_debug_pkg.log('get_line_expenses - Customer id : '||p_customer_id);
1141: pnp_debug_pkg.log('get_line_expenses - Lease id : '||p_lease_id);
1142: pnp_debug_pkg.log('get_line_expenses - Location id : '||p_location_id);
1143: pnp_debug_pkg.log('get_line_expenses - Start Date : '||p_calc_period_start_date);
1144: pnp_debug_pkg.log('get_line_expenses - End Date : '||p_calc_period_end_date);
1145:
1138:
1139: pnp_debug_pkg.log('get_line_expenses....Agr line id : '||agr_lines_record.rec_agr_line_id);
1140: pnp_debug_pkg.log('get_line_expenses - Customer id : '||p_customer_id);
1141: pnp_debug_pkg.log('get_line_expenses - Lease id : '||p_lease_id);
1142: pnp_debug_pkg.log('get_line_expenses - Location id : '||p_location_id);
1143: pnp_debug_pkg.log('get_line_expenses - Start Date : '||p_calc_period_start_date);
1144: pnp_debug_pkg.log('get_line_expenses - End Date : '||p_calc_period_end_date);
1145:
1146: PN_REC_CALC_PKG.get_line_expenses(
1139: pnp_debug_pkg.log('get_line_expenses....Agr line id : '||agr_lines_record.rec_agr_line_id);
1140: pnp_debug_pkg.log('get_line_expenses - Customer id : '||p_customer_id);
1141: pnp_debug_pkg.log('get_line_expenses - Lease id : '||p_lease_id);
1142: pnp_debug_pkg.log('get_line_expenses - Location id : '||p_location_id);
1143: pnp_debug_pkg.log('get_line_expenses - Start Date : '||p_calc_period_start_date);
1144: pnp_debug_pkg.log('get_line_expenses - End Date : '||p_calc_period_end_date);
1145:
1146: PN_REC_CALC_PKG.get_line_expenses(
1147: p_rec_agr_line_id => agr_lines_record.rec_agr_line_id
1140: pnp_debug_pkg.log('get_line_expenses - Customer id : '||p_customer_id);
1141: pnp_debug_pkg.log('get_line_expenses - Lease id : '||p_lease_id);
1142: pnp_debug_pkg.log('get_line_expenses - Location id : '||p_location_id);
1143: pnp_debug_pkg.log('get_line_expenses - Start Date : '||p_calc_period_start_date);
1144: pnp_debug_pkg.log('get_line_expenses - End Date : '||p_calc_period_end_date);
1145:
1146: PN_REC_CALC_PKG.get_line_expenses(
1147: p_rec_agr_line_id => agr_lines_record.rec_agr_line_id
1148: ,p_customer_id => p_customer_id
1157: ,p_error => p_error
1158: ,p_error_code => p_error_code
1159: );
1160:
1161: pnp_debug_pkg.log('get_line_expenses - Recoverable_amt : '||l_line_expenses);
1162: pnp_debug_pkg.log('get_line_expenses - Fee Before Contr : '||l_fee_before_contr);
1163: pnp_debug_pkg.log('get_line_expenses - Fee after contr : '||l_fee_after_contr);
1164: pnp_debug_pkg.log('get_line_expenses - Return Status : '||p_error);
1165: pnp_debug_pkg.log('get_line_expenses - Return Code : '||p_error_code);
1158: ,p_error_code => p_error_code
1159: );
1160:
1161: pnp_debug_pkg.log('get_line_expenses - Recoverable_amt : '||l_line_expenses);
1162: pnp_debug_pkg.log('get_line_expenses - Fee Before Contr : '||l_fee_before_contr);
1163: pnp_debug_pkg.log('get_line_expenses - Fee after contr : '||l_fee_after_contr);
1164: pnp_debug_pkg.log('get_line_expenses - Return Status : '||p_error);
1165: pnp_debug_pkg.log('get_line_expenses - Return Code : '||p_error_code);
1166:
1159: );
1160:
1161: pnp_debug_pkg.log('get_line_expenses - Recoverable_amt : '||l_line_expenses);
1162: pnp_debug_pkg.log('get_line_expenses - Fee Before Contr : '||l_fee_before_contr);
1163: pnp_debug_pkg.log('get_line_expenses - Fee after contr : '||l_fee_after_contr);
1164: pnp_debug_pkg.log('get_line_expenses - Return Status : '||p_error);
1165: pnp_debug_pkg.log('get_line_expenses - Return Code : '||p_error_code);
1166:
1167: IF p_error_code <> -99 THEN
1160:
1161: pnp_debug_pkg.log('get_line_expenses - Recoverable_amt : '||l_line_expenses);
1162: pnp_debug_pkg.log('get_line_expenses - Fee Before Contr : '||l_fee_before_contr);
1163: pnp_debug_pkg.log('get_line_expenses - Fee after contr : '||l_fee_after_contr);
1164: pnp_debug_pkg.log('get_line_expenses - Return Status : '||p_error);
1165: pnp_debug_pkg.log('get_line_expenses - Return Code : '||p_error_code);
1166:
1167: IF p_error_code <> -99 THEN
1168: l_budget_expense := PN_REC_CALC_PKG.get_budget_expenses(
1161: pnp_debug_pkg.log('get_line_expenses - Recoverable_amt : '||l_line_expenses);
1162: pnp_debug_pkg.log('get_line_expenses - Fee Before Contr : '||l_fee_before_contr);
1163: pnp_debug_pkg.log('get_line_expenses - Fee after contr : '||l_fee_after_contr);
1164: pnp_debug_pkg.log('get_line_expenses - Return Status : '||p_error);
1165: pnp_debug_pkg.log('get_line_expenses - Return Code : '||p_error_code);
1166:
1167: IF p_error_code <> -99 THEN
1168: l_budget_expense := PN_REC_CALC_PKG.get_budget_expenses(
1169: p_rec_agr_line_id => agr_lines_record.rec_agr_line_id
1185:
1186: END IF;
1187:
1188:
1189: pnp_debug_pkg.log('get_budget_expenses - Return Code : '||p_error_code);
1190: pnp_debug_pkg.log('Budget Expense : '||l_budget_expense);
1191:
1192: END IF;
1193:
1186: END IF;
1187:
1188:
1189: pnp_debug_pkg.log('get_budget_expenses - Return Code : '||p_error_code);
1190: pnp_debug_pkg.log('Budget Expense : '||l_budget_expense);
1191:
1192: END IF;
1193:
1194: pnp_debug_pkg.log('Error Code 1 : '||p_error_code);
1190: pnp_debug_pkg.log('Budget Expense : '||l_budget_expense);
1191:
1192: END IF;
1193:
1194: pnp_debug_pkg.log('Error Code 1 : '||p_error_code);
1195:
1196: IF p_error_code <> -99 THEN
1197:
1198: l_contr_actual_recovery := PN_REC_CALC_PKG.get_contr_actual_recovery(
1215: p_error_code := 0;
1216:
1217: END IF;
1218:
1219: pnp_debug_pkg.log('Contr Actual Recovery : '||l_contr_actual_recovery);
1220:
1221: END IF;
1222:
1223: pnp_debug_pkg.log('Error Code 2 : '||p_error_code);
1219: pnp_debug_pkg.log('Contr Actual Recovery : '||l_contr_actual_recovery);
1220:
1221: END IF;
1222:
1223: pnp_debug_pkg.log('Error Code 2 : '||p_error_code);
1224:
1225: /* If total expenses is greater than contributors prorata share
1226: then subtract the contributors prorata share from total expenses.
1227: Also apply the fee after contributors if the fee before
1238: l_line_expenses := (nvl(l_line_expenses,0) - nvl(l_contr_actual_recovery,0))
1239: + ((l_fee_after_contr / 100) *
1240: (nvl(l_line_expenses,0) - nvl(l_contr_actual_recovery,0)));
1241:
1242: pnp_debug_pkg.log('get_line_expenses - expense after contr and fee : '||l_line_expenses);
1243: ELSE
1244:
1245: l_line_expenses := nvl(l_line_expenses,0) - nvl(l_contr_actual_recovery,0);
1246: pnp_debug_pkg.log('get_line_expenses - expenses after contr : '||l_line_expenses);
1242: pnp_debug_pkg.log('get_line_expenses - expense after contr and fee : '||l_line_expenses);
1243: ELSE
1244:
1245: l_line_expenses := nvl(l_line_expenses,0) - nvl(l_contr_actual_recovery,0);
1246: pnp_debug_pkg.log('get_line_expenses - expenses after contr : '||l_line_expenses);
1247:
1248: END IF;
1249:
1250:
1254: l_line_expenses := 0;
1255:
1256: END IF;
1257:
1258: pnp_debug_pkg.log('Line expenses after contributors : '||l_line_expenses);
1259:
1260:
1261: pnp_debug_pkg.log('Error Code 3 : '||p_error_code);
1262:
1257:
1258: pnp_debug_pkg.log('Line expenses after contributors : '||l_line_expenses);
1259:
1260:
1261: pnp_debug_pkg.log('Error Code 3 : '||p_error_code);
1262:
1263: IF p_error_code <> -99 AND
1264: agr_lines_record.calc_method = 'FIXEDPCT' AND
1265: nvl(agr_lines_record.fixed_pct,0) <> 0 THEN
1263: IF p_error_code <> -99 AND
1264: agr_lines_record.calc_method = 'FIXEDPCT' AND
1265: nvl(agr_lines_record.fixed_pct,0) <> 0 THEN
1266:
1267: pnp_debug_pkg.log('Error Code 4 : '||p_error_code);
1268: l_ten_actual_recovery := l_line_expenses*agr_lines_record.fixed_pct/100;
1269:
1270: l_budget_recovery := l_budget_expense*agr_lines_record.fixed_pct/100;
1271:
1270: l_budget_recovery := l_budget_expense*agr_lines_record.fixed_pct/100;
1271:
1272: l_status := 'COMPLETE';
1273:
1274: pnp_debug_pkg.log('Calculation Method : Fixed Pct - tenant actual recovery :'||
1275: l_ten_actual_recovery||l_status);
1276: p_error := 'Success';
1277: p_error_code := 0;
1278:
1279: ELSIF p_error_code <> -99 AND
1280: agr_lines_record.calc_method = 'FIXEDPCT' AND
1281: nvl(agr_lines_record.fixed_pct,0) = 0 THEN
1282:
1283: pnp_debug_pkg.log('Error Code 5 : '||p_error_code);
1284: l_ten_actual_recovery := 0;
1285: l_status := 'ERROR';
1286:
1287: fnd_message.set_name ('PN','PN_RECALC_PCT_NOT');
1284: l_ten_actual_recovery := 0;
1285: l_status := 'ERROR';
1286:
1287: fnd_message.set_name ('PN','PN_RECALC_PCT_NOT');
1288: pnp_debug_pkg.put_log_msg(fnd_message.get);
1289:
1290: p_error := 'Percentage not specified for Fixed Percentage calc. method';
1291: p_error_code := -99;
1292:
1294:
1295: ELSIF p_error_code <> -99 AND
1296: agr_lines_record.calc_method = 'PRORATSH' THEN
1297:
1298: pnp_debug_pkg.log('Error Code 6 : '||p_error_code);
1299: -- Only if calculation method is either Prorata Share, Fixed Pct or Fixed Rate
1300:
1301:
1302: pnp_debug_pkg.log('get_tot_prop_area - Agr line id : '||agr_lines_record.rec_agr_line_id);
1298: pnp_debug_pkg.log('Error Code 6 : '||p_error_code);
1299: -- Only if calculation method is either Prorata Share, Fixed Pct or Fixed Rate
1300:
1301:
1302: pnp_debug_pkg.log('get_tot_prop_area - Agr line id : '||agr_lines_record.rec_agr_line_id);
1303: pnp_debug_pkg.log('get_tot_prop_area - Customer id : '||p_customer_id);
1304: pnp_debug_pkg.log('get_tot_prop_area - Lease id : '||p_lease_id);
1305: pnp_debug_pkg.log('get_tot_prop_area - Location id : '||p_location_id);
1306: pnp_debug_pkg.log('get_tot_prop_area - Start Date : '||p_calc_period_start_date);
1299: -- Only if calculation method is either Prorata Share, Fixed Pct or Fixed Rate
1300:
1301:
1302: pnp_debug_pkg.log('get_tot_prop_area - Agr line id : '||agr_lines_record.rec_agr_line_id);
1303: pnp_debug_pkg.log('get_tot_prop_area - Customer id : '||p_customer_id);
1304: pnp_debug_pkg.log('get_tot_prop_area - Lease id : '||p_lease_id);
1305: pnp_debug_pkg.log('get_tot_prop_area - Location id : '||p_location_id);
1306: pnp_debug_pkg.log('get_tot_prop_area - Start Date : '||p_calc_period_start_date);
1307: pnp_debug_pkg.log('get_tot_prop_area - End Date : '||p_calc_period_end_date);
1300:
1301:
1302: pnp_debug_pkg.log('get_tot_prop_area - Agr line id : '||agr_lines_record.rec_agr_line_id);
1303: pnp_debug_pkg.log('get_tot_prop_area - Customer id : '||p_customer_id);
1304: pnp_debug_pkg.log('get_tot_prop_area - Lease id : '||p_lease_id);
1305: pnp_debug_pkg.log('get_tot_prop_area - Location id : '||p_location_id);
1306: pnp_debug_pkg.log('get_tot_prop_area - Start Date : '||p_calc_period_start_date);
1307: pnp_debug_pkg.log('get_tot_prop_area - End Date : '||p_calc_period_end_date);
1308: pnp_debug_pkg.log('get_tot_prop_area - As of Date : '||p_as_of_date);
1301:
1302: pnp_debug_pkg.log('get_tot_prop_area - Agr line id : '||agr_lines_record.rec_agr_line_id);
1303: pnp_debug_pkg.log('get_tot_prop_area - Customer id : '||p_customer_id);
1304: pnp_debug_pkg.log('get_tot_prop_area - Lease id : '||p_lease_id);
1305: pnp_debug_pkg.log('get_tot_prop_area - Location id : '||p_location_id);
1306: pnp_debug_pkg.log('get_tot_prop_area - Start Date : '||p_calc_period_start_date);
1307: pnp_debug_pkg.log('get_tot_prop_area - End Date : '||p_calc_period_end_date);
1308: pnp_debug_pkg.log('get_tot_prop_area - As of Date : '||p_as_of_date);
1309:
1302: pnp_debug_pkg.log('get_tot_prop_area - Agr line id : '||agr_lines_record.rec_agr_line_id);
1303: pnp_debug_pkg.log('get_tot_prop_area - Customer id : '||p_customer_id);
1304: pnp_debug_pkg.log('get_tot_prop_area - Lease id : '||p_lease_id);
1305: pnp_debug_pkg.log('get_tot_prop_area - Location id : '||p_location_id);
1306: pnp_debug_pkg.log('get_tot_prop_area - Start Date : '||p_calc_period_start_date);
1307: pnp_debug_pkg.log('get_tot_prop_area - End Date : '||p_calc_period_end_date);
1308: pnp_debug_pkg.log('get_tot_prop_area - As of Date : '||p_as_of_date);
1309:
1310: l_tot_prop_area := PN_REC_CALC_PKG.get_tot_prop_area(
1303: pnp_debug_pkg.log('get_tot_prop_area - Customer id : '||p_customer_id);
1304: pnp_debug_pkg.log('get_tot_prop_area - Lease id : '||p_lease_id);
1305: pnp_debug_pkg.log('get_tot_prop_area - Location id : '||p_location_id);
1306: pnp_debug_pkg.log('get_tot_prop_area - Start Date : '||p_calc_period_start_date);
1307: pnp_debug_pkg.log('get_tot_prop_area - End Date : '||p_calc_period_end_date);
1308: pnp_debug_pkg.log('get_tot_prop_area - As of Date : '||p_as_of_date);
1309:
1310: l_tot_prop_area := PN_REC_CALC_PKG.get_tot_prop_area(
1311: p_rec_agr_line_id => agr_lines_record.rec_agr_line_id
1304: pnp_debug_pkg.log('get_tot_prop_area - Lease id : '||p_lease_id);
1305: pnp_debug_pkg.log('get_tot_prop_area - Location id : '||p_location_id);
1306: pnp_debug_pkg.log('get_tot_prop_area - Start Date : '||p_calc_period_start_date);
1307: pnp_debug_pkg.log('get_tot_prop_area - End Date : '||p_calc_period_end_date);
1308: pnp_debug_pkg.log('get_tot_prop_area - As of Date : '||p_as_of_date);
1309:
1310: l_tot_prop_area := PN_REC_CALC_PKG.get_tot_prop_area(
1311: p_rec_agr_line_id => agr_lines_record.rec_agr_line_id
1312: ,p_customer_id => p_customer_id
1319:
1320: IF l_tot_prop_area = -99 THEN
1321:
1322: fnd_message.set_name ('PN','PN_RECALB_TOT_AR');
1323: pnp_debug_pkg.put_log_msg(fnd_message.get);
1324:
1325: p_error := 'Error while getting Total Property Area ';
1326: p_error_code := -99;
1327: l_tot_prop_area := 0;
1328:
1329: ELSE
1330: p_error := 'Success';
1331: p_error_code := 0;
1332: pnp_debug_pkg.log('Total Property Area : '||l_tot_prop_area);
1333:
1334: END IF;
1335:
1336:
1333:
1334: END IF;
1335:
1336:
1337: pnp_debug_pkg.log('Error Code 7 : '||p_error_code);
1338: IF p_error_code <> -99 AND
1339: (nvl(l_tot_prop_area,0) <> 0) AND
1340: (nvl(l_line_expenses,0) <> 0) THEN
1341:
1338: IF p_error_code <> -99 AND
1339: (nvl(l_tot_prop_area,0) <> 0) AND
1340: (nvl(l_line_expenses,0) <> 0) THEN
1341:
1342: pnp_debug_pkg.log('Error Code 8 : '||p_error_code);
1343: -- Compute the rate
1344:
1345: l_rate := l_line_expenses/l_tot_prop_area;
1346: pnp_debug_pkg.log('Calc. Method : Prorata Share - total expense :'||l_line_expenses);
1342: pnp_debug_pkg.log('Error Code 8 : '||p_error_code);
1343: -- Compute the rate
1344:
1345: l_rate := l_line_expenses/l_tot_prop_area;
1346: pnp_debug_pkg.log('Calc. Method : Prorata Share - total expense :'||l_line_expenses);
1347: pnp_debug_pkg.log('Calc. Method : Prorata Share - total area :'||l_tot_prop_area);
1348:
1349: END IF;
1350:
1343: -- Compute the rate
1344:
1345: l_rate := l_line_expenses/l_tot_prop_area;
1346: pnp_debug_pkg.log('Calc. Method : Prorata Share - total expense :'||l_line_expenses);
1347: pnp_debug_pkg.log('Calc. Method : Prorata Share - total area :'||l_tot_prop_area);
1348:
1349: END IF;
1350:
1351: pnp_debug_pkg.log('Error Code 9 : '||p_error_code);
1347: pnp_debug_pkg.log('Calc. Method : Prorata Share - total area :'||l_tot_prop_area);
1348:
1349: END IF;
1350:
1351: pnp_debug_pkg.log('Error Code 9 : '||p_error_code);
1352: IF p_error_code <> -99 AND
1353: (nvl(l_tot_prop_area,0) <> 0) AND
1354: nvl(l_budget_expense,0) <> 0 THEN
1355:
1352: IF p_error_code <> -99 AND
1353: (nvl(l_tot_prop_area,0) <> 0) AND
1354: nvl(l_budget_expense,0) <> 0 THEN
1355:
1356: pnp_debug_pkg.log('Error Code 10 : '||p_error_code);
1357: l_budget_cost_per_area := l_budget_expense/l_tot_prop_area;
1358:
1359: pnp_debug_pkg.log('Calc. Method : Prorata Share - Budget total expense :'||l_budget_expense);
1360: pnp_debug_pkg.log('Calc. Method : Prorata Share - Budget total area :'||l_tot_prop_area);
1355:
1356: pnp_debug_pkg.log('Error Code 10 : '||p_error_code);
1357: l_budget_cost_per_area := l_budget_expense/l_tot_prop_area;
1358:
1359: pnp_debug_pkg.log('Calc. Method : Prorata Share - Budget total expense :'||l_budget_expense);
1360: pnp_debug_pkg.log('Calc. Method : Prorata Share - Budget total area :'||l_tot_prop_area);
1361: END IF;
1362: ------------------------------------------------------------------------
1363: -- Compute tenant's share of the area to be used in the calculation
1356: pnp_debug_pkg.log('Error Code 10 : '||p_error_code);
1357: l_budget_cost_per_area := l_budget_expense/l_tot_prop_area;
1358:
1359: pnp_debug_pkg.log('Calc. Method : Prorata Share - Budget total expense :'||l_budget_expense);
1360: pnp_debug_pkg.log('Calc. Method : Prorata Share - Budget total area :'||l_tot_prop_area);
1361: END IF;
1362: ------------------------------------------------------------------------
1363: -- Compute tenant's share of the area to be used in the calculation
1364: -- The procedure returns a record with occupied area and the occupancy %
1363: -- Compute tenant's share of the area to be used in the calculation
1364: -- The procedure returns a record with occupied area and the occupancy %
1365: ------------------------------------------------------------------------
1366:
1367: pnp_debug_pkg.log('Error Code 11 : '||p_error_code);
1368: IF p_error_code <> -99 THEN
1369:
1370: pnp_debug_pkg.log('Error Code 12 : '||p_error_code);
1371: pnp_debug_pkg.log('ten_recoverable_areaAgr line id : '||agr_lines_record.rec_agr_line_id);
1366:
1367: pnp_debug_pkg.log('Error Code 11 : '||p_error_code);
1368: IF p_error_code <> -99 THEN
1369:
1370: pnp_debug_pkg.log('Error Code 12 : '||p_error_code);
1371: pnp_debug_pkg.log('ten_recoverable_areaAgr line id : '||agr_lines_record.rec_agr_line_id);
1372: pnp_debug_pkg.log('ten_recoverable_area - Customer id : '||p_customer_id);
1373: pnp_debug_pkg.log('ten_recoverable_area - Lease id : '||p_lease_id);
1374: pnp_debug_pkg.log('ten_recoverable_area - Location id : '||p_location_id);
1367: pnp_debug_pkg.log('Error Code 11 : '||p_error_code);
1368: IF p_error_code <> -99 THEN
1369:
1370: pnp_debug_pkg.log('Error Code 12 : '||p_error_code);
1371: pnp_debug_pkg.log('ten_recoverable_areaAgr line id : '||agr_lines_record.rec_agr_line_id);
1372: pnp_debug_pkg.log('ten_recoverable_area - Customer id : '||p_customer_id);
1373: pnp_debug_pkg.log('ten_recoverable_area - Lease id : '||p_lease_id);
1374: pnp_debug_pkg.log('ten_recoverable_area - Location id : '||p_location_id);
1375: pnp_debug_pkg.log('ten_recoverable_area - Start Date : '||p_calc_period_start_date);
1368: IF p_error_code <> -99 THEN
1369:
1370: pnp_debug_pkg.log('Error Code 12 : '||p_error_code);
1371: pnp_debug_pkg.log('ten_recoverable_areaAgr line id : '||agr_lines_record.rec_agr_line_id);
1372: pnp_debug_pkg.log('ten_recoverable_area - Customer id : '||p_customer_id);
1373: pnp_debug_pkg.log('ten_recoverable_area - Lease id : '||p_lease_id);
1374: pnp_debug_pkg.log('ten_recoverable_area - Location id : '||p_location_id);
1375: pnp_debug_pkg.log('ten_recoverable_area - Start Date : '||p_calc_period_start_date);
1376: pnp_debug_pkg.log('ten_recoverable_area - End Date : '||p_calc_period_end_date);
1369:
1370: pnp_debug_pkg.log('Error Code 12 : '||p_error_code);
1371: pnp_debug_pkg.log('ten_recoverable_areaAgr line id : '||agr_lines_record.rec_agr_line_id);
1372: pnp_debug_pkg.log('ten_recoverable_area - Customer id : '||p_customer_id);
1373: pnp_debug_pkg.log('ten_recoverable_area - Lease id : '||p_lease_id);
1374: pnp_debug_pkg.log('ten_recoverable_area - Location id : '||p_location_id);
1375: pnp_debug_pkg.log('ten_recoverable_area - Start Date : '||p_calc_period_start_date);
1376: pnp_debug_pkg.log('ten_recoverable_area - End Date : '||p_calc_period_end_date);
1377: pnp_debug_pkg.log('ten_recoverable_area - As of Date : '||p_as_of_date);
1370: pnp_debug_pkg.log('Error Code 12 : '||p_error_code);
1371: pnp_debug_pkg.log('ten_recoverable_areaAgr line id : '||agr_lines_record.rec_agr_line_id);
1372: pnp_debug_pkg.log('ten_recoverable_area - Customer id : '||p_customer_id);
1373: pnp_debug_pkg.log('ten_recoverable_area - Lease id : '||p_lease_id);
1374: pnp_debug_pkg.log('ten_recoverable_area - Location id : '||p_location_id);
1375: pnp_debug_pkg.log('ten_recoverable_area - Start Date : '||p_calc_period_start_date);
1376: pnp_debug_pkg.log('ten_recoverable_area - End Date : '||p_calc_period_end_date);
1377: pnp_debug_pkg.log('ten_recoverable_area - As of Date : '||p_as_of_date);
1378:
1371: pnp_debug_pkg.log('ten_recoverable_areaAgr line id : '||agr_lines_record.rec_agr_line_id);
1372: pnp_debug_pkg.log('ten_recoverable_area - Customer id : '||p_customer_id);
1373: pnp_debug_pkg.log('ten_recoverable_area - Lease id : '||p_lease_id);
1374: pnp_debug_pkg.log('ten_recoverable_area - Location id : '||p_location_id);
1375: pnp_debug_pkg.log('ten_recoverable_area - Start Date : '||p_calc_period_start_date);
1376: pnp_debug_pkg.log('ten_recoverable_area - End Date : '||p_calc_period_end_date);
1377: pnp_debug_pkg.log('ten_recoverable_area - As of Date : '||p_as_of_date);
1378:
1379: l_ten_recoverable_area_rec := PN_REC_CALC_PKG.ten_recoverable_area(
1372: pnp_debug_pkg.log('ten_recoverable_area - Customer id : '||p_customer_id);
1373: pnp_debug_pkg.log('ten_recoverable_area - Lease id : '||p_lease_id);
1374: pnp_debug_pkg.log('ten_recoverable_area - Location id : '||p_location_id);
1375: pnp_debug_pkg.log('ten_recoverable_area - Start Date : '||p_calc_period_start_date);
1376: pnp_debug_pkg.log('ten_recoverable_area - End Date : '||p_calc_period_end_date);
1377: pnp_debug_pkg.log('ten_recoverable_area - As of Date : '||p_as_of_date);
1378:
1379: l_ten_recoverable_area_rec := PN_REC_CALC_PKG.ten_recoverable_area(
1380: p_rec_agr_line_id => agr_lines_record.rec_agr_line_id
1373: pnp_debug_pkg.log('ten_recoverable_area - Lease id : '||p_lease_id);
1374: pnp_debug_pkg.log('ten_recoverable_area - Location id : '||p_location_id);
1375: pnp_debug_pkg.log('ten_recoverable_area - Start Date : '||p_calc_period_start_date);
1376: pnp_debug_pkg.log('ten_recoverable_area - End Date : '||p_calc_period_end_date);
1377: pnp_debug_pkg.log('ten_recoverable_area - As of Date : '||p_as_of_date);
1378:
1379: l_ten_recoverable_area_rec := PN_REC_CALC_PKG.ten_recoverable_area(
1380: p_rec_agr_line_id => agr_lines_record.rec_agr_line_id
1381: ,p_customer_id => p_customer_id
1400: l_ten_occupancy_pct := l_ten_recoverable_area_rec.occupancy_pct;
1401: p_error := 'Success';
1402: p_error_code := 0;
1403:
1404: pnp_debug_pkg.log('Calc. Method : Prorata Share - tenant rec area :'
1405: ||l_ten_recoverable_area);
1406: pnp_debug_pkg.log('Calc. Method : Prorata Share - tenant occ% :'
1407: ||l_ten_occupancy_pct);
1408: END IF;
1402: p_error_code := 0;
1403:
1404: pnp_debug_pkg.log('Calc. Method : Prorata Share - tenant rec area :'
1405: ||l_ten_recoverable_area);
1406: pnp_debug_pkg.log('Calc. Method : Prorata Share - tenant occ% :'
1407: ||l_ten_occupancy_pct);
1408: END IF;
1409:
1410: pnp_debug_pkg.log('Error Code 13 : '||p_error_code);
1406: pnp_debug_pkg.log('Calc. Method : Prorata Share - tenant occ% :'
1407: ||l_ten_occupancy_pct);
1408: END IF;
1409:
1410: pnp_debug_pkg.log('Error Code 13 : '||p_error_code);
1411: END IF;
1412: pnp_debug_pkg.log('Error Code 14 : '||p_error_code);
1413:
1414: END IF; /* end of fixed pct and prorata share */
1408: END IF;
1409:
1410: pnp_debug_pkg.log('Error Code 13 : '||p_error_code);
1411: END IF;
1412: pnp_debug_pkg.log('Error Code 14 : '||p_error_code);
1413:
1414: END IF; /* end of fixed pct and prorata share */
1415:
1416: pnp_debug_pkg.log('Error Code 15 : '||p_error_code);
1412: pnp_debug_pkg.log('Error Code 14 : '||p_error_code);
1413:
1414: END IF; /* end of fixed pct and prorata share */
1415:
1416: pnp_debug_pkg.log('Error Code 15 : '||p_error_code);
1417: ELSIF agr_lines_record.calc_method = 'FIXEDRT' THEN
1418:
1419: pnp_debug_pkg.log('Calculation Method : Fixed Rate - line id :'||agr_lines_record.rec_agr_line_id);
1420: -- For fixed rate we have the rate available and since the user puts
1415:
1416: pnp_debug_pkg.log('Error Code 15 : '||p_error_code);
1417: ELSIF agr_lines_record.calc_method = 'FIXEDRT' THEN
1418:
1419: pnp_debug_pkg.log('Calculation Method : Fixed Rate - line id :'||agr_lines_record.rec_agr_line_id);
1420: -- For fixed rate we have the rate available and since the user puts
1421: -- in the recoverable area occupancy % is 100%
1422:
1423: l_rate := agr_lines_record.fixed_rate;
1435:
1436: l_ten_occupancy_pct := 100;
1437: p_error_code := 0;
1438:
1439: pnp_debug_pkg.log('Calc. Method : Fixed Rate - tenant rec area :'
1440: ||l_ten_recoverable_area);
1441: pnp_debug_pkg.log('Calc. Method : Fixed Rate - tenant occ% :'||
1442: l_ten_occupancy_pct);
1443: END IF;
1437: p_error_code := 0;
1438:
1439: pnp_debug_pkg.log('Calc. Method : Fixed Rate - tenant rec area :'
1440: ||l_ten_recoverable_area);
1441: pnp_debug_pkg.log('Calc. Method : Fixed Rate - tenant occ% :'||
1442: l_ten_occupancy_pct);
1443: END IF;
1444:
1445: END IF; /* end of all cal. methods */
1445: END IF; /* end of all cal. methods */
1446:
1447: -- Calculate tenant's actual recovery
1448:
1449: pnp_debug_pkg.log('Error Code 16 : '||p_error_code);
1450: IF p_error_code <> -99 AND
1451: agr_lines_record.calc_method in ('FIXEDRT','PRORATSH')AND
1452: (nvl(l_rate,0) <> 0) AND
1453: (nvl(l_ten_recoverable_area,0) <> 0) AND
1458: l_ten_actual_recovery := l_amount_per_sft*((l_ten_recoverable_area*l_ten_occupancy_pct)/100);
1459:
1460: l_status := 'COMPLETE';
1461:
1462: pnp_debug_pkg.log('Calculation Method : Prorata Share/Fixed Rate - amount per sq ft :'||
1463: l_amount_per_sft);
1464: pnp_debug_pkg.log('Calculation Method : Prorata Share/Fixed Rate - tenant actual recovery :'||l_ten_actual_recovery||l_status);
1465:
1466: pnp_debug_pkg.log('Error Code 17 : '||p_error_code);
1460: l_status := 'COMPLETE';
1461:
1462: pnp_debug_pkg.log('Calculation Method : Prorata Share/Fixed Rate - amount per sq ft :'||
1463: l_amount_per_sft);
1464: pnp_debug_pkg.log('Calculation Method : Prorata Share/Fixed Rate - tenant actual recovery :'||l_ten_actual_recovery||l_status);
1465:
1466: pnp_debug_pkg.log('Error Code 17 : '||p_error_code);
1467: ELSIF p_error_code <> -99 AND
1468: agr_lines_record.calc_method in ('FIXEDRT','PRORATSH') AND
1462: pnp_debug_pkg.log('Calculation Method : Prorata Share/Fixed Rate - amount per sq ft :'||
1463: l_amount_per_sft);
1464: pnp_debug_pkg.log('Calculation Method : Prorata Share/Fixed Rate - tenant actual recovery :'||l_ten_actual_recovery||l_status);
1465:
1466: pnp_debug_pkg.log('Error Code 17 : '||p_error_code);
1467: ELSIF p_error_code <> -99 AND
1468: agr_lines_record.calc_method in ('FIXEDRT','PRORATSH') AND
1469: (nvl(l_rate,0) = 0 OR
1470: nvl(l_ten_recoverable_area,0) = 0 OR
1473: l_ten_actual_recovery := 0;
1474: l_status := 'ERROR';
1475: p_error := 'Rate or recoverable Area or Occupancy pct is zero';
1476: p_error_code := -99;
1477: pnp_debug_pkg.log('Rate or recoverable Area or Occupancy pct is zero');
1478: pnp_debug_pkg.log('Rate is ' || to_char(nvl(l_rate,0)));
1479: pnp_debug_pkg.log('Recoverable Area is ' || to_char(nvl(l_ten_recoverable_area,0)));
1480: pnp_debug_pkg.log('Occ. Pct. is ' || to_char(nvl(l_ten_occupancy_pct,0)));
1481:
1474: l_status := 'ERROR';
1475: p_error := 'Rate or recoverable Area or Occupancy pct is zero';
1476: p_error_code := -99;
1477: pnp_debug_pkg.log('Rate or recoverable Area or Occupancy pct is zero');
1478: pnp_debug_pkg.log('Rate is ' || to_char(nvl(l_rate,0)));
1479: pnp_debug_pkg.log('Recoverable Area is ' || to_char(nvl(l_ten_recoverable_area,0)));
1480: pnp_debug_pkg.log('Occ. Pct. is ' || to_char(nvl(l_ten_occupancy_pct,0)));
1481:
1482: END IF;
1475: p_error := 'Rate or recoverable Area or Occupancy pct is zero';
1476: p_error_code := -99;
1477: pnp_debug_pkg.log('Rate or recoverable Area or Occupancy pct is zero');
1478: pnp_debug_pkg.log('Rate is ' || to_char(nvl(l_rate,0)));
1479: pnp_debug_pkg.log('Recoverable Area is ' || to_char(nvl(l_ten_recoverable_area,0)));
1480: pnp_debug_pkg.log('Occ. Pct. is ' || to_char(nvl(l_ten_occupancy_pct,0)));
1481:
1482: END IF;
1483:
1476: p_error_code := -99;
1477: pnp_debug_pkg.log('Rate or recoverable Area or Occupancy pct is zero');
1478: pnp_debug_pkg.log('Rate is ' || to_char(nvl(l_rate,0)));
1479: pnp_debug_pkg.log('Recoverable Area is ' || to_char(nvl(l_ten_recoverable_area,0)));
1480: pnp_debug_pkg.log('Occ. Pct. is ' || to_char(nvl(l_ten_occupancy_pct,0)));
1481:
1482: END IF;
1483:
1484: pnp_debug_pkg.log('Error Code 18 : '||p_error_code);
1480: pnp_debug_pkg.log('Occ. Pct. is ' || to_char(nvl(l_ten_occupancy_pct,0)));
1481:
1482: END IF;
1483:
1484: pnp_debug_pkg.log('Error Code 18 : '||p_error_code);
1485: /* Get budget recovery for prorata share */
1486: IF p_error_code <> -99 AND
1487: agr_lines_record.calc_method = 'PRORATSH' AND
1488: nvl(l_budget_cost_per_area,0) <> 0 THEN
1494: END IF;
1495:
1496: ELSIF p_error_code <> -99 AND agr_lines_record.calc_method = 'FIXEDAMT' THEN
1497:
1498: pnp_debug_pkg.log('Error Code 19 : '||p_error_code);
1499: -- Tenant's actual recovery for fixed amount calc. method is user supplied
1500: l_status := 'COMPLETE';
1501: l_ten_actual_recovery := agr_lines_record.fixed_amount;
1502:
1499: -- Tenant's actual recovery for fixed amount calc. method is user supplied
1500: l_status := 'COMPLETE';
1501: l_ten_actual_recovery := agr_lines_record.fixed_amount;
1502:
1503: pnp_debug_pkg.log('Calculation Method : Fixed Amount - tenant actual recovery :'||l_ten_actual_recovery);
1504:
1505: END IF; /* end of getting actual recovery for all calculation methods */
1506:
1507: pnp_debug_pkg.log('Error Code 20 : '||p_error_code);
1503: pnp_debug_pkg.log('Calculation Method : Fixed Amount - tenant actual recovery :'||l_ten_actual_recovery);
1504:
1505: END IF; /* end of getting actual recovery for all calculation methods */
1506:
1507: pnp_debug_pkg.log('Error Code 20 : '||p_error_code);
1508: IF p_error_code <> -99 THEN
1509:
1510: -- Calculate billed recovery, constraints and abatements.
1511:
1508: IF p_error_code <> -99 THEN
1509:
1510: -- Calculate billed recovery, constraints and abatements.
1511:
1512: pnp_debug_pkg.log('get_billed_recovery - Agr line id : '||
1513: agr_lines_record.rec_agr_line_id);
1514: pnp_debug_pkg.log('get_billed_recovery - Payment Purpose: '||
1515: agr_lines_record.purpose);
1516: pnp_debug_pkg.log('get_billed_recovery - Payment Type: '||
1510: -- Calculate billed recovery, constraints and abatements.
1511:
1512: pnp_debug_pkg.log('get_billed_recovery - Agr line id : '||
1513: agr_lines_record.rec_agr_line_id);
1514: pnp_debug_pkg.log('get_billed_recovery - Payment Purpose: '||
1515: agr_lines_record.purpose);
1516: pnp_debug_pkg.log('get_billed_recovery - Payment Type: '||
1517: agr_lines_record.type);
1518: pnp_debug_pkg.log('get_billed_recovery - Lease id : '||p_lease_id);
1512: pnp_debug_pkg.log('get_billed_recovery - Agr line id : '||
1513: agr_lines_record.rec_agr_line_id);
1514: pnp_debug_pkg.log('get_billed_recovery - Payment Purpose: '||
1515: agr_lines_record.purpose);
1516: pnp_debug_pkg.log('get_billed_recovery - Payment Type: '||
1517: agr_lines_record.type);
1518: pnp_debug_pkg.log('get_billed_recovery - Lease id : '||p_lease_id);
1519: pnp_debug_pkg.log('get_billed_recovery - Location id : '||p_location_id); -- 110403
1520: pnp_debug_pkg.log('get_billed_recovery - Start Date : '||p_calc_period_start_date);
1514: pnp_debug_pkg.log('get_billed_recovery - Payment Purpose: '||
1515: agr_lines_record.purpose);
1516: pnp_debug_pkg.log('get_billed_recovery - Payment Type: '||
1517: agr_lines_record.type);
1518: pnp_debug_pkg.log('get_billed_recovery - Lease id : '||p_lease_id);
1519: pnp_debug_pkg.log('get_billed_recovery - Location id : '||p_location_id); -- 110403
1520: pnp_debug_pkg.log('get_billed_recovery - Start Date : '||p_calc_period_start_date);
1521: pnp_debug_pkg.log('get_billed_recovery - End Date : '||p_calc_period_end_date);
1522: pnp_debug_pkg.log('get_billed_recovery - Calc Period Id : '||p_rec_calc_period_id);
1515: agr_lines_record.purpose);
1516: pnp_debug_pkg.log('get_billed_recovery - Payment Type: '||
1517: agr_lines_record.type);
1518: pnp_debug_pkg.log('get_billed_recovery - Lease id : '||p_lease_id);
1519: pnp_debug_pkg.log('get_billed_recovery - Location id : '||p_location_id); -- 110403
1520: pnp_debug_pkg.log('get_billed_recovery - Start Date : '||p_calc_period_start_date);
1521: pnp_debug_pkg.log('get_billed_recovery - End Date : '||p_calc_period_end_date);
1522: pnp_debug_pkg.log('get_billed_recovery - Calc Period Id : '||p_rec_calc_period_id);
1523:
1516: pnp_debug_pkg.log('get_billed_recovery - Payment Type: '||
1517: agr_lines_record.type);
1518: pnp_debug_pkg.log('get_billed_recovery - Lease id : '||p_lease_id);
1519: pnp_debug_pkg.log('get_billed_recovery - Location id : '||p_location_id); -- 110403
1520: pnp_debug_pkg.log('get_billed_recovery - Start Date : '||p_calc_period_start_date);
1521: pnp_debug_pkg.log('get_billed_recovery - End Date : '||p_calc_period_end_date);
1522: pnp_debug_pkg.log('get_billed_recovery - Calc Period Id : '||p_rec_calc_period_id);
1523:
1524: l_billed_recovery := PN_REC_CALC_PKG.get_billed_recovery(
1517: agr_lines_record.type);
1518: pnp_debug_pkg.log('get_billed_recovery - Lease id : '||p_lease_id);
1519: pnp_debug_pkg.log('get_billed_recovery - Location id : '||p_location_id); -- 110403
1520: pnp_debug_pkg.log('get_billed_recovery - Start Date : '||p_calc_period_start_date);
1521: pnp_debug_pkg.log('get_billed_recovery - End Date : '||p_calc_period_end_date);
1522: pnp_debug_pkg.log('get_billed_recovery - Calc Period Id : '||p_rec_calc_period_id);
1523:
1524: l_billed_recovery := PN_REC_CALC_PKG.get_billed_recovery(
1525: p_payment_purpose => agr_lines_record.purpose
1518: pnp_debug_pkg.log('get_billed_recovery - Lease id : '||p_lease_id);
1519: pnp_debug_pkg.log('get_billed_recovery - Location id : '||p_location_id); -- 110403
1520: pnp_debug_pkg.log('get_billed_recovery - Start Date : '||p_calc_period_start_date);
1521: pnp_debug_pkg.log('get_billed_recovery - End Date : '||p_calc_period_end_date);
1522: pnp_debug_pkg.log('get_billed_recovery - Calc Period Id : '||p_rec_calc_period_id);
1523:
1524: l_billed_recovery := PN_REC_CALC_PKG.get_billed_recovery(
1525: p_payment_purpose => agr_lines_record.purpose
1526: ,p_payment_type => agr_lines_record.type
1541: p_error_code := 0;
1542:
1543: END IF;
1544:
1545: pnp_debug_pkg.log('Billed Recovery :'||l_billed_recovery);
1546:
1547: END IF;
1548:
1549: pnp_debug_pkg.log('Error Code 21 : '||p_error_code);
1545: pnp_debug_pkg.log('Billed Recovery :'||l_billed_recovery);
1546:
1547: END IF;
1548:
1549: pnp_debug_pkg.log('Error Code 21 : '||p_error_code);
1550: IF p_error_code <> -99 THEN
1551:
1552: line_constr_tbl := PN_REC_CALC_PKG.get_line_constraints(
1553: p_rec_agr_line_id => agr_lines_record.rec_agr_line_id ,
1568: END IF;
1569:
1570: END IF;
1571:
1572: pnp_debug_pkg.log('After getting constraints error code:'||p_error_code);
1573: pnp_debug_pkg.log('Error Code 22 : '||p_error_code);
1574: IF p_error_code <> -99 THEN
1575:
1576: l_prior_period_amount := PN_REC_CALC_PKG.get_prior_period_actual_amount(
1569:
1570: END IF;
1571:
1572: pnp_debug_pkg.log('After getting constraints error code:'||p_error_code);
1573: pnp_debug_pkg.log('Error Code 22 : '||p_error_code);
1574: IF p_error_code <> -99 THEN
1575:
1576: l_prior_period_amount := PN_REC_CALC_PKG.get_prior_period_actual_amount(
1577: p_rec_agr_line_id => agr_lines_record.rec_agr_line_id
1594: END IF;
1595:
1596: END IF;
1597:
1598: pnp_debug_pkg.log('Error Code 23 : '||p_error_code);
1599: IF p_error_code <> -99 THEN
1600:
1601: l_prior_period_cap := PN_REC_CALC_PKG.get_prior_period_cap(
1602: p_rec_agr_line_id => agr_lines_record.rec_agr_line_id
1620: END IF;
1621:
1622: END IF;
1623:
1624: pnp_debug_pkg.log('Error Code 24 : '||p_error_code);
1625: IF p_error_code <> -99 THEN
1626:
1627: l_line_abatements := PN_REC_CALC_PKG.get_line_abatements(
1628: p_rec_agr_line_id => agr_lines_record.rec_agr_line_id
1641: p_error_code := 0;
1642:
1643: END IF;
1644:
1645: pnp_debug_pkg.log('Abatements :'||l_line_abatements);
1646:
1647: END IF;
1648:
1649:
1646:
1647: END IF;
1648:
1649:
1650: pnp_debug_pkg.log('Error Code 25 : '||p_error_code);
1651: IF p_error_code <> -99 THEN
1652:
1653: /* Now apply the constraints on the actual recovery */
1654:
1701: and line_constr_tbl(l_count).relation = 'MIN') THEN
1702:
1703: l_rate_amt_exists := TRUE;
1704:
1705: pnp_debug_pkg.log('Min Rate Cons - amt per sqft : '||l_amount_per_sft);
1706: pnp_debug_pkg.log('Min Rate Cons - Cons. value : '||line_constr_tbl(l_count).value);
1707: l_rate_amt_exists := TRUE;
1708:
1709: IF l_amount_per_sft < line_constr_tbl(l_count).value THEN
1702:
1703: l_rate_amt_exists := TRUE;
1704:
1705: pnp_debug_pkg.log('Min Rate Cons - amt per sqft : '||l_amount_per_sft);
1706: pnp_debug_pkg.log('Min Rate Cons - Cons. value : '||line_constr_tbl(l_count).value);
1707: l_rate_amt_exists := TRUE;
1708:
1709: IF l_amount_per_sft < line_constr_tbl(l_count).value THEN
1710: l_constrained_actual :=
1727: and line_constr_tbl(l_count).relation = 'MAX') THEN
1728:
1729: l_rate_amt_exists := TRUE;
1730:
1731: pnp_debug_pkg.log('Max Rate Cons - amt per sqft : '||l_amount_per_sft);
1732: pnp_debug_pkg.log('Max Rate Cons - Cons. value : '||line_constr_tbl(l_count).value);
1733:
1734: IF l_amount_per_sft > line_constr_tbl(l_count).value THEN
1735: l_constrained_actual :=
1728:
1729: l_rate_amt_exists := TRUE;
1730:
1731: pnp_debug_pkg.log('Max Rate Cons - amt per sqft : '||l_amount_per_sft);
1732: pnp_debug_pkg.log('Max Rate Cons - Cons. value : '||line_constr_tbl(l_count).value);
1733:
1734: IF l_amount_per_sft > line_constr_tbl(l_count).value THEN
1735: l_constrained_actual :=
1736: (line_constr_tbl(l_count).value * agr_lines_record.multiple_pct/100) *
1750: END IF;
1751: END LOOP;
1752: END IF;
1753:
1754: pnp_debug_pkg.log('Constrained Actual after min/max cons : '||l_constrained_actual);
1755: pnp_debug_pkg.log('Constrained Budget after min/max cons : '||l_constrained_budget);
1756:
1757: /* If rate or amount type of constraints do not exists only then
1758: apply the %age over prior year amount or %age over prior year
1751: END LOOP;
1752: END IF;
1753:
1754: pnp_debug_pkg.log('Constrained Actual after min/max cons : '||l_constrained_actual);
1755: pnp_debug_pkg.log('Constrained Budget after min/max cons : '||l_constrained_budget);
1756:
1757: /* If rate or amount type of constraints do not exists only then
1758: apply the %age over prior year amount or %age over prior year
1759: cap constraint */
1757: /* If rate or amount type of constraints do not exists only then
1758: apply the %age over prior year amount or %age over prior year
1759: cap constraint */
1760:
1761: pnp_debug_pkg.log('Error Code 26 : '||p_error_code);
1762: IF p_error_code <> -99 AND not l_rate_amt_exists THEN
1763:
1764: /* verify that both %age over prior year amount or %age over prior year
1765: cap type of constraints DO NOT exist */
1788:
1789: IF l_opya_exists and l_opyc_exists THEN
1790:
1791: fnd_message.set_name ('PN','PN_RECALC_CAP_EXT');
1792: pnp_debug_pkg.put_log_msg(fnd_message.get);
1793:
1794: p_error := 'Both cumulative and non-cumulative caps exists.';
1795: p_error_code := -99;
1796:
1808: IF (line_constr_tbl(l_count).scope = 'OPYA'
1809: and line_constr_tbl(l_count).relation = 'MAX')
1810: and l_prior_period_amount <> -1 THEN
1811:
1812: pnp_debug_pkg.log('Prior Period Amount :'||l_prior_period_amount);
1813: pnp_debug_pkg.log('OPYA - Actual Recovery :'||l_ten_actual_recovery);
1814: pnp_debug_pkg.log('OPYA - Budget Recovery :'||l_budget_recovery);
1815:
1816: IF l_ten_actual_recovery <
1809: and line_constr_tbl(l_count).relation = 'MAX')
1810: and l_prior_period_amount <> -1 THEN
1811:
1812: pnp_debug_pkg.log('Prior Period Amount :'||l_prior_period_amount);
1813: pnp_debug_pkg.log('OPYA - Actual Recovery :'||l_ten_actual_recovery);
1814: pnp_debug_pkg.log('OPYA - Budget Recovery :'||l_budget_recovery);
1815:
1816: IF l_ten_actual_recovery <
1817: ((line_constr_tbl(l_count).value*l_prior_period_amount/100)+
1810: and l_prior_period_amount <> -1 THEN
1811:
1812: pnp_debug_pkg.log('Prior Period Amount :'||l_prior_period_amount);
1813: pnp_debug_pkg.log('OPYA - Actual Recovery :'||l_ten_actual_recovery);
1814: pnp_debug_pkg.log('OPYA - Budget Recovery :'||l_budget_recovery);
1815:
1816: IF l_ten_actual_recovery <
1817: ((line_constr_tbl(l_count).value*l_prior_period_amount/100)+
1818: l_prior_period_amount) THEN
1844: ELSIF (line_constr_tbl(l_count).scope = 'OPYC'
1845: and line_constr_tbl(l_count).relation = 'MAX')
1846: and l_prior_period_cap <> -1 THEN
1847:
1848: pnp_debug_pkg.log('Prior Period Cap :'||l_prior_period_cap);
1849: pnp_debug_pkg.log('OPYC - Actual Recovery :'||l_ten_actual_recovery);
1850: pnp_debug_pkg.log('OPYC - Budget Recovery :'||l_budget_recovery);
1851:
1852: IF l_ten_actual_recovery < l_prior_period_cap THEN
1845: and line_constr_tbl(l_count).relation = 'MAX')
1846: and l_prior_period_cap <> -1 THEN
1847:
1848: pnp_debug_pkg.log('Prior Period Cap :'||l_prior_period_cap);
1849: pnp_debug_pkg.log('OPYC - Actual Recovery :'||l_ten_actual_recovery);
1850: pnp_debug_pkg.log('OPYC - Budget Recovery :'||l_budget_recovery);
1851:
1852: IF l_ten_actual_recovery < l_prior_period_cap THEN
1853:
1846: and l_prior_period_cap <> -1 THEN
1847:
1848: pnp_debug_pkg.log('Prior Period Cap :'||l_prior_period_cap);
1849: pnp_debug_pkg.log('OPYC - Actual Recovery :'||l_ten_actual_recovery);
1850: pnp_debug_pkg.log('OPYC - Budget Recovery :'||l_budget_recovery);
1851:
1852: IF l_ten_actual_recovery < l_prior_period_cap THEN
1853:
1854: l_constrained_actual := l_ten_actual_recovery;
1872: END IF;
1873:
1874: END LOOP;
1875:
1876: pnp_debug_pkg.log('Constrained Actual :'||l_constrained_actual);
1877: pnp_debug_pkg.log('Constrained Budget :'||l_constrained_budget);
1878:
1879: END IF;
1880:
1873:
1874: END LOOP;
1875:
1876: pnp_debug_pkg.log('Constrained Actual :'||l_constrained_actual);
1877: pnp_debug_pkg.log('Constrained Budget :'||l_constrained_budget);
1878:
1879: END IF;
1880:
1881: END IF;
1879: END IF;
1880:
1881: END IF;
1882:
1883: pnp_debug_pkg.log('Error Code 27 : '||p_error_code);
1884:
1885: IF p_error_code <> -99 THEN
1886:
1887: /* Apply abatements to actual */
1895: l_actual_prorata_share := 0;
1896:
1897: END IF;
1898:
1899: pnp_debug_pkg.log('Actual Prorata Share :'||l_actual_prorata_share);
1900:
1901: /* Apply abatements to Budget */
1902:
1903: IF nvl(l_constrained_budget,0) > nvl(l_line_abatements,0) THEN
1909: l_budget_prorata_share := 0;
1910:
1911: END IF;
1912:
1913: pnp_debug_pkg.log('Budget Prorata Share :'||l_budget_prorata_share);
1914:
1915: /* Apply Billed Recovery to actual */
1916:
1917: IF nvl(l_actual_prorata_share,0) > nvl(l_billed_recovery,0) THEN
1933: END IF;
1934:
1935: END IF;
1936:
1937: pnp_debug_pkg.log('Reconciled Amount :'||l_reconciled_amount);
1938:
1939: END IF;
1940:
1941: pnp_debug_pkg.log('Error Code 28 : '||p_error_code);
1937: pnp_debug_pkg.log('Reconciled Amount :'||l_reconciled_amount);
1938:
1939: END IF;
1940:
1941: pnp_debug_pkg.log('Error Code 28 : '||p_error_code);
1942: IF p_error_code <> -99 THEN
1943:
1944: /* Check if recovery amount has already been calculated for the period start and
1945: end dates and the as of date.If it has not, then insert a new record into the
1961: p_error_code := 0;
1962:
1963: END IF;
1964:
1965: pnp_debug_pkg.log('Recovery period line id :'||l_rec_period_lines_id);
1966:
1967: END IF;
1968:
1969: pnp_debug_pkg.log('Error Code 29 : '||p_error_code);
1965: pnp_debug_pkg.log('Recovery period line id :'||l_rec_period_lines_id);
1966:
1967: END IF;
1968:
1969: pnp_debug_pkg.log('Error Code 29 : '||p_error_code);
1970: IF p_error_code <> -99 and l_rec_period_lines_id IS NULL THEN
1971:
1972: pnp_debug_pkg.log('Inserting into PN_REC_PERIOD_LINES_ALL ');
1973:
1968:
1969: pnp_debug_pkg.log('Error Code 29 : '||p_error_code);
1970: IF p_error_code <> -99 and l_rec_period_lines_id IS NULL THEN
1971:
1972: pnp_debug_pkg.log('Inserting into PN_REC_PERIOD_LINES_ALL ');
1973:
1974: IF p_error_code = -99 THEN
1975: l_status := 'Error';
1976: ELSE
2027:
2028: END IF;
2029:
2030: ELSIF p_error_code <> -99 AND l_rec_period_lines_id is not null THEN
2031: pnp_debug_pkg.log('Error Code 30 : '||p_error_code);
2032:
2033: pnp_debug_pkg.log('Updating PN_REC_PERIOD_LINES_ALL ');
2034:
2035: IF p_error_code = -99 THEN
2029:
2030: ELSIF p_error_code <> -99 AND l_rec_period_lines_id is not null THEN
2031: pnp_debug_pkg.log('Error Code 30 : '||p_error_code);
2032:
2033: pnp_debug_pkg.log('Updating PN_REC_PERIOD_LINES_ALL ');
2034:
2035: IF p_error_code = -99 THEN
2036: l_status := 'Error';
2037: ELSE
2095: END IF;
2096:
2097: END LOOP;
2098:
2099: pnp_debug_pkg.put_log_msg(' ');
2100: pnp_debug_pkg.put_log_msg('===============================================================================');
2101:
2102: fnd_message.set_name ('PN','PN_RECALC_LINE_PROC');
2103: fnd_message.set_token ('NUM', l_total_lines);
2096:
2097: END LOOP;
2098:
2099: pnp_debug_pkg.put_log_msg(' ');
2100: pnp_debug_pkg.put_log_msg('===============================================================================');
2101:
2102: fnd_message.set_name ('PN','PN_RECALC_LINE_PROC');
2103: fnd_message.set_token ('NUM', l_total_lines);
2104: pnp_debug_pkg.put_log_msg(fnd_message.get);
2100: pnp_debug_pkg.put_log_msg('===============================================================================');
2101:
2102: fnd_message.set_name ('PN','PN_RECALC_LINE_PROC');
2103: fnd_message.set_token ('NUM', l_total_lines);
2104: pnp_debug_pkg.put_log_msg(fnd_message.get);
2105:
2106: fnd_message.set_name ('PN','PN_RECALC_LINE_SUC');
2107: fnd_message.set_token ('NUM', l_success_lines);
2108: pnp_debug_pkg.put_log_msg(fnd_message.get);
2104: pnp_debug_pkg.put_log_msg(fnd_message.get);
2105:
2106: fnd_message.set_name ('PN','PN_RECALC_LINE_SUC');
2107: fnd_message.set_token ('NUM', l_success_lines);
2108: pnp_debug_pkg.put_log_msg(fnd_message.get);
2109:
2110: fnd_message.set_name ('PN','PN_RECALC_LINE_FAIL');
2111: fnd_message.set_token ('NUM', l_error_lines);
2112: pnp_debug_pkg.put_log_msg(fnd_message.get);
2108: pnp_debug_pkg.put_log_msg(fnd_message.get);
2109:
2110: fnd_message.set_name ('PN','PN_RECALC_LINE_FAIL');
2111: fnd_message.set_token ('NUM', l_error_lines);
2112: pnp_debug_pkg.put_log_msg(fnd_message.get);
2113:
2114: pnp_debug_pkg.put_log_msg('===============================================================================');
2115:
2116: IF agr_lines_all%ISOPEN THEN
2110: fnd_message.set_name ('PN','PN_RECALC_LINE_FAIL');
2111: fnd_message.set_token ('NUM', l_error_lines);
2112: pnp_debug_pkg.put_log_msg(fnd_message.get);
2113:
2114: pnp_debug_pkg.put_log_msg('===============================================================================');
2115:
2116: IF agr_lines_all%ISOPEN THEN
2117: CLOSE agr_lines_all;
2118: ELSIF agr_lines_one%ISOPEN THEN
2146:
2147: END IF;
2148:
2149:
2150: pnp_debug_pkg.log('Consolidate Terms - Yes/No :'||l_consolidate);
2151:
2152: IF l_consolidate = 'Y' and
2153: (l_open_exists = 'Y' OR l_no_prd_line = 'Y') THEN
2154:
2152: IF l_consolidate = 'Y' and
2153: (l_open_exists = 'Y' OR l_no_prd_line = 'Y') THEN
2154:
2155: fnd_message.set_name ('PN','PN_RECALC_LN_INCOM');
2156: pnp_debug_pkg.put_log_msg(fnd_message.get);
2157:
2158: fnd_message.set_name ('PN','PN_RECALC_BT_NOT_CRTD');
2159: pnp_debug_pkg.put_log_msg(fnd_message.get);
2160:
2155: fnd_message.set_name ('PN','PN_RECALC_LN_INCOM');
2156: pnp_debug_pkg.put_log_msg(fnd_message.get);
2157:
2158: fnd_message.set_name ('PN','PN_RECALC_BT_NOT_CRTD');
2159: pnp_debug_pkg.put_log_msg(fnd_message.get);
2160:
2161: p_error := 'Calculation not successful for all lines';
2162: p_error_code := -99;
2163:
2163:
2164: ELSIF (l_consolidate = 'Y' and (l_open_exists = 'N' AND l_no_prd_line = 'N')) OR
2165: (l_consolidate = 'N') THEN
2166:
2167: pnp_debug_pkg.log('Creating Term(s).....');
2168:
2169: pnp_debug_pkg.log('Consolidate Terms - Yes/No :'||l_consolidate);
2170:
2171: IF l_calculate_all AND l_consolidate = 'Y' THEN
2165: (l_consolidate = 'N') THEN
2166:
2167: pnp_debug_pkg.log('Creating Term(s).....');
2168:
2169: pnp_debug_pkg.log('Consolidate Terms - Yes/No :'||l_consolidate);
2170:
2171: IF l_calculate_all AND l_consolidate = 'Y' THEN
2172:
2173: /* get the sum of reconciled amount for all the lines for the
2172:
2173: /* get the sum of reconciled amount for all the lines for the
2174: recovery agreement */
2175:
2176: pnp_debug_pkg.log('Opening cursor for Calculate All and Consolidate Terms');
2177: pnp_debug_pkg.log('Agreement Id '|| p_rec_agreement_id);
2178:
2179: OPEN calc_all_cons;
2180:
2173: /* get the sum of reconciled amount for all the lines for the
2174: recovery agreement */
2175:
2176: pnp_debug_pkg.log('Opening cursor for Calculate All and Consolidate Terms');
2177: pnp_debug_pkg.log('Agreement Id '|| p_rec_agreement_id);
2178:
2179: OPEN calc_all_cons;
2180:
2181: ELSIF l_calculate_all AND l_consolidate = 'N' THEN
2182:
2183: /* get the reconciled amounts for all the lines of the agreement for which
2184: calculation has been successfully */
2185:
2186: pnp_debug_pkg.log('Opening cursor for Calculate All and no consolidation');
2187: pnp_debug_pkg.log('Agreement Id '|| p_rec_agreement_id);
2188:
2189: OPEN calc_all_no_cons;
2190:
2183: /* get the reconciled amounts for all the lines of the agreement for which
2184: calculation has been successfully */
2185:
2186: pnp_debug_pkg.log('Opening cursor for Calculate All and no consolidation');
2187: pnp_debug_pkg.log('Agreement Id '|| p_rec_agreement_id);
2188:
2189: OPEN calc_all_no_cons;
2190:
2191: ELSIF not l_calculate_all AND l_consolidate = 'Y' THEN
2192:
2193: /* get the sum of reconciled amount for all the lines for the
2194: recovery agreement of the line passed to the routine */
2195:
2196: pnp_debug_pkg.log('Opening cursor for Calculate and Consolidate Terms');
2197: pnp_debug_pkg.log('Agreement Id '|| p_rec_agreement_id);
2198:
2199: OPEN calc_all_cons;
2200:
2193: /* get the sum of reconciled amount for all the lines for the
2194: recovery agreement of the line passed to the routine */
2195:
2196: pnp_debug_pkg.log('Opening cursor for Calculate and Consolidate Terms');
2197: pnp_debug_pkg.log('Agreement Id '|| p_rec_agreement_id);
2198:
2199: OPEN calc_all_cons;
2200:
2201: ELSIF not l_calculate_all AND l_consolidate = 'N' THEN
2202:
2203: /* get the reconciled amount for the lines which was passed to the calculate
2204: routine and for which the calculation has been successful */
2205:
2206: pnp_debug_pkg.log('Opening cursor for Calculate and no consolidation');
2207: pnp_debug_pkg.log('Agreement Line Id '|| p_rec_agr_line_id);
2208: OPEN calc_no_cons;
2209:
2210: END IF;
2203: /* get the reconciled amount for the lines which was passed to the calculate
2204: routine and for which the calculation has been successful */
2205:
2206: pnp_debug_pkg.log('Opening cursor for Calculate and no consolidation');
2207: pnp_debug_pkg.log('Agreement Line Id '|| p_rec_agr_line_id);
2208: OPEN calc_no_cons;
2209:
2210: END IF;
2211:
2254: END IF;
2255:
2256: END IF;
2257:
2258: pnp_debug_pkg.log('Line Id :'||l_rec_agr_line_id);
2259: pnp_debug_pkg.log('Term start Date :'||l_end_date);
2260: pnp_debug_pkg.log(' Lease Id :'||p_lease_id);
2261: pnp_debug_pkg.log(' Reconciled Amount:'||l_reconciled_amount);
2262: pnp_debug_pkg.log('Calc Period Id :'||p_rec_calc_period_id);
2255:
2256: END IF;
2257:
2258: pnp_debug_pkg.log('Line Id :'||l_rec_agr_line_id);
2259: pnp_debug_pkg.log('Term start Date :'||l_end_date);
2260: pnp_debug_pkg.log(' Lease Id :'||p_lease_id);
2261: pnp_debug_pkg.log(' Reconciled Amount:'||l_reconciled_amount);
2262: pnp_debug_pkg.log('Calc Period Id :'||p_rec_calc_period_id);
2263: pnp_debug_pkg.log('Calc Period End date :'||l_end_date);
2256: END IF;
2257:
2258: pnp_debug_pkg.log('Line Id :'||l_rec_agr_line_id);
2259: pnp_debug_pkg.log('Term start Date :'||l_end_date);
2260: pnp_debug_pkg.log(' Lease Id :'||p_lease_id);
2261: pnp_debug_pkg.log(' Reconciled Amount:'||l_reconciled_amount);
2262: pnp_debug_pkg.log('Calc Period Id :'||p_rec_calc_period_id);
2263: pnp_debug_pkg.log('Calc Period End date :'||l_end_date);
2264: pnp_debug_pkg.log('Agreement Id :'||p_rec_agreement_id);
2257:
2258: pnp_debug_pkg.log('Line Id :'||l_rec_agr_line_id);
2259: pnp_debug_pkg.log('Term start Date :'||l_end_date);
2260: pnp_debug_pkg.log(' Lease Id :'||p_lease_id);
2261: pnp_debug_pkg.log(' Reconciled Amount:'||l_reconciled_amount);
2262: pnp_debug_pkg.log('Calc Period Id :'||p_rec_calc_period_id);
2263: pnp_debug_pkg.log('Calc Period End date :'||l_end_date);
2264: pnp_debug_pkg.log('Agreement Id :'||p_rec_agreement_id);
2265: pnp_debug_pkg.log('Location Id :'||p_location_id);
2258: pnp_debug_pkg.log('Line Id :'||l_rec_agr_line_id);
2259: pnp_debug_pkg.log('Term start Date :'||l_end_date);
2260: pnp_debug_pkg.log(' Lease Id :'||p_lease_id);
2261: pnp_debug_pkg.log(' Reconciled Amount:'||l_reconciled_amount);
2262: pnp_debug_pkg.log('Calc Period Id :'||p_rec_calc_period_id);
2263: pnp_debug_pkg.log('Calc Period End date :'||l_end_date);
2264: pnp_debug_pkg.log('Agreement Id :'||p_rec_agreement_id);
2265: pnp_debug_pkg.log('Location Id :'||p_location_id);
2266: pnp_debug_pkg.log('Billing Type :'||l_billing_type);
2259: pnp_debug_pkg.log('Term start Date :'||l_end_date);
2260: pnp_debug_pkg.log(' Lease Id :'||p_lease_id);
2261: pnp_debug_pkg.log(' Reconciled Amount:'||l_reconciled_amount);
2262: pnp_debug_pkg.log('Calc Period Id :'||p_rec_calc_period_id);
2263: pnp_debug_pkg.log('Calc Period End date :'||l_end_date);
2264: pnp_debug_pkg.log('Agreement Id :'||p_rec_agreement_id);
2265: pnp_debug_pkg.log('Location Id :'||p_location_id);
2266: pnp_debug_pkg.log('Billing Type :'||l_billing_type);
2267: pnp_debug_pkg.log('Billing Purpose :'||l_billing_purpose);
2260: pnp_debug_pkg.log(' Lease Id :'||p_lease_id);
2261: pnp_debug_pkg.log(' Reconciled Amount:'||l_reconciled_amount);
2262: pnp_debug_pkg.log('Calc Period Id :'||p_rec_calc_period_id);
2263: pnp_debug_pkg.log('Calc Period End date :'||l_end_date);
2264: pnp_debug_pkg.log('Agreement Id :'||p_rec_agreement_id);
2265: pnp_debug_pkg.log('Location Id :'||p_location_id);
2266: pnp_debug_pkg.log('Billing Type :'||l_billing_type);
2267: pnp_debug_pkg.log('Billing Purpose :'||l_billing_purpose);
2268:
2261: pnp_debug_pkg.log(' Reconciled Amount:'||l_reconciled_amount);
2262: pnp_debug_pkg.log('Calc Period Id :'||p_rec_calc_period_id);
2263: pnp_debug_pkg.log('Calc Period End date :'||l_end_date);
2264: pnp_debug_pkg.log('Agreement Id :'||p_rec_agreement_id);
2265: pnp_debug_pkg.log('Location Id :'||p_location_id);
2266: pnp_debug_pkg.log('Billing Type :'||l_billing_type);
2267: pnp_debug_pkg.log('Billing Purpose :'||l_billing_purpose);
2268:
2269: IF l_rec_agr_line_id is null THEN
2262: pnp_debug_pkg.log('Calc Period Id :'||p_rec_calc_period_id);
2263: pnp_debug_pkg.log('Calc Period End date :'||l_end_date);
2264: pnp_debug_pkg.log('Agreement Id :'||p_rec_agreement_id);
2265: pnp_debug_pkg.log('Location Id :'||p_location_id);
2266: pnp_debug_pkg.log('Billing Type :'||l_billing_type);
2267: pnp_debug_pkg.log('Billing Purpose :'||l_billing_purpose);
2268:
2269: IF l_rec_agr_line_id is null THEN
2270: l_rec_agr_line_id := -1;
2263: pnp_debug_pkg.log('Calc Period End date :'||l_end_date);
2264: pnp_debug_pkg.log('Agreement Id :'||p_rec_agreement_id);
2265: pnp_debug_pkg.log('Location Id :'||p_location_id);
2266: pnp_debug_pkg.log('Billing Type :'||l_billing_type);
2267: pnp_debug_pkg.log('Billing Purpose :'||l_billing_purpose);
2268:
2269: IF l_rec_agr_line_id is null THEN
2270: l_rec_agr_line_id := -1;
2271: pnp_debug_pkg.log('Set Line Id to -1');
2267: pnp_debug_pkg.log('Billing Purpose :'||l_billing_purpose);
2268:
2269: IF l_rec_agr_line_id is null THEN
2270: l_rec_agr_line_id := -1;
2271: pnp_debug_pkg.log('Set Line Id to -1');
2272: END IF;
2273:
2274: PN_REC_CALC_PKG.create_payment_terms(
2275: p_lease_id => p_lease_id
2326: END LOOP;
2327:
2328: END IF;
2329:
2330: pnp_debug_pkg.log('PN_REC_CALC_PKG.CALCULATE_REC_AMOUNT (-) ');
2331:
2332: EXCEPTION
2333:
2334: When OTHERS Then
2331:
2332: EXCEPTION
2333:
2334: When OTHERS Then
2335: pnp_debug_pkg.log('PN_REC_CALC_PKG.CALCULATE_REC_AMOUNT '|| to_char(sqlcode));
2336:
2337: END CALCULATE_REC_AMOUNT;
2338:
2339: /*===========================================================================+
2375: l_recoverable_area pn_rec_period_lines_all.recoverable_area%TYPE;
2376:
2377: BEGIN
2378:
2379: pnp_debug_pkg.log('PN_REC_CALC_PKG.get_recoverable_area (+) ');
2380:
2381: SELECT NVL(plines.recoverable_area,0)
2382: INTO l_recoverable_area
2383: FROM pn_rec_period_lines_all plines
2384: WHERE plines.rec_agr_line_id = p_rec_agr_line_id
2385: AND plines.rec_calc_period_id = p_rec_calc_period_id
2386: ;
2387:
2388: pnp_debug_pkg.log('PN_REC_CALC_PKG.get_recoverable_area (-) ');
2389:
2390: RETURN l_recoverable_area;
2391:
2392:
2394:
2395: WHEN OTHERS
2396: THEN
2397: fnd_message.set_name ('PN','PN_RECALB_TNT_AR');
2398: pnp_debug_pkg.put_log_msg(fnd_message.get||' '||to_char(sqlcode));
2399: RETURN -99;
2400:
2401:
2402: END get_recoverable_area;
2484: AND area_class_dtl_lines.location_id = p_location_id
2485: ;
2486: BEGIN
2487:
2488: pnp_debug_pkg.log('PN_REC_CALC_PKG.get_tot_prop_area (+) ');
2489:
2490: l_context := 'getting area type';
2491:
2492: open c_area;
2499: if c_area%NotFound then
2500: l_tot_prop_area := -99;
2501: close c_area;
2502: fnd_message.set_name ('PN','PN_RECALB_AR_NF');
2503: pnp_debug_pkg.put_log_msg(fnd_message.get);
2504: RETURN l_tot_prop_area;
2505: end if;
2506:
2507: l_context := 'getting contributors';
2546: l_greater_area := l_net_wgt_avg_area;
2547: end if;
2548: l_tot_prop_area := l_greater_area;
2549:
2550: pnp_debug_pkg.log('PN_REC_CALC_PKG.get_tot_prop_area (-) ');
2551:
2552: RETURN l_tot_prop_area;
2553:
2554: EXCEPTION
2553:
2554: EXCEPTION
2555:
2556: WHEN OTHERS THEN
2557: pnp_debug_pkg.log(substrb('Error in get_tot_prop_area - '|| l_context,1,244));
2558: pnp_debug_pkg.log('Error in get_tot_prop_area - '|| to_char(sqlcode));
2559: RETURN -99;
2560:
2561:
2554: EXCEPTION
2555:
2556: WHEN OTHERS THEN
2557: pnp_debug_pkg.log(substrb('Error in get_tot_prop_area - '|| l_context,1,244));
2558: pnp_debug_pkg.log('Error in get_tot_prop_area - '|| to_char(sqlcode));
2559: RETURN -99;
2560:
2561:
2562: END get_tot_prop_area;
2605: l_ten_recoverable_area_rec ten_recoverable_area_rec;
2606:
2607: BEGIN
2608:
2609: pnp_debug_pkg.log('PN_REC_CALC_PKG.ten_recoverable_area (+) ');
2610:
2611: SELECT nvl(area_class_dtl_lines.occupied_area_ovr, area_class_dtl_lines.occupied_area)
2612: ,occupancy_pct
2613: INTO l_ten_recoverable_area_rec
2628: AND area_class_dtl_lines.location_id = p_location_id
2629: AND area_class_dtl_lines.include_flag = 'Y'
2630: ;
2631:
2632: pnp_debug_pkg.log('PN_REC_CALC_PKG.ten_recoverable_area (-) ');
2633:
2634: RETURN l_ten_recoverable_area_rec;
2635:
2636: EXCEPTION
2637:
2638: WHEN OTHERS
2639: THEN
2640:
2641: pnp_debug_pkg.log('Error while getting tenant occupied area ' || to_char(sqlcode));
2642: l_ten_recoverable_area_rec.occupied_area := -99;
2643: l_ten_recoverable_area_rec.occupancy_pct := -99;
2644: RETURN l_ten_recoverable_area_rec;
2645:
2751: l_line_type pn_rec_agr_lines_all.TYPE%TYPE;
2752:
2753: BEGIN
2754:
2755: pnp_debug_pkg.log('PN_REC_CALC_PKG.get_contr_actual_recovery (+) ');
2756:
2757: -- Fix for bug # 3123283
2758: OPEN csr_get_line;
2759: FETCH csr_get_line into l_line_purpose, l_line_type;
2773:
2774: OPEN chk_contr_calculated(l_line_purpose, l_line_type); -- Fix for bug # 3123283
2775: FETCH chk_contr_calculated into l_exists;
2776: IF chk_contr_calculated%FOUND and l_exists = 'Y' THEN
2777: pnp_debug_pkg.log('Calculation has not been done for one of the contributors ');
2778: close chk_contr_calculated;
2779: IF p_called_from = 'CALCUI' THEN
2780: return 0;
2781: ELSE
2825: AND area_class_dtl_lines.include_flag = 'Y'
2826: AND area_class_dtl_lines.exclude_prorata_ovr_flag = 'Y'
2827: );
2828:
2829: pnp_debug_pkg.log('get_contr_actual_recovery contributor exp ' ||
2830: to_char(l_contr_actual_recovery));
2831:
2832: IF p_called_from = 'CALCUI'AND l_contr_actual_recovery = 0 THEN
2833: RETURN 0;
2840: WHEN OTHERS
2841: THEN
2842:
2843: fnd_message.set_name ('PN','PN_RECALC_CAL_NOT_CONTRB');
2844: pnp_debug_pkg.put_log_msg(fnd_message.get);
2845: pnp_debug_pkg.put_log_msg(TO_CHAR(sqlcode));
2846: IF p_called_from = 'CALCUI' THEN
2847: RETURN 0;
2848: ELSE
2841: THEN
2842:
2843: fnd_message.set_name ('PN','PN_RECALC_CAL_NOT_CONTRB');
2844: pnp_debug_pkg.put_log_msg(fnd_message.get);
2845: pnp_debug_pkg.put_log_msg(TO_CHAR(sqlcode));
2846: IF p_called_from = 'CALCUI' THEN
2847: RETURN 0;
2848: ELSE
2849: RETURN -99;
2848: ELSE
2849: RETURN -99;
2850: END IF;
2851:
2852: pnp_debug_pkg.log('PN_REC_CALC_PKG.get_contr_actual_recovery (-) ');
2853:
2854: END get_contr_actual_recovery;
2855:
2856: /*===========================================================================+
2903: l_fee_after pn_rec_expcl_dtlln_all.cls_line_fee_after_contr_ovr%TYPE;
2904:
2905: BEGIN
2906:
2907: pnp_debug_pkg.log('PN_REC_CALC_PKG.get_line_expenses (+) ');
2908:
2909: SELECT nvl(exp_detail_line.computed_recoverable_amt,0),
2910: nvl(exp_detail_line.cls_line_fee_before_contr_ovr,0),
2911: nvl(exp_detail_hdr.cls_line_fee_after_contr,0)
2945: p_error := 'Error getting line expenses' || to_char(sqlcode);
2946: p_error_code := -99;
2947:
2948: fnd_message.set_name ('PN','PN_RECALB_LNEXP_NF');
2949: pnp_debug_pkg.put_log_msg(fnd_message.get||' '|| to_char(sqlcode));
2950:
2951: pnp_debug_pkg.log('PN_REC_CALC_PKG.get_line_expenses (-) ');
2952:
2953: END get_line_expenses;
2947:
2948: fnd_message.set_name ('PN','PN_RECALB_LNEXP_NF');
2949: pnp_debug_pkg.put_log_msg(fnd_message.get||' '|| to_char(sqlcode));
2950:
2951: pnp_debug_pkg.log('PN_REC_CALC_PKG.get_line_expenses (-) ');
2952:
2953: END get_line_expenses;
2954:
2955: /*===========================================================================+
2998: l_budget_expenses pn_rec_expcl_dtlln_all.budgeted_amt%TYPE;
2999:
3000: BEGIN
3001:
3002: pnp_debug_pkg.log('PN_REC_CALC_PKG.get_budget_expenses (+) ');
3003: pnp_debug_pkg.log('Agr line ID: '||p_rec_agr_line_id);
3004: pnp_debug_pkg.log('Cust ID: '||p_customer_id);
3005: pnp_debug_pkg.log('lease ID: '||p_lease_id);
3006: pnp_debug_pkg.log('Location ID: '||p_location_id);
2999:
3000: BEGIN
3001:
3002: pnp_debug_pkg.log('PN_REC_CALC_PKG.get_budget_expenses (+) ');
3003: pnp_debug_pkg.log('Agr line ID: '||p_rec_agr_line_id);
3004: pnp_debug_pkg.log('Cust ID: '||p_customer_id);
3005: pnp_debug_pkg.log('lease ID: '||p_lease_id);
3006: pnp_debug_pkg.log('Location ID: '||p_location_id);
3007: pnp_debug_pkg.log('Start Date : '||p_calc_period_start_date);
3000: BEGIN
3001:
3002: pnp_debug_pkg.log('PN_REC_CALC_PKG.get_budget_expenses (+) ');
3003: pnp_debug_pkg.log('Agr line ID: '||p_rec_agr_line_id);
3004: pnp_debug_pkg.log('Cust ID: '||p_customer_id);
3005: pnp_debug_pkg.log('lease ID: '||p_lease_id);
3006: pnp_debug_pkg.log('Location ID: '||p_location_id);
3007: pnp_debug_pkg.log('Start Date : '||p_calc_period_start_date);
3008: pnp_debug_pkg.log('End Date : ' ||p_calc_period_end_date);
3001:
3002: pnp_debug_pkg.log('PN_REC_CALC_PKG.get_budget_expenses (+) ');
3003: pnp_debug_pkg.log('Agr line ID: '||p_rec_agr_line_id);
3004: pnp_debug_pkg.log('Cust ID: '||p_customer_id);
3005: pnp_debug_pkg.log('lease ID: '||p_lease_id);
3006: pnp_debug_pkg.log('Location ID: '||p_location_id);
3007: pnp_debug_pkg.log('Start Date : '||p_calc_period_start_date);
3008: pnp_debug_pkg.log('End Date : ' ||p_calc_period_end_date);
3009: pnp_debug_pkg.log('As of Date : '||p_calc_period_as_of_date);
3002: pnp_debug_pkg.log('PN_REC_CALC_PKG.get_budget_expenses (+) ');
3003: pnp_debug_pkg.log('Agr line ID: '||p_rec_agr_line_id);
3004: pnp_debug_pkg.log('Cust ID: '||p_customer_id);
3005: pnp_debug_pkg.log('lease ID: '||p_lease_id);
3006: pnp_debug_pkg.log('Location ID: '||p_location_id);
3007: pnp_debug_pkg.log('Start Date : '||p_calc_period_start_date);
3008: pnp_debug_pkg.log('End Date : ' ||p_calc_period_end_date);
3009: pnp_debug_pkg.log('As of Date : '||p_calc_period_as_of_date);
3010:
3003: pnp_debug_pkg.log('Agr line ID: '||p_rec_agr_line_id);
3004: pnp_debug_pkg.log('Cust ID: '||p_customer_id);
3005: pnp_debug_pkg.log('lease ID: '||p_lease_id);
3006: pnp_debug_pkg.log('Location ID: '||p_location_id);
3007: pnp_debug_pkg.log('Start Date : '||p_calc_period_start_date);
3008: pnp_debug_pkg.log('End Date : ' ||p_calc_period_end_date);
3009: pnp_debug_pkg.log('As of Date : '||p_calc_period_as_of_date);
3010:
3011:
3004: pnp_debug_pkg.log('Cust ID: '||p_customer_id);
3005: pnp_debug_pkg.log('lease ID: '||p_lease_id);
3006: pnp_debug_pkg.log('Location ID: '||p_location_id);
3007: pnp_debug_pkg.log('Start Date : '||p_calc_period_start_date);
3008: pnp_debug_pkg.log('End Date : ' ||p_calc_period_end_date);
3009: pnp_debug_pkg.log('As of Date : '||p_calc_period_as_of_date);
3010:
3011:
3012:
3005: pnp_debug_pkg.log('lease ID: '||p_lease_id);
3006: pnp_debug_pkg.log('Location ID: '||p_location_id);
3007: pnp_debug_pkg.log('Start Date : '||p_calc_period_start_date);
3008: pnp_debug_pkg.log('End Date : ' ||p_calc_period_end_date);
3009: pnp_debug_pkg.log('As of Date : '||p_calc_period_as_of_date);
3010:
3011:
3012:
3013: SELECT NVL(
3041: AND p_calc_period_as_of_date between lineexp.start_date AND lineexp.end_date
3042: AND lineexp.rec_agr_line_id = p_rec_agr_line_id
3043: AND expcl_lndtl_alloc.expense_class_line_id = exp_detail_line.expense_class_line_id
3044: ;
3045: pnp_debug_pkg.log('Cal exp: '||l_budget_expenses);
3046: RETURN l_budget_expenses;
3047:
3048: EXCEPTION
3049:
3049:
3050: WHEN OTHERS
3051: THEN
3052: fnd_message.set_name ('PN','PN_RECALB_BDEXP_NF');
3053: pnp_debug_pkg.put_log_msg(fnd_message.get||' '|| to_char(sqlcode));
3054:
3055: RETURN -99;
3056:
3057: pnp_debug_pkg.log('PN_REC_CALC_PKG.get_budget_expenses (-) ');
3053: pnp_debug_pkg.put_log_msg(fnd_message.get||' '|| to_char(sqlcode));
3054:
3055: RETURN -99;
3056:
3057: pnp_debug_pkg.log('PN_REC_CALC_PKG.get_budget_expenses (-) ');
3058:
3059: END get_budget_expenses;
3060:
3061: /*===========================================================================+
3115: );
3116:
3117: BEGIN
3118:
3119: pnp_debug_pkg.log('PN_REC_CALC_PKG.billed_recovery (+) ');
3120:
3121:
3122: SELECT nvl(SUM(pitem.actual_amount),0)
3123: INTO l_billed_recovery
3149:
3150: WHEN OTHERS
3151: THEN
3152: fnd_message.set_name ('PN','PN_RECALB_BLREC_NF');
3153: pnp_debug_pkg.put_log_msg(fnd_message.get||' '|| to_char(sqlcode));
3154: RETURN -99;
3155:
3156: pnp_debug_pkg.log('PN_REC_CALC_PKG.get_billed_recovery (-) ');
3157:
3152: fnd_message.set_name ('PN','PN_RECALB_BLREC_NF');
3153: pnp_debug_pkg.put_log_msg(fnd_message.get||' '|| to_char(sqlcode));
3154: RETURN -99;
3155:
3156: pnp_debug_pkg.log('PN_REC_CALC_PKG.get_billed_recovery (-) ');
3157:
3158: END get_billed_recovery;
3159:
3160: /*===========================================================================+
3211: i NUMBER :=0;
3212:
3213: BEGIN
3214:
3215: pnp_debug_pkg.log('PN_REC_CALC_PKG.line_constraints (+) ');
3216: pnp_debug_pkg.log('PN_REC_CALC_PKG.line_constraints -line id'|| p_rec_agr_line_id);
3217: pnp_debug_pkg.log('PN_REC_CALC_PKG.line_constraints -as of date '|| to_char(p_as_of_date));
3218:
3219: FOR line_constr_rec in get_line_constr_csr
3212:
3213: BEGIN
3214:
3215: pnp_debug_pkg.log('PN_REC_CALC_PKG.line_constraints (+) ');
3216: pnp_debug_pkg.log('PN_REC_CALC_PKG.line_constraints -line id'|| p_rec_agr_line_id);
3217: pnp_debug_pkg.log('PN_REC_CALC_PKG.line_constraints -as of date '|| to_char(p_as_of_date));
3218:
3219: FOR line_constr_rec in get_line_constr_csr
3220:
3213: BEGIN
3214:
3215: pnp_debug_pkg.log('PN_REC_CALC_PKG.line_constraints (+) ');
3216: pnp_debug_pkg.log('PN_REC_CALC_PKG.line_constraints -line id'|| p_rec_agr_line_id);
3217: pnp_debug_pkg.log('PN_REC_CALC_PKG.line_constraints -as of date '|| to_char(p_as_of_date));
3218:
3219: FOR line_constr_rec in get_line_constr_csr
3220:
3221: LOOP
3230: line_constr_tbl(i).base_year := line_constr_rec.base_year;
3231:
3232: END LOOP;
3233:
3234: pnp_debug_pkg.log('PN_REC_CALC_PKG.get_line_constraints (-) ');
3235: RETURN line_constr_tbl;
3236:
3237: EXCEPTION
3238:
3238:
3239: WHEN OTHERS
3240: THEN
3241: fnd_message.set_name ('PN','PN_RECALB_CONST_NF');
3242: pnp_debug_pkg.put_log_msg(fnd_message.get||' '|| to_char(sqlcode));
3243:
3244: line_constr_tbl(1).constr_order := -99;
3245: line_constr_tbl(1).scope := null;
3246: line_constr_tbl(1).relation := null;
3303: OPEN csr_get_abate;
3304: FETCH csr_get_abate into l_line_abatements;
3305: CLOSE csr_get_abate;
3306:
3307: pnp_debug_pkg.log('PN_REC_CALC_PKG.line_abatements (+) ');
3308:
3309:
3310: RETURN l_line_abatements;
3311:
3313:
3314: WHEN OTHERS THEN
3315:
3316: fnd_message.set_name ('PN','PN_RECALB_ABAT_NF');
3317: pnp_debug_pkg.put_log_msg(fnd_message.get||' '|| to_char(sqlcode));
3318:
3319: RETURN -99;
3320:
3321: pnp_debug_pkg.log('PN_REC_CALC_PKG.get_line_abatements (-) ');
3317: pnp_debug_pkg.put_log_msg(fnd_message.get||' '|| to_char(sqlcode));
3318:
3319: RETURN -99;
3320:
3321: pnp_debug_pkg.log('PN_REC_CALC_PKG.get_line_abatements (-) ');
3322:
3323: END get_line_abatements;
3324:
3325: /*===========================================================================+
3360: l_rec_period_lines_id pn_rec_period_lines_all.rec_period_lines_id%TYPE;
3361:
3362: BEGIN
3363:
3364: PNP_DEBUG_PKG.log ('PN_REC_CALC_PKG.find_if_period_line_exists (+)');
3365:
3366: OPEN csr_chck_exist;
3367: FETCH csr_chck_exist INTO l_rec_period_lines_id;
3368: IF csr_chck_exist%NOTFOUND THEN
3369: l_rec_period_lines_id := null;
3370: END IF;
3371: CLOSE csr_chck_exist;
3372:
3373: PNP_DEBUG_PKG.debug ('PN_VAR_RENT_PKG.find_if_period_line_exists (-)');
3374:
3375: RETURN l_rec_period_lines_id;
3376:
3377: EXCEPTION
3379: WHEN TOO_MANY_ROWS
3380: THEN
3381:
3382: fnd_message.set_name ('PN','PN_RECALB_PRDLN');
3383: pnp_debug_pkg.put_log_msg(fnd_message.get||' '||to_char(sqlcode));
3384: return -99;
3385:
3386: WHEN OTHERS
3387: THEN
3385:
3386: WHEN OTHERS
3387: THEN
3388: fnd_message.set_name ('PN','PN_RECALB_CHK_PRDLN');
3389: pnp_debug_pkg.put_log_msg(fnd_message.get||' '||to_char(sqlcode));
3390: RETURN -99;
3391:
3392:
3393: END find_if_period_line_exists;
3469: l_org_ID NUMBER;
3470:
3471: BEGIN
3472:
3473: PNP_DEBUG_PKG.log ('PN_REC_CALC_PKG.INSERT_PERIOD_LINES_ROW (+)');
3474:
3475: -------------------------------------------------------
3476: -- Select the nextval for group date id
3477: -------------------------------------------------------
3574: raise no_data_found;
3575: end if;
3576: close c;
3577:
3578: PNP_DEBUG_PKG.log ('PN_REC_CALC_PKG.INSERT_PERIOD_LINES_ROW (-)');
3579:
3580: EXCEPTION
3581: WHEN OTHERS THEN
3582:
3580: EXCEPTION
3581: WHEN OTHERS THEN
3582:
3583: X_ERROR_CODE := -99;
3584: PNP_DEBUG_PKG.log ('Error inserting into period lines'|| to_char(sqlcode));
3585:
3586: end INSERT_PERIOD_LINES_ROW;
3587:
3588: /*===========================================================================+
3647: ) is
3648:
3649: BEGIN
3650:
3651: PNP_DEBUG_PKG.log ('PN_REC_CALC_PKG.UPDATE_PERIOD_LINES_ROW (+)');
3652:
3653: update PN_REC_PERIOD_LINES_ALL set
3654: BUDGET_PCT = X_BUDGET_PCT
3655: ,OCCUPANCY_PCT = X_OCCUPANCY_PCT
3689: if (sql%notfound) then
3690: raise no_data_found;
3691: end if;
3692:
3693: PNP_DEBUG_PKG.log ('PN_REC_CALC_PKG.UPDATE_PERIOD_LINES_ROW (-)');
3694:
3695: EXCEPTION
3696: WHEN OTHERS THEN
3697:
3695: EXCEPTION
3696: WHEN OTHERS THEN
3697:
3698: X_ERROR_CODE := -99;
3699: PNP_DEBUG_PKG.log ('Error updating into period lines'|| to_char(sqlcode));
3700:
3701: end UPDATE_PERIOD_LINES_ROW;
3702:
3703: /*===========================================================================+
3729: ) is
3730:
3731: BEGIN
3732:
3733: PNP_DEBUG_PKG.log ('PN_REC_CALC_PKG.DELETE_PERIOD_LINES_ROW (+)');
3734:
3735: delete from PN_REC_PERIOD_LINES_ALL
3736: where REC_PERIOD_LINES_ID = X_REC_PERIOD_LINES_ID;
3737:
3738: if (sql%notfound) then
3739: raise no_data_found;
3740: end if;
3741:
3742: PNP_DEBUG_PKG.log ('PN_REC_CALC_PKG.DELETE_PERIOD_LINES_ROW (-)');
3743:
3744: end DELETE_PERIOD_LINES_ROW;
3745:
3746: /*===========================================================================+
3791: l_org_ID NUMBER;
3792:
3793: BEGIN
3794:
3795: PNP_DEBUG_PKG.log ('PN_REC_CALC_PKG.INSERT_PERIOD_BILLREC_ROW (+)');
3796:
3797: -------------------------------------------------------
3798: -- Select the nextval for PERIOD_BILLREC_ID
3799: -------------------------------------------------------
3845: RAISE NO_DATA_FOUND;
3846: END IF;
3847: CLOSE C;
3848:
3849: PNP_DEBUG_PKG.log ('PN_REC_CALC_PKG.INSERT_PERIOD_BILLREC_ROW (-)');
3850:
3851: END INSERT_PERIOD_BILLREC_ROW;
3852:
3853: /*===========================================================================+
3885: ) is
3886:
3887: BEGIN
3888:
3889: PNP_DEBUG_PKG.log ('PN_REC_CALC_PKG.UPDATE_PERIOD_BILLREC_ROW (+)');
3890:
3891: update PN_REC_PERIOD_BILL_ALL set
3892: REC_AGR_LINE_ID = X_REC_AGR_LINE_ID
3893: ,REC_AGREEMENT_ID = X_REC_AGREEMENT_ID
3903: if (sql%notfound) then
3904: raise no_data_found;
3905: end if;
3906:
3907: PNP_DEBUG_PKG.log ('PN_REC_CALC_PKG.UPDATE_PERIOD_BILLREC_ROW (-)');
3908:
3909: end UPDATE_PERIOD_BILLREC_ROW;
3910:
3911: /*===========================================================================+
3936: ) is
3937:
3938: BEGIN
3939:
3940: PNP_DEBUG_PKG.log ('PN_REC_CALC_PKG.DELETE_PERIOD_BILLREC_ROW (+)');
3941:
3942: delete from PN_REC_PERIOD_BILL_ALL
3943: where PERIOD_BILLREC_ID = X_PERIOD_BILLREC_ID;
3944:
3945: if (sql%notfound) then
3946: raise no_data_found;
3947: end if;
3948:
3949: PNP_DEBUG_PKG.log ('PN_REC_CALC_PKG.DELETE_PERIOD_BILLREC_ROW (-)');
3950:
3951: end DELETE_PERIOD_BILLREC_ROW;
3952:
3953: /*===========================================================================+
4092:
4093:
4094: BEGIN
4095:
4096: pnp_debug_pkg.log ('PN_REC_CALC_PKG.create_payment_terms : (+)');
4097:
4098: IF p_org_id IS NULL THEN
4099: FOR rec IN org_cur LOOP
4100: l_org_id := rec.org_id;
4116: AND pld.lease_id = p_lease_id;
4117:
4118: EXCEPTION
4119: WHEN OTHERS THEN
4120: pnp_debug_pkg.log ('Unable to get Lease Details :'||
4121: to_char(SQLCODE));
4122: p_error := 'Unable to get Lease Details';
4123: p_error_code := -99;
4124: return;
4126: END;
4127:
4128: IF p_error_code <> -99 THEN
4129:
4130: pnp_debug_pkg.log ('create_payment_terms - Org id :'||l_org_id);
4131:
4132: l_context := 'Getting SOB ';
4133:
4134: l_set_of_books_id := TO_NUMBER(pn_mo_cache_utils.get_profile_value('PN_SET_OF_BOOKS_ID', l_org_id));
4131:
4132: l_context := 'Getting SOB ';
4133:
4134: l_set_of_books_id := TO_NUMBER(pn_mo_cache_utils.get_profile_value('PN_SET_OF_BOOKS_ID', l_org_id));
4135: pnp_debug_pkg.log ('create_payment_terms - Set of books id :'||l_set_of_books_id);
4136:
4137: /*E-Tax lazy upgrade for Term Template*/
4138:
4139: IF l_is_r12 THEN
4143:
4144: IF csr_template_upg%FOUND THEN
4145:
4146: l_dummy := pn_r12_util_pkg.check_tax_upgrade(rec_template.term_template_id);
4147: pnp_debug_pkg.log('Term Template '||rec_template.name||' upgraded');
4148: template_name_tbl(NVL(template_name_tbl.LAST,0)+1) := rec_template.name;
4149: template_id_tbl(NVL(template_id_tbl.LAST,0)+1) := rec_template.term_template_id;
4150:
4151: END IF;
4171: CLOSE csr_lease_term;
4172:
4173: ELSE
4174:
4175: pnp_debug_pkg.log ('With Consolidation Option a term template is needed');
4176: p_error := 'Unable to get Lease Details';
4177: p_error_code := -99;
4178: CLOSE csr_template;
4179: return;
4254: l_period_billrec_id := l_period_bill_record.period_billrec_id;
4255:
4256: END IF;
4257:
4258: pnp_debug_pkg.log ('create_payment_terms - approved amount '|| l_payment_amount);
4259: pnp_debug_pkg.log ('create_payment_terms - period_billrec_id '|| l_period_billrec_id);
4260: IF p_error_code <> -99 and l_period_billrec_id IS NOT NULL THEN
4261:
4262: l_payment_amount := p_payment_amount - l_payment_amount;
4255:
4256: END IF;
4257:
4258: pnp_debug_pkg.log ('create_payment_terms - approved amount '|| l_payment_amount);
4259: pnp_debug_pkg.log ('create_payment_terms - period_billrec_id '|| l_period_billrec_id);
4260: IF p_error_code <> -99 and l_period_billrec_id IS NOT NULL THEN
4261:
4262: l_payment_amount := p_payment_amount - l_payment_amount;
4263:
4278: l_payment_amount := p_payment_amount;
4279:
4280: l_context := 'Inserting period_billrec ';
4281:
4282: pnp_debug_pkg.log ('insert_period_billrec_row - agr id :'||p_rec_agreement_id);
4283: pnp_debug_pkg.log ('insert_period_billrec_row - p_rec_agr_line_id :'||p_rec_agr_line_id);
4284: pnp_debug_pkg.log ('insert_period_billrec_row - p_rec_calc_period_id :'||p_rec_calc_period_id);
4285: pnp_debug_pkg.log ('insert_period_billrec_row - amount :'||l_payment_amount);
4286: PN_REC_CALC_PKG.insert_period_billrec_row (
4279:
4280: l_context := 'Inserting period_billrec ';
4281:
4282: pnp_debug_pkg.log ('insert_period_billrec_row - agr id :'||p_rec_agreement_id);
4283: pnp_debug_pkg.log ('insert_period_billrec_row - p_rec_agr_line_id :'||p_rec_agr_line_id);
4284: pnp_debug_pkg.log ('insert_period_billrec_row - p_rec_calc_period_id :'||p_rec_calc_period_id);
4285: pnp_debug_pkg.log ('insert_period_billrec_row - amount :'||l_payment_amount);
4286: PN_REC_CALC_PKG.insert_period_billrec_row (
4287: X_ROWID => l_rowId
4280: l_context := 'Inserting period_billrec ';
4281:
4282: pnp_debug_pkg.log ('insert_period_billrec_row - agr id :'||p_rec_agreement_id);
4283: pnp_debug_pkg.log ('insert_period_billrec_row - p_rec_agr_line_id :'||p_rec_agr_line_id);
4284: pnp_debug_pkg.log ('insert_period_billrec_row - p_rec_calc_period_id :'||p_rec_calc_period_id);
4285: pnp_debug_pkg.log ('insert_period_billrec_row - amount :'||l_payment_amount);
4286: PN_REC_CALC_PKG.insert_period_billrec_row (
4287: X_ROWID => l_rowId
4288: ,X_PERIOD_BILLREC_ID => l_period_billrec_id
4281:
4282: pnp_debug_pkg.log ('insert_period_billrec_row - agr id :'||p_rec_agreement_id);
4283: pnp_debug_pkg.log ('insert_period_billrec_row - p_rec_agr_line_id :'||p_rec_agr_line_id);
4284: pnp_debug_pkg.log ('insert_period_billrec_row - p_rec_calc_period_id :'||p_rec_calc_period_id);
4285: pnp_debug_pkg.log ('insert_period_billrec_row - amount :'||l_payment_amount);
4286: PN_REC_CALC_PKG.insert_period_billrec_row (
4287: X_ROWID => l_rowId
4288: ,X_PERIOD_BILLREC_ID => l_period_billrec_id
4289: ,X_REC_AGREEMENT_ID => p_rec_agreement_id
4309: l_rec_agr_line_id := p_rec_agr_line_id;
4310:
4311: END IF;
4312:
4313: pnp_debug_pkg.log ('create_payment_terms - l_payment_amount :'||l_payment_amount);
4314: pnp_debug_pkg.log ('create_payment_terms - Row Id :'||l_rowid);
4315: pnp_debug_pkg.log ('create_payment_terms - l_payment_amount :'||l_payment_amount);
4316: pnp_debug_pkg.log ('create_payment_terms - Payment Term Id :'||l_payment_term_id);
4317: pnp_debug_pkg.log ('create_payment_terms - Billing Purpose :'||p_billing_purpose);
4310:
4311: END IF;
4312:
4313: pnp_debug_pkg.log ('create_payment_terms - l_payment_amount :'||l_payment_amount);
4314: pnp_debug_pkg.log ('create_payment_terms - Row Id :'||l_rowid);
4315: pnp_debug_pkg.log ('create_payment_terms - l_payment_amount :'||l_payment_amount);
4316: pnp_debug_pkg.log ('create_payment_terms - Payment Term Id :'||l_payment_term_id);
4317: pnp_debug_pkg.log ('create_payment_terms - Billing Purpose :'||p_billing_purpose);
4318: pnp_debug_pkg.log ('create_payment_terms - Billing Type :'||p_billing_Type);
4311: END IF;
4312:
4313: pnp_debug_pkg.log ('create_payment_terms - l_payment_amount :'||l_payment_amount);
4314: pnp_debug_pkg.log ('create_payment_terms - Row Id :'||l_rowid);
4315: pnp_debug_pkg.log ('create_payment_terms - l_payment_amount :'||l_payment_amount);
4316: pnp_debug_pkg.log ('create_payment_terms - Payment Term Id :'||l_payment_term_id);
4317: pnp_debug_pkg.log ('create_payment_terms - Billing Purpose :'||p_billing_purpose);
4318: pnp_debug_pkg.log ('create_payment_terms - Billing Type :'||p_billing_Type);
4319: pnp_debug_pkg.log ('create_payment_terms - Frequency Code :'||l_frequency);
4312:
4313: pnp_debug_pkg.log ('create_payment_terms - l_payment_amount :'||l_payment_amount);
4314: pnp_debug_pkg.log ('create_payment_terms - Row Id :'||l_rowid);
4315: pnp_debug_pkg.log ('create_payment_terms - l_payment_amount :'||l_payment_amount);
4316: pnp_debug_pkg.log ('create_payment_terms - Payment Term Id :'||l_payment_term_id);
4317: pnp_debug_pkg.log ('create_payment_terms - Billing Purpose :'||p_billing_purpose);
4318: pnp_debug_pkg.log ('create_payment_terms - Billing Type :'||p_billing_Type);
4319: pnp_debug_pkg.log ('create_payment_terms - Frequency Code :'||l_frequency);
4320: pnp_debug_pkg.log ('create_payment_terms - Lease Id :'||p_lease_id);
4313: pnp_debug_pkg.log ('create_payment_terms - l_payment_amount :'||l_payment_amount);
4314: pnp_debug_pkg.log ('create_payment_terms - Row Id :'||l_rowid);
4315: pnp_debug_pkg.log ('create_payment_terms - l_payment_amount :'||l_payment_amount);
4316: pnp_debug_pkg.log ('create_payment_terms - Payment Term Id :'||l_payment_term_id);
4317: pnp_debug_pkg.log ('create_payment_terms - Billing Purpose :'||p_billing_purpose);
4318: pnp_debug_pkg.log ('create_payment_terms - Billing Type :'||p_billing_Type);
4319: pnp_debug_pkg.log ('create_payment_terms - Frequency Code :'||l_frequency);
4320: pnp_debug_pkg.log ('create_payment_terms - Lease Id :'||p_lease_id);
4321: pnp_debug_pkg.log ('create_payment_terms - Lease change Id :'||l_lease_change_id);
4314: pnp_debug_pkg.log ('create_payment_terms - Row Id :'||l_rowid);
4315: pnp_debug_pkg.log ('create_payment_terms - l_payment_amount :'||l_payment_amount);
4316: pnp_debug_pkg.log ('create_payment_terms - Payment Term Id :'||l_payment_term_id);
4317: pnp_debug_pkg.log ('create_payment_terms - Billing Purpose :'||p_billing_purpose);
4318: pnp_debug_pkg.log ('create_payment_terms - Billing Type :'||p_billing_Type);
4319: pnp_debug_pkg.log ('create_payment_terms - Frequency Code :'||l_frequency);
4320: pnp_debug_pkg.log ('create_payment_terms - Lease Id :'||p_lease_id);
4321: pnp_debug_pkg.log ('create_payment_terms - Lease change Id :'||l_lease_change_id);
4322: pnp_debug_pkg.log ('create_payment_terms - Start Date :'||p_calc_period_end_date);
4315: pnp_debug_pkg.log ('create_payment_terms - l_payment_amount :'||l_payment_amount);
4316: pnp_debug_pkg.log ('create_payment_terms - Payment Term Id :'||l_payment_term_id);
4317: pnp_debug_pkg.log ('create_payment_terms - Billing Purpose :'||p_billing_purpose);
4318: pnp_debug_pkg.log ('create_payment_terms - Billing Type :'||p_billing_Type);
4319: pnp_debug_pkg.log ('create_payment_terms - Frequency Code :'||l_frequency);
4320: pnp_debug_pkg.log ('create_payment_terms - Lease Id :'||p_lease_id);
4321: pnp_debug_pkg.log ('create_payment_terms - Lease change Id :'||l_lease_change_id);
4322: pnp_debug_pkg.log ('create_payment_terms - Start Date :'||p_calc_period_end_date);
4323: pnp_debug_pkg.log ('create_payment_terms - End Date :'||p_calc_period_end_date);
4316: pnp_debug_pkg.log ('create_payment_terms - Payment Term Id :'||l_payment_term_id);
4317: pnp_debug_pkg.log ('create_payment_terms - Billing Purpose :'||p_billing_purpose);
4318: pnp_debug_pkg.log ('create_payment_terms - Billing Type :'||p_billing_Type);
4319: pnp_debug_pkg.log ('create_payment_terms - Frequency Code :'||l_frequency);
4320: pnp_debug_pkg.log ('create_payment_terms - Lease Id :'||p_lease_id);
4321: pnp_debug_pkg.log ('create_payment_terms - Lease change Id :'||l_lease_change_id);
4322: pnp_debug_pkg.log ('create_payment_terms - Start Date :'||p_calc_period_end_date);
4323: pnp_debug_pkg.log ('create_payment_terms - End Date :'||p_calc_period_end_date);
4324: pnp_debug_pkg.log ('create_payment_terms - SOB :'||rec_template.set_of_books_id);
4317: pnp_debug_pkg.log ('create_payment_terms - Billing Purpose :'||p_billing_purpose);
4318: pnp_debug_pkg.log ('create_payment_terms - Billing Type :'||p_billing_Type);
4319: pnp_debug_pkg.log ('create_payment_terms - Frequency Code :'||l_frequency);
4320: pnp_debug_pkg.log ('create_payment_terms - Lease Id :'||p_lease_id);
4321: pnp_debug_pkg.log ('create_payment_terms - Lease change Id :'||l_lease_change_id);
4322: pnp_debug_pkg.log ('create_payment_terms - Start Date :'||p_calc_period_end_date);
4323: pnp_debug_pkg.log ('create_payment_terms - End Date :'||p_calc_period_end_date);
4324: pnp_debug_pkg.log ('create_payment_terms - SOB :'||rec_template.set_of_books_id);
4325: pnp_debug_pkg.log ('create_payment_terms - SOB :'||l_set_of_books_id);
4318: pnp_debug_pkg.log ('create_payment_terms - Billing Type :'||p_billing_Type);
4319: pnp_debug_pkg.log ('create_payment_terms - Frequency Code :'||l_frequency);
4320: pnp_debug_pkg.log ('create_payment_terms - Lease Id :'||p_lease_id);
4321: pnp_debug_pkg.log ('create_payment_terms - Lease change Id :'||l_lease_change_id);
4322: pnp_debug_pkg.log ('create_payment_terms - Start Date :'||p_calc_period_end_date);
4323: pnp_debug_pkg.log ('create_payment_terms - End Date :'||p_calc_period_end_date);
4324: pnp_debug_pkg.log ('create_payment_terms - SOB :'||rec_template.set_of_books_id);
4325: pnp_debug_pkg.log ('create_payment_terms - SOB :'||l_set_of_books_id);
4326: pnp_debug_pkg.log ('create_payment_terms - Currency Code :'||g_currency_code);
4319: pnp_debug_pkg.log ('create_payment_terms - Frequency Code :'||l_frequency);
4320: pnp_debug_pkg.log ('create_payment_terms - Lease Id :'||p_lease_id);
4321: pnp_debug_pkg.log ('create_payment_terms - Lease change Id :'||l_lease_change_id);
4322: pnp_debug_pkg.log ('create_payment_terms - Start Date :'||p_calc_period_end_date);
4323: pnp_debug_pkg.log ('create_payment_terms - End Date :'||p_calc_period_end_date);
4324: pnp_debug_pkg.log ('create_payment_terms - SOB :'||rec_template.set_of_books_id);
4325: pnp_debug_pkg.log ('create_payment_terms - SOB :'||l_set_of_books_id);
4326: pnp_debug_pkg.log ('create_payment_terms - Currency Code :'||g_currency_code);
4327: pnp_debug_pkg.log ('create_payment_terms - Vendor Id :'||rec_template.vendor_id);
4320: pnp_debug_pkg.log ('create_payment_terms - Lease Id :'||p_lease_id);
4321: pnp_debug_pkg.log ('create_payment_terms - Lease change Id :'||l_lease_change_id);
4322: pnp_debug_pkg.log ('create_payment_terms - Start Date :'||p_calc_period_end_date);
4323: pnp_debug_pkg.log ('create_payment_terms - End Date :'||p_calc_period_end_date);
4324: pnp_debug_pkg.log ('create_payment_terms - SOB :'||rec_template.set_of_books_id);
4325: pnp_debug_pkg.log ('create_payment_terms - SOB :'||l_set_of_books_id);
4326: pnp_debug_pkg.log ('create_payment_terms - Currency Code :'||g_currency_code);
4327: pnp_debug_pkg.log ('create_payment_terms - Vendor Id :'||rec_template.vendor_id);
4328: pnp_debug_pkg.log ('create_payment_terms - Vendor Site Id :'||rec_template.vendor_site_id);
4321: pnp_debug_pkg.log ('create_payment_terms - Lease change Id :'||l_lease_change_id);
4322: pnp_debug_pkg.log ('create_payment_terms - Start Date :'||p_calc_period_end_date);
4323: pnp_debug_pkg.log ('create_payment_terms - End Date :'||p_calc_period_end_date);
4324: pnp_debug_pkg.log ('create_payment_terms - SOB :'||rec_template.set_of_books_id);
4325: pnp_debug_pkg.log ('create_payment_terms - SOB :'||l_set_of_books_id);
4326: pnp_debug_pkg.log ('create_payment_terms - Currency Code :'||g_currency_code);
4327: pnp_debug_pkg.log ('create_payment_terms - Vendor Id :'||rec_template.vendor_id);
4328: pnp_debug_pkg.log ('create_payment_terms - Vendor Site Id :'||rec_template.vendor_site_id);
4329: pnp_debug_pkg.log ('create_payment_terms - Actual Amount :'||l_payment_amount);
4322: pnp_debug_pkg.log ('create_payment_terms - Start Date :'||p_calc_period_end_date);
4323: pnp_debug_pkg.log ('create_payment_terms - End Date :'||p_calc_period_end_date);
4324: pnp_debug_pkg.log ('create_payment_terms - SOB :'||rec_template.set_of_books_id);
4325: pnp_debug_pkg.log ('create_payment_terms - SOB :'||l_set_of_books_id);
4326: pnp_debug_pkg.log ('create_payment_terms - Currency Code :'||g_currency_code);
4327: pnp_debug_pkg.log ('create_payment_terms - Vendor Id :'||rec_template.vendor_id);
4328: pnp_debug_pkg.log ('create_payment_terms - Vendor Site Id :'||rec_template.vendor_site_id);
4329: pnp_debug_pkg.log ('create_payment_terms - Actual Amount :'||l_payment_amount);
4330: pnp_debug_pkg.log ('create_payment_terms - Customer Site Use :'||rec_template.customer_site_use_id);
4323: pnp_debug_pkg.log ('create_payment_terms - End Date :'||p_calc_period_end_date);
4324: pnp_debug_pkg.log ('create_payment_terms - SOB :'||rec_template.set_of_books_id);
4325: pnp_debug_pkg.log ('create_payment_terms - SOB :'||l_set_of_books_id);
4326: pnp_debug_pkg.log ('create_payment_terms - Currency Code :'||g_currency_code);
4327: pnp_debug_pkg.log ('create_payment_terms - Vendor Id :'||rec_template.vendor_id);
4328: pnp_debug_pkg.log ('create_payment_terms - Vendor Site Id :'||rec_template.vendor_site_id);
4329: pnp_debug_pkg.log ('create_payment_terms - Actual Amount :'||l_payment_amount);
4330: pnp_debug_pkg.log ('create_payment_terms - Customer Site Use :'||rec_template.customer_site_use_id);
4331: pnp_debug_pkg.log ('create_payment_terms - Location :'||p_location_id);
4324: pnp_debug_pkg.log ('create_payment_terms - SOB :'||rec_template.set_of_books_id);
4325: pnp_debug_pkg.log ('create_payment_terms - SOB :'||l_set_of_books_id);
4326: pnp_debug_pkg.log ('create_payment_terms - Currency Code :'||g_currency_code);
4327: pnp_debug_pkg.log ('create_payment_terms - Vendor Id :'||rec_template.vendor_id);
4328: pnp_debug_pkg.log ('create_payment_terms - Vendor Site Id :'||rec_template.vendor_site_id);
4329: pnp_debug_pkg.log ('create_payment_terms - Actual Amount :'||l_payment_amount);
4330: pnp_debug_pkg.log ('create_payment_terms - Customer Site Use :'||rec_template.customer_site_use_id);
4331: pnp_debug_pkg.log ('create_payment_terms - Location :'||p_location_id);
4332: pnp_debug_pkg.log ('create_payment_terms - Schedule Day :'||l_schedule_day);
4325: pnp_debug_pkg.log ('create_payment_terms - SOB :'||l_set_of_books_id);
4326: pnp_debug_pkg.log ('create_payment_terms - Currency Code :'||g_currency_code);
4327: pnp_debug_pkg.log ('create_payment_terms - Vendor Id :'||rec_template.vendor_id);
4328: pnp_debug_pkg.log ('create_payment_terms - Vendor Site Id :'||rec_template.vendor_site_id);
4329: pnp_debug_pkg.log ('create_payment_terms - Actual Amount :'||l_payment_amount);
4330: pnp_debug_pkg.log ('create_payment_terms - Customer Site Use :'||rec_template.customer_site_use_id);
4331: pnp_debug_pkg.log ('create_payment_terms - Location :'||p_location_id);
4332: pnp_debug_pkg.log ('create_payment_terms - Schedule Day :'||l_schedule_day);
4333: pnp_debug_pkg.log ('create_payment_terms - Customer Ship to :'||rec_template.cust_ship_site_id);
4326: pnp_debug_pkg.log ('create_payment_terms - Currency Code :'||g_currency_code);
4327: pnp_debug_pkg.log ('create_payment_terms - Vendor Id :'||rec_template.vendor_id);
4328: pnp_debug_pkg.log ('create_payment_terms - Vendor Site Id :'||rec_template.vendor_site_id);
4329: pnp_debug_pkg.log ('create_payment_terms - Actual Amount :'||l_payment_amount);
4330: pnp_debug_pkg.log ('create_payment_terms - Customer Site Use :'||rec_template.customer_site_use_id);
4331: pnp_debug_pkg.log ('create_payment_terms - Location :'||p_location_id);
4332: pnp_debug_pkg.log ('create_payment_terms - Schedule Day :'||l_schedule_day);
4333: pnp_debug_pkg.log ('create_payment_terms - Customer Ship to :'||rec_template.cust_ship_site_id);
4334: pnp_debug_pkg.log ('create_payment_terms - AP Ar Temr Id :'||rec_template.ap_ar_term_id);
4327: pnp_debug_pkg.log ('create_payment_terms - Vendor Id :'||rec_template.vendor_id);
4328: pnp_debug_pkg.log ('create_payment_terms - Vendor Site Id :'||rec_template.vendor_site_id);
4329: pnp_debug_pkg.log ('create_payment_terms - Actual Amount :'||l_payment_amount);
4330: pnp_debug_pkg.log ('create_payment_terms - Customer Site Use :'||rec_template.customer_site_use_id);
4331: pnp_debug_pkg.log ('create_payment_terms - Location :'||p_location_id);
4332: pnp_debug_pkg.log ('create_payment_terms - Schedule Day :'||l_schedule_day);
4333: pnp_debug_pkg.log ('create_payment_terms - Customer Ship to :'||rec_template.cust_ship_site_id);
4334: pnp_debug_pkg.log ('create_payment_terms - AP Ar Temr Id :'||rec_template.ap_ar_term_id);
4335: pnp_debug_pkg.log ('create_payment_terms - Trx Id :'||rec_template.cust_trx_type_id);
4328: pnp_debug_pkg.log ('create_payment_terms - Vendor Site Id :'||rec_template.vendor_site_id);
4329: pnp_debug_pkg.log ('create_payment_terms - Actual Amount :'||l_payment_amount);
4330: pnp_debug_pkg.log ('create_payment_terms - Customer Site Use :'||rec_template.customer_site_use_id);
4331: pnp_debug_pkg.log ('create_payment_terms - Location :'||p_location_id);
4332: pnp_debug_pkg.log ('create_payment_terms - Schedule Day :'||l_schedule_day);
4333: pnp_debug_pkg.log ('create_payment_terms - Customer Ship to :'||rec_template.cust_ship_site_id);
4334: pnp_debug_pkg.log ('create_payment_terms - AP Ar Temr Id :'||rec_template.ap_ar_term_id);
4335: pnp_debug_pkg.log ('create_payment_terms - Trx Id :'||rec_template.cust_trx_type_id);
4336: pnp_debug_pkg.log ('create_payment_terms - Project Id :'||rec_template.project_id);
4329: pnp_debug_pkg.log ('create_payment_terms - Actual Amount :'||l_payment_amount);
4330: pnp_debug_pkg.log ('create_payment_terms - Customer Site Use :'||rec_template.customer_site_use_id);
4331: pnp_debug_pkg.log ('create_payment_terms - Location :'||p_location_id);
4332: pnp_debug_pkg.log ('create_payment_terms - Schedule Day :'||l_schedule_day);
4333: pnp_debug_pkg.log ('create_payment_terms - Customer Ship to :'||rec_template.cust_ship_site_id);
4334: pnp_debug_pkg.log ('create_payment_terms - AP Ar Temr Id :'||rec_template.ap_ar_term_id);
4335: pnp_debug_pkg.log ('create_payment_terms - Trx Id :'||rec_template.cust_trx_type_id);
4336: pnp_debug_pkg.log ('create_payment_terms - Project Id :'||rec_template.project_id);
4337: pnp_debug_pkg.log ('create_payment_terms - Task Id :'||rec_template.task_id);
4330: pnp_debug_pkg.log ('create_payment_terms - Customer Site Use :'||rec_template.customer_site_use_id);
4331: pnp_debug_pkg.log ('create_payment_terms - Location :'||p_location_id);
4332: pnp_debug_pkg.log ('create_payment_terms - Schedule Day :'||l_schedule_day);
4333: pnp_debug_pkg.log ('create_payment_terms - Customer Ship to :'||rec_template.cust_ship_site_id);
4334: pnp_debug_pkg.log ('create_payment_terms - AP Ar Temr Id :'||rec_template.ap_ar_term_id);
4335: pnp_debug_pkg.log ('create_payment_terms - Trx Id :'||rec_template.cust_trx_type_id);
4336: pnp_debug_pkg.log ('create_payment_terms - Project Id :'||rec_template.project_id);
4337: pnp_debug_pkg.log ('create_payment_terms - Task Id :'||rec_template.task_id);
4338: pnp_debug_pkg.log ('create_payment_terms - Organization Id :'||rec_template.organization_id);
4331: pnp_debug_pkg.log ('create_payment_terms - Location :'||p_location_id);
4332: pnp_debug_pkg.log ('create_payment_terms - Schedule Day :'||l_schedule_day);
4333: pnp_debug_pkg.log ('create_payment_terms - Customer Ship to :'||rec_template.cust_ship_site_id);
4334: pnp_debug_pkg.log ('create_payment_terms - AP Ar Temr Id :'||rec_template.ap_ar_term_id);
4335: pnp_debug_pkg.log ('create_payment_terms - Trx Id :'||rec_template.cust_trx_type_id);
4336: pnp_debug_pkg.log ('create_payment_terms - Project Id :'||rec_template.project_id);
4337: pnp_debug_pkg.log ('create_payment_terms - Task Id :'||rec_template.task_id);
4338: pnp_debug_pkg.log ('create_payment_terms - Organization Id :'||rec_template.organization_id);
4339: pnp_debug_pkg.log ('create_payment_terms - Exend Type :'||rec_template.expenditure_type);
4332: pnp_debug_pkg.log ('create_payment_terms - Schedule Day :'||l_schedule_day);
4333: pnp_debug_pkg.log ('create_payment_terms - Customer Ship to :'||rec_template.cust_ship_site_id);
4334: pnp_debug_pkg.log ('create_payment_terms - AP Ar Temr Id :'||rec_template.ap_ar_term_id);
4335: pnp_debug_pkg.log ('create_payment_terms - Trx Id :'||rec_template.cust_trx_type_id);
4336: pnp_debug_pkg.log ('create_payment_terms - Project Id :'||rec_template.project_id);
4337: pnp_debug_pkg.log ('create_payment_terms - Task Id :'||rec_template.task_id);
4338: pnp_debug_pkg.log ('create_payment_terms - Organization Id :'||rec_template.organization_id);
4339: pnp_debug_pkg.log ('create_payment_terms - Exend Type :'||rec_template.expenditure_type);
4340: pnp_debug_pkg.log ('create_payment_terms - Exend Item Date :'||rec_template.expenditure_item_date);
4333: pnp_debug_pkg.log ('create_payment_terms - Customer Ship to :'||rec_template.cust_ship_site_id);
4334: pnp_debug_pkg.log ('create_payment_terms - AP Ar Temr Id :'||rec_template.ap_ar_term_id);
4335: pnp_debug_pkg.log ('create_payment_terms - Trx Id :'||rec_template.cust_trx_type_id);
4336: pnp_debug_pkg.log ('create_payment_terms - Project Id :'||rec_template.project_id);
4337: pnp_debug_pkg.log ('create_payment_terms - Task Id :'||rec_template.task_id);
4338: pnp_debug_pkg.log ('create_payment_terms - Organization Id :'||rec_template.organization_id);
4339: pnp_debug_pkg.log ('create_payment_terms - Exend Type :'||rec_template.expenditure_type);
4340: pnp_debug_pkg.log ('create_payment_terms - Exend Item Date :'||rec_template.expenditure_item_date);
4341: pnp_debug_pkg.log ('create_payment_terms - Tax Group Id :'||rec_template.tax_group_id);
4334: pnp_debug_pkg.log ('create_payment_terms - AP Ar Temr Id :'||rec_template.ap_ar_term_id);
4335: pnp_debug_pkg.log ('create_payment_terms - Trx Id :'||rec_template.cust_trx_type_id);
4336: pnp_debug_pkg.log ('create_payment_terms - Project Id :'||rec_template.project_id);
4337: pnp_debug_pkg.log ('create_payment_terms - Task Id :'||rec_template.task_id);
4338: pnp_debug_pkg.log ('create_payment_terms - Organization Id :'||rec_template.organization_id);
4339: pnp_debug_pkg.log ('create_payment_terms - Exend Type :'||rec_template.expenditure_type);
4340: pnp_debug_pkg.log ('create_payment_terms - Exend Item Date :'||rec_template.expenditure_item_date);
4341: pnp_debug_pkg.log ('create_payment_terms - Tax Group Id :'||rec_template.tax_group_id);
4342: pnp_debug_pkg.log ('create_payment_terms - Tax Code Id :'||rec_template.tax_code_id);
4335: pnp_debug_pkg.log ('create_payment_terms - Trx Id :'||rec_template.cust_trx_type_id);
4336: pnp_debug_pkg.log ('create_payment_terms - Project Id :'||rec_template.project_id);
4337: pnp_debug_pkg.log ('create_payment_terms - Task Id :'||rec_template.task_id);
4338: pnp_debug_pkg.log ('create_payment_terms - Organization Id :'||rec_template.organization_id);
4339: pnp_debug_pkg.log ('create_payment_terms - Exend Type :'||rec_template.expenditure_type);
4340: pnp_debug_pkg.log ('create_payment_terms - Exend Item Date :'||rec_template.expenditure_item_date);
4341: pnp_debug_pkg.log ('create_payment_terms - Tax Group Id :'||rec_template.tax_group_id);
4342: pnp_debug_pkg.log ('create_payment_terms - Tax Code Id :'||rec_template.tax_code_id);
4343: pnp_debug_pkg.log ('create_payment_terms - Tax Incl :'||rec_template.tax_included);
4336: pnp_debug_pkg.log ('create_payment_terms - Project Id :'||rec_template.project_id);
4337: pnp_debug_pkg.log ('create_payment_terms - Task Id :'||rec_template.task_id);
4338: pnp_debug_pkg.log ('create_payment_terms - Organization Id :'||rec_template.organization_id);
4339: pnp_debug_pkg.log ('create_payment_terms - Exend Type :'||rec_template.expenditure_type);
4340: pnp_debug_pkg.log ('create_payment_terms - Exend Item Date :'||rec_template.expenditure_item_date);
4341: pnp_debug_pkg.log ('create_payment_terms - Tax Group Id :'||rec_template.tax_group_id);
4342: pnp_debug_pkg.log ('create_payment_terms - Tax Code Id :'||rec_template.tax_code_id);
4343: pnp_debug_pkg.log ('create_payment_terms - Tax Incl :'||rec_template.tax_included);
4344: pnp_debug_pkg.log ('create_payment_terms - Distr Set Id :'||rec_template.distribution_set_id);
4337: pnp_debug_pkg.log ('create_payment_terms - Task Id :'||rec_template.task_id);
4338: pnp_debug_pkg.log ('create_payment_terms - Organization Id :'||rec_template.organization_id);
4339: pnp_debug_pkg.log ('create_payment_terms - Exend Type :'||rec_template.expenditure_type);
4340: pnp_debug_pkg.log ('create_payment_terms - Exend Item Date :'||rec_template.expenditure_item_date);
4341: pnp_debug_pkg.log ('create_payment_terms - Tax Group Id :'||rec_template.tax_group_id);
4342: pnp_debug_pkg.log ('create_payment_terms - Tax Code Id :'||rec_template.tax_code_id);
4343: pnp_debug_pkg.log ('create_payment_terms - Tax Incl :'||rec_template.tax_included);
4344: pnp_debug_pkg.log ('create_payment_terms - Distr Set Id :'||rec_template.distribution_set_id);
4345: pnp_debug_pkg.log ('create_payment_terms - Inv rule Id :'||rec_template.inv_rule_id);
4338: pnp_debug_pkg.log ('create_payment_terms - Organization Id :'||rec_template.organization_id);
4339: pnp_debug_pkg.log ('create_payment_terms - Exend Type :'||rec_template.expenditure_type);
4340: pnp_debug_pkg.log ('create_payment_terms - Exend Item Date :'||rec_template.expenditure_item_date);
4341: pnp_debug_pkg.log ('create_payment_terms - Tax Group Id :'||rec_template.tax_group_id);
4342: pnp_debug_pkg.log ('create_payment_terms - Tax Code Id :'||rec_template.tax_code_id);
4343: pnp_debug_pkg.log ('create_payment_terms - Tax Incl :'||rec_template.tax_included);
4344: pnp_debug_pkg.log ('create_payment_terms - Distr Set Id :'||rec_template.distribution_set_id);
4345: pnp_debug_pkg.log ('create_payment_terms - Inv rule Id :'||rec_template.inv_rule_id);
4346: pnp_debug_pkg.log ('create_payment_terms - Acct rule Id :'||rec_template.account_rule_id);
4339: pnp_debug_pkg.log ('create_payment_terms - Exend Type :'||rec_template.expenditure_type);
4340: pnp_debug_pkg.log ('create_payment_terms - Exend Item Date :'||rec_template.expenditure_item_date);
4341: pnp_debug_pkg.log ('create_payment_terms - Tax Group Id :'||rec_template.tax_group_id);
4342: pnp_debug_pkg.log ('create_payment_terms - Tax Code Id :'||rec_template.tax_code_id);
4343: pnp_debug_pkg.log ('create_payment_terms - Tax Incl :'||rec_template.tax_included);
4344: pnp_debug_pkg.log ('create_payment_terms - Distr Set Id :'||rec_template.distribution_set_id);
4345: pnp_debug_pkg.log ('create_payment_terms - Inv rule Id :'||rec_template.inv_rule_id);
4346: pnp_debug_pkg.log ('create_payment_terms - Acct rule Id :'||rec_template.account_rule_id);
4347: pnp_debug_pkg.log ('create_payment_terms - Sales Rep Id :'||rec_template.salesrep_id);
4340: pnp_debug_pkg.log ('create_payment_terms - Exend Item Date :'||rec_template.expenditure_item_date);
4341: pnp_debug_pkg.log ('create_payment_terms - Tax Group Id :'||rec_template.tax_group_id);
4342: pnp_debug_pkg.log ('create_payment_terms - Tax Code Id :'||rec_template.tax_code_id);
4343: pnp_debug_pkg.log ('create_payment_terms - Tax Incl :'||rec_template.tax_included);
4344: pnp_debug_pkg.log ('create_payment_terms - Distr Set Id :'||rec_template.distribution_set_id);
4345: pnp_debug_pkg.log ('create_payment_terms - Inv rule Id :'||rec_template.inv_rule_id);
4346: pnp_debug_pkg.log ('create_payment_terms - Acct rule Id :'||rec_template.account_rule_id);
4347: pnp_debug_pkg.log ('create_payment_terms - Sales Rep Id :'||rec_template.salesrep_id);
4348: pnp_debug_pkg.log ('create_payment_terms - PO header Id :'||rec_template.po_header_id);
4341: pnp_debug_pkg.log ('create_payment_terms - Tax Group Id :'||rec_template.tax_group_id);
4342: pnp_debug_pkg.log ('create_payment_terms - Tax Code Id :'||rec_template.tax_code_id);
4343: pnp_debug_pkg.log ('create_payment_terms - Tax Incl :'||rec_template.tax_included);
4344: pnp_debug_pkg.log ('create_payment_terms - Distr Set Id :'||rec_template.distribution_set_id);
4345: pnp_debug_pkg.log ('create_payment_terms - Inv rule Id :'||rec_template.inv_rule_id);
4346: pnp_debug_pkg.log ('create_payment_terms - Acct rule Id :'||rec_template.account_rule_id);
4347: pnp_debug_pkg.log ('create_payment_terms - Sales Rep Id :'||rec_template.salesrep_id);
4348: pnp_debug_pkg.log ('create_payment_terms - PO header Id :'||rec_template.po_header_id);
4349: pnp_debug_pkg.log ('create_payment_terms - PO # :'||rec_template.cust_po_number);
4342: pnp_debug_pkg.log ('create_payment_terms - Tax Code Id :'||rec_template.tax_code_id);
4343: pnp_debug_pkg.log ('create_payment_terms - Tax Incl :'||rec_template.tax_included);
4344: pnp_debug_pkg.log ('create_payment_terms - Distr Set Id :'||rec_template.distribution_set_id);
4345: pnp_debug_pkg.log ('create_payment_terms - Inv rule Id :'||rec_template.inv_rule_id);
4346: pnp_debug_pkg.log ('create_payment_terms - Acct rule Id :'||rec_template.account_rule_id);
4347: pnp_debug_pkg.log ('create_payment_terms - Sales Rep Id :'||rec_template.salesrep_id);
4348: pnp_debug_pkg.log ('create_payment_terms - PO header Id :'||rec_template.po_header_id);
4349: pnp_debug_pkg.log ('create_payment_terms - PO # :'||rec_template.cust_po_number);
4350: pnp_debug_pkg.log ('create_payment_terms - Receipt method id :'||rec_template.receipt_method_id);
4343: pnp_debug_pkg.log ('create_payment_terms - Tax Incl :'||rec_template.tax_included);
4344: pnp_debug_pkg.log ('create_payment_terms - Distr Set Id :'||rec_template.distribution_set_id);
4345: pnp_debug_pkg.log ('create_payment_terms - Inv rule Id :'||rec_template.inv_rule_id);
4346: pnp_debug_pkg.log ('create_payment_terms - Acct rule Id :'||rec_template.account_rule_id);
4347: pnp_debug_pkg.log ('create_payment_terms - Sales Rep Id :'||rec_template.salesrep_id);
4348: pnp_debug_pkg.log ('create_payment_terms - PO header Id :'||rec_template.po_header_id);
4349: pnp_debug_pkg.log ('create_payment_terms - PO # :'||rec_template.cust_po_number);
4350: pnp_debug_pkg.log ('create_payment_terms - Receipt method id :'||rec_template.receipt_method_id);
4351: pnp_debug_pkg.log ('create_payment_terms - Org id :'||p_org_id);
4344: pnp_debug_pkg.log ('create_payment_terms - Distr Set Id :'||rec_template.distribution_set_id);
4345: pnp_debug_pkg.log ('create_payment_terms - Inv rule Id :'||rec_template.inv_rule_id);
4346: pnp_debug_pkg.log ('create_payment_terms - Acct rule Id :'||rec_template.account_rule_id);
4347: pnp_debug_pkg.log ('create_payment_terms - Sales Rep Id :'||rec_template.salesrep_id);
4348: pnp_debug_pkg.log ('create_payment_terms - PO header Id :'||rec_template.po_header_id);
4349: pnp_debug_pkg.log ('create_payment_terms - PO # :'||rec_template.cust_po_number);
4350: pnp_debug_pkg.log ('create_payment_terms - Receipt method id :'||rec_template.receipt_method_id);
4351: pnp_debug_pkg.log ('create_payment_terms - Org id :'||p_org_id);
4352: pnp_debug_pkg.log ('create_payment_terms - Period Billrec id :'||l_period_billrec_id);
4345: pnp_debug_pkg.log ('create_payment_terms - Inv rule Id :'||rec_template.inv_rule_id);
4346: pnp_debug_pkg.log ('create_payment_terms - Acct rule Id :'||rec_template.account_rule_id);
4347: pnp_debug_pkg.log ('create_payment_terms - Sales Rep Id :'||rec_template.salesrep_id);
4348: pnp_debug_pkg.log ('create_payment_terms - PO header Id :'||rec_template.po_header_id);
4349: pnp_debug_pkg.log ('create_payment_terms - PO # :'||rec_template.cust_po_number);
4350: pnp_debug_pkg.log ('create_payment_terms - Receipt method id :'||rec_template.receipt_method_id);
4351: pnp_debug_pkg.log ('create_payment_terms - Org id :'||p_org_id);
4352: pnp_debug_pkg.log ('create_payment_terms - Period Billrec id :'||l_period_billrec_id);
4353: pnp_debug_pkg.log ('create_payment_terms - Rec Agr Line id :'||l_rec_agr_line_id);
4346: pnp_debug_pkg.log ('create_payment_terms - Acct rule Id :'||rec_template.account_rule_id);
4347: pnp_debug_pkg.log ('create_payment_terms - Sales Rep Id :'||rec_template.salesrep_id);
4348: pnp_debug_pkg.log ('create_payment_terms - PO header Id :'||rec_template.po_header_id);
4349: pnp_debug_pkg.log ('create_payment_terms - PO # :'||rec_template.cust_po_number);
4350: pnp_debug_pkg.log ('create_payment_terms - Receipt method id :'||rec_template.receipt_method_id);
4351: pnp_debug_pkg.log ('create_payment_terms - Org id :'||p_org_id);
4352: pnp_debug_pkg.log ('create_payment_terms - Period Billrec id :'||l_period_billrec_id);
4353: pnp_debug_pkg.log ('create_payment_terms - Rec Agr Line id :'||l_rec_agr_line_id);
4354: pnp_debug_pkg.log ('create_payment_terms - Term Template ID :'||rec_template.term_template_id);
4347: pnp_debug_pkg.log ('create_payment_terms - Sales Rep Id :'||rec_template.salesrep_id);
4348: pnp_debug_pkg.log ('create_payment_terms - PO header Id :'||rec_template.po_header_id);
4349: pnp_debug_pkg.log ('create_payment_terms - PO # :'||rec_template.cust_po_number);
4350: pnp_debug_pkg.log ('create_payment_terms - Receipt method id :'||rec_template.receipt_method_id);
4351: pnp_debug_pkg.log ('create_payment_terms - Org id :'||p_org_id);
4352: pnp_debug_pkg.log ('create_payment_terms - Period Billrec id :'||l_period_billrec_id);
4353: pnp_debug_pkg.log ('create_payment_terms - Rec Agr Line id :'||l_rec_agr_line_id);
4354: pnp_debug_pkg.log ('create_payment_terms - Term Template ID :'||rec_template.term_template_id);
4355:
4348: pnp_debug_pkg.log ('create_payment_terms - PO header Id :'||rec_template.po_header_id);
4349: pnp_debug_pkg.log ('create_payment_terms - PO # :'||rec_template.cust_po_number);
4350: pnp_debug_pkg.log ('create_payment_terms - Receipt method id :'||rec_template.receipt_method_id);
4351: pnp_debug_pkg.log ('create_payment_terms - Org id :'||p_org_id);
4352: pnp_debug_pkg.log ('create_payment_terms - Period Billrec id :'||l_period_billrec_id);
4353: pnp_debug_pkg.log ('create_payment_terms - Rec Agr Line id :'||l_rec_agr_line_id);
4354: pnp_debug_pkg.log ('create_payment_terms - Term Template ID :'||rec_template.term_template_id);
4355:
4356: IF p_location_id IS NOT NULL AND
4349: pnp_debug_pkg.log ('create_payment_terms - PO # :'||rec_template.cust_po_number);
4350: pnp_debug_pkg.log ('create_payment_terms - Receipt method id :'||rec_template.receipt_method_id);
4351: pnp_debug_pkg.log ('create_payment_terms - Org id :'||p_org_id);
4352: pnp_debug_pkg.log ('create_payment_terms - Period Billrec id :'||l_period_billrec_id);
4353: pnp_debug_pkg.log ('create_payment_terms - Rec Agr Line id :'||l_rec_agr_line_id);
4354: pnp_debug_pkg.log ('create_payment_terms - Term Template ID :'||rec_template.term_template_id);
4355:
4356: IF p_location_id IS NOT NULL AND
4357: p_calc_period_end_date IS NOT NULL THEN
4350: pnp_debug_pkg.log ('create_payment_terms - Receipt method id :'||rec_template.receipt_method_id);
4351: pnp_debug_pkg.log ('create_payment_terms - Org id :'||p_org_id);
4352: pnp_debug_pkg.log ('create_payment_terms - Period Billrec id :'||l_period_billrec_id);
4353: pnp_debug_pkg.log ('create_payment_terms - Rec Agr Line id :'||l_rec_agr_line_id);
4354: pnp_debug_pkg.log ('create_payment_terms - Term Template ID :'||rec_template.term_template_id);
4355:
4356: IF p_location_id IS NOT NULL AND
4357: p_calc_period_end_date IS NOT NULL THEN
4358:
4495: EXIT WHEN csr_temp_dist%NOTFOUND;
4496:
4497: END IF;
4498:
4499: pnp_debug_pkg.log(' account_id '||rec_distributions.account_id);
4500: pnp_debug_pkg.log(' account_class '||rec_distributions.account_id);
4501:
4502: l_context := 'Inserting Account Distributions ';
4503: pn_distributions_pkg.insert_row (
4496:
4497: END IF;
4498:
4499: pnp_debug_pkg.log(' account_id '||rec_distributions.account_id);
4500: pnp_debug_pkg.log(' account_class '||rec_distributions.account_id);
4501:
4502: l_context := 'Inserting Account Distributions ';
4503: pn_distributions_pkg.insert_row (
4504: x_rowid => l_rowid
4541:
4542: END IF;
4543:
4544: END IF;
4545: pnp_debug_pkg.log('PN_REC_CALC_PKG.create_payment_terms (-) ');
4546:
4547: EXCEPTION
4548: when others then
4549: pnp_debug_pkg.log('Error while' || l_context || to_char(sqlcode));
4545: pnp_debug_pkg.log('PN_REC_CALC_PKG.create_payment_terms (-) ');
4546:
4547: EXCEPTION
4548: when others then
4549: pnp_debug_pkg.log('Error while' || l_context || to_char(sqlcode));
4550: p_error := 'Error creating billing term';
4551: p_error_code := -99;
4552:
4553: END create_payment_terms;
4620: -- Fix for bug # 3142328
4621:
4622: BEGIN
4623:
4624: pnp_debug_pkg.log('PN_REC_CALC_PKG.find_if_rec_payterm_exists (+) ');
4625:
4626: l_period_bill_record.amount := 0;
4627: l_period_bill_record.period_billrec_id:= 0;
4628: l_distributions_exist := 'N';
4631: period line */
4632:
4633: l_context := 'selecting billed amount record';
4634:
4635: pnp_debug_pkg.log('find_if_rec_payterm_exists - getting billed_rec_id');
4636:
4637: IF (p_consolidate = 'N') THEN
4638: SELECT period_billrec_id
4639: INTO l_period_bill_record.period_billrec_id
4648: WHERE rec_agreement_id = p_rec_agreement_id
4649: AND rec_calc_period_id = p_rec_calc_period_id;
4650: END IF;
4651:
4652: pnp_debug_pkg.log('find_if_rec_payterm_exists - bille_rec_id '|| l_period_bill_record.period_billrec_id);
4653:
4654: /* Get the amount of approved terms for the period */
4655:
4656: l_context := 'getting approved billed amount';
4654: /* Get the amount of approved terms for the period */
4655:
4656: l_context := 'getting approved billed amount';
4657:
4658: pnp_debug_pkg.log('find_if_rec_payterm_exists - getting approved amount');
4659:
4660: IF (p_consolidate = 'N') THEN
4661: SELECT NVL(SUM(actual_amount),0)
4662: INTO l_period_bill_record.amount
4671: WHERE period_billrec_id = l_period_bill_record.period_billrec_id
4672: AND status = 'APPROVED';
4673: END IF;
4674:
4675: pnp_debug_pkg.log('find_if_rec_payterm_exists - approved amount'|| l_period_bill_record.amount);
4676: l_context := 'deleting billing terms';
4677:
4678: pnp_debug_pkg.log('find_if_rec_payterm_exists - deleting terms ');
4679:
4674:
4675: pnp_debug_pkg.log('find_if_rec_payterm_exists - approved amount'|| l_period_bill_record.amount);
4676: l_context := 'deleting billing terms';
4677:
4678: pnp_debug_pkg.log('find_if_rec_payterm_exists - deleting terms ');
4679:
4680: IF (p_consolidate = 'N') THEN
4681:
4682: -- Fix for bug # 3142328
4683: OPEN get_distributions_exist_nocons;
4684: FETCH get_distributions_exist_nocons INTO l_distributions_exist;
4685: CLOSE get_distributions_exist_nocons;
4686:
4687: pnp_debug_pkg.log('now deleting terms l_distributions_exist: '||l_distributions_exist);
4688: IF l_distributions_exist = 'Y' THEN
4689:
4690: DELETE pn_distributions_all
4691: WHERE payment_term_id in (SELECT payment_term_id
4726: AND status = 'DRAFT';
4727:
4728: END IF;
4729:
4730: pnp_debug_pkg.log('find_if_rec_payterm_exists - terms deleted '|| to_char(SQL%ROWCOUNT));
4731: pnp_debug_pkg.log('PN_REC_CALC_PKG.find_if_rec_payterm_exists (-) ');
4732:
4733: RETURN l_period_bill_record;
4734:
4727:
4728: END IF;
4729:
4730: pnp_debug_pkg.log('find_if_rec_payterm_exists - terms deleted '|| to_char(SQL%ROWCOUNT));
4731: pnp_debug_pkg.log('PN_REC_CALC_PKG.find_if_rec_payterm_exists (-) ');
4732:
4733: RETURN l_period_bill_record;
4734:
4735: EXCEPTION
4738: RETURN NULL;
4739:
4740: WHEN OTHERS
4741: THEN
4742: pnp_debug_pkg.log('Error while '|| l_context || to_char(sqlcode));
4743: l_period_bill_record.period_billrec_id := -99;
4744: l_period_bill_record.amount := null;
4745:
4746: END find_if_rec_payterm_exists;
4788: AND lineconst.SCOPE = 'OPYA';
4789:
4790: BEGIN
4791:
4792: pnp_debug_pkg.log('PN_REC_CALC_PKG.get_prior_period_actual_amount (+) ');
4793:
4794: SELECT NVL(period_lines.constrained_actual,0)
4795: INTO l_prior_period_amount
4796: FROM pn_rec_period_lines_all period_lines
4823: EXCEPTION
4824:
4825: WHEN TOO_MANY_ROWS
4826: THEN
4827: pnp_debug_pkg.log('get_prior_period_actual_amount - Multiple prior periods found');
4828:
4829: IF p_called_from = 'CALCUI' THEN
4830: return null;
4831: ELSE
4844: END IF;
4845:
4846: WHEN OTHERS
4847: THEN
4848: pnp_debug_pkg.log('Error getting prior period actual amount '|| to_char(sqlcode));
4849: IF p_called_from = 'CALCUI' THEN
4850: return null;
4851: ELSE
4852: return -99;
4851: ELSE
4852: return -99;
4853: END IF;
4854:
4855: pnp_debug_pkg.log('PN_REC_CALC_PKG.get_prior_period_actual_amount (-) ');
4856:
4857: END get_prior_period_actual_amount;
4858:
4859: /*===========================================================================+
4926: AND lineconst.SCOPE = 'OPYC';
4927:
4928: BEGIN
4929:
4930: pnp_debug_pkg.log('PN_REC_CALC_PKG.get_prior_period_cap (+) ');
4931:
4932: OPEN csr_get_base_cap;
4933: FETCH csr_get_base_cap into l_cap_amount,l_start_date,l_end_date;
4934:
4990: close csr_get_curr_percent;
4991:
4992: END IF;
4993:
4994: pnp_debug_pkg.log('PN_REC_CALC_PKG.get_prior_period_cap (-) ');
4995:
4996: RETURN l_cap_amount;
4997:
4998: EXCEPTION
4998: EXCEPTION
4999:
5000: WHEN OTHERS
5001: THEN
5002: pnp_debug_pkg.log('Error getting prior year cap '|| to_char(sqlcode));
5003: IF p_called_from = 'CALCUI' THEN
5004: return null;
5005: ELSE
5006: return -99;
5152: l_rec_agr_line_id pn_rec_agr_lines_all.rec_agr_line_id%TYPE;
5153:
5154: begin
5155:
5156: pnp_debug_pkg.log('PN_REC_CALC_PKG.lock_area_exp_cls_dtl (+) ');
5157:
5158: FOR l_term_rec in c_term
5159: LOOP
5160:
5250: END IF;
5251:
5252: END LOOP;
5253: commit;
5254: pnp_debug_pkg.log('PN_REC_CALC_PKG.lock_area_exp_cls_dtl (-) ');
5255: Exception
5256: when others then
5257: pnp_debug_pkg.log(' error in PN_REC_CALC_PKG.lock_area_exp_cls_dtl :'||to_char(sqlcode)||' : '||sqlerrm);
5258: raise;
5253: commit;
5254: pnp_debug_pkg.log('PN_REC_CALC_PKG.lock_area_exp_cls_dtl (-) ');
5255: Exception
5256: when others then
5257: pnp_debug_pkg.log(' error in PN_REC_CALC_PKG.lock_area_exp_cls_dtl :'||to_char(sqlcode)||' : '||sqlerrm);
5258: raise;
5259:
5260: END lock_area_exp_cls_dtl ;
5261:
5296: l_rec_calc_period_id pn_rec_calc_periods_all.rec_calc_period_id%TYPE;
5297: l_period_count NUMBER;
5298: l_org_id NUMBER;
5299: BEGIN
5300: pnp_debug_pkg.log('PN_REC_CALC_PKG.validate_create_calc_period (+) ');
5301:
5302: SELECT count(1)
5303: INTO l_period_count
5304: FROM pn_rec_calc_periods_all
5343: );
5344: return l_rec_calc_period_id;
5345: ELSE
5346: fnd_message.set_name ('PN','PN_REC_AGRMNT_PERIOD_EXIST');
5347: pnp_debug_pkg.put_log_msg(fnd_message.get);
5348: return -1;
5349: END IF;
5350: pnp_debug_pkg.log('PN_REC_CALC_PKG.validate_create_calculation_period (-) ');
5351:
5346: fnd_message.set_name ('PN','PN_REC_AGRMNT_PERIOD_EXIST');
5347: pnp_debug_pkg.put_log_msg(fnd_message.get);
5348: return -1;
5349: END IF;
5350: pnp_debug_pkg.log('PN_REC_CALC_PKG.validate_create_calculation_period (-) ');
5351:
5352: EXCEPTION
5353: WHEN OTHERS THEN
5354: pnp_debug_pkg.log('error in PN_REC_CALC_PKG.validate_create_calc_period :'||to_char(sqlcode)||' : '||sqlerrm);
5350: pnp_debug_pkg.log('PN_REC_CALC_PKG.validate_create_calculation_period (-) ');
5351:
5352: EXCEPTION
5353: WHEN OTHERS THEN
5354: pnp_debug_pkg.log('error in PN_REC_CALC_PKG.validate_create_calc_period :'||to_char(sqlcode)||' : '||sqlerrm);
5355: raise;
5356: END validate_create_calc_period;
5357:
5358: END PN_REC_CALC_PKG;