[Home] [Help]
93: x_dimension_level_rec.source
94: := BIS_UTILITIES_PUB.G_NULL_CHAR;
95:
96: EXCEPTION
97: WHEN FND_API.G_EXC_ERROR THEN
98: RAISE
99: ;
100: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
101: RAISE;
96: EXCEPTION
97: WHEN FND_API.G_EXC_ERROR THEN
98: RAISE
99: ;
100: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
101: RAISE;
102: WHEN OTHERS THEN
103: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
104:
99: ;
100: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
101: RAISE;
102: WHEN OTHERS THEN
103: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
104:
105: END SetNULL;
106: -- Defines one target for a specific set of dimension values for
107: -- one target level
107: -- one target level
108: PROCEDURE Create_Target
109: ( p_api_version IN NUMBER
110: , p_is_dbimeasure IN NUMBER := 0 --added by gbhaloti #3148615
111: , p_commit IN VARCHAR2 := FND_API.G_FALSE
112: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
113: , p_Target_Rec IN BIS_TARGET_PUB.Target_Rec_Type
114: , x_return_status OUT NOCOPY VARCHAR2
115: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
108: PROCEDURE Create_Target
109: ( p_api_version IN NUMBER
110: , p_is_dbimeasure IN NUMBER := 0 --added by gbhaloti #3148615
111: , p_commit IN VARCHAR2 := FND_API.G_FALSE
112: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
113: , p_Target_Rec IN BIS_TARGET_PUB.Target_Rec_Type
114: , x_return_status OUT NOCOPY VARCHAR2
115: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
116: )
140: --
141:
142: -- dbms_output.put_line( ' Inside pvt : 12 ' );
143:
144: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
145: RAISE FND_API.G_EXC_ERROR;
146: END IF;
147: --
148:
141:
142: -- dbms_output.put_line( ' Inside pvt : 12 ' );
143:
144: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
145: RAISE FND_API.G_EXC_ERROR;
146: END IF;
147: --
148:
149: Create_db_Target
192: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
193: , p_error_table => l_error_tbl
194: , x_error_table => x_error_tbl
195: );
196: RAISE FND_API.G_EXC_ERROR;
197: END IF;
198:
199: -- dbms_output.put_line( ' Inside pvt : 15 ' );
200:
270: -- dbms_output.put_line( ' Inside pvt : 16 ' );
271:
272: --
273: --added this
274: if (p_commit = FND_API.G_TRUE) then
275: COMMIT;
276: end if;
277:
278: -- dbms_output.put_line( ' Inside pvt : 17 ' );
278: -- dbms_output.put_line( ' Inside pvt : 17 ' );
279:
280: --commented RAISE
281: EXCEPTION
282: WHEN FND_API.G_EXC_ERROR THEN
283: x_return_status:= FND_API.G_RET_STS_ERROR;
284: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
285: htp.p('BIS_TARGET_PVT.Create_Target:G_EXC_ERROR'); htp.para;
286: END IF;
279:
280: --commented RAISE
281: EXCEPTION
282: WHEN FND_API.G_EXC_ERROR THEN
283: x_return_status:= FND_API.G_RET_STS_ERROR;
284: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
285: htp.p('BIS_TARGET_PVT.Create_Target:G_EXC_ERROR'); htp.para;
286: END IF;
287: --RAISE;
284: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
285: htp.p('BIS_TARGET_PVT.Create_Target:G_EXC_ERROR'); htp.para;
286: END IF;
287: --RAISE;
288: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
289: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
290: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
291: htp.p('BIS_TARGET_PVT.Create_Target:G_EXC_UNEXPECTED_ERROR'); htp.para;
292: END IF;
285: htp.p('BIS_TARGET_PVT.Create_Target:G_EXC_ERROR'); htp.para;
286: END IF;
287: --RAISE;
288: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
289: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
290: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
291: htp.p('BIS_TARGET_PVT.Create_Target:G_EXC_UNEXPECTED_ERROR'); htp.para;
292: END IF;
293: --RAISE;
291: htp.p('BIS_TARGET_PVT.Create_Target:G_EXC_UNEXPECTED_ERROR'); htp.para;
292: END IF;
293: --RAISE;
294: WHEN OTHERS THEN
295: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
296: l_error_Tbl := x_error_Tbl;
297: BIS_UTILITIES_PVT.Add_Error_Message
298: ( p_error_table => l_error_Tbl
299: , p_error_msg_id => SQLCODE
302: );
303: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
304: htp.p('BIS_TARGET_PVT.Create_Target:OTHERS'); htp.para;
305: END IF;
306: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
307: --
308: END Create_Target;
309: --
310: --
399: -- to FALSE.
400: PROCEDURE Retrieve_Targets
401: ( p_api_version IN NUMBER
402: , p_Target_Level_Rec IN BIS_TARGET_LEVEL_PUB.Target_Level_Rec_Type
403: , p_all_info IN VARCHAR2 := FND_API.G_TRUE
404: , x_Target_Tbl OUT NOCOPY BIS_TARGET_PUB.Target_Tbl_Type
405: , x_return_status OUT NOCOPY VARCHAR2
406: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
407: )
417: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
418:
419: --
420: BEGIN
421: x_return_status := FND_API.G_RET_STS_SUCCESS;
422: --
423: -- BIS_UTILITIES_PUB.put_line(p_text => ' ............................. ' );
424:
425: FOR cr IN c_all_targets
463:
464: -- if numeric target is missing, get the computed target
465: --
466: IF ((BIS_UTILITIES_PUB.Value_Missing(x_Target_tbl(l_ind).Target)
467: = FND_API.G_TRUE)
468: OR (BIS_UTILITIES_PUB.Value_Null(x_Target_tbl(l_ind).Target)
469: = FND_API.G_TRUE))
470: THEN
471: IF ((BIS_UTILITIES_PUB.Value_Missing
465: --
466: IF ((BIS_UTILITIES_PUB.Value_Missing(x_Target_tbl(l_ind).Target)
467: = FND_API.G_TRUE)
468: OR (BIS_UTILITIES_PUB.Value_Null(x_Target_tbl(l_ind).Target)
469: = FND_API.G_TRUE))
470: THEN
471: IF ((BIS_UTILITIES_PUB.Value_Missing
472: (p_Target_Level_Rec.COMPUTING_FUNCTION_ID) = FND_API.G_TRUE)
473: OR (BIS_UTILITIES_PUB.Value_Null
468: OR (BIS_UTILITIES_PUB.Value_Null(x_Target_tbl(l_ind).Target)
469: = FND_API.G_TRUE))
470: THEN
471: IF ((BIS_UTILITIES_PUB.Value_Missing
472: (p_Target_Level_Rec.COMPUTING_FUNCTION_ID) = FND_API.G_TRUE)
473: OR (BIS_UTILITIES_PUB.Value_Null
474: (p_Target_Level_Rec.COMPUTING_FUNCTION_ID) = FND_API.G_TRUE))
475: THEN
476: BIS_Target_Level_PVT.Retrieve_Target_Level
470: THEN
471: IF ((BIS_UTILITIES_PUB.Value_Missing
472: (p_Target_Level_Rec.COMPUTING_FUNCTION_ID) = FND_API.G_TRUE)
473: OR (BIS_UTILITIES_PUB.Value_Null
474: (p_Target_Level_Rec.COMPUTING_FUNCTION_ID) = FND_API.G_TRUE))
475: THEN
476: BIS_Target_Level_PVT.Retrieve_Target_Level
477: ( p_api_version => p_api_version
478: , p_Target_Level_Rec => p_Target_Level_Rec
475: THEN
476: BIS_Target_Level_PVT.Retrieve_Target_Level
477: ( p_api_version => p_api_version
478: , p_Target_Level_Rec => p_Target_Level_Rec
479: , p_all_info => FND_API.G_FALSE
480: , x_Target_Level_Rec => l_Target_Level_Rec
481: , x_return_status => x_return_status
482: , x_error_Tbl => x_error_Tbl
483: );
487:
488: -- only compute target if found computing fn id
489: --
490: IF ((BIS_UTILITIES_PUB.Value_Not_Missing
491: (l_Target_Level_Rec.COMPUTING_FUNCTION_ID) = FND_API.G_TRUE)
492: AND (BIS_UTILITIES_PUB.Value_Not_Null
493: (l_Target_Level_Rec.COMPUTING_FUNCTION_ID) = FND_API.G_TRUE))
494: THEN
495: x_target_tbl(l_ind).target :=
489: --
490: IF ((BIS_UTILITIES_PUB.Value_Not_Missing
491: (l_Target_Level_Rec.COMPUTING_FUNCTION_ID) = FND_API.G_TRUE)
492: AND (BIS_UTILITIES_PUB.Value_Not_Null
493: (l_Target_Level_Rec.COMPUTING_FUNCTION_ID) = FND_API.G_TRUE))
494: THEN
495: x_target_tbl(l_ind).target :=
496: Get_Target
497: ( p_computing_function_id => l_target_level_rec.computing_function_id
514: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
515: , p_error_table => l_error_tbl
516: , x_error_table => x_error_tbl
517: );
518: RAISE FND_API.G_EXC_ERROR;
519: end if;
520:
521: --commented RAISE
522: EXCEPTION
519: end if;
520:
521: --commented RAISE
522: EXCEPTION
523: WHEN FND_API.G_EXC_ERROR THEN
524: x_return_status:= FND_API.G_RET_STS_ERROR;
525: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
526: htp.p('BIS_TARGET_PVT.Retrieve_Targets:G_EXC_ERROR'); htp.para;
527: END IF;
520:
521: --commented RAISE
522: EXCEPTION
523: WHEN FND_API.G_EXC_ERROR THEN
524: x_return_status:= FND_API.G_RET_STS_ERROR;
525: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
526: htp.p('BIS_TARGET_PVT.Retrieve_Targets:G_EXC_ERROR'); htp.para;
527: END IF;
528: --RAISE;
525: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
526: htp.p('BIS_TARGET_PVT.Retrieve_Targets:G_EXC_ERROR'); htp.para;
527: END IF;
528: --RAISE;
529: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
530: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
531: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
532: htp.p('BIS_TARGET_PVT.Retrieve_Targets:G_EXC_UNEXPECTED_ERROR');
533: htp.para;
526: htp.p('BIS_TARGET_PVT.Retrieve_Targets:G_EXC_ERROR'); htp.para;
527: END IF;
528: --RAISE;
529: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
530: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
531: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
532: htp.p('BIS_TARGET_PVT.Retrieve_Targets:G_EXC_UNEXPECTED_ERROR');
533: htp.para;
534: END IF;
533: htp.para;
534: END IF;
535: --RAISE;
536: WHEN OTHERS THEN
537: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
538: l_error_Tbl := x_error_Tbl;
539: BIS_UTILITIES_PVT.Add_Error_Message
540: ( p_error_table => l_error_Tbl
541: , p_error_msg_id => SQLCODE
544: );
545: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
546: htp.p('BIS_TARGET_PVT.Retrieve_Targets:OTHERS'); htp.para;
547: END IF;
548: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
549: --
550: END Retrieve_Targets;
551: --
552: --
555: -- to FALSE.
556: PROCEDURE Retrieve_Target
557: ( p_api_version IN NUMBER
558: , p_Target_Rec IN BIS_TARGET_PUB.Target_Rec_Type
559: , p_all_info IN VARCHAR2 := FND_API.G_TRUE
560: , x_Target_Rec IN OUT NOCOPY BIS_TARGET_PUB.Target_Rec_Type
561: , x_return_status OUT NOCOPY VARCHAR2
562: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
563: )
577: --
578: BEGIN
579:
580: x_target_Rec := p_target_rec;
581: x_return_status := FND_API.G_RET_STS_SUCCESS;
582: --
583: IF( BIS_UTILITIES_PUB.Value_Not_Missing(p_Target_Rec.Target_ID)
584: = FND_API.G_TRUE
585: AND p_Target_Rec.Target_ID IS NOT NULL
580: x_target_Rec := p_target_rec;
581: x_return_status := FND_API.G_RET_STS_SUCCESS;
582: --
583: IF( BIS_UTILITIES_PUB.Value_Not_Missing(p_Target_Rec.Target_ID)
584: = FND_API.G_TRUE
585: AND p_Target_Rec.Target_ID IS NOT NULL
586: ) THEN
587: SELECT *
588: INTO l_bisfv_targets_rec
590: WHERE bisfv_targets.TARGET_ID = p_Target_Rec.Target_ID;
591:
592:
593: ELSIF( BIS_UTILITIES_PUB.Value_Not_Missing(p_Target_Rec.Target_Level_ID)
594: = FND_API.G_TRUE
595: AND p_Target_Rec.Target_Level_ID IS NOT NULL
596: ) THEN
597: SELECT *
598: INTO l_bisbv_target_levels_rec
607:
608: IF(l_bisbv_target_levels_rec.DIMENSION1_LEVEL_ID IS NOT NULL) THEN
609: IF( BIS_UTILITIES_PUB.Value_Missing
610: (p_Target_Rec.Dim1_Level_Value_ID)
611: = FND_API.G_TRUE
612: OR p_Target_Rec.Dim1_Level_Value_ID IS NULL
613: ) THEN
614:
615: --added Error Msg--------
621: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
622: , p_error_table => l_error_tbl
623: , x_error_table => x_error_tbl
624: );
625: RAISE FND_API.G_EXC_ERROR;
626: END IF;
627: ELSIF( BIS_UTILITIES_PUB.Value_Not_Missing
628: (p_Target_Rec.Dim1_Level_Value_ID)
629: = FND_API.G_TRUE
625: RAISE FND_API.G_EXC_ERROR;
626: END IF;
627: ELSIF( BIS_UTILITIES_PUB.Value_Not_Missing
628: (p_Target_Rec.Dim1_Level_Value_ID)
629: = FND_API.G_TRUE
630: AND p_Target_Rec.Dim1_Level_Value_ID IS NOT NULL
631: ) THEN
632:
633: --added Error Msg--------
639: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
640: , p_error_table => l_error_tbl
641: , x_error_table => x_error_tbl
642: );
643: RAISE FND_API.G_EXC_ERROR;
644: END IF;
645: --
646: IF(l_bisbv_target_levels_rec.DIMENSION2_LEVEL_ID IS NOT NULL) THEN
647: IF( BIS_UTILITIES_PUB.Value_Missing
645: --
646: IF(l_bisbv_target_levels_rec.DIMENSION2_LEVEL_ID IS NOT NULL) THEN
647: IF( BIS_UTILITIES_PUB.Value_Missing
648: (p_Target_Rec.Dim2_Level_Value_ID)
649: = FND_API.G_TRUE
650: OR p_Target_Rec.Dim2_Level_Value_ID IS NULL
651: ) THEN
652: --added Error Msg--------
653: l_error_tbl := x_error_tbl;
658: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
659: , p_error_table => l_error_tbl
660: , x_error_table => x_error_tbl
661: );
662: RAISE FND_API.G_EXC_ERROR;
663: END IF;
664: ELSIF( BIS_UTILITIES_PUB.Value_Not_Missing
665: (p_Target_Rec.Dim2_Level_Value_ID)
666: = FND_API.G_TRUE
662: RAISE FND_API.G_EXC_ERROR;
663: END IF;
664: ELSIF( BIS_UTILITIES_PUB.Value_Not_Missing
665: (p_Target_Rec.Dim2_Level_Value_ID)
666: = FND_API.G_TRUE
667: AND p_Target_Rec.Dim2_Level_Value_ID IS NOT NULL
668: ) THEN
669: --added Error Msg--------
670: l_error_tbl := x_error_tbl;
675: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
676: , p_error_table => l_error_tbl
677: , x_error_table => x_error_tbl
678: );
679: RAISE FND_API.G_EXC_ERROR;
680: END IF;
681: --
682: IF(l_bisbv_target_levels_rec.DIMENSION3_LEVEL_ID IS NOT NULL) THEN
683: IF( BIS_UTILITIES_PUB.Value_Missing
681: --
682: IF(l_bisbv_target_levels_rec.DIMENSION3_LEVEL_ID IS NOT NULL) THEN
683: IF( BIS_UTILITIES_PUB.Value_Missing
684: (p_Target_Rec.Dim3_Level_Value_ID)
685: = FND_API.G_TRUE
686: OR p_Target_Rec.Dim3_Level_Value_ID IS NULL
687: ) THEN
688: --added Error Msg--------
689: l_error_tbl := x_error_tbl;
694: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
695: , p_error_table => l_error_tbl
696: , x_error_table => x_error_tbl
697: );
698: RAISE FND_API.G_EXC_ERROR;
699: END IF;
700: ELSIF( BIS_UTILITIES_PUB.Value_Not_Missing
701: (p_Target_Rec.Dim3_Level_Value_ID)
702: = FND_API.G_TRUE
698: RAISE FND_API.G_EXC_ERROR;
699: END IF;
700: ELSIF( BIS_UTILITIES_PUB.Value_Not_Missing
701: (p_Target_Rec.Dim3_Level_Value_ID)
702: = FND_API.G_TRUE
703: AND p_Target_Rec.Dim3_Level_Value_ID IS NOT NULL
704: )
705: THEN
706: --added Error Msg--------
712: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
713: , p_error_table => l_error_tbl
714: , x_error_table => x_error_tbl
715: );
716: RAISE FND_API.G_EXC_ERROR;
717: END IF;
718: --
719: IF(l_bisbv_target_levels_rec.DIMENSION4_LEVEL_ID IS NOT NULL) THEN
720: IF( BIS_UTILITIES_PUB.Value_Missing
718: --
719: IF(l_bisbv_target_levels_rec.DIMENSION4_LEVEL_ID IS NOT NULL) THEN
720: IF( BIS_UTILITIES_PUB.Value_Missing
721: (p_Target_Rec.Dim4_Level_Value_ID)
722: = FND_API.G_TRUE
723: OR p_Target_Rec.Dim4_Level_Value_ID IS NULL
724: ) THEN
725: --added Error Msg--------
726: l_error_tbl := x_error_tbl;
731: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
732: , p_error_table => l_error_tbl
733: , x_error_table => x_error_tbl
734: );
735: RAISE FND_API.G_EXC_ERROR;
736: END IF;
737: ELSIF( BIS_UTILITIES_PUB.Value_Not_Missing
738: (p_Target_Rec.Dim4_Level_Value_ID)
739: = FND_API.G_TRUE
735: RAISE FND_API.G_EXC_ERROR;
736: END IF;
737: ELSIF( BIS_UTILITIES_PUB.Value_Not_Missing
738: (p_Target_Rec.Dim4_Level_Value_ID)
739: = FND_API.G_TRUE
740: AND p_Target_Rec.Dim4_Level_Value_ID IS NOT NULL
741: ) THEN
742: --added Error Msg--------
743: l_error_tbl := x_error_tbl;
748: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
749: , p_error_table => l_error_tbl
750: , x_error_table => x_error_tbl
751: );
752: RAISE FND_API.G_EXC_ERROR;
753: END IF;
754: --
755: IF(l_bisbv_target_levels_rec.DIMENSION5_LEVEL_ID IS NOT NULL) THEN
756: IF( BIS_UTILITIES_PUB.Value_Missing
754: --
755: IF(l_bisbv_target_levels_rec.DIMENSION5_LEVEL_ID IS NOT NULL) THEN
756: IF( BIS_UTILITIES_PUB.Value_Missing
757: (p_Target_Rec.Dim5_Level_Value_ID)
758: = FND_API.G_TRUE
759: OR p_Target_Rec.Dim5_Level_Value_ID IS NULL
760: ) THEN
761: --added Error Msg--------
762: l_error_tbl := x_error_tbl;
767: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
768: , p_error_table => l_error_tbl
769: , x_error_table => x_error_tbl
770: );
771: RAISE FND_API.G_EXC_ERROR;
772: END IF;
773: ELSIF( BIS_UTILITIES_PUB.Value_Not_Missing
774: (p_Target_Rec.Dim5_Level_Value_ID)
775: = FND_API.G_TRUE
771: RAISE FND_API.G_EXC_ERROR;
772: END IF;
773: ELSIF( BIS_UTILITIES_PUB.Value_Not_Missing
774: (p_Target_Rec.Dim5_Level_Value_ID)
775: = FND_API.G_TRUE
776: AND p_Target_Rec.Dim5_Level_Value_ID IS NOT NULL
777: ) THEN
778: --added Error Msg--------
779: l_error_tbl := x_error_tbl;
784: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
785: , p_error_table => l_error_tbl
786: , x_error_table => x_error_tbl
787: );
788: RAISE FND_API.G_EXC_ERROR;
789: END IF;
790: --
791: IF(l_bisbv_target_levels_rec.DIMENSION6_LEVEL_ID IS NOT NULL) THEN
792: IF( BIS_UTILITIES_PUB.Value_Missing
790: --
791: IF(l_bisbv_target_levels_rec.DIMENSION6_LEVEL_ID IS NOT NULL) THEN
792: IF( BIS_UTILITIES_PUB.Value_Missing
793: (p_Target_Rec.Dim6_Level_Value_ID)
794: = FND_API.G_TRUE
795: OR p_Target_Rec.Dim6_Level_Value_ID IS NULL
796: ) THEN
797: --added Error Msg--------
798: l_error_tbl := x_error_tbl;
803: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
804: , p_error_table => l_error_tbl
805: , x_error_table => x_error_tbl
806: );
807: RAISE FND_API.G_EXC_ERROR;
808: END IF;
809: ELSIF( BIS_UTILITIES_PUB.Value_Not_Missing
810: (p_Target_Rec.Dim6_Level_Value_ID)
811: = FND_API.G_TRUE
807: RAISE FND_API.G_EXC_ERROR;
808: END IF;
809: ELSIF( BIS_UTILITIES_PUB.Value_Not_Missing
810: (p_Target_Rec.Dim6_Level_Value_ID)
811: = FND_API.G_TRUE
812: AND p_Target_Rec.Dim6_Level_Value_ID IS NOT NULL
813: ) THEN
814: --added Error Msg--------
815: l_error_tbl := x_error_tbl;
820: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
821: , p_error_table => l_error_tbl
822: , x_error_table => x_error_tbl
823: );
824: RAISE FND_API.G_EXC_ERROR;
825: END IF;
826: --
827: --
828: IF(l_bisbv_target_levels_rec.DIMENSION7_LEVEL_ID IS NOT NULL) THEN
827: --
828: IF(l_bisbv_target_levels_rec.DIMENSION7_LEVEL_ID IS NOT NULL) THEN
829: IF( BIS_UTILITIES_PUB.Value_Missing
830: (p_Target_Rec.Dim7_Level_Value_ID)
831: = FND_API.G_TRUE
832: OR p_Target_Rec.Dim7_Level_Value_ID IS NULL
833: ) THEN
834: --added Error Msg--------
835: l_error_tbl := x_error_tbl;
840: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
841: , p_error_table => l_error_tbl
842: , x_error_table => x_error_tbl
843: );
844: RAISE FND_API.G_EXC_ERROR;
845: END IF;
846: ELSIF( BIS_UTILITIES_PUB.Value_Not_Missing
847: (p_Target_Rec.Dim7_Level_Value_ID)
848: = FND_API.G_TRUE
844: RAISE FND_API.G_EXC_ERROR;
845: END IF;
846: ELSIF( BIS_UTILITIES_PUB.Value_Not_Missing
847: (p_Target_Rec.Dim7_Level_Value_ID)
848: = FND_API.G_TRUE
849: AND p_Target_Rec.Dim7_Level_Value_ID IS NOT NULL
850: ) THEN
851: --added Error Msg--------
852: l_error_tbl := x_error_tbl;
857: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
858: , p_error_table => l_error_tbl
859: , x_error_table => x_error_tbl
860: );
861: RAISE FND_API.G_EXC_ERROR;
862: END IF;
863: --
864:
865:
866:
867: ---If Plan Id is not given, get Plan Id from Short name
868:
869: if (BIS_UTILITIES_PUB.Value_Missing(p_Target_Rec.Plan_ID)
870: = FND_API.G_TRUE) then
871: if (BIS_UTILITIES_PUB.Value_Not_Missing(p_Target_Rec.Plan_Short_Name)
872: = FND_API.G_TRUE) then
873: l_Business_Plan_Rec.Business_Plan_Short_Name := p_Target_Rec.Plan_Short_Name;
874: l_Business_Plan_Rec_p := l_Business_Plan_Rec;
868:
869: if (BIS_UTILITIES_PUB.Value_Missing(p_Target_Rec.Plan_ID)
870: = FND_API.G_TRUE) then
871: if (BIS_UTILITIES_PUB.Value_Not_Missing(p_Target_Rec.Plan_Short_Name)
872: = FND_API.G_TRUE) then
873: l_Business_Plan_Rec.Business_Plan_Short_Name := p_Target_Rec.Plan_Short_Name;
874: l_Business_Plan_Rec_p := l_Business_Plan_Rec;
875: BIS_BUSINESS_PLAN_PVT.Value_ID_Conversion
876: ( p_api_version => p_api_version
878: , x_Business_Plan_Rec => l_Business_Plan_Rec
879: , x_return_status => x_return_status
880: , x_error_Tbl => x_error_tbl
881: );
882: if(x_return_status = FND_API.G_RET_STS_SUCCESS) then
883: l_plan_id := l_Business_Plan_Rec.Business_Plan_ID;
884: end if;
885: end if;
886: else
886: else
887: l_plan_id := p_Target_Rec.Plan_ID ;
888: end if;
889:
890: if(BIS_UTILITIES_PUB.Value_Missing(p_Target_Rec.Org_Level_Value_ID) = FND_API.G_TRUE)
891: then l_org_level_value_id := NULL;
892: else
893: l_org_level_value_id := p_Target_Rec.Org_Level_Value_ID;
894: end if;
893: l_org_level_value_id := p_Target_Rec.Org_Level_Value_ID;
894: end if;
895:
896:
897: if(BIS_UTILITIES_PUB.Value_Missing(p_Target_Rec.Time_Level_Value_ID) = FND_API.G_TRUE)
898: then l_time_level_value_id := NULL;
899: else
900: l_time_level_value_id := p_Target_Rec.Time_Level_Value_ID;
901: end if;
918: OR NVL(bisfv_targets.TIME_LEVEL_VALUE_ID,'T') = NVL(l_time_level_value_id, 'T'))
919:
920: AND NVL(bisfv_targets.DIM1_LEVEL_VALUE_ID, 'T')
921: = DECODE( p_Target_Rec.Dim1_Level_Value_ID
922: , FND_API.G_MISS_CHAR
923: , 'T'
924: , NVL(p_Target_Rec.Dim1_Level_Value_ID, 'T')
925: )
926: AND NVL(bisfv_targets.DIM2_LEVEL_VALUE_ID, 'T')
924: , NVL(p_Target_Rec.Dim1_Level_Value_ID, 'T')
925: )
926: AND NVL(bisfv_targets.DIM2_LEVEL_VALUE_ID, 'T')
927: = DECODE( p_Target_Rec.Dim2_Level_Value_ID
928: , FND_API.G_MISS_CHAR
929: , 'T'
930: , NVL(p_Target_Rec.Dim2_Level_Value_ID, 'T')
931: )
932: AND NVL(bisfv_targets.DIM3_LEVEL_VALUE_ID, 'T')
930: , NVL(p_Target_Rec.Dim2_Level_Value_ID, 'T')
931: )
932: AND NVL(bisfv_targets.DIM3_LEVEL_VALUE_ID, 'T')
933: = DECODE( p_Target_Rec.Dim3_Level_Value_ID
934: , FND_API.G_MISS_CHAR
935: , 'T'
936: , NVL(p_Target_Rec.Dim3_Level_Value_ID, 'T')
937: )
938: AND NVL(bisfv_targets.DIM4_LEVEL_VALUE_ID, 'T')
936: , NVL(p_Target_Rec.Dim3_Level_Value_ID, 'T')
937: )
938: AND NVL(bisfv_targets.DIM4_LEVEL_VALUE_ID, 'T')
939: = DECODE( p_Target_Rec.Dim4_Level_Value_ID
940: , FND_API.G_MISS_CHAR
941: , 'T'
942: , NVL(p_Target_Rec.Dim4_Level_Value_ID, 'T')
943: )
944: AND NVL(bisfv_targets.DIM5_LEVEL_VALUE_ID, 'T')
942: , NVL(p_Target_Rec.Dim4_Level_Value_ID, 'T')
943: )
944: AND NVL(bisfv_targets.DIM5_LEVEL_VALUE_ID, 'T')
945: = DECODE( p_Target_Rec.Dim5_Level_Value_ID
946: , FND_API.G_MISS_CHAR
947: , 'T'
948: , NVL(p_Target_Rec.Dim5_Level_Value_ID, 'T')
949: )
950: AND NVL(bisfv_targets.DIM6_LEVEL_VALUE_ID, 'T')
948: , NVL(p_Target_Rec.Dim5_Level_Value_ID, 'T')
949: )
950: AND NVL(bisfv_targets.DIM6_LEVEL_VALUE_ID, 'T')
951: = DECODE( p_Target_Rec.Dim6_Level_Value_ID
952: , FND_API.G_MISS_CHAR
953: , 'T'
954: , NVL(p_Target_Rec.Dim6_Level_Value_ID, 'T')
955: )
956: AND NVL(bisfv_targets.DIM7_LEVEL_VALUE_ID, 'T')
954: , NVL(p_Target_Rec.Dim6_Level_Value_ID, 'T')
955: )
956: AND NVL(bisfv_targets.DIM7_LEVEL_VALUE_ID, 'T')
957: = DECODE( p_Target_Rec.Dim7_Level_Value_ID
958: , FND_API.G_MISS_CHAR
959: , 'T'
960: , NVL(p_Target_Rec.Dim7_Level_Value_ID, 'T')
961: )
962: ;
1010: x_Target_Rec.Notify_Resp3_Name := l_bisfv_targets_rec.Notify_Resp3_Name;
1011:
1012: -- if numeric target is missing, get the computed target
1013: --
1014: IF ((BIS_UTILITIES_PUB.Value_Missing(x_Target_Rec.Target) = FND_API.G_TRUE)
1015: OR (BIS_UTILITIES_PUB.Value_Null(x_Target_Rec.Target) = FND_API.G_TRUE))
1016: THEN
1017: IF ((BIS_UTILITIES_PUB.Value_Not_Missing
1018: (x_Target_Rec.target_level_ID) = FND_API.G_TRUE)
1011:
1012: -- if numeric target is missing, get the computed target
1013: --
1014: IF ((BIS_UTILITIES_PUB.Value_Missing(x_Target_Rec.Target) = FND_API.G_TRUE)
1015: OR (BIS_UTILITIES_PUB.Value_Null(x_Target_Rec.Target) = FND_API.G_TRUE))
1016: THEN
1017: IF ((BIS_UTILITIES_PUB.Value_Not_Missing
1018: (x_Target_Rec.target_level_ID) = FND_API.G_TRUE)
1019: AND (BIS_UTILITIES_PUB.Value_Not_Null
1014: IF ((BIS_UTILITIES_PUB.Value_Missing(x_Target_Rec.Target) = FND_API.G_TRUE)
1015: OR (BIS_UTILITIES_PUB.Value_Null(x_Target_Rec.Target) = FND_API.G_TRUE))
1016: THEN
1017: IF ((BIS_UTILITIES_PUB.Value_Not_Missing
1018: (x_Target_Rec.target_level_ID) = FND_API.G_TRUE)
1019: AND (BIS_UTILITIES_PUB.Value_Not_Null
1020: (x_Target_Rec.target_level_ID) = FND_API.G_TRUE))
1021: THEN
1022: l_Target_Level_Rec.target_level_ID := x_Target_Rec.target_level_ID;
1016: THEN
1017: IF ((BIS_UTILITIES_PUB.Value_Not_Missing
1018: (x_Target_Rec.target_level_ID) = FND_API.G_TRUE)
1019: AND (BIS_UTILITIES_PUB.Value_Not_Null
1020: (x_Target_Rec.target_level_ID) = FND_API.G_TRUE))
1021: THEN
1022: l_Target_Level_Rec.target_level_ID := x_Target_Rec.target_level_ID;
1023: l_Target_Level_Rec_p := l_Target_Level_Rec;
1024: BIS_Target_Level_PVT.Retrieve_Target_Level
1023: l_Target_Level_Rec_p := l_Target_Level_Rec;
1024: BIS_Target_Level_PVT.Retrieve_Target_Level
1025: ( p_api_version => p_api_version
1026: , p_Target_Level_Rec => l_Target_Level_Rec_p
1027: , p_all_info => FND_API.G_FALSE
1028: , x_Target_Level_Rec => l_Target_Level_Rec
1029: , x_return_status => x_return_status
1030: , x_error_Tbl => x_error_Tbl
1031: );
1033:
1034: -- only compute target if found computing fn id
1035: --
1036: IF ((BIS_UTILITIES_PUB.Value_Not_Missing
1037: (l_Target_Level_Rec.COMPUTING_FUNCTION_ID) = FND_API.G_TRUE)
1038: AND (BIS_UTILITIES_PUB.Value_Not_Null
1039: (l_Target_Level_Rec.COMPUTING_FUNCTION_ID) = FND_API.G_TRUE))
1040: THEN
1041: x_target_rec.target :=
1035: --
1036: IF ((BIS_UTILITIES_PUB.Value_Not_Missing
1037: (l_Target_Level_Rec.COMPUTING_FUNCTION_ID) = FND_API.G_TRUE)
1038: AND (BIS_UTILITIES_PUB.Value_Not_Null
1039: (l_Target_Level_Rec.COMPUTING_FUNCTION_ID) = FND_API.G_TRUE))
1040: THEN
1041: x_target_rec.target :=
1042: Get_Target
1043: ( p_computing_function_id => l_target_level_rec.computing_function_id
1061: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
1062: , p_error_table => l_error_tbl
1063: , x_error_table => x_error_tbl
1064: );
1065: x_return_status := FND_API.G_RET_STS_ERROR ;
1066: WHEN FND_API.G_EXC_ERROR THEN
1067: x_return_status:= FND_API.G_RET_STS_ERROR;
1068: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1069: htp.p('BIS_TARGET_PVT.Retrieve_Target:G_EXC_ERROR'); htp.para;
1062: , p_error_table => l_error_tbl
1063: , x_error_table => x_error_tbl
1064: );
1065: x_return_status := FND_API.G_RET_STS_ERROR ;
1066: WHEN FND_API.G_EXC_ERROR THEN
1067: x_return_status:= FND_API.G_RET_STS_ERROR;
1068: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1069: htp.p('BIS_TARGET_PVT.Retrieve_Target:G_EXC_ERROR'); htp.para;
1070: END IF;
1063: , x_error_table => x_error_tbl
1064: );
1065: x_return_status := FND_API.G_RET_STS_ERROR ;
1066: WHEN FND_API.G_EXC_ERROR THEN
1067: x_return_status:= FND_API.G_RET_STS_ERROR;
1068: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1069: htp.p('BIS_TARGET_PVT.Retrieve_Target:G_EXC_ERROR'); htp.para;
1070: END IF;
1071: -- RAISE;
1068: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1069: htp.p('BIS_TARGET_PVT.Retrieve_Target:G_EXC_ERROR'); htp.para;
1070: END IF;
1071: -- RAISE;
1072: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1073: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
1074: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1075: htp.p('BIS_TARGET_PVT.Retrieve_Target:G_EXC_UNEXPECTED_ERROR');
1076: htp.para;
1069: htp.p('BIS_TARGET_PVT.Retrieve_Target:G_EXC_ERROR'); htp.para;
1070: END IF;
1071: -- RAISE;
1072: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1073: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
1074: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1075: htp.p('BIS_TARGET_PVT.Retrieve_Target:G_EXC_UNEXPECTED_ERROR');
1076: htp.para;
1077: END IF;
1076: htp.para;
1077: END IF;
1078: -- RAISE;
1079: WHEN OTHERS THEN
1080: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
1081: l_error_Tbl := x_error_Tbl;
1082: BIS_UTILITIES_PVT.Add_Error_Message
1083: ( p_error_table => l_error_Tbl
1084: , p_error_msg_id => SQLCODE
1087: );
1088: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1089: htp.p('BIS_TARGET_PVT.Retrieve_Target:OTHERS'); htp.para;
1090: END IF;
1091: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1092: --
1093: END Retrieve_Target;
1094: --
1095: --
1099: --
1100: PROCEDURE Retrieve_Target_Owners
1101: ( p_api_version IN NUMBER
1102: , p_Target_Rec IN BIS_TARGET_PUB.Target_Rec_Type
1103: , p_all_info IN VARCHAR2 := FND_API.G_TRUE
1104: , x_Target_Owners_Rec OUT NOCOPY BIS_TARGET_PUB.Target_Owners_Rec_Type
1105: , x_return_status OUT NOCOPY VARCHAR2
1106: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
1107: )
1145: x_target_owners_rec := l_target_owners_rec;
1146:
1147: --commented RAISE
1148: EXCEPTION
1149: WHEN FND_API.G_EXC_ERROR THEN
1150: x_return_status:= FND_API.G_RET_STS_ERROR;
1151: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1152: htp.p('BIS_TARGET_PVT.Retrieve_Target_owners:G_EXC_ERROR');
1153: htp.para;
1146:
1147: --commented RAISE
1148: EXCEPTION
1149: WHEN FND_API.G_EXC_ERROR THEN
1150: x_return_status:= FND_API.G_RET_STS_ERROR;
1151: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1152: htp.p('BIS_TARGET_PVT.Retrieve_Target_owners:G_EXC_ERROR');
1153: htp.para;
1154: END IF;
1152: htp.p('BIS_TARGET_PVT.Retrieve_Target_owners:G_EXC_ERROR');
1153: htp.para;
1154: END IF;
1155: -- RAISE;
1156: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1157: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
1158: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1159: htp.p('BIS_TARGET_PVT.Retrieve_Target_owners:G_EXC_UNEXPECTED_ERROR');
1160: htp.para;
1153: htp.para;
1154: END IF;
1155: -- RAISE;
1156: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1157: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
1158: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1159: htp.p('BIS_TARGET_PVT.Retrieve_Target_owners:G_EXC_UNEXPECTED_ERROR');
1160: htp.para;
1161: END IF;
1160: htp.para;
1161: END IF;
1162: -- RAISE;
1163: WHEN OTHERS THEN
1164: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
1165: l_error_Tbl_p := x_error_Tbl;
1166: BIS_UTILITIES_PVT.Add_Error_Message
1167: ( p_error_table => l_error_Tbl_p
1168: , p_error_msg_id => SQLCODE
1171: );
1172: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1173: htp.p('BIS_TARGET_PVT.Retrieve_Target_owners:OTHERS'); htp.para;
1174: END IF;
1175: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1176:
1177: END Retrieve_Target_Owners;
1178: --
1179: -- Modifies one target for a specific set of dimension values for
1180: -- one target level
1181: PROCEDURE Update_Target
1182: ( p_api_version IN NUMBER
1183: , p_is_dbimeasure IN NUMBER := 0 --gbhaloti #3148615
1184: , p_commit IN VARCHAR2 := FND_API.G_FALSE
1185: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1186: , p_Target_Rec IN BIS_TARGET_PUB.Target_Rec_Type
1187: , x_return_status OUT NOCOPY VARCHAR2
1188: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
1181: PROCEDURE Update_Target
1182: ( p_api_version IN NUMBER
1183: , p_is_dbimeasure IN NUMBER := 0 --gbhaloti #3148615
1184: , p_commit IN VARCHAR2 := FND_API.G_FALSE
1185: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1186: , p_Target_Rec IN BIS_TARGET_PUB.Target_Rec_Type
1187: , x_return_status OUT NOCOPY VARCHAR2
1188: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
1189: )
1228: , x_return_status => x_return_status
1229: , x_error_Tbl => x_error_Tbl
1230: );
1231: --
1232: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1233:
1234: RAISE FND_API.G_EXC_ERROR;
1235: END IF;
1236:
1230: );
1231: --
1232: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1233:
1234: RAISE FND_API.G_EXC_ERROR;
1235: END IF;
1236:
1237: --
1238: BEGIN
1273: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
1274: , p_error_table => l_error_tbl
1275: , x_error_table => x_error_tbl
1276: );
1277: RAISE FND_API.G_EXC_ERROR;
1278: END IF;
1279: EXCEPTION
1280: WHEN NO_DATA_FOUND THEN
1281:
1289: , p_error_table => l_error_tbl
1290: , x_error_table => x_error_tbl
1291: );
1292: --NULL;
1293: RAISE FND_API.G_EXC_ERROR;
1294: WHEN OTHERS THEN
1295:
1296: RAISE;
1297: END;
1331: WHERE TARGET_ID = l_Target_Rec.TARGET_ID;
1332: --
1333:
1334: --added this
1335: if (p_commit = FND_API.G_TRUE) then
1336: COMMIT;
1337: end if;
1338: --commented RAISE
1339: EXCEPTION
1336: COMMIT;
1337: end if;
1338: --commented RAISE
1339: EXCEPTION
1340: WHEN FND_API.G_EXC_ERROR THEN
1341: x_return_status:= FND_API.G_RET_STS_ERROR;
1342: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1343: htp.p('BIS_TARGET_PVT.Update_Target:G_EXC_ERROR'); htp.para;
1344: END IF;
1337: end if;
1338: --commented RAISE
1339: EXCEPTION
1340: WHEN FND_API.G_EXC_ERROR THEN
1341: x_return_status:= FND_API.G_RET_STS_ERROR;
1342: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1343: htp.p('BIS_TARGET_PVT.Update_Target:G_EXC_ERROR'); htp.para;
1344: END IF;
1345: --RAISE;
1342: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1343: htp.p('BIS_TARGET_PVT.Update_Target:G_EXC_ERROR'); htp.para;
1344: END IF;
1345: --RAISE;
1346: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1347: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
1348: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1349: htp.p('BIS_TARGET_PVT.Update_Target:G_EXC_UNEXPECTED_ERROR'); htp.para;
1350: END IF;
1343: htp.p('BIS_TARGET_PVT.Update_Target:G_EXC_ERROR'); htp.para;
1344: END IF;
1345: --RAISE;
1346: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1347: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
1348: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1349: htp.p('BIS_TARGET_PVT.Update_Target:G_EXC_UNEXPECTED_ERROR'); htp.para;
1350: END IF;
1351: --RAISE;
1349: htp.p('BIS_TARGET_PVT.Update_Target:G_EXC_UNEXPECTED_ERROR'); htp.para;
1350: END IF;
1351: --RAISE;
1352: WHEN OTHERS THEN
1353: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
1354: l_error_Tbl := x_error_Tbl;
1355: BIS_UTILITIES_PVT.Add_Error_Message
1356: ( p_error_table => l_error_Tbl
1357: , p_error_msg_id => SQLCODE
1360: );
1361: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1362: htp.p('BIS_TARGET_PVT.Update_Target:OTHERS'); htp.para;
1363: END IF;
1364: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1365: --
1366: END Update_Target;
1367: --
1368: --
1379: l_error_Tbl_p BIS_UTILITIES_PUB.Error_Tbl_Type;
1380: BEGIN
1381: x_Target_Rec := p_Target_Rec;
1382: IF( BIS_UTILITIES_PUB.Value_Missing(x_Target_Rec.TARGET_ID)
1383: = FND_API.G_TRUE
1384: OR x_Target_Rec.TARGET_ID IS NULL
1385: ) THEN
1386: SELECT TARGET_ID
1387: INTO x_Target_Rec.TARGET_ID
1389: WHERE BISBV_TARGETS.TARGET_LEVEL_ID = x_Target_Rec.Target_Level_ID
1390: AND BISBV_TARGETS.PLAN_ID = x_Target_Rec.Plan_ID
1391: AND NVL(BISBV_TARGETS.ORG_LEVEL_VALUE_ID, 'T')
1392: = DECODE( x_Target_Rec.Org_Level_Value_ID
1393: , FND_API.G_MISS_CHAR
1394: , 'T'
1395: , NVL(x_Target_Rec.Org_Level_Value_ID, 'T')
1396: )
1397: AND NVL(BISBV_TARGETS.TIME_LEVEL_VALUE_ID, 'T')
1395: , NVL(x_Target_Rec.Org_Level_Value_ID, 'T')
1396: )
1397: AND NVL(BISBV_TARGETS.TIME_LEVEL_VALUE_ID, 'T')
1398: = DECODE( x_Target_Rec.Time_Level_Value_ID
1399: , FND_API.G_MISS_CHAR
1400: , 'T'
1401: , NVL(x_Target_Rec.Time_Level_Value_ID, 'T')
1402: )
1403: AND NVL(BISBV_TARGETS.DIM1_LEVEL_VALUE_ID, 'T')
1401: , NVL(x_Target_Rec.Time_Level_Value_ID, 'T')
1402: )
1403: AND NVL(BISBV_TARGETS.DIM1_LEVEL_VALUE_ID, 'T')
1404: = DECODE( x_Target_Rec.Dim1_Level_Value_ID
1405: , FND_API.G_MISS_CHAR
1406: , 'T'
1407: , NVL(x_Target_Rec.Dim1_Level_Value_ID, 'T')
1408: )
1409: AND NVL(BISBV_TARGETS.DIM2_LEVEL_VALUE_ID, 'T')
1407: , NVL(x_Target_Rec.Dim1_Level_Value_ID, 'T')
1408: )
1409: AND NVL(BISBV_TARGETS.DIM2_LEVEL_VALUE_ID, 'T')
1410: = DECODE( x_Target_Rec.Dim2_Level_Value_ID
1411: , FND_API.G_MISS_CHAR
1412: , 'T'
1413: , NVL(x_Target_Rec.Dim2_Level_Value_ID, 'T')
1414: )
1415: AND NVL(BISBV_TARGETS.DIM3_LEVEL_VALUE_ID, 'T')
1413: , NVL(x_Target_Rec.Dim2_Level_Value_ID, 'T')
1414: )
1415: AND NVL(BISBV_TARGETS.DIM3_LEVEL_VALUE_ID, 'T')
1416: = DECODE( x_Target_Rec.Dim3_Level_Value_ID
1417: , FND_API.G_MISS_CHAR
1418: , 'T'
1419: , NVL(x_Target_Rec.Dim3_Level_Value_ID, 'T')
1420: )
1421: AND NVL(BISBV_TARGETS.DIM4_LEVEL_VALUE_ID, 'T')
1419: , NVL(x_Target_Rec.Dim3_Level_Value_ID, 'T')
1420: )
1421: AND NVL(BISBV_TARGETS.DIM4_LEVEL_VALUE_ID, 'T')
1422: = DECODE( x_Target_Rec.Dim4_Level_Value_ID
1423: , FND_API.G_MISS_CHAR
1424: , 'T'
1425: , NVL(x_Target_Rec.Dim4_Level_Value_ID, 'T')
1426: )
1427: AND NVL(BISBV_TARGETS.DIM5_LEVEL_VALUE_ID, 'T')
1425: , NVL(x_Target_Rec.Dim4_Level_Value_ID, 'T')
1426: )
1427: AND NVL(BISBV_TARGETS.DIM5_LEVEL_VALUE_ID, 'T')
1428: = DECODE( x_Target_Rec.Dim5_Level_Value_ID
1429: , FND_API.G_MISS_CHAR
1430: , 'T'
1431: , NVL(x_Target_Rec.Dim5_Level_Value_ID, 'T')
1432: )
1433: AND NVL(BISBV_TARGETS.DIM6_LEVEL_VALUE_ID, 'T')
1431: , NVL(x_Target_Rec.Dim5_Level_Value_ID, 'T')
1432: )
1433: AND NVL(BISBV_TARGETS.DIM6_LEVEL_VALUE_ID, 'T')
1434: = DECODE( x_Target_Rec.Dim6_Level_Value_ID
1435: , FND_API.G_MISS_CHAR
1436: , 'T'
1437: , NVL(x_Target_Rec.Dim6_Level_Value_ID, 'T')
1438: )
1439: AND NVL(BISBV_TARGETS.DIM7_LEVEL_VALUE_ID, 'T')
1437: , NVL(x_Target_Rec.Dim6_Level_Value_ID, 'T')
1438: )
1439: AND NVL(BISBV_TARGETS.DIM7_LEVEL_VALUE_ID, 'T')
1440: = DECODE( x_Target_Rec.Dim7_Level_Value_ID
1441: , FND_API.G_MISS_CHAR
1442: , 'T'
1443: , NVL(x_Target_Rec.Dim7_Level_Value_ID, 'T')
1444: )
1445: ;
1444: )
1445: ;
1446: END IF;
1447: --
1448: x_return_status := FND_API.G_RET_STS_SUCCESS;
1449: --
1450: --commented RAISE
1451: EXCEPTION
1452: WHEN NO_DATA_FOUND THEN
1449: --
1450: --commented RAISE
1451: EXCEPTION
1452: WHEN NO_DATA_FOUND THEN
1453: x_return_status:= FND_API.G_RET_STS_ERROR;
1454: --added more params and changed the message
1455: l_error_tbl := x_error_tbl;
1456: BIS_UTILITIES_PVT.Add_Error_Message
1457: ( p_error_msg_name => 'BIS_INVALID_TARGET_VALUE'
1463: );
1464: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1465: htp.p('BIS_TARGET_PVT.GetID:NO_DATA_FOUND'); htp.para;
1466: END IF;
1467: -- RAISE FND_API.G_EXC_ERROR;
1468: WHEN FND_API.G_EXC_ERROR THEN
1469: x_return_status:= FND_API.G_RET_STS_ERROR;
1470: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1471: htp.p('BIS_TARGET_PVT.GetID:G_EXC_ERROR'); htp.para;
1464: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1465: htp.p('BIS_TARGET_PVT.GetID:NO_DATA_FOUND'); htp.para;
1466: END IF;
1467: -- RAISE FND_API.G_EXC_ERROR;
1468: WHEN FND_API.G_EXC_ERROR THEN
1469: x_return_status:= FND_API.G_RET_STS_ERROR;
1470: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1471: htp.p('BIS_TARGET_PVT.GetID:G_EXC_ERROR'); htp.para;
1472: END IF;
1465: htp.p('BIS_TARGET_PVT.GetID:NO_DATA_FOUND'); htp.para;
1466: END IF;
1467: -- RAISE FND_API.G_EXC_ERROR;
1468: WHEN FND_API.G_EXC_ERROR THEN
1469: x_return_status:= FND_API.G_RET_STS_ERROR;
1470: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1471: htp.p('BIS_TARGET_PVT.GetID:G_EXC_ERROR'); htp.para;
1472: END IF;
1473: -- RAISE;
1470: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1471: htp.p('BIS_TARGET_PVT.GetID:G_EXC_ERROR'); htp.para;
1472: END IF;
1473: -- RAISE;
1474: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1475: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
1476: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1477: htp.p('BIS_TARGET_PVT.GetID:G_EXC_UNEXPECTED_ERROR'); htp.para;
1478: END IF;
1471: htp.p('BIS_TARGET_PVT.GetID:G_EXC_ERROR'); htp.para;
1472: END IF;
1473: -- RAISE;
1474: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1475: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
1476: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1477: htp.p('BIS_TARGET_PVT.GetID:G_EXC_UNEXPECTED_ERROR'); htp.para;
1478: END IF;
1479: -- RAISE;
1477: htp.p('BIS_TARGET_PVT.GetID:G_EXC_UNEXPECTED_ERROR'); htp.para;
1478: END IF;
1479: -- RAISE;
1480: WHEN OTHERS THEN
1481: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
1482: l_error_Tbl_p := x_error_Tbl;
1483: BIS_UTILITIES_PVT.Add_Error_Message
1484: ( p_error_table => l_error_Tbl_p
1485: , p_error_msg_id => SQLCODE
1488: );
1489: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1490: htp.p('BIS_TARGET_PVT.GetID:OTHERS'); htp.para;
1491: END IF;
1492: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1493: --
1494: END GetID;
1495: --
1496: --
1497: -- Deletes one target for a specific set of dimension values for
1498: -- one target level
1499: PROCEDURE Delete_Target
1500: ( p_api_version IN NUMBER
1501: , p_commit IN VARCHAR2 := FND_API.G_FALSE
1502: , p_Target_Rec IN BIS_TARGET_PUB.Target_Rec_Type
1503: , x_return_status OUT NOCOPY VARCHAR2
1504: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
1505: )
1519: , x_return_status => x_return_status
1520: , x_error_Tbl => x_error_Tbl
1521: );
1522: --
1523: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1524: RAISE FND_API.G_EXC_ERROR;
1525: END IF;
1526: --
1527: DELETE FROM BIS_TARGET_VALUES
1520: , x_error_Tbl => x_error_Tbl
1521: );
1522: --
1523: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1524: RAISE FND_API.G_EXC_ERROR;
1525: END IF;
1526: --
1527: DELETE FROM BIS_TARGET_VALUES
1528: WHERE TARGET_ID = l_Target_Rec.TARGET_ID;
1534: --commented RAISE
1535: EXCEPTION
1536: --added this
1537: WHEN NO_DATA_FOUND THEN
1538: x_return_status:= FND_API.G_RET_STS_ERROR;
1539: --added more params
1540: l_error_tbl := x_error_tbl;
1541: BIS_UTILITIES_PVT.Add_Error_Message
1542: ( p_error_msg_name => 'BIS_INVALID_TARGET_VALUE'
1545: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
1546: , p_error_table => l_error_tbl
1547: , x_error_table => x_error_tbl
1548: );
1549: WHEN FND_API.G_EXC_ERROR THEN
1550: x_return_status:= FND_API.G_RET_STS_ERROR;
1551: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1552: htp.p('BIS_TARGET_PVT.Delete_Target:G_EXC_ERROR'); htp.para;
1553: END IF;
1546: , p_error_table => l_error_tbl
1547: , x_error_table => x_error_tbl
1548: );
1549: WHEN FND_API.G_EXC_ERROR THEN
1550: x_return_status:= FND_API.G_RET_STS_ERROR;
1551: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1552: htp.p('BIS_TARGET_PVT.Delete_Target:G_EXC_ERROR'); htp.para;
1553: END IF;
1554: -- RAISE;
1551: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1552: htp.p('BIS_TARGET_PVT.Delete_Target:G_EXC_ERROR'); htp.para;
1553: END IF;
1554: -- RAISE;
1555: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1556: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
1557: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1558: htp.p('BIS_TARGET_PVT.Delete_Target:G_EXC_UNEXPECTED_ERROR'); htp.para;
1559: END IF;
1552: htp.p('BIS_TARGET_PVT.Delete_Target:G_EXC_ERROR'); htp.para;
1553: END IF;
1554: -- RAISE;
1555: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1556: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
1557: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1558: htp.p('BIS_TARGET_PVT.Delete_Target:G_EXC_UNEXPECTED_ERROR'); htp.para;
1559: END IF;
1560: -- RAISE;
1558: htp.p('BIS_TARGET_PVT.Delete_Target:G_EXC_UNEXPECTED_ERROR'); htp.para;
1559: END IF;
1560: -- RAISE;
1561: WHEN OTHERS THEN
1562: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
1563: l_error_Tbl_p := x_error_Tbl;
1564: BIS_UTILITIES_PVT.Add_Error_Message
1565: ( p_error_table => l_error_Tbl_p
1566: , p_error_msg_id => SQLCODE
1569: );
1570: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
1571: htp.p('BIS_TARGET_PVT.Delete_Target:OTHERS'); htp.para;
1572: END IF;
1573: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1574: --
1575: END Delete_Target;
1576: --
1577: --
1578: -- Validates target record
1579: PROCEDURE Validate_Target
1580: ( p_api_version IN NUMBER
1581: , p_is_dbimeasure IN NUMBER := 0 --added by gbhaloti #3148615
1582: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1583: , p_Target_Rec IN BIS_TARGET_PUB.Target_Rec_Type
1584: , x_return_status OUT NOCOPY VARCHAR2
1585: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
1586: )
1588: --
1589: l_return_status VARCHAR2(10);
1590: l_error_Tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
1591: l_error_Tbl_p BIS_UTILITIES_PUB.Error_Tbl_Type;
1592: l_error VARCHAR2(10) := FND_API.G_FALSE;
1593: --
1594: BEGIN
1595: x_return_status := FND_API.G_RET_STS_SUCCESS;
1596: --
1591: l_error_Tbl_p BIS_UTILITIES_PUB.Error_Tbl_Type;
1592: l_error VARCHAR2(10) := FND_API.G_FALSE;
1593: --
1594: BEGIN
1595: x_return_status := FND_API.G_RET_STS_SUCCESS;
1596: --
1597: -- htp.header(5,'in validate target '||p_target_rec.target_level_id||'
');
1598: BEGIN
1599:
1610:
1611: -- dbms_output.put_line( ' Inside pvt : 42 ' || l_error );
1612:
1613: --EXCEPTION
1614: --WHEN FND_API.G_EXC_ERROR THEN
1615: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1616: l_error := FND_API.G_TRUE;
1617: x_return_status:= FND_API.G_RET_STS_ERROR;
1618: l_error_Tbl_p := x_error_Tbl;
1611: -- dbms_output.put_line( ' Inside pvt : 42 ' || l_error );
1612:
1613: --EXCEPTION
1614: --WHEN FND_API.G_EXC_ERROR THEN
1615: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1616: l_error := FND_API.G_TRUE;
1617: x_return_status:= FND_API.G_RET_STS_ERROR;
1618: l_error_Tbl_p := x_error_Tbl;
1619: BIS_UTILITIES_PVT.concatenateErrorTables
1612:
1613: --EXCEPTION
1614: --WHEN FND_API.G_EXC_ERROR THEN
1615: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1616: l_error := FND_API.G_TRUE;
1617: x_return_status:= FND_API.G_RET_STS_ERROR;
1618: l_error_Tbl_p := x_error_Tbl;
1619: BIS_UTILITIES_PVT.concatenateErrorTables
1620: ( p_error_Tbl1 => l_error_Tbl_p
1613: --EXCEPTION
1614: --WHEN FND_API.G_EXC_ERROR THEN
1615: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1616: l_error := FND_API.G_TRUE;
1617: x_return_status:= FND_API.G_RET_STS_ERROR;
1618: l_error_Tbl_p := x_error_Tbl;
1619: BIS_UTILITIES_PVT.concatenateErrorTables
1620: ( p_error_Tbl1 => l_error_Tbl_p
1621: , p_error_Tbl2 => l_error_Tbl
1634: , x_return_status => l_return_status
1635: , x_error_Tbl => l_error_Tbl
1636: );
1637:
1638: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1639: l_error := FND_API.G_TRUE;
1640: x_return_status:= FND_API.G_RET_STS_ERROR;
1641: l_error_Tbl_p := x_error_Tbl;
1642: BIS_UTILITIES_PVT.concatenateErrorTables
1635: , x_error_Tbl => l_error_Tbl
1636: );
1637:
1638: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1639: l_error := FND_API.G_TRUE;
1640: x_return_status:= FND_API.G_RET_STS_ERROR;
1641: l_error_Tbl_p := x_error_Tbl;
1642: BIS_UTILITIES_PVT.concatenateErrorTables
1643: ( p_error_Tbl1 => l_error_Tbl_p
1636: );
1637:
1638: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1639: l_error := FND_API.G_TRUE;
1640: x_return_status:= FND_API.G_RET_STS_ERROR;
1641: l_error_Tbl_p := x_error_Tbl;
1642: BIS_UTILITIES_PVT.concatenateErrorTables
1643: ( p_error_Tbl1 => l_error_Tbl_p
1644: , p_error_Tbl2 => l_error_Tbl
1657: , x_return_status => l_return_status
1658: , x_error_Tbl => l_error_Tbl
1659: );
1660: --
1661: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1662: l_error := FND_API.G_TRUE;
1663: x_return_status:= FND_API.G_RET_STS_ERROR;
1664: l_error_Tbl_p := x_error_Tbl;
1665: BIS_UTILITIES_PVT.concatenateErrorTables
1658: , x_error_Tbl => l_error_Tbl
1659: );
1660: --
1661: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1662: l_error := FND_API.G_TRUE;
1663: x_return_status:= FND_API.G_RET_STS_ERROR;
1664: l_error_Tbl_p := x_error_Tbl;
1665: BIS_UTILITIES_PVT.concatenateErrorTables
1666: ( p_error_Tbl1 => l_error_Tbl_p
1659: );
1660: --
1661: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1662: l_error := FND_API.G_TRUE;
1663: x_return_status:= FND_API.G_RET_STS_ERROR;
1664: l_error_Tbl_p := x_error_Tbl;
1665: BIS_UTILITIES_PVT.concatenateErrorTables
1666: ( p_error_Tbl1 => l_error_Tbl_p
1667: , p_error_Tbl2 => l_error_Tbl
1683: );
1684: --
1685:
1686: --EXCEPTION
1687: -- WHEN FND_API.G_EXC_ERROR THEN
1688: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1689: l_error := FND_API.G_TRUE;
1690: x_return_status:= FND_API.G_RET_STS_ERROR;
1691: l_error_Tbl_p := x_error_Tbl;
1684: --
1685:
1686: --EXCEPTION
1687: -- WHEN FND_API.G_EXC_ERROR THEN
1688: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1689: l_error := FND_API.G_TRUE;
1690: x_return_status:= FND_API.G_RET_STS_ERROR;
1691: l_error_Tbl_p := x_error_Tbl;
1692: BIS_UTILITIES_PVT.concatenateErrorTables
1685:
1686: --EXCEPTION
1687: -- WHEN FND_API.G_EXC_ERROR THEN
1688: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1689: l_error := FND_API.G_TRUE;
1690: x_return_status:= FND_API.G_RET_STS_ERROR;
1691: l_error_Tbl_p := x_error_Tbl;
1692: BIS_UTILITIES_PVT.concatenateErrorTables
1693: ( p_error_Tbl1 => l_error_Tbl_p
1686: --EXCEPTION
1687: -- WHEN FND_API.G_EXC_ERROR THEN
1688: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1689: l_error := FND_API.G_TRUE;
1690: x_return_status:= FND_API.G_RET_STS_ERROR;
1691: l_error_Tbl_p := x_error_Tbl;
1692: BIS_UTILITIES_PVT.concatenateErrorTables
1693: ( p_error_Tbl1 => l_error_Tbl_p
1694: , p_error_Tbl2 => l_error_Tbl
1709: );
1710: --
1711:
1712: --EXCEPTION
1713: -- WHEN FND_API.G_EXC_ERROR THEN
1714: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1715: l_error := FND_API.G_TRUE;
1716: x_return_status:= FND_API.G_RET_STS_ERROR;
1717: l_error_Tbl_p := x_error_Tbl;
1710: --
1711:
1712: --EXCEPTION
1713: -- WHEN FND_API.G_EXC_ERROR THEN
1714: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1715: l_error := FND_API.G_TRUE;
1716: x_return_status:= FND_API.G_RET_STS_ERROR;
1717: l_error_Tbl_p := x_error_Tbl;
1718: BIS_UTILITIES_PVT.concatenateErrorTables
1711:
1712: --EXCEPTION
1713: -- WHEN FND_API.G_EXC_ERROR THEN
1714: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1715: l_error := FND_API.G_TRUE;
1716: x_return_status:= FND_API.G_RET_STS_ERROR;
1717: l_error_Tbl_p := x_error_Tbl;
1718: BIS_UTILITIES_PVT.concatenateErrorTables
1719: ( p_error_Tbl1 => l_error_Tbl_p
1712: --EXCEPTION
1713: -- WHEN FND_API.G_EXC_ERROR THEN
1714: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1715: l_error := FND_API.G_TRUE;
1716: x_return_status:= FND_API.G_RET_STS_ERROR;
1717: l_error_Tbl_p := x_error_Tbl;
1718: BIS_UTILITIES_PVT.concatenateErrorTables
1719: ( p_error_Tbl1 => l_error_Tbl_p
1720: , p_error_Tbl2 => l_error_Tbl
1735: );
1736: --
1737:
1738: --EXCEPTION
1739: --WHEN FND_API.G_EXC_ERROR THEN
1740: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1741: l_error := FND_API.G_TRUE;
1742: x_return_status:= FND_API.G_RET_STS_ERROR;
1743: l_error_Tbl_p := x_error_Tbl;
1736: --
1737:
1738: --EXCEPTION
1739: --WHEN FND_API.G_EXC_ERROR THEN
1740: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1741: l_error := FND_API.G_TRUE;
1742: x_return_status:= FND_API.G_RET_STS_ERROR;
1743: l_error_Tbl_p := x_error_Tbl;
1744: BIS_UTILITIES_PVT.concatenateErrorTables
1737:
1738: --EXCEPTION
1739: --WHEN FND_API.G_EXC_ERROR THEN
1740: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1741: l_error := FND_API.G_TRUE;
1742: x_return_status:= FND_API.G_RET_STS_ERROR;
1743: l_error_Tbl_p := x_error_Tbl;
1744: BIS_UTILITIES_PVT.concatenateErrorTables
1745: ( p_error_Tbl1 => l_error_Tbl_p
1738: --EXCEPTION
1739: --WHEN FND_API.G_EXC_ERROR THEN
1740: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1741: l_error := FND_API.G_TRUE;
1742: x_return_status:= FND_API.G_RET_STS_ERROR;
1743: l_error_Tbl_p := x_error_Tbl;
1744: BIS_UTILITIES_PVT.concatenateErrorTables
1745: ( p_error_Tbl1 => l_error_Tbl_p
1746: , p_error_Tbl2 => l_error_Tbl
1763: );
1764: --
1765:
1766: -- EXCEPTION
1767: -- WHEN FND_API.G_EXC_ERROR THEN
1768: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1769: l_error := FND_API.G_TRUE;
1770: x_return_status:= FND_API.G_RET_STS_ERROR;
1771: l_error_Tbl_p := x_error_Tbl;
1764: --
1765:
1766: -- EXCEPTION
1767: -- WHEN FND_API.G_EXC_ERROR THEN
1768: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1769: l_error := FND_API.G_TRUE;
1770: x_return_status:= FND_API.G_RET_STS_ERROR;
1771: l_error_Tbl_p := x_error_Tbl;
1772: BIS_UTILITIES_PVT.concatenateErrorTables
1765:
1766: -- EXCEPTION
1767: -- WHEN FND_API.G_EXC_ERROR THEN
1768: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1769: l_error := FND_API.G_TRUE;
1770: x_return_status:= FND_API.G_RET_STS_ERROR;
1771: l_error_Tbl_p := x_error_Tbl;
1772: BIS_UTILITIES_PVT.concatenateErrorTables
1773: ( p_error_Tbl1 => l_error_Tbl_p
1766: -- EXCEPTION
1767: -- WHEN FND_API.G_EXC_ERROR THEN
1768: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1769: l_error := FND_API.G_TRUE;
1770: x_return_status:= FND_API.G_RET_STS_ERROR;
1771: l_error_Tbl_p := x_error_Tbl;
1772: BIS_UTILITIES_PVT.concatenateErrorTables
1773: ( p_error_Tbl1 => l_error_Tbl_p
1774: , p_error_Tbl2 => l_error_Tbl
1792: );
1793: --
1794:
1795: --EXCEPTION
1796: --WHEN FND_API.G_EXC_ERROR THEN
1797: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1798: l_error := FND_API.G_TRUE;
1799: x_return_status:= FND_API.G_RET_STS_ERROR;
1800: l_error_Tbl_p := x_error_Tbl;
1793: --
1794:
1795: --EXCEPTION
1796: --WHEN FND_API.G_EXC_ERROR THEN
1797: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1798: l_error := FND_API.G_TRUE;
1799: x_return_status:= FND_API.G_RET_STS_ERROR;
1800: l_error_Tbl_p := x_error_Tbl;
1801: BIS_UTILITIES_PVT.concatenateErrorTables
1794:
1795: --EXCEPTION
1796: --WHEN FND_API.G_EXC_ERROR THEN
1797: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1798: l_error := FND_API.G_TRUE;
1799: x_return_status:= FND_API.G_RET_STS_ERROR;
1800: l_error_Tbl_p := x_error_Tbl;
1801: BIS_UTILITIES_PVT.concatenateErrorTables
1802: ( p_error_Tbl1 => l_error_Tbl_p
1795: --EXCEPTION
1796: --WHEN FND_API.G_EXC_ERROR THEN
1797: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1798: l_error := FND_API.G_TRUE;
1799: x_return_status:= FND_API.G_RET_STS_ERROR;
1800: l_error_Tbl_p := x_error_Tbl;
1801: BIS_UTILITIES_PVT.concatenateErrorTables
1802: ( p_error_Tbl1 => l_error_Tbl_p
1803: , p_error_Tbl2 => l_error_Tbl
1819: );
1820: --
1821:
1822: -- EXCEPTION
1823: -- WHEN FND_API.G_EXC_ERROR THEN
1824: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1825: l_error := FND_API.G_TRUE;
1826: x_return_status:= FND_API.G_RET_STS_ERROR;
1827: l_error_Tbl_p := x_error_Tbl;
1820: --
1821:
1822: -- EXCEPTION
1823: -- WHEN FND_API.G_EXC_ERROR THEN
1824: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1825: l_error := FND_API.G_TRUE;
1826: x_return_status:= FND_API.G_RET_STS_ERROR;
1827: l_error_Tbl_p := x_error_Tbl;
1828: BIS_UTILITIES_PVT.concatenateErrorTables
1821:
1822: -- EXCEPTION
1823: -- WHEN FND_API.G_EXC_ERROR THEN
1824: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1825: l_error := FND_API.G_TRUE;
1826: x_return_status:= FND_API.G_RET_STS_ERROR;
1827: l_error_Tbl_p := x_error_Tbl;
1828: BIS_UTILITIES_PVT.concatenateErrorTables
1829: ( p_error_Tbl1 => l_error_Tbl_p
1822: -- EXCEPTION
1823: -- WHEN FND_API.G_EXC_ERROR THEN
1824: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1825: l_error := FND_API.G_TRUE;
1826: x_return_status:= FND_API.G_RET_STS_ERROR;
1827: l_error_Tbl_p := x_error_Tbl;
1828: BIS_UTILITIES_PVT.concatenateErrorTables
1829: ( p_error_Tbl1 => l_error_Tbl_p
1830: , p_error_Tbl2 => l_error_Tbl
1841: , x_return_status => l_return_status
1842: , x_error_Tbl => l_error_Tbl
1843: );
1844:
1845: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1846: l_error := FND_API.G_TRUE;
1847: x_return_status:= FND_API.G_RET_STS_ERROR;
1848: l_error_Tbl_p := x_error_Tbl;
1849: BIS_UTILITIES_PVT.concatenateErrorTables
1842: , x_error_Tbl => l_error_Tbl
1843: );
1844:
1845: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1846: l_error := FND_API.G_TRUE;
1847: x_return_status:= FND_API.G_RET_STS_ERROR;
1848: l_error_Tbl_p := x_error_Tbl;
1849: BIS_UTILITIES_PVT.concatenateErrorTables
1850: ( p_error_Tbl1 => l_error_Tbl_p
1843: );
1844:
1845: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1846: l_error := FND_API.G_TRUE;
1847: x_return_status:= FND_API.G_RET_STS_ERROR;
1848: l_error_Tbl_p := x_error_Tbl;
1849: BIS_UTILITIES_PVT.concatenateErrorTables
1850: ( p_error_Tbl1 => l_error_Tbl_p
1851: , p_error_Tbl2 => l_error_Tbl
1863: , x_error_Tbl => l_error_Tbl
1864: );
1865: --
1866:
1867: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1868: l_error := FND_API.G_TRUE;
1869: x_return_status:= FND_API.G_RET_STS_ERROR;
1870: l_error_Tbl_p := x_error_Tbl;
1871: BIS_UTILITIES_PVT.concatenateErrorTables
1864: );
1865: --
1866:
1867: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1868: l_error := FND_API.G_TRUE;
1869: x_return_status:= FND_API.G_RET_STS_ERROR;
1870: l_error_Tbl_p := x_error_Tbl;
1871: BIS_UTILITIES_PVT.concatenateErrorTables
1872: ( p_error_Tbl1 => l_error_Tbl_p
1865: --
1866:
1867: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1868: l_error := FND_API.G_TRUE;
1869: x_return_status:= FND_API.G_RET_STS_ERROR;
1870: l_error_Tbl_p := x_error_Tbl;
1871: BIS_UTILITIES_PVT.concatenateErrorTables
1872: ( p_error_Tbl1 => l_error_Tbl_p
1873: , p_error_Tbl2 => l_error_Tbl
1884: , x_error_Tbl => l_error_Tbl
1885: );
1886: --
1887:
1888: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1889: l_error := FND_API.G_TRUE;
1890: x_return_status:= FND_API.G_RET_STS_ERROR;
1891: l_error_Tbl_p := x_error_Tbl;
1892: BIS_UTILITIES_PVT.concatenateErrorTables
1885: );
1886: --
1887:
1888: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1889: l_error := FND_API.G_TRUE;
1890: x_return_status:= FND_API.G_RET_STS_ERROR;
1891: l_error_Tbl_p := x_error_Tbl;
1892: BIS_UTILITIES_PVT.concatenateErrorTables
1893: ( p_error_Tbl1 => l_error_Tbl_p
1886: --
1887:
1888: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1889: l_error := FND_API.G_TRUE;
1890: x_return_status:= FND_API.G_RET_STS_ERROR;
1891: l_error_Tbl_p := x_error_Tbl;
1892: BIS_UTILITIES_PVT.concatenateErrorTables
1893: ( p_error_Tbl1 => l_error_Tbl_p
1894: , p_error_Tbl2 => l_error_Tbl
1904: , x_return_status => l_return_status
1905: , x_error_Tbl => l_error_Tbl
1906: );
1907: --
1908: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1909: l_error := FND_API.G_TRUE;
1910: x_return_status:= FND_API.G_RET_STS_ERROR;
1911: l_error_Tbl_p := x_error_Tbl;
1912: BIS_UTILITIES_PVT.concatenateErrorTables
1905: , x_error_Tbl => l_error_Tbl
1906: );
1907: --
1908: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1909: l_error := FND_API.G_TRUE;
1910: x_return_status:= FND_API.G_RET_STS_ERROR;
1911: l_error_Tbl_p := x_error_Tbl;
1912: BIS_UTILITIES_PVT.concatenateErrorTables
1913: ( p_error_Tbl1 => l_error_Tbl_p
1906: );
1907: --
1908: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1909: l_error := FND_API.G_TRUE;
1910: x_return_status:= FND_API.G_RET_STS_ERROR;
1911: l_error_Tbl_p := x_error_Tbl;
1912: BIS_UTILITIES_PVT.concatenateErrorTables
1913: ( p_error_Tbl1 => l_error_Tbl_p
1914: , p_error_Tbl2 => l_error_Tbl
1925: , x_error_Tbl => l_error_Tbl
1926: );
1927: --
1928:
1929: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1930: l_error := FND_API.G_TRUE;
1931: x_return_status:= FND_API.G_RET_STS_ERROR;
1932: l_error_Tbl_p := x_error_Tbl;
1933: BIS_UTILITIES_PVT.concatenateErrorTables
1926: );
1927: --
1928:
1929: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1930: l_error := FND_API.G_TRUE;
1931: x_return_status:= FND_API.G_RET_STS_ERROR;
1932: l_error_Tbl_p := x_error_Tbl;
1933: BIS_UTILITIES_PVT.concatenateErrorTables
1934: ( p_error_Tbl1 => l_error_Tbl_p
1927: --
1928:
1929: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1930: l_error := FND_API.G_TRUE;
1931: x_return_status:= FND_API.G_RET_STS_ERROR;
1932: l_error_Tbl_p := x_error_Tbl;
1933: BIS_UTILITIES_PVT.concatenateErrorTables
1934: ( p_error_Tbl1 => l_error_Tbl_p
1935: , p_error_Tbl2 => l_error_Tbl
1946: , x_return_status => l_return_status
1947: , x_error_Tbl => l_error_Tbl
1948: );
1949: --
1950: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1951: l_error := FND_API.G_TRUE;
1952: x_return_status:= FND_API.G_RET_STS_ERROR;
1953: l_error_Tbl_p := x_error_Tbl;
1954: BIS_UTILITIES_PVT.concatenateErrorTables
1947: , x_error_Tbl => l_error_Tbl
1948: );
1949: --
1950: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1951: l_error := FND_API.G_TRUE;
1952: x_return_status:= FND_API.G_RET_STS_ERROR;
1953: l_error_Tbl_p := x_error_Tbl;
1954: BIS_UTILITIES_PVT.concatenateErrorTables
1955: ( p_error_Tbl1 => l_error_Tbl_p
1948: );
1949: --
1950: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1951: l_error := FND_API.G_TRUE;
1952: x_return_status:= FND_API.G_RET_STS_ERROR;
1953: l_error_Tbl_p := x_error_Tbl;
1954: BIS_UTILITIES_PVT.concatenateErrorTables
1955: ( p_error_Tbl1 => l_error_Tbl_p
1956: , p_error_Tbl2 => l_error_Tbl
1966: , x_return_status => l_return_status
1967: , x_error_Tbl => l_error_Tbl
1968: );
1969: --
1970: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1971: l_error := FND_API.G_TRUE;
1972: x_return_status:= FND_API.G_RET_STS_ERROR;
1973: l_error_Tbl_p := x_error_Tbl;
1974: BIS_UTILITIES_PVT.concatenateErrorTables
1967: , x_error_Tbl => l_error_Tbl
1968: );
1969: --
1970: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1971: l_error := FND_API.G_TRUE;
1972: x_return_status:= FND_API.G_RET_STS_ERROR;
1973: l_error_Tbl_p := x_error_Tbl;
1974: BIS_UTILITIES_PVT.concatenateErrorTables
1975: ( p_error_Tbl1 => l_error_Tbl_p
1968: );
1969: --
1970: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1971: l_error := FND_API.G_TRUE;
1972: x_return_status:= FND_API.G_RET_STS_ERROR;
1973: l_error_Tbl_p := x_error_Tbl;
1974: BIS_UTILITIES_PVT.concatenateErrorTables
1975: ( p_error_Tbl1 => l_error_Tbl_p
1976: , p_error_Tbl2 => l_error_Tbl
1986: , x_return_status => l_return_status
1987: , x_error_Tbl => l_error_Tbl
1988: );
1989: --
1990: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1991: l_error := FND_API.G_TRUE;
1992: x_return_status:= FND_API.G_RET_STS_ERROR;
1993: l_error_Tbl_p := x_error_Tbl;
1994: BIS_UTILITIES_PVT.concatenateErrorTables
1987: , x_error_Tbl => l_error_Tbl
1988: );
1989: --
1990: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1991: l_error := FND_API.G_TRUE;
1992: x_return_status:= FND_API.G_RET_STS_ERROR;
1993: l_error_Tbl_p := x_error_Tbl;
1994: BIS_UTILITIES_PVT.concatenateErrorTables
1995: ( p_error_Tbl1 => l_error_Tbl_p
1988: );
1989: --
1990: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1991: l_error := FND_API.G_TRUE;
1992: x_return_status:= FND_API.G_RET_STS_ERROR;
1993: l_error_Tbl_p := x_error_Tbl;
1994: BIS_UTILITIES_PVT.concatenateErrorTables
1995: ( p_error_Tbl1 => l_error_Tbl_p
1996: , p_error_Tbl2 => l_error_Tbl
2006: , x_return_status => l_return_status
2007: , x_error_Tbl => l_error_Tbl
2008: );
2009: --
2010: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
2011: l_error := FND_API.G_TRUE;
2012: x_return_status:= FND_API.G_RET_STS_ERROR;
2013: l_error_Tbl_p := x_error_Tbl;
2014: BIS_UTILITIES_PVT.concatenateErrorTables
2007: , x_error_Tbl => l_error_Tbl
2008: );
2009: --
2010: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
2011: l_error := FND_API.G_TRUE;
2012: x_return_status:= FND_API.G_RET_STS_ERROR;
2013: l_error_Tbl_p := x_error_Tbl;
2014: BIS_UTILITIES_PVT.concatenateErrorTables
2015: ( p_error_Tbl1 => l_error_Tbl_p
2008: );
2009: --
2010: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
2011: l_error := FND_API.G_TRUE;
2012: x_return_status:= FND_API.G_RET_STS_ERROR;
2013: l_error_Tbl_p := x_error_Tbl;
2014: BIS_UTILITIES_PVT.concatenateErrorTables
2015: ( p_error_Tbl1 => l_error_Tbl_p
2016: , p_error_Tbl2 => l_error_Tbl
2027: , x_error_Tbl => l_error_Tbl
2028: );
2029: --
2030:
2031: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
2032: l_error := FND_API.G_TRUE;
2033: x_return_status:= FND_API.G_RET_STS_ERROR;
2034: l_error_Tbl_p := x_error_Tbl;
2035: BIS_UTILITIES_PVT.concatenateErrorTables
2028: );
2029: --
2030:
2031: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
2032: l_error := FND_API.G_TRUE;
2033: x_return_status:= FND_API.G_RET_STS_ERROR;
2034: l_error_Tbl_p := x_error_Tbl;
2035: BIS_UTILITIES_PVT.concatenateErrorTables
2036: ( p_error_Tbl1 => l_error_Tbl_p
2029: --
2030:
2031: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
2032: l_error := FND_API.G_TRUE;
2033: x_return_status:= FND_API.G_RET_STS_ERROR;
2034: l_error_Tbl_p := x_error_Tbl;
2035: BIS_UTILITIES_PVT.concatenateErrorTables
2036: ( p_error_Tbl1 => l_error_Tbl_p
2037: , p_error_Tbl2 => l_error_Tbl
2048: , x_error_Tbl => l_error_Tbl
2049: );
2050: --
2051:
2052: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
2053: l_error := FND_API.G_TRUE;
2054: x_return_status:= FND_API.G_RET_STS_ERROR;
2055: l_error_Tbl_p := x_error_Tbl;
2056: BIS_UTILITIES_PVT.concatenateErrorTables
2049: );
2050: --
2051:
2052: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
2053: l_error := FND_API.G_TRUE;
2054: x_return_status:= FND_API.G_RET_STS_ERROR;
2055: l_error_Tbl_p := x_error_Tbl;
2056: BIS_UTILITIES_PVT.concatenateErrorTables
2057: ( p_error_Tbl1 => l_error_Tbl_p
2050: --
2051:
2052: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
2053: l_error := FND_API.G_TRUE;
2054: x_return_status:= FND_API.G_RET_STS_ERROR;
2055: l_error_Tbl_p := x_error_Tbl;
2056: BIS_UTILITIES_PVT.concatenateErrorTables
2057: ( p_error_Tbl1 => l_error_Tbl_p
2058: , p_error_Tbl2 => l_error_Tbl
2070: );
2071: --
2072:
2073: -- EXCEPTION
2074: -- WHEN FND_API.G_EXC_ERROR THEN
2075: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
2076: l_error := FND_API.G_TRUE;
2077: x_return_status:= FND_API.G_RET_STS_ERROR;
2078: l_error_Tbl_p := x_error_Tbl;
2071: --
2072:
2073: -- EXCEPTION
2074: -- WHEN FND_API.G_EXC_ERROR THEN
2075: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
2076: l_error := FND_API.G_TRUE;
2077: x_return_status:= FND_API.G_RET_STS_ERROR;
2078: l_error_Tbl_p := x_error_Tbl;
2079: BIS_UTILITIES_PVT.concatenateErrorTables
2072:
2073: -- EXCEPTION
2074: -- WHEN FND_API.G_EXC_ERROR THEN
2075: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
2076: l_error := FND_API.G_TRUE;
2077: x_return_status:= FND_API.G_RET_STS_ERROR;
2078: l_error_Tbl_p := x_error_Tbl;
2079: BIS_UTILITIES_PVT.concatenateErrorTables
2080: ( p_error_Tbl1 => l_error_Tbl_p
2073: -- EXCEPTION
2074: -- WHEN FND_API.G_EXC_ERROR THEN
2075: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
2076: l_error := FND_API.G_TRUE;
2077: x_return_status:= FND_API.G_RET_STS_ERROR;
2078: l_error_Tbl_p := x_error_Tbl;
2079: BIS_UTILITIES_PVT.concatenateErrorTables
2080: ( p_error_Tbl1 => l_error_Tbl_p
2081: , p_error_Tbl2 => l_error_Tbl
2091: , x_return_status => l_return_status
2092: , x_error_Tbl => l_error_Tbl
2093: );
2094: --
2095: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
2096: l_error := FND_API.G_TRUE;
2097: x_return_status:= FND_API.G_RET_STS_ERROR;
2098: l_error_Tbl_p := x_error_Tbl;
2099: BIS_UTILITIES_PVT.concatenateErrorTables
2092: , x_error_Tbl => l_error_Tbl
2093: );
2094: --
2095: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
2096: l_error := FND_API.G_TRUE;
2097: x_return_status:= FND_API.G_RET_STS_ERROR;
2098: l_error_Tbl_p := x_error_Tbl;
2099: BIS_UTILITIES_PVT.concatenateErrorTables
2100: ( p_error_Tbl1 => l_error_Tbl_p
2093: );
2094: --
2095: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) then
2096: l_error := FND_API.G_TRUE;
2097: x_return_status:= FND_API.G_RET_STS_ERROR;
2098: l_error_Tbl_p := x_error_Tbl;
2099: BIS_UTILITIES_PVT.concatenateErrorTables
2100: ( p_error_Tbl1 => l_error_Tbl_p
2101: , p_error_Tbl2 => l_error_Tbl
2106:
2107: -- dbms_output.put_line( ' Inside pvt : 49 ' || l_error );
2108:
2109: --added this check
2110: if (l_error = FND_API.G_TRUE) then
2111: RAISE FND_API.G_EXC_ERROR;
2112: end if;
2113: --
2114:
2107: -- dbms_output.put_line( ' Inside pvt : 49 ' || l_error );
2108:
2109: --added this check
2110: if (l_error = FND_API.G_TRUE) then
2111: RAISE FND_API.G_EXC_ERROR;
2112: end if;
2113: --
2114:
2115: -- dbms_output.put_line( ' Inside pvt : 49.9 ' || l_error );
2115: -- dbms_output.put_line( ' Inside pvt : 49.9 ' || l_error );
2116:
2117: --commented RAISE
2118: EXCEPTION
2119: WHEN FND_API.G_EXC_ERROR THEN
2120: x_return_status:= FND_API.G_RET_STS_ERROR;
2121: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2122: htp.p('BIS_TARGET_PVT.Validate_Target:G_EXC_ERROR'); htp.para;
2123: END IF;
2116:
2117: --commented RAISE
2118: EXCEPTION
2119: WHEN FND_API.G_EXC_ERROR THEN
2120: x_return_status:= FND_API.G_RET_STS_ERROR;
2121: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2122: htp.p('BIS_TARGET_PVT.Validate_Target:G_EXC_ERROR'); htp.para;
2123: END IF;
2124: --RAISE;
2121: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2122: htp.p('BIS_TARGET_PVT.Validate_Target:G_EXC_ERROR'); htp.para;
2123: END IF;
2124: --RAISE;
2125: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2126: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2127: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2128: htp.p('BIS_TARGET_PVT.Validate_Target:G_EXC_UNEXPECTED_ERROR');
2129: htp.para;
2122: htp.p('BIS_TARGET_PVT.Validate_Target:G_EXC_ERROR'); htp.para;
2123: END IF;
2124: --RAISE;
2125: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2126: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2127: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2128: htp.p('BIS_TARGET_PVT.Validate_Target:G_EXC_UNEXPECTED_ERROR');
2129: htp.para;
2130: END IF;
2129: htp.para;
2130: END IF;
2131: -- RAISE;
2132: WHEN OTHERS THEN
2133: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
2134: l_error_Tbl_p := x_error_Tbl;
2135: BIS_UTILITIES_PVT.Add_Error_Message
2136: ( p_error_table => l_error_Tbl_p
2137: , p_error_msg_id => SQLCODE
2140: );
2141: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2142: htp.p('BIS_TARGET_PVT.Validate_Target:OTHERS'); htp.para;
2143: END IF;
2144: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2145: END Validate_Target;
2146: --
2147: --
2148: -- Value - ID conversion
2155: )
2156: IS
2157: l_error_Tbl_p BIS_UTILITIES_PUB.Error_Tbl_Type;
2158: BEGIN
2159: x_return_status:= FND_API.G_RET_STS_SUCCESS;
2160: x_Target_Rec := p_Target_Rec;
2161: --
2162: --commented RAISE
2163: EXCEPTION
2160: x_Target_Rec := p_Target_Rec;
2161: --
2162: --commented RAISE
2163: EXCEPTION
2164: WHEN FND_API.G_EXC_ERROR THEN
2165: x_return_status:= FND_API.G_RET_STS_ERROR;
2166: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2167: htp.p('BIS_TARGET_PVT.Value_ID_Conversion:G_EXC_ERROR'); htp.para;
2168: END IF;
2161: --
2162: --commented RAISE
2163: EXCEPTION
2164: WHEN FND_API.G_EXC_ERROR THEN
2165: x_return_status:= FND_API.G_RET_STS_ERROR;
2166: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2167: htp.p('BIS_TARGET_PVT.Value_ID_Conversion:G_EXC_ERROR'); htp.para;
2168: END IF;
2169: -- RAISE;
2166: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2167: htp.p('BIS_TARGET_PVT.Value_ID_Conversion:G_EXC_ERROR'); htp.para;
2168: END IF;
2169: -- RAISE;
2170: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2171: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
2172: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2173: htp.p('BIS_TARGET_PVT.Value_ID_Conversion:G_EXC_UNEXPECTED_ERROR');
2174: htp.para;
2167: htp.p('BIS_TARGET_PVT.Value_ID_Conversion:G_EXC_ERROR'); htp.para;
2168: END IF;
2169: -- RAISE;
2170: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2171: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
2172: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2173: htp.p('BIS_TARGET_PVT.Value_ID_Conversion:G_EXC_UNEXPECTED_ERROR');
2174: htp.para;
2175: END IF;
2174: htp.para;
2175: END IF;
2176: -- RAISE;
2177: WHEN OTHERS THEN
2178: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
2179: l_error_Tbl_p := x_error_Tbl;
2180: BIS_UTILITIES_PVT.Add_Error_Message
2181: ( p_error_table => l_error_Tbl_p
2182: , p_error_msg_id => SQLCODE
2185: );
2186: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2187: htp.p('BIS_TARGET_PVT.Value_ID_Conversion:OTHERS'); htp.para;
2188: END IF;
2189: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2190: END Value_ID_Conversion;
2191: --
2192: --
2193: PROCEDURE Update_db_Target
2212: , x_error_Tbl => x_error_Tbl
2213: );
2214: -- apply changes
2215: IF( BIS_UTILITIES_PUB.Value_Not_Missing(p_Target_Rec.Target_Level_ID)
2216: = FND_API.G_TRUE
2217: ) THEN
2218: l_Target_Rec.Target_Level_ID := p_Target_Rec.Target_Level_ID;
2219: END IF;
2220: --
2218: l_Target_Rec.Target_Level_ID := p_Target_Rec.Target_Level_ID;
2219: END IF;
2220: --
2221: IF( BIS_UTILITIES_PUB.Value_Not_Missing(p_Target_Rec.Plan_ID)
2222: = FND_API.G_TRUE
2223: ) THEN
2224: l_Target_Rec.Plan_ID := p_Target_Rec.Plan_ID;
2225: END IF;
2226: --
2224: l_Target_Rec.Plan_ID := p_Target_Rec.Plan_ID;
2225: END IF;
2226: --
2227: IF( BIS_UTILITIES_PUB.Value_Not_Missing(p_Target_Rec.Org_Level_Value_ID)
2228: = FND_API.G_TRUE
2229: ) THEN
2230: l_Target_Rec.Org_Level_Value_ID := p_Target_Rec.Org_Level_Value_ID;
2231: END IF;
2232: --
2230: l_Target_Rec.Org_Level_Value_ID := p_Target_Rec.Org_Level_Value_ID;
2231: END IF;
2232: --
2233: IF( BIS_UTILITIES_PUB.Value_Not_Missing(p_Target_Rec.Time_Level_Value_ID)
2234: = FND_API.G_TRUE
2235: ) THEN
2236: l_Target_Rec.Time_Level_Value_ID := p_Target_Rec.Time_Level_Value_ID;
2237: END IF;
2238: --
2236: l_Target_Rec.Time_Level_Value_ID := p_Target_Rec.Time_Level_Value_ID;
2237: END IF;
2238: --
2239: IF( BIS_UTILITIES_PUB.Value_Not_Missing(p_Target_Rec.Dim1_Level_Value_ID)
2240: = FND_API.G_TRUE
2241: ) THEN
2242: l_Target_Rec.Dim1_Level_Value_ID := p_Target_Rec.Dim1_Level_Value_ID;
2243: END IF;
2244: --
2242: l_Target_Rec.Dim1_Level_Value_ID := p_Target_Rec.Dim1_Level_Value_ID;
2243: END IF;
2244: --
2245: IF( BIS_UTILITIES_PUB.Value_Not_Missing(p_Target_Rec.Dim2_Level_Value_ID)
2246: = FND_API.G_TRUE
2247: ) THEN
2248: l_Target_Rec.Dim2_Level_Value_ID := p_Target_Rec.Dim2_Level_Value_ID;
2249: END IF;
2250: --
2248: l_Target_Rec.Dim2_Level_Value_ID := p_Target_Rec.Dim2_Level_Value_ID;
2249: END IF;
2250: --
2251: IF( BIS_UTILITIES_PUB.Value_Not_Missing(p_Target_Rec.Dim3_Level_Value_ID)
2252: = FND_API.G_TRUE
2253: ) THEN
2254: l_Target_Rec.Dim3_Level_Value_ID := p_Target_Rec.Dim3_Level_Value_ID;
2255: END IF;
2256: --
2254: l_Target_Rec.Dim3_Level_Value_ID := p_Target_Rec.Dim3_Level_Value_ID;
2255: END IF;
2256: --
2257: IF( BIS_UTILITIES_PUB.Value_Not_Missing(p_Target_Rec.Dim4_Level_Value_ID)
2258: = FND_API.G_TRUE
2259: ) THEN
2260: l_Target_Rec.Dim4_Level_Value_ID := p_Target_Rec.Dim4_Level_Value_ID;
2261: END IF;
2262: --
2260: l_Target_Rec.Dim4_Level_Value_ID := p_Target_Rec.Dim4_Level_Value_ID;
2261: END IF;
2262: --
2263: IF( BIS_UTILITIES_PUB.Value_Not_Missing(p_Target_Rec.Dim5_Level_Value_ID)
2264: = FND_API.G_TRUE
2265: ) THEN
2266: l_Target_Rec.Dim5_Level_Value_ID := p_Target_Rec.Dim5_Level_Value_ID;
2267: END IF;
2268: --
2266: l_Target_Rec.Dim5_Level_Value_ID := p_Target_Rec.Dim5_Level_Value_ID;
2267: END IF;
2268: --
2269: IF( BIS_UTILITIES_PUB.Value_Not_Missing(p_Target_Rec.Dim6_Level_Value_ID)
2270: = FND_API.G_TRUE
2271: ) THEN
2272: l_Target_Rec.Dim6_Level_Value_ID := p_Target_Rec.Dim6_Level_Value_ID;
2273: END IF;
2274: --
2272: l_Target_Rec.Dim6_Level_Value_ID := p_Target_Rec.Dim6_Level_Value_ID;
2273: END IF;
2274: --
2275: IF( BIS_UTILITIES_PUB.Value_Not_Missing(p_Target_Rec.Dim7_Level_Value_ID)
2276: = FND_API.G_TRUE
2277: ) THEN
2278: l_Target_Rec.Dim7_Level_Value_ID := p_Target_Rec.Dim7_Level_Value_ID;
2279: END IF;
2280: --
2278: l_Target_Rec.Dim7_Level_Value_ID := p_Target_Rec.Dim7_Level_Value_ID;
2279: END IF;
2280: --
2281: IF( BIS_UTILITIES_PUB.Value_Not_Missing(p_Target_Rec.Target)
2282: = FND_API.G_TRUE
2283: ) THEN
2284: l_Target_Rec.Target := p_Target_Rec.Target;
2285: END IF;
2286: --
2300: --added this
2301: x_Target_Rec := l_Target_Rec;
2302: --commented RAISE
2303: EXCEPTION
2304: WHEN FND_API.G_EXC_ERROR THEN
2305: x_return_status:= FND_API.G_RET_STS_ERROR;
2306: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2307: htp.p('BIS_TARGET_PVT.Update_db_Target:G_EXC_ERROR'); htp.para;
2308: END IF;
2301: x_Target_Rec := l_Target_Rec;
2302: --commented RAISE
2303: EXCEPTION
2304: WHEN FND_API.G_EXC_ERROR THEN
2305: x_return_status:= FND_API.G_RET_STS_ERROR;
2306: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2307: htp.p('BIS_TARGET_PVT.Update_db_Target:G_EXC_ERROR'); htp.para;
2308: END IF;
2309: --RAISE;
2306: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2307: htp.p('BIS_TARGET_PVT.Update_db_Target:G_EXC_ERROR'); htp.para;
2308: END IF;
2309: --RAISE;
2310: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2311: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
2312: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2313: htp.p('BIS_TARGET_PVT.Update_db_Target:G_EXC_UNEXPECTED_ERROR');
2314: htp.para;
2307: htp.p('BIS_TARGET_PVT.Update_db_Target:G_EXC_ERROR'); htp.para;
2308: END IF;
2309: --RAISE;
2310: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2311: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
2312: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2313: htp.p('BIS_TARGET_PVT.Update_db_Target:G_EXC_UNEXPECTED_ERROR');
2314: htp.para;
2315: END IF;
2314: htp.para;
2315: END IF;
2316: --RAISE;
2317: WHEN OTHERS THEN
2318: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
2319: l_error_Tbl_p := x_error_Tbl;
2320: BIS_UTILITIES_PVT.Add_Error_Message
2321: ( p_error_table => l_error_Tbl_p
2322: , p_error_msg_id => SQLCODE
2325: );
2326: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2327: htp.p('BIS_TARGET_PVT.Update_db_Target:OTHERS'); htp.para;
2328: END IF;
2329: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2330: --
2331: END Update_db_Target;
2332: --
2333: --
2341: IS
2342: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
2343:
2344: BEGIN
2345: x_return_status := FND_API.G_RET_STS_SUCCESS;
2346: --
2347: IF( BIS_UTILITIES_PUB.Value_Not_Missing(p_Target_Rec.Target_ID)
2348: = FND_API.G_TRUE
2349: AND p_Target_Rec.Target_ID IS NOT NULL
2344: BEGIN
2345: x_return_status := FND_API.G_RET_STS_SUCCESS;
2346: --
2347: IF( BIS_UTILITIES_PUB.Value_Not_Missing(p_Target_Rec.Target_ID)
2348: = FND_API.G_TRUE
2349: AND p_Target_Rec.Target_ID IS NOT NULL
2350: ) THEN
2351: SELECT NVL(LAST_UPDATE_DATE, CREATION_DATE)
2352: INTO x_last_update_date
2352: INTO x_last_update_date
2353: FROM BIS_TARGET_VALUES bis_target_values
2354: WHERE bis_target_values.TARGET_ID = p_Target_Rec.Target_ID;
2355: ELSE
2356: RAISE FND_API.G_EXC_ERROR;
2357: END IF;
2358: --
2359:
2360: --commented RAISE
2369: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
2370: , p_error_table => l_error_tbl
2371: , x_error_table => x_error_tbl
2372: );
2373: x_return_status := FND_API.G_RET_STS_ERROR;
2374: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2375: htp.p('BIS_TARGET_PVT.Retrieve_Last_Update_Date:NO_DATA_FOUND');
2376: htp.para;
2377: END IF;
2374: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2375: htp.p('BIS_TARGET_PVT.Retrieve_Last_Update_Date:NO_DATA_FOUND');
2376: htp.para;
2377: END IF;
2378: --RAISE FND_API.G_EXC_ERROR;
2379: WHEN FND_API.G_EXC_ERROR THEN
2380: x_return_status:= FND_API.G_RET_STS_ERROR;
2381: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2382: htp.p('BIS_TARGET_PVT.Retrieve_Last_Update_Date:G_EXC_ERROR');
2375: htp.p('BIS_TARGET_PVT.Retrieve_Last_Update_Date:NO_DATA_FOUND');
2376: htp.para;
2377: END IF;
2378: --RAISE FND_API.G_EXC_ERROR;
2379: WHEN FND_API.G_EXC_ERROR THEN
2380: x_return_status:= FND_API.G_RET_STS_ERROR;
2381: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2382: htp.p('BIS_TARGET_PVT.Retrieve_Last_Update_Date:G_EXC_ERROR');
2383: htp.para;
2376: htp.para;
2377: END IF;
2378: --RAISE FND_API.G_EXC_ERROR;
2379: WHEN FND_API.G_EXC_ERROR THEN
2380: x_return_status:= FND_API.G_RET_STS_ERROR;
2381: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2382: htp.p('BIS_TARGET_PVT.Retrieve_Last_Update_Date:G_EXC_ERROR');
2383: htp.para;
2384: END IF;
2382: htp.p('BIS_TARGET_PVT.Retrieve_Last_Update_Date:G_EXC_ERROR');
2383: htp.para;
2384: END IF;
2385: -- RAISE;
2386: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2387: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
2388: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2389: htp.p
2390: ('BIS_TARGET_PVT.Retrieve_Last_Update_Date:G_EXC_UNEXPECTED_ERROR');
2383: htp.para;
2384: END IF;
2385: -- RAISE;
2386: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2387: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
2388: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2389: htp.p
2390: ('BIS_TARGET_PVT.Retrieve_Last_Update_Date:G_EXC_UNEXPECTED_ERROR');
2391: htp.para;
2391: htp.para;
2392: END IF;
2393: -- RAISE;
2394: WHEN OTHERS THEN
2395: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
2396: l_error_Tbl := x_error_Tbl;
2397: BIS_UTILITIES_PVT.Add_Error_Message
2398: ( p_error_table => l_error_Tbl
2399: , p_error_msg_id => SQLCODE
2402: );
2403: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2404: htp.p('BIS_TARGET_PVT.Retrieve_Last_Update_Date:OTHERS'); htp.para;
2405: END IF;
2406: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2407: --
2408: END Retrieve_Last_Update_Date;
2409: --
2410: --
2423: l_Target_Rec BIS_TARGET_PUB.Target_Rec_Type;
2424: l_error_Tbl_p BIS_UTILITIES_PUB.Error_Tbl_Type;
2425: --
2426: BEGIN
2427: x_return_status := FND_API.G_RET_STS_SUCCESS;
2428: --
2429: l_Target_Rec.Target_ID := p_Target_Rec.Target_ID;
2430: BIS_TARGET_PVT.Retrieve_Last_Update_Date
2431: ( p_api_version => 1.0
2436: );
2437: IF(p_timestamp IS NOT NULL) THEN
2438: l_form_date := TO_DATE(p_timestamp, BIS_UTILITIES_PVT.G_DATE_FORMAT);
2439: IF(l_form_date = l_last_update_date) THEN
2440: x_result := FND_API.G_TRUE;
2441: ELSE
2442: x_result := FND_API.G_FALSE;
2443: END IF;
2444: ELSE
2438: l_form_date := TO_DATE(p_timestamp, BIS_UTILITIES_PVT.G_DATE_FORMAT);
2439: IF(l_form_date = l_last_update_date) THEN
2440: x_result := FND_API.G_TRUE;
2441: ELSE
2442: x_result := FND_API.G_FALSE;
2443: END IF;
2444: ELSE
2445: x_result := FND_API.G_FALSE;
2446: END IF;
2441: ELSE
2442: x_result := FND_API.G_FALSE;
2443: END IF;
2444: ELSE
2445: x_result := FND_API.G_FALSE;
2446: END IF;
2447: --
2448:
2449: --commented RAISE
2447: --
2448:
2449: --commented RAISE
2450: EXCEPTION
2451: WHEN FND_API.G_EXC_ERROR THEN
2452: x_return_status:= FND_API.G_RET_STS_ERROR;
2453: x_result := FND_API.G_FALSE;
2454: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2455: htp.p('BIS_TARGET_PVT.Lock_Record:G_EXC_ERROR'); htp.para;
2448:
2449: --commented RAISE
2450: EXCEPTION
2451: WHEN FND_API.G_EXC_ERROR THEN
2452: x_return_status:= FND_API.G_RET_STS_ERROR;
2453: x_result := FND_API.G_FALSE;
2454: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2455: htp.p('BIS_TARGET_PVT.Lock_Record:G_EXC_ERROR'); htp.para;
2456: END IF;
2449: --commented RAISE
2450: EXCEPTION
2451: WHEN FND_API.G_EXC_ERROR THEN
2452: x_return_status:= FND_API.G_RET_STS_ERROR;
2453: x_result := FND_API.G_FALSE;
2454: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2455: htp.p('BIS_TARGET_PVT.Lock_Record:G_EXC_ERROR'); htp.para;
2456: END IF;
2457: -- RAISE;
2454: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2455: htp.p('BIS_TARGET_PVT.Lock_Record:G_EXC_ERROR'); htp.para;
2456: END IF;
2457: -- RAISE;
2458: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2459: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
2460: x_result := FND_API.G_FALSE;
2461: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2462: htp.p('BIS_TARGET_PVT.Lock_Record:G_EXC_UNEXPECTED_ERROR');
2455: htp.p('BIS_TARGET_PVT.Lock_Record:G_EXC_ERROR'); htp.para;
2456: END IF;
2457: -- RAISE;
2458: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2459: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
2460: x_result := FND_API.G_FALSE;
2461: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2462: htp.p('BIS_TARGET_PVT.Lock_Record:G_EXC_UNEXPECTED_ERROR');
2463: htp.para;
2456: END IF;
2457: -- RAISE;
2458: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2459: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
2460: x_result := FND_API.G_FALSE;
2461: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2462: htp.p('BIS_TARGET_PVT.Lock_Record:G_EXC_UNEXPECTED_ERROR');
2463: htp.para;
2464: END IF;
2463: htp.para;
2464: END IF;
2465: -- RAISE;
2466: WHEN OTHERS THEN
2467: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
2468: l_error_Tbl_p := x_error_Tbl;
2469: BIS_UTILITIES_PVT.Add_Error_Message
2470: ( p_error_table => l_error_Tbl_p
2471: , p_error_msg_id => SQLCODE
2471: , p_error_msg_id => SQLCODE
2472: , p_error_description => SQLERRM
2473: , x_error_table => x_error_Tbl
2474: );
2475: x_result := FND_API.G_FALSE;
2476: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2477: htp.p('BIS_TARGET_PVT.Lock_Record:OTHERS'); htp.para;
2478: END IF;
2479: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2475: x_result := FND_API.G_FALSE;
2476: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2477: htp.p('BIS_TARGET_PVT.Lock_Record:OTHERS'); htp.para;
2478: END IF;
2479: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2480: --
2481: END Lock_Record;
2482: --
2483: --
2504: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
2505:
2506: --
2507: BEGIN
2508: x_return_status := FND_API.G_RET_STS_SUCCESS;
2509: --
2510: IF(p_User_ID IS NULL AND p_User_Name IS NOT NULL) THEN
2511: SELECT user_id
2512: INTO l_user_id
2518: --
2519: BIS_TARGET_LEVEL_PUB.Retrieve_Target_Level
2520: ( p_api_version => 1.0
2521: , p_Target_Level_Rec => p_Target_Level_Rec
2522: , p_all_info => FND_API.G_FALSE
2523: , x_Target_Level_Rec => l_Target_Level_Rec
2524: , x_return_status => x_return_status
2525: , x_error_Tbl => x_error_Tbl
2526: );
2557:
2558: --commented RAISE
2559: EXCEPTION
2560: WHEN NO_DATA_FOUND THEN
2561: x_return_status:= FND_API.G_RET_STS_ERROR;
2562: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2563: htp.p('BIS_TARGET_PVT.Retrieve_Measure_Dim_Values:NO_DATA_FOUND');
2564: htp.para;
2565: END IF;
2562: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2563: htp.p('BIS_TARGET_PVT.Retrieve_Measure_Dim_Values:NO_DATA_FOUND');
2564: htp.para;
2565: END IF;
2566: -- RAISE FND_API.G_EXC_ERROR;
2567: WHEN FND_API.G_EXC_ERROR THEN
2568: x_return_status:= FND_API.G_RET_STS_ERROR;
2569: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2570: htp.p('BIS_TARGET_PVT.Retrieve_Measure_Dim_Values:G_EXC_ERROR');
2563: htp.p('BIS_TARGET_PVT.Retrieve_Measure_Dim_Values:NO_DATA_FOUND');
2564: htp.para;
2565: END IF;
2566: -- RAISE FND_API.G_EXC_ERROR;
2567: WHEN FND_API.G_EXC_ERROR THEN
2568: x_return_status:= FND_API.G_RET_STS_ERROR;
2569: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2570: htp.p('BIS_TARGET_PVT.Retrieve_Measure_Dim_Values:G_EXC_ERROR');
2571: htp.para;
2564: htp.para;
2565: END IF;
2566: -- RAISE FND_API.G_EXC_ERROR;
2567: WHEN FND_API.G_EXC_ERROR THEN
2568: x_return_status:= FND_API.G_RET_STS_ERROR;
2569: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2570: htp.p('BIS_TARGET_PVT.Retrieve_Measure_Dim_Values:G_EXC_ERROR');
2571: htp.para;
2572: END IF;
2570: htp.p('BIS_TARGET_PVT.Retrieve_Measure_Dim_Values:G_EXC_ERROR');
2571: htp.para;
2572: END IF;
2573: -- RAISE;
2574: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2575: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
2576: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2577: htp.p
2578: ('BIS_TARGET_PVT.Retrieve_Measure_Dim_Values:G_EXC_UNEXPECTED_ERROR');
2571: htp.para;
2572: END IF;
2573: -- RAISE;
2574: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2575: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
2576: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2577: htp.p
2578: ('BIS_TARGET_PVT.Retrieve_Measure_Dim_Values:G_EXC_UNEXPECTED_ERROR');
2579: htp.para;
2580:
2581: END IF;
2582: -- RAISE;
2583: WHEN OTHERS THEN
2584: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
2585: l_error_Tbl := x_error_Tbl;
2586: BIS_UTILITIES_PVT.Add_Error_Message
2587: ( p_error_table => l_error_Tbl
2588: , p_error_msg_id => SQLCODE
2591: );
2592: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2593: htp.p('BIS_TARGET_PVT.Retrieve_Measure_Dim_Values:OTHERS'); htp.para;
2594: END IF;
2595: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2596: --
2597: END Retrieve_Measure_Dim_Values;
2598: --
2599: --
2616: WHEN OTHERS THEN
2617: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2618: htp.p('BIS_TARGET_PVT.GetQueryStatement'); htp.para;
2619: END IF;
2620: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2621: END GetQueryStatement;
2622: --
2623: --
2624:
2739: WHEN OTHERS THEN
2740: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2741: htp.p('BIS_TARGET_PVT.GetViewNames'); htp.para;
2742: END IF;
2743: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2744: END GetViewNames;
2745: --
2746: --
2747: FUNCTION GetComputingUserFunctionName
2777: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2778: htp.p('BIS_TARGET_PVT.GetComputingUserFunctionName:OTHERS');
2779: htp.para;
2780: END IF;
2781: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2782: END GetComputingUserFunctionName;
2783: --
2784: --
2785: FUNCTION GetNotifyResponsibilityName
2809: IF(BIS_UTILITIES_PVT.G_DEBUG_FLAG = 1) THEN
2810: htp.p('BIS_TARGET_PVT.GetNotifyResponsibilityName:OTHERS');
2811: htp.para;
2812: END IF;
2813: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2814: END GetNotifyResponsibilityName;
2815: --
2816: --
2817: FUNCTION GetSetOfBookID
3217: --BIS_UTILITIES_PUB.put_line(p_text =>'retrieved time level: '||l_Dimension_Level_Rec.Dimension_Level_id
3218: --||', time level number: '||l_dimension_level_number);
3219:
3220: IF (BIS_UTILITIES_PVT.Value_Not_Missing(p_Target_Rec.target_id)
3221: = FND_API.G_TRUE)
3222: AND (BIS_UTILITIES_PVT.Value_Not_Null(p_Target_Rec.target_id)
3223: = FND_API.G_TRUE)
3224: THEN
3225: OPEN cr_tar_dim_value(p_Target_Rec.target_id);
3219:
3220: IF (BIS_UTILITIES_PVT.Value_Not_Missing(p_Target_Rec.target_id)
3221: = FND_API.G_TRUE)
3222: AND (BIS_UTILITIES_PVT.Value_Not_Null(p_Target_Rec.target_id)
3223: = FND_API.G_TRUE)
3224: THEN
3225: OPEN cr_tar_dim_value(p_Target_Rec.target_id);
3226: FETCH cr_tar_dim_value INTO
3227: l_dim_level_value_tbl(1).dimension_level_value_id,
3243: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
3244: , p_error_table => l_error_tbl
3245: , x_error_table => x_error_tbl
3246: );
3247: x_return_status := FND_API.G_RET_STS_ERROR;
3248: RAISE FND_API.G_EXC_ERROR;
3249: end if;
3250: CLOSE cr_tar_dim_value;
3251:
3244: , p_error_table => l_error_tbl
3245: , x_error_table => x_error_tbl
3246: );
3247: x_return_status := FND_API.G_RET_STS_ERROR;
3248: RAISE FND_API.G_EXC_ERROR;
3249: end if;
3250: CLOSE cr_tar_dim_value;
3251:
3252: END IF;
3270: END LOOP;
3271:
3272: EXCEPTION
3273: --added this
3274: WHEN FND_API.G_EXC_ERROR THEN
3275: BIS_UTILITIES_PUB.put_line(p_text =>'Error 1 while getting time level value: '||SQLERRM);
3276: x_return_status := FND_API.G_RET_STS_ERROR;
3277: IF cr_tar_dim_value%ISOPEN THEN CLOSE cr_tar_dim_value; END IF;
3278: WHEN OTHERS THEN
3272: EXCEPTION
3273: --added this
3274: WHEN FND_API.G_EXC_ERROR THEN
3275: BIS_UTILITIES_PUB.put_line(p_text =>'Error 1 while getting time level value: '||SQLERRM);
3276: x_return_status := FND_API.G_RET_STS_ERROR;
3277: IF cr_tar_dim_value%ISOPEN THEN CLOSE cr_tar_dim_value; END IF;
3278: WHEN OTHERS THEN
3279: BIS_UTILITIES_PUB.put_line(p_text =>'Error 2 while getting time level value: '||SQLERRM);
3280: IF cr_tar_dim_value%ISOPEN THEN CLOSE cr_tar_dim_value; END IF;
3277: IF cr_tar_dim_value%ISOPEN THEN CLOSE cr_tar_dim_value; END IF;
3278: WHEN OTHERS THEN
3279: BIS_UTILITIES_PUB.put_line(p_text =>'Error 2 while getting time level value: '||SQLERRM);
3280: IF cr_tar_dim_value%ISOPEN THEN CLOSE cr_tar_dim_value; END IF;
3281: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
3282: l_error_Tbl := x_error_Tbl;
3283: BIS_UTILITIES_PVT.Add_Error_Message
3284: ( p_error_table => l_error_Tbl
3285: , p_error_msg_id => SQLCODE
3406:
3407: EXCEPTION
3408:
3409: --added this
3410: WHEN FND_API.G_EXC_ERROR THEN
3411:
3412: BIS_UTILITIES_PUB.put_line(p_text =>'Error 1 while getting Org level value: '||SQLERRM);
3413: x_return_status := FND_API.G_RET_STS_ERROR;
3414:
3409: --added this
3410: WHEN FND_API.G_EXC_ERROR THEN
3411:
3412: BIS_UTILITIES_PUB.put_line(p_text =>'Error 1 while getting Org level value: '||SQLERRM);
3413: x_return_status := FND_API.G_RET_STS_ERROR;
3414:
3415:
3416: WHEN OTHERS THEN
3417: BIS_UTILITIES_PUB.put_line(p_text =>'Error 2 while getting Org level value: '||SQLERRM);
3414:
3415:
3416: WHEN OTHERS THEN
3417: BIS_UTILITIES_PUB.put_line(p_text =>'Error 2 while getting Org level value: '||SQLERRM);
3418: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
3419:
3420: l_error_Tbl_p := x_error_Tbl;
3421: BIS_UTILITIES_PVT.Add_Error_Message
3422: ( p_error_table => l_error_Tbl_p
3498: WHERE short_name=p_dim_level_short_name;
3499:
3500: BEGIN
3501: IF (p_target_level_rec.measure_short_name IS NOT NULL
3502: AND BIS_UTILITIES_PUB.Value_Not_Missing(p_target_level_rec.measure_short_name) = FND_API.G_TRUE) THEN
3503: l_measure_rec.measure_short_name := p_target_level_rec.measure_short_name;
3504: END IF;
3505: IF (p_target_level_rec.measure_id IS NOT NULL
3506: AND BIS_UTILITIES_PUB.Value_Not_Missing(p_target_level_rec.measure_id) = FND_API.G_TRUE) THEN
3502: AND BIS_UTILITIES_PUB.Value_Not_Missing(p_target_level_rec.measure_short_name) = FND_API.G_TRUE) THEN
3503: l_measure_rec.measure_short_name := p_target_level_rec.measure_short_name;
3504: END IF;
3505: IF (p_target_level_rec.measure_id IS NOT NULL
3506: AND BIS_UTILITIES_PUB.Value_Not_Missing(p_target_level_rec.measure_id) = FND_API.G_TRUE) THEN
3507: l_measure_rec.measure_id := p_target_level_rec.measure_id;
3508: END IF;
3509: --Populate the measure record with all the relevant values
3510: l_measure_rec_p := l_measure_rec;
3509: --Populate the measure record with all the relevant values
3510: l_measure_rec_p := l_measure_rec;
3511: BIS_MEASURE_PUB.RETRIEVE_MEASURE( p_api_version => p_api_version
3512: ,p_measure_rec => l_measure_rec_p
3513: ,p_all_info =>FND_API.G_TRUE
3514: ,x_measure_rec => l_measure_rec
3515: ,x_return_status => x_return_status
3516: ,x_error_tbl => x_error_tbl
3517: );
3516: ,x_error_tbl => x_error_tbl
3517: );
3518:
3519: IF (p_target_level_rec.dimension1_level_short_name IS NOT NULL
3520: AND BIS_UTILITIES_PUB.Value_Not_Missing(p_target_level_rec.dimension1_level_short_name) = FND_API.G_TRUE) THEN
3521: OPEN c_dim_lvl(p_target_level_rec.dimension1_level_short_name);
3522: FETCH c_dim_lvl INTO x_target_level_rec.dimension1_level_id,x_target_level_rec.dimension1_level_name;
3523: CLOSE c_dim_lvl;
3524: END IF;
3522: FETCH c_dim_lvl INTO x_target_level_rec.dimension1_level_id,x_target_level_rec.dimension1_level_name;
3523: CLOSE c_dim_lvl;
3524: END IF;
3525: IF (p_target_level_rec.dimension2_level_short_name IS NOT NULL
3526: AND BIS_UTILITIES_PUB.Value_Not_Missing(p_target_level_rec.dimension2_level_short_name)= FND_API.G_TRUE) THEN
3527: OPEN c_dim_lvl(p_target_level_rec.dimension2_level_short_name);
3528: FETCH c_dim_lvl INTO x_target_level_rec.dimension2_level_id,x_target_level_rec.dimension2_level_name;
3529: CLOSE c_dim_lvl;
3530: END IF;
3528: FETCH c_dim_lvl INTO x_target_level_rec.dimension2_level_id,x_target_level_rec.dimension2_level_name;
3529: CLOSE c_dim_lvl;
3530: END IF;
3531: IF (p_target_level_rec.dimension3_level_short_name IS NOT NULL
3532: AND BIS_UTILITIES_PUB.Value_Not_Missing(p_target_level_rec.dimension3_level_short_name)= FND_API.G_TRUE) THEN
3533: OPEN c_dim_lvl(p_target_level_rec.dimension3_level_short_name);
3534: FETCH c_dim_lvl INTO x_target_level_rec.dimension3_level_id,x_target_level_rec.dimension3_level_name;
3535: CLOSE c_dim_lvl;
3536: END IF;
3534: FETCH c_dim_lvl INTO x_target_level_rec.dimension3_level_id,x_target_level_rec.dimension3_level_name;
3535: CLOSE c_dim_lvl;
3536: END IF;
3537: IF (p_target_level_rec.dimension4_level_short_name IS NOT NULL
3538: AND BIS_UTILITIES_PUB.Value_Not_Missing(p_target_level_rec.dimension4_level_short_name)= FND_API.G_TRUE) THEN
3539: OPEN c_dim_lvl(p_target_level_rec.dimension4_level_short_name);
3540: FETCH c_dim_lvl INTO x_target_level_rec.dimension4_level_id,x_target_level_rec.dimension4_level_name;
3541: CLOSE c_dim_lvl;
3542: END IF;
3540: FETCH c_dim_lvl INTO x_target_level_rec.dimension4_level_id,x_target_level_rec.dimension4_level_name;
3541: CLOSE c_dim_lvl;
3542: END IF;
3543: IF (p_target_level_rec.dimension5_level_short_name IS NOT NULL
3544: AND BIS_UTILITIES_PUB.Value_Not_Missing(p_target_level_rec.dimension5_level_short_name)= FND_API.G_TRUE) THEN
3545: OPEN c_dim_lvl(p_target_level_rec.dimension5_level_short_name);
3546: FETCH c_dim_lvl INTO x_target_level_rec.dimension5_level_id,x_target_level_rec.dimension5_level_name;
3547: CLOSE c_dim_lvl;
3548: END IF;
3546: FETCH c_dim_lvl INTO x_target_level_rec.dimension5_level_id,x_target_level_rec.dimension5_level_name;
3547: CLOSE c_dim_lvl;
3548: END IF;
3549: IF (p_target_level_rec.dimension6_level_short_name IS NOT NULL
3550: AND BIS_UTILITIES_PUB.Value_Not_Missing(p_target_level_rec.dimension6_level_short_name)= FND_API.G_TRUE) THEN
3551: OPEN c_dim_lvl(p_target_level_rec.dimension6_level_short_name);
3552: FETCH c_dim_lvl INTO x_target_level_rec.dimension6_level_id,x_target_level_rec.dimension6_level_name;
3553: CLOSE c_dim_lvl;
3554: END IF;
3552: FETCH c_dim_lvl INTO x_target_level_rec.dimension6_level_id,x_target_level_rec.dimension6_level_name;
3553: CLOSE c_dim_lvl;
3554: END IF;
3555: IF (p_target_level_rec.dimension7_level_short_name IS NOT NULL
3556: AND BIS_UTILITIES_PUB.Value_Not_Missing(p_target_level_rec.dimension7_level_short_name)= FND_API.G_TRUE) THEN
3557: OPEN c_dim_lvl(p_target_level_rec.dimension7_level_short_name);
3558: FETCH c_dim_lvl INTO x_target_level_rec.dimension7_level_id,x_target_level_rec.dimension7_level_name;
3559: CLOSE c_dim_lvl;
3560: END IF;
3566:
3567: --Get the dimension ids for all the dimension level ids. This will be later used to
3568: --sequence the dimension levels
3569: IF (x_target_level_rec.dimension1_level_id IS NOT NULL
3570: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_level_rec.dimension1_level_id)= FND_API.G_TRUE) THEN
3571: SetNULL(l_dim_level_rec,l_dim_level_rec);
3572: l_dim_level_rec.dimension_level_id := x_target_level_rec.dimension1_level_id;
3573: l_dim_level_rec_p := l_dim_level_rec;
3574: BIS_DIMENSION_LEVEL_PUB.Retrieve_Dimension_Level( p_api_version => p_api_version
3580: l_dim1_id := BIS_UTILITIES_PVT.checkmissnum(l_dim_level_rec.dimension_id);
3581: END IF;
3582:
3583: IF (x_target_level_rec.dimension2_level_id IS NOT NULL
3584: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_level_rec.dimension2_level_id)= FND_API.G_TRUE) THEN
3585: SetNULL(l_dim_level_rec,l_dim_level_rec);
3586: l_dim_level_rec.dimension_level_id := x_target_level_rec.dimension2_level_id;
3587: l_dim_level_rec_p := l_dim_level_rec;
3588: BIS_DIMENSION_LEVEL_PUB.Retrieve_Dimension_Level( p_api_version => p_api_version
3594: l_dim2_id := BIS_UTILITIES_PVT.checkmissnum(l_dim_level_rec.dimension_id);
3595: END IF;
3596:
3597: IF (x_target_level_rec.dimension3_level_id IS NOT NULL
3598: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_level_rec.dimension3_level_id)= FND_API.G_TRUE) THEN
3599: SetNULL(l_dim_level_rec,l_dim_level_rec);
3600: l_dim_level_rec.dimension_level_id := x_target_level_rec.dimension3_level_id;
3601: l_dim_level_rec_p := l_dim_level_rec;
3602: BIS_DIMENSION_LEVEL_PUB.Retrieve_Dimension_Level( p_api_version => p_api_version
3608: l_dim3_id := BIS_UTILITIES_PVT.checkmissnum(l_dim_level_rec.dimension_id);
3609: END IF;
3610:
3611: IF (x_target_level_rec.dimension4_level_id IS NOT NULL
3612: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_level_rec.dimension4_level_id)= FND_API.G_TRUE) THEN
3613: SetNULL(l_dim_level_rec,l_dim_level_rec);
3614: l_dim_level_rec.dimension_level_id := x_target_level_rec.dimension4_level_id;
3615: l_dim_level_rec_p := l_dim_level_rec;
3616: BIS_DIMENSION_LEVEL_PUB.Retrieve_Dimension_Level( p_api_version => p_api_version
3622: l_dim4_id := BIS_UTILITIES_PVT.checkmissnum(l_dim_level_rec.dimension_id);
3623: END IF;
3624:
3625: IF (x_target_level_rec.dimension5_level_id IS NOT NULL
3626: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_level_rec.dimension5_level_id)= FND_API.G_TRUE) THEN
3627: SetNULL(l_dim_level_rec,l_dim_level_rec);
3628: l_dim_level_rec.dimension_level_id := x_target_level_rec.dimension5_level_id;
3629: l_dim_level_rec_p := l_dim_level_rec;
3630: BIS_DIMENSION_LEVEL_PUB.Retrieve_Dimension_Level( p_api_version => p_api_version
3636: l_dim5_id := BIS_UTILITIES_PVT.checkmissnum(l_dim_level_rec.dimension_id);
3637: END IF;
3638:
3639: IF (x_target_level_rec.dimension6_level_id IS NOT NULL
3640: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_level_rec.dimension6_level_id)= FND_API.G_TRUE) THEN
3641: SetNULL(l_dim_level_rec,l_dim_level_rec);
3642: l_dim_level_rec.dimension_level_id := x_target_level_rec.dimension6_level_id;
3643: l_dim_level_rec_p := l_dim_level_rec;
3644: BIS_DIMENSION_LEVEL_PUB.Retrieve_Dimension_Level( p_api_version => p_api_version
3650: l_dim6_id := BIS_UTILITIES_PVT.checkmissnum(l_dim_level_rec.dimension_id);
3651: END IF;
3652:
3653: IF (x_target_level_rec.dimension7_level_id IS NOT NULL
3654: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_level_rec.dimension7_level_id)= FND_API.G_TRUE) THEN
3655: SetNULL(l_dim_level_rec,l_dim_level_rec);
3656: l_dim_level_rec.dimension_level_id := x_target_level_rec.dimension7_level_id;
3657: l_dim_level_rec_p := l_dim_level_rec;
3658: BIS_DIMENSION_LEVEL_PUB.Retrieve_Dimension_Level( p_api_version => p_api_version
3917: l_dim7_level_name := x_target_level_rec.dimension7_level_name;
3918: END IF;
3919:
3920: x_Target_Level_Rec.Measure_ID := l_Measure_Rec.Measure_ID;
3921: x_Target_Level_Rec.Dimension1_Level_ID := NVL(l_DIM1_LEVEL_ID,FND_API.G_MISS_NUM);
3922: x_Target_Level_Rec.Dimension2_Level_ID := NVL(l_DIM2_LEVEL_ID,FND_API.G_MISS_NUM);
3923: x_Target_Level_Rec.Dimension3_Level_ID := NVL(l_DIM3_LEVEL_ID,FND_API.G_MISS_NUM);
3924: x_Target_Level_Rec.Dimension4_Level_ID := NVL(l_DIM4_LEVEL_ID,FND_API.G_MISS_NUM);
3925: x_Target_Level_Rec.Dimension5_Level_ID := NVL(l_DIM5_LEVEL_ID,FND_API.G_MISS_NUM);
3918: END IF;
3919:
3920: x_Target_Level_Rec.Measure_ID := l_Measure_Rec.Measure_ID;
3921: x_Target_Level_Rec.Dimension1_Level_ID := NVL(l_DIM1_LEVEL_ID,FND_API.G_MISS_NUM);
3922: x_Target_Level_Rec.Dimension2_Level_ID := NVL(l_DIM2_LEVEL_ID,FND_API.G_MISS_NUM);
3923: x_Target_Level_Rec.Dimension3_Level_ID := NVL(l_DIM3_LEVEL_ID,FND_API.G_MISS_NUM);
3924: x_Target_Level_Rec.Dimension4_Level_ID := NVL(l_DIM4_LEVEL_ID,FND_API.G_MISS_NUM);
3925: x_Target_Level_Rec.Dimension5_Level_ID := NVL(l_DIM5_LEVEL_ID,FND_API.G_MISS_NUM);
3926: x_Target_Level_Rec.Dimension6_Level_ID := NVL(l_DIM6_LEVEL_ID,FND_API.G_MISS_NUM);
3919:
3920: x_Target_Level_Rec.Measure_ID := l_Measure_Rec.Measure_ID;
3921: x_Target_Level_Rec.Dimension1_Level_ID := NVL(l_DIM1_LEVEL_ID,FND_API.G_MISS_NUM);
3922: x_Target_Level_Rec.Dimension2_Level_ID := NVL(l_DIM2_LEVEL_ID,FND_API.G_MISS_NUM);
3923: x_Target_Level_Rec.Dimension3_Level_ID := NVL(l_DIM3_LEVEL_ID,FND_API.G_MISS_NUM);
3924: x_Target_Level_Rec.Dimension4_Level_ID := NVL(l_DIM4_LEVEL_ID,FND_API.G_MISS_NUM);
3925: x_Target_Level_Rec.Dimension5_Level_ID := NVL(l_DIM5_LEVEL_ID,FND_API.G_MISS_NUM);
3926: x_Target_Level_Rec.Dimension6_Level_ID := NVL(l_DIM6_LEVEL_ID,FND_API.G_MISS_NUM);
3927: x_Target_Level_Rec.Dimension7_Level_ID := NVL(l_DIM7_LEVEL_ID,FND_API.G_MISS_NUM);
3920: x_Target_Level_Rec.Measure_ID := l_Measure_Rec.Measure_ID;
3921: x_Target_Level_Rec.Dimension1_Level_ID := NVL(l_DIM1_LEVEL_ID,FND_API.G_MISS_NUM);
3922: x_Target_Level_Rec.Dimension2_Level_ID := NVL(l_DIM2_LEVEL_ID,FND_API.G_MISS_NUM);
3923: x_Target_Level_Rec.Dimension3_Level_ID := NVL(l_DIM3_LEVEL_ID,FND_API.G_MISS_NUM);
3924: x_Target_Level_Rec.Dimension4_Level_ID := NVL(l_DIM4_LEVEL_ID,FND_API.G_MISS_NUM);
3925: x_Target_Level_Rec.Dimension5_Level_ID := NVL(l_DIM5_LEVEL_ID,FND_API.G_MISS_NUM);
3926: x_Target_Level_Rec.Dimension6_Level_ID := NVL(l_DIM6_LEVEL_ID,FND_API.G_MISS_NUM);
3927: x_Target_Level_Rec.Dimension7_Level_ID := NVL(l_DIM7_LEVEL_ID,FND_API.G_MISS_NUM);
3928: l_target_level_id := BIS_TARGET_LEVEL_PVT.Get_Level_Id_From_Dimlevels(x_target_level_rec);
3921: x_Target_Level_Rec.Dimension1_Level_ID := NVL(l_DIM1_LEVEL_ID,FND_API.G_MISS_NUM);
3922: x_Target_Level_Rec.Dimension2_Level_ID := NVL(l_DIM2_LEVEL_ID,FND_API.G_MISS_NUM);
3923: x_Target_Level_Rec.Dimension3_Level_ID := NVL(l_DIM3_LEVEL_ID,FND_API.G_MISS_NUM);
3924: x_Target_Level_Rec.Dimension4_Level_ID := NVL(l_DIM4_LEVEL_ID,FND_API.G_MISS_NUM);
3925: x_Target_Level_Rec.Dimension5_Level_ID := NVL(l_DIM5_LEVEL_ID,FND_API.G_MISS_NUM);
3926: x_Target_Level_Rec.Dimension6_Level_ID := NVL(l_DIM6_LEVEL_ID,FND_API.G_MISS_NUM);
3927: x_Target_Level_Rec.Dimension7_Level_ID := NVL(l_DIM7_LEVEL_ID,FND_API.G_MISS_NUM);
3928: l_target_level_id := BIS_TARGET_LEVEL_PVT.Get_Level_Id_From_Dimlevels(x_target_level_rec);
3929: x_Target_Level_Rec.Target_Level_Id := l_target_level_id;
3922: x_Target_Level_Rec.Dimension2_Level_ID := NVL(l_DIM2_LEVEL_ID,FND_API.G_MISS_NUM);
3923: x_Target_Level_Rec.Dimension3_Level_ID := NVL(l_DIM3_LEVEL_ID,FND_API.G_MISS_NUM);
3924: x_Target_Level_Rec.Dimension4_Level_ID := NVL(l_DIM4_LEVEL_ID,FND_API.G_MISS_NUM);
3925: x_Target_Level_Rec.Dimension5_Level_ID := NVL(l_DIM5_LEVEL_ID,FND_API.G_MISS_NUM);
3926: x_Target_Level_Rec.Dimension6_Level_ID := NVL(l_DIM6_LEVEL_ID,FND_API.G_MISS_NUM);
3927: x_Target_Level_Rec.Dimension7_Level_ID := NVL(l_DIM7_LEVEL_ID,FND_API.G_MISS_NUM);
3928: l_target_level_id := BIS_TARGET_LEVEL_PVT.Get_Level_Id_From_Dimlevels(x_target_level_rec);
3929: x_Target_Level_Rec.Target_Level_Id := l_target_level_id;
3930: x_Target_Level_Rec.Dimension1_Level_Short_Name := NVL(l_DIM1_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3923: x_Target_Level_Rec.Dimension3_Level_ID := NVL(l_DIM3_LEVEL_ID,FND_API.G_MISS_NUM);
3924: x_Target_Level_Rec.Dimension4_Level_ID := NVL(l_DIM4_LEVEL_ID,FND_API.G_MISS_NUM);
3925: x_Target_Level_Rec.Dimension5_Level_ID := NVL(l_DIM5_LEVEL_ID,FND_API.G_MISS_NUM);
3926: x_Target_Level_Rec.Dimension6_Level_ID := NVL(l_DIM6_LEVEL_ID,FND_API.G_MISS_NUM);
3927: x_Target_Level_Rec.Dimension7_Level_ID := NVL(l_DIM7_LEVEL_ID,FND_API.G_MISS_NUM);
3928: l_target_level_id := BIS_TARGET_LEVEL_PVT.Get_Level_Id_From_Dimlevels(x_target_level_rec);
3929: x_Target_Level_Rec.Target_Level_Id := l_target_level_id;
3930: x_Target_Level_Rec.Dimension1_Level_Short_Name := NVL(l_DIM1_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3931: x_Target_Level_Rec.Dimension2_Level_Short_Name := NVL(l_DIM2_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3926: x_Target_Level_Rec.Dimension6_Level_ID := NVL(l_DIM6_LEVEL_ID,FND_API.G_MISS_NUM);
3927: x_Target_Level_Rec.Dimension7_Level_ID := NVL(l_DIM7_LEVEL_ID,FND_API.G_MISS_NUM);
3928: l_target_level_id := BIS_TARGET_LEVEL_PVT.Get_Level_Id_From_Dimlevels(x_target_level_rec);
3929: x_Target_Level_Rec.Target_Level_Id := l_target_level_id;
3930: x_Target_Level_Rec.Dimension1_Level_Short_Name := NVL(l_DIM1_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3931: x_Target_Level_Rec.Dimension2_Level_Short_Name := NVL(l_DIM2_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3932: x_Target_Level_Rec.Dimension3_Level_Short_Name := NVL(l_DIM3_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3933: x_Target_Level_Rec.Dimension4_Level_Short_Name := NVL(l_DIM4_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3934: x_Target_Level_Rec.Dimension5_Level_Short_Name := NVL(l_DIM5_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3927: x_Target_Level_Rec.Dimension7_Level_ID := NVL(l_DIM7_LEVEL_ID,FND_API.G_MISS_NUM);
3928: l_target_level_id := BIS_TARGET_LEVEL_PVT.Get_Level_Id_From_Dimlevels(x_target_level_rec);
3929: x_Target_Level_Rec.Target_Level_Id := l_target_level_id;
3930: x_Target_Level_Rec.Dimension1_Level_Short_Name := NVL(l_DIM1_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3931: x_Target_Level_Rec.Dimension2_Level_Short_Name := NVL(l_DIM2_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3932: x_Target_Level_Rec.Dimension3_Level_Short_Name := NVL(l_DIM3_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3933: x_Target_Level_Rec.Dimension4_Level_Short_Name := NVL(l_DIM4_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3934: x_Target_Level_Rec.Dimension5_Level_Short_Name := NVL(l_DIM5_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3935: x_Target_Level_Rec.Dimension6_Level_Short_Name := NVL(l_DIM6_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3928: l_target_level_id := BIS_TARGET_LEVEL_PVT.Get_Level_Id_From_Dimlevels(x_target_level_rec);
3929: x_Target_Level_Rec.Target_Level_Id := l_target_level_id;
3930: x_Target_Level_Rec.Dimension1_Level_Short_Name := NVL(l_DIM1_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3931: x_Target_Level_Rec.Dimension2_Level_Short_Name := NVL(l_DIM2_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3932: x_Target_Level_Rec.Dimension3_Level_Short_Name := NVL(l_DIM3_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3933: x_Target_Level_Rec.Dimension4_Level_Short_Name := NVL(l_DIM4_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3934: x_Target_Level_Rec.Dimension5_Level_Short_Name := NVL(l_DIM5_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3935: x_Target_Level_Rec.Dimension6_Level_Short_Name := NVL(l_DIM6_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3936: x_Target_Level_Rec.Dimension7_Level_Short_Name := NVL(l_DIM7_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3929: x_Target_Level_Rec.Target_Level_Id := l_target_level_id;
3930: x_Target_Level_Rec.Dimension1_Level_Short_Name := NVL(l_DIM1_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3931: x_Target_Level_Rec.Dimension2_Level_Short_Name := NVL(l_DIM2_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3932: x_Target_Level_Rec.Dimension3_Level_Short_Name := NVL(l_DIM3_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3933: x_Target_Level_Rec.Dimension4_Level_Short_Name := NVL(l_DIM4_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3934: x_Target_Level_Rec.Dimension5_Level_Short_Name := NVL(l_DIM5_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3935: x_Target_Level_Rec.Dimension6_Level_Short_Name := NVL(l_DIM6_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3936: x_Target_Level_Rec.Dimension7_Level_Short_Name := NVL(l_DIM7_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3937: x_Target_Level_Rec.Dimension1_Level_Name := NVL(l_DIM1_LEVEL_NAME,FND_API.G_MISS_CHAR);
3930: x_Target_Level_Rec.Dimension1_Level_Short_Name := NVL(l_DIM1_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3931: x_Target_Level_Rec.Dimension2_Level_Short_Name := NVL(l_DIM2_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3932: x_Target_Level_Rec.Dimension3_Level_Short_Name := NVL(l_DIM3_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3933: x_Target_Level_Rec.Dimension4_Level_Short_Name := NVL(l_DIM4_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3934: x_Target_Level_Rec.Dimension5_Level_Short_Name := NVL(l_DIM5_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3935: x_Target_Level_Rec.Dimension6_Level_Short_Name := NVL(l_DIM6_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3936: x_Target_Level_Rec.Dimension7_Level_Short_Name := NVL(l_DIM7_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3937: x_Target_Level_Rec.Dimension1_Level_Name := NVL(l_DIM1_LEVEL_NAME,FND_API.G_MISS_CHAR);
3938: x_Target_Level_Rec.Dimension2_Level_Name := NVL(l_DIM2_LEVEL_NAME,FND_API.G_MISS_CHAR);
3931: x_Target_Level_Rec.Dimension2_Level_Short_Name := NVL(l_DIM2_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3932: x_Target_Level_Rec.Dimension3_Level_Short_Name := NVL(l_DIM3_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3933: x_Target_Level_Rec.Dimension4_Level_Short_Name := NVL(l_DIM4_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3934: x_Target_Level_Rec.Dimension5_Level_Short_Name := NVL(l_DIM5_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3935: x_Target_Level_Rec.Dimension6_Level_Short_Name := NVL(l_DIM6_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3936: x_Target_Level_Rec.Dimension7_Level_Short_Name := NVL(l_DIM7_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3937: x_Target_Level_Rec.Dimension1_Level_Name := NVL(l_DIM1_LEVEL_NAME,FND_API.G_MISS_CHAR);
3938: x_Target_Level_Rec.Dimension2_Level_Name := NVL(l_DIM2_LEVEL_NAME,FND_API.G_MISS_CHAR);
3939: x_Target_Level_Rec.Dimension3_Level_Name := NVL(l_DIM3_LEVEL_NAME,FND_API.G_MISS_CHAR);
3932: x_Target_Level_Rec.Dimension3_Level_Short_Name := NVL(l_DIM3_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3933: x_Target_Level_Rec.Dimension4_Level_Short_Name := NVL(l_DIM4_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3934: x_Target_Level_Rec.Dimension5_Level_Short_Name := NVL(l_DIM5_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3935: x_Target_Level_Rec.Dimension6_Level_Short_Name := NVL(l_DIM6_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3936: x_Target_Level_Rec.Dimension7_Level_Short_Name := NVL(l_DIM7_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3937: x_Target_Level_Rec.Dimension1_Level_Name := NVL(l_DIM1_LEVEL_NAME,FND_API.G_MISS_CHAR);
3938: x_Target_Level_Rec.Dimension2_Level_Name := NVL(l_DIM2_LEVEL_NAME,FND_API.G_MISS_CHAR);
3939: x_Target_Level_Rec.Dimension3_Level_Name := NVL(l_DIM3_LEVEL_NAME,FND_API.G_MISS_CHAR);
3940: x_Target_Level_Rec.Dimension4_Level_Name := NVL(l_DIM4_LEVEL_NAME,FND_API.G_MISS_CHAR);
3933: x_Target_Level_Rec.Dimension4_Level_Short_Name := NVL(l_DIM4_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3934: x_Target_Level_Rec.Dimension5_Level_Short_Name := NVL(l_DIM5_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3935: x_Target_Level_Rec.Dimension6_Level_Short_Name := NVL(l_DIM6_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3936: x_Target_Level_Rec.Dimension7_Level_Short_Name := NVL(l_DIM7_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3937: x_Target_Level_Rec.Dimension1_Level_Name := NVL(l_DIM1_LEVEL_NAME,FND_API.G_MISS_CHAR);
3938: x_Target_Level_Rec.Dimension2_Level_Name := NVL(l_DIM2_LEVEL_NAME,FND_API.G_MISS_CHAR);
3939: x_Target_Level_Rec.Dimension3_Level_Name := NVL(l_DIM3_LEVEL_NAME,FND_API.G_MISS_CHAR);
3940: x_Target_Level_Rec.Dimension4_Level_Name := NVL(l_DIM4_LEVEL_NAME,FND_API.G_MISS_CHAR);
3941: x_Target_Level_Rec.Dimension5_Level_Name := NVL(l_DIM5_LEVEL_NAME,FND_API.G_MISS_CHAR);
3934: x_Target_Level_Rec.Dimension5_Level_Short_Name := NVL(l_DIM5_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3935: x_Target_Level_Rec.Dimension6_Level_Short_Name := NVL(l_DIM6_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3936: x_Target_Level_Rec.Dimension7_Level_Short_Name := NVL(l_DIM7_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3937: x_Target_Level_Rec.Dimension1_Level_Name := NVL(l_DIM1_LEVEL_NAME,FND_API.G_MISS_CHAR);
3938: x_Target_Level_Rec.Dimension2_Level_Name := NVL(l_DIM2_LEVEL_NAME,FND_API.G_MISS_CHAR);
3939: x_Target_Level_Rec.Dimension3_Level_Name := NVL(l_DIM3_LEVEL_NAME,FND_API.G_MISS_CHAR);
3940: x_Target_Level_Rec.Dimension4_Level_Name := NVL(l_DIM4_LEVEL_NAME,FND_API.G_MISS_CHAR);
3941: x_Target_Level_Rec.Dimension5_Level_Name := NVL(l_DIM5_LEVEL_NAME,FND_API.G_MISS_CHAR);
3942: x_Target_Level_Rec.Dimension6_Level_Name := NVL(l_DIM6_LEVEL_NAME,FND_API.G_MISS_CHAR);
3935: x_Target_Level_Rec.Dimension6_Level_Short_Name := NVL(l_DIM6_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3936: x_Target_Level_Rec.Dimension7_Level_Short_Name := NVL(l_DIM7_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3937: x_Target_Level_Rec.Dimension1_Level_Name := NVL(l_DIM1_LEVEL_NAME,FND_API.G_MISS_CHAR);
3938: x_Target_Level_Rec.Dimension2_Level_Name := NVL(l_DIM2_LEVEL_NAME,FND_API.G_MISS_CHAR);
3939: x_Target_Level_Rec.Dimension3_Level_Name := NVL(l_DIM3_LEVEL_NAME,FND_API.G_MISS_CHAR);
3940: x_Target_Level_Rec.Dimension4_Level_Name := NVL(l_DIM4_LEVEL_NAME,FND_API.G_MISS_CHAR);
3941: x_Target_Level_Rec.Dimension5_Level_Name := NVL(l_DIM5_LEVEL_NAME,FND_API.G_MISS_CHAR);
3942: x_Target_Level_Rec.Dimension6_Level_Name := NVL(l_DIM6_LEVEL_NAME,FND_API.G_MISS_CHAR);
3943: x_Target_Level_Rec.Dimension7_Level_Name := NVL(l_DIM7_LEVEL_NAME,FND_API.G_MISS_CHAR);
3936: x_Target_Level_Rec.Dimension7_Level_Short_Name := NVL(l_DIM7_LEVEL_SHORT_NAME,FND_API.G_MISS_CHAR);
3937: x_Target_Level_Rec.Dimension1_Level_Name := NVL(l_DIM1_LEVEL_NAME,FND_API.G_MISS_CHAR);
3938: x_Target_Level_Rec.Dimension2_Level_Name := NVL(l_DIM2_LEVEL_NAME,FND_API.G_MISS_CHAR);
3939: x_Target_Level_Rec.Dimension3_Level_Name := NVL(l_DIM3_LEVEL_NAME,FND_API.G_MISS_CHAR);
3940: x_Target_Level_Rec.Dimension4_Level_Name := NVL(l_DIM4_LEVEL_NAME,FND_API.G_MISS_CHAR);
3941: x_Target_Level_Rec.Dimension5_Level_Name := NVL(l_DIM5_LEVEL_NAME,FND_API.G_MISS_CHAR);
3942: x_Target_Level_Rec.Dimension6_Level_Name := NVL(l_DIM6_LEVEL_NAME,FND_API.G_MISS_CHAR);
3943: x_Target_Level_Rec.Dimension7_Level_Name := NVL(l_DIM7_LEVEL_NAME,FND_API.G_MISS_CHAR);
3944:
3937: x_Target_Level_Rec.Dimension1_Level_Name := NVL(l_DIM1_LEVEL_NAME,FND_API.G_MISS_CHAR);
3938: x_Target_Level_Rec.Dimension2_Level_Name := NVL(l_DIM2_LEVEL_NAME,FND_API.G_MISS_CHAR);
3939: x_Target_Level_Rec.Dimension3_Level_Name := NVL(l_DIM3_LEVEL_NAME,FND_API.G_MISS_CHAR);
3940: x_Target_Level_Rec.Dimension4_Level_Name := NVL(l_DIM4_LEVEL_NAME,FND_API.G_MISS_CHAR);
3941: x_Target_Level_Rec.Dimension5_Level_Name := NVL(l_DIM5_LEVEL_NAME,FND_API.G_MISS_CHAR);
3942: x_Target_Level_Rec.Dimension6_Level_Name := NVL(l_DIM6_LEVEL_NAME,FND_API.G_MISS_CHAR);
3943: x_Target_Level_Rec.Dimension7_Level_Name := NVL(l_DIM7_LEVEL_NAME,FND_API.G_MISS_CHAR);
3944:
3945:
3938: x_Target_Level_Rec.Dimension2_Level_Name := NVL(l_DIM2_LEVEL_NAME,FND_API.G_MISS_CHAR);
3939: x_Target_Level_Rec.Dimension3_Level_Name := NVL(l_DIM3_LEVEL_NAME,FND_API.G_MISS_CHAR);
3940: x_Target_Level_Rec.Dimension4_Level_Name := NVL(l_DIM4_LEVEL_NAME,FND_API.G_MISS_CHAR);
3941: x_Target_Level_Rec.Dimension5_Level_Name := NVL(l_DIM5_LEVEL_NAME,FND_API.G_MISS_CHAR);
3942: x_Target_Level_Rec.Dimension6_Level_Name := NVL(l_DIM6_LEVEL_NAME,FND_API.G_MISS_CHAR);
3943: x_Target_Level_Rec.Dimension7_Level_Name := NVL(l_DIM7_LEVEL_NAME,FND_API.G_MISS_CHAR);
3944:
3945:
3946: --On to the Targets Stuff
3939: x_Target_Level_Rec.Dimension3_Level_Name := NVL(l_DIM3_LEVEL_NAME,FND_API.G_MISS_CHAR);
3940: x_Target_Level_Rec.Dimension4_Level_Name := NVL(l_DIM4_LEVEL_NAME,FND_API.G_MISS_CHAR);
3941: x_Target_Level_Rec.Dimension5_Level_Name := NVL(l_DIM5_LEVEL_NAME,FND_API.G_MISS_CHAR);
3942: x_Target_Level_Rec.Dimension6_Level_Name := NVL(l_DIM6_LEVEL_NAME,FND_API.G_MISS_CHAR);
3943: x_Target_Level_Rec.Dimension7_Level_Name := NVL(l_DIM7_LEVEL_NAME,FND_API.G_MISS_CHAR);
3944:
3945:
3946: --On to the Targets Stuff
3947: x_target_rec.target_level_id := l_target_level_id;
3956:
3957: l_target_rec_p := x_target_rec;
3958: BIS_TARGET_PUB.Retrieve_Target(p_api_version => 1.0,
3959: p_Target_Rec => l_target_rec_p,
3960: p_all_info => FND_API.G_TRUE,
3961: x_Target_Rec => x_target_rec,
3962: x_return_status => x_return_status,
3963: x_error_Tbl => x_error_tbl);
3964:
3964:
3965: --Dim Level Value Names
3966:
3967: IF (x_target_level_rec.dimension1_level_id IS NOT NULL
3968: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_level_rec.dimension1_level_id)= FND_API.G_TRUE
3969: AND
3970: x_target_rec.dim1_level_value_id IS NOT NULL
3971: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_rec.dim1_level_value_id)= FND_API.G_TRUE) THEN
3972:
3967: IF (x_target_level_rec.dimension1_level_id IS NOT NULL
3968: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_level_rec.dimension1_level_id)= FND_API.G_TRUE
3969: AND
3970: x_target_rec.dim1_level_value_id IS NOT NULL
3971: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_rec.dim1_level_value_id)= FND_API.G_TRUE) THEN
3972:
3973: l_dim_level_value_rec.Dimension_level_id := x_target_level_rec.dimension1_level_id;
3974: l_dim_level_value_rec.Dimension_level_value_id := x_target_rec.dim1_level_value_id;
3975: l_dim_level_value_rec_p := l_dim_level_value_rec;
3983: x_target_rec.dim1_level_value_name := l_dim_level_value_rec.Dimension_level_value_name;
3984: END IF;
3985:
3986: IF (x_target_level_rec.dimension2_level_id IS NOT NULL
3987: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_level_rec.dimension2_level_id)= FND_API.G_TRUE
3988: AND
3989: x_target_rec.dim2_level_value_id IS NOT NULL
3990: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_rec.dim2_level_value_id)= FND_API.G_TRUE) THEN
3991:
3986: IF (x_target_level_rec.dimension2_level_id IS NOT NULL
3987: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_level_rec.dimension2_level_id)= FND_API.G_TRUE
3988: AND
3989: x_target_rec.dim2_level_value_id IS NOT NULL
3990: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_rec.dim2_level_value_id)= FND_API.G_TRUE) THEN
3991:
3992: l_dim_level_value_rec.Dimension_level_id := x_target_level_rec.dimension2_level_id;
3993: l_dim_level_value_rec.Dimension_level_value_id := x_target_rec.dim2_level_value_id;
3994: l_dim_level_value_rec_p := l_dim_level_value_rec;
4002: x_target_rec.dim2_level_value_name := l_dim_level_value_rec.Dimension_level_value_name;
4003: END IF;
4004:
4005: IF (x_target_level_rec.dimension3_level_id IS NOT NULL
4006: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_level_rec.dimension3_level_id)= FND_API.G_TRUE
4007: AND
4008: x_target_rec.dim3_level_value_id IS NOT NULL
4009: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_rec.dim3_level_value_id)= FND_API.G_TRUE) THEN
4010:
4005: IF (x_target_level_rec.dimension3_level_id IS NOT NULL
4006: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_level_rec.dimension3_level_id)= FND_API.G_TRUE
4007: AND
4008: x_target_rec.dim3_level_value_id IS NOT NULL
4009: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_rec.dim3_level_value_id)= FND_API.G_TRUE) THEN
4010:
4011: l_dim_level_value_rec.Dimension_level_id := x_target_level_rec.dimension3_level_id;
4012: l_dim_level_value_rec.Dimension_level_value_id := x_target_rec.dim3_level_value_id;
4013: l_dim_level_value_rec_p := l_dim_level_value_rec;
4021: x_target_rec.dim3_level_value_name := l_dim_level_value_rec.Dimension_level_value_name;
4022: END IF;
4023:
4024: IF (x_target_level_rec.dimension4_level_id IS NOT NULL
4025: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_level_rec.dimension4_level_id)= FND_API.G_TRUE
4026: AND
4027: x_target_rec.dim4_level_value_id IS NOT NULL
4028: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_rec.dim4_level_value_id)= FND_API.G_TRUE) THEN
4029:
4024: IF (x_target_level_rec.dimension4_level_id IS NOT NULL
4025: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_level_rec.dimension4_level_id)= FND_API.G_TRUE
4026: AND
4027: x_target_rec.dim4_level_value_id IS NOT NULL
4028: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_rec.dim4_level_value_id)= FND_API.G_TRUE) THEN
4029:
4030: l_dim_level_value_rec.Dimension_level_id := x_target_level_rec.dimension4_level_id;
4031: l_dim_level_value_rec.Dimension_level_value_id := x_target_rec.dim4_level_value_id;
4032: l_dim_level_value_rec_p := l_dim_level_value_rec;
4040: x_target_rec.dim4_level_value_name := l_dim_level_value_rec.Dimension_level_value_name;
4041: END IF;
4042:
4043: IF (x_target_level_rec.dimension5_level_id IS NOT NULL
4044: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_level_rec.dimension5_level_id)= FND_API.G_TRUE
4045: AND
4046: x_target_rec.dim5_level_value_id IS NOT NULL
4047: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_rec.dim5_level_value_id)= FND_API.G_TRUE) THEN
4048:
4043: IF (x_target_level_rec.dimension5_level_id IS NOT NULL
4044: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_level_rec.dimension5_level_id)= FND_API.G_TRUE
4045: AND
4046: x_target_rec.dim5_level_value_id IS NOT NULL
4047: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_rec.dim5_level_value_id)= FND_API.G_TRUE) THEN
4048:
4049: l_dim_level_value_rec.Dimension_level_id := x_target_level_rec.dimension5_level_id;
4050: l_dim_level_value_rec.Dimension_level_value_id := x_target_rec.dim5_level_value_id;
4051: l_dim_level_value_rec_p := l_dim_level_value_rec;
4059: x_target_rec.dim5_level_value_name := l_dim_level_value_rec.Dimension_level_value_name;
4060: END IF;
4061:
4062: IF (x_target_level_rec.dimension6_level_id IS NOT NULL
4063: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_level_rec.dimension6_level_id)= FND_API.G_TRUE
4064: AND
4065: x_target_rec.dim6_level_value_id IS NOT NULL
4066: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_rec.dim6_level_value_id)= FND_API.G_TRUE) THEN
4067:
4062: IF (x_target_level_rec.dimension6_level_id IS NOT NULL
4063: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_level_rec.dimension6_level_id)= FND_API.G_TRUE
4064: AND
4065: x_target_rec.dim6_level_value_id IS NOT NULL
4066: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_rec.dim6_level_value_id)= FND_API.G_TRUE) THEN
4067:
4068: l_dim_level_value_rec.Dimension_level_id := x_target_level_rec.dimension6_level_id;
4069: l_dim_level_value_rec.Dimension_level_value_id := x_target_rec.dim6_level_value_id;
4070: l_dim_level_value_rec_p := l_dim_level_value_rec;
4078: x_target_rec.dim6_level_value_name := l_dim_level_value_rec.Dimension_level_value_name;
4079: END IF;
4080:
4081: IF (x_target_level_rec.dimension7_level_id IS NOT NULL
4082: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_level_rec.dimension7_level_id)= FND_API.G_TRUE
4083: AND
4084: x_target_rec.dim7_level_value_id IS NOT NULL
4085: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_rec.dim7_level_value_id)= FND_API.G_TRUE) THEN
4086:
4081: IF (x_target_level_rec.dimension7_level_id IS NOT NULL
4082: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_level_rec.dimension7_level_id)= FND_API.G_TRUE
4083: AND
4084: x_target_rec.dim7_level_value_id IS NOT NULL
4085: AND BIS_UTILITIES_PUB.Value_Not_Missing(x_target_rec.dim7_level_value_id)= FND_API.G_TRUE) THEN
4086:
4087: l_dim_level_value_rec.Dimension_level_id := x_target_level_rec.dimension7_level_id;
4088: l_dim_level_value_rec.Dimension_level_value_id := x_target_rec.dim7_level_value_id;
4089: l_dim_level_value_rec_p := l_dim_level_value_rec;
4099:
4100:
4101: EXCEPTION
4102: when others then
4103: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4104: --Added last two parameters
4105: l_error_tbl := x_error_tbl;
4106: BIS_UTILITIES_PVT.Add_Error_Message
4107: ( p_error_msg_id => SQLCODE
4109: , p_error_proc_name => G_PKG_NAME||'.Create_Target_Level'
4110: , p_error_table => l_error_tbl
4111: , x_error_table => x_error_tbl
4112: );
4113: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4114:
4115: END Retrieve_Target_From_ShNms;
4116:
4117: --