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 BscKpiMeasurePvt_Create;
21:
20: SAVEPOINT BscKpiMeasurePvt_Create;
21:
22: IF (p_kpi_measure_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_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_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: ELSE
31: SELECT COUNT(1) INTO l_count
32: FROM bsc_kpi_measure_props
35: IF (l_count > 0) THEN
36: FND_MESSAGE.SET_NAME('BSC','BSC_OBJ_KPIMEASURE_EXISTS');
37: FND_MESSAGE.SET_TOKEN('OBJECTIVE_ID', p_kpi_measure_rec.objective_id);
38: FND_MESSAGE.SET_TOKEN('KPI_MEASURE_ID', p_kpi_measure_rec.kpi_measure_id);
39: FND_MSG_PUB.ADD;
40: RAISE FND_API.G_EXC_ERROR;
41: END IF;
42: END IF;
43:
81: EXCEPTION
82: WHEN FND_API.G_EXC_ERROR THEN
83: ROLLBACK TO BscKpiMeasurePvt_Create;
84: IF (x_msg_data IS NULL) THEN
85: FND_MSG_PUB.Count_And_Get
86: ( p_encoded => FND_API.G_FALSE
87: , p_count => x_msg_count
88: , p_data => x_msg_data
89: );
91: x_return_status := FND_API.G_RET_STS_ERROR;
92: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
93: ROLLBACK TO BscKpiMeasurePvt_Create;
94: IF (x_msg_data IS NULL) THEN
95: FND_MSG_PUB.Count_And_Get
96: ( p_encoded => FND_API.G_FALSE
97: , p_count => x_msg_count
98: , p_data => x_msg_data
99: );
128: )
129: IS
130: l_kpi_measure_rec BSC_KPI_MEASURE_PROPS_PUB.kpi_measure_props_rec;
131: BEGIN
132: FND_MSG_PUB.Initialize;
133: x_return_status := FND_API.G_RET_STS_SUCCESS;
134:
135: SAVEPOINT BscKpiMeasurePvt_Update;
136:
135: SAVEPOINT BscKpiMeasurePvt_Update;
136:
137: IF (p_kpi_measure_rec.objective_id IS NULL) THEN
138: FND_MESSAGE.SET_NAME('BSC','BSC_OBJECTIVE_ID_NULL');
139: FND_MSG_PUB.ADD;
140: RAISE FND_API.G_EXC_ERROR;
141: ELSIF (p_kpi_measure_rec.kpi_measure_id IS NULL) THEN
142: FND_MESSAGE.SET_NAME('BSC','BSC_KPI_MEASURE_ID_NULL');
143: FND_MSG_PUB.ADD;
139: FND_MSG_PUB.ADD;
140: RAISE FND_API.G_EXC_ERROR;
141: ELSIF (p_kpi_measure_rec.kpi_measure_id IS NULL) THEN
142: FND_MESSAGE.SET_NAME('BSC','BSC_KPI_MEASURE_ID_NULL');
143: FND_MSG_PUB.ADD;
144: RAISE FND_API.G_EXC_ERROR;
145: END IF;
146:
147: Retrieve_Kpi_Measure_Props
212: EXCEPTION
213: WHEN FND_API.G_EXC_ERROR THEN
214: ROLLBACK TO BscKpiMeasurePvt_Update;
215: IF (x_msg_data IS NULL) THEN
216: FND_MSG_PUB.Count_And_Get
217: ( p_encoded => FND_API.G_FALSE
218: , p_count => x_msg_count
219: , p_data => x_msg_data
220: );
222: x_return_status := FND_API.G_RET_STS_ERROR;
223: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
224: ROLLBACK TO BscKpiMeasurePvt_Update;
225: IF (x_msg_data IS NULL) THEN
226: FND_MSG_PUB.Count_And_Get
227: ( p_encoded => FND_API.G_FALSE
228: , p_count => x_msg_count
229: , p_data => x_msg_data
230: );
259: , x_msg_data OUT NOCOPY VARCHAR2
260: )
261: IS
262: BEGIN
263: FND_MSG_PUB.Initialize;
264: x_return_status := FND_API.G_RET_STS_SUCCESS;
265:
266: SAVEPOINT BscKpiMeasurePvt_Delete;
267:
266: SAVEPOINT BscKpiMeasurePvt_Delete;
267:
268: IF (p_objective_id IS NULL) THEN
269: FND_MESSAGE.SET_NAME('BSC','BSC_OBJECTIVE_ID_NULL');
270: FND_MSG_PUB.ADD;
271: RAISE FND_API.G_EXC_ERROR;
272: ELSIF (p_kpi_measure_id IS NULL) THEN
273: FND_MESSAGE.SET_NAME('BSC','BSC_KPI_MEASURE_ID_NULL');
274: FND_MSG_PUB.ADD;
270: FND_MSG_PUB.ADD;
271: RAISE FND_API.G_EXC_ERROR;
272: ELSIF (p_kpi_measure_id IS NULL) THEN
273: FND_MESSAGE.SET_NAME('BSC','BSC_KPI_MEASURE_ID_NULL');
274: FND_MSG_PUB.ADD;
275: RAISE FND_API.G_EXC_ERROR;
276: END IF;
277:
278: DELETE FROM bsc_kpi_measure_props
286: EXCEPTION
287: WHEN FND_API.G_EXC_ERROR THEN
288: ROLLBACK TO BscKpiMeasurePvt_Delete;
289: IF (x_msg_data IS NULL) THEN
290: FND_MSG_PUB.Count_And_Get
291: ( p_encoded => FND_API.G_FALSE
292: , p_count => x_msg_count
293: , p_data => x_msg_data
294: );
296: x_return_status := FND_API.G_RET_STS_ERROR;
297: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
298: ROLLBACK TO BscKpiMeasurePvt_Delete;
299: IF (x_msg_data IS NULL) THEN
300: FND_MSG_PUB.Count_And_Get
301: ( p_encoded => FND_API.G_FALSE
302: , p_count => x_msg_count
303: , p_data => x_msg_data
304: );
332: , x_msg_data OUT NOCOPY VARCHAR2
333: )
334: IS
335: BEGIN
336: FND_MSG_PUB.Initialize;
337: x_return_status := FND_API.G_RET_STS_SUCCESS;
338:
339: SAVEPOINT BscKpiMeasurePvt_DeleteAll;
340:
339: SAVEPOINT BscKpiMeasurePvt_DeleteAll;
340:
341: IF (p_objective_id IS NULL) THEN
342: FND_MESSAGE.SET_NAME('BSC','BSC_OBJECTIVE_ID_NULL');
343: FND_MSG_PUB.ADD;
344: RAISE FND_API.G_EXC_ERROR;
345: END IF;
346:
347: DELETE FROM bsc_kpi_measure_props
354: EXCEPTION
355: WHEN FND_API.G_EXC_ERROR THEN
356: ROLLBACK TO BscKpiMeasurePvt_DeleteAll;
357: IF (x_msg_data IS NULL) THEN
358: FND_MSG_PUB.Count_And_Get
359: ( p_encoded => FND_API.G_FALSE
360: , p_count => x_msg_count
361: , p_data => x_msg_data
362: );
364: x_return_status := FND_API.G_RET_STS_ERROR;
365: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
366: ROLLBACK TO BscKpiMeasurePvt_DeleteAll;
367: IF (x_msg_data IS NULL) THEN
368: FND_MSG_PUB.Count_And_Get
369: ( p_encoded => FND_API.G_FALSE
370: , p_count => x_msg_count
371: , p_data => x_msg_data
372: );
401: , x_msg_data OUT NOCOPY VARCHAR2
402: )
403: IS
404: BEGIN
405: FND_MSG_PUB.Initialize;
406: x_return_status := FND_API.G_RET_STS_SUCCESS;
407:
408: IF (p_objective_id IS NULL) THEN
409: FND_MESSAGE.SET_NAME('BSC','BSC_OBJECTIVE_ID_NULL');
406: x_return_status := FND_API.G_RET_STS_SUCCESS;
407:
408: IF (p_objective_id IS NULL) THEN
409: FND_MESSAGE.SET_NAME('BSC','BSC_OBJECTIVE_ID_NULL');
410: FND_MSG_PUB.ADD;
411: RAISE FND_API.G_EXC_ERROR;
412: ELSIF (p_kpi_measure_id IS NULL) THEN
413: FND_MESSAGE.SET_NAME('BSC','BSC_KPI_MEASURE_ID_NULL');
414: FND_MSG_PUB.ADD;
410: FND_MSG_PUB.ADD;
411: RAISE FND_API.G_EXC_ERROR;
412: ELSIF (p_kpi_measure_id IS NULL) THEN
413: FND_MESSAGE.SET_NAME('BSC','BSC_KPI_MEASURE_ID_NULL');
414: FND_MSG_PUB.ADD;
415: RAISE FND_API.G_EXC_ERROR;
416: END IF;
417:
418: SELECT
451:
452: EXCEPTION
453: WHEN FND_API.G_EXC_ERROR THEN
454: IF (x_msg_data IS NULL) THEN
455: FND_MSG_PUB.Count_And_Get
456: ( p_encoded => FND_API.G_FALSE
457: , p_count => x_msg_count
458: , p_data => x_msg_data
459: );
460: END IF;
461: x_return_status := FND_API.G_RET_STS_ERROR;
462: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
463: IF (x_msg_data IS NULL) THEN
464: FND_MSG_PUB.Count_And_Get
465: ( p_encoded => FND_API.G_FALSE
466: , p_count => x_msg_count
467: , p_data => x_msg_data
468: );