35: -- creates one Measure, with the dimensions sequenced in the order
36: -- they are passed in
37: Procedure Create_Measure
38: ( p_api_version IN NUMBER
39: , p_commit IN VARCHAR2 := FND_API.G_FALSE
40: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
41: , p_owner IN VARCHAR2 := BIS_UTILITIES_PUB.G_CUSTOM_OWNER
42: , x_return_status OUT NOCOPY VARCHAR2
43: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
48: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
49: BEGIN
50:
51: if (BIS_UTILITIES_PUB.Value_Missing
52: (p_Measure_Rec.Measure_id) = FND_API.G_TRUE
53: OR BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Measure_id)
54: = FND_API.G_TRUE) then
55: --changed to call Measure_Value_ID_Conversion
56: BIS_Measure_PVT.Measure_Value_ID_Conversion
50:
51: if (BIS_UTILITIES_PUB.Value_Missing
52: (p_Measure_Rec.Measure_id) = FND_API.G_TRUE
53: OR BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Measure_id)
54: = FND_API.G_TRUE) then
55: --changed to call Measure_Value_ID_Conversion
56: BIS_Measure_PVT.Measure_Value_ID_Conversion
57: ( p_api_version => p_api_version
58: , p_Measure_Rec => p_Measure_Rec
60: , x_return_status => x_return_status
61: , x_error_Tbl => x_error_Tbl
62: );
63: --Added this check
64: IF( x_return_status = FND_API.G_RET_STS_SUCCESS) then
65: l_error_tbl := x_error_tbl;
66: BIS_UTILITIES_PVT.Add_Error_Message
67: ( p_error_msg_name => 'BIS_MEASURE_SHORT_NAME_UNIQUE'
68: , p_error_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR
70: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
71: , p_error_table => l_error_tbl
72: , x_error_table => x_error_tbl
73: );
74: RAISE FND_API.G_EXC_ERROR;
75: END IF;
76: END IF;
77:
78:
87: , x_error_Tbl => x_error_tbl
88: );
89:
90: --Added this check
91: IF( x_return_status <> FND_API.G_RET_STS_SUCCESS) then
92: RAISE FND_API.G_EXC_ERROR;
93: END IF;
94:
95: BIS_Measure_PVT.Create_Measure
88: );
89:
90: --Added this check
91: IF( x_return_status <> FND_API.G_RET_STS_SUCCESS) then
92: RAISE FND_API.G_EXC_ERROR;
93: END IF;
94:
95: BIS_Measure_PVT.Create_Measure
96: ( p_api_version => p_api_version
102: );
103:
104:
105: EXCEPTION
106: when FND_API.G_EXC_ERROR then
107: x_return_status := FND_API.G_RET_STS_ERROR ;
108: when FND_API.G_EXC_UNEXPECTED_ERROR then
109: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
110: when others then
103:
104:
105: EXCEPTION
106: when FND_API.G_EXC_ERROR then
107: x_return_status := FND_API.G_RET_STS_ERROR ;
108: when FND_API.G_EXC_UNEXPECTED_ERROR then
109: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
110: when others then
111: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
104:
105: EXCEPTION
106: when FND_API.G_EXC_ERROR then
107: x_return_status := FND_API.G_RET_STS_ERROR ;
108: when FND_API.G_EXC_UNEXPECTED_ERROR then
109: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
110: when others then
111: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
112: l_error_tbl := x_error_tbl;
105: EXCEPTION
106: when FND_API.G_EXC_ERROR then
107: x_return_status := FND_API.G_RET_STS_ERROR ;
108: when FND_API.G_EXC_UNEXPECTED_ERROR then
109: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
110: when others then
111: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
112: l_error_tbl := x_error_tbl;
113: BIS_UTILITIES_PVT.Add_Error_Message
107: x_return_status := FND_API.G_RET_STS_ERROR ;
108: when FND_API.G_EXC_UNEXPECTED_ERROR then
109: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
110: when others then
111: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
112: l_error_tbl := x_error_tbl;
113: BIS_UTILITIES_PVT.Add_Error_Message
114: ( p_error_msg_id => SQLCODE
115: , p_error_description => SQLERRM
125: -- If information about the dimensions are not required, set all_info to
126: -- FALSE
127: Procedure Retrieve_Measures
128: ( p_api_version IN NUMBER
129: , p_all_info IN VARCHAR2 := FND_API.G_TRUE
130: , x_Measure_tbl OUT NOCOPY BIS_MEASURE_PUB.Measure_Tbl_Type
131: , x_return_status OUT NOCOPY VARCHAR2
132: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
133: )
145: );
146:
147:
148: EXCEPTION
149: when FND_API.G_EXC_ERROR then
150: x_return_status := FND_API.G_RET_STS_ERROR ;
151: when FND_API.G_EXC_UNEXPECTED_ERROR then
152: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
153: when others then
146:
147:
148: EXCEPTION
149: when FND_API.G_EXC_ERROR then
150: x_return_status := FND_API.G_RET_STS_ERROR ;
151: when FND_API.G_EXC_UNEXPECTED_ERROR then
152: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
153: when others then
154: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
147:
148: EXCEPTION
149: when FND_API.G_EXC_ERROR then
150: x_return_status := FND_API.G_RET_STS_ERROR ;
151: when FND_API.G_EXC_UNEXPECTED_ERROR then
152: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
153: when others then
154: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
155: l_error_tbl := x_error_tbl;
148: EXCEPTION
149: when FND_API.G_EXC_ERROR then
150: x_return_status := FND_API.G_RET_STS_ERROR ;
151: when FND_API.G_EXC_UNEXPECTED_ERROR then
152: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
153: when others then
154: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
155: l_error_tbl := x_error_tbl;
156: BIS_UTILITIES_PVT.Add_Error_Message
150: x_return_status := FND_API.G_RET_STS_ERROR ;
151: when FND_API.G_EXC_UNEXPECTED_ERROR then
152: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
153: when others then
154: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
155: l_error_tbl := x_error_tbl;
156: BIS_UTILITIES_PVT.Add_Error_Message
157: ( p_error_msg_id => SQLCODE
158: , p_error_description => SQLERRM
168: -- If information about the dimension are not required, set all_info to FALSE.
169: Procedure Retrieve_Measure
170: ( p_api_version IN NUMBER
171: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
172: , p_all_info IN VARCHAR2 := FND_API.G_TRUE
173: , x_Measure_Rec IN OUT NOCOPY BIS_MEASURE_PUB.Measure_Rec_Type
174: , x_return_status OUT NOCOPY VARCHAR2
175: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
176: )
182: BEGIN
183: l_measure_rec := p_measure_rec;
184:
185: if (BIS_UTILITIES_PUB.Value_Missing
186: (p_Measure_Rec.Measure_id) = FND_API.G_TRUE
187: OR
188: BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Measure_id) = FND_API.G_TRUE)
189: THEN
190: --changed to call Measure_Value_ID_Conversion
184:
185: if (BIS_UTILITIES_PUB.Value_Missing
186: (p_Measure_Rec.Measure_id) = FND_API.G_TRUE
187: OR
188: BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Measure_id) = FND_API.G_TRUE)
189: THEN
190: --changed to call Measure_Value_ID_Conversion
191: BIS_Measure_PVT.Measure_Value_ID_Conversion
192: ( p_api_version => p_api_version
196: , x_error_Tbl => x_error_Tbl
197: );
198:
199: --Added this check
200: IF( x_return_status <> FND_API.G_RET_STS_SUCCESS) then
201: RAISE FND_API.G_EXC_ERROR;
202: END IF;
203: END IF;
204:
197: );
198:
199: --Added this check
200: IF( x_return_status <> FND_API.G_RET_STS_SUCCESS) then
201: RAISE FND_API.G_EXC_ERROR;
202: END IF;
203: END IF;
204:
205: BIS_Measure_PVT.Retrieve_Measure
212: );
213:
214:
215: EXCEPTION
216: when FND_API.G_EXC_ERROR then
217: x_return_status := FND_API.G_RET_STS_ERROR ;
218: when FND_API.G_EXC_UNEXPECTED_ERROR then
219: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
220: when others then
213:
214:
215: EXCEPTION
216: when FND_API.G_EXC_ERROR then
217: x_return_status := FND_API.G_RET_STS_ERROR ;
218: when FND_API.G_EXC_UNEXPECTED_ERROR then
219: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
220: when others then
221: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
214:
215: EXCEPTION
216: when FND_API.G_EXC_ERROR then
217: x_return_status := FND_API.G_RET_STS_ERROR ;
218: when FND_API.G_EXC_UNEXPECTED_ERROR then
219: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
220: when others then
221: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
222: l_error_tbl := x_error_tbl;
215: EXCEPTION
216: when FND_API.G_EXC_ERROR then
217: x_return_status := FND_API.G_RET_STS_ERROR ;
218: when FND_API.G_EXC_UNEXPECTED_ERROR then
219: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
220: when others then
221: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
222: l_error_tbl := x_error_tbl;
223: BIS_UTILITIES_PVT.Add_Error_Message
217: x_return_status := FND_API.G_RET_STS_ERROR ;
218: when FND_API.G_EXC_UNEXPECTED_ERROR then
219: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
220: when others then
221: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
222: l_error_tbl := x_error_tbl;
223: BIS_UTILITIES_PVT.Add_Error_Message
224: ( p_error_msg_id => SQLCODE
225: , p_error_description => SQLERRM
236: -- 1) no Measure levels or targets exist
237: -- 2) no users have selected to see actuals for the Measure
238: Procedure Update_Measure
239: ( p_api_version IN NUMBER
240: , p_commit IN VARCHAR2 := FND_API.G_FALSE
241: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
242: , p_owner IN VARCHAR2 := BIS_UTILITIES_PUB.G_CUSTOM_OWNER
243: , x_return_status OUT NOCOPY VARCHAR2
244: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
251:
252: l_measure_rec := p_measure_rec;
253:
254: if (BIS_UTILITIES_PUB.Value_Missing
255: (p_Measure_Rec.Measure_id) = FND_API.G_TRUE
256: OR BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Measure_id)
257: = FND_API.G_TRUE) then
258: --changed to call Measure_Value_ID_Conversion
259: BIS_Measure_PVT.Measure_Value_ID_Conversion
253:
254: if (BIS_UTILITIES_PUB.Value_Missing
255: (p_Measure_Rec.Measure_id) = FND_API.G_TRUE
256: OR BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Measure_id)
257: = FND_API.G_TRUE) then
258: --changed to call Measure_Value_ID_Conversion
259: BIS_Measure_PVT.Measure_Value_ID_Conversion
260: ( p_api_version => p_api_version
261: , p_Measure_Rec => p_Measure_Rec
263: , x_return_status => x_return_status
264: , x_error_Tbl => x_error_Tbl
265: );
266: --added this check
267: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
268: RAISE FND_API.G_EXC_ERROR;
269: END IF;
270: END IF;
271:
264: , x_error_Tbl => x_error_Tbl
265: );
266: --added this check
267: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
268: RAISE FND_API.G_EXC_ERROR;
269: END IF;
270: END IF;
271:
272: --added this call
278: , x_return_status => x_return_status
279: , x_error_Tbl => x_error_Tbl
280: );
281: --added this check
282: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
283: RAISE FND_API.G_EXC_ERROR;
284: END IF;
285:
286: BIS_Measure_PVT.Update_Measure
279: , x_error_Tbl => x_error_Tbl
280: );
281: --added this check
282: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
283: RAISE FND_API.G_EXC_ERROR;
284: END IF;
285:
286: BIS_Measure_PVT.Update_Measure
287: ( p_api_version => p_api_version
293: );
294:
295:
296: EXCEPTION
297: when FND_API.G_EXC_ERROR then
298: x_return_status := FND_API.G_RET_STS_ERROR ;
299: when FND_API.G_EXC_UNEXPECTED_ERROR then
300: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
301: when others then
294:
295:
296: EXCEPTION
297: when FND_API.G_EXC_ERROR then
298: x_return_status := FND_API.G_RET_STS_ERROR ;
299: when FND_API.G_EXC_UNEXPECTED_ERROR then
300: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
301: when others then
302: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
295:
296: EXCEPTION
297: when FND_API.G_EXC_ERROR then
298: x_return_status := FND_API.G_RET_STS_ERROR ;
299: when FND_API.G_EXC_UNEXPECTED_ERROR then
300: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
301: when others then
302: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
303: l_error_tbl := x_error_tbl;
296: EXCEPTION
297: when FND_API.G_EXC_ERROR then
298: x_return_status := FND_API.G_RET_STS_ERROR ;
299: when FND_API.G_EXC_UNEXPECTED_ERROR then
300: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
301: when others then
302: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
303: l_error_tbl := x_error_tbl;
304: BIS_UTILITIES_PVT.Add_Error_Message
298: x_return_status := FND_API.G_RET_STS_ERROR ;
299: when FND_API.G_EXC_UNEXPECTED_ERROR then
300: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
301: when others then
302: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
303: l_error_tbl := x_error_tbl;
304: BIS_UTILITIES_PVT.Add_Error_Message
305: ( p_error_msg_id => SQLCODE
306: , p_error_description => SQLERRM
318: -- 2) the Measure access has not been granted to a resonsibility
319: -- 3) no users have selected to see actuals for the Measure
320: Procedure Delete_Measure
321: ( p_api_version IN NUMBER
322: , p_commit IN VARCHAR2 := FND_API.G_FALSE
323: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
324: , x_return_status OUT NOCOPY VARCHAR2
325: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
326: )
330: BEGIN
331:
332: l_Measure_Rec := p_Measure_rec;
333: if (BIS_UTILITIES_PUB.Value_Missing
334: (p_Measure_Rec.Measure_id) = FND_API.G_TRUE
335: OR BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Measure_id)
336: = FND_API.G_TRUE) then
337: --changed to call Measure_Value_ID_Conversion
338: --used to call Value_ID_Conv with shortname
332: l_Measure_Rec := p_Measure_rec;
333: if (BIS_UTILITIES_PUB.Value_Missing
334: (p_Measure_Rec.Measure_id) = FND_API.G_TRUE
335: OR BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Measure_id)
336: = FND_API.G_TRUE) then
337: --changed to call Measure_Value_ID_Conversion
338: --used to call Value_ID_Conv with shortname
339: BIS_Measure_PVT.Measure_Value_ID_Conversion
340: ( p_api_version => p_api_version
343: , x_return_status => x_return_status
344: , x_error_Tbl => x_error_Tbl
345: );
346: --added this check
347: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
348: RAISE FND_API.G_EXC_ERROR;
349: END IF;
350:
351: end if;
344: , x_error_Tbl => x_error_Tbl
345: );
346: --added this check
347: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
348: RAISE FND_API.G_EXC_ERROR;
349: END IF;
350:
351: end if;
352:
358: , x_error_Tbl => x_error_Tbl
359: );
360:
361: EXCEPTION
362: when FND_API.G_EXC_ERROR then
363: x_return_status := FND_API.G_RET_STS_ERROR ;
364: when FND_API.G_EXC_UNEXPECTED_ERROR then
365: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
366: when others then
359: );
360:
361: EXCEPTION
362: when FND_API.G_EXC_ERROR then
363: x_return_status := FND_API.G_RET_STS_ERROR ;
364: when FND_API.G_EXC_UNEXPECTED_ERROR then
365: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
366: when others then
367: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
360:
361: EXCEPTION
362: when FND_API.G_EXC_ERROR then
363: x_return_status := FND_API.G_RET_STS_ERROR ;
364: when FND_API.G_EXC_UNEXPECTED_ERROR then
365: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
366: when others then
367: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
368: l_error_tbl := x_error_tbl;
361: EXCEPTION
362: when FND_API.G_EXC_ERROR then
363: x_return_status := FND_API.G_RET_STS_ERROR ;
364: when FND_API.G_EXC_UNEXPECTED_ERROR then
365: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
366: when others then
367: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
368: l_error_tbl := x_error_tbl;
369: BIS_UTILITIES_PVT.Add_Error_Message
363: x_return_status := FND_API.G_RET_STS_ERROR ;
364: when FND_API.G_EXC_UNEXPECTED_ERROR then
365: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
366: when others then
367: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
368: l_error_tbl := x_error_tbl;
369: BIS_UTILITIES_PVT.Add_Error_Message
370: ( p_error_msg_id => SQLCODE
371: , p_error_description => SQLERRM
398: , x_return_status => x_return_status
399: , x_error_Tbl => x_error_Tbl
400: );
401: --added this check
402: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
403: RAISE FND_API.G_EXC_ERROR;
404: END IF;
405:
406: --added this call
399: , x_error_Tbl => x_error_Tbl
400: );
401: --added this check
402: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
403: RAISE FND_API.G_EXC_ERROR;
404: END IF;
405:
406: --added this call
407: l_measure_rec_p := l_Measure_Rec;
412: , x_return_status => x_return_status
413: , x_error_Tbl => x_error_Tbl
414: );
415: --added this check
416: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
417: RAISE FND_API.G_EXC_ERROR;
418: END IF;
419:
420: BIS_Measure_PVT.Validate_Measure
413: , x_error_Tbl => x_error_Tbl
414: );
415: --added this check
416: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
417: RAISE FND_API.G_EXC_ERROR;
418: END IF;
419:
420: BIS_Measure_PVT.Validate_Measure
421: ( p_api_version => p_api_version
425: );
426:
427:
428: EXCEPTION
429: when FND_API.G_EXC_ERROR then
430: x_return_status := FND_API.G_RET_STS_ERROR ;
431: when FND_API.G_EXC_UNEXPECTED_ERROR then
432: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
433: when others then
426:
427:
428: EXCEPTION
429: when FND_API.G_EXC_ERROR then
430: x_return_status := FND_API.G_RET_STS_ERROR ;
431: when FND_API.G_EXC_UNEXPECTED_ERROR then
432: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
433: when others then
434: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
427:
428: EXCEPTION
429: when FND_API.G_EXC_ERROR then
430: x_return_status := FND_API.G_RET_STS_ERROR ;
431: when FND_API.G_EXC_UNEXPECTED_ERROR then
432: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
433: when others then
434: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
435: l_error_tbl := x_error_tbl;
428: EXCEPTION
429: when FND_API.G_EXC_ERROR then
430: x_return_status := FND_API.G_RET_STS_ERROR ;
431: when FND_API.G_EXC_UNEXPECTED_ERROR then
432: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
433: when others then
434: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
435: l_error_tbl := x_error_tbl;
436: BIS_UTILITIES_PVT.Add_Error_Message
430: x_return_status := FND_API.G_RET_STS_ERROR ;
431: when FND_API.G_EXC_UNEXPECTED_ERROR then
432: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
433: when others then
434: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
435: l_error_tbl := x_error_tbl;
436: BIS_UTILITIES_PVT.Add_Error_Message
437: ( p_error_msg_id => SQLCODE
438: , p_error_description => SQLERRM
457:
458: l_measure_rec := p_measure_rec;
459:
460: if (BIS_UTILITIES_PUB.Value_Missing
461: (l_Measure_Rec.Measure_id) = FND_API.G_TRUE
462: OR BIS_UTILITIES_PUB.Value_NULL(l_Measure_Rec.Measure_id)
463: = FND_API.G_TRUE) then
464: --changed to call Measure_Value_ID_Conversion
465: --used to call Value_ID_Conversion with short name
459:
460: if (BIS_UTILITIES_PUB.Value_Missing
461: (l_Measure_Rec.Measure_id) = FND_API.G_TRUE
462: OR BIS_UTILITIES_PUB.Value_NULL(l_Measure_Rec.Measure_id)
463: = FND_API.G_TRUE) then
464: --changed to call Measure_Value_ID_Conversion
465: --used to call Value_ID_Conversion with short name
466: BIS_MEASURE_PVT.Measure_Value_ID_Conversion
467: ( p_api_version => p_api_version
470: , x_return_status => x_return_status
471: , x_error_Tbl => x_error_Tbl
472: );
473: --added this check
474: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
475: RAISE FND_API.G_EXC_ERROR;
476: END IF;
477: end if;
478:
471: , x_error_Tbl => x_error_Tbl
472: );
473: --added this check
474: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
475: RAISE FND_API.G_EXC_ERROR;
476: END IF;
477: end if;
478:
479: BIS_Measure_PVT.Retrieve_Measure_Dimensions
485: );
486:
487:
488: EXCEPTION
489: when FND_API.G_EXC_ERROR then
490: x_return_status := FND_API.G_RET_STS_ERROR ;
491: when FND_API.G_EXC_UNEXPECTED_ERROR then
492: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
493: when others then
486:
487:
488: EXCEPTION
489: when FND_API.G_EXC_ERROR then
490: x_return_status := FND_API.G_RET_STS_ERROR ;
491: when FND_API.G_EXC_UNEXPECTED_ERROR then
492: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
493: when others then
494: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
487:
488: EXCEPTION
489: when FND_API.G_EXC_ERROR then
490: x_return_status := FND_API.G_RET_STS_ERROR ;
491: when FND_API.G_EXC_UNEXPECTED_ERROR then
492: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
493: when others then
494: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
495: l_error_tbl := x_error_tbl;
488: EXCEPTION
489: when FND_API.G_EXC_ERROR then
490: x_return_status := FND_API.G_RET_STS_ERROR ;
491: when FND_API.G_EXC_UNEXPECTED_ERROR then
492: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
493: when others then
494: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
495: l_error_tbl := x_error_tbl;
496: BIS_UTILITIES_PVT.Add_Error_Message
490: x_return_status := FND_API.G_RET_STS_ERROR ;
491: when FND_API.G_EXC_UNEXPECTED_ERROR then
492: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
493: when others then
494: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
495: l_error_tbl := x_error_tbl;
496: BIS_UTILITIES_PVT.Add_Error_Message
497: ( p_error_msg_id => SQLCODE
498: , p_error_description => SQLERRM
505: --
506: --
507: Procedure Translate_Measure
508: ( p_api_version IN NUMBER
509: , p_commit IN VARCHAR2 := FND_API.G_FALSE
510: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
511: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
512: , p_owner IN VARCHAR2 := BIS_UTILITIES_PUB.G_CUSTOM_OWNER
513: , x_return_status OUT NOCOPY VARCHAR2
506: --
507: Procedure Translate_Measure
508: ( p_api_version IN NUMBER
509: , p_commit IN VARCHAR2 := FND_API.G_FALSE
510: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
511: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
512: , p_owner IN VARCHAR2 := BIS_UTILITIES_PUB.G_CUSTOM_OWNER
513: , x_return_status OUT NOCOPY VARCHAR2
514: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
537: , x_error_Tbl => x_error_tbl
538: );
539:
540: --just if check
541: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
542: RAISE FND_API.G_EXC_ERROR;
543: end if;
544:
545: --added this call
538: );
539:
540: --just if check
541: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
542: RAISE FND_API.G_EXC_ERROR;
543: end if;
544:
545: --added this call
546: l_measure_rec_p := l_Measure_Rec;
552: , x_error_Tbl => x_error_Tbl
553: );
554:
555: --added this check
556: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
557: RAISE FND_API.G_EXC_ERROR;
558: END IF;
559:
560: BIS_MEASURE_PVT.Translate_Measure
553: );
554:
555: --added this check
556: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
557: RAISE FND_API.G_EXC_ERROR;
558: END IF;
559:
560: BIS_MEASURE_PVT.Translate_Measure
561: ( p_api_version => p_api_version
568: );
569:
570: EXCEPTION
571: WHEN NO_DATA_FOUND THEN
572: x_return_status := FND_API.G_RET_STS_ERROR ;
573: when FND_API.G_EXC_ERROR then
574: x_return_status := FND_API.G_RET_STS_ERROR ;
575: when FND_API.G_EXC_UNEXPECTED_ERROR then
576: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
569:
570: EXCEPTION
571: WHEN NO_DATA_FOUND THEN
572: x_return_status := FND_API.G_RET_STS_ERROR ;
573: when FND_API.G_EXC_ERROR then
574: x_return_status := FND_API.G_RET_STS_ERROR ;
575: when FND_API.G_EXC_UNEXPECTED_ERROR then
576: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
577: when others then
570: EXCEPTION
571: WHEN NO_DATA_FOUND THEN
572: x_return_status := FND_API.G_RET_STS_ERROR ;
573: when FND_API.G_EXC_ERROR then
574: x_return_status := FND_API.G_RET_STS_ERROR ;
575: when FND_API.G_EXC_UNEXPECTED_ERROR then
576: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
577: when others then
578: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
571: WHEN NO_DATA_FOUND THEN
572: x_return_status := FND_API.G_RET_STS_ERROR ;
573: when FND_API.G_EXC_ERROR then
574: x_return_status := FND_API.G_RET_STS_ERROR ;
575: when FND_API.G_EXC_UNEXPECTED_ERROR then
576: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
577: when others then
578: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
579: l_error_tbl := x_error_tbl;
572: x_return_status := FND_API.G_RET_STS_ERROR ;
573: when FND_API.G_EXC_ERROR then
574: x_return_status := FND_API.G_RET_STS_ERROR ;
575: when FND_API.G_EXC_UNEXPECTED_ERROR then
576: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
577: when others then
578: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
579: l_error_tbl := x_error_tbl;
580: BIS_UTILITIES_PVT.Add_Error_Message
574: x_return_status := FND_API.G_RET_STS_ERROR ;
575: when FND_API.G_EXC_UNEXPECTED_ERROR then
576: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
577: when others then
578: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
579: l_error_tbl := x_error_tbl;
580: BIS_UTILITIES_PVT.Add_Error_Message
581: ( p_error_msg_id => SQLCODE
582: , p_error_description => SQLERRM
588: END Translate_Measure ;
589: --
590: Procedure Load_Measure
591: ( p_api_version IN NUMBER
592: , p_commit IN VARCHAR2 := FND_API.G_FALSE
593: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
594: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
595: , p_owner IN VARCHAR2 := BIS_UTILITIES_PUB.G_CUSTOM_OWNER
596: , x_return_status OUT NOCOPY VARCHAR2
589: --
590: Procedure Load_Measure
591: ( p_api_version IN NUMBER
592: , p_commit IN VARCHAR2 := FND_API.G_FALSE
593: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
594: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
595: , p_owner IN VARCHAR2 := BIS_UTILITIES_PUB.G_CUSTOM_OWNER
596: , x_return_status OUT NOCOPY VARCHAR2
597: , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
602: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
603: BEGIN
604:
605: l_measure_rec := p_measure_rec;
606: x_return_status := FND_API.G_RET_STS_SUCCESS;
607: BEGIN
608: --added check
609: if (BIS_UTILITIES_PUB.Value_Missing
610: (p_Measure_Rec.Measure_id) = FND_API.G_TRUE
606: x_return_status := FND_API.G_RET_STS_SUCCESS;
607: BEGIN
608: --added check
609: if (BIS_UTILITIES_PUB.Value_Missing
610: (p_Measure_Rec.Measure_id) = FND_API.G_TRUE
611: OR BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Measure_id)
612: = FND_API.G_TRUE) then
613: --changed to call Measure_Value_ID_Conversion
614: BIS_MEASURE_PVT.Measure_Value_ID_Conversion
608: --added check
609: if (BIS_UTILITIES_PUB.Value_Missing
610: (p_Measure_Rec.Measure_id) = FND_API.G_TRUE
611: OR BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Measure_id)
612: = FND_API.G_TRUE) then
613: --changed to call Measure_Value_ID_Conversion
614: BIS_MEASURE_PVT.Measure_Value_ID_Conversion
615: ( p_api_version => p_api_version
616: , p_Measure_Rec => p_Measure_Rec
619: , x_error_Tbl => x_error_tbl
620: );
621: end if;
622:
623: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
624: l_measure_rec_p := l_Measure_Rec;
625: --added this call
626: BIS_Measure_PVT.Dimension_Value_ID_Conversion
627: ( p_api_version => p_api_version
630: , x_return_status => x_return_status
631: , x_error_Tbl => x_error_Tbl
632: );
633: --added this check
634: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
635: RAISE FND_API.G_EXC_ERROR;
636: END IF;
637:
638: BIS_MEASURE_PVT.Create_Measure
631: , x_error_Tbl => x_error_Tbl
632: );
633: --added this check
634: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
635: RAISE FND_API.G_EXC_ERROR;
636: END IF;
637:
638: BIS_MEASURE_PVT.Create_Measure
639: ( p_api_version => p_api_version
654: , x_return_status => x_return_status
655: , x_error_Tbl => x_error_Tbl
656: );
657: --added this check
658: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
659: RAISE FND_API.G_EXC_ERROR;
660: END IF;
661:
662: BIS_MEASURE_PVT.Update_Measure
655: , x_error_Tbl => x_error_Tbl
656: );
657: --added this check
658: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
659: RAISE FND_API.G_EXC_ERROR;
660: END IF;
661:
662: BIS_MEASURE_PVT.Update_Measure
663: ( p_api_version => p_api_version
674: END;
675:
676: EXCEPTION
677: WHEN NO_DATA_FOUND THEN
678: x_return_status := FND_API.G_RET_STS_ERROR ;
679: when FND_API.G_EXC_ERROR then
680: x_return_status := FND_API.G_RET_STS_ERROR ;
681: when FND_API.G_EXC_UNEXPECTED_ERROR then
682: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
675:
676: EXCEPTION
677: WHEN NO_DATA_FOUND THEN
678: x_return_status := FND_API.G_RET_STS_ERROR ;
679: when FND_API.G_EXC_ERROR then
680: x_return_status := FND_API.G_RET_STS_ERROR ;
681: when FND_API.G_EXC_UNEXPECTED_ERROR then
682: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
683: when others then
676: EXCEPTION
677: WHEN NO_DATA_FOUND THEN
678: x_return_status := FND_API.G_RET_STS_ERROR ;
679: when FND_API.G_EXC_ERROR then
680: x_return_status := FND_API.G_RET_STS_ERROR ;
681: when FND_API.G_EXC_UNEXPECTED_ERROR then
682: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
683: when others then
684: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
677: WHEN NO_DATA_FOUND THEN
678: x_return_status := FND_API.G_RET_STS_ERROR ;
679: when FND_API.G_EXC_ERROR then
680: x_return_status := FND_API.G_RET_STS_ERROR ;
681: when FND_API.G_EXC_UNEXPECTED_ERROR then
682: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
683: when others then
684: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
685: l_error_tbl := x_error_tbl;
678: x_return_status := FND_API.G_RET_STS_ERROR ;
679: when FND_API.G_EXC_ERROR then
680: x_return_status := FND_API.G_RET_STS_ERROR ;
681: when FND_API.G_EXC_UNEXPECTED_ERROR then
682: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
683: when others then
684: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
685: l_error_tbl := x_error_tbl;
686: BIS_UTILITIES_PVT.Add_Error_Message
680: x_return_status := FND_API.G_RET_STS_ERROR ;
681: when FND_API.G_EXC_UNEXPECTED_ERROR then
682: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
683: when others then
684: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
685: l_error_tbl := x_error_tbl;
686: BIS_UTILITIES_PVT.Add_Error_Message
687: ( p_error_msg_id => SQLCODE
688: , p_error_description => SQLERRM
699: --The latest lct file. The lct file can call this overloaded procedure
700: --by passing in Org and Time dimension short_names also
701: Procedure Load_Measure
702: ( p_api_version IN NUMBER
703: , p_commit IN VARCHAR2 := FND_API.G_FALSE
704: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
705: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
706: , p_owner IN VARCHAR2 := BIS_UTILITIES_PUB.G_CUSTOM_OWNER
707: , p_Org_Dimension_Short_Name IN VARCHAR2
700: --by passing in Org and Time dimension short_names also
701: Procedure Load_Measure
702: ( p_api_version IN NUMBER
703: , p_commit IN VARCHAR2 := FND_API.G_FALSE
704: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
705: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
706: , p_owner IN VARCHAR2 := BIS_UTILITIES_PUB.G_CUSTOM_OWNER
707: , p_Org_Dimension_Short_Name IN VARCHAR2
708: , p_Time_Dimension_Short_Name IN VARCHAR2
738: l_msg := l_msg || ' could not be created/updated.';
739:
740:
741: l_measure_rec := p_measure_rec;
742: x_return_status := FND_API.G_RET_STS_SUCCESS;
743:
744:
745: IF (BIS_UTILITIES_PUB.Value_Missing
746: (p_Measure_Rec.Measure_id) = FND_API.G_TRUE
742: x_return_status := FND_API.G_RET_STS_SUCCESS;
743:
744:
745: IF (BIS_UTILITIES_PUB.Value_Missing
746: (p_Measure_Rec.Measure_id) = FND_API.G_TRUE
747: OR BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Measure_id)
748: = FND_API.G_TRUE) then
749: BIS_MEASURE_PVT.Measure_Value_ID_Conversion
750: ( p_api_version => p_api_version
744:
745: IF (BIS_UTILITIES_PUB.Value_Missing
746: (p_Measure_Rec.Measure_id) = FND_API.G_TRUE
747: OR BIS_UTILITIES_PUB.Value_NULL(p_Measure_Rec.Measure_id)
748: = FND_API.G_TRUE) then
749: BIS_MEASURE_PVT.Measure_Value_ID_Conversion
750: ( p_api_version => p_api_version
751: , p_Measure_Rec => p_Measure_Rec
752: , x_Measure_Rec => l_Measure_Rec
755: );
756: END IF;
757:
758:
759: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
760: l_measure_rec_p := l_Measure_Rec;
761: BIS_Measure_PVT.Dimension_Value_ID_Conversion
762: ( p_api_version => p_api_version
763: , p_Measure_Rec => l_measure_rec_p
765: , x_return_status => x_return_status
766: , x_error_Tbl => x_error_Tbl
767: );
768:
769: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
770: RAISE FND_API.G_EXC_ERROR;
771: END IF;
772:
773:
766: , x_error_Tbl => x_error_Tbl
767: );
768:
769: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
770: RAISE FND_API.G_EXC_ERROR;
771: END IF;
772:
773:
774: IF (BIS_UTILITIES_PUB.Value_Not_Missing
771: END IF;
772:
773:
774: IF (BIS_UTILITIES_PUB.Value_Not_Missing
775: (p_Org_Dimension_Short_Name) = FND_API.G_TRUE
776: AND BIS_UTILITIES_PUB.Value_Not_NULL(p_Org_Dimension_Short_Name)
777: = FND_API.G_TRUE) then
778: BIS_DIMENSION_PVT.Value_ID_Conversion
779: ( p_api_version => p_api_version
773:
774: IF (BIS_UTILITIES_PUB.Value_Not_Missing
775: (p_Org_Dimension_Short_Name) = FND_API.G_TRUE
776: AND BIS_UTILITIES_PUB.Value_Not_NULL(p_Org_Dimension_Short_Name)
777: = FND_API.G_TRUE) then
778: BIS_DIMENSION_PVT.Value_ID_Conversion
779: ( p_api_version => p_api_version
780: , p_Dimension_Short_Name => p_Org_Dimension_Short_Name
781: , p_Dimension_Name => FND_API.G_MISS_CHAR
777: = FND_API.G_TRUE) then
778: BIS_DIMENSION_PVT.Value_ID_Conversion
779: ( p_api_version => p_api_version
780: , p_Dimension_Short_Name => p_Org_Dimension_Short_Name
781: , p_Dimension_Name => FND_API.G_MISS_CHAR
782: , x_Dimension_ID => l_Org_Dimension_ID
783: , x_return_status => x_return_status
784: , x_error_Tbl => x_error_Tbl
785: );
783: , x_return_status => x_return_status
784: , x_error_Tbl => x_error_Tbl
785: );
786:
787: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
788: RAISE FND_API.G_EXC_ERROR;
789: END IF;
790:
791: END IF;
784: , x_error_Tbl => x_error_Tbl
785: );
786:
787: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
788: RAISE FND_API.G_EXC_ERROR;
789: END IF;
790:
791: END IF;
792:
790:
791: END IF;
792:
793: -- added this call for getting Time Dimension Id
794: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_Time_Dimension_Short_Name) = FND_API.G_TRUE
795: AND BIS_UTILITIES_PUB.Value_Not_NULL(p_Time_Dimension_Short_Name)
796: = FND_API.G_TRUE) THEN
797: BIS_DIMENSION_PVT.Value_ID_Conversion
798: ( p_api_version => p_api_version
792:
793: -- added this call for getting Time Dimension Id
794: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_Time_Dimension_Short_Name) = FND_API.G_TRUE
795: AND BIS_UTILITIES_PUB.Value_Not_NULL(p_Time_Dimension_Short_Name)
796: = FND_API.G_TRUE) THEN
797: BIS_DIMENSION_PVT.Value_ID_Conversion
798: ( p_api_version => p_api_version
799: , p_Dimension_Short_Name => p_Time_Dimension_Short_Name
800: , p_Dimension_Name => FND_API.G_MISS_CHAR
796: = FND_API.G_TRUE) THEN
797: BIS_DIMENSION_PVT.Value_ID_Conversion
798: ( p_api_version => p_api_version
799: , p_Dimension_Short_Name => p_Time_Dimension_Short_Name
800: , p_Dimension_Name => FND_API.G_MISS_CHAR
801: , x_Dimension_ID => l_Time_Dimension_ID
802: , x_return_status => x_return_status
803: , x_error_Tbl => x_error_Tbl
804: );
802: , x_return_status => x_return_status
803: , x_error_Tbl => x_error_Tbl
804: );
805:
806: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
807: RAISE FND_API.G_EXC_ERROR;
808: END IF;
809:
810: END IF;
803: , x_error_Tbl => x_error_Tbl
804: );
805:
806: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
807: RAISE FND_API.G_EXC_ERROR;
808: END IF;
809:
810: END IF;
811:
831: , x_return_status => x_return_status
832: , x_error_Tbl => x_error_Tbl
833: );
834:
835: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
836: RAISE FND_API.G_EXC_ERROR;
837: END IF;
838:
839: -- added this call for getting Org Dimension Id
832: , x_error_Tbl => x_error_Tbl
833: );
834:
835: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
836: RAISE FND_API.G_EXC_ERROR;
837: END IF;
838:
839: -- added this call for getting Org Dimension Id
840: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_Org_Dimension_Short_Name) = FND_API.G_TRUE
836: RAISE FND_API.G_EXC_ERROR;
837: END IF;
838:
839: -- added this call for getting Org Dimension Id
840: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_Org_Dimension_Short_Name) = FND_API.G_TRUE
841: AND BIS_UTILITIES_PUB.Value_Not_NULL(p_Org_Dimension_Short_Name)
842: = FND_API.G_TRUE) THEN
843: BIS_DIMENSION_PVT.Value_ID_Conversion
844: ( p_api_version => p_api_version
838:
839: -- added this call for getting Org Dimension Id
840: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_Org_Dimension_Short_Name) = FND_API.G_TRUE
841: AND BIS_UTILITIES_PUB.Value_Not_NULL(p_Org_Dimension_Short_Name)
842: = FND_API.G_TRUE) THEN
843: BIS_DIMENSION_PVT.Value_ID_Conversion
844: ( p_api_version => p_api_version
845: , p_Dimension_Short_Name => p_Org_Dimension_Short_Name
846: , p_Dimension_Name => FND_API.G_MISS_CHAR
842: = FND_API.G_TRUE) THEN
843: BIS_DIMENSION_PVT.Value_ID_Conversion
844: ( p_api_version => p_api_version
845: , p_Dimension_Short_Name => p_Org_Dimension_Short_Name
846: , p_Dimension_Name => FND_API.G_MISS_CHAR
847: , x_Dimension_ID => l_Org_Dimension_ID
848: , x_return_status => x_return_status
849: , x_error_Tbl => x_error_Tbl
850: );
848: , x_return_status => x_return_status
849: , x_error_Tbl => x_error_Tbl
850: );
851:
852: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
853: RAISE FND_API.G_EXC_ERROR;
854: END IF;
855:
856: END IF;
849: , x_error_Tbl => x_error_Tbl
850: );
851:
852: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
853: RAISE FND_API.G_EXC_ERROR;
854: END IF;
855:
856: END IF;
857:
855:
856: END IF;
857:
858: -- added this call for getting Time Dimension Id
859: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_Time_Dimension_Short_Name) = FND_API.G_TRUE
860: AND BIS_UTILITIES_PUB.Value_Not_NULL(p_Time_Dimension_Short_Name)
861: = FND_API.G_TRUE) THEN
862:
863: BIS_DIMENSION_PVT.Value_ID_Conversion
857:
858: -- added this call for getting Time Dimension Id
859: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_Time_Dimension_Short_Name) = FND_API.G_TRUE
860: AND BIS_UTILITIES_PUB.Value_Not_NULL(p_Time_Dimension_Short_Name)
861: = FND_API.G_TRUE) THEN
862:
863: BIS_DIMENSION_PVT.Value_ID_Conversion
864: ( p_api_version => p_api_version
865: , p_Dimension_Short_Name => p_Time_Dimension_Short_Name
862:
863: BIS_DIMENSION_PVT.Value_ID_Conversion
864: ( p_api_version => p_api_version
865: , p_Dimension_Short_Name => p_Time_Dimension_Short_Name
866: , p_Dimension_Name => FND_API.G_MISS_CHAR
867: , x_Dimension_ID => l_Time_Dimension_ID
868: , x_return_status => x_return_status
869: , x_error_Tbl => x_error_Tbl
870: );
868: , x_return_status => x_return_status
869: , x_error_Tbl => x_error_Tbl
870: );
871:
872: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
873: RAISE FND_API.G_EXC_ERROR;
874: END IF;
875:
876: END IF;
869: , x_error_Tbl => x_error_Tbl
870: );
871:
872: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
873: RAISE FND_API.G_EXC_ERROR;
874: END IF;
875:
876: END IF;
877:
892:
893: EXCEPTION
894: WHEN NO_DATA_FOUND THEN
895: BIS_UTILITIES_PUB.put_line(p_text =>l_msg);
896: x_return_status := FND_API.G_RET_STS_ERROR ;
897: when FND_API.G_EXC_ERROR then
898: BIS_UTILITIES_PUB.put_line(p_text =>l_msg);
899: x_return_status := FND_API.G_RET_STS_ERROR ;
900: when FND_API.G_EXC_UNEXPECTED_ERROR then
893: EXCEPTION
894: WHEN NO_DATA_FOUND THEN
895: BIS_UTILITIES_PUB.put_line(p_text =>l_msg);
896: x_return_status := FND_API.G_RET_STS_ERROR ;
897: when FND_API.G_EXC_ERROR then
898: BIS_UTILITIES_PUB.put_line(p_text =>l_msg);
899: x_return_status := FND_API.G_RET_STS_ERROR ;
900: when FND_API.G_EXC_UNEXPECTED_ERROR then
901: BIS_UTILITIES_PUB.put_line(p_text =>l_msg);
895: BIS_UTILITIES_PUB.put_line(p_text =>l_msg);
896: x_return_status := FND_API.G_RET_STS_ERROR ;
897: when FND_API.G_EXC_ERROR then
898: BIS_UTILITIES_PUB.put_line(p_text =>l_msg);
899: x_return_status := FND_API.G_RET_STS_ERROR ;
900: when FND_API.G_EXC_UNEXPECTED_ERROR then
901: BIS_UTILITIES_PUB.put_line(p_text =>l_msg);
902: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
903: when others then
896: x_return_status := FND_API.G_RET_STS_ERROR ;
897: when FND_API.G_EXC_ERROR then
898: BIS_UTILITIES_PUB.put_line(p_text =>l_msg);
899: x_return_status := FND_API.G_RET_STS_ERROR ;
900: when FND_API.G_EXC_UNEXPECTED_ERROR then
901: BIS_UTILITIES_PUB.put_line(p_text =>l_msg);
902: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
903: when others then
904: BIS_UTILITIES_PUB.put_line(p_text =>l_msg);
898: BIS_UTILITIES_PUB.put_line(p_text =>l_msg);
899: x_return_status := FND_API.G_RET_STS_ERROR ;
900: when FND_API.G_EXC_UNEXPECTED_ERROR then
901: BIS_UTILITIES_PUB.put_line(p_text =>l_msg);
902: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
903: when others then
904: BIS_UTILITIES_PUB.put_line(p_text =>l_msg);
905: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
906: l_error_tbl := x_error_tbl;
901: BIS_UTILITIES_PUB.put_line(p_text =>l_msg);
902: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
903: when others then
904: BIS_UTILITIES_PUB.put_line(p_text =>l_msg);
905: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
906: l_error_tbl := x_error_tbl;
907: BIS_UTILITIES_PVT.Add_Error_Message
908: ( p_error_msg_id => SQLCODE
909: , p_error_description => SQLERRM
923: BIS_MEASURE_PVT.updt_pm_owner(p_pm_short_name => p_pm_short_name
924: ,x_return_status => x_return_status);
925: EXCEPTION
926: WHEN OTHERS THEN
927: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
928: END updt_pm_owner;
929:
930: -- mdamle 09/25/2003 - Sync up measures for all installed languages
931: Procedure Translate_Measure_By_lang
929:
930: -- mdamle 09/25/2003 - Sync up measures for all installed languages
931: Procedure Translate_Measure_By_lang
932: ( p_api_version IN NUMBER
933: , p_commit IN VARCHAR2 := FND_API.G_FALSE
934: , p_Measure_Rec IN BIS_MEASURE_PUB.Measure_Rec_Type
935: , p_owner IN VARCHAR2 := BIS_UTILITIES_PUB.G_CUSTOM_OWNER
936: , p_lang IN VARCHAR2
937: , p_source_lang IN VARCHAR2
954: );
955:
956: EXCEPTION
957: WHEN NO_DATA_FOUND THEN
958: x_return_status := FND_API.G_RET_STS_ERROR ;
959: when FND_API.G_EXC_ERROR then
960: x_return_status := FND_API.G_RET_STS_ERROR ;
961: when FND_API.G_EXC_UNEXPECTED_ERROR then
962: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
955:
956: EXCEPTION
957: WHEN NO_DATA_FOUND THEN
958: x_return_status := FND_API.G_RET_STS_ERROR ;
959: when FND_API.G_EXC_ERROR then
960: x_return_status := FND_API.G_RET_STS_ERROR ;
961: when FND_API.G_EXC_UNEXPECTED_ERROR then
962: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
963: when others then
956: EXCEPTION
957: WHEN NO_DATA_FOUND THEN
958: x_return_status := FND_API.G_RET_STS_ERROR ;
959: when FND_API.G_EXC_ERROR then
960: x_return_status := FND_API.G_RET_STS_ERROR ;
961: when FND_API.G_EXC_UNEXPECTED_ERROR then
962: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
963: when others then
964: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
957: WHEN NO_DATA_FOUND THEN
958: x_return_status := FND_API.G_RET_STS_ERROR ;
959: when FND_API.G_EXC_ERROR then
960: x_return_status := FND_API.G_RET_STS_ERROR ;
961: when FND_API.G_EXC_UNEXPECTED_ERROR then
962: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
963: when others then
964: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
965: BIS_UTILITIES_PVT.Add_Error_Message
958: x_return_status := FND_API.G_RET_STS_ERROR ;
959: when FND_API.G_EXC_ERROR then
960: x_return_status := FND_API.G_RET_STS_ERROR ;
961: when FND_API.G_EXC_UNEXPECTED_ERROR then
962: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
963: when others then
964: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
965: BIS_UTILITIES_PVT.Add_Error_Message
966: ( p_error_msg_id => SQLCODE
960: x_return_status := FND_API.G_RET_STS_ERROR ;
961: when FND_API.G_EXC_UNEXPECTED_ERROR then
962: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
963: when others then
964: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
965: BIS_UTILITIES_PVT.Add_Error_Message
966: ( p_error_msg_id => SQLCODE
967: , p_error_description => SQLERRM
968: , p_error_proc_name => G_PKG_NAME||'.Translate_Measure'