222: , p_viewby_level_id IN varchar2 default null
223: , x_target_level_tbl OUT NOCOPY BIS_TARGET_LEVEL_PUB.Target_Level_Tbl_type
224: , x_target_tbl OUT NOCOPY BIS_TARGET_PUB.Target_Tbl_type
225: , x_return_status OUT NOCOPY VARCHAR2
226: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
227: );
228:
229: --
230: -- Helper routine which calls fnd_request APIs
425: l_return_status VARCHAR2(1000);
426: l_return_msg VARCHAR2(32000);
427: l_request_id VARCHAR2(32000);
428: l_debug VARCHAR2(32000);
429: l_error_Tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
430: l_api_version NUMBER := 1;
431: l_object_tbl BIS_COMPUTED_ACTUAL_PVT.object_tbl_type;
432: l_Measure_Rec BIS_MEASURE_PUB.Measure_Rec_Type;
433: l_measure_short_name VARCHAR2(32000);
433: l_measure_short_name VARCHAR2(32000);
434: l_measure_name VARCHAR2(32000);
435: l_Measure_Rec_p BIS_MEASURE_PUB.Measure_Rec_Type;
436: l_target_level_rec_p BIS_Target_Level_PUB.Target_Level_Rec_Type;
437: l_error_Tbl_p BIS_UTILITIES_PUB.Error_Tbl_Type;
438: l_alert_based_on VARCHAR2(10);
439: BEGIN
440:
441: l_alert_based_on := p_alert_based_on;
450: , x_return_msg => l_return_msg
451: ) ;
452:
453:
454: BIS_UTILITIES_PUB.put_line(p_text =>'alert type: '||p_alert_type);
455:
456:
457: IF p_perf_measure_id IS NOT NULL THEN
458: l_measure_rec.measure_id := p_perf_measure_id;
761: END IF;
762:
763: IF p_time_level_id IS NOT NULL THEN
764: l_time_level_id := TO_NUMBER(p_time_level_id);
765: BIS_UTILITIES_PUB.put_line(p_text =>'Passed time: '||l_time_level_id);
766: ELSE
767: FOR i IN 1..l_Dimension_Level_Tbl.COUNT LOOP
768: l_debug := l_debug || ', D'||i
769: ||': '||l_Dimension_Level_Tbl(i).Dimension_Level_Id;
826: l_param_set_tbl BIS_PMF_ALERT_REG_PUB.parameter_set_tbl_type;
827: l_target_tbl BIS_TARGET_PUB.Target_Tbl_type;
828: l_return_status VARCHAR2(1000);
829: l_request_scheduled VARCHAR2(1000);
830: l_error_Tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
831: l_api_version NUMBER := 1;
832: l_Conc_exist BOOLEAN := FALSE;
833: l_request_id VARCHAR2(32000);
834: l_debug VARCHAR2(32000);
832: l_Conc_exist BOOLEAN := FALSE;
833: l_request_id VARCHAR2(32000);
834: l_debug VARCHAR2(32000);
835: l_debug2 VARCHAR2(32000);
836: l_error_Tbl_p BIS_UTILITIES_PUB.Error_Tbl_Type;
837:
838: BEGIN
839:
840: l_debug_text := l_debug_text||': perf measure id: '||p_perf_measure_id
851: ||', time lev id: '
852: ||l_param_set_Rec.TIME_DIMENSION_LEVEL_ID
853: ||'-- ';
854:
855: BIS_UTILITIES_PUB.put_line(p_text =>'Managing measure registrations');
856: BIS_PMF_ALERT_REG_PVT.Manage_Alert_Registrations
857: ( p_Param_Set_rec => l_Param_Set_rec
858: , x_request_scheduled => l_request_scheduled
859: , x_return_status => l_return_status
861: );
862: l_debug_text := l_debug_text||': '
863: ||'Manage_Alert_Registration Target level '||l_request_scheduled
864: ||' , '||l_return_status;
865: --BIS_UTILITIES_PUB.put_line(p_text =>'ARSB: after managing reg: '||l_debug_text);
866:
867: IF l_request_scheduled = FND_API.G_TRUE THEN
868:
869: --BIS_UTILITIES_PUB.put_line(p_text =>'Request exist');
865: --BIS_UTILITIES_PUB.put_line(p_text =>'ARSB: after managing reg: '||l_debug_text);
866:
867: IF l_request_scheduled = FND_API.G_TRUE THEN
868:
869: --BIS_UTILITIES_PUB.put_line(p_text =>'Request exist');
870: l_debug_text := l_debug_text||': '||G_REQUEST_EXIST;
871: l_request_id := G_REQUEST_EXIST;
872:
873: ELSE
871: l_request_id := G_REQUEST_EXIST;
872:
873: ELSE
874:
875: --BIS_UTILITIES_PUB.put_line(p_text =>'Request does not exist');
876: process_parameter_set
877: ( p_request_id => l_request_id
878: -- , p_request_id => l_debug2
879: , p_perf_measure_id => l_param_set_Rec.performance_measure_id
898: , p_current_row => p_current_row
899: , p_alert_type => p_alert_type
900: , p_alert_based_on => p_alert_based_on
901: );
902: BIS_UTILITIES_PUB.put_line(p_text =>'Detailed alert request submitted.');
903: l_debug_text := l_debug_text||l_debug2;
904:
905: --p_request_id := l_request_id;
906:
913: when FND_API.G_EXC_ERROR then
914: l_return_status := FND_API.G_RET_STS_ERROR ;
915: p_request_id := l_request_id
916: ||' exception 1 in submit_parameter_set_request ';
917: BIS_UTILITIES_PUB.put_line(p_text =>'debug: '||l_debug_text);
918: when FND_API.G_EXC_UNEXPECTED_ERROR then
919: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
920: p_request_id := l_request_id
921: ||' exception 2 in submit_parameter_set_request ';
918: when FND_API.G_EXC_UNEXPECTED_ERROR then
919: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
920: p_request_id := l_request_id
921: ||' exception 2 in submit_parameter_set_request ';
922: BIS_UTILITIES_PUB.put_line(p_text =>'debug: '||l_debug_text);
923: when others then
924: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
925: p_request_id := l_request_id||', debug: '||l_debug_text
926: ||' exception 3 in submit_parameter_set_request '||sqlerrm;
923: when others then
924: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
925: p_request_id := l_request_id||', debug: '||l_debug_text
926: ||' exception 3 in submit_parameter_set_request '||sqlerrm;
927: BIS_UTILITIES_PUB.put_line(p_text =>'debug: '||l_debug_text);
928: l_error_Tbl_p := l_error_Tbl;
929: BIS_UTILITIES_PVT.Add_Error_Message
930: ( p_error_msg_id => SQLCODE
931: , p_error_description => SQLERRM
984: -- l_user_id VARCHAR2(100);
985: l_return_status VARCHAR2(1000);
986: l_request_id VARCHAR2(32000);
987: l_debug VARCHAR2(32000);
988: l_error_Tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
989: l_api_version NUMBER := 1;
990: l_error_Tbl_p BIS_UTILITIES_PUB.Error_Tbl_Type;
991:
992: BEGIN
986: l_request_id VARCHAR2(32000);
987: l_debug VARCHAR2(32000);
988: l_error_Tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
989: l_api_version NUMBER := 1;
990: l_error_Tbl_p BIS_UTILITIES_PUB.Error_Tbl_Type;
991:
992: BEGIN
993:
994: IF p_target_level_id IS NOT NULL THEN
1047: , x_return_status => l_return_status
1048: , x_error_Tbl => l_error_Tbl
1049: );
1050:
1051: BIS_UTILITIES_PUB.put_line(p_text =>'Time level retrieved: '
1052: ||l_Dimension_Level_Rec.dimension_level_short_name
1053: ||', dimension level number: '||l_dimension_level_number);
1054:
1055: l_debug := l_debug||' target level id: '||l_target_level_id;
1087: , x_Param_Set_Tbl => l_Param_Set_Tbl_orig
1088: , x_return_status => l_return_status
1089: , x_error_Tbl => l_error_Tbl
1090: );
1091: BIS_UTILITIES_PUB.put_line(p_text =>'Original number of parameter sets: '|| l_Param_Set_Tbl_orig.count);
1092:
1093: -- Check if new target;
1094: -- if new, register alert into ART
1095: -- if not new, add subscribers
1099: , p_param_set_tbl_new => l_param_set_tbl_new
1100: , x_param_set_tbl_all => l_param_set_tbl_all
1101: , x_param_set_tbl_diff => l_param_set_tbl_diff
1102: );
1103: BIS_UTILITIES_PUB.put_line(p_text =>'Parameter set comparison results: '
1104: ||' Original: '||l_param_set_tbl_orig.COUNT
1105: ||', new: '||l_param_set_tbl_new.COUNT
1106: ||', difference: '||l_param_set_tbl_diff.COUNT
1107: ||', all: '||l_param_set_tbl_all.COUNT
1133: ||' Register_Parameter_set status '||l_return_status ;
1134: l_debug := l_debug||' ---- '||l_request_id;
1135: END LOOP;
1136:
1137: BIS_UTILITIES_PUB.put_line(p_text =>'New parameter sets registeration status: '||l_return_status);
1138: ELSE
1139: Add_Subscribers
1140: ( p_Param_Set_rec => l_Param_Set_rec
1141: , x_request_id => l_request_id
1214: l_Alert_Request_rec BIS_ALERT_SERVICE_PVT.Alert_Request_rec_Type;
1215: l_Alert_Request_tbl BIS_ALERT_SERVICE_PVT.Alert_Request_tbl_Type;
1216: l_Concurrent_Request_Tbl BIS_CONCURRENT_MANAGER_PVT.PMF_Request_Tbl_Type;
1217: l_return_status VARCHAR2(1000);
1218: l_request_id_tbl BIS_UTILITIES_PUB.BIS_VARCHAR_TBL;
1219: l_debug VARCHAR2(32000);
1220: l_error_Tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
1221: l_errbuf VARCHAR2(32000);
1222: l_retcode VARCHAR2(32000);
1216: l_Concurrent_Request_Tbl BIS_CONCURRENT_MANAGER_PVT.PMF_Request_Tbl_Type;
1217: l_return_status VARCHAR2(1000);
1218: l_request_id_tbl BIS_UTILITIES_PUB.BIS_VARCHAR_TBL;
1219: l_debug VARCHAR2(32000);
1220: l_error_Tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
1221: l_errbuf VARCHAR2(32000);
1222: l_retcode VARCHAR2(32000);
1223: l_perf_measure_id NUMBER;
1224: l_time_dim_level_id NUMBER;
1222: l_retcode VARCHAR2(32000);
1223: l_perf_measure_id NUMBER;
1224: l_time_dim_level_id NUMBER;
1225: l_plan_id NUMBER;
1226: l_error_Tbl_p BIS_UTILITIES_PUB.Error_Tbl_Type;
1227:
1228: BEGIN
1229:
1230: BIS_UTILITIES_PUB.put_line(p_text =>'report alert');
1226: l_error_Tbl_p BIS_UTILITIES_PUB.Error_Tbl_Type;
1227:
1228: BEGIN
1229:
1230: BIS_UTILITIES_PUB.put_line(p_text =>'report alert');
1231:
1232: IF p_perf_measure_id IS NOT NULL THEN
1233: l_perf_measure_id := to_number(p_perf_measure_id);
1234: END IF;
1262: , x_target_tbl => l_target_tbl
1263: , x_return_status => l_return_status
1264: , x_error_Tbl => l_error_Tbl
1265: );
1266: BIS_UTILITIES_PUB.put_line(p_text =>'retrieved report target rows: '||l_target_tbl.count);
1267:
1268: FOR i IN 1..l_target_level_tbl.COUNT LOOP
1269: --BIS_UTILITIES_PUB.put_line(p_text =>'Target level id: '||l_target_level_tbl(i).target_level_id);
1270: FOR j IN 1..l_target_tbl.COUNT LOOP
1265: );
1266: BIS_UTILITIES_PUB.put_line(p_text =>'retrieved report target rows: '||l_target_tbl.count);
1267:
1268: FOR i IN 1..l_target_level_tbl.COUNT LOOP
1269: --BIS_UTILITIES_PUB.put_line(p_text =>'Target level id: '||l_target_level_tbl(i).target_level_id);
1270: FOR j IN 1..l_target_tbl.COUNT LOOP
1271: IF l_target_level_tbl(i).Target_level_id=l_target_tbl(j).Target_level_id
1272: THEN
1273: BIS_ALERT_SERVICE_PVT.Form_Alert_Request_rec
1277: , p_notify_set => p_notifiers
1278: , p_alert_type => p_alert_type
1279: , x_Alert_Request_rec => l_Alert_Request_rec
1280: );
1281: BIS_UTILITIES_PUB.put_line(p_text =>'Target level ID in Alert request rec: '
1282: ||l_Alert_Request_rec.target_level_id);
1283: l_Alert_Request_tbl(l_Alert_Request_tbl.COUNT+1):=l_Alert_Request_rec;
1284: END IF;
1285: END LOOP;
1289: ( p_Alert_Request_Tbl => l_Alert_Request_Tbl
1290: , x_Concurrent_Request_Tbl => l_Concurrent_Request_Tbl
1291: );
1292:
1293: BIS_UTILITIES_PUB.put_line(p_text =>'Submit concurrent requests for Detial Alert Service');
1294: --
1295: BIS_CONCURRENT_MANAGER_PVT.Submit_Concurrent_Request
1296: ( p_Concurrent_Request_Tbl => l_Concurrent_Request_Tbl
1297: , x_request_id_tbl => l_request_id_tbl
1298: , x_errbuf => l_errbuf
1299: , x_retcode => l_retcode
1300: );
1301:
1302: BIS_UTILITIES_PUB.put_line(p_text =>'report request submitted. id: '||x_request_id);
1303: IF l_request_id_tbl.COUNT > 0 THEN
1304: x_request_id := l_request_id_tbl(l_request_id_tbl.FIRST);
1305: END IF;
1306:
1366:
1367: l_return_status VARCHAR2(1000);
1368: l_request_id VARCHAR2(32000);
1369: l_debug VARCHAR2(32000);
1370: l_error_Tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
1371: l_error_Tbl_p BIS_UTILITIES_PUB.Error_Tbl_Type;
1372:
1373: BEGIN
1374:
1367: l_return_status VARCHAR2(1000);
1368: l_request_id VARCHAR2(32000);
1369: l_debug VARCHAR2(32000);
1370: l_error_Tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
1371: l_error_Tbl_p BIS_UTILITIES_PUB.Error_Tbl_Type;
1372:
1373: BEGIN
1374:
1375: BIS_UTILITIES_PUB.put_line(p_text =>'IN process_batch_report_request');
1371: l_error_Tbl_p BIS_UTILITIES_PUB.Error_Tbl_Type;
1372:
1373: BEGIN
1374:
1375: BIS_UTILITIES_PUB.put_line(p_text =>'IN process_batch_report_request');
1376:
1377: EXCEPTION
1378: when FND_API.G_EXC_ERROR then
1379: l_return_status := FND_API.G_RET_STS_ERROR ;
1423: l_target_tbl BIS_TARGET_PUB.Target_Tbl_type;
1424: l_report_data_tbl report_data_tbl_type;
1425: l_return_status VARCHAR2(1000);
1426: l_request_scheduled VARCHAR2(1000);
1427: l_error_Tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
1428: l_api_version NUMBER := 1;
1429: l_debug VARCHAR2(32000);
1430: l_perf_measure_id NUMBER;
1431: l_time_dim_level_id NUMBER;
1428: l_api_version NUMBER := 1;
1429: l_debug VARCHAR2(32000);
1430: l_perf_measure_id NUMBER;
1431: l_time_dim_level_id NUMBER;
1432: l_error_Tbl_p BIS_UTILITIES_PUB.Error_Tbl_Type;
1433:
1434: Begin
1435:
1436: -- register main request
1445: l_param_set_Rec.PERFORMANCE_MEASURE_ID := l_perf_measure_id;
1446: l_param_set_Rec.TIME_DIMENSION_LEVEL_ID := l_time_dim_level_id;
1447: l_param_set_rec.notify_owner_flag := p_notify_owners_flag;
1448:
1449: BIS_UTILITIES_PUB.put_line(p_text =>'Processing parameter_set. measure id: '||p_perf_measure_id
1450: ||', time level id: '||p_time_dim_level_id);
1451:
1452: Register_Parameter_set
1453: ( p_api_version => l_api_version
1457: , p_request_id => l_request_id
1458: , x_return_status => l_return_status
1459: , x_error_Tbl => l_error_Tbl
1460: );
1461: --BIS_UTILITIES_PUB.put_line(p_text =>'AFTER register param set: '||l_request_id);
1462:
1463: --p_request_id := p_request_id||l_debug_text;
1464: p_request_id := l_request_id;
1465:
1465:
1466: EXCEPTION
1467: when FND_API.G_EXC_ERROR then
1468: l_return_status := FND_API.G_RET_STS_ERROR ;
1469: BIS_UTILITIES_PUB.put_line(p_text =>'process_parameter_set exception1: '||sqlerrm);
1470: p_request_id := l_request_id
1471: ||' exception 1 in process_parameter_set ';
1472: when FND_API.G_EXC_UNEXPECTED_ERROR then
1473: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1472: when FND_API.G_EXC_UNEXPECTED_ERROR then
1473: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1474: p_request_id := l_request_id
1475: ||' exception 2 in process_parameter_set ';
1476: BIS_UTILITIES_PUB.put_line(p_text =>'process_parameter_set exception2: '||sqlerrm);
1477: when others then
1478: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1479: p_request_id := l_request_id
1480: ||' exception 3 in process_parameter_set ';
1477: when others then
1478: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1479: p_request_id := l_request_id
1480: ||' exception 3 in process_parameter_set ';
1481: BIS_UTILITIES_PUB.put_line(p_text =>'process_parameter_set exception3: '||sqlerrm);
1482: l_error_tbl_p := l_error_tbl;
1483: BIS_UTILITIES_PVT.Add_Error_Message
1484: ( p_error_msg_id => SQLCODE
1485: , p_error_description => SQLERRM
1500: , p_session_id IN varchar2 default null
1501: , p_alert_type IN varchar2 default null
1502: , p_request_id OUT NOCOPY varchar2
1503: , x_return_status OUT NOCOPY VARCHAR2
1504: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
1505: )
1506: IS
1507:
1508: l_Conc_exist BOOLEAN := FALSE;
1511: l_debug VARCHAR2(32000);
1512: l_notifiers_code VARCHAR2(32000);
1513: l_commit VARCHAR2(32000) := FND_API.G_TRUE;
1514: l_Param_Set_Rec BIS_PMF_ALERT_REG_PUB.parameter_set_rec_type;
1515: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
1516:
1517: BEGIN
1518: /*
1519: BIS_UTILITIES_PUB.put_line(p_text =>'VARSB: registering param set');
1515: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
1516:
1517: BEGIN
1518: /*
1519: BIS_UTILITIES_PUB.put_line(p_text =>'VARSB: registering param set');
1520: BIS_UTILITIES_PUB.put_line(p_text =>'measure: '||p_param_set_Rec.PERFORMANCE_MEASURE_ID);
1521: BIS_UTILITIES_PUB.put_line(p_text =>'target level: '|| p_param_set_Rec.TARGET_LEVEL_ID);
1522: BIS_UTILITIES_PUB.put_line(p_text =>'time level: '|| p_param_set_Rec.TIME_DIMENSION_LEVEL_ID);
1523: BIS_UTILITIES_PUB.put_line(p_text =>'notifier: '||p_param_set_Rec.NOTIFIERS_CODE);
1516:
1517: BEGIN
1518: /*
1519: BIS_UTILITIES_PUB.put_line(p_text =>'VARSB: registering param set');
1520: BIS_UTILITIES_PUB.put_line(p_text =>'measure: '||p_param_set_Rec.PERFORMANCE_MEASURE_ID);
1521: BIS_UTILITIES_PUB.put_line(p_text =>'target level: '|| p_param_set_Rec.TARGET_LEVEL_ID);
1522: BIS_UTILITIES_PUB.put_line(p_text =>'time level: '|| p_param_set_Rec.TIME_DIMENSION_LEVEL_ID);
1523: BIS_UTILITIES_PUB.put_line(p_text =>'notifier: '||p_param_set_Rec.NOTIFIERS_CODE);
1524: BIS_UTILITIES_PUB.put_line(p_text =>'PARAMETER1: '|| p_param_set_Rec.PARAMETER1_VALUE);
1517: BEGIN
1518: /*
1519: BIS_UTILITIES_PUB.put_line(p_text =>'VARSB: registering param set');
1520: BIS_UTILITIES_PUB.put_line(p_text =>'measure: '||p_param_set_Rec.PERFORMANCE_MEASURE_ID);
1521: BIS_UTILITIES_PUB.put_line(p_text =>'target level: '|| p_param_set_Rec.TARGET_LEVEL_ID);
1522: BIS_UTILITIES_PUB.put_line(p_text =>'time level: '|| p_param_set_Rec.TIME_DIMENSION_LEVEL_ID);
1523: BIS_UTILITIES_PUB.put_line(p_text =>'notifier: '||p_param_set_Rec.NOTIFIERS_CODE);
1524: BIS_UTILITIES_PUB.put_line(p_text =>'PARAMETER1: '|| p_param_set_Rec.PARAMETER1_VALUE);
1525: BIS_UTILITIES_PUB.put_line(p_text =>'PARAMETER2: '|| p_param_set_Rec.PARAMETER2_VALUE);
1518: /*
1519: BIS_UTILITIES_PUB.put_line(p_text =>'VARSB: registering param set');
1520: BIS_UTILITIES_PUB.put_line(p_text =>'measure: '||p_param_set_Rec.PERFORMANCE_MEASURE_ID);
1521: BIS_UTILITIES_PUB.put_line(p_text =>'target level: '|| p_param_set_Rec.TARGET_LEVEL_ID);
1522: BIS_UTILITIES_PUB.put_line(p_text =>'time level: '|| p_param_set_Rec.TIME_DIMENSION_LEVEL_ID);
1523: BIS_UTILITIES_PUB.put_line(p_text =>'notifier: '||p_param_set_Rec.NOTIFIERS_CODE);
1524: BIS_UTILITIES_PUB.put_line(p_text =>'PARAMETER1: '|| p_param_set_Rec.PARAMETER1_VALUE);
1525: BIS_UTILITIES_PUB.put_line(p_text =>'PARAMETER2: '|| p_param_set_Rec.PARAMETER2_VALUE);
1526: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER3_VALUE);
1519: BIS_UTILITIES_PUB.put_line(p_text =>'VARSB: registering param set');
1520: BIS_UTILITIES_PUB.put_line(p_text =>'measure: '||p_param_set_Rec.PERFORMANCE_MEASURE_ID);
1521: BIS_UTILITIES_PUB.put_line(p_text =>'target level: '|| p_param_set_Rec.TARGET_LEVEL_ID);
1522: BIS_UTILITIES_PUB.put_line(p_text =>'time level: '|| p_param_set_Rec.TIME_DIMENSION_LEVEL_ID);
1523: BIS_UTILITIES_PUB.put_line(p_text =>'notifier: '||p_param_set_Rec.NOTIFIERS_CODE);
1524: BIS_UTILITIES_PUB.put_line(p_text =>'PARAMETER1: '|| p_param_set_Rec.PARAMETER1_VALUE);
1525: BIS_UTILITIES_PUB.put_line(p_text =>'PARAMETER2: '|| p_param_set_Rec.PARAMETER2_VALUE);
1526: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER3_VALUE);
1527: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER4_VALUE);
1520: BIS_UTILITIES_PUB.put_line(p_text =>'measure: '||p_param_set_Rec.PERFORMANCE_MEASURE_ID);
1521: BIS_UTILITIES_PUB.put_line(p_text =>'target level: '|| p_param_set_Rec.TARGET_LEVEL_ID);
1522: BIS_UTILITIES_PUB.put_line(p_text =>'time level: '|| p_param_set_Rec.TIME_DIMENSION_LEVEL_ID);
1523: BIS_UTILITIES_PUB.put_line(p_text =>'notifier: '||p_param_set_Rec.NOTIFIERS_CODE);
1524: BIS_UTILITIES_PUB.put_line(p_text =>'PARAMETER1: '|| p_param_set_Rec.PARAMETER1_VALUE);
1525: BIS_UTILITIES_PUB.put_line(p_text =>'PARAMETER2: '|| p_param_set_Rec.PARAMETER2_VALUE);
1526: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER3_VALUE);
1527: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER4_VALUE);
1528: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER5_VALUE);
1521: BIS_UTILITIES_PUB.put_line(p_text =>'target level: '|| p_param_set_Rec.TARGET_LEVEL_ID);
1522: BIS_UTILITIES_PUB.put_line(p_text =>'time level: '|| p_param_set_Rec.TIME_DIMENSION_LEVEL_ID);
1523: BIS_UTILITIES_PUB.put_line(p_text =>'notifier: '||p_param_set_Rec.NOTIFIERS_CODE);
1524: BIS_UTILITIES_PUB.put_line(p_text =>'PARAMETER1: '|| p_param_set_Rec.PARAMETER1_VALUE);
1525: BIS_UTILITIES_PUB.put_line(p_text =>'PARAMETER2: '|| p_param_set_Rec.PARAMETER2_VALUE);
1526: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER3_VALUE);
1527: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER4_VALUE);
1528: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER5_VALUE);
1529: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER6_VALUE);
1522: BIS_UTILITIES_PUB.put_line(p_text =>'time level: '|| p_param_set_Rec.TIME_DIMENSION_LEVEL_ID);
1523: BIS_UTILITIES_PUB.put_line(p_text =>'notifier: '||p_param_set_Rec.NOTIFIERS_CODE);
1524: BIS_UTILITIES_PUB.put_line(p_text =>'PARAMETER1: '|| p_param_set_Rec.PARAMETER1_VALUE);
1525: BIS_UTILITIES_PUB.put_line(p_text =>'PARAMETER2: '|| p_param_set_Rec.PARAMETER2_VALUE);
1526: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER3_VALUE);
1527: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER4_VALUE);
1528: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER5_VALUE);
1529: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER6_VALUE);
1530: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER7_VALUE);
1523: BIS_UTILITIES_PUB.put_line(p_text =>'notifier: '||p_param_set_Rec.NOTIFIERS_CODE);
1524: BIS_UTILITIES_PUB.put_line(p_text =>'PARAMETER1: '|| p_param_set_Rec.PARAMETER1_VALUE);
1525: BIS_UTILITIES_PUB.put_line(p_text =>'PARAMETER2: '|| p_param_set_Rec.PARAMETER2_VALUE);
1526: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER3_VALUE);
1527: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER4_VALUE);
1528: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER5_VALUE);
1529: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER6_VALUE);
1530: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER7_VALUE);
1531: */
1524: BIS_UTILITIES_PUB.put_line(p_text =>'PARAMETER1: '|| p_param_set_Rec.PARAMETER1_VALUE);
1525: BIS_UTILITIES_PUB.put_line(p_text =>'PARAMETER2: '|| p_param_set_Rec.PARAMETER2_VALUE);
1526: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER3_VALUE);
1527: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER4_VALUE);
1528: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER5_VALUE);
1529: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER6_VALUE);
1530: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER7_VALUE);
1531: */
1532: BIS_UTILITIES_PUB.put_line(p_text =>'Registering Parameter set' );
1525: BIS_UTILITIES_PUB.put_line(p_text =>'PARAMETER2: '|| p_param_set_Rec.PARAMETER2_VALUE);
1526: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER3_VALUE);
1527: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER4_VALUE);
1528: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER5_VALUE);
1529: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER6_VALUE);
1530: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER7_VALUE);
1531: */
1532: BIS_UTILITIES_PUB.put_line(p_text =>'Registering Parameter set' );
1533:
1526: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER3_VALUE);
1527: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER4_VALUE);
1528: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER5_VALUE);
1529: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER6_VALUE);
1530: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER7_VALUE);
1531: */
1532: BIS_UTILITIES_PUB.put_line(p_text =>'Registering Parameter set' );
1533:
1534: -- Check whether there is a concurrent program exist for
1528: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER5_VALUE);
1529: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER6_VALUE);
1530: BIS_UTILITIES_PUB.put_line(p_text => p_param_set_Rec.PARAMETER7_VALUE);
1531: */
1532: BIS_UTILITIES_PUB.put_line(p_text =>'Registering Parameter set' );
1533:
1534: -- Check whether there is a concurrent program exist for
1535: -- the given PM and time dimension level id
1536: --
1545:
1546: -- Each row will have it's own adHocRole
1547: -- l_param_set_rec.notifiers_code := l_notifiers_code;
1548:
1549: --BIS_UTILITIES_PUB.put_line(p_text =>'ARSB: parameter set exist notifier code: '||l_notifiers_code);
1550:
1551:
1552: IF l_param_exist THEN
1553: BIS_UTILITIES_PUB.put_line(p_text =>'Request has already been scheduled. Notifier code: '
1549: --BIS_UTILITIES_PUB.put_line(p_text =>'ARSB: parameter set exist notifier code: '||l_notifiers_code);
1550:
1551:
1552: IF l_param_exist THEN
1553: BIS_UTILITIES_PUB.put_line(p_text =>'Request has already been scheduled. Notifier code: '
1554: ||l_notifiers_code);
1555: ELSE
1556: BIS_UTILITIES_PUB.put_line(p_text =>'Request has not been scheduled. Notifier code: '
1557: ||l_notifiers_code);
1552: IF l_param_exist THEN
1553: BIS_UTILITIES_PUB.put_line(p_text =>'Request has already been scheduled. Notifier code: '
1554: ||l_notifiers_code);
1555: ELSE
1556: BIS_UTILITIES_PUB.put_line(p_text =>'Request has not been scheduled. Notifier code: '
1557: ||l_notifiers_code);
1558: l_request_id := G_NOTSUBMIT;
1559: END IF;
1560:
1576: ( p_Param_Set_rec => l_Param_Set_rec
1577: , x_request_id => l_request_id
1578: , x_return_status => x_return_status
1579: );
1580: BIS_UTILITIES_PUB.put_line(p_text =>'Add subscriber status: '||x_return_status);
1581: END IF;
1582: */
1583: p_request_id := l_request_id||l_debug;
1584: --p_request_id := l_request_id;
1589: x_return_status := ' exception 1 in Register_Parameter_Set '||sqlerrm;
1590: when FND_API.G_EXC_UNEXPECTED_ERROR then
1591: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1592: x_return_status := ' exception 2 in Register_Parameter_Set '||sqlerrm;
1593: BIS_UTILITIES_PUB.put_line(p_text =>'register_parameter_set exception2: '||sqlerrm);
1594: when others then
1595: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1596: x_return_status := ' exception 3 in Register_Parameter_Set '||sqlerrm;
1597: BIS_UTILITIES_PUB.put_line(p_text =>'register_parameter_set exception3: '||sqlerrm);
1593: BIS_UTILITIES_PUB.put_line(p_text =>'register_parameter_set exception2: '||sqlerrm);
1594: when others then
1595: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1596: x_return_status := ' exception 3 in Register_Parameter_Set '||sqlerrm;
1597: BIS_UTILITIES_PUB.put_line(p_text =>'register_parameter_set exception3: '||sqlerrm);
1598: l_error_tbl := x_error_Tbl;
1599: BIS_UTILITIES_PVT.Add_Error_Message
1600: ( p_error_msg_id => SQLCODE
1601: , p_error_description => SQLERRM
1621:
1622: BEGIN
1623:
1624: l_user := FND_GLOBAL.USER_NAME;
1625: BIS_UTILITIES_PUB.put_line(p_text =>'Adding user to subscription list: '||l_user);
1626: l_debug := l_debug ||' Adding user to subscription list: '||l_user;
1627:
1628: BIS_PMF_ALERT_REG_PVT.Retrieve_Notifiers_Code
1629: ( p_api_version => 1.0
1635:
1636: IF l_notifiers_code IS NOT NULL THEN
1637: wf_directory.GetRoleUsers(l_notifiers_code,l_user_tbl);
1638:
1639: BIS_UTILITIES_PUB.put_line(p_text =>'Number of subscribers so far: '||l_user_tbl.COUNT);
1640: l_debug := l_debug ||' Number of subscribers so far: '||l_user_tbl.COUNT;
1641:
1642: FOR i IN 1..l_user_tbl.COUNT LOOP
1643: BIS_UTILITIES_PUB.put_line(p_text =>'Subscriber '||i||': '||l_user_tbl(i));
1639: BIS_UTILITIES_PUB.put_line(p_text =>'Number of subscribers so far: '||l_user_tbl.COUNT);
1640: l_debug := l_debug ||' Number of subscribers so far: '||l_user_tbl.COUNT;
1641:
1642: FOR i IN 1..l_user_tbl.COUNT LOOP
1643: BIS_UTILITIES_PUB.put_line(p_text =>'Subscriber '||i||': '||l_user_tbl(i));
1644: IF (l_user_tbl(i) = l_user) THEN
1645: l_user_exist := TRUE;
1646: END IF;
1647: END LOOP;
1681: , p_current_row IN VARCHAR2 := NULL
1682: , p_alert_based_on IN VARCHAR2 := BIS_CONCURRENT_MANAGER_PVT.C_ALERT_BASED_ON_TARGET
1683: , x_target_tbl OUT NOCOPY BIS_TARGET_PUB.Target_Tbl_type
1684: , x_return_status OUT NOCOPY VARCHAR2
1685: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
1686: )
1687: IS
1688:
1689: l_Measure_Rec BIS_MEASURE_PUB.Measure_Rec_Type;
1700: l_total_time_level_short VARCHAR2(32000);
1701: l_is_total_time BOOLEAN := FALSE;
1702: l_Is_Rolling_Period_Level NUMBER := 0; -- bug 2408906
1703: l_target_tbl_tmp_p BIS_TARGET_PUB.Target_Tbl_type;
1704: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
1705: l_flag BOOLEAN := FALSE;
1706: c_num NUMBER := -9999;
1707: c_var VARCHAR2(5) := '-9999';
1708:
1708:
1709: Begin
1710:
1711:
1712: BIS_UTILITIES_PUB.put_line(p_text =>' ***************************************************** ');
1713: BIS_UTILITIES_PUB.put_line(p_text => ' Start Retrieving target info ' );
1714: BIS_UTILITIES_PUB.put_line(p_text =>' ***************************************************** ');
1715:
1716: BIS_UTILITIES_PUB.put_line(p_text => ' Retrieving target information ' );
1709: Begin
1710:
1711:
1712: BIS_UTILITIES_PUB.put_line(p_text =>' ***************************************************** ');
1713: BIS_UTILITIES_PUB.put_line(p_text => ' Start Retrieving target info ' );
1714: BIS_UTILITIES_PUB.put_line(p_text =>' ***************************************************** ');
1715:
1716: BIS_UTILITIES_PUB.put_line(p_text => ' Retrieving target information ' );
1717: BIS_UTILITIES_PUB.put_line(p_text => ' Measure id = ' || p_measure_id );
1710:
1711:
1712: BIS_UTILITIES_PUB.put_line(p_text =>' ***************************************************** ');
1713: BIS_UTILITIES_PUB.put_line(p_text => ' Start Retrieving target info ' );
1714: BIS_UTILITIES_PUB.put_line(p_text =>' ***************************************************** ');
1715:
1716: BIS_UTILITIES_PUB.put_line(p_text => ' Retrieving target information ' );
1717: BIS_UTILITIES_PUB.put_line(p_text => ' Measure id = ' || p_measure_id );
1718: BIS_UTILITIES_PUB.put_line(p_text => ' Time level id = ' || p_time_dimension_level_id ) ;
1712: BIS_UTILITIES_PUB.put_line(p_text =>' ***************************************************** ');
1713: BIS_UTILITIES_PUB.put_line(p_text => ' Start Retrieving target info ' );
1714: BIS_UTILITIES_PUB.put_line(p_text =>' ***************************************************** ');
1715:
1716: BIS_UTILITIES_PUB.put_line(p_text => ' Retrieving target information ' );
1717: BIS_UTILITIES_PUB.put_line(p_text => ' Measure id = ' || p_measure_id );
1718: BIS_UTILITIES_PUB.put_line(p_text => ' Time level id = ' || p_time_dimension_level_id ) ;
1719: BIS_UTILITIES_PUB.put_line(p_text => ' Is curent time period = '|| p_current_row );
1720:
1713: BIS_UTILITIES_PUB.put_line(p_text => ' Start Retrieving target info ' );
1714: BIS_UTILITIES_PUB.put_line(p_text =>' ***************************************************** ');
1715:
1716: BIS_UTILITIES_PUB.put_line(p_text => ' Retrieving target information ' );
1717: BIS_UTILITIES_PUB.put_line(p_text => ' Measure id = ' || p_measure_id );
1718: BIS_UTILITIES_PUB.put_line(p_text => ' Time level id = ' || p_time_dimension_level_id ) ;
1719: BIS_UTILITIES_PUB.put_line(p_text => ' Is curent time period = '|| p_current_row );
1720:
1721: BIS_UTILITIES_PUB.put_line(p_text => ' --------------------------------------------- ' );
1714: BIS_UTILITIES_PUB.put_line(p_text =>' ***************************************************** ');
1715:
1716: BIS_UTILITIES_PUB.put_line(p_text => ' Retrieving target information ' );
1717: BIS_UTILITIES_PUB.put_line(p_text => ' Measure id = ' || p_measure_id );
1718: BIS_UTILITIES_PUB.put_line(p_text => ' Time level id = ' || p_time_dimension_level_id ) ;
1719: BIS_UTILITIES_PUB.put_line(p_text => ' Is curent time period = '|| p_current_row );
1720:
1721: BIS_UTILITIES_PUB.put_line(p_text => ' --------------------------------------------- ' );
1722:
1715:
1716: BIS_UTILITIES_PUB.put_line(p_text => ' Retrieving target information ' );
1717: BIS_UTILITIES_PUB.put_line(p_text => ' Measure id = ' || p_measure_id );
1718: BIS_UTILITIES_PUB.put_line(p_text => ' Time level id = ' || p_time_dimension_level_id ) ;
1719: BIS_UTILITIES_PUB.put_line(p_text => ' Is curent time period = '|| p_current_row );
1720:
1721: BIS_UTILITIES_PUB.put_line(p_text => ' --------------------------------------------- ' );
1722:
1723: l_is_total_time := FALSE;
1717: BIS_UTILITIES_PUB.put_line(p_text => ' Measure id = ' || p_measure_id );
1718: BIS_UTILITIES_PUB.put_line(p_text => ' Time level id = ' || p_time_dimension_level_id ) ;
1719: BIS_UTILITIES_PUB.put_line(p_text => ' Is curent time period = '|| p_current_row );
1720:
1721: BIS_UTILITIES_PUB.put_line(p_text => ' --------------------------------------------- ' );
1722:
1723: l_is_total_time := FALSE;
1724: l_is_total_time := IS_TOTAL_DIM_LEVEL(p_time_dimension_level_id);
1725:
1728: l_time_level_short_name := BIS_UTILITIES_PVT.GET_TIME_SHORT_NAME(p_time_dimension_level_id);
1729: END IF;
1730:
1731: l_Is_Rolling_Period_Level := BIS_UTILITIES_PVT.Is_Rolling_Period_Level( -- bug 2408906
1732: p_level_short_name => l_time_level_short_name ); -- BIS_UTILITIES_PUB.put_line(p_text =>'Time Level short Name ' || l_time_level_short_name);
1733: IF (p_time_dimension_level_id IS NOT NULL) THEN --added to allow RSG call to let thr' for all time levels
1734: l_time_short_name := BIS_UTILITIES_PVT.Get_Time_Dimension_Name (p_DimLevelId => p_time_dimension_level_id); -- BIS_UTILITIES_PUB.put_line(p_text =>'Time short Name ' || l_time_short_name);
1735: l_total_time_level_short := BIS_UTILITIES_PVT.Get_Total_Dimlevel_Name (l_time_short_name , NULL, l_time_level_short_name); -- BIS_UTILITIES_PUB.put_line(p_text =>'Total Time Level short Name ' || l_total_time_level_short);
1736: END IF;
1730:
1731: l_Is_Rolling_Period_Level := BIS_UTILITIES_PVT.Is_Rolling_Period_Level( -- bug 2408906
1732: p_level_short_name => l_time_level_short_name ); -- BIS_UTILITIES_PUB.put_line(p_text =>'Time Level short Name ' || l_time_level_short_name);
1733: IF (p_time_dimension_level_id IS NOT NULL) THEN --added to allow RSG call to let thr' for all time levels
1734: l_time_short_name := BIS_UTILITIES_PVT.Get_Time_Dimension_Name (p_DimLevelId => p_time_dimension_level_id); -- BIS_UTILITIES_PUB.put_line(p_text =>'Time short Name ' || l_time_short_name);
1735: l_total_time_level_short := BIS_UTILITIES_PVT.Get_Total_Dimlevel_Name (l_time_short_name , NULL, l_time_level_short_name); -- BIS_UTILITIES_PUB.put_line(p_text =>'Total Time Level short Name ' || l_total_time_level_short);
1736: END IF;
1737:
1738: BIS_UTILITIES_PUB.put_line(p_text => ' --------------------------------------------- ' );
1731: l_Is_Rolling_Period_Level := BIS_UTILITIES_PVT.Is_Rolling_Period_Level( -- bug 2408906
1732: p_level_short_name => l_time_level_short_name ); -- BIS_UTILITIES_PUB.put_line(p_text =>'Time Level short Name ' || l_time_level_short_name);
1733: IF (p_time_dimension_level_id IS NOT NULL) THEN --added to allow RSG call to let thr' for all time levels
1734: l_time_short_name := BIS_UTILITIES_PVT.Get_Time_Dimension_Name (p_DimLevelId => p_time_dimension_level_id); -- BIS_UTILITIES_PUB.put_line(p_text =>'Time short Name ' || l_time_short_name);
1735: l_total_time_level_short := BIS_UTILITIES_PVT.Get_Total_Dimlevel_Name (l_time_short_name , NULL, l_time_level_short_name); -- BIS_UTILITIES_PUB.put_line(p_text =>'Total Time Level short Name ' || l_total_time_level_short);
1736: END IF;
1737:
1738: BIS_UTILITIES_PUB.put_line(p_text => ' --------------------------------------------- ' );
1739:
1734: l_time_short_name := BIS_UTILITIES_PVT.Get_Time_Dimension_Name (p_DimLevelId => p_time_dimension_level_id); -- BIS_UTILITIES_PUB.put_line(p_text =>'Time short Name ' || l_time_short_name);
1735: l_total_time_level_short := BIS_UTILITIES_PVT.Get_Total_Dimlevel_Name (l_time_short_name , NULL, l_time_level_short_name); -- BIS_UTILITIES_PUB.put_line(p_text =>'Total Time Level short Name ' || l_total_time_level_short);
1736: END IF;
1737:
1738: BIS_UTILITIES_PUB.put_line(p_text => ' --------------------------------------------- ' );
1739:
1740: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1741: l_Measure_Rec.Measure_id := p_measure_id;
1742: BIS_TARGET_LEVEL_PVT.Retrieve_Target_Levels
1747: , x_return_status => x_return_status
1748: , x_error_Tbl => x_error_Tbl
1749: );
1750:
1751: BIS_UTILITIES_PUB.put_line(p_text =>'Number of target levels retrieved for Target INFO: '
1752: ||l_Target_Level_tbl.COUNT );
1753:
1754: FOR i in 1..l_Target_Level_tbl.COUNT
1755: LOOP
1752: ||l_Target_Level_tbl.COUNT );
1753:
1754: FOR i in 1..l_Target_Level_tbl.COUNT
1755: LOOP
1756: BIS_UTILITIES_PUB.put_line(p_text => ' Target level id # ' || i || ' is ' || l_Target_Level_tbl(i).target_level_id );
1757: END LOOP;
1758:
1759:
1760: FOR i in 1..l_Target_Level_tbl.COUNT
1759:
1760: FOR i in 1..l_Target_Level_tbl.COUNT
1761: LOOP
1762:
1763: BIS_UTILITIES_PUB.put_line(p_text => ' -------***************************************---------- ' );
1764: BIS_UTILITIES_PUB.put_line(p_text => ' Start retrieving targets for # ' || i || ' tgt lvl id ' || l_Target_Level_tbl(i).target_level_id) ;
1765:
1766: -- if l_is_total_time = FALSE then
1767: -- In every loop for summary levels under a measure,
1760: FOR i in 1..l_Target_Level_tbl.COUNT
1761: LOOP
1762:
1763: BIS_UTILITIES_PUB.put_line(p_text => ' -------***************************************---------- ' );
1764: BIS_UTILITIES_PUB.put_line(p_text => ' Start retrieving targets for # ' || i || ' tgt lvl id ' || l_Target_Level_tbl(i).target_level_id) ;
1765:
1766: -- if l_is_total_time = FALSE then
1767: -- In every loop for summary levels under a measure,
1768: -- for summary level id 1793 -> finds dim levels -> finds the dimension level id corresponding to time dimension. (1219)
1776: );
1777:
1778: -- end if;
1779:
1780: BIS_UTILITIES_PUB.put_line(p_text =>' Time level id for # ' || i || ' from target lvls table is ' || l_Dimension_Level_Rec.dimension_level_id);
1781:
1782: -- Filtering only for the time dimension passed as
1783: -- parameter
1784: --
1788: -- summary levels of the measure contains a time dim level which is equal to the time dim level passed in, then
1789: -- continue with using that to spawn child requests.
1790:
1791: IF p_time_dimension_level_id IS NULL or (l_is_total_time = TRUE
1792: and (BIS_UTILITIES_PUB.Value_Missing(l_Dimension_Level_Rec.dimension_level_id) = FND_API.G_TRUE
1793: or BIS_UTILITIES_PUB.Value_NULL(l_Dimension_Level_Rec.dimension_level_id)= FND_API.G_TRUE))
1794: OR l_Dimension_Level_Rec.dimension_level_id = p_time_dimension_level_id
1795: THEN
1796:
1789: -- continue with using that to spawn child requests.
1790:
1791: IF p_time_dimension_level_id IS NULL or (l_is_total_time = TRUE
1792: and (BIS_UTILITIES_PUB.Value_Missing(l_Dimension_Level_Rec.dimension_level_id) = FND_API.G_TRUE
1793: or BIS_UTILITIES_PUB.Value_NULL(l_Dimension_Level_Rec.dimension_level_id)= FND_API.G_TRUE))
1794: OR l_Dimension_Level_Rec.dimension_level_id = p_time_dimension_level_id
1795: THEN
1796:
1797: BIS_UTILITIES_PUB.put_line(p_text => ' --------~~~~~~~~~~~~~~~~~~~~~~~~~~~~~-------- ' );
1793: or BIS_UTILITIES_PUB.Value_NULL(l_Dimension_Level_Rec.dimension_level_id)= FND_API.G_TRUE))
1794: OR l_Dimension_Level_Rec.dimension_level_id = p_time_dimension_level_id
1795: THEN
1796:
1797: BIS_UTILITIES_PUB.put_line(p_text => ' --------~~~~~~~~~~~~~~~~~~~~~~~~~~~~~-------- ' );
1798: BIS_UTILITIES_PUB.put_line(p_text => ' Begin Retrieving targets from bis_target_values ' );
1799:
1800: BIS_TARGET_PUB.Retrieve_targets
1801: ( p_api_version => p_api_version
1794: OR l_Dimension_Level_Rec.dimension_level_id = p_time_dimension_level_id
1795: THEN
1796:
1797: BIS_UTILITIES_PUB.put_line(p_text => ' --------~~~~~~~~~~~~~~~~~~~~~~~~~~~~~-------- ' );
1798: BIS_UTILITIES_PUB.put_line(p_text => ' Begin Retrieving targets from bis_target_values ' );
1799:
1800: BIS_TARGET_PUB.Retrieve_targets
1801: ( p_api_version => p_api_version
1802: , p_Target_Level_Rec => l_Target_Level_tbl(i)
1805: , x_return_status => x_return_status
1806: , x_error_Tbl => x_error_Tbl
1807: );
1808:
1809: BIS_UTILITIES_PUB.put_line(p_text => ' End Retrieving targets from bis_target_values ' );
1810: BIS_UTILITIES_PUB.put_line(p_text => ' Number of targets from targets = '||l_Target_tbl_tmp.COUNT);
1811: BIS_UTILITIES_PUB.put_line(p_text => ' --------~~~~~~~~~~~~~~~~~~~~~~~~~~~~~-------- ' );
1812:
1813:
1806: , x_error_Tbl => x_error_Tbl
1807: );
1808:
1809: BIS_UTILITIES_PUB.put_line(p_text => ' End Retrieving targets from bis_target_values ' );
1810: BIS_UTILITIES_PUB.put_line(p_text => ' Number of targets from targets = '||l_Target_tbl_tmp.COUNT);
1811: BIS_UTILITIES_PUB.put_line(p_text => ' --------~~~~~~~~~~~~~~~~~~~~~~~~~~~~~-------- ' );
1812:
1813:
1814: BIS_UTILITIES_PUB.put_line(p_text => ' ---------.............................-------- ' );
1807: );
1808:
1809: BIS_UTILITIES_PUB.put_line(p_text => ' End Retrieving targets from bis_target_values ' );
1810: BIS_UTILITIES_PUB.put_line(p_text => ' Number of targets from targets = '||l_Target_tbl_tmp.COUNT);
1811: BIS_UTILITIES_PUB.put_line(p_text => ' --------~~~~~~~~~~~~~~~~~~~~~~~~~~~~~-------- ' );
1812:
1813:
1814: BIS_UTILITIES_PUB.put_line(p_text => ' ---------.............................-------- ' );
1815: BIS_UTILITIES_PUB.put_line(p_text => ' Begin Retrieving targets from bis_user_ind_selections ' );
1810: BIS_UTILITIES_PUB.put_line(p_text => ' Number of targets from targets = '||l_Target_tbl_tmp.COUNT);
1811: BIS_UTILITIES_PUB.put_line(p_text => ' --------~~~~~~~~~~~~~~~~~~~~~~~~~~~~~-------- ' );
1812:
1813:
1814: BIS_UTILITIES_PUB.put_line(p_text => ' ---------.............................-------- ' );
1815: BIS_UTILITIES_PUB.put_line(p_text => ' Begin Retrieving targets from bis_user_ind_selections ' );
1816:
1817: BIS_ACTUAL_PVT.Retrieve_tl_selections
1818: ( p_Target_Level_Rec => l_Target_Level_tbl(i)
1811: BIS_UTILITIES_PUB.put_line(p_text => ' --------~~~~~~~~~~~~~~~~~~~~~~~~~~~~~-------- ' );
1812:
1813:
1814: BIS_UTILITIES_PUB.put_line(p_text => ' ---------.............................-------- ' );
1815: BIS_UTILITIES_PUB.put_line(p_text => ' Begin Retrieving targets from bis_user_ind_selections ' );
1816:
1817: BIS_ACTUAL_PVT.Retrieve_tl_selections
1818: ( p_Target_Level_Rec => l_Target_Level_tbl(i)
1819: , x_Indicator_Region_Tbl => l_Indicator_Region_Tbl
1863: l_Target_tbl_tmp(l_target_count).is_pm_region := BIS_TARGET_PUB.G_IS_PM_REGION; -- indicates it is a PM region entry
1864: END IF;
1865: END LOOP;
1866:
1867: BIS_UTILITIES_PUB.put_line(p_text => ' End Retrieving targets from bis_user_ind_selections ' );
1868: BIS_UTILITIES_PUB.put_line(p_text => ' Number of targets from user ind sel = '|| l_Indicator_Region_Tbl.COUNT );
1869: BIS_UTILITIES_PUB.put_line(p_text => ' Number of filtered targets from targets = '||l_Target_tbl_tmp.COUNT);
1870: BIS_UTILITIES_PUB.put_line(p_text => ' ---------.............................-------- ' );
1871:
1864: END IF;
1865: END LOOP;
1866:
1867: BIS_UTILITIES_PUB.put_line(p_text => ' End Retrieving targets from bis_user_ind_selections ' );
1868: BIS_UTILITIES_PUB.put_line(p_text => ' Number of targets from user ind sel = '|| l_Indicator_Region_Tbl.COUNT );
1869: BIS_UTILITIES_PUB.put_line(p_text => ' Number of filtered targets from targets = '||l_Target_tbl_tmp.COUNT);
1870: BIS_UTILITIES_PUB.put_line(p_text => ' ---------.............................-------- ' );
1871:
1872: -- If the alert is to be target based, then the "Change based" alerts should be filtered out and vice-versa
1865: END LOOP;
1866:
1867: BIS_UTILITIES_PUB.put_line(p_text => ' End Retrieving targets from bis_user_ind_selections ' );
1868: BIS_UTILITIES_PUB.put_line(p_text => ' Number of targets from user ind sel = '|| l_Indicator_Region_Tbl.COUNT );
1869: BIS_UTILITIES_PUB.put_line(p_text => ' Number of filtered targets from targets = '||l_Target_tbl_tmp.COUNT);
1870: BIS_UTILITIES_PUB.put_line(p_text => ' ---------.............................-------- ' );
1871:
1872: -- If the alert is to be target based, then the "Change based" alerts should be filtered out and vice-versa
1873: l_target_tbl_tmp_p := l_target_tbl_tmp;
1866:
1867: BIS_UTILITIES_PUB.put_line(p_text => ' End Retrieving targets from bis_user_ind_selections ' );
1868: BIS_UTILITIES_PUB.put_line(p_text => ' Number of targets from user ind sel = '|| l_Indicator_Region_Tbl.COUNT );
1869: BIS_UTILITIES_PUB.put_line(p_text => ' Number of filtered targets from targets = '||l_Target_tbl_tmp.COUNT);
1870: BIS_UTILITIES_PUB.put_line(p_text => ' ---------.............................-------- ' );
1871:
1872: -- If the alert is to be target based, then the "Change based" alerts should be filtered out and vice-versa
1873: l_target_tbl_tmp_p := l_target_tbl_tmp;
1874: filter_alert_based_on(
1889: and (l_Is_Rolling_Period_Level = 0)) -- bug 2408906 (dont filter out NOCOPY rolling levels)
1890: ) THEN
1891:
1892: IF p_current_row = 'Y' THEN
1893: -- BIS_UTILITIES_PUB.put_line(p_text => ' call to get current target ' ) ;
1894: l_target_tbl_tmp_p := l_target_tbl_tmp;
1895: Get_Current_Target
1896: ( p_Target_tbl => l_Target_tbl_tmp_p
1897: , p_target_level_rec => l_target_level_tbl(i)
1899: , x_target_tbl => l_target_tbl_tmp
1900: , x_return_status => x_return_status
1901: );
1902: ELSIF p_current_row = 'N' THEN
1903: -- BIS_UTILITIES_PUB.put_line(p_text => ' call to get previous target ' ) ;
1904: l_target_tbl_tmp_p := l_target_tbl_tmp;
1905: Get_Previous_Target
1906: ( p_Target_tbl => l_Target_tbl_tmp_p
1907: , p_target_level_rec => l_target_level_tbl(i)
1908: , x_target_tbl => l_target_tbl_tmp
1909: , x_return_status => x_return_status
1910: );
1911: ELSE
1912: BIS_UTILITIES_PUB.put_line(p_text =>'Neither previous or current target!!');
1913: -- x_target_tbl := l_target_tbl;
1914: END IF;
1915: ELSE
1916: l_target_tbl_tmp_p := l_target_tbl_tmp;
1930: p_target_tbl => l_target_tbl_tmp_p
1931: ,x_target_tbl => l_target_tbl_tmp
1932: );
1933:
1934: BIS_UTILITIES_PUB.put_line(p_text => ' --------~~~~~~~~~~~~~~~~~~~~~~~~~~~~~-------- ' );
1935: BIS_UTILITIES_PUB.put_line(p_text => ' Number of filtered targets from targets = '|| l_Target_tbl_tmp.COUNT);
1936:
1937: FOR j IN 1..l_Target_tbl_tmp.COUNT LOOP
1938: x_Target_tbl(x_Target_tbl.COUNT+1) := l_Target_tbl_tmp(j);
1931: ,x_target_tbl => l_target_tbl_tmp
1932: );
1933:
1934: BIS_UTILITIES_PUB.put_line(p_text => ' --------~~~~~~~~~~~~~~~~~~~~~~~~~~~~~-------- ' );
1935: BIS_UTILITIES_PUB.put_line(p_text => ' Number of filtered targets from targets = '|| l_Target_tbl_tmp.COUNT);
1936:
1937: FOR j IN 1..l_Target_tbl_tmp.COUNT LOOP
1938: x_Target_tbl(x_Target_tbl.COUNT+1) := l_Target_tbl_tmp(j);
1939: END LOOP;
1937: FOR j IN 1..l_Target_tbl_tmp.COUNT LOOP
1938: x_Target_tbl(x_Target_tbl.COUNT+1) := l_Target_tbl_tmp(j);
1939: END LOOP;
1940:
1941: BIS_UTILITIES_PUB.put_line(p_text =>' Total number of filtered targets retrieved for this time level SO FAR.. = ' || x_target_tbl.count);
1942: BIS_UTILITIES_PUB.put_line(p_text => ' --------~~~~~~~~~~~~~~~~~~~~~~~~~~~~~-------- ' );
1943:
1944: END IF;
1945:
1938: x_Target_tbl(x_Target_tbl.COUNT+1) := l_Target_tbl_tmp(j);
1939: END LOOP;
1940:
1941: BIS_UTILITIES_PUB.put_line(p_text =>' Total number of filtered targets retrieved for this time level SO FAR.. = ' || x_target_tbl.count);
1942: BIS_UTILITIES_PUB.put_line(p_text => ' --------~~~~~~~~~~~~~~~~~~~~~~~~~~~~~-------- ' );
1943:
1944: END IF;
1945:
1946: END LOOP;
1944: END IF;
1945:
1946: END LOOP;
1947: --x_target_tbl := l_target_tbl;
1948: BIS_UTILITIES_PUB.put_line(p_text =>' Final number of targets retrieved ' || x_target_tbl.count);
1949:
1950: BIS_UTILITIES_PUB.put_line(p_text =>' ***************************************************** ');
1951: BIS_UTILITIES_PUB.put_line(p_text => ' Finish Retrieving target info ' );
1952: BIS_UTILITIES_PUB.put_line(p_text =>' ***************************************************** ');
1946: END LOOP;
1947: --x_target_tbl := l_target_tbl;
1948: BIS_UTILITIES_PUB.put_line(p_text =>' Final number of targets retrieved ' || x_target_tbl.count);
1949:
1950: BIS_UTILITIES_PUB.put_line(p_text =>' ***************************************************** ');
1951: BIS_UTILITIES_PUB.put_line(p_text => ' Finish Retrieving target info ' );
1952: BIS_UTILITIES_PUB.put_line(p_text =>' ***************************************************** ');
1953:
1954: EXCEPTION
1947: --x_target_tbl := l_target_tbl;
1948: BIS_UTILITIES_PUB.put_line(p_text =>' Final number of targets retrieved ' || x_target_tbl.count);
1949:
1950: BIS_UTILITIES_PUB.put_line(p_text =>' ***************************************************** ');
1951: BIS_UTILITIES_PUB.put_line(p_text => ' Finish Retrieving target info ' );
1952: BIS_UTILITIES_PUB.put_line(p_text =>' ***************************************************** ');
1953:
1954: EXCEPTION
1955: when FND_API.G_EXC_ERROR then
1948: BIS_UTILITIES_PUB.put_line(p_text =>' Final number of targets retrieved ' || x_target_tbl.count);
1949:
1950: BIS_UTILITIES_PUB.put_line(p_text =>' ***************************************************** ');
1951: BIS_UTILITIES_PUB.put_line(p_text => ' Finish Retrieving target info ' );
1952: BIS_UTILITIES_PUB.put_line(p_text =>' ***************************************************** ');
1953:
1954: EXCEPTION
1955: when FND_API.G_EXC_ERROR then
1956: x_return_status := FND_API.G_RET_STS_ERROR ;
1953:
1954: EXCEPTION
1955: when FND_API.G_EXC_ERROR then
1956: x_return_status := FND_API.G_RET_STS_ERROR ;
1957: BIS_UTILITIES_PUB.put_line(p_text =>'exception 1 at Retrieve_target_info: '||sqlerrm);
1958: when FND_API.G_EXC_UNEXPECTED_ERROR then
1959: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1960: BIS_UTILITIES_PUB.put_line(p_text =>'exception 2 at Retrieve_target_info: '||sqlerrm);
1961: when others then
1956: x_return_status := FND_API.G_RET_STS_ERROR ;
1957: BIS_UTILITIES_PUB.put_line(p_text =>'exception 1 at Retrieve_target_info: '||sqlerrm);
1958: when FND_API.G_EXC_UNEXPECTED_ERROR then
1959: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1960: BIS_UTILITIES_PUB.put_line(p_text =>'exception 2 at Retrieve_target_info: '||sqlerrm);
1961: when others then
1962: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1963: BIS_UTILITIES_PUB.put_line(p_text =>'exception 3 at Retrieve_target_info: '||sqlerrm);
1964: l_error_tbl := x_error_tbl;
1959: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1960: BIS_UTILITIES_PUB.put_line(p_text =>'exception 2 at Retrieve_target_info: '||sqlerrm);
1961: when others then
1962: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1963: BIS_UTILITIES_PUB.put_line(p_text =>'exception 3 at Retrieve_target_info: '||sqlerrm);
1964: l_error_tbl := x_error_tbl;
1965: BIS_UTILITIES_PVT.Add_Error_Message
1966: ( p_error_msg_id => SQLCODE
1967: , p_error_description => SQLERRM
2059: , p_current_row IN VARCHAR2 := NULL
2060: --, p_alert_based_on IN VARCHAR2 := BIS_CONCURRENT_MANAGER_PVT.C_ALERT_BASED_ON_TARGET
2061: , x_target_tbl OUT NOCOPY BIS_TARGET_PUB.Target_Tbl_type
2062: , x_return_status OUT NOCOPY VARCHAR2
2063: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
2064: )
2065: IS
2066:
2067: l_Target_Level_rec BIS_Target_Level_PUB.Target_Level_rec_Type;
2071: l_Dimension_Level_Rec BIS_DIMENSION_LEVEL_PUB.Dimension_Level_Rec_Type;
2072: l_dimension_level_number NUMBER;
2073: l_current_row VARCHAR2(10);
2074: l_Target_Level_rec_p BIS_Target_Level_PUB.Target_Level_rec_Type;
2075: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
2076: l_Target_tbl_tmp_p BIS_TARGET_PUB.Target_Tbl_type;
2077: Begin
2078:
2079: BIS_UTILITIES_PUB.put_line(p_text =>'Retrieving target information 0002.'
2075: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
2076: l_Target_tbl_tmp_p BIS_TARGET_PUB.Target_Tbl_type;
2077: Begin
2078:
2079: BIS_UTILITIES_PUB.put_line(p_text =>'Retrieving target information 0002.'
2080: ||' , target level id: '||p_target_level_id
2081: ||', Curent row? '||p_current_row);
2082:
2083: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2092: , x_return_status => x_return_status
2093: , x_error_Tbl => x_error_Tbl
2094: );
2095:
2096: BIS_UTILITIES_PUB.put_line(p_text =>'Target level retrieved for Target INFO 2: '
2097: ||l_Target_Level_rec.Target_Level_short_name );
2098:
2099: BIS_TARGET_LEVEL_PVT.Retrieve_Time_level
2100: ( p_api_version => 1.0
2104: , x_return_status => x_return_status
2105: , x_error_Tbl => x_error_Tbl
2106: );
2107:
2108: BIS_UTILITIES_PUB.put_line(p_text =>'time level id for target level: '
2109: ||l_Dimension_Level_Rec.dimension_level_id);
2110:
2111: -- Filtering only for the time dimension passed as
2112: -- parameter
2122: , x_Target_tbl => l_Target_tbl_tmp
2123: , x_return_status => x_return_status
2124: , x_error_Tbl => x_error_Tbl
2125: );
2126: BIS_UTILITIES_PUB.put_line(p_text =>'retriving target information for target level 2: '
2127: ||l_Target_Level_rec.target_level_short_name
2128: ||'. Number of targets ALL: '||l_Target_tbl_tmp.COUNT);
2129:
2130: -- Since there is no option to choose previous or current period
2152: , x_target_tbl => l_target_tbl_tmp
2153: , x_return_status => x_return_status
2154: );
2155: ELSE
2156: BIS_UTILITIES_PUB.put_line(p_text =>'neither previous or current target!!');
2157:
2158: END IF;
2159:
2160: FOR j IN 1..l_Target_tbl_tmp.COUNT LOOP
2165:
2166: END IF;
2167:
2168: --x_target_tbl := l_target_tbl;
2169: BIS_UTILITIES_PUB.put_line(p_text =>'!!Number of targets retrieved: '||x_target_tbl.count);
2170:
2171: EXCEPTION
2172: when FND_API.G_EXC_ERROR then
2173: x_return_status := FND_API.G_RET_STS_ERROR ;
2170:
2171: EXCEPTION
2172: when FND_API.G_EXC_ERROR then
2173: x_return_status := FND_API.G_RET_STS_ERROR ;
2174: BIS_UTILITIES_PUB.put_line(p_text =>'exception 1 at Retrieve_target_info: '||sqlerrm);
2175: when FND_API.G_EXC_UNEXPECTED_ERROR then
2176: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2177: BIS_UTILITIES_PUB.put_line(p_text =>'exception 2 at Retrieve_target_info: '||sqlerrm);
2178: when others then
2173: x_return_status := FND_API.G_RET_STS_ERROR ;
2174: BIS_UTILITIES_PUB.put_line(p_text =>'exception 1 at Retrieve_target_info: '||sqlerrm);
2175: when FND_API.G_EXC_UNEXPECTED_ERROR then
2176: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2177: BIS_UTILITIES_PUB.put_line(p_text =>'exception 2 at Retrieve_target_info: '||sqlerrm);
2178: when others then
2179: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2180: BIS_UTILITIES_PUB.put_line(p_text =>'exception 3 at Retrieve_target_info: '||sqlerrm);
2181: l_error_tbl := x_error_Tbl;
2176: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2177: BIS_UTILITIES_PUB.put_line(p_text =>'exception 2 at Retrieve_target_info: '||sqlerrm);
2178: when others then
2179: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2180: BIS_UTILITIES_PUB.put_line(p_text =>'exception 3 at Retrieve_target_info: '||sqlerrm);
2181: l_error_tbl := x_error_Tbl;
2182: BIS_UTILITIES_PVT.Add_Error_Message
2183: ( p_error_msg_id => SQLCODE
2184: , p_error_description => SQLERRM
2200:
2201: l_target_tbl BIS_TARGET_PUB.Target_Tbl_type;
2202: l_Dim_Level_Value_Rec BIS_DIM_LEVEL_VALUE_PUB.Dim_Level_Value_Rec_Type;
2203: l_dimension_level_number NUMBER;
2204: l_error_Tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
2205: l_time_id VARCHAR2(80);
2206: l_target_count NUMBER := 1;
2207: l_Org_Level_Value_ID VARCHAR2(40);
2208: l_Org_Short_Name VARCHAR2(80);
2213:
2214: FOR j in 1..p_Target_tbl.COUNT
2215: LOOP
2216:
2217: BIS_UTILITIES_PUB.put_line(p_text =>' -------- Target # ' || j || ' ---------- ' );
2218:
2219: BIS_TARGET_PVT.Retrieve_Org_level_value
2220: ( p_api_version => 1.0
2221: , p_Target_Rec => p_Target_tbl(j)
2229: l_Org_Short_Name := l_Dim_Level_value_Rec.Dimension_Level_Short_Name;
2230:
2231: /*
2232: if (
2233: (BIS_UTILITIES_PUB.Value_Not_Missing( l_Org_Level_Value_ID ) = FND_API.G_TRUE)
2234: and (BIS_UTILITIES_PUB.Value_Not_Null( l_Org_Level_Value_ID ) = FND_API.G_TRUE)
2235: )
2236: then
2237: BIS_UTILITIES_PUB.put_line(p_text =>' Org level value id for prev tgt is: ' || l_Org_Level_Value_ID);
2230:
2231: /*
2232: if (
2233: (BIS_UTILITIES_PUB.Value_Not_Missing( l_Org_Level_Value_ID ) = FND_API.G_TRUE)
2234: and (BIS_UTILITIES_PUB.Value_Not_Null( l_Org_Level_Value_ID ) = FND_API.G_TRUE)
2235: )
2236: then
2237: BIS_UTILITIES_PUB.put_line(p_text =>' Org level value id for prev tgt is: ' || l_Org_Level_Value_ID);
2238: else
2233: (BIS_UTILITIES_PUB.Value_Not_Missing( l_Org_Level_Value_ID ) = FND_API.G_TRUE)
2234: and (BIS_UTILITIES_PUB.Value_Not_Null( l_Org_Level_Value_ID ) = FND_API.G_TRUE)
2235: )
2236: then
2237: BIS_UTILITIES_PUB.put_line(p_text =>' Org level value id for prev tgt is: ' || l_Org_Level_Value_ID);
2238: else
2239: BIS_UTILITIES_PUB.put_line(p_text =>' Org level value id is prev tgt null/missing ' );
2240: end if;
2241:
2235: )
2236: then
2237: BIS_UTILITIES_PUB.put_line(p_text =>' Org level value id for prev tgt is: ' || l_Org_Level_Value_ID);
2238: else
2239: BIS_UTILITIES_PUB.put_line(p_text =>' Org level value id is prev tgt null/missing ' );
2240: end if;
2241:
2242: if (
2243: (BIS_UTILITIES_PUB.Value_Not_Missing( l_Org_Short_Name ) = FND_API.G_TRUE)
2239: BIS_UTILITIES_PUB.put_line(p_text =>' Org level value id is prev tgt null/missing ' );
2240: end if;
2241:
2242: if (
2243: (BIS_UTILITIES_PUB.Value_Not_Missing( l_Org_Short_Name ) = FND_API.G_TRUE)
2244: and (BIS_UTILITIES_PUB.Value_Not_Null( l_Org_Short_Name ) = FND_API.G_TRUE)
2245: )
2246: then
2247: BIS_UTILITIES_PUB.put_line(p_text =>' Org short name is prev tgt: ' || l_Org_Short_Name );
2240: end if;
2241:
2242: if (
2243: (BIS_UTILITIES_PUB.Value_Not_Missing( l_Org_Short_Name ) = FND_API.G_TRUE)
2244: and (BIS_UTILITIES_PUB.Value_Not_Null( l_Org_Short_Name ) = FND_API.G_TRUE)
2245: )
2246: then
2247: BIS_UTILITIES_PUB.put_line(p_text =>' Org short name is prev tgt: ' || l_Org_Short_Name );
2248: else
2243: (BIS_UTILITIES_PUB.Value_Not_Missing( l_Org_Short_Name ) = FND_API.G_TRUE)
2244: and (BIS_UTILITIES_PUB.Value_Not_Null( l_Org_Short_Name ) = FND_API.G_TRUE)
2245: )
2246: then
2247: BIS_UTILITIES_PUB.put_line(p_text =>' Org short name is prev tgt: ' || l_Org_Short_Name );
2248: else
2249: BIS_UTILITIES_PUB.put_line(p_text =>' Org level short name is prev tgt null/missing ' );
2250: end if;
2251: */
2245: )
2246: then
2247: BIS_UTILITIES_PUB.put_line(p_text =>' Org short name is prev tgt: ' || l_Org_Short_Name );
2248: else
2249: BIS_UTILITIES_PUB.put_line(p_text =>' Org level short name is prev tgt null/missing ' );
2250: end if;
2251: */
2252:
2253:
2259: , x_return_status => x_return_status
2260: , x_error_Tbl => l_error_Tbl
2261: );
2262:
2263: -- BIS_UTILITIES_PUB.put_line(p_text =>' Time Level dimension sequence no : ' || l_dimension_level_number);
2264:
2265: IF BIS_DIM_LEVEL_VALUE_PVT.Is_Previous_Time_Period
2266: ( l_Dim_Level_Value_Rec
2267: , l_Org_Level_Value_ID
2268: , l_Org_Short_Name
2269: , l_time_id)
2270: THEN
2271: /*
2272: BIS_UTILITIES_PUB.put_line(p_text => ' This time level value is PREVIOUS time period ' ) ;
2273: BIS_UTILITIES_PUB.put_line(p_text =>'Retrieved previous period: '
2274: ||l_Dim_Level_Value_Rec.Dimension_Level_value_id );
2275: */
2276:
2269: , l_time_id)
2270: THEN
2271: /*
2272: BIS_UTILITIES_PUB.put_line(p_text => ' This time level value is PREVIOUS time period ' ) ;
2273: BIS_UTILITIES_PUB.put_line(p_text =>'Retrieved previous period: '
2274: ||l_Dim_Level_Value_Rec.Dimension_Level_value_id );
2275: */
2276:
2277: l_target_tbl(l_target_tbl.COUNT+1) := p_target_tbl(j);
2276:
2277: l_target_tbl(l_target_tbl.COUNT+1) := p_target_tbl(j);
2278: ELSIF (p_target_tbl(j).is_pm_region = BIS_TARGET_PUB.G_IS_PM_REGION) THEN -- see Get_Current_Target
2279:
2280: -- BIS_UTILITIES_PUB.put_line(p_text => ' BISVARSB: this time level value is NOT PREVIOUS time period ' ) ;
2281:
2282: if BIS_UTILITIES_PUB.Value_Missing(p_Target_tbl(j).target) = FND_API.G_TRUE
2283: or BIS_UTILITIES_PUB.Value_NULL(p_Target_tbl(j).target)= FND_API.G_TRUE
2284: then
2278: ELSIF (p_target_tbl(j).is_pm_region = BIS_TARGET_PUB.G_IS_PM_REGION) THEN -- see Get_Current_Target
2279:
2280: -- BIS_UTILITIES_PUB.put_line(p_text => ' BISVARSB: this time level value is NOT PREVIOUS time period ' ) ;
2281:
2282: if BIS_UTILITIES_PUB.Value_Missing(p_Target_tbl(j).target) = FND_API.G_TRUE
2283: or BIS_UTILITIES_PUB.Value_NULL(p_Target_tbl(j).target)= FND_API.G_TRUE
2284: then
2285: l_target_count := l_target_tbl.COUNT+1;
2286:
2279:
2280: -- BIS_UTILITIES_PUB.put_line(p_text => ' BISVARSB: this time level value is NOT PREVIOUS time period ' ) ;
2281:
2282: if BIS_UTILITIES_PUB.Value_Missing(p_Target_tbl(j).target) = FND_API.G_TRUE
2283: or BIS_UTILITIES_PUB.Value_NULL(p_Target_tbl(j).target)= FND_API.G_TRUE
2284: then
2285: l_target_count := l_target_tbl.COUNT+1;
2286:
2287: l_target_tbl(l_target_count) := p_target_tbl(j);
2308: l_target_tbl(l_target_count).Dim7_Level_Value_ID
2309: := l_time_id;
2310: end if;
2311:
2312: BIS_UTILITIES_PUB.put_line(p_text =>'Time Level Replaced with the Previous Level');
2313:
2314: -- else
2315: -- null;
2316: -- BIS_UTILITIES_PUB.put_line(p_text =>'Failed to retrieve previous period: ' ||l_Dim_Level_value_Rec.Dimension_Level_value_id);
2312: BIS_UTILITIES_PUB.put_line(p_text =>'Time Level Replaced with the Previous Level');
2313:
2314: -- else
2315: -- null;
2316: -- BIS_UTILITIES_PUB.put_line(p_text =>'Failed to retrieve previous period: ' ||l_Dim_Level_value_Rec.Dimension_Level_value_id);
2317: end if;
2318:
2319: END IF;
2320: END LOOP;
2323:
2324: EXCEPTION
2325: when others then
2326: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2327: BIS_UTILITIES_PUB.put_line(p_text =>'exception at Get_previous_Target: '||sqlerrm);
2328:
2329: END Get_Previous_Target;
2330:
2331:
2341:
2342: l_target_tbl BIS_TARGET_PUB.Target_Tbl_type;
2343: l_Dim_Level_Value_Rec BIS_DIM_LEVEL_VALUE_PUB.Dim_Level_Value_Rec_Type;
2344: l_dimension_level_number NUMBER;
2345: l_error_Tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
2346: l_time_id VARCHAR2(80);
2347: l_target_count NUMBER := 1;
2348: l_Org_Level_Value_ID VARCHAR2(40);-- := '204';
2349: l_Org_Short_Name VARCHAR2(80);
2352: BEGIN
2353:
2354: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2355: --l_target_tbl := x_target_tbl ;
2356: --BIS_UTILITIES_PUB.put_line(p_text =>'Retrieving current target.');
2357:
2358: FOR j in 1..p_Target_tbl.COUNT
2359: LOOP
2360:
2357:
2358: FOR j in 1..p_Target_tbl.COUNT
2359: LOOP
2360:
2361: BIS_UTILITIES_PUB.put_line(p_text =>' -------- Target # ' || j || ' ---------- ' );
2362:
2363: BIS_TARGET_PVT.Retrieve_Org_level_value
2364: ( p_api_version => 1.0
2365: , p_Target_Rec => p_Target_tbl(j)
2374: l_Org_Short_Name := l_Dim_Level_value_Rec.Dimension_Level_Short_Name;
2375:
2376: /*
2377: if (
2378: (BIS_UTILITIES_PUB.Value_Not_Missing( l_Org_Level_Value_ID ) = FND_API.G_TRUE)
2379: and (BIS_UTILITIES_PUB.Value_Not_Null( l_Org_Level_Value_ID ) = FND_API.G_TRUE)
2380: )
2381: then
2382: BIS_UTILITIES_PUB.put_line(p_text =>' Org level value id current target is: ' || l_Org_Level_Value_ID);
2375:
2376: /*
2377: if (
2378: (BIS_UTILITIES_PUB.Value_Not_Missing( l_Org_Level_Value_ID ) = FND_API.G_TRUE)
2379: and (BIS_UTILITIES_PUB.Value_Not_Null( l_Org_Level_Value_ID ) = FND_API.G_TRUE)
2380: )
2381: then
2382: BIS_UTILITIES_PUB.put_line(p_text =>' Org level value id current target is: ' || l_Org_Level_Value_ID);
2383: else
2378: (BIS_UTILITIES_PUB.Value_Not_Missing( l_Org_Level_Value_ID ) = FND_API.G_TRUE)
2379: and (BIS_UTILITIES_PUB.Value_Not_Null( l_Org_Level_Value_ID ) = FND_API.G_TRUE)
2380: )
2381: then
2382: BIS_UTILITIES_PUB.put_line(p_text =>' Org level value id current target is: ' || l_Org_Level_Value_ID);
2383: else
2384: BIS_UTILITIES_PUB.put_line(p_text =>' Org level value id is current target null/missing ' );
2385: end if;
2386:
2380: )
2381: then
2382: BIS_UTILITIES_PUB.put_line(p_text =>' Org level value id current target is: ' || l_Org_Level_Value_ID);
2383: else
2384: BIS_UTILITIES_PUB.put_line(p_text =>' Org level value id is current target null/missing ' );
2385: end if;
2386:
2387: if (
2388: (BIS_UTILITIES_PUB.Value_Not_Missing( l_Org_Short_Name ) = FND_API.G_TRUE)
2384: BIS_UTILITIES_PUB.put_line(p_text =>' Org level value id is current target null/missing ' );
2385: end if;
2386:
2387: if (
2388: (BIS_UTILITIES_PUB.Value_Not_Missing( l_Org_Short_Name ) = FND_API.G_TRUE)
2389: and (BIS_UTILITIES_PUB.Value_Not_Null( l_Org_Short_Name ) = FND_API.G_TRUE)
2390: )
2391: then
2392: BIS_UTILITIES_PUB.put_line(p_text =>' Org short name is current target : ' || l_Org_Short_Name );
2385: end if;
2386:
2387: if (
2388: (BIS_UTILITIES_PUB.Value_Not_Missing( l_Org_Short_Name ) = FND_API.G_TRUE)
2389: and (BIS_UTILITIES_PUB.Value_Not_Null( l_Org_Short_Name ) = FND_API.G_TRUE)
2390: )
2391: then
2392: BIS_UTILITIES_PUB.put_line(p_text =>' Org short name is current target : ' || l_Org_Short_Name );
2393: else
2388: (BIS_UTILITIES_PUB.Value_Not_Missing( l_Org_Short_Name ) = FND_API.G_TRUE)
2389: and (BIS_UTILITIES_PUB.Value_Not_Null( l_Org_Short_Name ) = FND_API.G_TRUE)
2390: )
2391: then
2392: BIS_UTILITIES_PUB.put_line(p_text =>' Org short name is current target : ' || l_Org_Short_Name );
2393: else
2394: BIS_UTILITIES_PUB.put_line(p_text =>' Org level short name is current target null/missing ' );
2395: end if;
2396: */
2390: )
2391: then
2392: BIS_UTILITIES_PUB.put_line(p_text =>' Org short name is current target : ' || l_Org_Short_Name );
2393: else
2394: BIS_UTILITIES_PUB.put_line(p_text =>' Org level short name is current target null/missing ' );
2395: end if;
2396: */
2397:
2398:
2403: , x_dimension_level_number => l_dimension_level_number
2404: , x_return_status => x_return_status
2405: , x_error_Tbl => l_error_Tbl
2406: );
2407: -- BIS_UTILITIES_PUB.put_line(p_text =>' Time Level value no : ' || l_dimension_level_number);
2408:
2409: IF BIS_DIM_LEVEL_VALUE_PVT.Is_Current_Time_Period
2410: ( l_Dim_Level_Value_Rec
2411: , l_Org_Level_Value_ID
2412: , l_Org_Short_Name
2413: , l_time_id)
2414: THEN
2415: /*
2416: BIS_UTILITIES_PUB.put_line(p_text => ' This time period is in current period ' ) ;
2417:
2418: BIS_UTILITIES_PUB.put_line(p_text =>'Retrieved current period: '
2419: ||l_Dim_Level_Value_Rec.Dimension_Level_value_id );
2420: */
2414: THEN
2415: /*
2416: BIS_UTILITIES_PUB.put_line(p_text => ' This time period is in current period ' ) ;
2417:
2418: BIS_UTILITIES_PUB.put_line(p_text =>'Retrieved current period: '
2419: ||l_Dim_Level_Value_Rec.Dimension_Level_value_id );
2420: */
2421:
2422: l_target_tbl(l_target_tbl.COUNT+1) := p_target_tbl(j);
2424: -- The condition below, with targets missing, to be used to identify pm region entries will not be satisfied
2425: -- for "set targets" anymore after change based alerting (bug# 3148615) since change does not have targets-only tolerance
2426: ELSIF (p_target_tbl(j).is_pm_region = BIS_TARGET_PUB.G_IS_PM_REGION) THEN
2427:
2428: -- BIS_UTILITIES_PUB.put_line(p_text => ' This time period is not in current period ' ) ;
2429:
2430: -- Following step is for the records retrieved
2431: -- from user_ind_selection table
2432:
2429:
2430: -- Following step is for the records retrieved
2431: -- from user_ind_selection table
2432:
2433: if BIS_UTILITIES_PUB.Value_Missing(p_Target_tbl(j).target) = FND_API.G_TRUE
2434: or BIS_UTILITIES_PUB.Value_NULL(p_Target_tbl(j).target)= FND_API.G_TRUE
2435: then
2436: l_target_count := l_target_tbl.COUNT+1;
2437:
2430: -- Following step is for the records retrieved
2431: -- from user_ind_selection table
2432:
2433: if BIS_UTILITIES_PUB.Value_Missing(p_Target_tbl(j).target) = FND_API.G_TRUE
2434: or BIS_UTILITIES_PUB.Value_NULL(p_Target_tbl(j).target)= FND_API.G_TRUE
2435: then
2436: l_target_count := l_target_tbl.COUNT+1;
2437:
2438: l_target_tbl(l_target_count) := p_target_tbl(j);
2459: l_target_tbl(l_target_count).Dim7_Level_Value_ID
2460: := l_time_id;
2461: end if;
2462:
2463: BIS_UTILITIES_PUB.put_line(p_text =>'Dim 6 Value ' || l_target_tbl(l_target_count).Dim6_Level_Value_ID);
2464:
2465: BIS_UTILITIES_PUB.put_line(p_text =>'Time Level Replaced with the Current Level');
2466:
2467: -- else
2461: end if;
2462:
2463: BIS_UTILITIES_PUB.put_line(p_text =>'Dim 6 Value ' || l_target_tbl(l_target_count).Dim6_Level_Value_ID);
2464:
2465: BIS_UTILITIES_PUB.put_line(p_text =>'Time Level Replaced with the Current Level');
2466:
2467: -- else
2468: -- null;
2469: -- BIS_UTILITIES_PUB.put_line(p_text =>'Failed to retrieve current period: ' ||l_Dim_Level_value_Rec.Dimension_Level_value_id);
2465: BIS_UTILITIES_PUB.put_line(p_text =>'Time Level Replaced with the Current Level');
2466:
2467: -- else
2468: -- null;
2469: -- BIS_UTILITIES_PUB.put_line(p_text =>'Failed to retrieve current period: ' ||l_Dim_Level_value_Rec.Dimension_Level_value_id);
2470: end if;
2471:
2472: END IF;
2473: END LOOP;
2476:
2477: EXCEPTION
2478: when others then
2479: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2480: BIS_UTILITIES_PUB.put_line(p_text =>'exception at Get_current_Target: '||sqlerrm);
2481:
2482: END Get_current_Target;
2483:
2484:
2494:
2495: l_target_tbl BIS_TARGET_PUB.Target_Tbl_type;
2496: l_Dim_Level_Value_Rec BIS_DIM_LEVEL_VALUE_PUB.Dim_Level_Value_Rec_Type;
2497: l_dimension_level_number NUMBER;
2498: l_error_Tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
2499: l_time_id VARCHAR2(80);
2500: l_target_count NUMBER := 1;
2501:
2502: BEGIN
2502: BEGIN
2503:
2504: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2505: --l_target_tbl := x_target_tbl ;
2506: BIS_UTILITIES_PUB.put_line(p_text =>'Total Record in ' || p_Target_tbl.count);
2507:
2508: FOR j in 1..p_Target_tbl.COUNT
2509: LOOP
2510:
2516: , x_return_status => x_return_status
2517: , x_error_Tbl => l_error_Tbl
2518: );
2519:
2520: BIS_UTILITIES_PUB.put_line(p_text =>'L Total Time Level value no : ' || l_dimension_level_number);
2521: if substr(l_Dim_Level_Value_Rec.Dimension_Level_short_name,1,3) = 'EDW' then
2522: l_time_id := 1;
2523: BIS_UTILITIES_PUB.put_line(p_text =>'EDW Total Time ');
2524: else
2519:
2520: BIS_UTILITIES_PUB.put_line(p_text =>'L Total Time Level value no : ' || l_dimension_level_number);
2521: if substr(l_Dim_Level_Value_Rec.Dimension_Level_short_name,1,3) = 'EDW' then
2522: l_time_id := 1;
2523: BIS_UTILITIES_PUB.put_line(p_text =>'EDW Total Time ');
2524: else
2525: l_time_id := -1;
2526: BIS_UTILITIES_PUB.put_line(p_text =>'OLTP Total Time ');
2527: end if;
2522: l_time_id := 1;
2523: BIS_UTILITIES_PUB.put_line(p_text =>'EDW Total Time ');
2524: else
2525: l_time_id := -1;
2526: BIS_UTILITIES_PUB.put_line(p_text =>'OLTP Total Time ');
2527: end if;
2528: -- Explained in Get_Current_Target() above.
2529: IF ( (p_Target_tbl(j).is_pm_region = BIS_TARGET_PUB.G_IS_PM_REGION) AND
2530: ((BIS_UTILITIES_PUB.Value_Missing(p_Target_tbl(j).target) = FND_API.G_TRUE) OR (BIS_UTILITIES_PUB.Value_NULL(p_Target_tbl(j).target)= FND_API.G_TRUE)) ) THEN
2526: BIS_UTILITIES_PUB.put_line(p_text =>'OLTP Total Time ');
2527: end if;
2528: -- Explained in Get_Current_Target() above.
2529: IF ( (p_Target_tbl(j).is_pm_region = BIS_TARGET_PUB.G_IS_PM_REGION) AND
2530: ((BIS_UTILITIES_PUB.Value_Missing(p_Target_tbl(j).target) = FND_API.G_TRUE) OR (BIS_UTILITIES_PUB.Value_NULL(p_Target_tbl(j).target)= FND_API.G_TRUE)) ) THEN
2531:
2532: l_target_count := l_target_tbl.COUNT+1;
2533:
2534: l_target_tbl(l_target_count) := p_target_tbl(j);
2555: l_target_tbl(l_target_count).Dim7_Level_Value_ID
2556: := l_time_id;
2557: end if;
2558:
2559: BIS_UTILITIES_PUB.put_line(p_text =>'Dim 6 Value ' || l_target_tbl(l_target_count).Dim6_Level_Value_ID);
2560: BIS_UTILITIES_PUB.put_line(p_text =>'Time Level Replaced with the Current Level');
2561:
2562: ELSE
2563: l_target_count := l_target_tbl.COUNT+1;
2556: := l_time_id;
2557: end if;
2558:
2559: BIS_UTILITIES_PUB.put_line(p_text =>'Dim 6 Value ' || l_target_tbl(l_target_count).Dim6_Level_Value_ID);
2560: BIS_UTILITIES_PUB.put_line(p_text =>'Time Level Replaced with the Current Level');
2561:
2562: ELSE
2563: l_target_count := l_target_tbl.COUNT+1;
2564: l_target_tbl(l_target_count) := p_target_tbl(j);
2567: END LOOP;
2568:
2569: x_target_tbl := l_target_tbl ;
2570:
2571: BIS_UTILITIES_PUB.put_line(p_text =>'Total Record out NOCOPY ' || x_Target_tbl.count);
2572:
2573: EXCEPTION
2574: when others then
2575: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2572:
2573: EXCEPTION
2574: when others then
2575: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2576: BIS_UTILITIES_PUB.put_line(p_text =>'exception at Get_current_Target: '||sqlerrm);
2577:
2578: END update_total_time;
2579:
2580: --
2661: l_request_desc varchar2(32000);
2662: l_measure_rec BIS_MEASURE_PUB.measure_rec_type;
2663: l_dimension_level_rec BIS_DIMENSION_LEVEL_PUB.Dimension_Level_Rec_Type;
2664: l_return_status VARCHAR2(1000);
2665: l_error_Tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
2666: l_api_version NUMBER := 1;
2667: l_Concurrent_Request_rec BIS_CONCURRENT_MANAGER_PVT.PMF_Request_rec_Type;
2668: ERRBUF VARCHAR2(32000);
2669: RETCODE VARCHAR2(32000);
2666: l_api_version NUMBER := 1;
2667: l_Concurrent_Request_rec BIS_CONCURRENT_MANAGER_PVT.PMF_Request_rec_Type;
2668: ERRBUF VARCHAR2(32000);
2669: RETCODE VARCHAR2(32000);
2670: l_error_Tbl_p BIS_UTILITIES_PUB.Error_Tbl_Type;
2671: l_measure_rec_p BIS_MEASURE_PUB.measure_rec_type;
2672: l_dimension_level_rec_p BIS_DIMENSION_LEVEL_PUB.Dimension_Level_Rec_Type;
2673:
2674: begin
2672: l_dimension_level_rec_p BIS_DIMENSION_LEVEL_PUB.Dimension_Level_Rec_Type;
2673:
2674: begin
2675:
2676: BIS_UTILITIES_PUB.put_line(p_text =>'Submitting detailed concurrent request');
2677: BIS_UTILITIES_PUB.put_line(p_text =>'alert type: '||p_alert_type);
2678: l_debug_text := p_request_id||l_request_id;
2679:
2680: l_measure_rec.measure_id := p_performance_measure_id;
2673:
2674: begin
2675:
2676: BIS_UTILITIES_PUB.put_line(p_text =>'Submitting detailed concurrent request');
2677: BIS_UTILITIES_PUB.put_line(p_text =>'alert type: '||p_alert_type);
2678: l_debug_text := p_request_id||l_request_id;
2679:
2680: l_measure_rec.measure_id := p_performance_measure_id;
2681: l_measure_rec_p := l_measure_rec;
2724: , P_end_time => p_EndTime
2725: , x_result => l_repeat_result
2726: );
2727: commit;
2728: BIS_UTILITIES_PUB.put_line(p_text =>'Setting repeat result: '||l_repeat_result);
2729: l_debug_text:= l_debug_text||' Setting repeat result: '||l_repeat_result;
2730:
2731: l_request_desc
2732: := BIS_UTILITIES_PVT.Get_FND_Message
2748: , p_alert_based_on => p_alert_based_on
2749: , x_Concurrent_Request_rec => l_Concurrent_Request_rec
2750: );
2751:
2752: BIS_UTILITIES_PUB.put_line(p_text =>'Submit concurrent requests for Detail Alert Service');
2753: --
2754: BIS_CONCURRENT_MANAGER_PVT.Submit_Concurrent_Request
2755: ( p_Concurrent_Request_rec => l_Concurrent_Request_rec
2756: , x_request_id => l_request_id
2771: , p_msg_param1_val => l_request_id
2772: );
2773: END IF;
2774:
2775: BIS_UTILITIES_PUB.put_line(p_text =>'Submission result: '||l_submit_result);
2776: --p_request_id := l_submit_result||'--submit_conc_request debug--'
2777: --||l_request_id ||' -- debug -- '||l_debug_text;
2778:
2779: p_request_id := l_submit_result;
2826: l_user_name VARCHAR2(32000);
2827: l_measure_rec BIS_MEASURE_PUB.measure_rec_type;
2828: l_dimension_level_rec BIS_DIMENSION_LEVEL_PUB.Dimension_Level_Rec_Type;
2829: l_return_status VARCHAR2(1000);
2830: l_error_Tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
2831: l_api_version NUMBER := 1;
2832:
2833: BEGIN
2834:
2831: l_api_version NUMBER := 1;
2832:
2833: BEGIN
2834:
2835: BIS_UTILITIES_PUB.put_line(p_text =>'submitting report data concurrent request');
2836:
2837: EXCEPTION
2838: when FND_API.G_EXC_ERROR then
2839: BIS_UTILITIES_PUB.put_line(p_text =>'exception 1 in submit_Concurrent_Request');
2835: BIS_UTILITIES_PUB.put_line(p_text =>'submitting report data concurrent request');
2836:
2837: EXCEPTION
2838: when FND_API.G_EXC_ERROR then
2839: BIS_UTILITIES_PUB.put_line(p_text =>'exception 1 in submit_Concurrent_Request');
2840: when FND_API.G_EXC_UNEXPECTED_ERROR then
2841: BIS_UTILITIES_PUB.put_line(p_text =>'exception 2 in submit_Concurrent_Request');
2842: when others then
2843: BIS_UTILITIES_PUB.put_line(p_text =>'exception 3 submit_Concurrent_Request: '||sqlerrm);
2837: EXCEPTION
2838: when FND_API.G_EXC_ERROR then
2839: BIS_UTILITIES_PUB.put_line(p_text =>'exception 1 in submit_Concurrent_Request');
2840: when FND_API.G_EXC_UNEXPECTED_ERROR then
2841: BIS_UTILITIES_PUB.put_line(p_text =>'exception 2 in submit_Concurrent_Request');
2842: when others then
2843: BIS_UTILITIES_PUB.put_line(p_text =>'exception 3 submit_Concurrent_Request: '||sqlerrm);
2844:
2845: END submit_Concurrent_Request;
2839: BIS_UTILITIES_PUB.put_line(p_text =>'exception 1 in submit_Concurrent_Request');
2840: when FND_API.G_EXC_UNEXPECTED_ERROR then
2841: BIS_UTILITIES_PUB.put_line(p_text =>'exception 2 in submit_Concurrent_Request');
2842: when others then
2843: BIS_UTILITIES_PUB.put_line(p_text =>'exception 3 submit_Concurrent_Request: '||sqlerrm);
2844:
2845: END submit_Concurrent_Request;
2846:
2847: PROCEDURE Retrieve_Report_Info
2865: , p_viewby_level_id IN varchar2 default null
2866: , x_target_level_tbl OUT NOCOPY BIS_TARGET_LEVEL_PUB.Target_Level_Tbl_type
2867: , x_target_tbl OUT NOCOPY BIS_TARGET_PUB.Target_Tbl_type
2868: , x_return_status OUT NOCOPY VARCHAR2
2869: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
2870: )
2871: IS
2872:
2873: l_Measure_Rec BIS_MEASURE_PUB.Measure_Rec_Type;
2877: l_target_tbl BIS_TARGET_PUB.Target_Tbl_type;
2878: l_target_rec BIS_TARGET_PUB.Target_rec_type;
2879: l_target_tbl_tmp BIS_TARGET_PUB.Target_Tbl_type;
2880: l_return_status VARCHAR2(32000);
2881: l_error_Tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
2882: l_param_set_tbl BIS_PMF_ALERT_REG_PUB.parameter_set_tbl_type;
2883:
2884: BEGIN
2885:
2882: l_param_set_tbl BIS_PMF_ALERT_REG_PUB.parameter_set_tbl_type;
2883:
2884: BEGIN
2885:
2886: BIS_UTILITIES_PUB.put_line(p_text =>'retrieving report info');
2887:
2888: l_Measure_Rec.Measure_id := p_measure_id;
2889:
2890: BIS_TARGET_LEVEL_PVT.Retrieve_Target_Levels
2894: , x_Target_Level_tbl => l_Target_Level_tbl_tmp
2895: , x_return_status => l_return_status
2896: , x_error_Tbl => l_error_Tbl
2897: );
2898: BIS_UTILITIES_PUB.put_line(p_text =>'Number of target levels retrieved TOTAL: '
2899: ||l_Target_Level_tbl_tmp.COUNT );
2900:
2901: -- Get all target levels with these dimension levels
2902: -- and this viewBy level
2901: -- Get all target levels with these dimension levels
2902: -- and this viewBy level
2903: --
2904: FOR i in 1..l_Target_Level_tbl_tmp.COUNT LOOP
2905: BIS_UTILITIES_PUB.put_line(p_text =>' l_Target_Level_tbl_TMP! target_level id: '
2906: ||l_Target_Level_tbl_tmp(i).Target_level_id);
2907: Verify_Target_Level
2908: ( p_Target_Level_rec => l_Target_Level_tbl_tmp(i)
2909: , p_parameter1_level => p_parameter1_level
2916: , p_viewby_level_id => p_viewby_level_id
2917: , x_Target_Level_rec => l_Target_Level_rec
2918: );
2919:
2920: IF BIS_UTILITIES_PUB.Value_NOT_Missing(l_Target_Level_rec.Target_Level_ID)
2921: = FND_API.G_TRUE
2922: AND BIS_UTILITIES_PUB.Value_NOT_Null(l_Target_Level_rec.Target_Level_ID)
2923: = FND_API.G_TRUE
2924: THEN
2918: );
2919:
2920: IF BIS_UTILITIES_PUB.Value_NOT_Missing(l_Target_Level_rec.Target_Level_ID)
2921: = FND_API.G_TRUE
2922: AND BIS_UTILITIES_PUB.Value_NOT_Null(l_Target_Level_rec.Target_Level_ID)
2923: = FND_API.G_TRUE
2924: THEN
2925: l_Target_Level_tbl(l_Target_Level_tbl.COUNT+1) := l_Target_Level_rec;
2926: BIS_UTILITIES_PUB.put_line(p_text =>'Verified target level: '
2922: AND BIS_UTILITIES_PUB.Value_NOT_Null(l_Target_Level_rec.Target_Level_ID)
2923: = FND_API.G_TRUE
2924: THEN
2925: l_Target_Level_tbl(l_Target_Level_tbl.COUNT+1) := l_Target_Level_rec;
2926: BIS_UTILITIES_PUB.put_line(p_text =>'Verified target level: '
2927: ||l_Target_Level_tbl(l_Target_Level_tbl.COUNT).Target_level_id);
2928: END IF;
2929:
2930: END LOOP;
2927: ||l_Target_Level_tbl(l_Target_Level_tbl.COUNT).Target_level_id);
2928: END IF;
2929:
2930: END LOOP;
2931: BIS_UTILITIES_PUB.put_line(p_text =>'Number of target levels retrieved for Report INFO: '
2932: ||l_Target_Level_tbl.COUNT );
2933:
2934: -- Get all targets, then filter out NOCOPY only targets with passed in
2935: -- dimension level values
2935: -- dimension level values
2936: --
2937: FOR i in 1..l_Target_Level_tbl.COUNT LOOP
2938:
2939: BIS_UTILITIES_PUB.put_line(p_text =>'Getting targets for target level: '
2940: ||l_target_level_tbl(i).target_level_id);
2941:
2942: Retrieve_target_info
2943: ( p_api_version => 1.0
2947: , x_target_tbl => l_target_tbl_tmp
2948: , x_return_status => l_return_status
2949: , x_error_Tbl => l_error_Tbl
2950: );
2951: BIS_UTILITIES_PUB.put_line(p_text =>'Number of Target retrieved TOTAL: '||l_Target_tbl_tmp.COUNT );
2952:
2953: FOR j in 1..l_Target_tbl_tmp.COUNT LOOP
2954: BIS_UTILITIES_PUB.put_line(p_text =>'target for target level: '||l_Target_tbl_tmp(j).target_level_id);
2955: Verify_Target
2950: );
2951: BIS_UTILITIES_PUB.put_line(p_text =>'Number of Target retrieved TOTAL: '||l_Target_tbl_tmp.COUNT );
2952:
2953: FOR j in 1..l_Target_tbl_tmp.COUNT LOOP
2954: BIS_UTILITIES_PUB.put_line(p_text =>'target for target level: '||l_Target_tbl_tmp(j).target_level_id);
2955: Verify_Target
2956: ( p_Target_rec => l_Target_tbl_tmp(j)
2957: , p_parameter1_Value => p_parameter1_Value
2958: , p_parameter2_Value => p_parameter2_Value
2962: , p_parameter6_Value => p_parameter6_Value
2963: , p_parameter7_Value => p_parameter7_Value
2964: , x_Target_rec => l_Target_rec
2965: );
2966: BIS_UTILITIES_PUB.put_line(p_text =>'AFTER Verify: '||l_Target_rec.Target_level_id);
2967:
2968: IF BIS_UTILITIES_PUB.Value_NOT_Missing(l_Target_rec.Target_Level_ID)
2969: = FND_API.G_TRUE
2970: AND BIS_UTILITIES_PUB.Value_NOT_Null(l_Target_rec.Target_Level_ID)
2964: , x_Target_rec => l_Target_rec
2965: );
2966: BIS_UTILITIES_PUB.put_line(p_text =>'AFTER Verify: '||l_Target_rec.Target_level_id);
2967:
2968: IF BIS_UTILITIES_PUB.Value_NOT_Missing(l_Target_rec.Target_Level_ID)
2969: = FND_API.G_TRUE
2970: AND BIS_UTILITIES_PUB.Value_NOT_Null(l_Target_rec.Target_Level_ID)
2971: = FND_API.G_TRUE
2972: THEN
2966: BIS_UTILITIES_PUB.put_line(p_text =>'AFTER Verify: '||l_Target_rec.Target_level_id);
2967:
2968: IF BIS_UTILITIES_PUB.Value_NOT_Missing(l_Target_rec.Target_Level_ID)
2969: = FND_API.G_TRUE
2970: AND BIS_UTILITIES_PUB.Value_NOT_Null(l_Target_rec.Target_Level_ID)
2971: = FND_API.G_TRUE
2972: THEN
2973: l_Target_tbl(l_Target_tbl.COUNT+1) := l_Target_rec;
2974: BIS_UTILITIES_PUB.put_line(p_text =>'Verified target: '
2970: AND BIS_UTILITIES_PUB.Value_NOT_Null(l_Target_rec.Target_Level_ID)
2971: = FND_API.G_TRUE
2972: THEN
2973: l_Target_tbl(l_Target_tbl.COUNT+1) := l_Target_rec;
2974: BIS_UTILITIES_PUB.put_line(p_text =>'Verified target: '
2975: ||l_Target_tbl(l_Target_tbl.COUNT).Target_level_id);
2976: END IF;
2977:
2978: END LOOP;
2977:
2978: END LOOP;
2979: l_target_tbl_tmp.delete;
2980:
2981: BIS_UTILITIES_PUB.put_line(p_text =>'Number of targets retrieved for Report INFO: '||l_Target_tbl.COUNT);
2982:
2983: END LOOP;
2984:
2985: x_target_level_tbl := l_target_level_tbl;
2986: x_target_tbl := l_target_tbl;
2987:
2988: EXCEPTION
2989: when FND_API.G_EXC_ERROR then
2990: BIS_UTILITIES_PUB.put_line(p_text =>'exception 1 in Retrieve_Report_Info');
2991: when FND_API.G_EXC_UNEXPECTED_ERROR then
2992: BIS_UTILITIES_PUB.put_line(p_text =>'exception 2 in Retrieve_Report_Info');
2993: when others then
2994: BIS_UTILITIES_PUB.put_line(p_text =>'exception 3 in Retrieve_Report_Info: '||sqlerrm);
2988: EXCEPTION
2989: when FND_API.G_EXC_ERROR then
2990: BIS_UTILITIES_PUB.put_line(p_text =>'exception 1 in Retrieve_Report_Info');
2991: when FND_API.G_EXC_UNEXPECTED_ERROR then
2992: BIS_UTILITIES_PUB.put_line(p_text =>'exception 2 in Retrieve_Report_Info');
2993: when others then
2994: BIS_UTILITIES_PUB.put_line(p_text =>'exception 3 in Retrieve_Report_Info: '||sqlerrm);
2995:
2996: END Retrieve_Report_Info;
2990: BIS_UTILITIES_PUB.put_line(p_text =>'exception 1 in Retrieve_Report_Info');
2991: when FND_API.G_EXC_UNEXPECTED_ERROR then
2992: BIS_UTILITIES_PUB.put_line(p_text =>'exception 2 in Retrieve_Report_Info');
2993: when others then
2994: BIS_UTILITIES_PUB.put_line(p_text =>'exception 3 in Retrieve_Report_Info: '||sqlerrm);
2995:
2996: END Retrieve_Report_Info;
2997:
2998: Procedure Set_Notify_Owners
3009: END IF;
3010:
3011: EXCEPTION
3012: WHEN OTHERS THEN
3013: BIS_UTILITIES_PUB.put_line(p_text =>'exception in Set_Notify_Owners: '||sqlerrm);
3014:
3015: END Set_Notify_Owners;
3016:
3017: Procedure Form_Concurrent_Request
3033:
3034: BEGIN
3035:
3036: l_Concurrent_Request_rec := x_Concurrent_Request_rec;
3037: BIS_UTILITIES_PUB.put_line(p_text =>'Forming concurrent request');
3038:
3039: l_Concurrent_Request_rec.application_short_name
3040: := BIS_UTILITIES_PVT.G_BIS_APPLICATION_SHORT_NAME;
3041: l_Concurrent_Request_rec.program
3089: l_Concurrent_Request_rec.argument42 := p_current_row;
3090: l_Concurrent_Request_rec.argument43 := p_alert_based_on;
3091:
3092: x_Concurrent_Request_rec := l_Concurrent_Request_rec;
3093: BIS_UTILITIES_PUB.put_line(p_text =>'Request successfully formed.');
3094:
3095: EXCEPTION
3096: when FND_API.G_EXC_ERROR then
3097: BIS_UTILITIES_PUB.put_line(p_text =>'form conc req 1');
3093: BIS_UTILITIES_PUB.put_line(p_text =>'Request successfully formed.');
3094:
3095: EXCEPTION
3096: when FND_API.G_EXC_ERROR then
3097: BIS_UTILITIES_PUB.put_line(p_text =>'form conc req 1');
3098: when FND_API.G_EXC_UNEXPECTED_ERROR then
3099: BIS_UTILITIES_PUB.put_line(p_text =>'form conc req 2');
3100: when others then
3101: BIS_UTILITIES_PUB.put_line(p_text =>'form conc req 3: '||SQLERRM);
3095: EXCEPTION
3096: when FND_API.G_EXC_ERROR then
3097: BIS_UTILITIES_PUB.put_line(p_text =>'form conc req 1');
3098: when FND_API.G_EXC_UNEXPECTED_ERROR then
3099: BIS_UTILITIES_PUB.put_line(p_text =>'form conc req 2');
3100: when others then
3101: BIS_UTILITIES_PUB.put_line(p_text =>'form conc req 3: '||SQLERRM);
3102: BIS_UTILITIES_PVT.Add_Error_Message
3103: ( p_error_msg_id => SQLCODE
3097: BIS_UTILITIES_PUB.put_line(p_text =>'form conc req 1');
3098: when FND_API.G_EXC_UNEXPECTED_ERROR then
3099: BIS_UTILITIES_PUB.put_line(p_text =>'form conc req 2');
3100: when others then
3101: BIS_UTILITIES_PUB.put_line(p_text =>'form conc req 3: '||SQLERRM);
3102: BIS_UTILITIES_PVT.Add_Error_Message
3103: ( p_error_msg_id => SQLCODE
3104: , p_error_description => SQLERRM
3105: , p_error_proc_name => G_PKG_NAME||'.Form_Concurrent_Request'
3126:
3127: BEGIN
3128:
3129: l_param_set_tbl_all := p_param_set_tbl_orig;
3130: BIS_UTILITIES_PUB.put_line(p_text =>'Comparing new requests');
3131: IF p_param_set_tbl_orig.COUNT = 0 THEN
3132: BIS_UTILITIES_PUB.put_line(p_text =>'No original requests. All new requests.');
3133: x_param_set_tbl_diff := p_param_set_tbl_new;
3134: x_param_set_tbl_all := p_param_set_tbl_new;
3128:
3129: l_param_set_tbl_all := p_param_set_tbl_orig;
3130: BIS_UTILITIES_PUB.put_line(p_text =>'Comparing new requests');
3131: IF p_param_set_tbl_orig.COUNT = 0 THEN
3132: BIS_UTILITIES_PUB.put_line(p_text =>'No original requests. All new requests.');
3133: x_param_set_tbl_diff := p_param_set_tbl_new;
3134: x_param_set_tbl_all := p_param_set_tbl_new;
3135: RETURN;
3136: END IF;
3134: x_param_set_tbl_all := p_param_set_tbl_new;
3135: RETURN;
3136: END IF;
3137:
3138: BIS_UTILITIES_PUB.put_line(p_text =>'p_param_set_tbl_new.COUNT: '||p_param_set_tbl_new.COUNT);
3139: BIS_UTILITIES_PUB.put_line(p_text =>'p_param_set_tbl_orig.COUNT: '||p_param_set_tbl_orig.COUNT);
3140:
3141: FOR j IN 1..p_param_set_tbl_new.COUNT LOOP
3142: /*
3135: RETURN;
3136: END IF;
3137:
3138: BIS_UTILITIES_PUB.put_line(p_text =>'p_param_set_tbl_new.COUNT: '||p_param_set_tbl_new.COUNT);
3139: BIS_UTILITIES_PUB.put_line(p_text =>'p_param_set_tbl_orig.COUNT: '||p_param_set_tbl_orig.COUNT);
3140:
3141: FOR j IN 1..p_param_set_tbl_new.COUNT LOOP
3142: /*
3143: BIS_UTILITIES_PUB.put_line(p_text =>'compare_param_sets outer loop: '||j);
3139: BIS_UTILITIES_PUB.put_line(p_text =>'p_param_set_tbl_orig.COUNT: '||p_param_set_tbl_orig.COUNT);
3140:
3141: FOR j IN 1..p_param_set_tbl_new.COUNT LOOP
3142: /*
3143: BIS_UTILITIES_PUB.put_line(p_text =>'compare_param_sets outer loop: '||j);
3144: BIS_UTILITIES_PUB.put_line(p_text =>'pm id: '||p_param_set_tbl_new(j).performance_measure_id );
3145: BIS_UTILITIES_PUB.put_line(p_text =>'tl id: '||p_param_set_tbl_new(j).target_level_id );
3146: BIS_UTILITIES_PUB.put_line(p_text =>'time id: '||p_param_set_tbl_new(j).time_dimension_level_id);
3147: BIS_UTILITIES_PUB.put_line(p_text =>'param 1 id: '||p_param_set_tbl_new(j).parameter1_value );
3140:
3141: FOR j IN 1..p_param_set_tbl_new.COUNT LOOP
3142: /*
3143: BIS_UTILITIES_PUB.put_line(p_text =>'compare_param_sets outer loop: '||j);
3144: BIS_UTILITIES_PUB.put_line(p_text =>'pm id: '||p_param_set_tbl_new(j).performance_measure_id );
3145: BIS_UTILITIES_PUB.put_line(p_text =>'tl id: '||p_param_set_tbl_new(j).target_level_id );
3146: BIS_UTILITIES_PUB.put_line(p_text =>'time id: '||p_param_set_tbl_new(j).time_dimension_level_id);
3147: BIS_UTILITIES_PUB.put_line(p_text =>'param 1 id: '||p_param_set_tbl_new(j).parameter1_value );
3148: BIS_UTILITIES_PUB.put_line(p_text =>'param 2 id: '||p_param_set_tbl_new(j).parameter2_value );
3141: FOR j IN 1..p_param_set_tbl_new.COUNT LOOP
3142: /*
3143: BIS_UTILITIES_PUB.put_line(p_text =>'compare_param_sets outer loop: '||j);
3144: BIS_UTILITIES_PUB.put_line(p_text =>'pm id: '||p_param_set_tbl_new(j).performance_measure_id );
3145: BIS_UTILITIES_PUB.put_line(p_text =>'tl id: '||p_param_set_tbl_new(j).target_level_id );
3146: BIS_UTILITIES_PUB.put_line(p_text =>'time id: '||p_param_set_tbl_new(j).time_dimension_level_id);
3147: BIS_UTILITIES_PUB.put_line(p_text =>'param 1 id: '||p_param_set_tbl_new(j).parameter1_value );
3148: BIS_UTILITIES_PUB.put_line(p_text =>'param 2 id: '||p_param_set_tbl_new(j).parameter2_value );
3149: BIS_UTILITIES_PUB.put_line(p_text =>'param 3 id: '||p_param_set_tbl_new(j).parameter3_value );
3142: /*
3143: BIS_UTILITIES_PUB.put_line(p_text =>'compare_param_sets outer loop: '||j);
3144: BIS_UTILITIES_PUB.put_line(p_text =>'pm id: '||p_param_set_tbl_new(j).performance_measure_id );
3145: BIS_UTILITIES_PUB.put_line(p_text =>'tl id: '||p_param_set_tbl_new(j).target_level_id );
3146: BIS_UTILITIES_PUB.put_line(p_text =>'time id: '||p_param_set_tbl_new(j).time_dimension_level_id);
3147: BIS_UTILITIES_PUB.put_line(p_text =>'param 1 id: '||p_param_set_tbl_new(j).parameter1_value );
3148: BIS_UTILITIES_PUB.put_line(p_text =>'param 2 id: '||p_param_set_tbl_new(j).parameter2_value );
3149: BIS_UTILITIES_PUB.put_line(p_text =>'param 3 id: '||p_param_set_tbl_new(j).parameter3_value );
3150: BIS_UTILITIES_PUB.put_line(p_text =>'param 4 id: '||p_param_set_tbl_new(j).parameter4_value );
3143: BIS_UTILITIES_PUB.put_line(p_text =>'compare_param_sets outer loop: '||j);
3144: BIS_UTILITIES_PUB.put_line(p_text =>'pm id: '||p_param_set_tbl_new(j).performance_measure_id );
3145: BIS_UTILITIES_PUB.put_line(p_text =>'tl id: '||p_param_set_tbl_new(j).target_level_id );
3146: BIS_UTILITIES_PUB.put_line(p_text =>'time id: '||p_param_set_tbl_new(j).time_dimension_level_id);
3147: BIS_UTILITIES_PUB.put_line(p_text =>'param 1 id: '||p_param_set_tbl_new(j).parameter1_value );
3148: BIS_UTILITIES_PUB.put_line(p_text =>'param 2 id: '||p_param_set_tbl_new(j).parameter2_value );
3149: BIS_UTILITIES_PUB.put_line(p_text =>'param 3 id: '||p_param_set_tbl_new(j).parameter3_value );
3150: BIS_UTILITIES_PUB.put_line(p_text =>'param 4 id: '||p_param_set_tbl_new(j).parameter4_value );
3151: BIS_UTILITIES_PUB.put_line(p_text =>'param 5 id: '||p_param_set_tbl_new(j).parameter5_value );
3144: BIS_UTILITIES_PUB.put_line(p_text =>'pm id: '||p_param_set_tbl_new(j).performance_measure_id );
3145: BIS_UTILITIES_PUB.put_line(p_text =>'tl id: '||p_param_set_tbl_new(j).target_level_id );
3146: BIS_UTILITIES_PUB.put_line(p_text =>'time id: '||p_param_set_tbl_new(j).time_dimension_level_id);
3147: BIS_UTILITIES_PUB.put_line(p_text =>'param 1 id: '||p_param_set_tbl_new(j).parameter1_value );
3148: BIS_UTILITIES_PUB.put_line(p_text =>'param 2 id: '||p_param_set_tbl_new(j).parameter2_value );
3149: BIS_UTILITIES_PUB.put_line(p_text =>'param 3 id: '||p_param_set_tbl_new(j).parameter3_value );
3150: BIS_UTILITIES_PUB.put_line(p_text =>'param 4 id: '||p_param_set_tbl_new(j).parameter4_value );
3151: BIS_UTILITIES_PUB.put_line(p_text =>'param 5 id: '||p_param_set_tbl_new(j).parameter5_value );
3152: BIS_UTILITIES_PUB.put_line(p_text =>'param 6 id: '||p_param_set_tbl_new(j).parameter6_value );
3145: BIS_UTILITIES_PUB.put_line(p_text =>'tl id: '||p_param_set_tbl_new(j).target_level_id );
3146: BIS_UTILITIES_PUB.put_line(p_text =>'time id: '||p_param_set_tbl_new(j).time_dimension_level_id);
3147: BIS_UTILITIES_PUB.put_line(p_text =>'param 1 id: '||p_param_set_tbl_new(j).parameter1_value );
3148: BIS_UTILITIES_PUB.put_line(p_text =>'param 2 id: '||p_param_set_tbl_new(j).parameter2_value );
3149: BIS_UTILITIES_PUB.put_line(p_text =>'param 3 id: '||p_param_set_tbl_new(j).parameter3_value );
3150: BIS_UTILITIES_PUB.put_line(p_text =>'param 4 id: '||p_param_set_tbl_new(j).parameter4_value );
3151: BIS_UTILITIES_PUB.put_line(p_text =>'param 5 id: '||p_param_set_tbl_new(j).parameter5_value );
3152: BIS_UTILITIES_PUB.put_line(p_text =>'param 6 id: '||p_param_set_tbl_new(j).parameter6_value );
3153: BIS_UTILITIES_PUB.put_line(p_text =>'param 7 id: '||p_param_set_tbl_new(j).parameter7_value );
3146: BIS_UTILITIES_PUB.put_line(p_text =>'time id: '||p_param_set_tbl_new(j).time_dimension_level_id);
3147: BIS_UTILITIES_PUB.put_line(p_text =>'param 1 id: '||p_param_set_tbl_new(j).parameter1_value );
3148: BIS_UTILITIES_PUB.put_line(p_text =>'param 2 id: '||p_param_set_tbl_new(j).parameter2_value );
3149: BIS_UTILITIES_PUB.put_line(p_text =>'param 3 id: '||p_param_set_tbl_new(j).parameter3_value );
3150: BIS_UTILITIES_PUB.put_line(p_text =>'param 4 id: '||p_param_set_tbl_new(j).parameter4_value );
3151: BIS_UTILITIES_PUB.put_line(p_text =>'param 5 id: '||p_param_set_tbl_new(j).parameter5_value );
3152: BIS_UTILITIES_PUB.put_line(p_text =>'param 6 id: '||p_param_set_tbl_new(j).parameter6_value );
3153: BIS_UTILITIES_PUB.put_line(p_text =>'param 7 id: '||p_param_set_tbl_new(j).parameter7_value );
3154: */
3147: BIS_UTILITIES_PUB.put_line(p_text =>'param 1 id: '||p_param_set_tbl_new(j).parameter1_value );
3148: BIS_UTILITIES_PUB.put_line(p_text =>'param 2 id: '||p_param_set_tbl_new(j).parameter2_value );
3149: BIS_UTILITIES_PUB.put_line(p_text =>'param 3 id: '||p_param_set_tbl_new(j).parameter3_value );
3150: BIS_UTILITIES_PUB.put_line(p_text =>'param 4 id: '||p_param_set_tbl_new(j).parameter4_value );
3151: BIS_UTILITIES_PUB.put_line(p_text =>'param 5 id: '||p_param_set_tbl_new(j).parameter5_value );
3152: BIS_UTILITIES_PUB.put_line(p_text =>'param 6 id: '||p_param_set_tbl_new(j).parameter6_value );
3153: BIS_UTILITIES_PUB.put_line(p_text =>'param 7 id: '||p_param_set_tbl_new(j).parameter7_value );
3154: */
3155:
3148: BIS_UTILITIES_PUB.put_line(p_text =>'param 2 id: '||p_param_set_tbl_new(j).parameter2_value );
3149: BIS_UTILITIES_PUB.put_line(p_text =>'param 3 id: '||p_param_set_tbl_new(j).parameter3_value );
3150: BIS_UTILITIES_PUB.put_line(p_text =>'param 4 id: '||p_param_set_tbl_new(j).parameter4_value );
3151: BIS_UTILITIES_PUB.put_line(p_text =>'param 5 id: '||p_param_set_tbl_new(j).parameter5_value );
3152: BIS_UTILITIES_PUB.put_line(p_text =>'param 6 id: '||p_param_set_tbl_new(j).parameter6_value );
3153: BIS_UTILITIES_PUB.put_line(p_text =>'param 7 id: '||p_param_set_tbl_new(j).parameter7_value );
3154: */
3155:
3156: FOR i IN 1..p_param_set_tbl_orig.COUNT LOOP
3149: BIS_UTILITIES_PUB.put_line(p_text =>'param 3 id: '||p_param_set_tbl_new(j).parameter3_value );
3150: BIS_UTILITIES_PUB.put_line(p_text =>'param 4 id: '||p_param_set_tbl_new(j).parameter4_value );
3151: BIS_UTILITIES_PUB.put_line(p_text =>'param 5 id: '||p_param_set_tbl_new(j).parameter5_value );
3152: BIS_UTILITIES_PUB.put_line(p_text =>'param 6 id: '||p_param_set_tbl_new(j).parameter6_value );
3153: BIS_UTILITIES_PUB.put_line(p_text =>'param 7 id: '||p_param_set_tbl_new(j).parameter7_value );
3154: */
3155:
3156: FOR i IN 1..p_param_set_tbl_orig.COUNT LOOP
3157: /*
3154: */
3155:
3156: FOR i IN 1..p_param_set_tbl_orig.COUNT LOOP
3157: /*
3158: BIS_UTILITIES_PUB.put_line(p_text =>'compare_param_sets Inner loop: '||i);
3159: BIS_UTILITIES_PUB.put_line(p_text =>'pm id: '||p_param_set_tbl_orig(i).performance_measure_id );
3160: BIS_UTILITIES_PUB.put_line(p_text =>'tl id: '||p_param_set_tbl_orig(i).target_level_id );
3161: BIS_UTILITIES_PUB.put_line(p_text =>'time id: '||p_param_set_tbl_orig(i).time_dimension_level_id);
3162: BIS_UTILITIES_PUB.put_line(p_text =>'param 1 id: '||p_param_set_tbl_orig(i).parameter1_value );
3155:
3156: FOR i IN 1..p_param_set_tbl_orig.COUNT LOOP
3157: /*
3158: BIS_UTILITIES_PUB.put_line(p_text =>'compare_param_sets Inner loop: '||i);
3159: BIS_UTILITIES_PUB.put_line(p_text =>'pm id: '||p_param_set_tbl_orig(i).performance_measure_id );
3160: BIS_UTILITIES_PUB.put_line(p_text =>'tl id: '||p_param_set_tbl_orig(i).target_level_id );
3161: BIS_UTILITIES_PUB.put_line(p_text =>'time id: '||p_param_set_tbl_orig(i).time_dimension_level_id);
3162: BIS_UTILITIES_PUB.put_line(p_text =>'param 1 id: '||p_param_set_tbl_orig(i).parameter1_value );
3163: BIS_UTILITIES_PUB.put_line(p_text =>'param 2 id: '||p_param_set_tbl_orig(i).parameter2_value );
3156: FOR i IN 1..p_param_set_tbl_orig.COUNT LOOP
3157: /*
3158: BIS_UTILITIES_PUB.put_line(p_text =>'compare_param_sets Inner loop: '||i);
3159: BIS_UTILITIES_PUB.put_line(p_text =>'pm id: '||p_param_set_tbl_orig(i).performance_measure_id );
3160: BIS_UTILITIES_PUB.put_line(p_text =>'tl id: '||p_param_set_tbl_orig(i).target_level_id );
3161: BIS_UTILITIES_PUB.put_line(p_text =>'time id: '||p_param_set_tbl_orig(i).time_dimension_level_id);
3162: BIS_UTILITIES_PUB.put_line(p_text =>'param 1 id: '||p_param_set_tbl_orig(i).parameter1_value );
3163: BIS_UTILITIES_PUB.put_line(p_text =>'param 2 id: '||p_param_set_tbl_orig(i).parameter2_value );
3164: BIS_UTILITIES_PUB.put_line(p_text =>'param 3 id: '||p_param_set_tbl_orig(i).parameter3_value );
3157: /*
3158: BIS_UTILITIES_PUB.put_line(p_text =>'compare_param_sets Inner loop: '||i);
3159: BIS_UTILITIES_PUB.put_line(p_text =>'pm id: '||p_param_set_tbl_orig(i).performance_measure_id );
3160: BIS_UTILITIES_PUB.put_line(p_text =>'tl id: '||p_param_set_tbl_orig(i).target_level_id );
3161: BIS_UTILITIES_PUB.put_line(p_text =>'time id: '||p_param_set_tbl_orig(i).time_dimension_level_id);
3162: BIS_UTILITIES_PUB.put_line(p_text =>'param 1 id: '||p_param_set_tbl_orig(i).parameter1_value );
3163: BIS_UTILITIES_PUB.put_line(p_text =>'param 2 id: '||p_param_set_tbl_orig(i).parameter2_value );
3164: BIS_UTILITIES_PUB.put_line(p_text =>'param 3 id: '||p_param_set_tbl_orig(i).parameter3_value );
3165: BIS_UTILITIES_PUB.put_line(p_text =>'param 4 id: '||p_param_set_tbl_orig(i).parameter4_value );
3158: BIS_UTILITIES_PUB.put_line(p_text =>'compare_param_sets Inner loop: '||i);
3159: BIS_UTILITIES_PUB.put_line(p_text =>'pm id: '||p_param_set_tbl_orig(i).performance_measure_id );
3160: BIS_UTILITIES_PUB.put_line(p_text =>'tl id: '||p_param_set_tbl_orig(i).target_level_id );
3161: BIS_UTILITIES_PUB.put_line(p_text =>'time id: '||p_param_set_tbl_orig(i).time_dimension_level_id);
3162: BIS_UTILITIES_PUB.put_line(p_text =>'param 1 id: '||p_param_set_tbl_orig(i).parameter1_value );
3163: BIS_UTILITIES_PUB.put_line(p_text =>'param 2 id: '||p_param_set_tbl_orig(i).parameter2_value );
3164: BIS_UTILITIES_PUB.put_line(p_text =>'param 3 id: '||p_param_set_tbl_orig(i).parameter3_value );
3165: BIS_UTILITIES_PUB.put_line(p_text =>'param 4 id: '||p_param_set_tbl_orig(i).parameter4_value );
3166: BIS_UTILITIES_PUB.put_line(p_text =>'param 5 id: '||p_param_set_tbl_orig(i).parameter5_value );
3159: BIS_UTILITIES_PUB.put_line(p_text =>'pm id: '||p_param_set_tbl_orig(i).performance_measure_id );
3160: BIS_UTILITIES_PUB.put_line(p_text =>'tl id: '||p_param_set_tbl_orig(i).target_level_id );
3161: BIS_UTILITIES_PUB.put_line(p_text =>'time id: '||p_param_set_tbl_orig(i).time_dimension_level_id);
3162: BIS_UTILITIES_PUB.put_line(p_text =>'param 1 id: '||p_param_set_tbl_orig(i).parameter1_value );
3163: BIS_UTILITIES_PUB.put_line(p_text =>'param 2 id: '||p_param_set_tbl_orig(i).parameter2_value );
3164: BIS_UTILITIES_PUB.put_line(p_text =>'param 3 id: '||p_param_set_tbl_orig(i).parameter3_value );
3165: BIS_UTILITIES_PUB.put_line(p_text =>'param 4 id: '||p_param_set_tbl_orig(i).parameter4_value );
3166: BIS_UTILITIES_PUB.put_line(p_text =>'param 5 id: '||p_param_set_tbl_orig(i).parameter5_value );
3167: BIS_UTILITIES_PUB.put_line(p_text =>'param 6 id: '||p_param_set_tbl_orig(i).parameter6_value );
3160: BIS_UTILITIES_PUB.put_line(p_text =>'tl id: '||p_param_set_tbl_orig(i).target_level_id );
3161: BIS_UTILITIES_PUB.put_line(p_text =>'time id: '||p_param_set_tbl_orig(i).time_dimension_level_id);
3162: BIS_UTILITIES_PUB.put_line(p_text =>'param 1 id: '||p_param_set_tbl_orig(i).parameter1_value );
3163: BIS_UTILITIES_PUB.put_line(p_text =>'param 2 id: '||p_param_set_tbl_orig(i).parameter2_value );
3164: BIS_UTILITIES_PUB.put_line(p_text =>'param 3 id: '||p_param_set_tbl_orig(i).parameter3_value );
3165: BIS_UTILITIES_PUB.put_line(p_text =>'param 4 id: '||p_param_set_tbl_orig(i).parameter4_value );
3166: BIS_UTILITIES_PUB.put_line(p_text =>'param 5 id: '||p_param_set_tbl_orig(i).parameter5_value );
3167: BIS_UTILITIES_PUB.put_line(p_text =>'param 6 id: '||p_param_set_tbl_orig(i).parameter6_value );
3168: BIS_UTILITIES_PUB.put_line(p_text =>'param 7 id: '||p_param_set_tbl_orig(i).parameter7_value );
3161: BIS_UTILITIES_PUB.put_line(p_text =>'time id: '||p_param_set_tbl_orig(i).time_dimension_level_id);
3162: BIS_UTILITIES_PUB.put_line(p_text =>'param 1 id: '||p_param_set_tbl_orig(i).parameter1_value );
3163: BIS_UTILITIES_PUB.put_line(p_text =>'param 2 id: '||p_param_set_tbl_orig(i).parameter2_value );
3164: BIS_UTILITIES_PUB.put_line(p_text =>'param 3 id: '||p_param_set_tbl_orig(i).parameter3_value );
3165: BIS_UTILITIES_PUB.put_line(p_text =>'param 4 id: '||p_param_set_tbl_orig(i).parameter4_value );
3166: BIS_UTILITIES_PUB.put_line(p_text =>'param 5 id: '||p_param_set_tbl_orig(i).parameter5_value );
3167: BIS_UTILITIES_PUB.put_line(p_text =>'param 6 id: '||p_param_set_tbl_orig(i).parameter6_value );
3168: BIS_UTILITIES_PUB.put_line(p_text =>'param 7 id: '||p_param_set_tbl_orig(i).parameter7_value );
3169: */
3162: BIS_UTILITIES_PUB.put_line(p_text =>'param 1 id: '||p_param_set_tbl_orig(i).parameter1_value );
3163: BIS_UTILITIES_PUB.put_line(p_text =>'param 2 id: '||p_param_set_tbl_orig(i).parameter2_value );
3164: BIS_UTILITIES_PUB.put_line(p_text =>'param 3 id: '||p_param_set_tbl_orig(i).parameter3_value );
3165: BIS_UTILITIES_PUB.put_line(p_text =>'param 4 id: '||p_param_set_tbl_orig(i).parameter4_value );
3166: BIS_UTILITIES_PUB.put_line(p_text =>'param 5 id: '||p_param_set_tbl_orig(i).parameter5_value );
3167: BIS_UTILITIES_PUB.put_line(p_text =>'param 6 id: '||p_param_set_tbl_orig(i).parameter6_value );
3168: BIS_UTILITIES_PUB.put_line(p_text =>'param 7 id: '||p_param_set_tbl_orig(i).parameter7_value );
3169: */
3170:
3163: BIS_UTILITIES_PUB.put_line(p_text =>'param 2 id: '||p_param_set_tbl_orig(i).parameter2_value );
3164: BIS_UTILITIES_PUB.put_line(p_text =>'param 3 id: '||p_param_set_tbl_orig(i).parameter3_value );
3165: BIS_UTILITIES_PUB.put_line(p_text =>'param 4 id: '||p_param_set_tbl_orig(i).parameter4_value );
3166: BIS_UTILITIES_PUB.put_line(p_text =>'param 5 id: '||p_param_set_tbl_orig(i).parameter5_value );
3167: BIS_UTILITIES_PUB.put_line(p_text =>'param 6 id: '||p_param_set_tbl_orig(i).parameter6_value );
3168: BIS_UTILITIES_PUB.put_line(p_text =>'param 7 id: '||p_param_set_tbl_orig(i).parameter7_value );
3169: */
3170:
3171: IF ((p_param_set_tbl_orig(i).performance_measure_id IS NULL
3164: BIS_UTILITIES_PUB.put_line(p_text =>'param 3 id: '||p_param_set_tbl_orig(i).parameter3_value );
3165: BIS_UTILITIES_PUB.put_line(p_text =>'param 4 id: '||p_param_set_tbl_orig(i).parameter4_value );
3166: BIS_UTILITIES_PUB.put_line(p_text =>'param 5 id: '||p_param_set_tbl_orig(i).parameter5_value );
3167: BIS_UTILITIES_PUB.put_line(p_text =>'param 6 id: '||p_param_set_tbl_orig(i).parameter6_value );
3168: BIS_UTILITIES_PUB.put_line(p_text =>'param 7 id: '||p_param_set_tbl_orig(i).parameter7_value );
3169: */
3170:
3171: IF ((p_param_set_tbl_orig(i).performance_measure_id IS NULL
3172: AND p_param_set_tbl_new(j).performance_measure_id IS NULL)
3208: AND p_param_set_tbl_new(j).parameter7_value IS NULL)
3209: OR (p_param_set_tbl_orig(i).parameter7_value
3210: = p_param_set_tbl_new(j).parameter7_value))
3211: THEN
3212: BIS_UTILITIES_PUB.put_line(p_text =>'Original request');
3213: in_orig := TRUE;
3214: exit;
3215: ELSE
3216: l_param_set_rec_new := p_param_set_tbl_new(j);
3215: ELSE
3216: l_param_set_rec_new := p_param_set_tbl_new(j);
3217: l_param_set_rec_new.notifiers_code
3218: := p_param_set_tbl_orig(i).notifiers_code;
3219: BIS_UTILITIES_PUB.put_line(p_text =>'New request for target level: '
3220: ||l_param_set_rec_new.target_level_id );
3221: END IF;
3222: END LOOP;
3223:
3231: in_orig := FALSE;
3232:
3233: END LOOP;
3234:
3235: BIS_UTILITIES_PUB.put_line(p_text =>'Number of new requests found: '||l_param_set_tbl_diff.COUNT);
3236:
3237: x_param_set_tbl_diff := l_param_set_tbl_diff;
3238: x_param_set_tbl_all := l_param_set_tbl_all;
3239:
3238: x_param_set_tbl_all := l_param_set_tbl_all;
3239:
3240: EXCEPTION
3241: WHEN OTHERS THEN
3242: BIS_UTILITIES_PUB.put_line(p_text =>'exception at Compare_param_sets. '||sqlerrm);
3243: x_param_set_tbl_diff := l_param_set_tbl_diff;
3244: x_param_set_tbl_all := l_param_set_tbl_all;
3245:
3246: END Compare_param_sets;
3255: IS
3256:
3257: l_param_set_rec BIS_PMF_ALERT_REG_PUB.parameter_set_rec_type;
3258: l_param_set_tbl BIS_PMF_ALERT_REG_PUB.parameter_set_tbl_type;
3259: l_error_Tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
3260: l_error_Tbl_p BIS_UTILITIES_PUB.Error_Tbl_Type;
3261:
3262: BEGIN
3263:
3256:
3257: l_param_set_rec BIS_PMF_ALERT_REG_PUB.parameter_set_rec_type;
3258: l_param_set_tbl BIS_PMF_ALERT_REG_PUB.parameter_set_tbl_type;
3259: l_error_Tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
3260: l_error_Tbl_p BIS_UTILITIES_PUB.Error_Tbl_Type;
3261:
3262: BEGIN
3263:
3264: FOR i IN 1..p_Target_tbl.COUNT LOOP
3285: x_parameter_set_tbl := l_param_set_tbl;
3286:
3287: EXCEPTION
3288: when FND_API.G_EXC_ERROR then
3289: BIS_UTILITIES_PUB.put_line(p_text =>'form_parameter_set exception1: '||sqlerrm);
3290: when FND_API.G_EXC_UNEXPECTED_ERROR then
3291: BIS_UTILITIES_PUB.put_line(p_text =>'form_parameter_set exception2: '||sqlerrm);
3292: when others then
3293: BIS_UTILITIES_PUB.put_line(p_text =>'form_parameter_set exception3: '||sqlerrm);
3287: EXCEPTION
3288: when FND_API.G_EXC_ERROR then
3289: BIS_UTILITIES_PUB.put_line(p_text =>'form_parameter_set exception1: '||sqlerrm);
3290: when FND_API.G_EXC_UNEXPECTED_ERROR then
3291: BIS_UTILITIES_PUB.put_line(p_text =>'form_parameter_set exception2: '||sqlerrm);
3292: when others then
3293: BIS_UTILITIES_PUB.put_line(p_text =>'form_parameter_set exception3: '||sqlerrm);
3294: l_error_tbl_p := l_error_tbl;
3295: BIS_UTILITIES_PVT.Add_Error_Message
3289: BIS_UTILITIES_PUB.put_line(p_text =>'form_parameter_set exception1: '||sqlerrm);
3290: when FND_API.G_EXC_UNEXPECTED_ERROR then
3291: BIS_UTILITIES_PUB.put_line(p_text =>'form_parameter_set exception2: '||sqlerrm);
3292: when others then
3293: BIS_UTILITIES_PUB.put_line(p_text =>'form_parameter_set exception3: '||sqlerrm);
3294: l_error_tbl_p := l_error_tbl;
3295: BIS_UTILITIES_PVT.Add_Error_Message
3296: ( p_error_msg_id => SQLCODE
3297: , p_error_description => SQLERRM
3320: sameViewBy BOOLEAN;
3321: viewByLevelNum NUMBER;
3322: l_viewBy_level_id NUMBER;
3323: l_return_status VARCHAR2(32000);
3324: l_error_Tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
3325: l_error_Tbl_p BIS_UTILITIES_PUB.Error_Tbl_Type;
3326: l_Target_Level_rec_p BIS_Target_Level_PUB.Target_Level_Rec_Type;
3327:
3328: BEGIN
3321: viewByLevelNum NUMBER;
3322: l_viewBy_level_id NUMBER;
3323: l_return_status VARCHAR2(32000);
3324: l_error_Tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
3325: l_error_Tbl_p BIS_UTILITIES_PUB.Error_Tbl_Type;
3326: l_Target_Level_rec_p BIS_Target_Level_PUB.Target_Level_Rec_Type;
3327:
3328: BEGIN
3329:
3334: -- the viewBy level, then check the target levels that have
3335: -- dimension levels = param1-6 + viewBy level
3336: --
3337: /*
3338: BIS_UTILITIES_PUB.put_line(p_text =>'In verify target level. Target level: '
3339: ||p_Target_Level_rec.Target_level_id
3340: ||', Viewby: '||p_viewby_level_id);
3341: */
3342: IF p_viewby_level_id IS NULL THEN
3354: THEN
3355: l_Target_Level_rec := p_Target_Level_rec;
3356: x_Target_Level_rec := l_Target_Level_rec;
3357:
3358: BIS_UTILITIES_PUB.put_line(p_text =>'In verify target level. Target level has dim levels, no viewby: '
3359: ||l_Target_Level_rec.Target_level_id);
3360: ELSE
3361: RETURN;
3362: END IF;
3374: , p_viewby_level_id => p_viewby_level_id
3375: , sameViewBy => sameViewBy
3376: , viewByLevelNum => viewByLevelNum
3377: );
3378: --BIS_UTILITIES_PUB.put_line(p_text =>'view by level num: '||viewByLevelNum);
3379:
3380: IF sameViewBy THEN
3381: --BIS_UTILITIES_PUB.put_line(p_text =>' same view by!');
3382: IF has_Dimension_Levels
3377: );
3378: --BIS_UTILITIES_PUB.put_line(p_text =>'view by level num: '||viewByLevelNum);
3379:
3380: IF sameViewBy THEN
3381: --BIS_UTILITIES_PUB.put_line(p_text =>' same view by!');
3382: IF has_Dimension_Levels
3383: ( p_Target_Level_rec => p_Target_Level_rec
3384: , p_parameter1_level => p_parameter1_level
3385: , p_parameter2_level => p_parameter2_level
3392: )
3393: THEN
3394: l_Target_Level_rec := p_Target_Level_rec;
3395: x_Target_Level_rec := l_Target_Level_rec;
3396: BIS_UTILITIES_PUB.put_line(p_text =>'In verify target level. DO have dimension levels: '
3397: ||l_Target_Level_rec.Target_level_id);
3398: ELSE
3399: --BIS_UTILITIES_PUB.put_line(p_text =>'In verify target level. Do NOT have dimension levels: '
3400: --||p_Target_Level_rec.Target_level_id);
3395: x_Target_Level_rec := l_Target_Level_rec;
3396: BIS_UTILITIES_PUB.put_line(p_text =>'In verify target level. DO have dimension levels: '
3397: ||l_Target_Level_rec.Target_level_id);
3398: ELSE
3399: --BIS_UTILITIES_PUB.put_line(p_text =>'In verify target level. Do NOT have dimension levels: '
3400: --||p_Target_Level_rec.Target_level_id);
3401: RETURN;
3402: END IF;
3403: ELSE
3400: --||p_Target_Level_rec.Target_level_id);
3401: RETURN;
3402: END IF;
3403: ELSE
3404: BIS_UTILITIES_PUB.put_line(p_text =>' Different view by!');
3405: IF p_parameter1_level IS NOT NULL THEN
3406: l_Target_Level_rec.Dimension1_Level_Id:=TO_NUMBER(p_parameter1_level);
3407: END IF;
3408: IF p_parameter2_level IS NOT NULL THEN
3513: x_Target_Level_rec := l_Target_Level_rec;
3514:
3515: EXCEPTION
3516: when FND_API.G_EXC_ERROR then
3517: BIS_UTILITIES_PUB.put_line(p_text =>'Verify_Target_Level exception1: '||sqlerrm);
3518: when FND_API.G_EXC_UNEXPECTED_ERROR then
3519: BIS_UTILITIES_PUB.put_line(p_text =>'Verify_Target_Level exception2: '||sqlerrm);
3520: when others then
3521: BIS_UTILITIES_PUB.put_line(p_text =>'Verify_Target_Level exception3: '||sqlerrm);
3515: EXCEPTION
3516: when FND_API.G_EXC_ERROR then
3517: BIS_UTILITIES_PUB.put_line(p_text =>'Verify_Target_Level exception1: '||sqlerrm);
3518: when FND_API.G_EXC_UNEXPECTED_ERROR then
3519: BIS_UTILITIES_PUB.put_line(p_text =>'Verify_Target_Level exception2: '||sqlerrm);
3520: when others then
3521: BIS_UTILITIES_PUB.put_line(p_text =>'Verify_Target_Level exception3: '||sqlerrm);
3522: l_error_Tbl_p := l_error_Tbl;
3523: BIS_UTILITIES_PVT.Add_Error_Message
3517: BIS_UTILITIES_PUB.put_line(p_text =>'Verify_Target_Level exception1: '||sqlerrm);
3518: when FND_API.G_EXC_UNEXPECTED_ERROR then
3519: BIS_UTILITIES_PUB.put_line(p_text =>'Verify_Target_Level exception2: '||sqlerrm);
3520: when others then
3521: BIS_UTILITIES_PUB.put_line(p_text =>'Verify_Target_Level exception3: '||sqlerrm);
3522: l_error_Tbl_p := l_error_Tbl;
3523: BIS_UTILITIES_PVT.Add_Error_Message
3524: ( p_error_msg_id => SQLCODE
3525: , p_error_description => SQLERRM
3557: , p_parameter6_value => p_parameter6_value
3558: , p_parameter7_value => p_parameter7_value
3559: )
3560: THEN
3561: BIS_UTILITIES_PUB.put_line(p_text =>'has Dimension_Level_Values');
3562: l_Target_rec := p_Target_rec;
3563: END IF;
3564:
3565: x_Target_rec := l_Target_rec;
3565: x_Target_rec := l_Target_rec;
3566:
3567: EXCEPTION
3568: WHEN OTHERS THEN
3569: BIS_UTILITIES_PUB.put_line(p_text =>'exception at Verify_Target: '||sqlerrm);
3570: x_Target_rec := NULL;
3571:
3572: END Verify_Target;
3573:
3587: IS
3588:
3589: BEGIN
3590: /*
3591: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM LEV. Tdim1: '||p_Target_Level_rec.Dimension1_Level_id);
3592: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM LEV. Pdim1: '||p_parameter1_level);
3593:
3594: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM LEV. Tdim2: '||p_Target_Level_rec.Dimension2_Level_id);
3595: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM LEV. Pdim2: '||p_parameter2_level);
3588:
3589: BEGIN
3590: /*
3591: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM LEV. Tdim1: '||p_Target_Level_rec.Dimension1_Level_id);
3592: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM LEV. Pdim1: '||p_parameter1_level);
3593:
3594: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM LEV. Tdim2: '||p_Target_Level_rec.Dimension2_Level_id);
3595: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM LEV. Pdim2: '||p_parameter2_level);
3596:
3590: /*
3591: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM LEV. Tdim1: '||p_Target_Level_rec.Dimension1_Level_id);
3592: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM LEV. Pdim1: '||p_parameter1_level);
3593:
3594: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM LEV. Tdim2: '||p_Target_Level_rec.Dimension2_Level_id);
3595: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM LEV. Pdim2: '||p_parameter2_level);
3596:
3597: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM LEV. Tdim3: '||p_Target_Level_rec.Dimension3_Level_id);
3598: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM LEV. Pdim3: '||p_parameter3_level);
3591: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM LEV. Tdim1: '||p_Target_Level_rec.Dimension1_Level_id);
3592: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM LEV. Pdim1: '||p_parameter1_level);
3593:
3594: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM LEV. Tdim2: '||p_Target_Level_rec.Dimension2_Level_id);
3595: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM LEV. Pdim2: '||p_parameter2_level);
3596:
3597: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM LEV. Tdim3: '||p_Target_Level_rec.Dimension3_Level_id);
3598: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM LEV. Pdim3: '||p_parameter3_level);
3599: */
3593:
3594: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM LEV. Tdim2: '||p_Target_Level_rec.Dimension2_Level_id);
3595: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM LEV. Pdim2: '||p_parameter2_level);
3596:
3597: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM LEV. Tdim3: '||p_Target_Level_rec.Dimension3_Level_id);
3598: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM LEV. Pdim3: '||p_parameter3_level);
3599: */
3600:
3601: IF ((BIS_UTILITIES_PUB.Value_Null(p_Target_Level_rec.Dimension1_Level_id)
3594: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM LEV. Tdim2: '||p_Target_Level_rec.Dimension2_Level_id);
3595: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM LEV. Pdim2: '||p_parameter2_level);
3596:
3597: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM LEV. Tdim3: '||p_Target_Level_rec.Dimension3_Level_id);
3598: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM LEV. Pdim3: '||p_parameter3_level);
3599: */
3600:
3601: IF ((BIS_UTILITIES_PUB.Value_Null(p_Target_Level_rec.Dimension1_Level_id)
3602: = FND_API.G_TRUE
3597: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM LEV. Tdim3: '||p_Target_Level_rec.Dimension3_Level_id);
3598: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM LEV. Pdim3: '||p_parameter3_level);
3599: */
3600:
3601: IF ((BIS_UTILITIES_PUB.Value_Null(p_Target_Level_rec.Dimension1_Level_id)
3602: = FND_API.G_TRUE
3603: AND p_parameter1_level IS NULL)
3604: OR p_Target_Level_rec.Dimension1_Level_Id = TO_NUMBER(p_parameter1_level))
3605: AND ((BIS_UTILITIES_PUB.Value_Null(p_Target_Level_rec.Dimension2_Level_id)
3601: IF ((BIS_UTILITIES_PUB.Value_Null(p_Target_Level_rec.Dimension1_Level_id)
3602: = FND_API.G_TRUE
3603: AND p_parameter1_level IS NULL)
3604: OR p_Target_Level_rec.Dimension1_Level_Id = TO_NUMBER(p_parameter1_level))
3605: AND ((BIS_UTILITIES_PUB.Value_Null(p_Target_Level_rec.Dimension2_Level_id)
3606: = FND_API.G_TRUE
3607: AND p_parameter2_level IS NULL)
3608: OR p_Target_Level_rec.Dimension2_Level_Id = TO_NUMBER(p_parameter2_level))
3609: AND ((BIS_UTILITIES_PUB.Value_Null(p_Target_Level_rec.Dimension3_Level_id)
3605: AND ((BIS_UTILITIES_PUB.Value_Null(p_Target_Level_rec.Dimension2_Level_id)
3606: = FND_API.G_TRUE
3607: AND p_parameter2_level IS NULL)
3608: OR p_Target_Level_rec.Dimension2_Level_Id = TO_NUMBER(p_parameter2_level))
3609: AND ((BIS_UTILITIES_PUB.Value_Null(p_Target_Level_rec.Dimension3_Level_id)
3610: = FND_API.G_TRUE
3611: AND p_parameter3_level IS NULL)
3612: OR p_Target_Level_rec.Dimension3_Level_Id = TO_NUMBER(p_parameter3_level))
3613: AND ((BIS_UTILITIES_PUB.Value_Null(p_Target_Level_rec.Dimension4_Level_id)
3609: AND ((BIS_UTILITIES_PUB.Value_Null(p_Target_Level_rec.Dimension3_Level_id)
3610: = FND_API.G_TRUE
3611: AND p_parameter3_level IS NULL)
3612: OR p_Target_Level_rec.Dimension3_Level_Id = TO_NUMBER(p_parameter3_level))
3613: AND ((BIS_UTILITIES_PUB.Value_Null(p_Target_Level_rec.Dimension4_Level_id)
3614: = FND_API.G_TRUE
3615: AND p_parameter4_level IS NULL)
3616: OR p_Target_Level_rec.Dimension4_Level_Id = TO_NUMBER(p_parameter4_level))
3617: AND ((BIS_UTILITIES_PUB.Value_Null(p_Target_Level_rec.Dimension5_Level_id)
3613: AND ((BIS_UTILITIES_PUB.Value_Null(p_Target_Level_rec.Dimension4_Level_id)
3614: = FND_API.G_TRUE
3615: AND p_parameter4_level IS NULL)
3616: OR p_Target_Level_rec.Dimension4_Level_Id = TO_NUMBER(p_parameter4_level))
3617: AND ((BIS_UTILITIES_PUB.Value_Null(p_Target_Level_rec.Dimension5_Level_id)
3618: = FND_API.G_TRUE
3619: AND p_parameter5_level IS NULL)
3620: OR p_Target_Level_rec.Dimension5_Level_Id = TO_NUMBER(p_parameter5_level))
3621: AND ((BIS_UTILITIES_PUB.Value_Null(p_Target_Level_rec.Dimension6_Level_id)
3617: AND ((BIS_UTILITIES_PUB.Value_Null(p_Target_Level_rec.Dimension5_Level_id)
3618: = FND_API.G_TRUE
3619: AND p_parameter5_level IS NULL)
3620: OR p_Target_Level_rec.Dimension5_Level_Id = TO_NUMBER(p_parameter5_level))
3621: AND ((BIS_UTILITIES_PUB.Value_Null(p_Target_Level_rec.Dimension6_Level_id)
3622: = FND_API.G_TRUE
3623: AND p_parameter6_level IS NULL)
3624: OR p_Target_Level_rec.Dimension6_Level_Id = TO_NUMBER(p_parameter6_level))
3625: AND ((BIS_UTILITIES_PUB.Value_Null(p_Target_Level_rec.Dimension7_Level_id)
3621: AND ((BIS_UTILITIES_PUB.Value_Null(p_Target_Level_rec.Dimension6_Level_id)
3622: = FND_API.G_TRUE
3623: AND p_parameter6_level IS NULL)
3624: OR p_Target_Level_rec.Dimension6_Level_Id = TO_NUMBER(p_parameter6_level))
3625: AND ((BIS_UTILITIES_PUB.Value_Null(p_Target_Level_rec.Dimension7_Level_id)
3626: = FND_API.G_TRUE
3627: AND p_parameter7_level IS NULL)
3628: OR p_Target_Level_rec.Dimension7_Level_Id = TO_NUMBER(p_parameter7_level))
3629: THEN
3633: END IF;
3634:
3635: EXCEPTION
3636: WHEN OTHERS THEN
3637: BIS_UTILITIES_PUB.put_line(p_text =>'Exception at has_Dimension_Levels: '||sqlerrm);
3638: RETURN FALSE;
3639:
3640: END has_Dimension_Levels;
3641:
3706:
3707: BEGIN
3708:
3709: /*
3710: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM VAL. Tdim1: '||p_Target_rec.Dim1_level_value_id);
3711: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM VAL. Pdim1: '||p_parameter1_value);
3712:
3713: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM VAL. Tdim2: '||p_Target_rec.Dim2_level_value_id);
3714: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM VAL. Pdim2: '||p_parameter2_value);
3707: BEGIN
3708:
3709: /*
3710: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM VAL. Tdim1: '||p_Target_rec.Dim1_level_value_id);
3711: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM VAL. Pdim1: '||p_parameter1_value);
3712:
3713: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM VAL. Tdim2: '||p_Target_rec.Dim2_level_value_id);
3714: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM VAL. Pdim2: '||p_parameter2_value);
3715:
3709: /*
3710: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM VAL. Tdim1: '||p_Target_rec.Dim1_level_value_id);
3711: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM VAL. Pdim1: '||p_parameter1_value);
3712:
3713: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM VAL. Tdim2: '||p_Target_rec.Dim2_level_value_id);
3714: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM VAL. Pdim2: '||p_parameter2_value);
3715:
3716: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM VAL. Tdim3: '||p_Target_rec.Dim3_level_value_id);
3717: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM VAL. Pdim3: '||p_parameter3_value);
3710: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM VAL. Tdim1: '||p_Target_rec.Dim1_level_value_id);
3711: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM VAL. Pdim1: '||p_parameter1_value);
3712:
3713: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM VAL. Tdim2: '||p_Target_rec.Dim2_level_value_id);
3714: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM VAL. Pdim2: '||p_parameter2_value);
3715:
3716: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM VAL. Tdim3: '||p_Target_rec.Dim3_level_value_id);
3717: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM VAL. Pdim3: '||p_parameter3_value);
3718: */
3712:
3713: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM VAL. Tdim2: '||p_Target_rec.Dim2_level_value_id);
3714: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM VAL. Pdim2: '||p_parameter2_value);
3715:
3716: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM VAL. Tdim3: '||p_Target_rec.Dim3_level_value_id);
3717: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM VAL. Pdim3: '||p_parameter3_value);
3718: */
3719:
3720: IF ((p_parameter1_value IS NULL)
3713: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM VAL. Tdim2: '||p_Target_rec.Dim2_level_value_id);
3714: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM VAL. Pdim2: '||p_parameter2_value);
3715:
3716: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM VAL. Tdim3: '||p_Target_rec.Dim3_level_value_id);
3717: BIS_UTILITIES_PUB.put_line(p_text =>'in verify DIM VAL. Pdim3: '||p_parameter3_value);
3718: */
3719:
3720: IF ((p_parameter1_value IS NULL)
3721: OR p_Target_rec.Dim1_Level_Value_Id = p_parameter1_value)
3738: END IF;
3739:
3740: EXCEPTION
3741: WHEN OTHERS THEN
3742: BIS_UTILITIES_PUB.put_line(p_text =>'Exception at has_Dimension_Level_Values: '||sqlerrm);
3743: RETURN FALSE;
3744:
3745: END has_Dimension_Level_Values;
3746:
3750:
3751: IS
3752: l_Dimension_Level_rec BIS_DIMENSION_LEVEL_PUB.Dimension_Level_rec_Type;
3753: l_return_status VARCHAR2(32000);
3754: l_error_Tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
3755:
3756: BEGIN
3757:
3758: BIS_DIMENSION_LEVEL_PVT.Retrieve_Dimension_Level
3825: END IF;
3826:
3827: if l_total_name = l_level_short_name then
3828: l_return := TRUE;
3829: BIS_UTILITIES_PUB.put_line(p_text =>'Is Total time');
3830: else
3831: l_return := FALSE;
3832: BIS_UTILITIES_PUB.put_line(p_text =>'Is Not Total time');
3833: end if;
3828: l_return := TRUE;
3829: BIS_UTILITIES_PUB.put_line(p_text =>'Is Total time');
3830: else
3831: l_return := FALSE;
3832: BIS_UTILITIES_PUB.put_line(p_text =>'Is Not Total time');
3833: end if;
3834: RETURN l_return;
3835:
3836: Exception
3834: RETURN l_return;
3835:
3836: Exception
3837: when others then
3838: BIS_UTILITIES_PUB.put_line(p_text =>'Error in Procedure IS_TOTAL_DIM_LEVEL : '||sqlerrm);
3839:
3840: END IS_TOTAL_DIM_LEVEL;
3841:
3842: