DBA Data[Home] [Help]

APPS.PN_RECOVERY_EXTRACT_PKG dependencies on PNP_DEBUG_PKG

Line 90: pnp_debug_pkg.log(l_desc ||' (+)');

86: l_desc VARCHAR2(100) := 'pn_recovery_extract_pkg.process_vacancy';
87:
88: BEGIN
89:
90: pnp_debug_pkg.log(l_desc ||' (+)');
91:
92: l_info := ' checking validity on inputs';
93: pnp_debug_pkg.log(l_info);
94:

Line 93: pnp_debug_pkg.log(l_info);

89:
90: pnp_debug_pkg.log(l_desc ||' (+)');
91:
92: l_info := ' checking validity on inputs';
93: pnp_debug_pkg.log(l_info);
94:
95: IF p_area IS NULL OR
96: p_area < 0 OR
97: p_start_date IS NULL OR

Line 104: pnp_debug_pkg.log(l_info);

100: app_exception.raise_exception;
101: END IF;
102:
103: l_info := ' adjusting input';
104: pnp_debug_pkg.log(l_info);
105:
106: l_start_date := TRUNC(p_start_date);
107: l_end_date := TRUNC(p_end_date) + 1;
108:

Line 116: pnp_debug_pkg.log(l_info);

112:
113: IF p_date_table.count = 0 THEN
114:
115: l_info := ' initializing table';
116: pnp_debug_pkg.log(l_info);
117:
118: p_date_table.delete;
119: p_number_table.delete;
120:

Line 128: pnp_debug_pkg.log(l_info);

124:
125: ELSE
126:
127: l_info := ' processing start date ';
128: pnp_debug_pkg.log(l_info);
129:
130: FOR i IN 0 .. p_date_table.count - 1 LOOP
131:
132: IF p_date_table(i) >= l_start_date THEN

Line 160: pnp_debug_pkg.log(l_info);

156: l_flag := FALSE;
157: END IF;
158:
159: l_info := ' processing end date ';
160: pnp_debug_pkg.log(l_info);
161:
162: FOR j IN l_index .. p_date_table.count - 1 LOOP
163:
164: IF p_date_table(j) >= l_end_date THEN

Line 196: pnp_debug_pkg.log(l_info);

192:
193: IF NOT l_flag THEN
194:
195: l_info := ' processing the remaining ';
196: pnp_debug_pkg.log(l_info);
197:
198: IF p_date_table(l_index) < l_end_date THEN
199: l_date_table(l_date_table.count) := l_end_date;
200: l_number_table(l_number_table.count) := l_area;

Line 224: pnp_debug_pkg.log(l_desc ||' (-)');

220: p_number_table := l_number_table;
221:
222: END IF;
223:
224: pnp_debug_pkg.log(l_desc ||' (-)');
225:
226: EXCEPTION
227: WHEN OTHERS THEN
228: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

Line 228: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

224: pnp_debug_pkg.log(l_desc ||' (-)');
225:
226: EXCEPTION
227: WHEN OTHERS THEN
228: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);
229: raise;
230: END;
231:
232: ------------------------------------------------------------------------------+

Line 270: pnp_debug_pkg.log(l_desc ||' (+)');

266: l_info VARCHAR2(300);
267: l_desc VARCHAR2(100) := 'pn_recovery_extract_pkg.find_area_ovr_values' ;
268: BEGIN
269:
270: pnp_debug_pkg.log(l_desc ||' (+)');
271:
272: p_weighted_avg_ovr := null;
273: p_occupied_area_ovr := null;
274: p_assigned_area_ovr := null;

Line 282: pnp_debug_pkg.log(l_info);

278:
279: FOR i IN 0 .. p_ovr.COUNT - 1 LOOP
280:
281: l_info := ' checking overrides for loc id: '|| p_loc_id;
282: pnp_debug_pkg.log(l_info);
283:
284: IF p_ovr(i).location_id = p_loc_id AND
285: (p_ovr(i).cust_account_id = p_cust_id OR (p_ovr(i).cust_account_id IS NULL AND p_cust_id IS NULL)) THEN
286:

Line 313: pnp_debug_pkg.log(l_desc ||' (-)');

309:
310: END IF;
311: END LOOP;
312:
313: pnp_debug_pkg.log(l_desc ||' (-)');
314:
315: EXCEPTION
316: WHEN OTHERS THEN
317: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

Line 317: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

313: pnp_debug_pkg.log(l_desc ||' (-)');
314:
315: EXCEPTION
316: WHEN OTHERS THEN
317: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);
318: raise;
319:
320: END find_area_ovr_values;
321:

Line 364: pnp_debug_pkg.log(l_desc ||' (+)');

360: l_info VARCHAR2(300);
361: l_desc VARCHAR2(100) := 'pn_recovery_extract_pkg.get_area_cls_dtl_calc' ;
362: BEGIN
363:
364: pnp_debug_pkg.log(l_desc ||' (+)');
365:
366: l_info := ' validating dates ';
367: pnp_debug_pkg.log(l_info);
368:

Line 367: pnp_debug_pkg.log(l_info);

363:
364: pnp_debug_pkg.log(l_desc ||' (+)');
365:
366: l_info := ' validating dates ';
367: pnp_debug_pkg.log(l_info);
368:
369: IF p_rec_from_date IS NULL THEN
370: p_rec_from_date := p_from_date;
371: END IF;

Line 386: pnp_debug_pkg.log(l_info);

382: p_rec_to_date := p_to_date;
383: END IF;
384:
385: l_info := ' calculating occupancy and weighted avg';
386: pnp_debug_pkg.log(l_info);
387:
388: -- handle divide by zero case; make start date inclusive
389: p_occup_pct := TO_NUMBER(p_to_date - (p_from_date - 1));
390: IF p_occup_pct <> 0 THEN

Line 410: pnp_debug_pkg.log(l_info);

406: p_include_flag := 'N';
407: END IF;
408:
409: l_info := ' determining flags ';
410: pnp_debug_pkg.log(l_info);
411:
412: IF p_exc_type_code = 'AREA' THEN
413: p_exc_area_flag := 'Y';
414: p_exc_prorata_flag := 'N';

Line 426: pnp_debug_pkg.log(l_desc ||' (-)');

422: p_exc_area_flag := 'N';
423: p_exc_prorata_flag := 'N';
424: END IF;
425:
426: pnp_debug_pkg.log(l_desc ||' (-)');
427:
428: EXCEPTION
429: WHEN OTHERS THEN
430: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

Line 430: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

426: pnp_debug_pkg.log(l_desc ||' (-)');
427:
428: EXCEPTION
429: WHEN OTHERS THEN
430: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);
431: raise;
432: END;
433:
434: ------------------------------------------------------------------------------+

Line 456: pnp_debug_pkg.log(l_desc ||' (+)');

452: l_desc VARCHAR2(100) := 'pn_recovery_extract_pkg.is_totally_vacant' ;
453: l_info VARCHAR2(300);
454: BEGIN
455:
456: pnp_debug_pkg.log(l_desc ||' (+)');
457:
458: FOR i IN 0 .. p_date_tbl.count - 2 LOOP
459: l_info := ' searching through table ';
460: pnp_debug_pkg.log(l_info);

Line 460: pnp_debug_pkg.log(l_info);

456: pnp_debug_pkg.log(l_desc ||' (+)');
457:
458: FOR i IN 0 .. p_date_tbl.count - 2 LOOP
459: l_info := ' searching through table ';
460: pnp_debug_pkg.log(l_info);
461: IF p_from >= p_date_tbl(i) AND
462: p_to <= p_date_tbl(i+1) AND
463: p_num = p_num_tbl(i) THEN
464: l_result := TRUE;

Line 471: pnp_debug_pkg.log(l_desc ||' (-)');

467: END LOOP;
468:
469: RETURN l_result;
470:
471: pnp_debug_pkg.log(l_desc ||' (-)');
472:
473: EXCEPTION
474: WHEN OTHERS THEN
475: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

Line 475: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

471: pnp_debug_pkg.log(l_desc ||' (-)');
472:
473: EXCEPTION
474: WHEN OTHERS THEN
475: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);
476: raise;
477: END;
478:
479: ------------------------------------------------------------------------------+

Line 543: pnp_debug_pkg.log(l_desc ||' (+)');

539: l_desc VARCHAR2(100) := 'pn_recovery_extract_pkg.insert_vacancy_data' ;
540:
541: BEGIN
542:
543: pnp_debug_pkg.log(l_desc ||' (+)');
544:
545: FOR i IN 0 .. p_date_table.count - 2 LOOP
546:
547: l_from := p_date_table(i);

Line 584: pnp_debug_pkg.log(l_info);

580: p_include_flag => l_include_flag
581: );
582:
583: l_info := ' finding override values ';
584: pnp_debug_pkg.log(l_info);
585:
586: l_found := FALSE;
587:
588: IF p_regenerate = 'Y' THEN

Line 632: pnp_debug_pkg.log(l_info);

628: END IF;
629:
630: l_counter := p_data_tbl.COUNT;
631: l_info := ' determining totals ';
632: pnp_debug_pkg.log(l_info);
633:
634: -- if there are no overrides, then the value is null, for which we default to be equal the normal
635:
636: IF l_excl_prorata_ovr_flag IS NULL THEN l_excl_prorata_ovr_flag := l_excl_prorata_flag; END IF;

Line 667: pnp_debug_pkg.log(l_info);

663:
664: END IF;
665:
666: l_info := ' populating data into pl/sql table ';
667: pnp_debug_pkg.log(l_info);
668:
669: p_data_tbl(l_counter).area_class_dtl_line_id := l_area_class_dtl_line_id;
670: p_data_tbl(l_counter).from_date := l_from;
671: p_data_tbl(l_counter).to_date := l_to;

Line 699: pnp_debug_pkg.log(l_desc ||' (-)');

695: END IF;
696:
697: END LOOP;
698:
699: pnp_debug_pkg.log(l_desc ||' (-)');
700:
701: EXCEPTION
702: WHEN OTHERS THEN
703: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

Line 703: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

699: pnp_debug_pkg.log(l_desc ||' (-)');
700:
701: EXCEPTION
702: WHEN OTHERS THEN
703: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);
704: raise;
705: END;
706:
707: ------------------------------------------------------------------------------+

Line 736: pnp_debug_pkg.log(l_desc ||' (+)');

732: l_desc VARCHAR2(100) := 'pn_recovery_extract_pkg.process_area_tables';
733:
734: BEGIN
735:
736: pnp_debug_pkg.log(l_desc ||' (+)');
737:
738: l_info := ' looking at new and old data to determine action to be taken';
739: pnp_debug_pkg.log(l_info);
740:

Line 739: pnp_debug_pkg.log(l_info);

735:
736: pnp_debug_pkg.log(l_desc ||' (+)');
737:
738: l_info := ' looking at new and old data to determine action to be taken';
739: pnp_debug_pkg.log(l_info);
740:
741: FOR i IN 0 .. p_new_data.COUNT - 1 LOOP
742:
743: l_area_cls_dtl_line_id := p_new_data(i).area_class_dtl_line_id;

Line 748: pnp_debug_pkg.log(l_info);

744:
745: IF l_area_cls_dtl_line_id IS NULL THEN
746:
747: l_info := ' inserting row into area cls dtl line table ';
748: pnp_debug_pkg.log(l_info);
749:
750: pn_rec_arcl_dtlln_pkg.insert_row(
751: x_org_id => pn_mo_cache_utils.get_current_org_id,
752: x_area_class_dtl_id => p_hdr_id,

Line 788: pnp_debug_pkg.log(l_info);

784:
785: ELSE
786:
787: l_info := ' updating row in area cls dtl line table: ' || p_new_data(i).area_class_dtl_line_id ;
788: pnp_debug_pkg.log(l_info);
789:
790: pn_rec_arcl_dtlln_pkg.update_row(
791: x_area_class_dtl_line_id => l_area_cls_dtl_line_id,
792: x_from_date => p_new_data(i).from_date,

Line 846: pnp_debug_pkg.log(l_desc ||' (-)');

842: FORALL i IN 0 .. delete_table.COUNT - 1
843: DELETE FROM pn_rec_arcl_dtlln_all
844: WHERE area_class_dtl_line_id = delete_table(i);
845:
846: pnp_debug_pkg.log(l_desc ||' (-)');
847:
848: EXCEPTION
849: WHEN OTHERS THEN
850: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

Line 850: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

846: pnp_debug_pkg.log(l_desc ||' (-)');
847:
848: EXCEPTION
849: WHEN OTHERS THEN
850: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);
851: raise;
852: END;
853:
854: ------------------------------------------------------------------------------+

Line 1095: pnp_debug_pkg.log(l_desc ||' (+)');

1091:
1092:
1093: BEGIN
1094:
1095: pnp_debug_pkg.log(l_desc ||' (+)');
1096:
1097: fnd_message.set_name('PN','PN_REC_ARCL_DTL_CP_INFO');
1098: fnd_message.set_token('ARCL' , to_char(p_area_class_id));
1099: fnd_message.set_token('STR' , p_from_date);

Line 1103: pnp_debug_pkg.put_log_msg('');

1099: fnd_message.set_token('STR' , p_from_date);
1100: fnd_message.set_token('END' , p_to_date);
1101: fnd_message.set_token('AOD' , p_as_of_date);
1102: fnd_message.set_token('OVR' , p_keep_override);
1103: pnp_debug_pkg.put_log_msg('');
1104: pnp_debug_pkg.put_log_msg(fnd_message.get);
1105: pnp_debug_pkg.put_log_msg('');
1106:
1107: l_vacancy_date_table.delete;

Line 1104: pnp_debug_pkg.put_log_msg(fnd_message.get);

1100: fnd_message.set_token('END' , p_to_date);
1101: fnd_message.set_token('AOD' , p_as_of_date);
1102: fnd_message.set_token('OVR' , p_keep_override);
1103: pnp_debug_pkg.put_log_msg('');
1104: pnp_debug_pkg.put_log_msg(fnd_message.get);
1105: pnp_debug_pkg.put_log_msg('');
1106:
1107: l_vacancy_date_table.delete;
1108: l_vacancy_num_table.delete;

Line 1105: pnp_debug_pkg.put_log_msg('');

1101: fnd_message.set_token('AOD' , p_as_of_date);
1102: fnd_message.set_token('OVR' , p_keep_override);
1103: pnp_debug_pkg.put_log_msg('');
1104: pnp_debug_pkg.put_log_msg(fnd_message.get);
1105: pnp_debug_pkg.put_log_msg('');
1106:
1107: l_vacancy_date_table.delete;
1108: l_vacancy_num_table.delete;
1109: l_ref_vacancy_date_table.delete;

Line 1130: pnp_debug_pkg.log(l_info);

1126: l_area_total_tbl(0).total_weighted_avg_ovr := 0;
1127: l_area_total_tbl(0).total_weighted_avg_exc := 0;
1128:
1129: l_info:= ' fetching area class information';
1130: pnp_debug_pkg.log(l_info);
1131:
1132: FOR area_class_rec IN get_area_class_info LOOP
1133: IF l_arcl_locid IS NULL THEN l_arcl_locid := area_class_rec.location_id; END IF;
1134: IF l_arcl_propid IS NULL THEN l_arcl_propid := area_class_rec.property_id; END IF;

Line 1147: pnp_debug_pkg.log(l_info);

1143:
1144: END LOOP;
1145:
1146: l_info := ' validating UOM is unique for location and property';
1147: pnp_debug_pkg.log(l_info);
1148:
1149: IF l_arcl_propid IS NOT NULL AND l_arcl_locid IS NULL THEN
1150: FOR validate_rec IN get_uom_info_from_prop(l_arcl_propid) LOOP
1151: IF l_uom_code IS NULL THEN l_uom_code := validate_rec.uom_code;

Line 1168: pnp_debug_pkg.log(l_info);

1164: END LOOP;
1165: END IF;
1166:
1167: l_info := ' finding overrides and processing header information ';
1168: pnp_debug_pkg.log(l_info);
1169:
1170: l_regenerate := 'Y';
1171: l_count := -1;
1172:

Line 1184: pnp_debug_pkg.log(fnd_message.get);

1180: fnd_message.set_token('FDATE', p_from_date);
1181: fnd_message.set_token('TDATE', p_to_date);
1182: fnd_message.set_token('AODATE', p_as_of_date);
1183: fnd_message.set_token('NAME', get_ovr_rec.area_class_name);
1184: pnp_debug_pkg.log(fnd_message.get);
1185: RETURN;
1186: END IF;
1187:
1188: l_count := l_area_cls_ln_curnt_ovr.COUNT;

Line 1215: pnp_debug_pkg.log(l_info);

1211:
1212: END IF;
1213:
1214: l_info := ' getting prior cls dtl id for overrides';
1215: pnp_debug_pkg.log(l_info);
1216:
1217: FOR get_first_id IN get_prior_cls_dtl_id LOOP
1218: l_dummy_id := get_first_id.area_class_dtl_id;
1219: exit;

Line 1245: pnp_debug_pkg.log(l_info);

1241:
1242: FOR location_rec IN get_location_info(l_arcl_locid, l_arcl_propid) LOOP
1243:
1244: l_info := ' processing location id: '|| location_rec.location_id ||' ';
1245: pnp_debug_pkg.log(l_info);
1246:
1247: l_is_assigned := FALSE;
1248:
1249: IF l_temp_loc_id IS NULL OR

Line 1257: pnp_debug_pkg.log(l_info);

1253:
1254: -- generate vacancy data for that location id
1255:
1256: l_info := ' inserting vacancy data into details table for location: '||l_temp_loc_id||' ';
1257: pnp_debug_pkg.log(l_info);
1258:
1259: insert_vacancy_data(p_location_id => l_temp_loc_id,
1260: p_property_id => l_temp_prop_id,
1261: p_date_table => l_vacancy_date_table,

Line 1297: pnp_debug_pkg.log(l_info);

1293: l_is_assigned := TRUE;
1294:
1295: l_info := ' checking whether space assignment: '|| space_assign_rec.cust_space_assign_id ||
1296: ' meets exclusion criteria ';
1297: pnp_debug_pkg.log(l_info);
1298:
1299: l_meets_criteria := FALSE;
1300:
1301: FOR i IN 0 .. l_arcl_exc_table.COUNT - 1 LOOP

Line 1330: pnp_debug_pkg.log(l_info);

1326:
1327: l_from_date := space_assign_rec.cust_assign_start_date;
1328: l_to_date := space_assign_rec.fin_oblig_end_date;
1329: l_info := ' getting details for cust assignment :'||space_assign_rec.cust_space_assign_id||' ';
1330: pnp_debug_pkg.log(l_info);
1331:
1332: IF NOT l_meets_criteria THEN l_excl_type := null; END IF;
1333:
1334: get_area_cls_dtl_calc(

Line 1351: pnp_debug_pkg.log(l_info);

1347: p_include_flag => l_include_flag);
1348:
1349: l_info := ' finding overrides and processing into pl/sql table the details of '||
1350: 'cust assignment:'||space_assign_rec.cust_space_assign_id||' ';
1351: pnp_debug_pkg.log(l_info);
1352:
1353: l_found := FALSE;
1354:
1355: IF l_regenerate = 'Y' THEN

Line 1421: pnp_debug_pkg.log(l_info);

1417:
1418: IF nvl(l_excl_area_ovr_flag, l_excl_area_flag) = 'N' THEN
1419:
1420: l_info := ' figuring totals ';
1421: pnp_debug_pkg.log(l_info);
1422:
1423:
1424: l_area_total_tbl(0).total_vacant_area := l_area_total_tbl(0).total_vacant_area +
1425: nvl(location_rec.assignable_area,0) - nvl(l_occup_area,0);

Line 1433: pnp_debug_pkg.log(l_info);

1429:
1430: ELSIF nvl(l_excl_area_ovr_flag, l_excl_area_flag) = 'Y' THEN
1431:
1432: l_info := ' figuring excluded totals ';
1433: pnp_debug_pkg.log(l_info);
1434:
1435: l_area_total_tbl(0).total_occupied_area_exc := l_area_total_tbl(0).total_occupied_area_exc +
1436: nvl(nvl(l_occup_area_ovr, l_occup_area),0);
1437: l_area_total_tbl(0).total_vacant_area_exc := l_area_total_tbl(0).total_vacant_area_exc +

Line 1449: pnp_debug_pkg.log(l_info);

1445: END IF;
1446:
1447:
1448: l_info := ' processing area cls detail information into pl/sql table ';
1449: pnp_debug_pkg.log(l_info);
1450:
1451: l_area_cls_ln_data_tbl(l_data_tbl_counter).area_class_dtl_line_id := l_area_class_dtl_line_id;
1452: l_area_cls_ln_data_tbl(l_data_tbl_counter).from_date := l_from_date;
1453: l_area_cls_ln_data_tbl(l_data_tbl_counter).to_date := l_to_date;

Line 1480: pnp_debug_pkg.log(l_info);

1476:
1477: -- collect data
1478:
1479: l_info := ' processing vacancy for cust assignment:'||space_assign_rec.cust_space_assign_id||' ';
1480: pnp_debug_pkg.log(l_info);
1481:
1482: process_vacancy(
1483: p_start_date => l_from_date,
1484: p_end_date => l_to_date,

Line 1493: pnp_debug_pkg.log(l_info);

1489:
1490: END LOOP;
1491:
1492: l_info := ' processing vacancy for location for data table';
1493: pnp_debug_pkg.log(l_info);
1494:
1495: process_vacancy(
1496: p_start_date => location_rec.active_start_date,
1497: p_end_date => location_rec.active_end_date,

Line 1504: pnp_debug_pkg.log(l_info);

1500: p_number_table => l_vacancy_num_table,
1501: p_add => TRUE);
1502:
1503: l_info := ' processing vacancy for location for reference table';
1504: pnp_debug_pkg.log(l_info);
1505:
1506: process_vacancy(
1507: p_start_date => location_rec.active_start_date,
1508: p_end_date => location_rec.active_end_date,

Line 1519: pnp_debug_pkg.log(l_info);

1515:
1516: END LOOP;
1517:
1518: l_info := ' inserting vacancy data for last location id';
1519: pnp_debug_pkg.log(l_info);
1520:
1521: insert_vacancy_data(
1522: p_location_id => l_temp_loc_id,
1523: p_property_id => l_temp_prop_id,

Line 1548: pnp_debug_pkg.log(l_info);

1544: l_ref_vacancy_date_table.delete;
1545: l_ref_vacancy_num_table.delete;
1546:
1547: l_info := ' processing header data ';
1548: pnp_debug_pkg.log(l_info);
1549:
1550: IF l_area_class_dtl_id IS NOT NULL THEN
1551:
1552: pn_rec_arcl_dtl_pkg.update_row(

Line 1603: pnp_debug_pkg.log(l_info);

1599: );
1600: END IF;
1601:
1602: l_info := ' dumping data from pl/sql table ';
1603: pnp_debug_pkg.log(l_info);
1604:
1605: process_area_class_line_data(
1606: p_old_data => l_area_cls_ln_curnt_ovr,
1607: p_new_data => l_area_cls_ln_data_tbl,

Line 1611: pnp_debug_pkg.log(l_desc ||' (-)');

1607: p_new_data => l_area_cls_ln_data_tbl,
1608: p_hdr_id => l_area_class_dtl_id
1609: );
1610:
1611: pnp_debug_pkg.log(l_desc ||' (-)');
1612:
1613: EXCEPTION
1614: WHEN uom_exception THEN
1615: pnp_debug_pkg.log(fnd_message.get);

Line 1615: pnp_debug_pkg.log(fnd_message.get);

1611: pnp_debug_pkg.log(l_desc ||' (-)');
1612:
1613: EXCEPTION
1614: WHEN uom_exception THEN
1615: pnp_debug_pkg.log(fnd_message.get);
1616: raise;
1617: WHEN OTHERS THEN
1618: fnd_message.set_name('PN','PN_REC_CP_INCOMPLETE');
1619: pnp_debug_pkg.put_log_msg(fnd_message.get);

Line 1619: pnp_debug_pkg.put_log_msg(fnd_message.get);

1615: pnp_debug_pkg.log(fnd_message.get);
1616: raise;
1617: WHEN OTHERS THEN
1618: fnd_message.set_name('PN','PN_REC_CP_INCOMPLETE');
1619: pnp_debug_pkg.put_log_msg(fnd_message.get);
1620: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);
1621: raise;
1622: END extract_area;
1623:

Line 1620: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

1616: raise;
1617: WHEN OTHERS THEN
1618: fnd_message.set_name('PN','PN_REC_CP_INCOMPLETE');
1619: pnp_debug_pkg.put_log_msg(fnd_message.get);
1620: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);
1621: raise;
1622: END extract_area;
1623:
1624: ---------------------------- EXPENSE VALIDATIONS -----------------------------+

Line 1911: pnp_debug_pkg.log(l_desc ||' (+)');

1907: l_is_valid BOOLEAN;
1908:
1909: BEGIN
1910:
1911: pnp_debug_pkg.log(l_desc ||' (+)');
1912:
1913: l_is_valid := check_loc_n_prop_id (p_location_id, p_property_id) AND
1914: check_expense_type (p_expense_type_code) AND
1915: check_account_id (p_expense_account_id);

Line 1928: pnp_debug_pkg.log(l_info);

1924:
1925: p_is_header_set := TRUE;
1926:
1927: l_info:= ' inserting expense line header';
1928: pnp_debug_pkg.log(l_info);
1929:
1930: pn_rec_exp_line_pkg.insert_row(
1931: x_org_id => to_number(pn_mo_cache_utils.get_current_org_id),
1932: x_expense_line_id => p_expense_line_id,

Line 1950: pnp_debug_pkg.log(l_info);

1946:
1947: END IF;
1948:
1949: l_info:= ' inserting expense line detail for header id: '||p_expense_line_id;
1950: pnp_debug_pkg.log(l_info);
1951:
1952: pn_rec_exp_line_dtl_pkg.insert_row(
1953: x_org_id => to_number(pn_mo_cache_utils.get_current_org_id),
1954: x_expense_line_id => p_expense_line_id,

Line 2002: pnp_debug_pkg.log(l_desc ||' (-)');

1998: p_transfer_flag := 'E';
1999:
2000: END IF;
2001:
2002: pnp_debug_pkg.log(l_desc ||' (-)');
2003:
2004: EXCEPTION
2005: WHEN OTHERS THEN
2006: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

Line 2006: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

2002: pnp_debug_pkg.log(l_desc ||' (-)');
2003:
2004: EXCEPTION
2005: WHEN OTHERS THEN
2006: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);
2007: raise;
2008: END;
2009:
2010: ------------------------------------------------------------------------------+

Line 2102: pnp_debug_pkg.log(l_desc ||' (+)');

2098: l_failed NUMBER := 0;
2099:
2100: BEGIN
2101:
2102: pnp_debug_pkg.log(l_desc ||' (+)');
2103:
2104: fnd_message.set_name('PN','PN_REC_EXP_LN_CP_INFO');
2105: fnd_message.set_token('LOC' , to_char(p_location_id));
2106: fnd_message.set_token('PROP' , to_char(p_property_id));

Line 2113: pnp_debug_pkg.put_log_msg('');

2109: fnd_message.set_token('AOD' , to_char(p_as_of_date));
2110: fnd_message.set_token('CUR' , p_currency_code);
2111: fnd_message.set_token('EXPNUM', p_extract_code);
2112: fnd_message.set_token('OVR' , p_keep_override);
2113: pnp_debug_pkg.put_log_msg('');
2114: pnp_debug_pkg.put_log_msg(fnd_message.get);
2115: pnp_debug_pkg.put_log_msg('');
2116:
2117: l_info := ' initializing values';

Line 2114: pnp_debug_pkg.put_log_msg(fnd_message.get);

2110: fnd_message.set_token('CUR' , p_currency_code);
2111: fnd_message.set_token('EXPNUM', p_extract_code);
2112: fnd_message.set_token('OVR' , p_keep_override);
2113: pnp_debug_pkg.put_log_msg('');
2114: pnp_debug_pkg.put_log_msg(fnd_message.get);
2115: pnp_debug_pkg.put_log_msg('');
2116:
2117: l_info := ' initializing values';
2118: pnp_debug_pkg.log(l_info);

Line 2115: pnp_debug_pkg.put_log_msg('');

2111: fnd_message.set_token('EXPNUM', p_extract_code);
2112: fnd_message.set_token('OVR' , p_keep_override);
2113: pnp_debug_pkg.put_log_msg('');
2114: pnp_debug_pkg.put_log_msg(fnd_message.get);
2115: pnp_debug_pkg.put_log_msg('');
2116:
2117: l_info := ' initializing values';
2118: pnp_debug_pkg.log(l_info);
2119:

Line 2118: pnp_debug_pkg.log(l_info);

2114: pnp_debug_pkg.put_log_msg(fnd_message.get);
2115: pnp_debug_pkg.put_log_msg('');
2116:
2117: l_info := ' initializing values';
2118: pnp_debug_pkg.log(l_info);
2119:
2120: l_expense_line_id := null;
2121: l_is_header_set := FALSE;
2122: l_reextract := FALSE;

Line 2182: pnp_debug_pkg.log(l_info);

2178: commit;
2179: END IF;
2180:
2181: l_info := ' updating interface table ';
2182: pnp_debug_pkg.log(l_info);
2183:
2184: UPDATE pn_rec_exp_itf
2185: SET transfer_flag = l_transfer_flag,
2186: expense_line_dtl_id = l_expense_line_dtl_id

Line 2192: pnp_debug_pkg.put_log_msg('');

2188:
2189: END LOOP;
2190:
2191: fnd_message.set_name('PN','PN_REC_EXP_LN');
2192: pnp_debug_pkg.put_log_msg('');
2193: pnp_debug_pkg.put_log_msg(fnd_message.get);
2194:
2195: fnd_message.set_name('PN','PN_CP_RESULT_SUMMARY');
2196: fnd_message.set_token('TOTAL', TO_CHAR(l_total));

Line 2193: pnp_debug_pkg.put_log_msg(fnd_message.get);

2189: END LOOP;
2190:
2191: fnd_message.set_name('PN','PN_REC_EXP_LN');
2192: pnp_debug_pkg.put_log_msg('');
2193: pnp_debug_pkg.put_log_msg(fnd_message.get);
2194:
2195: fnd_message.set_name('PN','PN_CP_RESULT_SUMMARY');
2196: fnd_message.set_token('TOTAL', TO_CHAR(l_total));
2197: fnd_message.set_token('PASS', TO_CHAR(l_total - l_failed));

Line 2199: pnp_debug_pkg.put_log_msg(fnd_message.get);

2195: fnd_message.set_name('PN','PN_CP_RESULT_SUMMARY');
2196: fnd_message.set_token('TOTAL', TO_CHAR(l_total));
2197: fnd_message.set_token('PASS', TO_CHAR(l_total - l_failed));
2198: fnd_message.set_token('FAIL', TO_CHAR(l_failed));
2199: pnp_debug_pkg.put_log_msg(fnd_message.get);
2200: pnp_debug_pkg.put_log_msg('');
2201:
2202: pnp_debug_pkg.log(l_desc ||' (-)');
2203:

Line 2200: pnp_debug_pkg.put_log_msg('');

2196: fnd_message.set_token('TOTAL', TO_CHAR(l_total));
2197: fnd_message.set_token('PASS', TO_CHAR(l_total - l_failed));
2198: fnd_message.set_token('FAIL', TO_CHAR(l_failed));
2199: pnp_debug_pkg.put_log_msg(fnd_message.get);
2200: pnp_debug_pkg.put_log_msg('');
2201:
2202: pnp_debug_pkg.log(l_desc ||' (-)');
2203:
2204: EXCEPTION

Line 2202: pnp_debug_pkg.log(l_desc ||' (-)');

2198: fnd_message.set_token('FAIL', TO_CHAR(l_failed));
2199: pnp_debug_pkg.put_log_msg(fnd_message.get);
2200: pnp_debug_pkg.put_log_msg('');
2201:
2202: pnp_debug_pkg.log(l_desc ||' (-)');
2203:
2204: EXCEPTION
2205: WHEN OTHERS THEN
2206: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

Line 2206: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

2202: pnp_debug_pkg.log(l_desc ||' (-)');
2203:
2204: EXCEPTION
2205: WHEN OTHERS THEN
2206: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);
2207: raise;
2208:
2209: END extract_expense_lines;
2210:

Line 2273: pnp_debug_pkg.log(l_desc ||' (+)');

2269: temp_rec pn_rec_expcl_dtlln%ROWTYPE;
2270:
2271: BEGIN
2272:
2273: pnp_debug_pkg.log(l_desc ||' (+)');
2274:
2275: p_master_data_id := -1;
2276:
2277: l_info:= ' searching through master table';

Line 2278: pnp_debug_pkg.log(l_info);

2274:
2275: p_master_data_id := -1;
2276:
2277: l_info:= ' searching through master table';
2278: pnp_debug_pkg.log(l_info);
2279:
2280: FOR i IN 0 .. p_master_data.COUNT - 1 LOOP
2281:
2282: IF (p_master_data(i).location_id = p_location_id) AND

Line 2286: pnp_debug_pkg.log(l_info);

2282: IF (p_master_data(i).location_id = p_location_id) AND
2283: (p_master_data(i).cust_account_id = p_cust_account_id) THEN
2284:
2285: l_info:= ' updating values in master data object for location id '||p_location_id||' and customer acct id'|| p_cust_account_id;
2286: pnp_debug_pkg.log(l_info);
2287:
2288: p_master_data(i).budgeted_amt := nvl(p_master_data(i).budgeted_amt, 0) + nvl(p_budget_amount,0);
2289: p_master_data(i).expense_amt := nvl(p_master_data(i).expense_amt, 0) + nvl(p_expense_amount,0);
2290: p_master_data(i).recoverable_amt := nvl(p_master_data(i).recoverable_amt, 0) + nvl(p_recoverable_amount,0);

Line 2315: pnp_debug_pkg.log(l_info);

2311:
2312: p_master_data_id := p_master_data.COUNT;
2313:
2314: l_info:= ' creating new entry in master data object';
2315: pnp_debug_pkg.log(l_info);
2316:
2317: temp_rec.expense_class_dtl_id := p_expense_class_dtl_id;
2318: temp_rec.expense_class_line_id := p_expense_class_line_id;
2319: temp_rec.location_id := p_location_id;

Line 2339: pnp_debug_pkg.log(l_desc ||' (-)');

2335: p_ovr_use_data(p_master_data_id) := p_use_prior_ovr;
2336:
2337: END IF;
2338:
2339: pnp_debug_pkg.log(l_desc ||' (-)');
2340:
2341: EXCEPTION
2342: WHEN OTHERS THEN
2343: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

Line 2343: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

2339: pnp_debug_pkg.log(l_desc ||' (-)');
2340:
2341: EXCEPTION
2342: WHEN OTHERS THEN
2343: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);
2344: raise;
2345: END;
2346:
2347: ------------------------------------------------------------------------------+

Line 2378: pnp_debug_pkg.log(l_desc ||' (+)');

2374: l_desc VARCHAR2(100) := 'pn_recovery_extract_pkg.process_exp_cls_dtl_dtl_data' ;
2375:
2376: BEGIN
2377:
2378: pnp_debug_pkg.log(l_desc ||' (+)');
2379:
2380: l_info:= ' inserting into details pl/sql table ';
2381: pnp_debug_pkg.log(l_info);
2382:

Line 2381: pnp_debug_pkg.log(l_info);

2377:
2378: pnp_debug_pkg.log(l_desc ||' (+)');
2379:
2380: l_info:= ' inserting into details pl/sql table ';
2381: pnp_debug_pkg.log(l_info);
2382:
2383: l_id := p_detail_data.COUNT;
2384:
2385: p_detail_data(l_id).expense_class_line_dtl_id := p_expense_class_line_dtl_id;

Line 2399: pnp_debug_pkg.log(l_desc ||' (-)');

2395: p_detail_data(l_id).cls_line_dtl_fee_bf_contr := p_cls_line_fee_bf_contr;
2396: p_detail_data(l_id).cls_line_dtl_share_pct_ovr := p_cls_line_shr_pct_ovr;
2397: p_detail_data(l_id).cls_line_dtl_fee_bf_contr_ovr := p_cls_line_fee_bf_contr_ovr;
2398:
2399: pnp_debug_pkg.log(l_desc ||' (-)');
2400:
2401: EXCEPTION
2402: WHEN OTHERS THEN
2403: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

Line 2403: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

2399: pnp_debug_pkg.log(l_desc ||' (-)');
2400:
2401: EXCEPTION
2402: WHEN OTHERS THEN
2403: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);
2404: raise;
2405: END;
2406:
2407: ------------------------------------------------------------------------------+

Line 2443: pnp_debug_pkg.log(l_desc ||' (+)');

2439: l_desc VARCHAR2(100) := 'pn_recovery_extract_pkg.process_exp_class_line_data';
2440:
2441: BEGIN
2442:
2443: pnp_debug_pkg.log(l_desc ||' (+)');
2444:
2445: FOR i IN 0 .. p_master_data.COUNT - 1 LOOP
2446:
2447: l_info:= ' figuring out whether values should be used ';

Line 2448: pnp_debug_pkg.log(l_info);

2444:
2445: FOR i IN 0 .. p_master_data.COUNT - 1 LOOP
2446:
2447: l_info:= ' figuring out whether values should be used ';
2448: pnp_debug_pkg.log(l_info);
2449:
2450: l_use_share_pct_flag := 'N';
2451: l_use_fee_pct_flag := 'N';
2452:

Line 2470: pnp_debug_pkg.log(l_info);

2466:
2467: IF l_expense_class_line_id IS NULL THEN
2468:
2469: l_info:= ' inserting data into class lines master table';
2470: pnp_debug_pkg.log(l_info);
2471:
2472: pn_rec_expcl_dtlln_pkg.insert_row(
2473: x_org_id => to_number(pn_mo_cache_utils.get_current_org_id),
2474: x_expense_class_dtl_id => p_master_data(i).expense_class_dtl_id,

Line 2503: pnp_debug_pkg.log(l_info);

2499:
2500: ELSE
2501:
2502: l_info:= ' updating data into class lines table, id: ' || l_expense_class_line_id;
2503: pnp_debug_pkg.log(l_info);
2504:
2505: pn_rec_expcl_dtlln_pkg.update_row(
2506: x_expense_class_line_id => l_expense_class_line_id,
2507: x_location_id => p_master_data(i).location_id,

Line 2541: pnp_debug_pkg.log(l_info);

2537:
2538: END LOOP;
2539:
2540: l_info:= ' processing data for class line details table';
2541: pnp_debug_pkg.log(l_info);
2542:
2543: FOR i IN 0 .. p_detail_data.COUNT - 1 LOOP
2544:
2545: l_expense_class_line_dtl_id := p_detail_data(i).expense_class_line_dtl_id;

Line 2551: pnp_debug_pkg.log(l_info);

2547: IF l_expense_class_line_dtl_id IS NULL THEN
2548:
2549: l_info := ' inserting detail data for class line header: '||
2550: p_master_data(p_detail_data(i).expense_class_line_id).expense_class_line_id;
2551: pnp_debug_pkg.log(l_info);
2552:
2553: pn_rec_expcl_dtlacc_pkg.insert_row(
2554: x_org_id => to_number(pn_mo_cache_utils.get_current_org_id),
2555: x_expense_class_line_id => p_master_data(p_detail_data(i).expense_class_line_id).expense_class_line_id,

Line 2577: pnp_debug_pkg.log(l_info);

2573: );
2574: ELSE
2575: l_info := ' updating detail data for class line header: '||
2576: p_master_data(p_detail_data(i).expense_class_line_id).expense_class_line_id;
2577: pnp_debug_pkg.log(l_info);
2578:
2579: pn_rec_expcl_dtlacc_pkg.update_row(
2580: x_expense_class_line_dtl_id => l_expense_class_line_dtl_id,
2581: x_expense_line_dtl_id => p_detail_data(i).expense_line_dtl_id,

Line 2606: pnp_debug_pkg.log(l_info);

2602:
2603: END LOOP;
2604:
2605: l_info := ' figuring out which data is unused';
2606: pnp_debug_pkg.log(l_info);
2607:
2608: FOR i IN 0 .. p_old_detail_data.COUNT - 1 LOOP
2609: l_is_in := FALSE;
2610: FOR j IN 0 .. l_detail_keep_table.COUNT - 1 LOOP

Line 2629: pnp_debug_pkg.log(l_info);

2625: END IF;
2626: END LOOP;
2627:
2628: l_info := ' deleting unused data';
2629: pnp_debug_pkg.log(l_info);
2630:
2631: FORALL i IN 0 .. l_detail_delete_table.COUNT - 1
2632: DELETE FROM pn_rec_expcl_dtlacc_all
2633: WHERE expense_class_line_dtl_id = l_detail_delete_table(i);

Line 2640: pnp_debug_pkg.log(l_desc ||' (-)');

2636: DELETE FROM pn_rec_expcl_dtlln_all
2637: WHERE expense_class_line_id = l_master_delete_table(i);
2638:
2639:
2640: pnp_debug_pkg.log(l_desc ||' (-)');
2641:
2642: EXCEPTION
2643: WHEN OTHERS THEN
2644: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

Line 2644: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

2640: pnp_debug_pkg.log(l_desc ||' (-)');
2641:
2642: EXCEPTION
2643: WHEN OTHERS THEN
2644: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);
2645: raise;
2646: END;
2647:
2648: ------------------------------------------------------------------------------+

Line 2704: pnp_debug_pkg.log(l_desc ||' (+)');

2700: l_desc VARCHAR2(100) := 'pn_recovery_extract_pkg.dismantle_exp_line_from_dtl' ;
2701:
2702: BEGIN
2703:
2704: pnp_debug_pkg.log(l_desc ||' (+)');
2705:
2706: l_info := ' processing affected lines ';
2707: pnp_debug_pkg.log(l_info);
2708:

Line 2707: pnp_debug_pkg.log(l_info);

2703:
2704: pnp_debug_pkg.log(l_desc ||' (+)');
2705:
2706: l_info := ' processing affected lines ';
2707: pnp_debug_pkg.log(l_info);
2708:
2709: FOR class_line_dtl_rec IN get_affected_lines LOOP
2710: DELETE pn_rec_expcl_dtlacc_all
2711: WHERE expense_class_line_dtl_id = class_line_dtl_rec.expense_class_line_dtl_id;

Line 2716: pnp_debug_pkg.log(l_info);

2712: hdr_id_list(hdr_id_list.COUNT) := class_line_dtl_rec.expense_class_line_id;
2713: END LOOP;
2714:
2715: l_info := ' storing amount information ';
2716: pnp_debug_pkg.log(l_info);
2717:
2718: FOR i IN 0 .. hdr_id_list.COUNT - 1 LOOP
2719:
2720: l_update := FALSE;

Line 2724: pnp_debug_pkg.log(l_info);

2720: l_update := FALSE;
2721:
2722: FOR hdr_rec IN get_header_info(hdr_id_list(i)) LOOP
2723: l_info := ' getting update information for expclln id: '||hdr_id_list(i);
2724: pnp_debug_pkg.log(l_info);
2725:
2726: l_update := TRUE;
2727: l_count := update_list.COUNT;
2728: update_list(l_count) := hdr_id_list(i);

Line 2743: pnp_debug_pkg.log(l_info);

2739:
2740: END LOOP;
2741:
2742: l_info := ' updating header information ';
2743: pnp_debug_pkg.log(l_info);
2744:
2745: FORALL i IN 0 .. update_list.COUNT - 1
2746: UPDATE pn_rec_expcl_dtlln_all
2747: SET budgeted_amt = budgeted_list(i),

Line 2759: pnp_debug_pkg.log(l_info);

2755: last_update_login = nvl(fnd_profile.value('USER_ID'), -1)
2756: WHERE expense_class_line_id = update_list(i);
2757:
2758: l_info := ' deleting unused header lines';
2759: pnp_debug_pkg.log(l_info);
2760:
2761: FORALL i IN 0 .. delete_list.COUNT - 1
2762: DELETE pn_rec_expcl_dtlln_all
2763: WHERE expense_class_line_id = delete_list(i);

Line 2765: pnp_debug_pkg.log(l_desc ||' (-)');

2761: FORALL i IN 0 .. delete_list.COUNT - 1
2762: DELETE pn_rec_expcl_dtlln_all
2763: WHERE expense_class_line_id = delete_list(i);
2764:
2765: pnp_debug_pkg.log(l_desc ||' (-)');
2766:
2767: EXCEPTION
2768: WHEN OTHERS THEN
2769: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

Line 2769: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

2765: pnp_debug_pkg.log(l_desc ||' (-)');
2766:
2767: EXCEPTION
2768: WHEN OTHERS THEN
2769: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);
2770: raise;
2771: END;
2772:
2773: ------------------------------------------------------------------------------+

Line 2845: pnp_debug_pkg.log(l_desc ||' (+)');

2841: l_total NUMBER := 0;
2842: l_failed NUMBER := 0;
2843:
2844: BEGIN
2845: pnp_debug_pkg.log(l_desc ||' (+)');
2846:
2847: FOR id IN get_exp_line_id LOOP
2848:
2849: IF p_location_id IS NOT NULL THEN

Line 2858: pnp_debug_pkg.log(l_info);

2854: IF l_propid IS NULL THEN l_propid := locn_prop_rec.property_id; END IF;
2855:
2856: FOR expcl_rec IN get_expcl_by_locn(locn_prop_rec.location_id, id.currency_code) LOOP
2857: l_info := ' extracting for expense class id : '|| expcl_rec.expense_class_id;
2858: pnp_debug_pkg.log(l_info);
2859:
2860: l_total := l_total + 1;
2861:
2862: BEGIN

Line 2889: pnp_debug_pkg.log(l_info);

2885: THEN
2886:
2887: FOR expcl_rec IN get_expcl_by_prop(nvl(l_propid, p_property_id), id.currency_code) LOOP
2888: l_info := ' extracting for expense class id : '|| expcl_rec.expense_class_id;
2889: pnp_debug_pkg.log(l_info);
2890:
2891: l_total := l_total + 1;
2892:
2893: BEGIN

Line 2915: pnp_debug_pkg.put_log_msg('');

2911: END IF;
2912: END LOOP;
2913:
2914: fnd_message.set_name('PN','PN_REC_EXPCL_DTL');
2915: pnp_debug_pkg.put_log_msg('');
2916: pnp_debug_pkg.put_log_msg(fnd_message.get);
2917:
2918: fnd_message.set_name('PN','PN_CP_RESULT_SUMMARY');
2919: fnd_message.set_token('TOTAL', TO_CHAR(l_total));

Line 2916: pnp_debug_pkg.put_log_msg(fnd_message.get);

2912: END LOOP;
2913:
2914: fnd_message.set_name('PN','PN_REC_EXPCL_DTL');
2915: pnp_debug_pkg.put_log_msg('');
2916: pnp_debug_pkg.put_log_msg(fnd_message.get);
2917:
2918: fnd_message.set_name('PN','PN_CP_RESULT_SUMMARY');
2919: fnd_message.set_token('TOTAL', TO_CHAR(l_total));
2920: fnd_message.set_token('PASS', TO_CHAR(l_total - l_failed));

Line 2922: pnp_debug_pkg.put_log_msg(fnd_message.get);

2918: fnd_message.set_name('PN','PN_CP_RESULT_SUMMARY');
2919: fnd_message.set_token('TOTAL', TO_CHAR(l_total));
2920: fnd_message.set_token('PASS', TO_CHAR(l_total - l_failed));
2921: fnd_message.set_token('FAIL', TO_CHAR(l_failed));
2922: pnp_debug_pkg.put_log_msg(fnd_message.get);
2923: pnp_debug_pkg.put_log_msg('');
2924:
2925: pnp_debug_pkg.log(l_desc ||' (-)');
2926:

Line 2923: pnp_debug_pkg.put_log_msg('');

2919: fnd_message.set_token('TOTAL', TO_CHAR(l_total));
2920: fnd_message.set_token('PASS', TO_CHAR(l_total - l_failed));
2921: fnd_message.set_token('FAIL', TO_CHAR(l_failed));
2922: pnp_debug_pkg.put_log_msg(fnd_message.get);
2923: pnp_debug_pkg.put_log_msg('');
2924:
2925: pnp_debug_pkg.log(l_desc ||' (-)');
2926:
2927: EXCEPTION

Line 2925: pnp_debug_pkg.log(l_desc ||' (-)');

2921: fnd_message.set_token('FAIL', TO_CHAR(l_failed));
2922: pnp_debug_pkg.put_log_msg(fnd_message.get);
2923: pnp_debug_pkg.put_log_msg('');
2924:
2925: pnp_debug_pkg.log(l_desc ||' (-)');
2926:
2927: EXCEPTION
2928: WHEN OTHERS THEN
2929: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

Line 2929: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

2925: pnp_debug_pkg.log(l_desc ||' (-)');
2926:
2927: EXCEPTION
2928: WHEN OTHERS THEN
2929: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);
2930: raise;
2931: END populate_expense_class_details;
2932:
2933: ------------------------------------------------------------------------------+

Line 2992: pnp_debug_pkg.log(l_desc ||' (+)');

2988: l_failed NUMBER := 0;
2989:
2990: BEGIN
2991:
2992: pnp_debug_pkg.log(l_desc ||' (+)');
2993:
2994: IF p_location_id IS NOT NULL THEN
2995:
2996: FOR locn_prop_rec IN get_locn_prop_id LOOP

Line 3003: pnp_debug_pkg.log(l_info);

2999: IF l_propid IS NULL THEN l_propid := locn_prop_rec.property_id; END IF;
3000:
3001: FOR arcl_rec IN get_arcl_by_locn(locn_prop_rec.location_id) LOOP
3002: l_info := ' extracting for area class id : '|| arcl_rec.area_class_id;
3003: pnp_debug_pkg.log(l_info);
3004:
3005: l_total := l_total + 1;
3006:
3007: BEGIN

Line 3032: pnp_debug_pkg.log(l_info);

3028: THEN
3029:
3030: FOR arcl_rec IN get_arcl_by_prop(nvl(l_propid, p_property_id)) LOOP
3031: l_info := ' extracting for area class id : '|| arcl_rec.area_class_id;
3032: pnp_debug_pkg.log(l_info);
3033:
3034: l_total := l_total + 1;
3035:
3036: BEGIN

Line 3056: pnp_debug_pkg.put_log_msg('');

3052:
3053: END IF;
3054:
3055: fnd_message.set_name('PN','PN_REC_ARCL_DTL');
3056: pnp_debug_pkg.put_log_msg('');
3057: pnp_debug_pkg.put_log_msg(fnd_message.get);
3058:
3059: fnd_message.set_name('PN','PN_CP_RESULT_SUMMARY');
3060: fnd_message.set_token('TOTAL', TO_CHAR(l_total));

Line 3057: pnp_debug_pkg.put_log_msg(fnd_message.get);

3053: END IF;
3054:
3055: fnd_message.set_name('PN','PN_REC_ARCL_DTL');
3056: pnp_debug_pkg.put_log_msg('');
3057: pnp_debug_pkg.put_log_msg(fnd_message.get);
3058:
3059: fnd_message.set_name('PN','PN_CP_RESULT_SUMMARY');
3060: fnd_message.set_token('TOTAL', TO_CHAR(l_total));
3061: fnd_message.set_token('PASS', TO_CHAR(l_total - l_failed));

Line 3063: pnp_debug_pkg.put_log_msg(fnd_message.get);

3059: fnd_message.set_name('PN','PN_CP_RESULT_SUMMARY');
3060: fnd_message.set_token('TOTAL', TO_CHAR(l_total));
3061: fnd_message.set_token('PASS', TO_CHAR(l_total - l_failed));
3062: fnd_message.set_token('FAIL', TO_CHAR(l_failed));
3063: pnp_debug_pkg.put_log_msg(fnd_message.get);
3064: pnp_debug_pkg.put_log_msg('');
3065:
3066: pnp_debug_pkg.log(l_desc ||' (-)');
3067:

Line 3064: pnp_debug_pkg.put_log_msg('');

3060: fnd_message.set_token('TOTAL', TO_CHAR(l_total));
3061: fnd_message.set_token('PASS', TO_CHAR(l_total - l_failed));
3062: fnd_message.set_token('FAIL', TO_CHAR(l_failed));
3063: pnp_debug_pkg.put_log_msg(fnd_message.get);
3064: pnp_debug_pkg.put_log_msg('');
3065:
3066: pnp_debug_pkg.log(l_desc ||' (-)');
3067:
3068: EXCEPTION

Line 3066: pnp_debug_pkg.log(l_desc ||' (-)');

3062: fnd_message.set_token('FAIL', TO_CHAR(l_failed));
3063: pnp_debug_pkg.put_log_msg(fnd_message.get);
3064: pnp_debug_pkg.put_log_msg('');
3065:
3066: pnp_debug_pkg.log(l_desc ||' (-)');
3067:
3068: EXCEPTION
3069: WHEN OTHERS THEN
3070: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

Line 3070: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

3066: pnp_debug_pkg.log(l_desc ||' (-)');
3067:
3068: EXCEPTION
3069: WHEN OTHERS THEN
3070: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);
3071: raise;
3072: END populate_area_class_details;
3073:
3074: ------------------------------------------------------------------------------+

Line 3112: pnp_debug_pkg.log(l_desc ||' (+)');

3108: l_desc VARCHAR2(100) := 'pn_recovery_extract_pkg.find_expense_ovr_values' ;
3109: l_info VARCHAR2(300);
3110: BEGIN
3111:
3112: pnp_debug_pkg.log(l_desc ||' (+)');
3113:
3114: l_info := ' resetting ovr values variables ';
3115: pnp_debug_pkg.log(l_info);
3116:

Line 3115: pnp_debug_pkg.log(l_info);

3111:
3112: pnp_debug_pkg.log(l_desc ||' (+)');
3113:
3114: l_info := ' resetting ovr values variables ';
3115: pnp_debug_pkg.log(l_info);
3116:
3117: p_exp_cls_line_dtl_id := null;
3118: p_exp_cls_line_id := null;
3119: p_fee_af_contr_ovr := null;

Line 3134: pnp_debug_pkg.log(l_info);

3130: p_master_ovr(i).location_id = p_loc_id AND
3131: p_master_ovr(i).cust_account_id = p_cust_id THEN
3132:
3133: l_info := ' found matching data and determining which values to return ';
3134: pnp_debug_pkg.log(l_info);
3135:
3136: IF p_keep_override = 'Y' THEN
3137: p_fee_af_contr_ovr := p_master_ovr(i).cls_line_fee_after_contr_ovr;
3138: p_mst_share_pct_ovr := p_master_ovr(i).cls_line_share_pct;

Line 3153: pnp_debug_pkg.log(l_desc ||' (-)');

3149:
3150: END IF;
3151: END LOOP;
3152:
3153: pnp_debug_pkg.log(l_desc ||' (-)');
3154:
3155: EXCEPTION
3156: WHEN OTHERS THEN
3157: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

Line 3157: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

3153: pnp_debug_pkg.log(l_desc ||' (-)');
3154:
3155: EXCEPTION
3156: WHEN OTHERS THEN
3157: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);
3158: raise;
3159: END find_expense_ovr_values;
3160:
3161: ------------------------------------------------------------------------------+

Line 3393: pnp_debug_pkg.log(l_desc ||' (+)');

3389: exp_cls_prior_master_ovr exp_cls_line_mst_tbl;
3390: exp_cls_prior_detail_ovr exp_cls_line_dtl_tbl;
3391:
3392: BEGIN
3393: pnp_debug_pkg.log(l_desc ||' (+)');
3394:
3395: fnd_message.set_name('PN','PN_REC_EXPCL_DTL_CP_INFO');
3396: fnd_message.set_token('EXPCL', to_char(p_expense_class_id));
3397: fnd_message.set_token('EXPLN', to_char(p_expense_line_id));

Line 3402: pnp_debug_pkg.put_log_msg('');

3398: fnd_message.set_token('STR' , p_from_date);
3399: fnd_message.set_token('END' , p_to_date);
3400: fnd_message.set_token('AOD' , p_as_of_date);
3401: fnd_message.set_token('OVR' , p_keep_override);
3402: pnp_debug_pkg.put_log_msg('');
3403: pnp_debug_pkg.put_log_msg(fnd_message.get);
3404: pnp_debug_pkg.put_log_msg('');
3405:
3406: l_info := ' validating currency';

Line 3403: pnp_debug_pkg.put_log_msg(fnd_message.get);

3399: fnd_message.set_token('END' , p_to_date);
3400: fnd_message.set_token('AOD' , p_as_of_date);
3401: fnd_message.set_token('OVR' , p_keep_override);
3402: pnp_debug_pkg.put_log_msg('');
3403: pnp_debug_pkg.put_log_msg(fnd_message.get);
3404: pnp_debug_pkg.put_log_msg('');
3405:
3406: l_info := ' validating currency';
3407: pnp_debug_pkg.log(l_info);

Line 3404: pnp_debug_pkg.put_log_msg('');

3400: fnd_message.set_token('AOD' , p_as_of_date);
3401: fnd_message.set_token('OVR' , p_keep_override);
3402: pnp_debug_pkg.put_log_msg('');
3403: pnp_debug_pkg.put_log_msg(fnd_message.get);
3404: pnp_debug_pkg.put_log_msg('');
3405:
3406: l_info := ' validating currency';
3407: pnp_debug_pkg.log(l_info);
3408:

Line 3407: pnp_debug_pkg.log(l_info);

3403: pnp_debug_pkg.put_log_msg(fnd_message.get);
3404: pnp_debug_pkg.put_log_msg('');
3405:
3406: l_info := ' validating currency';
3407: pnp_debug_pkg.log(l_info);
3408:
3409: FOR check_cur IN check_currency LOOP
3410: fnd_message.set_name('PN', 'PN_REC_EXP_CUR_MISMATCH');
3411: RAISE currency_exception;

Line 3415: pnp_debug_pkg.log(l_info);

3411: RAISE currency_exception;
3412: END LOOP;
3413:
3414: l_info := ' initializing values ';
3415: pnp_debug_pkg.log(l_info);
3416:
3417: l_fee_use_table.delete;
3418: l_share_use_table.delete;
3419: l_ovr_use_table.delete;

Line 3429: pnp_debug_pkg.log(l_info);

3425: exp_cls_prior_master_ovr.delete;
3426: exp_cls_prior_detail_ovr.delete;
3427:
3428: l_info := ' caching default and override values';
3429: pnp_debug_pkg.log(l_info);
3430:
3431: l_regenerate := 'N';
3432:
3433: FOR check_exists IN is_reextract LOOP

Line 3444: pnp_debug_pkg.log(fnd_message.get);

3440: fnd_message.set_token('FDATE', p_from_date);
3441: fnd_message.set_token('TDATE', p_to_date);
3442: fnd_message.set_token('AODATE', p_as_of_date);
3443: fnd_message.set_token('NAME', check_exists.expense_class_name);
3444: pnp_debug_pkg.log(fnd_message.get);
3445: RETURN;
3446: END IF;
3447:
3448: l_regenerate := 'Y';

Line 3481: pnp_debug_pkg.log(l_info);

3477: END IF;
3478:
3479: l_dummy_id := null;
3480: l_info := ' getting prior cls dtl id for overrides ';
3481: pnp_debug_pkg.log(l_info);
3482:
3483: FOR get_first_id IN get_prior_cls_dtl_id LOOP
3484: l_dummy_id := get_first_id.expense_class_dtl_id;
3485: exit;

Line 3508: pnp_debug_pkg.log(l_info);

3504:
3505: END LOOP;
3506:
3507: l_info := ' fetching information to prepare data processing ';
3508: pnp_debug_pkg.log(l_info);
3509:
3510: FOR expense_class_rec IN get_exp_class_info LOOP
3511:
3512: IF l_expense_class_dtl_id IS NOT NULL THEN

Line 3584: pnp_debug_pkg.log(l_info);

3580:
3581: IF expense_line_rec.expense_line_indicator <> 'PARENT' THEN
3582:
3583: l_info := ' trying to find override values for a given line ';
3584: pnp_debug_pkg.log(l_info);
3585:
3586: l_found := FALSE;
3587:
3588: IF l_regenerate = 'Y' THEN

Line 3591: pnp_debug_pkg.log(l_info);

3587:
3588: IF l_regenerate = 'Y' THEN
3589:
3590: l_info := ' trying to find override values from regenerated extract';
3591: pnp_debug_pkg.log(l_info);
3592:
3593: find_expense_ovr_values(
3594: p_master_ovr => exp_cls_curnt_master_ovr,
3595: p_detail_ovr => exp_cls_curnt_detail_ovr,

Line 3618: pnp_debug_pkg.log(l_info);

3614:
3615: IF NOT l_found THEN
3616:
3617: l_info := ' trying to find override values from prior extract';
3618: pnp_debug_pkg.log(l_info);
3619:
3620: IF l_regenerate = 'N' THEN l_found := null; END IF;
3621:
3622: find_expense_ovr_values(

Line 3645: pnp_debug_pkg.log(l_info);

3641:
3642: END IF;
3643:
3644: l_info := ' calculating recovery amount and computed recovery amount ';
3645: pnp_debug_pkg.log(l_info);
3646:
3647: l_recov_amount := expense_line_rec.actual_amount * nvl(expense_class_rec.portion_pct,100) / 100;
3648: l_cpt_recov_amount := l_recov_amount * nvl(nvl(l_dtl_share_pct_ovr, expense_class_rec.cls_incl_share_pct),100) / 100 * (1 + nvl(nvl(l_dtl_fee_bf_contr_ovr, expense_class_rec.cls_incl_fee_before_contr), 0) / 100);
3649:

Line 3651: pnp_debug_pkg.log(l_info);

3647: l_recov_amount := expense_line_rec.actual_amount * nvl(expense_class_rec.portion_pct,100) / 100;
3648: l_cpt_recov_amount := l_recov_amount * nvl(nvl(l_dtl_share_pct_ovr, expense_class_rec.cls_incl_share_pct),100) / 100 * (1 + nvl(nvl(l_dtl_fee_bf_contr_ovr, expense_class_rec.cls_incl_fee_before_contr), 0) / 100);
3649:
3650: l_info:= ' collecting master class-line data for space assignment '||space_assign_rec.cust_space_assign_id||' ';
3651: pnp_debug_pkg.log(l_info);
3652:
3653: process_exp_cls_dtl_mst_data(
3654: p_master_data => exp_cls_line_master_data,
3655: p_ovr_use_data => l_ovr_use_table,

Line 3680: pnp_debug_pkg.log(l_info);

3676: p_use_prior_ovr => (NOT l_found AND l_regenerate = 'Y')
3677: );
3678:
3679: l_info:= ' collecting detail class-line data for space assignment '||space_assign_rec.cust_space_assign_id;
3680: pnp_debug_pkg.log(l_info);
3681:
3682: process_exp_cls_dtl_dtl_data(
3683: p_detail_data => exp_cls_line_detail_data,
3684: p_master_data_id => l_master_data_id,

Line 3706: pnp_debug_pkg.log(l_info);

3702: END LOOP;
3703: END LOOP;
3704:
3705: l_info := ' dumping data into table ';
3706: pnp_debug_pkg.log(l_info);
3707:
3708: process_exp_class_line_data(
3709: p_old_detail_data => exp_cls_curnt_detail_ovr,
3710: p_old_master_data => exp_cls_curnt_master_ovr,

Line 3720: pnp_debug_pkg.log(l_info);

3716: );
3717:
3718: IF l_area_class_id IS NOT NULL THEN
3719: l_info := ' generating area class detail associated with the expense class ';
3720: pnp_debug_pkg.log(l_info);
3721:
3722: extract_area(
3723: errbuf => l_dummy,
3724: retcode => l_dummy,

Line 3731: pnp_debug_pkg.log(l_desc ||' (-)');

3727: p_from_date => p_from_date,
3728: p_to_date => p_to_date,
3729: p_keep_override => p_keep_override);
3730: END IF;
3731: pnp_debug_pkg.log(l_desc ||' (-)');
3732:
3733: EXCEPTION
3734: WHEN currency_exception THEN
3735: pnp_debug_pkg.put_log_msg(fnd_message.get);

Line 3735: pnp_debug_pkg.put_log_msg(fnd_message.get);

3731: pnp_debug_pkg.log(l_desc ||' (-)');
3732:
3733: EXCEPTION
3734: WHEN currency_exception THEN
3735: pnp_debug_pkg.put_log_msg(fnd_message.get);
3736: raise;
3737: WHEN OTHERS THEN
3738: fnd_message.set_name('PN','PN_REC_CP_INCOMPLETE');
3739: pnp_debug_pkg.put_log_msg(fnd_message.get);

Line 3739: pnp_debug_pkg.put_log_msg(fnd_message.get);

3735: pnp_debug_pkg.put_log_msg(fnd_message.get);
3736: raise;
3737: WHEN OTHERS THEN
3738: fnd_message.set_name('PN','PN_REC_CP_INCOMPLETE');
3739: pnp_debug_pkg.put_log_msg(fnd_message.get);
3740: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);
3741: raise;
3742: END extract_expense;
3743:

Line 3740: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

3736: raise;
3737: WHEN OTHERS THEN
3738: fnd_message.set_name('PN','PN_REC_CP_INCOMPLETE');
3739: pnp_debug_pkg.put_log_msg(fnd_message.get);
3740: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);
3741: raise;
3742: END extract_expense;
3743:
3744:

Line 3816: pnp_debug_pkg.log(l_desc ||' (+)');

3812: pn_mo_cache_utils.get_current_org_id));
3813:
3814: BEGIN
3815:
3816: pnp_debug_pkg.log(l_desc ||' (+)');
3817:
3818: l_info := ' validating inputs ';
3819: pnp_debug_pkg.log(l_info);
3820:

Line 3819: pnp_debug_pkg.log(l_info);

3815:
3816: pnp_debug_pkg.log(l_desc ||' (+)');
3817:
3818: l_info := ' validating inputs ';
3819: pnp_debug_pkg.log(l_info);
3820:
3821: l_from_date := fnd_date.canonical_to_date(p_from_date);
3822: l_to_date := fnd_date.canonical_to_date(p_to_date);
3823: l_as_of_date:= fnd_date.canonical_to_date(p_as_of_date);

Line 3843: pnp_debug_pkg.log(l_info);

3839: l_currency:= p_currency_code;
3840: END IF;
3841:
3842: l_info := ' performing input validation ';
3843: pnp_debug_pkg.log(l_info);
3844:
3845: IF NOT (l_location_id IS NOT NULL OR l_property_id IS NOT NULL) THEN
3846: fnd_message.set_name('PN','PN_LOC_PROP_REQ');
3847: raise bad_input_exception;

Line 3880: pnp_debug_pkg.log(l_info);

3876: END IF;
3877:
3878: IF p_called_from = 'SRS' THEN
3879: l_info:= ' performing extraction';
3880: pnp_debug_pkg.log(l_info);
3881:
3882: extract_expense_lines(
3883: p_location_id => l_location_id,
3884: p_property_id => l_property_id,

Line 3917: pnp_debug_pkg.log(l_desc ||' (-)');

3913: p_keep_override => p_keep_override
3914: );
3915: END IF;
3916:
3917: pnp_debug_pkg.log(l_desc ||' (-)');
3918:
3919: EXCEPTION
3920: WHEN bad_input_exception THEN
3921: pnp_debug_pkg.log(fnd_message.get);

Line 3921: pnp_debug_pkg.log(fnd_message.get);

3917: pnp_debug_pkg.log(l_desc ||' (-)');
3918:
3919: EXCEPTION
3920: WHEN bad_input_exception THEN
3921: pnp_debug_pkg.log(fnd_message.get);
3922: raise;
3923: WHEN OTHERS THEN
3924: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);
3925: raise;

Line 3924: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

3920: WHEN bad_input_exception THEN
3921: pnp_debug_pkg.log(fnd_message.get);
3922: raise;
3923: WHEN OTHERS THEN
3924: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);
3925: raise;
3926: END extract_line_expense_area;
3927:
3928: ------------------------------------------------------------------------------+

Line 3982: pnp_debug_pkg.log(l_desc ||' (+)');

3978: l_count INTEGER;
3979:
3980: BEGIN
3981:
3982: pnp_debug_pkg.log(l_desc ||' (+)');
3983:
3984: IF p_delete_all_flag = 'Y' THEN
3985: l_info := ' purging everything ';
3986: pnp_debug_pkg.log(l_info);

Line 3986: pnp_debug_pkg.log(l_info);

3982: pnp_debug_pkg.log(l_desc ||' (+)');
3983:
3984: IF p_delete_all_flag = 'Y' THEN
3985: l_info := ' purging everything ';
3986: pnp_debug_pkg.log(l_info);
3987: DELETE pn_rec_exp_itf;
3988: return;
3989: END IF;
3990: pnp_debug_pkg.log('p_extract_code='||p_extract_code);

Line 3990: pnp_debug_pkg.log('p_extract_code='||p_extract_code);

3986: pnp_debug_pkg.log(l_info);
3987: DELETE pn_rec_exp_itf;
3988: return;
3989: END IF;
3990: pnp_debug_pkg.log('p_extract_code='||p_extract_code);
3991: l_cursor := dbms_sql.open_cursor;
3992: l_sqlhead := 'DELETE pn_rec_exp_itf WHERE ';
3993:
3994: l_info := ' figuring expense extract code';

Line 3995: pnp_debug_pkg.log(l_info);

3991: l_cursor := dbms_sql.open_cursor;
3992: l_sqlhead := 'DELETE pn_rec_exp_itf WHERE ';
3993:
3994: l_info := ' figuring expense extract code';
3995: pnp_debug_pkg.log(l_info);
3996: l_extract_code := p_extract_code;
3997: l_transfer_flag := p_transfer_flag;
3998: l_from_date := fnd_date.canonical_to_date(p_from_date);
3999: l_to_date := fnd_date.canonical_to_date(p_to_date);

Line 4013: pnp_debug_pkg.log(l_info);

4009:
4010: END IF;
4011:
4012: l_info := ' figuring transfer flag';
4013: pnp_debug_pkg.log(l_info);
4014:
4015: IF p_transfer_flag IS NOT NULL THEN
4016: IF l_sqltail IS NOT NULL THEN l_sqltail := l_sqltail ||' AND '; END IF;
4017: l_sqltail := l_sqltail || ' transfer_flag = :l_transfer_flag';

Line 4021: pnp_debug_pkg.log(l_info);

4017: l_sqltail := l_sqltail || ' transfer_flag = :l_transfer_flag';
4018: END IF;
4019:
4020: l_info := ' figuring from date';
4021: pnp_debug_pkg.log(l_info);
4022:
4023: IF p_from_date IS NOT NULL THEN
4024: IF l_sqltail IS NOT NULL THEN l_sqltail := l_sqltail ||' AND '; END IF;
4025: l_sqltail := l_sqltail ||' from_date >= :l_from_date)';

Line 4030: pnp_debug_pkg.log(l_info);

4026:
4027: END IF;
4028:
4029: l_info := ' figuring to date';
4030: pnp_debug_pkg.log(l_info);
4031:
4032: IF p_to_date IS NOT NULL THEN
4033: IF l_sqltail IS NOT NULL THEN l_sqltail := l_sqltail ||' AND '; END IF;
4034: l_sqltail := l_sqltail ||' to_date <= :l_to_date)';

Line 4039: pnp_debug_pkg.log(l_info);

4035:
4036: END IF;
4037:
4038: l_info := ' figuring location code';
4039: pnp_debug_pkg.log(l_info);
4040:
4041: IF p_location_code IS NOT NULL THEN
4042: IF l_sqltail IS NOT NULL THEN l_sqltail := l_sqltail ||' AND '; END IF;
4043: FOR loc_rec IN derive_loc_id_from_loc_code LOOP l_loc_id := loc_rec.location_id; END LOOP;

Line 4049: pnp_debug_pkg.log(l_info);

4045:
4046: END IF;
4047:
4048: l_info := ' figuring property code';
4049: pnp_debug_pkg.log(l_info);
4050:
4051: IF p_property_code IS NOT NULL THEN
4052: IF l_sqltail IS NOT NULL THEN l_sqltail := l_sqltail ||' AND '; END IF;
4053: FOR prop_rec IN derive_prop_id_from_prop_code LOOP l_prop_id := prop_rec.property_id; END LOOP;

Line 4063: pnp_debug_pkg.log(l_info);

4059:
4060: IF l_sqltail IS NOT NULL THEN
4061:
4062: l_info := ' deleting using dynamic SQL';
4063: pnp_debug_pkg.log(l_info);
4064: pnp_debug_pkg.log('');
4065: pnp_debug_pkg.log(l_sqlhead);
4066: pnp_debug_pkg.log(l_sqltail);
4067: pnp_debug_pkg.log('');

Line 4064: pnp_debug_pkg.log('');

4060: IF l_sqltail IS NOT NULL THEN
4061:
4062: l_info := ' deleting using dynamic SQL';
4063: pnp_debug_pkg.log(l_info);
4064: pnp_debug_pkg.log('');
4065: pnp_debug_pkg.log(l_sqlhead);
4066: pnp_debug_pkg.log(l_sqltail);
4067: pnp_debug_pkg.log('');
4068:

Line 4065: pnp_debug_pkg.log(l_sqlhead);

4061:
4062: l_info := ' deleting using dynamic SQL';
4063: pnp_debug_pkg.log(l_info);
4064: pnp_debug_pkg.log('');
4065: pnp_debug_pkg.log(l_sqlhead);
4066: pnp_debug_pkg.log(l_sqltail);
4067: pnp_debug_pkg.log('');
4068:
4069: l_statement := l_sqlhead || l_sqltail;

Line 4066: pnp_debug_pkg.log(l_sqltail);

4062: l_info := ' deleting using dynamic SQL';
4063: pnp_debug_pkg.log(l_info);
4064: pnp_debug_pkg.log('');
4065: pnp_debug_pkg.log(l_sqlhead);
4066: pnp_debug_pkg.log(l_sqltail);
4067: pnp_debug_pkg.log('');
4068:
4069: l_statement := l_sqlhead || l_sqltail;
4070: dbms_sql.parse(l_cursor,l_statement,dbms_sql.native);

Line 4067: pnp_debug_pkg.log('');

4063: pnp_debug_pkg.log(l_info);
4064: pnp_debug_pkg.log('');
4065: pnp_debug_pkg.log(l_sqlhead);
4066: pnp_debug_pkg.log(l_sqltail);
4067: pnp_debug_pkg.log('');
4068:
4069: l_statement := l_sqlhead || l_sqltail;
4070: dbms_sql.parse(l_cursor,l_statement,dbms_sql.native);
4071: IF p_extract_code IS NOT NULL THEN

Line 4102: pnp_debug_pkg.log(l_desc ||' (-)');

4098:
4099: IF dbms_sql.is_open (l_cursor) THEN
4100: dbms_sql.close_cursor (l_cursor);
4101: END IF;
4102: pnp_debug_pkg.log(l_desc ||' (-)');
4103:
4104: EXCEPTION
4105: WHEN OTHERS THEN
4106: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

Line 4106: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);

4102: pnp_debug_pkg.log(l_desc ||' (-)');
4103:
4104: EXCEPTION
4105: WHEN OTHERS THEN
4106: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);
4107: raise;
4108: END;
4109:
4110: END pn_recovery_extract_pkg;