1: PACKAGE BODY BIS_Target_Level_PUB AS
2: /* $Header: BISPTALB.pls 120.0 2005/06/01 15:39:59 appldev noship $ */
3: --
4: /*
5: REM +=======================================================================+
24: REM | bug#3634587 |
25: REM +=======================================================================+
26: */
27: --
28: G_PKG_NAME CONSTANT VARCHAR2(30):='BIS_TARGET_LEVEL_PUB';
29:
30:
31: --
32: -- creates one Indicator Level
32: -- creates one Indicator Level
33: PROCEDURE Create_Target_Level
34: ( p_api_version IN NUMBER
35: , p_commit IN VARCHAR2 := FND_API.G_FALSE
36: , p_Target_Level_Rec IN BIS_Target_Level_PUB.Target_Level_Rec_Type
37: , x_return_status OUT NOCOPY VARCHAR2
38: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
39: )
40: IS
37: , x_return_status OUT NOCOPY VARCHAR2
38: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
39: )
40: IS
41: l_Target_Level_Rec BIS_Target_Level_PUB.Target_Level_Rec_Type;
42: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
43: BEGIN
44:
45: BIS_Target_Level_PVT.Value_ID_Conversion
87: PROCEDURE Retrieve_Target_Levels
88: ( p_api_version IN NUMBER
89: , p_all_info IN VARCHAR2 := FND_API.G_TRUE
90: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
91: , x_Target_Level_tbl OUT NOCOPY BIS_Target_Level_PUB.Target_Level_Tbl_Type
92: , x_return_status OUT NOCOPY VARCHAR2
93: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
94: )
95: IS
94: )
95: IS
96: l_Measure_Rec BIS_MEASURE_PUB.Measure_Rec_Type;
97: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
98: l_target_level_tbl BIS_Target_Level_PUB.Target_Level_Tbl_Type;
99: BEGIN
100:
101: l_measure_rec := p_measure_rec;
102:
157: -- Gets Information for one Indicator Level
158: -- If information about the dimension are not required, set all_info to FALSE.
159: PROCEDURE Retrieve_Target_Level
160: ( p_api_version IN NUMBER
161: , p_Target_Level_Rec IN BIS_Target_Level_PUB.Target_Level_Rec_Type
162: , p_all_info IN VARCHAR2 := FND_API.G_TRUE
163: , x_Target_Level_Rec IN OUT NOCOPY BIS_Target_Level_PUB.Target_Level_Rec_Type
164: , x_return_status OUT NOCOPY VARCHAR2
165: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
159: PROCEDURE Retrieve_Target_Level
160: ( p_api_version IN NUMBER
161: , p_Target_Level_Rec IN BIS_Target_Level_PUB.Target_Level_Rec_Type
162: , p_all_info IN VARCHAR2 := FND_API.G_TRUE
163: , x_Target_Level_Rec IN OUT NOCOPY BIS_Target_Level_PUB.Target_Level_Rec_Type
164: , x_return_status OUT NOCOPY VARCHAR2
165: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
166: )
167: IS
164: , x_return_status OUT NOCOPY VARCHAR2
165: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
166: )
167: IS
168: l_Target_Level_Rec BIS_Target_Level_PUB.Target_Level_Rec_Type;
169: l_Target_Level_Rec_p BIS_Target_Level_PUB.Target_Level_Rec_Type;
170: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
171: BEGIN
172:
165: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
166: )
167: IS
168: l_Target_Level_Rec BIS_Target_Level_PUB.Target_Level_Rec_Type;
169: l_Target_Level_Rec_p BIS_Target_Level_PUB.Target_Level_Rec_Type;
170: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
171: BEGIN
172:
173: l_target_level_rec := p_target_level_rec;
238: -- Update_Target_Levels
239: PROCEDURE Update_Target_Level
240: ( p_api_version IN NUMBER
241: , p_commit IN VARCHAR2 := FND_API.G_FALSE
242: , p_Target_Level_Rec IN BIS_Target_Level_PUB.Target_Level_Rec_Type
243: , x_return_status OUT NOCOPY VARCHAR2
244: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
245: )
246: IS
243: , x_return_status OUT NOCOPY VARCHAR2
244: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
245: )
246: IS
247: l_Target_Level_Rec BIS_Target_Level_PUB.Target_Level_Rec_Type;
248: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
249: BEGIN
250:
251: BIS_Target_Level_PVT.Value_ID_Conversion
289: -- deletes one Target_Level
290: PROCEDURE Delete_Target_Level
291: ( p_api_version IN NUMBER
292: , p_commit IN VARCHAR2 := FND_API.G_FALSE
293: , p_Target_Level_Rec IN BIS_Target_Level_PUB.Target_Level_Rec_Type
294: , x_return_status OUT NOCOPY VARCHAR2
295: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
296: )
297: IS
294: , x_return_status OUT NOCOPY VARCHAR2
295: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
296: )
297: IS
298: l_Target_Level_Rec BIS_Target_Level_PUB.Target_Level_Rec_Type;
299: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
300: BEGIN
301:
302: x_return_status := FND_API.G_RET_STS_SUCCESS;
349: --
350: -- Validates measure
351: PROCEDURE Validate_Target_Level
352: ( p_api_version IN NUMBER
353: , p_Target_Level_Rec IN BIS_Target_Level_PUB.Target_Level_Rec_Type
354: , x_return_status OUT NOCOPY VARCHAR2
355: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
356: )
357: IS
354: , x_return_status OUT NOCOPY VARCHAR2
355: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
356: )
357: IS
358: l_Target_Level_Rec BIS_Target_Level_PUB.Target_Level_Rec_Type;
359: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
360: BEGIN
361:
362: BIS_Target_Level_PVT.Value_ID_Conversion
436: ( p_api_version IN NUMBER
437: , p_user_id IN NUMBER
438: , p_user_name IN VARCHAR2 := BIS_UTILITIES_PUB.G_NULL_CHAR
439: , p_all_info IN VARCHAR2 := FND_API.G_TRUE
440: , x_Target_Level_Tbl OUT NOCOPY BIS_Target_LEVEL_PUB.Target_Level_Tbl_Type
441: , x_return_status OUT NOCOPY VARCHAR2
442: , x_error_tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
443: )
444: IS
499: Procedure Translate_Target_Level
500: ( p_api_version IN NUMBER
501: , p_commit IN VARCHAR2 := FND_API.G_FALSE
502: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
503: , p_Target_Level_Rec IN BIS_TARGET_LEVEL_PUB.Target_Level_Rec_Type
504: , p_owner IN VARCHAR2
505: , x_return_status OUT NOCOPY VARCHAR2
506: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
507: )
505: , x_return_status OUT NOCOPY VARCHAR2
506: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
507: )
508: IS
509: l_Target_Level_Rec BIS_TARGET_LEVEL_PUB.Target_Level_Rec_Type;
510: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
511: BEGIN
512:
513: BIS_TARGET_LEVEL_PVT.Value_ID_Conversion
565: Procedure Load_Target_Level
566: ( p_api_version IN NUMBER
567: , p_commit IN VARCHAR2 := FND_API.G_FALSE
568: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
569: , p_Target_Level_Rec IN BIS_TARGET_LEVEL_PUB.Target_Level_Rec_Type
570: , p_owner IN VARCHAR2
571: , p_up_loaded IN VARCHAR2 := FND_API.G_FALSE
572: , x_return_status OUT NOCOPY VARCHAR2
573: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
572: , x_return_status OUT NOCOPY VARCHAR2
573: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
574: )
575: IS
576: l_Target_Level_Rec BIS_TARGET_LEVEL_PUB.Target_Level_Rec_Type;
577: l_return_status VARCHAR2(100); -- 2486702
578: l_return_msg VARCHAR2(3000); -- 2486702
579: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
580:
647:
648: --New Function to return target level id from shortname
649:
650: FUNCTION Get_Id_From_DimLevelShortNames
651: ( p_target_level_rec IN BIS_Target_Level_PUB.Target_Level_Rec_Type
652: ) RETURN NUMBER
653: IS
654: l_target_level_id NUMBER;
655: BEGIN
661: -- and the Measure Short Name
662:
663: PROCEDURE Retrieve_TL_From_DimLvlShNms
664: (p_api_version IN NUMBER
665: ,p_target_level_rec IN BIS_Target_Level_PUB.Target_Level_Rec_Type
666: , x_Target_Level_Rec OUT NOCOPY BIS_Target_Level_PUB.Target_Level_Rec_Type
667: , x_return_status OUT NOCOPY VARCHAR2
668: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
669: )
662:
663: PROCEDURE Retrieve_TL_From_DimLvlShNms
664: (p_api_version IN NUMBER
665: ,p_target_level_rec IN BIS_Target_Level_PUB.Target_Level_Rec_Type
666: , x_Target_Level_Rec OUT NOCOPY BIS_Target_Level_PUB.Target_Level_Rec_Type
667: , x_return_status OUT NOCOPY VARCHAR2
668: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
669: )
670: IS
715: END updt_tl_attributes;
716:
717: --
718: --
719: END BIS_Target_Level_PUB;
720:
721: