13: IS
14: l_count NUMBER;
15: BEGIN
16:
17: FND_MSG_PUB.Initialize;
18: x_return_status := FND_API.G_RET_STS_SUCCESS;
19:
20: SAVEPOINT BscKpiMeasureWeightPvt_Create;
21:
20: SAVEPOINT BscKpiMeasureWeightPvt_Create;
21:
22: IF (p_kpi_measure_weights_rec.objective_id IS NULL) THEN
23: FND_MESSAGE.SET_NAME('BSC','BSC_OBJECTIVE_ID_NULL');
24: FND_MSG_PUB.ADD;
25: RAISE FND_API.G_EXC_ERROR;
26: ELSIF (p_kpi_measure_weights_rec.kpi_measure_id IS NULL) THEN
27: FND_MESSAGE.SET_NAME('BSC','BSC_KPI_MEASURE_ID_NULL');
28: FND_MSG_PUB.ADD;
24: FND_MSG_PUB.ADD;
25: RAISE FND_API.G_EXC_ERROR;
26: ELSIF (p_kpi_measure_weights_rec.kpi_measure_id IS NULL) THEN
27: FND_MESSAGE.SET_NAME('BSC','BSC_KPI_MEASURE_ID_NULL');
28: FND_MSG_PUB.ADD;
29: RAISE FND_API.G_EXC_ERROR;
30: END IF;
31:
32: INSERT INTO bsc_kpi_measure_weights
57: EXCEPTION
58: WHEN FND_API.G_EXC_ERROR THEN
59: ROLLBACK TO BscKpiMeasureWeightPvt_Create;
60: IF (x_msg_data IS NULL) THEN
61: FND_MSG_PUB.Count_And_Get
62: ( p_encoded => FND_API.G_FALSE
63: , p_count => x_msg_count
64: , p_data => x_msg_data
65: );
67: x_return_status := FND_API.G_RET_STS_ERROR;
68: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
69: ROLLBACK TO BscKpiMeasureWeightPvt_Create;
70: IF (x_msg_data IS NULL) THEN
71: FND_MSG_PUB.Count_And_Get
72: ( p_encoded => FND_API.G_FALSE
73: , p_count => x_msg_count
74: , p_data => x_msg_data
75: );
104: )
105: IS
106: l_kpi_measure_weights_rec BSC_KPI_MEASURE_WEIGHTS_PUB.kpi_measure_weights_rec;
107: BEGIN
108: FND_MSG_PUB.Initialize;
109: x_return_status := FND_API.G_RET_STS_SUCCESS;
110:
111: SAVEPOINT BscKpiMeasureWeightPvt_Update;
112:
111: SAVEPOINT BscKpiMeasureWeightPvt_Update;
112:
113: IF (p_kpi_measure_weights_rec.objective_id IS NULL) THEN
114: FND_MESSAGE.SET_NAME('BSC','BSC_OBJECTIVE_ID_NULL');
115: FND_MSG_PUB.ADD;
116: RAISE FND_API.G_EXC_ERROR;
117: ELSIF (p_kpi_measure_weights_rec.kpi_measure_id IS NULL) THEN
118: FND_MESSAGE.SET_NAME('BSC','BSC_KPI_MEASURE_ID_NULL');
119: FND_MSG_PUB.ADD;
115: FND_MSG_PUB.ADD;
116: RAISE FND_API.G_EXC_ERROR;
117: ELSIF (p_kpi_measure_weights_rec.kpi_measure_id IS NULL) THEN
118: FND_MESSAGE.SET_NAME('BSC','BSC_KPI_MEASURE_ID_NULL');
119: FND_MSG_PUB.ADD;
120: RAISE FND_API.G_EXC_ERROR;
121: END IF;
122:
123: Retrieve_Kpi_Measure_Weights
166: EXCEPTION
167: WHEN FND_API.G_EXC_ERROR THEN
168: ROLLBACK TO BscKpiMeasureWeightPvt_Update;
169: IF (x_msg_data IS NULL) THEN
170: FND_MSG_PUB.Count_And_Get
171: ( p_encoded => FND_API.G_FALSE
172: , p_count => x_msg_count
173: , p_data => x_msg_data
174: );
176: x_return_status := FND_API.G_RET_STS_ERROR;
177: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
178: ROLLBACK TO BscKpiMeasureWeightPvt_Update;
179: IF (x_msg_data IS NULL) THEN
180: FND_MSG_PUB.Count_And_Get
181: ( p_encoded => FND_API.G_FALSE
182: , p_count => x_msg_count
183: , p_data => x_msg_data
184: );
213: , x_msg_data OUT NOCOPY VARCHAR2
214: )
215: IS
216: BEGIN
217: FND_MSG_PUB.Initialize;
218: x_return_status := FND_API.G_RET_STS_SUCCESS;
219:
220: SAVEPOINT BscKpiMeasureWeightPvt_Delete;
221:
220: SAVEPOINT BscKpiMeasureWeightPvt_Delete;
221:
222: IF (p_objective_id IS NULL) THEN
223: FND_MESSAGE.SET_NAME('BSC','BSC_OBJECTIVE_ID_NULL');
224: FND_MSG_PUB.ADD;
225: RAISE FND_API.G_EXC_ERROR;
226: ELSIF (p_kpi_measure_id IS NULL) THEN
227: FND_MESSAGE.SET_NAME('BSC','BSC_KPI_MEASURE_ID_NULL');
228: FND_MSG_PUB.ADD;
224: FND_MSG_PUB.ADD;
225: RAISE FND_API.G_EXC_ERROR;
226: ELSIF (p_kpi_measure_id IS NULL) THEN
227: FND_MESSAGE.SET_NAME('BSC','BSC_KPI_MEASURE_ID_NULL');
228: FND_MSG_PUB.ADD;
229: RAISE FND_API.G_EXC_ERROR;
230: END IF;
231:
232: DELETE FROM bsc_kpi_measure_weights
240: EXCEPTION
241: WHEN FND_API.G_EXC_ERROR THEN
242: ROLLBACK TO BscKpiMeasureWeightPvt_Delete;
243: IF (x_msg_data IS NULL) THEN
244: FND_MSG_PUB.Count_And_Get
245: ( p_encoded => FND_API.G_FALSE
246: , p_count => x_msg_count
247: , p_data => x_msg_data
248: );
250: x_return_status := FND_API.G_RET_STS_ERROR;
251: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
252: ROLLBACK TO BscKpiMeasureWeightPvt_Delete;
253: IF (x_msg_data IS NULL) THEN
254: FND_MSG_PUB.Count_And_Get
255: ( p_encoded => FND_API.G_FALSE
256: , p_count => x_msg_count
257: , p_data => x_msg_data
258: );
286: , x_msg_data OUT NOCOPY VARCHAR2
287: )
288: IS
289: BEGIN
290: FND_MSG_PUB.Initialize;
291: x_return_status := FND_API.G_RET_STS_SUCCESS;
292:
293: SAVEPOINT BscKpiMeasureWeightPvt_DelAll;
294:
293: SAVEPOINT BscKpiMeasureWeightPvt_DelAll;
294:
295: IF (p_objective_id IS NULL) THEN
296: FND_MESSAGE.SET_NAME('BSC','BSC_OBJECTIVE_ID_NULL');
297: FND_MSG_PUB.ADD;
298: RAISE FND_API.G_EXC_ERROR;
299: END IF;
300:
301: DELETE FROM bsc_kpi_measure_weights
308: EXCEPTION
309: WHEN FND_API.G_EXC_ERROR THEN
310: ROLLBACK TO BscKpiMeasureWeightPvt_DelAll;
311: IF (x_msg_data IS NULL) THEN
312: FND_MSG_PUB.Count_And_Get
313: ( p_encoded => FND_API.G_FALSE
314: , p_count => x_msg_count
315: , p_data => x_msg_data
316: );
318: x_return_status := FND_API.G_RET_STS_ERROR;
319: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
320: ROLLBACK TO BscKpiMeasureWeightPvt_DelAll;
321: IF (x_msg_data IS NULL) THEN
322: FND_MSG_PUB.Count_And_Get
323: ( p_encoded => FND_API.G_FALSE
324: , p_count => x_msg_count
325: , p_data => x_msg_data
326: );
355: , x_msg_data OUT NOCOPY VARCHAR2
356: )
357: IS
358: BEGIN
359: FND_MSG_PUB.Initialize;
360: x_return_status := FND_API.G_RET_STS_SUCCESS;
361:
362: IF (p_objective_id IS NULL) THEN
363: FND_MESSAGE.SET_NAME('BSC','BSC_OBJECTIVE_ID_NULL');
360: x_return_status := FND_API.G_RET_STS_SUCCESS;
361:
362: IF (p_objective_id IS NULL) THEN
363: FND_MESSAGE.SET_NAME('BSC','BSC_OBJECTIVE_ID_NULL');
364: FND_MSG_PUB.ADD;
365: RAISE FND_API.G_EXC_ERROR;
366: ELSIF (p_kpi_measure_id IS NULL) THEN
367: FND_MESSAGE.SET_NAME('BSC','BSC_KPI_MEASURE_ID_NULL');
368: FND_MSG_PUB.ADD;
364: FND_MSG_PUB.ADD;
365: RAISE FND_API.G_EXC_ERROR;
366: ELSIF (p_kpi_measure_id IS NULL) THEN
367: FND_MESSAGE.SET_NAME('BSC','BSC_KPI_MEASURE_ID_NULL');
368: FND_MSG_PUB.ADD;
369: RAISE FND_API.G_EXC_ERROR;
370: END IF;
371:
372: SELECT
393:
394: EXCEPTION
395: WHEN FND_API.G_EXC_ERROR THEN
396: IF (x_msg_data IS NULL) THEN
397: FND_MSG_PUB.Count_And_Get
398: ( p_encoded => FND_API.G_FALSE
399: , p_count => x_msg_count
400: , p_data => x_msg_data
401: );
402: END IF;
403: x_return_status := FND_API.G_RET_STS_ERROR;
404: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
405: IF (x_msg_data IS NULL) THEN
406: FND_MSG_PUB.Count_And_Get
407: ( p_encoded => FND_API.G_FALSE
408: , p_count => x_msg_count
409: , p_data => x_msg_data
410: );