52: , x_error_table => x_error_tbl
53: );
54: RAISE FND_API.G_EXC_ERROR;
55: ELSE
56: SELECT bisbv_target_levels.TARGET_LEVEL_ID
57: INTO l_Target_Level_ID
58: FROM bisbv_target_levels bisbv_target_levels
59: WHERE bisbv_target_levels.TARGET_LEVEL_ID
60: = p_Target_Rec.TARGET_LEVEL_ID;
54: RAISE FND_API.G_EXC_ERROR;
55: ELSE
56: SELECT bisbv_target_levels.TARGET_LEVEL_ID
57: INTO l_Target_Level_ID
58: FROM bisbv_target_levels bisbv_target_levels
59: WHERE bisbv_target_levels.TARGET_LEVEL_ID
60: = p_Target_Rec.TARGET_LEVEL_ID;
61: END IF;
62: --
55: ELSE
56: SELECT bisbv_target_levels.TARGET_LEVEL_ID
57: INTO l_Target_Level_ID
58: FROM bisbv_target_levels bisbv_target_levels
59: WHERE bisbv_target_levels.TARGET_LEVEL_ID
60: = p_Target_Rec.TARGET_LEVEL_ID;
61: END IF;
62: --
63:
181: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
182: )
183: IS
184: --
185: l_bisbv_target_levels BISBV_TARGET_LEVELS%ROWTYPE;
186: l_Dim_Level_Value_Rec BIS_DIM_LEVEL_VALUE_PUB.Dim_Level_Value_Rec_Type;
187: l_Dim_Level_Value_Rec_p BIS_DIM_LEVEL_VALUE_PUB.Dim_Level_Value_Rec_Type;
188: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
189: --
190: BEGIN
191: x_return_status := FND_API.G_RET_STS_SUCCESS;
192: --
193: SELECT *
194: INTO l_bisbv_target_levels
195: FROM BISBV_TARGET_LEVELS bisbv_target_levels
196: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
197: --
198:
191: x_return_status := FND_API.G_RET_STS_SUCCESS;
192: --
193: SELECT *
194: INTO l_bisbv_target_levels
195: FROM BISBV_TARGET_LEVELS bisbv_target_levels
196: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
197: --
198:
199:
192: --
193: SELECT *
194: INTO l_bisbv_target_levels
195: FROM BISBV_TARGET_LEVELS bisbv_target_levels
196: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
197: --
198:
199:
200: IF(l_bisbv_target_levels.ORG_LEVEL_ID IS NOT NULL) THEN
196: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
197: --
198:
199:
200: IF(l_bisbv_target_levels.ORG_LEVEL_ID IS NOT NULL) THEN
201: l_Dim_Level_Value_Rec.Dimension_Level_ID
202: := l_bisbv_target_levels.ORG_LEVEL_ID;
203: l_Dim_Level_Value_Rec.Dimension_Level_Value_ID
204: := p_Target_Rec.Org_Level_Value_ID;
198:
199:
200: IF(l_bisbv_target_levels.ORG_LEVEL_ID IS NOT NULL) THEN
201: l_Dim_Level_Value_Rec.Dimension_Level_ID
202: := l_bisbv_target_levels.ORG_LEVEL_ID;
203: l_Dim_Level_Value_Rec.Dimension_Level_Value_ID
204: := p_Target_Rec.Org_Level_Value_ID;
205: --
206:
250: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
251: )
252: IS
253: --
254: l_bisbv_target_levels BISBV_TARGET_LEVELS%ROWTYPE;
255: l_Dim_Level_Value_Rec BIS_DIM_LEVEL_VALUE_PUB.Dim_Level_Value_Rec_Type;
256: l_Dim_Level_Value_Rec_p BIS_DIM_LEVEL_VALUE_PUB.Dim_Level_Value_Rec_Type;
257: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
258: --
259: BEGIN
260: x_return_status := FND_API.G_RET_STS_SUCCESS;
261: --
262: SELECT *
263: INTO l_bisbv_target_levels
264: FROM BISBV_TARGET_LEVELS bisbv_target_levels
265: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
266: --
267:
260: x_return_status := FND_API.G_RET_STS_SUCCESS;
261: --
262: SELECT *
263: INTO l_bisbv_target_levels
264: FROM BISBV_TARGET_LEVELS bisbv_target_levels
265: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
266: --
267:
268:
261: --
262: SELECT *
263: INTO l_bisbv_target_levels
264: FROM BISBV_TARGET_LEVELS bisbv_target_levels
265: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
266: --
267:
268:
269: IF(l_bisbv_target_levels.TIME_LEVEL_ID IS NOT NULL) THEN
265: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
266: --
267:
268:
269: IF(l_bisbv_target_levels.TIME_LEVEL_ID IS NOT NULL) THEN
270: l_Dim_Level_Value_Rec.Dimension_Level_ID
271: := l_bisbv_target_levels.TIME_LEVEL_ID;
272: l_Dim_Level_Value_Rec.Dimension_Level_Value_ID
273: := p_Target_Rec.Time_Level_Value_ID;
267:
268:
269: IF(l_bisbv_target_levels.TIME_LEVEL_ID IS NOT NULL) THEN
270: l_Dim_Level_Value_Rec.Dimension_Level_ID
271: := l_bisbv_target_levels.TIME_LEVEL_ID;
272: l_Dim_Level_Value_Rec.Dimension_Level_Value_ID
273: := p_Target_Rec.Time_Level_Value_ID;
274: --
275:
319: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
320: )
321: IS
322: --
323: l_bisbv_target_levels BISBV_TARGET_LEVELS%ROWTYPE;
324: l_Dim_Level_Value_Rec BIS_DIM_LEVEL_VALUE_PUB.Dim_Level_Value_Rec_Type;
325: l_Dim_Level_Value_Rec_p BIS_DIM_LEVEL_VALUE_PUB.Dim_Level_Value_Rec_Type;
326: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
327: --
328: BEGIN
329: x_return_status := FND_API.G_RET_STS_SUCCESS;
330: --
331: SELECT *
332: INTO l_bisbv_target_levels
333: FROM BISBV_TARGET_LEVELS bisbv_target_levels
334: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
335: --
336:
329: x_return_status := FND_API.G_RET_STS_SUCCESS;
330: --
331: SELECT *
332: INTO l_bisbv_target_levels
333: FROM BISBV_TARGET_LEVELS bisbv_target_levels
334: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
335: --
336:
337:
330: --
331: SELECT *
332: INTO l_bisbv_target_levels
333: FROM BISBV_TARGET_LEVELS bisbv_target_levels
334: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
335: --
336:
337:
338: IF(l_bisbv_target_levels.DIMENSION1_LEVEL_ID IS NOT NULL) THEN
334: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
335: --
336:
337:
338: IF(l_bisbv_target_levels.DIMENSION1_LEVEL_ID IS NOT NULL) THEN
339: l_Dim_Level_Value_Rec.Dimension_Level_ID
340: := l_bisbv_target_levels.DIMENSION1_LEVEL_ID;
341: l_Dim_Level_Value_Rec.Dimension_Level_Value_ID
342: := p_Target_Rec.Dim1_Level_Value_ID;
336:
337:
338: IF(l_bisbv_target_levels.DIMENSION1_LEVEL_ID IS NOT NULL) THEN
339: l_Dim_Level_Value_Rec.Dimension_Level_ID
340: := l_bisbv_target_levels.DIMENSION1_LEVEL_ID;
341: l_Dim_Level_Value_Rec.Dimension_Level_Value_ID
342: := p_Target_Rec.Dim1_Level_Value_ID;
343: --
344:
388: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
389: )
390: IS
391: --
392: l_bisbv_target_levels BISBV_TARGET_LEVELS%ROWTYPE;
393: l_Dim_Level_Value_Rec BIS_DIM_LEVEL_VALUE_PUB.Dim_Level_Value_Rec_Type;
394: l_Dim_Level_Value_Rec_p BIS_DIM_LEVEL_VALUE_PUB.Dim_Level_Value_Rec_Type;
395: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
396: --
397: BEGIN
398: x_return_status := FND_API.G_RET_STS_SUCCESS;
399: --
400: SELECT *
401: INTO l_bisbv_target_levels
402: FROM BISBV_TARGET_LEVELS bisbv_target_levels
403: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
404: --
405: IF(l_bisbv_target_levels.DIMENSION2_LEVEL_ID IS NOT NULL) THEN
398: x_return_status := FND_API.G_RET_STS_SUCCESS;
399: --
400: SELECT *
401: INTO l_bisbv_target_levels
402: FROM BISBV_TARGET_LEVELS bisbv_target_levels
403: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
404: --
405: IF(l_bisbv_target_levels.DIMENSION2_LEVEL_ID IS NOT NULL) THEN
406: l_Dim_Level_Value_Rec.Dimension_Level_ID
399: --
400: SELECT *
401: INTO l_bisbv_target_levels
402: FROM BISBV_TARGET_LEVELS bisbv_target_levels
403: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
404: --
405: IF(l_bisbv_target_levels.DIMENSION2_LEVEL_ID IS NOT NULL) THEN
406: l_Dim_Level_Value_Rec.Dimension_Level_ID
407: := l_bisbv_target_levels.DIMENSION2_LEVEL_ID;
401: INTO l_bisbv_target_levels
402: FROM BISBV_TARGET_LEVELS bisbv_target_levels
403: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
404: --
405: IF(l_bisbv_target_levels.DIMENSION2_LEVEL_ID IS NOT NULL) THEN
406: l_Dim_Level_Value_Rec.Dimension_Level_ID
407: := l_bisbv_target_levels.DIMENSION2_LEVEL_ID;
408: l_Dim_Level_Value_Rec.Dimension_Level_Value_ID
409: := p_Target_Rec.Dim2_Level_Value_ID;
403: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
404: --
405: IF(l_bisbv_target_levels.DIMENSION2_LEVEL_ID IS NOT NULL) THEN
406: l_Dim_Level_Value_Rec.Dimension_Level_ID
407: := l_bisbv_target_levels.DIMENSION2_LEVEL_ID;
408: l_Dim_Level_Value_Rec.Dimension_Level_Value_ID
409: := p_Target_Rec.Dim2_Level_Value_ID;
410: --
411: l_Dim_Level_Value_Rec_p := l_Dim_Level_Value_Rec;
453: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
454: )
455: IS
456: --
457: l_bisbv_target_levels BISBV_TARGET_LEVELS%ROWTYPE;
458: l_Dim_Level_Value_Rec BIS_DIM_LEVEL_VALUE_PUB.Dim_Level_Value_Rec_Type;
459: l_Dim_Level_Value_Rec_p BIS_DIM_LEVEL_VALUE_PUB.Dim_Level_Value_Rec_Type;
460: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
461: --
462: BEGIN
463: x_return_status := FND_API.G_RET_STS_SUCCESS;
464: --
465: SELECT *
466: INTO l_bisbv_target_levels
467: FROM BISBV_TARGET_LEVELS bisbv_target_levels
468: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
469: --
470: IF(l_bisbv_target_levels.DIMENSION3_LEVEL_ID IS NOT NULL) THEN
463: x_return_status := FND_API.G_RET_STS_SUCCESS;
464: --
465: SELECT *
466: INTO l_bisbv_target_levels
467: FROM BISBV_TARGET_LEVELS bisbv_target_levels
468: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
469: --
470: IF(l_bisbv_target_levels.DIMENSION3_LEVEL_ID IS NOT NULL) THEN
471: l_Dim_Level_Value_Rec.Dimension_Level_ID
464: --
465: SELECT *
466: INTO l_bisbv_target_levels
467: FROM BISBV_TARGET_LEVELS bisbv_target_levels
468: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
469: --
470: IF(l_bisbv_target_levels.DIMENSION3_LEVEL_ID IS NOT NULL) THEN
471: l_Dim_Level_Value_Rec.Dimension_Level_ID
472: := l_bisbv_target_levels.DIMENSION3_LEVEL_ID;
466: INTO l_bisbv_target_levels
467: FROM BISBV_TARGET_LEVELS bisbv_target_levels
468: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
469: --
470: IF(l_bisbv_target_levels.DIMENSION3_LEVEL_ID IS NOT NULL) THEN
471: l_Dim_Level_Value_Rec.Dimension_Level_ID
472: := l_bisbv_target_levels.DIMENSION3_LEVEL_ID;
473: l_Dim_Level_Value_Rec.Dimension_Level_Value_ID
474: := p_Target_Rec.Dim3_Level_Value_ID;
468: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
469: --
470: IF(l_bisbv_target_levels.DIMENSION3_LEVEL_ID IS NOT NULL) THEN
471: l_Dim_Level_Value_Rec.Dimension_Level_ID
472: := l_bisbv_target_levels.DIMENSION3_LEVEL_ID;
473: l_Dim_Level_Value_Rec.Dimension_Level_Value_ID
474: := p_Target_Rec.Dim3_Level_Value_ID;
475: --
476: l_Dim_Level_Value_Rec_p := l_Dim_Level_Value_Rec;
518: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
519: )
520: IS
521: --
522: l_bisbv_target_levels BISBV_TARGET_LEVELS%ROWTYPE;
523: l_Dim_Level_Value_Rec BIS_DIM_LEVEL_VALUE_PUB.Dim_Level_Value_Rec_Type;
524: l_Dim_Level_Value_Rec_p BIS_DIM_LEVEL_VALUE_PUB.Dim_Level_Value_Rec_Type;
525: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
526: --
527: BEGIN
528: x_return_status := FND_API.G_RET_STS_SUCCESS;
529: --
530: SELECT *
531: INTO l_bisbv_target_levels
532: FROM BISBV_TARGET_LEVELS bisbv_target_levels
533: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
534: --
535: IF(l_bisbv_target_levels.DIMENSION4_LEVEL_ID IS NOT NULL) THEN
528: x_return_status := FND_API.G_RET_STS_SUCCESS;
529: --
530: SELECT *
531: INTO l_bisbv_target_levels
532: FROM BISBV_TARGET_LEVELS bisbv_target_levels
533: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
534: --
535: IF(l_bisbv_target_levels.DIMENSION4_LEVEL_ID IS NOT NULL) THEN
536: l_Dim_Level_Value_Rec.Dimension_Level_ID
529: --
530: SELECT *
531: INTO l_bisbv_target_levels
532: FROM BISBV_TARGET_LEVELS bisbv_target_levels
533: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
534: --
535: IF(l_bisbv_target_levels.DIMENSION4_LEVEL_ID IS NOT NULL) THEN
536: l_Dim_Level_Value_Rec.Dimension_Level_ID
537: := l_bisbv_target_levels.DIMENSION4_LEVEL_ID;
531: INTO l_bisbv_target_levels
532: FROM BISBV_TARGET_LEVELS bisbv_target_levels
533: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
534: --
535: IF(l_bisbv_target_levels.DIMENSION4_LEVEL_ID IS NOT NULL) THEN
536: l_Dim_Level_Value_Rec.Dimension_Level_ID
537: := l_bisbv_target_levels.DIMENSION4_LEVEL_ID;
538: l_Dim_Level_Value_Rec.Dimension_Level_Value_ID
539: := p_Target_Rec.Dim4_Level_Value_ID;
533: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
534: --
535: IF(l_bisbv_target_levels.DIMENSION4_LEVEL_ID IS NOT NULL) THEN
536: l_Dim_Level_Value_Rec.Dimension_Level_ID
537: := l_bisbv_target_levels.DIMENSION4_LEVEL_ID;
538: l_Dim_Level_Value_Rec.Dimension_Level_Value_ID
539: := p_Target_Rec.Dim4_Level_Value_ID;
540: --
541: l_Dim_Level_Value_Rec_p := l_Dim_Level_Value_Rec;
583: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
584: )
585: IS
586: --
587: l_bisbv_target_levels BISBV_TARGET_LEVELS%ROWTYPE;
588: l_Dim_Level_Value_Rec BIS_DIM_LEVEL_VALUE_PUB.Dim_Level_Value_Rec_Type;
589: l_Dim_Level_Value_Rec_p BIS_DIM_LEVEL_VALUE_PUB.Dim_Level_Value_Rec_Type;
590: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
591: --
592: BEGIN
593: x_return_status := FND_API.G_RET_STS_SUCCESS;
594: --
595: SELECT *
596: INTO l_bisbv_target_levels
597: FROM BISBV_TARGET_LEVELS bisbv_target_levels
598: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
599: --
600: IF(l_bisbv_target_levels.DIMENSION5_LEVEL_ID IS NOT NULL) THEN
593: x_return_status := FND_API.G_RET_STS_SUCCESS;
594: --
595: SELECT *
596: INTO l_bisbv_target_levels
597: FROM BISBV_TARGET_LEVELS bisbv_target_levels
598: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
599: --
600: IF(l_bisbv_target_levels.DIMENSION5_LEVEL_ID IS NOT NULL) THEN
601: l_Dim_Level_Value_Rec.Dimension_Level_ID
594: --
595: SELECT *
596: INTO l_bisbv_target_levels
597: FROM BISBV_TARGET_LEVELS bisbv_target_levels
598: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
599: --
600: IF(l_bisbv_target_levels.DIMENSION5_LEVEL_ID IS NOT NULL) THEN
601: l_Dim_Level_Value_Rec.Dimension_Level_ID
602: := l_bisbv_target_levels.DIMENSION5_LEVEL_ID;
596: INTO l_bisbv_target_levels
597: FROM BISBV_TARGET_LEVELS bisbv_target_levels
598: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
599: --
600: IF(l_bisbv_target_levels.DIMENSION5_LEVEL_ID IS NOT NULL) THEN
601: l_Dim_Level_Value_Rec.Dimension_Level_ID
602: := l_bisbv_target_levels.DIMENSION5_LEVEL_ID;
603: l_Dim_Level_Value_Rec.Dimension_Level_Value_ID
604: := p_Target_Rec.Dim5_Level_Value_ID;
598: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
599: --
600: IF(l_bisbv_target_levels.DIMENSION5_LEVEL_ID IS NOT NULL) THEN
601: l_Dim_Level_Value_Rec.Dimension_Level_ID
602: := l_bisbv_target_levels.DIMENSION5_LEVEL_ID;
603: l_Dim_Level_Value_Rec.Dimension_Level_Value_ID
604: := p_Target_Rec.Dim5_Level_Value_ID;
605: --
606: l_Dim_Level_Value_Rec_p := l_Dim_Level_Value_Rec;
648: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
649: )
650: IS
651: --
652: l_bisbv_target_levels BISBV_TARGET_LEVELS%ROWTYPE;
653: l_Dim_Level_Value_Rec BIS_DIM_LEVEL_VALUE_PUB.Dim_Level_Value_Rec_Type;
654: l_Dim_Level_Value_Rec_p BIS_DIM_LEVEL_VALUE_PUB.Dim_Level_Value_Rec_Type;
655: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
656: --
657: BEGIN
658: x_return_status := FND_API.G_RET_STS_SUCCESS;
659: --
660: SELECT *
661: INTO l_bisbv_target_levels
662: FROM BISBV_TARGET_LEVELS bisbv_target_levels
663: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
664: --
665: IF(l_bisbv_target_levels.DIMENSION6_LEVEL_ID IS NOT NULL) THEN
658: x_return_status := FND_API.G_RET_STS_SUCCESS;
659: --
660: SELECT *
661: INTO l_bisbv_target_levels
662: FROM BISBV_TARGET_LEVELS bisbv_target_levels
663: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
664: --
665: IF(l_bisbv_target_levels.DIMENSION6_LEVEL_ID IS NOT NULL) THEN
666: l_Dim_Level_Value_Rec.Dimension_Level_ID
659: --
660: SELECT *
661: INTO l_bisbv_target_levels
662: FROM BISBV_TARGET_LEVELS bisbv_target_levels
663: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
664: --
665: IF(l_bisbv_target_levels.DIMENSION6_LEVEL_ID IS NOT NULL) THEN
666: l_Dim_Level_Value_Rec.Dimension_Level_ID
667: := l_bisbv_target_levels.DIMENSION6_LEVEL_ID;
661: INTO l_bisbv_target_levels
662: FROM BISBV_TARGET_LEVELS bisbv_target_levels
663: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
664: --
665: IF(l_bisbv_target_levels.DIMENSION6_LEVEL_ID IS NOT NULL) THEN
666: l_Dim_Level_Value_Rec.Dimension_Level_ID
667: := l_bisbv_target_levels.DIMENSION6_LEVEL_ID;
668: l_Dim_Level_Value_Rec.Dimension_Level_Value_ID
669: := p_Target_Rec.Dim6_Level_Value_ID;
663: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
664: --
665: IF(l_bisbv_target_levels.DIMENSION6_LEVEL_ID IS NOT NULL) THEN
666: l_Dim_Level_Value_Rec.Dimension_Level_ID
667: := l_bisbv_target_levels.DIMENSION6_LEVEL_ID;
668: l_Dim_Level_Value_Rec.Dimension_Level_Value_ID
669: := p_Target_Rec.Dim6_Level_Value_ID;
670: --
671: l_Dim_Level_Value_Rec_p := l_Dim_Level_Value_Rec;
712: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
713: )
714: IS
715: --
716: l_bisbv_target_levels BISBV_TARGET_LEVELS%ROWTYPE;
717: l_Dim_Level_Value_Rec BIS_DIM_LEVEL_VALUE_PUB.Dim_Level_Value_Rec_Type;
718: l_Dim_Level_Value_Rec_p BIS_DIM_LEVEL_VALUE_PUB.Dim_Level_Value_Rec_Type;
719: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
720: --
721: BEGIN
722: x_return_status := FND_API.G_RET_STS_SUCCESS;
723: --
724: SELECT *
725: INTO l_bisbv_target_levels
726: FROM BISBV_TARGET_LEVELS bisbv_target_levels
727: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
728: --
729: IF(l_bisbv_target_levels.DIMENSION7_LEVEL_ID IS NOT NULL) THEN
722: x_return_status := FND_API.G_RET_STS_SUCCESS;
723: --
724: SELECT *
725: INTO l_bisbv_target_levels
726: FROM BISBV_TARGET_LEVELS bisbv_target_levels
727: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
728: --
729: IF(l_bisbv_target_levels.DIMENSION7_LEVEL_ID IS NOT NULL) THEN
730: l_Dim_Level_Value_Rec.Dimension_Level_ID
723: --
724: SELECT *
725: INTO l_bisbv_target_levels
726: FROM BISBV_TARGET_LEVELS bisbv_target_levels
727: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
728: --
729: IF(l_bisbv_target_levels.DIMENSION7_LEVEL_ID IS NOT NULL) THEN
730: l_Dim_Level_Value_Rec.Dimension_Level_ID
731: := l_bisbv_target_levels.DIMENSION7_LEVEL_ID;
725: INTO l_bisbv_target_levels
726: FROM BISBV_TARGET_LEVELS bisbv_target_levels
727: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
728: --
729: IF(l_bisbv_target_levels.DIMENSION7_LEVEL_ID IS NOT NULL) THEN
730: l_Dim_Level_Value_Rec.Dimension_Level_ID
731: := l_bisbv_target_levels.DIMENSION7_LEVEL_ID;
732: l_Dim_Level_Value_Rec.Dimension_Level_Value_ID
733: := p_Target_Rec.Dim7_Level_Value_ID;
727: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
728: --
729: IF(l_bisbv_target_levels.DIMENSION7_LEVEL_ID IS NOT NULL) THEN
730: l_Dim_Level_Value_Rec.Dimension_Level_ID
731: := l_bisbv_target_levels.DIMENSION7_LEVEL_ID;
732: l_Dim_Level_Value_Rec.Dimension_Level_Value_ID
733: := p_Target_Rec.Dim7_Level_Value_ID;
734: --
735: l_Dim_Level_Value_Rec_p := l_Dim_Level_Value_Rec;
777: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
778: )
779: IS
780: --
781: l_bisbv_target_levels BISBV_TARGET_LEVELS%ROWTYPE;
782: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
783: --
784: BEGIN
785: x_return_status := FND_API.G_RET_STS_SUCCESS;
784: BEGIN
785: x_return_status := FND_API.G_RET_STS_SUCCESS;
786: --
787: SELECT *
788: INTO l_bisbv_target_levels
789: FROM BISBV_TARGET_LEVELS bisbv_target_levels
790: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
791: --
792: -- check if computing target function exists
785: x_return_status := FND_API.G_RET_STS_SUCCESS;
786: --
787: SELECT *
788: INTO l_bisbv_target_levels
789: FROM BISBV_TARGET_LEVELS bisbv_target_levels
790: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
791: --
792: -- check if computing target function exists
793: IF( ( BIS_UTILITIES_PUB.Value_Missing(p_Target_Rec.TARGET) = FND_API.G_TRUE
786: --
787: SELECT *
788: INTO l_bisbv_target_levels
789: FROM BISBV_TARGET_LEVELS bisbv_target_levels
790: WHERE bisbv_target_levels.TARGET_LEVEL_ID = p_Target_Rec.Target_Level_ID;
791: --
792: -- check if computing target function exists
793: IF( ( BIS_UTILITIES_PUB.Value_Missing(p_Target_Rec.TARGET) = FND_API.G_TRUE
794: OR p_Target_Rec.TARGET IS NULL
792: -- check if computing target function exists
793: IF( ( BIS_UTILITIES_PUB.Value_Missing(p_Target_Rec.TARGET) = FND_API.G_TRUE
794: OR p_Target_Rec.TARGET IS NULL
795: )
796: AND l_bisbv_target_levels.COMPUTING_FUNCTION_ID IS NULL
797: AND p_is_dbimeasure = 0 --added by gbhaloti #3148615
798: ) THEN
799: --added more parameters
800: l_error_tbl := x_error_tbl;