DBA Data[Home] [Help]

APPS.BSC_KPI_GROUP_PVT dependencies on FND_API

Line 41: p_commit IN VARCHAR2 := FND_API.G_FALSE

37: G_PKG_NAME CONSTANT varchar2(30) := 'BSC_KPI_GROUP_PVT';
38: g_db_object varchar2(30) := null;
39:
40: PROCEDURE Create_Kpi_Group(
41: p_commit IN VARCHAR2 := FND_API.G_FALSE
42: ,p_Bsc_Kpi_Group_Rec IN BSC_KPI_GROUP_PUB.Bsc_Kpi_Group_Rec
43: ,x_return_status OUT NOCOPY VARCHAR2
44: ,x_msg_count OUT NOCOPY NUMBER
45: ,x_msg_data OUT NOCOPY VARCHAR2

Line 52: x_return_status := FND_API.G_RET_STS_SUCCESS;

48: l_count NUMBER;
49:
50: BEGIN
51: FND_MSG_PUB.Initialize;
52: x_return_status := FND_API.G_RET_STS_SUCCESS;
53: SAVEPOINT BSCKPIGrpPVT;
54:
55: -- This procedure "Creates" a new Kpi Group, and also "Creates" an assignment of a KPI
56: -- group to a Scorecard.

Line 70: RAISE FND_API.G_EXC_ERROR;

66: IF l_count = 0 THEN
67: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_KGROUP_ID');
68: FND_MESSAGE.SET_TOKEN('BSC_KGROUP', p_Bsc_Kpi_Group_Rec.Bsc_Kpi_Group_Id);
69: FND_MSG_PUB.ADD;
70: RAISE FND_API.G_EXC_ERROR;
71: END IF;
72: ELSE
73: FND_MESSAGE.SET_NAME('BSC','BSC_NO_KGROUP_ID_ENTERED');
74: FND_MESSAGE.SET_TOKEN('BSC_KGROUP', p_Bsc_Kpi_Group_Rec.Bsc_Kpi_Group_Id);

Line 76: RAISE FND_API.G_EXC_ERROR;

72: ELSE
73: FND_MESSAGE.SET_NAME('BSC','BSC_NO_KGROUP_ID_ENTERED');
74: FND_MESSAGE.SET_TOKEN('BSC_KGROUP', p_Bsc_Kpi_Group_Rec.Bsc_Kpi_Group_Id);
75: FND_MSG_PUB.ADD;
76: RAISE FND_API.G_EXC_ERROR;
77: END IF;
78:
79: -- Check that valid Tab id was entered.
80: IF p_Bsc_Kpi_Group_Rec.Bsc_Tab_Id IS NOT NULL THEN

Line 90: RAISE FND_API.G_EXC_ERROR;

86: IF l_count = 0 THEN
87: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_TAB_ID');
88: FND_MESSAGE.SET_TOKEN('BSC_TAB', p_Bsc_Kpi_Group_Rec.Bsc_Tab_Id);
89: FND_MSG_PUB.ADD;
90: RAISE FND_API.G_EXC_ERROR;
91: END IF;
92: ELSE
93: FND_MESSAGE.SET_NAME('BSC','BSC_NO_TAB_ID_ENTERED');
94: FND_MESSAGE.SET_TOKEN('BSC_KGROUP', p_Bsc_Kpi_Group_Rec.Bsc_Tab_Id);

Line 96: RAISE FND_API.G_EXC_ERROR;

92: ELSE
93: FND_MESSAGE.SET_NAME('BSC','BSC_NO_TAB_ID_ENTERED');
94: FND_MESSAGE.SET_TOKEN('BSC_KGROUP', p_Bsc_Kpi_Group_Rec.Bsc_Tab_Id);
95: FND_MSG_PUB.ADD;
96: RAISE FND_API.G_EXC_ERROR;
97: END IF;
98: ELSE -- New KPI Group to be added
99: IF p_Bsc_Kpi_Group_Rec.Bsc_Kpi_Group_Short_Name IS NOT NULL THEN
100:

Line 112: -- RAISE FND_API.G_EXC_ERROR;

108: -- FND_MESSAGE.SET_NAME('BSC','BSC_UNIQUE_NAME_REQUIRED');
109: -- FND_MESSAGE.SET_TOKEN('SHORT_NAME', BSC_APPS.GET_LOOKUP_VALUE('BSC_UI_BUILDER', 'MEASURE_SHORT_NAME'));
110: -- FND_MESSAGE.SET_TOKEN('NAME_VALUE', p_Bsc_Kpi_Group_Rec.Bsc_Kpi_Group_Short_Name );
111: -- FND_MSG_PUB.ADD;
112: -- RAISE FND_API.G_EXC_ERROR;
113: -- END IF;
114: END IF;
115: END IF;
116:

Line 170: IF (p_commit = FND_API.G_TRUE) THEN

166: AND T.csf_id = p_Bsc_Kpi_Group_Rec.Bsc_Csf_Id
167: AND T.ind_group_id = p_Bsc_Kpi_Group_Rec.Bsc_Kpi_Group_Id
168: AND T.LANGUAGE = L.LANGUAGE_CODE);
169:
170: IF (p_commit = FND_API.G_TRUE) THEN
171: COMMIT;
172: END IF;
173:
174: EXCEPTION

Line 175: WHEN FND_API.G_EXC_ERROR THEN

171: COMMIT;
172: END IF;
173:
174: EXCEPTION
175: WHEN FND_API.G_EXC_ERROR THEN
176: ROLLBACK TO BSCKPIGrpPVT;
177: FND_MSG_PUB.Count_And_Get
178: ( p_encoded => FND_API.G_FALSE
179: , p_count => x_msg_count

Line 178: ( p_encoded => FND_API.G_FALSE

174: EXCEPTION
175: WHEN FND_API.G_EXC_ERROR THEN
176: ROLLBACK TO BSCKPIGrpPVT;
177: FND_MSG_PUB.Count_And_Get
178: ( p_encoded => FND_API.G_FALSE
179: , p_count => x_msg_count
180: , p_data => x_msg_data
181: );
182: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);

Line 182: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);

178: ( p_encoded => FND_API.G_FALSE
179: , p_count => x_msg_count
180: , p_data => x_msg_data
181: );
182: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
183: x_return_status := FND_API.G_RET_STS_ERROR;
184: RAISE;
185: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
186: ROLLBACK TO BSCKPIGrpPVT;

Line 183: x_return_status := FND_API.G_RET_STS_ERROR;

179: , p_count => x_msg_count
180: , p_data => x_msg_data
181: );
182: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
183: x_return_status := FND_API.G_RET_STS_ERROR;
184: RAISE;
185: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
186: ROLLBACK TO BSCKPIGrpPVT;
187: FND_MSG_PUB.Count_And_Get

Line 185: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

181: );
182: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
183: x_return_status := FND_API.G_RET_STS_ERROR;
184: RAISE;
185: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
186: ROLLBACK TO BSCKPIGrpPVT;
187: FND_MSG_PUB.Count_And_Get
188: ( p_encoded => FND_API.G_FALSE
189: , p_count => x_msg_count

Line 188: ( p_encoded => FND_API.G_FALSE

184: RAISE;
185: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
186: ROLLBACK TO BSCKPIGrpPVT;
187: FND_MSG_PUB.Count_And_Get
188: ( p_encoded => FND_API.G_FALSE
189: , p_count => x_msg_count
190: , p_data => x_msg_data
191: );
192: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 192: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

188: ( p_encoded => FND_API.G_FALSE
189: , p_count => x_msg_count
190: , p_data => x_msg_data
191: );
192: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
193: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
194: RAISE;
195: WHEN NO_DATA_FOUND THEN
196: ROLLBACK TO BSCKPIGrpPVT;

Line 193: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);

189: , p_count => x_msg_count
190: , p_data => x_msg_data
191: );
192: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
193: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
194: RAISE;
195: WHEN NO_DATA_FOUND THEN
196: ROLLBACK TO BSCKPIGrpPVT;
197: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 197: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

193: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
194: RAISE;
195: WHEN NO_DATA_FOUND THEN
196: ROLLBACK TO BSCKPIGrpPVT;
197: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
198: if (SQLCODE = -01400) then
199: FND_MESSAGE.SET_NAME('BSC','BSC_TABLE_NULL_VALUE');
200: FND_MESSAGE.SET_TOKEN('BSC_OBJECT', 'BSC_KPI_GROUP_PVT.Create_Kpi_Group');
201: FND_MSG_PUB.ADD;

Line 202: RAISE FND_API.G_EXC_ERROR;

198: if (SQLCODE = -01400) then
199: FND_MESSAGE.SET_NAME('BSC','BSC_TABLE_NULL_VALUE');
200: FND_MESSAGE.SET_TOKEN('BSC_OBJECT', 'BSC_KPI_GROUP_PVT.Create_Kpi_Group');
201: FND_MSG_PUB.ADD;
202: RAISE FND_API.G_EXC_ERROR;
203: end if;
204: IF (x_msg_data IS NOT NULL) THEN
205: x_msg_data := x_msg_data||' -> BSC_KPI_GROUP_PVT.Create_Kpi_Group ';
206: ELSE

Line 213: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

209: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
210: RAISE;
211: WHEN OTHERS THEN
212: ROLLBACK TO BSCKPIGrpPVT;
213: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
214: IF (x_msg_data IS NOT NULL) THEN
215: x_msg_data := x_msg_data||' -> BSC_KPI_GROUP_PVT.Create_Kpi_Group ';
216: ELSE
217: x_msg_data := SQLERRM||' at BSC_KPI_GROUP_PVT.Create_Kpi_Group ';

Line 227: p_commit IN varchar2 := FND_API.G_FALSE

223: /************************************************************************************
224: ************************************************************************************/
225:
226: procedure Retrieve_Kpi_Group(
227: p_commit IN varchar2 := FND_API.G_FALSE
228: ,p_Bsc_Kpi_Group_Rec IN BSC_KPI_GROUP_PUB.Bsc_Kpi_Group_Rec
229: ,x_Bsc_Kpi_Group_Rec IN OUT NOCOPY BSC_KPI_GROUP_PUB.Bsc_Kpi_Group_Rec
230: ,x_return_status OUT NOCOPY VARCHAR2
231: ,x_msg_count OUT NOCOPY NUMBER

Line 237: x_return_status := FND_API.G_RET_STS_SUCCESS;

233: ) is
234:
235: begin
236: FND_MSG_PUB.Initialize;
237: x_return_status := FND_API.G_RET_STS_SUCCESS;
238:
239: g_db_object := 'Retrieve_Kpi_Group';
240:
241: SELECT DISTINCT A.TAB_ID

Line 275: IF (p_commit = FND_API.G_TRUE) THEN

271: AND b.language = USERENV('LANG')
272: AND a.tab_id = -1
273: AND a.tab_id = b.tab_id;
274:
275: IF (p_commit = FND_API.G_TRUE) THEN
276: COMMIT;
277: END IF;
278:
279: --BSC_DEBUG.PUT_LINE(' -- End BSC_KPI_GROUP_PVT.Retrieve_Kpi_Group' );

Line 283: WHEN FND_API.G_EXC_ERROR THEN

279: --BSC_DEBUG.PUT_LINE(' -- End BSC_KPI_GROUP_PVT.Retrieve_Kpi_Group' );
280:
281:
282: EXCEPTION
283: WHEN FND_API.G_EXC_ERROR THEN
284: FND_MSG_PUB.Count_And_Get
285: ( p_encoded => FND_API.G_FALSE
286: , p_count => x_msg_count
287: , p_data => x_msg_data

Line 285: ( p_encoded => FND_API.G_FALSE

281:
282: EXCEPTION
283: WHEN FND_API.G_EXC_ERROR THEN
284: FND_MSG_PUB.Count_And_Get
285: ( p_encoded => FND_API.G_FALSE
286: , p_count => x_msg_count
287: , p_data => x_msg_data
288: );
289: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);

Line 289: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);

285: ( p_encoded => FND_API.G_FALSE
286: , p_count => x_msg_count
287: , p_data => x_msg_data
288: );
289: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
290: x_return_status := FND_API.G_RET_STS_ERROR;
291: RAISE;
292: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
293: FND_MSG_PUB.Count_And_Get

Line 290: x_return_status := FND_API.G_RET_STS_ERROR;

286: , p_count => x_msg_count
287: , p_data => x_msg_data
288: );
289: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
290: x_return_status := FND_API.G_RET_STS_ERROR;
291: RAISE;
292: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
293: FND_MSG_PUB.Count_And_Get
294: ( p_encoded => FND_API.G_FALSE

Line 292: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

288: );
289: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
290: x_return_status := FND_API.G_RET_STS_ERROR;
291: RAISE;
292: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
293: FND_MSG_PUB.Count_And_Get
294: ( p_encoded => FND_API.G_FALSE
295: , p_count => x_msg_count
296: , p_data => x_msg_data

Line 294: ( p_encoded => FND_API.G_FALSE

290: x_return_status := FND_API.G_RET_STS_ERROR;
291: RAISE;
292: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
293: FND_MSG_PUB.Count_And_Get
294: ( p_encoded => FND_API.G_FALSE
295: , p_count => x_msg_count
296: , p_data => x_msg_data
297: );
298: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 298: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

294: ( p_encoded => FND_API.G_FALSE
295: , p_count => x_msg_count
296: , p_data => x_msg_data
297: );
298: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
299: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
300: RAISE;
301: WHEN NO_DATA_FOUND THEN
302: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 299: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);

295: , p_count => x_msg_count
296: , p_data => x_msg_data
297: );
298: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
299: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
300: RAISE;
301: WHEN NO_DATA_FOUND THEN
302: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
303: IF (x_msg_data IS NOT NULL) THEN

Line 302: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

298: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
299: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
300: RAISE;
301: WHEN NO_DATA_FOUND THEN
302: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
303: IF (x_msg_data IS NOT NULL) THEN
304: x_msg_data := x_msg_data||' -> BSC_KPI_GROUP_PVT.Retrieve_Kpi_Group ';
305: ELSE
306: x_msg_data := SQLERRM||' at BSC_KPI_GROUP_PVT.Retrieve_Kpi_Group ';

Line 311: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

307: END IF;
308: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
309: RAISE;
310: WHEN OTHERS THEN
311: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
312: IF (x_msg_data IS NOT NULL) THEN
313: x_msg_data := x_msg_data||' -> BSC_KPI_GROUP_PVT.Retrieve_Kpi_Group ';
314: ELSE
315: x_msg_data := SQLERRM||' at BSC_KPI_GROUP_PVT.Retrieve_Kpi_Group ';

Line 325: p_commit IN varchar2 := FND_API.G_FALSE

321: /************************************************************************************
322: ************************************************************************************/
323:
324: procedure Update_Kpi_Group(
325: p_commit IN varchar2 := FND_API.G_FALSE
326: ,p_Bsc_Kpi_Group_Rec IN BSC_KPI_GROUP_PUB.Bsc_Kpi_Group_Rec
327: ,x_return_status OUT NOCOPY varchar2
328: ,x_msg_count OUT NOCOPY number
329: ,x_msg_data OUT NOCOPY varchar2

Line 340: x_return_status := FND_API.G_RET_STS_SUCCESS;

336: l_update_TL number := 0;
337:
338: begin
339: FND_MSG_PUB.Initialize;
340: x_return_status := FND_API.G_RET_STS_SUCCESS;
341: SAVEPOINT BSCKPIUptPVT;
342: --BSC_DEBUG.PUT_LINE(' -- Begin BSC_KPI_GROUP_PVT.Update_Kpi_Group' );
343:
344: -- Check that valid Kpi group id was entered.

Line 355: RAISE FND_API.G_EXC_ERROR;

351: if l_count = 0 then
352: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_KGROUP_ID');
353: FND_MESSAGE.SET_TOKEN('BSC_KGROUP', p_Bsc_Kpi_Group_Rec.Bsc_Kpi_Group_Id);
354: FND_MSG_PUB.ADD;
355: RAISE FND_API.G_EXC_ERROR;
356: end if;
357: else
358: FND_MESSAGE.SET_NAME('BSC','BSC_NO_KGROUP_ID_ENTERED');
359: FND_MESSAGE.SET_TOKEN('BSC_KGROUP', p_Bsc_Kpi_Group_Rec.Bsc_Kpi_Group_Id);

Line 361: RAISE FND_API.G_EXC_ERROR;

357: else
358: FND_MESSAGE.SET_NAME('BSC','BSC_NO_KGROUP_ID_ENTERED');
359: FND_MESSAGE.SET_TOKEN('BSC_KGROUP', p_Bsc_Kpi_Group_Rec.Bsc_Kpi_Group_Id);
360: FND_MSG_PUB.ADD;
361: RAISE FND_API.G_EXC_ERROR;
362: end if;
363:
364: --BSC_DEBUG.PUT_LINE(' BSC_KPI_GROUP_PVT.Update_Kpi_Group - Flag 1' );
365:

Line 379: RAISE FND_API.G_EXC_ERROR;

375: if l_name_count <> 0 then
376: FND_MESSAGE.SET_NAME('BSC','BSC_KGROUP_NAME_EXISTS');
377: FND_MESSAGE.SET_TOKEN('BSC_KGROUP', p_Bsc_Kpi_Group_Rec.Bsc_Kpi_Group_Name);
378: FND_MSG_PUB.ADD;
379: RAISE FND_API.G_EXC_ERROR;
380: end if;
381:
382: --BSC_DEBUG.PUT_LINE(' BSC_KPI_GROUP_PVT.Update_Kpi_Group - Flag 3 ' );
383:

Line 396: RAISE FND_API.G_EXC_ERROR;

392: if l_count = 0 then
393: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_TAB_ID');
394: FND_MESSAGE.SET_TOKEN('BSC_TAB', p_Bsc_Kpi_Group_Rec.Bsc_Tab_Id);
395: FND_MSG_PUB.ADD;
396: RAISE FND_API.G_EXC_ERROR;
397: end if;
398: else
399: FND_MESSAGE.SET_NAME('BSC','BSC_NO_TAB_ID_ENTERED');
400: FND_MESSAGE.SET_TOKEN('BSC_KGROUP', p_Bsc_Kpi_Group_Rec.Bsc_Tab_Id);

Line 402: RAISE FND_API.G_EXC_ERROR;

398: else
399: FND_MESSAGE.SET_NAME('BSC','BSC_NO_TAB_ID_ENTERED');
400: FND_MESSAGE.SET_TOKEN('BSC_KGROUP', p_Bsc_Kpi_Group_Rec.Bsc_Tab_Id);
401: FND_MSG_PUB.ADD;
402: RAISE FND_API.G_EXC_ERROR;
403: end if;
404: end if;
405:
406: -- Not all values will be passed. We need to make sure values not passed are not

Line 512: if (p_commit = FND_API.G_TRUE) then

508: where ind_group_id = l_Bsc_Kpi_Group_Rec.Bsc_Kpi_Group_Id
509: and (tab_id = l_Bsc_Kpi_Group_Rec.Bsc_Tab_Id or tab_id = -1);
510:
511:
512: if (p_commit = FND_API.G_TRUE) then
513: commit;
514: end if;
515:
516: --BSC_DEBUG.PUT_LINE(' -- End BSC_KPI_GROUP_PVT.Update_Kpi_Group' );

Line 519: WHEN FND_API.G_EXC_ERROR THEN

515:
516: --BSC_DEBUG.PUT_LINE(' -- End BSC_KPI_GROUP_PVT.Update_Kpi_Group' );
517:
518: EXCEPTION
519: WHEN FND_API.G_EXC_ERROR THEN
520: ROLLBACK TO BSCKPIUptPVT;
521: FND_MSG_PUB.Count_And_Get
522: ( p_encoded => FND_API.G_FALSE
523: , p_count => x_msg_count

Line 522: ( p_encoded => FND_API.G_FALSE

518: EXCEPTION
519: WHEN FND_API.G_EXC_ERROR THEN
520: ROLLBACK TO BSCKPIUptPVT;
521: FND_MSG_PUB.Count_And_Get
522: ( p_encoded => FND_API.G_FALSE
523: , p_count => x_msg_count
524: , p_data => x_msg_data
525: );
526: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);

Line 526: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);

522: ( p_encoded => FND_API.G_FALSE
523: , p_count => x_msg_count
524: , p_data => x_msg_data
525: );
526: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
527: x_return_status := FND_API.G_RET_STS_ERROR;
528: RAISE;
529: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
530: ROLLBACK TO BSCKPIUptPVT;

Line 527: x_return_status := FND_API.G_RET_STS_ERROR;

523: , p_count => x_msg_count
524: , p_data => x_msg_data
525: );
526: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
527: x_return_status := FND_API.G_RET_STS_ERROR;
528: RAISE;
529: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
530: ROLLBACK TO BSCKPIUptPVT;
531: FND_MSG_PUB.Count_And_Get

Line 529: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

525: );
526: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
527: x_return_status := FND_API.G_RET_STS_ERROR;
528: RAISE;
529: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
530: ROLLBACK TO BSCKPIUptPVT;
531: FND_MSG_PUB.Count_And_Get
532: ( p_encoded => FND_API.G_FALSE
533: , p_count => x_msg_count

Line 532: ( p_encoded => FND_API.G_FALSE

528: RAISE;
529: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
530: ROLLBACK TO BSCKPIUptPVT;
531: FND_MSG_PUB.Count_And_Get
532: ( p_encoded => FND_API.G_FALSE
533: , p_count => x_msg_count
534: , p_data => x_msg_data
535: );
536: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 536: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

532: ( p_encoded => FND_API.G_FALSE
533: , p_count => x_msg_count
534: , p_data => x_msg_data
535: );
536: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
537: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
538: RAISE;
539: WHEN NO_DATA_FOUND THEN
540: ROLLBACK TO BSCKPIUptPVT;

Line 537: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);

533: , p_count => x_msg_count
534: , p_data => x_msg_data
535: );
536: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
537: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
538: RAISE;
539: WHEN NO_DATA_FOUND THEN
540: ROLLBACK TO BSCKPIUptPVT;
541: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 541: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

537: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
538: RAISE;
539: WHEN NO_DATA_FOUND THEN
540: ROLLBACK TO BSCKPIUptPVT;
541: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
542: IF (x_msg_data IS NOT NULL) THEN
543: x_msg_data := x_msg_data||' -> BSC_KPI_GROUP_PVT.Update_Kpi_Group ';
544: ELSE
545: x_msg_data := SQLERRM||' at BSC_KPI_GROUP_PVT.Update_Kpi_Group ';

Line 551: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

547: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
548: RAISE;
549: WHEN OTHERS THEN
550: ROLLBACK TO BSCKPIUptPVT;
551: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
552: IF (x_msg_data IS NOT NULL) THEN
553: x_msg_data := x_msg_data||' -> BSC_KPI_GROUP_PVT.Update_Kpi_Group ';
554: ELSE
555: x_msg_data := SQLERRM||' at BSC_KPI_GROUP_PVT.Update_Kpi_Group ';

Line 565: p_commit IN VARCHAR2 := FND_API.G_FALSE

561: /************************************************************************************
562: ************************************************************************************/
563:
564: procedure Delete_Kpi_Group(
565: p_commit IN VARCHAR2 := FND_API.G_FALSE
566: ,p_Bsc_Kpi_Group_Rec IN BSC_KPI_GROUP_PUB.Bsc_Kpi_Group_Rec
567: ,x_return_status OUT NOCOPY varchar2
568: ,x_msg_count OUT NOCOPY number
569: ,x_msg_data OUT NOCOPY varchar2

Line 577: x_return_status := FND_API.G_RET_STS_SUCCESS;

573: l_count_kpi number;
574:
575: begin
576: FND_MSG_PUB.Initialize;
577: x_return_status := FND_API.G_RET_STS_SUCCESS;
578: SAVEPOINT BSCKPIDeletePVT;
579: SAVEPOINT BSCKPIDelPVT;
580: -- Check that Group id is valid.
581: if p_Bsc_Kpi_Group_Rec.Bsc_Kpi_Group_Id is not null then

Line 591: RAISE FND_API.G_EXC_ERROR;

587: if l_count = 0 then
588: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_KGROUP_ID');
589: FND_MESSAGE.SET_TOKEN('BSC_KGROUP', p_Bsc_Kpi_Group_Rec.Bsc_Kpi_Group_Id);
590: FND_MSG_PUB.ADD;
591: RAISE FND_API.G_EXC_ERROR;
592: end if;
593: else
594: FND_MESSAGE.SET_NAME('BSC','BSC_NO_KGROUP_ID_ENTERED');
595: FND_MESSAGE.SET_TOKEN('BSC_KGROUP', p_Bsc_Kpi_Group_Rec.Bsc_Kpi_Group_Id);

Line 597: RAISE FND_API.G_EXC_ERROR;

593: else
594: FND_MESSAGE.SET_NAME('BSC','BSC_NO_KGROUP_ID_ENTERED');
595: FND_MESSAGE.SET_TOKEN('BSC_KGROUP', p_Bsc_Kpi_Group_Rec.Bsc_Kpi_Group_Id);
596: FND_MSG_PUB.ADD;
597: RAISE FND_API.G_EXC_ERROR;
598: end if;
599:
600: -- Need to determine whether deletion is global, or just from a Tab.
601:

Line 624: RAISE FND_API.G_EXC_ERROR;

620: FND_MSG_PUB.Initialize;
621: FND_MESSAGE.SET_NAME('BSC','BSC_CANNOT_DELETE_KGROUP');
622: FND_MESSAGE.SET_TOKEN('BSC_KGROUP', p_Bsc_Kpi_Group_Rec.Bsc_Kpi_Group_Name);
623: FND_MSG_PUB.ADD;
624: RAISE FND_API.G_EXC_ERROR;
625: end if;
626:
627:
628: else

Line 648: RAISE FND_API.G_EXC_ERROR;

644: FND_MSG_PUB.Initialize;
645: FND_MESSAGE.SET_NAME('BSC','BSC_CANNOT_DELETE_KGROUP');
646: FND_MESSAGE.SET_TOKEN('BSC_KGROUP', p_Bsc_Kpi_Group_Rec.Bsc_Kpi_Group_Name);
647: FND_MSG_PUB.ADD;
648: RAISE FND_API.G_EXC_ERROR;
649: end if;
650:
651: end if;
652:

Line 653: if (p_commit = FND_API.G_TRUE) then

649: end if;
650:
651: end if;
652:
653: if (p_commit = FND_API.G_TRUE) then
654: commit;
655: end if;
656:
657:

Line 659: WHEN FND_API.G_EXC_ERROR THEN

655: end if;
656:
657:
658: EXCEPTION
659: WHEN FND_API.G_EXC_ERROR THEN
660: ROLLBACK TO BSCKPIDeletePVT;
661: FND_MSG_PUB.Count_And_Get
662: ( p_encoded => FND_API.G_FALSE
663: , p_count => x_msg_count

Line 662: ( p_encoded => FND_API.G_FALSE

658: EXCEPTION
659: WHEN FND_API.G_EXC_ERROR THEN
660: ROLLBACK TO BSCKPIDeletePVT;
661: FND_MSG_PUB.Count_And_Get
662: ( p_encoded => FND_API.G_FALSE
663: , p_count => x_msg_count
664: , p_data => x_msg_data
665: );
666: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);

Line 666: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);

662: ( p_encoded => FND_API.G_FALSE
663: , p_count => x_msg_count
664: , p_data => x_msg_data
665: );
666: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
667: x_return_status := FND_API.G_RET_STS_ERROR;
668: RAISE;
669: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
670: ROLLBACK TO BSCKPIDeletePVT;

Line 667: x_return_status := FND_API.G_RET_STS_ERROR;

663: , p_count => x_msg_count
664: , p_data => x_msg_data
665: );
666: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
667: x_return_status := FND_API.G_RET_STS_ERROR;
668: RAISE;
669: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
670: ROLLBACK TO BSCKPIDeletePVT;
671: FND_MSG_PUB.Count_And_Get

Line 669: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

665: );
666: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
667: x_return_status := FND_API.G_RET_STS_ERROR;
668: RAISE;
669: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
670: ROLLBACK TO BSCKPIDeletePVT;
671: FND_MSG_PUB.Count_And_Get
672: ( p_encoded => FND_API.G_FALSE
673: , p_count => x_msg_count

Line 672: ( p_encoded => FND_API.G_FALSE

668: RAISE;
669: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
670: ROLLBACK TO BSCKPIDeletePVT;
671: FND_MSG_PUB.Count_And_Get
672: ( p_encoded => FND_API.G_FALSE
673: , p_count => x_msg_count
674: , p_data => x_msg_data
675: );
676: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 676: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

672: ( p_encoded => FND_API.G_FALSE
673: , p_count => x_msg_count
674: , p_data => x_msg_data
675: );
676: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
677: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
678: RAISE;
679: WHEN NO_DATA_FOUND THEN
680: ROLLBACK TO BSCKPIDeletePVT;

Line 677: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);

673: , p_count => x_msg_count
674: , p_data => x_msg_data
675: );
676: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
677: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
678: RAISE;
679: WHEN NO_DATA_FOUND THEN
680: ROLLBACK TO BSCKPIDeletePVT;
681: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 681: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

677: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
678: RAISE;
679: WHEN NO_DATA_FOUND THEN
680: ROLLBACK TO BSCKPIDeletePVT;
681: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
682: IF (x_msg_data IS NOT NULL) THEN
683: x_msg_data := x_msg_data||' -> BSC_KPI_GROUP_PVT.Delete_Kpi_Group ';
684: ELSE
685: x_msg_data := SQLERRM||' at BSC_KPI_GROUP_PVT.Delete_Kpi_Group ';

Line 691: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

687: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
688: RAISE;
689: WHEN OTHERS THEN
690: ROLLBACK TO BSCKPIDeletePVT;
691: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
692: IF (x_msg_data IS NOT NULL) THEN
693: x_msg_data := x_msg_data||' -> BSC_KPI_GROUP_PVT.Delete_Kpi_Group ';
694: ELSE
695: x_msg_data := SQLERRM||' at BSC_KPI_GROUP_PVT.Delete_Kpi_Group ';