DBA Data[Home] [Help]

APPS.BSC_DIMENSION_SETS_PUB dependencies on FND_API

Line 98: p_commit IN varchar2 := FND_API.G_FALSE

94: --: point for the Dimension Sets API.
95: --: This procedure is part of the Dimension Set API.
96:
97: procedure Create_Dim_Group_In_Dset(
98: p_commit IN varchar2 := FND_API.G_FALSE
99: ,p_Dim_Set_Rec IN BSC_DIMENSION_SETS_PUB.Bsc_Dim_Set_Rec_Type
100: ,p_create_Dim_Lev_Grp IN BOOLEAN
101: ,x_return_status OUT NOCOPY varchar2
102: ,x_msg_count OUT NOCOPY number

Line 109: x_return_status := FND_API.G_RET_STS_SUCCESS;

105:
106: l_Dim_Set_Rec BSC_DIMENSION_SETS_PUB.Bsc_Dim_Set_Rec_Type;
107: l_count NUMBER := 0;
108: begin
109: x_return_status := FND_API.G_RET_STS_SUCCESS;
110: --Assign the passed record to the local record.
111: l_Dim_Set_Rec := p_Dim_Set_Rec;
112:
113: --Assign certain default values if they are currently null.

Line 158: RAISE FND_API.G_EXC_ERROR;

154: GROUP BY SYS_DIM_LEL.Dim_Level_Id);
155: IF (l_count > 1) THEN
156: FND_MESSAGE.SET_NAME('BSC','BSC_KPI_COMMON_DIM_OBJS');
157: FND_MSG_PUB.ADD;
158: RAISE FND_API.G_EXC_ERROR;
159: END IF;
160: END IF;
161:
162: -- The following calls call procedures that populate metadata for Dimension

Line 170: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

166: ,l_Dim_Set_Rec
167: ,x_return_status
168: ,x_msg_count
169: ,x_msg_data);
170: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
171: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
172: END IF;
173:
174: -- PAJOHRI added if condition.

Line 171: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

167: ,x_return_status
168: ,x_msg_count
169: ,x_msg_data);
170: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
171: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
172: END IF;
173:
174: -- PAJOHRI added if condition.
175: -- if group_id is null, than don't insert into BSC_KPI_DIM_GROUPS, as there

Line 183: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

179: ,l_Dim_Set_Rec
180: ,x_return_status
181: ,x_msg_count
182: ,x_msg_data);
183: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
184: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
185: END IF;
186:
187: END IF;

Line 184: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

180: ,x_return_status
181: ,x_msg_count
182: ,x_msg_data);
183: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
184: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
185: END IF;
186:
187: END IF;
188: Create_Dim_Levels( p_commit

Line 193: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

189: ,l_Dim_Set_Rec
190: ,x_return_status
191: ,x_msg_count
192: ,x_msg_data);
193: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
194: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
195: END IF;
196: Update_Kpi_Analysis_Options_B( p_commit
197: ,l_Dim_Set_Rec

Line 194: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

190: ,x_return_status
191: ,x_msg_count
192: ,x_msg_data);
193: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
194: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
195: END IF;
196: Update_Kpi_Analysis_Options_B( p_commit
197: ,l_Dim_Set_Rec
198: ,x_return_status

Line 201: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

197: ,l_Dim_Set_Rec
198: ,x_return_status
199: ,x_msg_count
200: ,x_msg_data);
201: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
202: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
203: END IF;
204:
205: END IF;

Line 202: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

198: ,x_return_status
199: ,x_msg_count
200: ,x_msg_data);
201: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
202: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
203: END IF;
204:
205: END IF;
206: EXCEPTION

Line 207: WHEN FND_API.G_EXC_ERROR THEN

203: END IF;
204:
205: END IF;
206: EXCEPTION
207: WHEN FND_API.G_EXC_ERROR THEN
208: IF (x_msg_data IS NULL) THEN
209: FND_MSG_PUB.Count_And_Get
210: ( p_encoded => FND_API.G_FALSE
211: , p_count => x_msg_count

Line 210: ( p_encoded => FND_API.G_FALSE

206: EXCEPTION
207: WHEN FND_API.G_EXC_ERROR THEN
208: IF (x_msg_data IS NULL) THEN
209: FND_MSG_PUB.Count_And_Get
210: ( p_encoded => FND_API.G_FALSE
211: , p_count => x_msg_count
212: , p_data => x_msg_data
213: );
214: END IF;

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

211: , p_count => x_msg_count
212: , p_data => x_msg_data
213: );
214: END IF;
215: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
216: x_return_status := FND_API.G_RET_STS_ERROR;
217: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
218: IF (x_msg_data IS NULL) THEN
219: FND_MSG_PUB.Count_And_Get

Line 216: x_return_status := FND_API.G_RET_STS_ERROR;

212: , p_data => x_msg_data
213: );
214: END IF;
215: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
216: x_return_status := FND_API.G_RET_STS_ERROR;
217: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
218: IF (x_msg_data IS NULL) THEN
219: FND_MSG_PUB.Count_And_Get
220: ( p_encoded => FND_API.G_FALSE

Line 217: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

213: );
214: END IF;
215: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
216: x_return_status := FND_API.G_RET_STS_ERROR;
217: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
218: IF (x_msg_data IS NULL) THEN
219: FND_MSG_PUB.Count_And_Get
220: ( p_encoded => FND_API.G_FALSE
221: , p_count => x_msg_count

Line 220: ( p_encoded => FND_API.G_FALSE

216: x_return_status := FND_API.G_RET_STS_ERROR;
217: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
218: IF (x_msg_data IS NULL) THEN
219: FND_MSG_PUB.Count_And_Get
220: ( p_encoded => FND_API.G_FALSE
221: , p_count => x_msg_count
222: , p_data => x_msg_data
223: );
224: END IF;

Line 225: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

221: , p_count => x_msg_count
222: , p_data => x_msg_data
223: );
224: END IF;
225: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
226: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
227: WHEN NO_DATA_FOUND THEN
228: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
229: IF (x_msg_data IS NOT NULL) THEN

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

222: , p_data => x_msg_data
223: );
224: END IF;
225: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
226: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
227: WHEN NO_DATA_FOUND THEN
228: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
229: IF (x_msg_data IS NOT NULL) THEN
230: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Create_Dim_Group_In_Dset ';

Line 228: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

224: END IF;
225: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
226: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
227: WHEN NO_DATA_FOUND THEN
228: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
229: IF (x_msg_data IS NOT NULL) THEN
230: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Create_Dim_Group_In_Dset ';
231: ELSE
232: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Create_Dim_Group_In_Dset ';

Line 236: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

232: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Create_Dim_Group_In_Dset ';
233: END IF;
234: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
235: WHEN OTHERS THEN
236: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
237: IF (x_msg_data IS NOT NULL) THEN
238: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Create_Dim_Group_In_Dset ';
239: ELSE
240: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Create_Dim_Group_In_Dset ';

Line 246: p_commit IN varchar2 := FND_API.G_FALSE

242: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
243: end Create_Dim_Group_In_Dset;
244:
245: procedure Create_Dim_Group_In_Dset(
246: p_commit IN varchar2 := FND_API.G_FALSE
247: ,p_Dim_Set_Rec IN BSC_DIMENSION_SETS_PUB.Bsc_Dim_Set_Rec_Type
248: ,x_return_status OUT NOCOPY varchar2
249: ,x_msg_count OUT NOCOPY number
250: ,x_msg_data OUT NOCOPY varchar2

Line 256: x_return_status := FND_API.G_RET_STS_SUCCESS;

252:
253: l_Dim_Set_Rec BSC_DIMENSION_SETS_PUB.Bsc_Dim_Set_Rec_Type;
254:
255: begin
256: x_return_status := FND_API.G_RET_STS_SUCCESS;
257: Create_Dim_Group_In_Dset(
258: p_commit => p_commit
259: ,p_Dim_Set_Rec => p_Dim_Set_Rec
260: ,p_create_Dim_Lev_Grp => TRUE

Line 265: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

261: ,x_return_status => x_return_status
262: ,x_msg_count => x_msg_count
263: ,x_msg_data => x_msg_data
264: );
265: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
266: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
267: END IF;
268: EXCEPTION
269: WHEN FND_API.G_EXC_ERROR THEN

Line 266: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

262: ,x_msg_count => x_msg_count
263: ,x_msg_data => x_msg_data
264: );
265: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
266: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
267: END IF;
268: EXCEPTION
269: WHEN FND_API.G_EXC_ERROR THEN
270: IF (x_msg_data IS NULL) THEN

Line 269: WHEN FND_API.G_EXC_ERROR THEN

265: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
266: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
267: END IF;
268: EXCEPTION
269: WHEN FND_API.G_EXC_ERROR THEN
270: IF (x_msg_data IS NULL) THEN
271: FND_MSG_PUB.Count_And_Get
272: ( p_encoded => FND_API.G_FALSE
273: , p_count => x_msg_count

Line 272: ( p_encoded => FND_API.G_FALSE

268: EXCEPTION
269: WHEN FND_API.G_EXC_ERROR THEN
270: IF (x_msg_data IS NULL) THEN
271: FND_MSG_PUB.Count_And_Get
272: ( p_encoded => FND_API.G_FALSE
273: , p_count => x_msg_count
274: , p_data => x_msg_data
275: );
276: END IF;

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

273: , p_count => x_msg_count
274: , p_data => x_msg_data
275: );
276: END IF;
277: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
278: x_return_status := FND_API.G_RET_STS_ERROR;
279: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
280: IF (x_msg_data IS NULL) THEN
281: FND_MSG_PUB.Count_And_Get

Line 278: x_return_status := FND_API.G_RET_STS_ERROR;

274: , p_data => x_msg_data
275: );
276: END IF;
277: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
278: x_return_status := FND_API.G_RET_STS_ERROR;
279: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
280: IF (x_msg_data IS NULL) THEN
281: FND_MSG_PUB.Count_And_Get
282: ( p_encoded => FND_API.G_FALSE

Line 279: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

275: );
276: END IF;
277: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
278: x_return_status := FND_API.G_RET_STS_ERROR;
279: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
280: IF (x_msg_data IS NULL) THEN
281: FND_MSG_PUB.Count_And_Get
282: ( p_encoded => FND_API.G_FALSE
283: , p_count => x_msg_count

Line 282: ( p_encoded => FND_API.G_FALSE

278: x_return_status := FND_API.G_RET_STS_ERROR;
279: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
280: IF (x_msg_data IS NULL) THEN
281: FND_MSG_PUB.Count_And_Get
282: ( p_encoded => FND_API.G_FALSE
283: , p_count => x_msg_count
284: , p_data => x_msg_data
285: );
286: END IF;

Line 287: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

283: , p_count => x_msg_count
284: , p_data => x_msg_data
285: );
286: END IF;
287: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
288: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
289: WHEN NO_DATA_FOUND THEN
290: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
291: IF (x_msg_data IS NOT NULL) THEN

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

284: , p_data => x_msg_data
285: );
286: END IF;
287: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
288: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
289: WHEN NO_DATA_FOUND THEN
290: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
291: IF (x_msg_data IS NOT NULL) THEN
292: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Create_Dim_Group_In_Dset ';

Line 290: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

286: END IF;
287: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
288: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
289: WHEN NO_DATA_FOUND THEN
290: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
291: IF (x_msg_data IS NOT NULL) THEN
292: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Create_Dim_Group_In_Dset ';
293: ELSE
294: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Create_Dim_Group_In_Dset ';

Line 298: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

294: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Create_Dim_Group_In_Dset ';
295: END IF;
296: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
297: WHEN OTHERS THEN
298: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
299: IF (x_msg_data IS NOT NULL) THEN
300: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Create_Dim_Group_In_Dset ';
301: ELSE
302: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Create_Dim_Group_In_Dset ';

Line 311: p_commit IN varchar2 := FND_API.G_FALSE

307: /************************************************************************************
308: ************************************************************************************/
309:
310: procedure Retrieve_Dim_Group_In_Dset(
311: p_commit IN varchar2 := FND_API.G_FALSE
312: ,p_Dim_Set_Rec IN BSC_DIMENSION_SETS_PUB.Bsc_Dim_Set_Rec_Type
313: ,x_Dim_Set_Rec IN OUT NOCOPY BSC_DIMENSION_SETS_PUB.Bsc_Dim_Set_Rec_Type
314: ,x_return_status OUT NOCOPY varchar2
315: ,x_msg_count OUT NOCOPY number

Line 320: x_return_status := FND_API.G_RET_STS_SUCCESS;

316: ,x_msg_data OUT NOCOPY varchar2
317: ) is
318:
319: begin
320: x_return_status := FND_API.G_RET_STS_SUCCESS;
321: BSC_DIMENSION_SETS_PVT.Retrieve_Dim_Group_In_Dset( p_commit
322: ,p_Dim_Set_Rec
323: ,x_Dim_Set_Rec
324: ,x_return_status

Line 334: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

330: ,x_Dim_Set_Rec
331: ,x_return_status
332: ,x_msg_count
333: ,x_msg_data);
334: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
335: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
336: END IF;
337: Retrieve_Dim_Level_Properties( p_commit
338: ,p_Dim_Set_Rec

Line 335: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

331: ,x_return_status
332: ,x_msg_count
333: ,x_msg_data);
334: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
335: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
336: END IF;
337: Retrieve_Dim_Level_Properties( p_commit
338: ,p_Dim_Set_Rec
339: ,x_Dim_Set_Rec

Line 343: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

339: ,x_Dim_Set_Rec
340: ,x_return_status
341: ,x_msg_count
342: ,x_msg_data);
343: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
344: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
345: END IF;
346: Retrieve_Dim_Levels( p_commit
347: ,p_Dim_Set_Rec

Line 344: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

340: ,x_return_status
341: ,x_msg_count
342: ,x_msg_data);
343: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
344: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
345: END IF;
346: Retrieve_Dim_Levels( p_commit
347: ,p_Dim_Set_Rec
348: ,x_Dim_Set_Rec

Line 352: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

348: ,x_Dim_Set_Rec
349: ,x_return_status
350: ,x_msg_count
351: ,x_msg_data);
352: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
353: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
354: END IF;
355: EXCEPTION
356: WHEN FND_API.G_EXC_ERROR THEN

Line 353: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

349: ,x_return_status
350: ,x_msg_count
351: ,x_msg_data);
352: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
353: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
354: END IF;
355: EXCEPTION
356: WHEN FND_API.G_EXC_ERROR THEN
357: IF (x_msg_data IS NULL) THEN

Line 356: WHEN FND_API.G_EXC_ERROR THEN

352: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
353: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
354: END IF;
355: EXCEPTION
356: WHEN FND_API.G_EXC_ERROR THEN
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

Line 359: ( p_encoded => FND_API.G_FALSE

355: EXCEPTION
356: WHEN FND_API.G_EXC_ERROR THEN
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: );
363: END IF;

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

360: , p_count => x_msg_count
361: , p_data => x_msg_data
362: );
363: END IF;
364: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
365: x_return_status := FND_API.G_RET_STS_ERROR;
366: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
367: IF (x_msg_data IS NULL) THEN
368: FND_MSG_PUB.Count_And_Get

Line 365: x_return_status := FND_API.G_RET_STS_ERROR;

361: , p_data => x_msg_data
362: );
363: END IF;
364: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
365: x_return_status := FND_API.G_RET_STS_ERROR;
366: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
367: IF (x_msg_data IS NULL) THEN
368: FND_MSG_PUB.Count_And_Get
369: ( p_encoded => FND_API.G_FALSE

Line 366: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

362: );
363: END IF;
364: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
365: x_return_status := FND_API.G_RET_STS_ERROR;
366: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
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

Line 369: ( p_encoded => FND_API.G_FALSE

365: x_return_status := FND_API.G_RET_STS_ERROR;
366: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
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: );
373: END IF;

Line 374: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

370: , p_count => x_msg_count
371: , p_data => x_msg_data
372: );
373: END IF;
374: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
375: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
376: WHEN NO_DATA_FOUND THEN
377: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
378: IF (x_msg_data IS NOT NULL) THEN

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

371: , p_data => x_msg_data
372: );
373: END IF;
374: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
375: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
376: WHEN NO_DATA_FOUND THEN
377: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
378: IF (x_msg_data IS NOT NULL) THEN
379: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Retrieve_Dim_Group_In_Dset ';

Line 377: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

373: END IF;
374: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
375: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
376: WHEN NO_DATA_FOUND THEN
377: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
378: IF (x_msg_data IS NOT NULL) THEN
379: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Retrieve_Dim_Group_In_Dset ';
380: ELSE
381: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Retrieve_Dim_Group_In_Dset ';

Line 385: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

381: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Retrieve_Dim_Group_In_Dset ';
382: END IF;
383: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
384: WHEN OTHERS THEN
385: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
386: IF (x_msg_data IS NOT NULL) THEN
387: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Retrieve_Dim_Group_In_Dset ';
388: ELSE
389: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Retrieve_Dim_Group_In_Dset ';

Line 398: p_commit IN varchar2 := FND_API.G_FALSE

394: /************************************************************************************
395: ************************************************************************************/
396:
397: procedure Update_Dim_Group_In_Dset(
398: p_commit IN varchar2 := FND_API.G_FALSE
399: ,p_Dim_Set_Rec IN BSC_DIMENSION_SETS_PUB.Bsc_Dim_Set_Rec_Type
400: ,p_create_Dim_Lev_Grp IN BOOLEAN
401: ,x_return_status OUT NOCOPY varchar2
402: ,x_msg_count OUT NOCOPY number

Line 407: x_return_status := FND_API.G_RET_STS_SUCCESS;

403: ,x_msg_data OUT NOCOPY varchar2
404: ) is
405: l_count NUMBER := 0;
406: begin
407: x_return_status := FND_API.G_RET_STS_SUCCESS;
408: BSC_DIMENSION_SETS_PVT.Update_Dim_Group_In_Dset( p_commit
409: ,p_Dim_Set_Rec
410: ,x_return_status
411: ,x_msg_count

Line 426: RAISE FND_API.G_EXC_ERROR;

422: GROUP BY SYS_DIM_LEL.Dim_Level_Id);
423: IF (l_count > 1) THEN
424: FND_MESSAGE.SET_NAME('BSC','BSC_KPI_COMMON_DIM_OBJS');
425: FND_MSG_PUB.ADD;
426: RAISE FND_API.G_EXC_ERROR;
427: END IF;
428: IF (p_create_Dim_Lev_Grp) THEN
429: Update_Bsc_Kpi_Dim_Sets_Tl( p_commit
430: ,p_Dim_Set_Rec

Line 434: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

430: ,p_Dim_Set_Rec
431: ,x_return_status
432: ,x_msg_count
433: ,x_msg_data);
434: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
435: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
436: END IF;
437: Update_Dim_Level_Properties( p_commit
438: ,p_Dim_Set_Rec

Line 435: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

431: ,x_return_status
432: ,x_msg_count
433: ,x_msg_data);
434: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
435: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
436: END IF;
437: Update_Dim_Level_Properties( p_commit
438: ,p_Dim_Set_Rec
439: ,x_return_status

Line 442: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

438: ,p_Dim_Set_Rec
439: ,x_return_status
440: ,x_msg_count
441: ,x_msg_data);
442: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
443: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
444: END IF;
445: Update_Dim_Levels( p_commit
446: ,p_Dim_Set_Rec

Line 443: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

439: ,x_return_status
440: ,x_msg_count
441: ,x_msg_data);
442: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
443: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
444: END IF;
445: Update_Dim_Levels( p_commit
446: ,p_Dim_Set_Rec
447: ,x_return_status

Line 450: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

446: ,p_Dim_Set_Rec
447: ,x_return_status
448: ,x_msg_count
449: ,x_msg_data);
450: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
451: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
452: END IF;
453: END IF;
454: EXCEPTION

Line 451: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

447: ,x_return_status
448: ,x_msg_count
449: ,x_msg_data);
450: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
451: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
452: END IF;
453: END IF;
454: EXCEPTION
455: WHEN FND_API.G_EXC_ERROR THEN

Line 455: WHEN FND_API.G_EXC_ERROR THEN

451: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
452: END IF;
453: END IF;
454: EXCEPTION
455: WHEN FND_API.G_EXC_ERROR THEN
456: IF (x_msg_data IS NULL) THEN
457: FND_MSG_PUB.Count_And_Get
458: ( p_encoded => FND_API.G_FALSE
459: , p_count => x_msg_count

Line 458: ( p_encoded => FND_API.G_FALSE

454: EXCEPTION
455: WHEN FND_API.G_EXC_ERROR THEN
456: IF (x_msg_data IS NULL) THEN
457: FND_MSG_PUB.Count_And_Get
458: ( p_encoded => FND_API.G_FALSE
459: , p_count => x_msg_count
460: , p_data => x_msg_data
461: );
462: END IF;

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

459: , p_count => x_msg_count
460: , p_data => x_msg_data
461: );
462: END IF;
463: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
464: x_return_status := FND_API.G_RET_STS_ERROR;
465: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
466: IF (x_msg_data IS NULL) THEN
467: FND_MSG_PUB.Count_And_Get

Line 464: x_return_status := FND_API.G_RET_STS_ERROR;

460: , p_data => x_msg_data
461: );
462: END IF;
463: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
464: x_return_status := FND_API.G_RET_STS_ERROR;
465: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
466: IF (x_msg_data IS NULL) THEN
467: FND_MSG_PUB.Count_And_Get
468: ( p_encoded => FND_API.G_FALSE

Line 465: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

461: );
462: END IF;
463: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
464: x_return_status := FND_API.G_RET_STS_ERROR;
465: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
466: IF (x_msg_data IS NULL) THEN
467: FND_MSG_PUB.Count_And_Get
468: ( p_encoded => FND_API.G_FALSE
469: , p_count => x_msg_count

Line 468: ( p_encoded => FND_API.G_FALSE

464: x_return_status := FND_API.G_RET_STS_ERROR;
465: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
466: IF (x_msg_data IS NULL) THEN
467: FND_MSG_PUB.Count_And_Get
468: ( p_encoded => FND_API.G_FALSE
469: , p_count => x_msg_count
470: , p_data => x_msg_data
471: );
472: END IF;

Line 473: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

469: , p_count => x_msg_count
470: , p_data => x_msg_data
471: );
472: END IF;
473: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
474: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
475: WHEN NO_DATA_FOUND THEN
476: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
477: IF (x_msg_data IS NOT NULL) THEN

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

470: , p_data => x_msg_data
471: );
472: END IF;
473: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
474: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
475: WHEN NO_DATA_FOUND THEN
476: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
477: IF (x_msg_data IS NOT NULL) THEN
478: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Update_Dim_Group_In_Dset ';

Line 476: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

472: END IF;
473: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
474: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
475: WHEN NO_DATA_FOUND THEN
476: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
477: IF (x_msg_data IS NOT NULL) THEN
478: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Update_Dim_Group_In_Dset ';
479: ELSE
480: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Update_Dim_Group_In_Dset ';

Line 484: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

480: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Update_Dim_Group_In_Dset ';
481: END IF;
482: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
483: WHEN OTHERS THEN
484: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
485: IF (x_msg_data IS NOT NULL) THEN
486: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Update_Dim_Group_In_Dset ';
487: ELSE
488: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Update_Dim_Group_In_Dset ';

Line 494: p_commit IN varchar2 := FND_API.G_FALSE

490: --DBMS_OUTPUT.PUT_LINE('EXCEPTION OTHERS '||x_msg_data);
491: end Update_Dim_Group_In_Dset;
492:
493: procedure Update_Dim_Group_In_Dset(
494: p_commit IN varchar2 := FND_API.G_FALSE
495: ,p_Dim_Set_Rec IN BSC_DIMENSION_SETS_PUB.Bsc_Dim_Set_Rec_Type
496: ,x_return_status OUT NOCOPY varchar2
497: ,x_msg_count OUT NOCOPY number
498: ,x_msg_data OUT NOCOPY varchar2

Line 502: x_return_status := FND_API.G_RET_STS_SUCCESS;

498: ,x_msg_data OUT NOCOPY varchar2
499: ) is
500:
501: begin
502: x_return_status := FND_API.G_RET_STS_SUCCESS;
503: Update_Dim_Group_In_Dset(
504: p_commit => p_commit
505: ,p_Dim_Set_Rec => p_Dim_Set_Rec
506: ,p_create_Dim_Lev_Grp => TRUE

Line 511: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

507: ,x_return_status => x_return_status
508: ,x_msg_count => x_msg_count
509: ,x_msg_data => x_msg_data
510: );
511: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
512: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
513: END IF;
514: EXCEPTION
515: WHEN FND_API.G_EXC_ERROR THEN

Line 512: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

508: ,x_msg_count => x_msg_count
509: ,x_msg_data => x_msg_data
510: );
511: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
512: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
513: END IF;
514: EXCEPTION
515: WHEN FND_API.G_EXC_ERROR THEN
516: IF (x_msg_data IS NULL) THEN

Line 515: WHEN FND_API.G_EXC_ERROR THEN

511: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
512: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
513: END IF;
514: EXCEPTION
515: WHEN FND_API.G_EXC_ERROR THEN
516: IF (x_msg_data IS NULL) THEN
517: FND_MSG_PUB.Count_And_Get
518: ( p_encoded => FND_API.G_FALSE
519: , p_count => x_msg_count

Line 518: ( p_encoded => FND_API.G_FALSE

514: EXCEPTION
515: WHEN FND_API.G_EXC_ERROR THEN
516: IF (x_msg_data IS NULL) THEN
517: FND_MSG_PUB.Count_And_Get
518: ( p_encoded => FND_API.G_FALSE
519: , p_count => x_msg_count
520: , p_data => x_msg_data
521: );
522: END IF;

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

519: , p_count => x_msg_count
520: , p_data => x_msg_data
521: );
522: END IF;
523: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
524: x_return_status := FND_API.G_RET_STS_ERROR;
525: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
526: IF (x_msg_data IS NULL) THEN
527: FND_MSG_PUB.Count_And_Get

Line 524: x_return_status := FND_API.G_RET_STS_ERROR;

520: , p_data => x_msg_data
521: );
522: END IF;
523: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
524: x_return_status := FND_API.G_RET_STS_ERROR;
525: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
526: IF (x_msg_data IS NULL) THEN
527: FND_MSG_PUB.Count_And_Get
528: ( p_encoded => FND_API.G_FALSE

Line 525: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

521: );
522: END IF;
523: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
524: x_return_status := FND_API.G_RET_STS_ERROR;
525: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
526: IF (x_msg_data IS NULL) THEN
527: FND_MSG_PUB.Count_And_Get
528: ( p_encoded => FND_API.G_FALSE
529: , p_count => x_msg_count

Line 528: ( p_encoded => FND_API.G_FALSE

524: x_return_status := FND_API.G_RET_STS_ERROR;
525: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
526: IF (x_msg_data IS NULL) THEN
527: FND_MSG_PUB.Count_And_Get
528: ( p_encoded => FND_API.G_FALSE
529: , p_count => x_msg_count
530: , p_data => x_msg_data
531: );
532: END IF;

Line 533: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

529: , p_count => x_msg_count
530: , p_data => x_msg_data
531: );
532: END IF;
533: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
534: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
535: WHEN NO_DATA_FOUND THEN
536: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
537: IF (x_msg_data IS NOT NULL) THEN

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

530: , p_data => x_msg_data
531: );
532: END IF;
533: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
534: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
535: WHEN NO_DATA_FOUND THEN
536: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
537: IF (x_msg_data IS NOT NULL) THEN
538: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Update_Dim_Group_In_Dset ';

Line 536: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

532: END IF;
533: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
534: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
535: WHEN NO_DATA_FOUND THEN
536: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
537: IF (x_msg_data IS NOT NULL) THEN
538: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Update_Dim_Group_In_Dset ';
539: ELSE
540: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Update_Dim_Group_In_Dset ';

Line 544: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

540: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Update_Dim_Group_In_Dset ';
541: END IF;
542: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
543: WHEN OTHERS THEN
544: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
545: IF (x_msg_data IS NOT NULL) THEN
546: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Update_Dim_Group_In_Dset ';
547: ELSE
548: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Update_Dim_Group_In_Dset ';

Line 562: p_commit IN varchar2 := FND_API.G_FALSE

558: --: set irrespective of dimension.
559:
560: procedure Delete_Dim_Group_In_Dset
561: (
562: p_commit IN varchar2 := FND_API.G_FALSE
563: , p_Dim_Set_Rec IN BSC_DIMENSION_SETS_PUB.Bsc_Dim_Set_Rec_Type
564: , p_create_Dim_Lev_Grp IN BOOLEAN
565: , x_return_status OUT NOCOPY varchar2
566: , x_msg_count OUT NOCOPY number

Line 585: x_return_status := FND_API.G_RET_STS_SUCCESS;

581: FROM BSC_SYS_DIM_LEVELS_BY_GROUP
582: WHERE dim_group_id = l_group_id;
583: begin
584: -- Assign all passed values to local record.
585: x_return_status := FND_API.G_RET_STS_SUCCESS;
586: l_Dim_Set_Rec := p_Dim_Set_Rec;
587: -- PAJOHRI added if condition.
588: -- if group_id is null, than don't delete from BSC_KPI_DIM_GROUPS
589: IF (l_Dim_Set_Rec.Bsc_Dim_Level_Group_Id IS NULL) THEN

Line 608: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

604: ,l_Dim_Set_Rec
605: ,x_return_status
606: ,x_msg_count
607: ,x_msg_data);
608: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
609: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
610: END IF;
611: Delete_Dim_Levels( p_commit --BSC_KPI_DIM_LEVELS_B
612: ,l_Dim_Set_Rec

Line 609: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

605: ,x_return_status
606: ,x_msg_count
607: ,x_msg_data);
608: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
609: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
610: END IF;
611: Delete_Dim_Levels( p_commit --BSC_KPI_DIM_LEVELS_B
612: ,l_Dim_Set_Rec
613: ,x_return_status

Line 616: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

612: ,l_Dim_Set_Rec
613: ,x_return_status
614: ,x_msg_count
615: ,x_msg_data);
616: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
617: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
618: END IF;
619: END LOOP;
620: END LOOP;

Line 617: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

613: ,x_return_status
614: ,x_msg_count
615: ,x_msg_data);
616: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
617: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
618: END IF;
619: END LOOP;
620: END LOOP;
621: ELSE

Line 636: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

632: ,l_Dim_Set_Rec
633: ,x_return_status
634: ,x_msg_count
635: ,x_msg_data);
636: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
637: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
638: END IF;
639: Delete_Dim_Levels( p_commit --BSC_KPI_DIM_LEVELS_B
640: ,l_Dim_Set_Rec

Line 637: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

633: ,x_return_status
634: ,x_msg_count
635: ,x_msg_data);
636: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
637: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
638: END IF;
639: Delete_Dim_Levels( p_commit --BSC_KPI_DIM_LEVELS_B
640: ,l_Dim_Set_Rec
641: ,x_return_status

Line 644: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

640: ,l_Dim_Set_Rec
641: ,x_return_status
642: ,x_msg_count
643: ,x_msg_data);
644: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
645: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
646: END IF;
647: END LOOP;
648: END IF;

Line 645: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

641: ,x_return_status
642: ,x_msg_count
643: ,x_msg_data);
644: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
645: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
646: END IF;
647: END LOOP;
648: END IF;
649: IF (p_create_Dim_Lev_Grp) THEN

Line 658: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

654: ,l_Dim_Set_Rec
655: ,x_return_status
656: ,x_msg_count
657: ,x_msg_data);
658: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
659: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
660: END IF;
661: -- Call this procedure last. This procedure will delete the entire dimension set.
662: Delete_Bsc_Kpi_Dim_Sets_Tl( p_commit -- delete from BSC_KPI_DIM_SETS_TL

Line 659: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

655: ,x_return_status
656: ,x_msg_count
657: ,x_msg_data);
658: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
659: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
660: END IF;
661: -- Call this procedure last. This procedure will delete the entire dimension set.
662: Delete_Bsc_Kpi_Dim_Sets_Tl( p_commit -- delete from BSC_KPI_DIM_SETS_TL
663: ,l_Dim_Set_Rec

Line 667: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

663: ,l_Dim_Set_Rec
664: ,x_return_status
665: ,x_msg_count
666: ,x_msg_data);
667: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
668: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
669: END IF;
670: l_Dim_Set_Rec.Bsc_Dim_Level_Group_Id := NULL;
671: l_Dim_Set_Rec.Bsc_Level_Id := NULL;

Line 668: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

664: ,x_return_status
665: ,x_msg_count
666: ,x_msg_data);
667: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
668: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
669: END IF;
670: l_Dim_Set_Rec.Bsc_Dim_Level_Group_Id := NULL;
671: l_Dim_Set_Rec.Bsc_Level_Id := NULL;
672: Delete_Dim_Levels( p_commit

Line 677: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

673: ,l_Dim_Set_Rec
674: ,x_return_status
675: ,x_msg_count
676: ,x_msg_data);
677: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
678: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
679: END IF;
680: END IF;
681: EXCEPTION

Line 678: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

674: ,x_return_status
675: ,x_msg_count
676: ,x_msg_data);
677: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
678: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
679: END IF;
680: END IF;
681: EXCEPTION
682: WHEN FND_API.G_EXC_ERROR THEN

Line 682: WHEN FND_API.G_EXC_ERROR THEN

678: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
679: END IF;
680: END IF;
681: EXCEPTION
682: WHEN FND_API.G_EXC_ERROR THEN
683: IF (x_msg_data IS NULL) THEN
684: FND_MSG_PUB.Count_And_Get
685: ( p_encoded => FND_API.G_FALSE
686: , p_count => x_msg_count

Line 685: ( p_encoded => FND_API.G_FALSE

681: EXCEPTION
682: WHEN FND_API.G_EXC_ERROR THEN
683: IF (x_msg_data IS NULL) THEN
684: FND_MSG_PUB.Count_And_Get
685: ( p_encoded => FND_API.G_FALSE
686: , p_count => x_msg_count
687: , p_data => x_msg_data
688: );
689: END IF;

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

686: , p_count => x_msg_count
687: , p_data => x_msg_data
688: );
689: END IF;
690: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
691: x_return_status := FND_API.G_RET_STS_ERROR;
692: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
693: IF (x_msg_data IS NULL) THEN
694: FND_MSG_PUB.Count_And_Get

Line 691: x_return_status := FND_API.G_RET_STS_ERROR;

687: , p_data => x_msg_data
688: );
689: END IF;
690: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
691: x_return_status := FND_API.G_RET_STS_ERROR;
692: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
693: IF (x_msg_data IS NULL) THEN
694: FND_MSG_PUB.Count_And_Get
695: ( p_encoded => FND_API.G_FALSE

Line 692: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

688: );
689: END IF;
690: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
691: x_return_status := FND_API.G_RET_STS_ERROR;
692: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
693: IF (x_msg_data IS NULL) THEN
694: FND_MSG_PUB.Count_And_Get
695: ( p_encoded => FND_API.G_FALSE
696: , p_count => x_msg_count

Line 695: ( p_encoded => FND_API.G_FALSE

691: x_return_status := FND_API.G_RET_STS_ERROR;
692: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
693: IF (x_msg_data IS NULL) THEN
694: FND_MSG_PUB.Count_And_Get
695: ( p_encoded => FND_API.G_FALSE
696: , p_count => x_msg_count
697: , p_data => x_msg_data
698: );
699: END IF;

Line 700: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

696: , p_count => x_msg_count
697: , p_data => x_msg_data
698: );
699: END IF;
700: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
701: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
702: WHEN NO_DATA_FOUND THEN
703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
704: IF (x_msg_data IS NOT NULL) THEN

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

697: , p_data => x_msg_data
698: );
699: END IF;
700: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
701: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
702: WHEN NO_DATA_FOUND THEN
703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
704: IF (x_msg_data IS NOT NULL) THEN
705: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Delete_Dim_Group_In_Dset ';

Line 703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

699: END IF;
700: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
701: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
702: WHEN NO_DATA_FOUND THEN
703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
704: IF (x_msg_data IS NOT NULL) THEN
705: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Delete_Dim_Group_In_Dset ';
706: ELSE
707: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Delete_Dim_Group_In_Dset ';

Line 711: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

707: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Delete_Dim_Group_In_Dset ';
708: END IF;
709: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
710: WHEN OTHERS THEN
711: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
712: IF (x_msg_data IS NOT NULL) THEN
713: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Delete_Dim_Group_In_Dset ';
714: ELSE
715: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Delete_Dim_Group_In_Dset ';

Line 722: p_commit IN varchar2 := FND_API.G_FALSE

718: end Delete_Dim_Group_In_Dset;
719:
720:
721: procedure Delete_Dim_Group_In_Dset(
722: p_commit IN varchar2 := FND_API.G_FALSE
723: ,p_Dim_Set_Rec IN BSC_DIMENSION_SETS_PUB.Bsc_Dim_Set_Rec_Type
724: ,x_return_status OUT NOCOPY varchar2
725: ,x_msg_count OUT NOCOPY number
726: ,x_msg_data OUT NOCOPY varchar2

Line 732: x_return_status := FND_API.G_RET_STS_SUCCESS;

728:
729: l_Dim_Set_Rec BSC_DIMENSION_SETS_PUB.Bsc_Dim_Set_Rec_Type;
730:
731: begin
732: x_return_status := FND_API.G_RET_STS_SUCCESS;
733: Delete_Dim_Group_In_Dset(
734: p_commit => p_commit
735: ,p_Dim_Set_Rec => p_Dim_Set_Rec
736: ,p_create_Dim_Lev_Grp => TRUE

Line 741: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

737: ,x_return_status => x_return_status
738: ,x_msg_count => x_msg_count
739: ,x_msg_data => x_msg_data
740: );
741: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
742: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
743: END IF;
744: EXCEPTION
745: WHEN FND_API.G_EXC_ERROR THEN

Line 742: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

738: ,x_msg_count => x_msg_count
739: ,x_msg_data => x_msg_data
740: );
741: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
742: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
743: END IF;
744: EXCEPTION
745: WHEN FND_API.G_EXC_ERROR THEN
746: IF (x_msg_data IS NULL) THEN

Line 745: WHEN FND_API.G_EXC_ERROR THEN

741: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
742: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
743: END IF;
744: EXCEPTION
745: WHEN FND_API.G_EXC_ERROR THEN
746: IF (x_msg_data IS NULL) THEN
747: FND_MSG_PUB.Count_And_Get
748: ( p_encoded => FND_API.G_FALSE
749: , p_count => x_msg_count

Line 748: ( p_encoded => FND_API.G_FALSE

744: EXCEPTION
745: WHEN FND_API.G_EXC_ERROR THEN
746: IF (x_msg_data IS NULL) THEN
747: FND_MSG_PUB.Count_And_Get
748: ( p_encoded => FND_API.G_FALSE
749: , p_count => x_msg_count
750: , p_data => x_msg_data
751: );
752: END IF;

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

749: , p_count => x_msg_count
750: , p_data => x_msg_data
751: );
752: END IF;
753: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
754: x_return_status := FND_API.G_RET_STS_ERROR;
755: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
756: IF (x_msg_data IS NULL) THEN
757: FND_MSG_PUB.Count_And_Get

Line 754: x_return_status := FND_API.G_RET_STS_ERROR;

750: , p_data => x_msg_data
751: );
752: END IF;
753: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
754: x_return_status := FND_API.G_RET_STS_ERROR;
755: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
756: IF (x_msg_data IS NULL) THEN
757: FND_MSG_PUB.Count_And_Get
758: ( p_encoded => FND_API.G_FALSE

Line 755: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

751: );
752: END IF;
753: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
754: x_return_status := FND_API.G_RET_STS_ERROR;
755: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
756: IF (x_msg_data IS NULL) THEN
757: FND_MSG_PUB.Count_And_Get
758: ( p_encoded => FND_API.G_FALSE
759: , p_count => x_msg_count

Line 758: ( p_encoded => FND_API.G_FALSE

754: x_return_status := FND_API.G_RET_STS_ERROR;
755: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
756: IF (x_msg_data IS NULL) THEN
757: FND_MSG_PUB.Count_And_Get
758: ( p_encoded => FND_API.G_FALSE
759: , p_count => x_msg_count
760: , p_data => x_msg_data
761: );
762: END IF;

Line 763: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

759: , p_count => x_msg_count
760: , p_data => x_msg_data
761: );
762: END IF;
763: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
764: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
765: WHEN NO_DATA_FOUND THEN
766: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
767: IF (x_msg_data IS NOT NULL) THEN

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

760: , p_data => x_msg_data
761: );
762: END IF;
763: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
764: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
765: WHEN NO_DATA_FOUND THEN
766: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
767: IF (x_msg_data IS NOT NULL) THEN
768: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Delete_Dim_Group_In_Dset ';

Line 766: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

762: END IF;
763: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
764: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
765: WHEN NO_DATA_FOUND THEN
766: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
767: IF (x_msg_data IS NOT NULL) THEN
768: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Delete_Dim_Group_In_Dset ';
769: ELSE
770: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Delete_Dim_Group_In_Dset ';

Line 774: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

770: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Delete_Dim_Group_In_Dset ';
771: END IF;
772: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
773: WHEN OTHERS THEN
774: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
775: IF (x_msg_data IS NOT NULL) THEN
776: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Delete_Dim_Group_In_Dset ';
777: ELSE
778: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Delete_Dim_Group_In_Dset ';

Line 790: p_commit IN varchar2 := FND_API.G_FALSE

786: --: This procedure creates the dimension set id and name for the KPI.
787: --: This procedure belongs to the Dimension Set API.
788:
789: procedure Create_Bsc_Kpi_Dim_Sets_Tl(
790: p_commit IN varchar2 := FND_API.G_FALSE
791: ,p_Dim_Set_Rec IN BSC_DIMENSION_SETS_PUB.Bsc_Dim_Set_Rec_Type
792: ,x_return_status OUT NOCOPY varchar2
793: ,x_msg_count OUT NOCOPY number
794: ,x_msg_data OUT NOCOPY varchar2

Line 798: x_return_status := FND_API.G_RET_STS_SUCCESS;

794: ,x_msg_data OUT NOCOPY varchar2
795: ) is
796:
797: begin
798: x_return_status := FND_API.G_RET_STS_SUCCESS;
799: BSC_DIMENSION_SETS_PVT.Create_Bsc_Kpi_Dim_Sets_Tl( p_commit
800: ,p_Dim_Set_Rec
801: ,x_return_status
802: ,x_msg_count

Line 806: WHEN FND_API.G_EXC_ERROR THEN

802: ,x_msg_count
803: ,x_msg_data);
804:
805: EXCEPTION
806: WHEN FND_API.G_EXC_ERROR THEN
807: IF (x_msg_data IS NULL) THEN
808: FND_MSG_PUB.Count_And_Get
809: ( p_encoded => FND_API.G_FALSE
810: , p_count => x_msg_count

Line 809: ( p_encoded => FND_API.G_FALSE

805: EXCEPTION
806: WHEN FND_API.G_EXC_ERROR THEN
807: IF (x_msg_data IS NULL) THEN
808: FND_MSG_PUB.Count_And_Get
809: ( p_encoded => FND_API.G_FALSE
810: , p_count => x_msg_count
811: , p_data => x_msg_data
812: );
813: END IF;

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

810: , p_count => x_msg_count
811: , p_data => x_msg_data
812: );
813: END IF;
814: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
815: x_return_status := FND_API.G_RET_STS_ERROR;
816: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
817: IF (x_msg_data IS NULL) THEN
818: FND_MSG_PUB.Count_And_Get

Line 815: x_return_status := FND_API.G_RET_STS_ERROR;

811: , p_data => x_msg_data
812: );
813: END IF;
814: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
815: x_return_status := FND_API.G_RET_STS_ERROR;
816: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
817: IF (x_msg_data IS NULL) THEN
818: FND_MSG_PUB.Count_And_Get
819: ( p_encoded => FND_API.G_FALSE

Line 816: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

812: );
813: END IF;
814: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
815: x_return_status := FND_API.G_RET_STS_ERROR;
816: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
817: IF (x_msg_data IS NULL) THEN
818: FND_MSG_PUB.Count_And_Get
819: ( p_encoded => FND_API.G_FALSE
820: , p_count => x_msg_count

Line 819: ( p_encoded => FND_API.G_FALSE

815: x_return_status := FND_API.G_RET_STS_ERROR;
816: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
817: IF (x_msg_data IS NULL) THEN
818: FND_MSG_PUB.Count_And_Get
819: ( p_encoded => FND_API.G_FALSE
820: , p_count => x_msg_count
821: , p_data => x_msg_data
822: );
823: END IF;

Line 824: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

820: , p_count => x_msg_count
821: , p_data => x_msg_data
822: );
823: END IF;
824: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
825: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
826: WHEN NO_DATA_FOUND THEN
827: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
828: IF (x_msg_data IS NOT NULL) THEN

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

821: , p_data => x_msg_data
822: );
823: END IF;
824: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
825: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
826: WHEN NO_DATA_FOUND THEN
827: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
828: IF (x_msg_data IS NOT NULL) THEN
829: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Create_Bsc_Kpi_Dim_Sets_Tl ';

Line 827: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

823: END IF;
824: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
825: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
826: WHEN NO_DATA_FOUND THEN
827: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
828: IF (x_msg_data IS NOT NULL) THEN
829: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Create_Bsc_Kpi_Dim_Sets_Tl ';
830: ELSE
831: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Create_Bsc_Kpi_Dim_Sets_Tl ';

Line 835: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

831: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Create_Bsc_Kpi_Dim_Sets_Tl ';
832: END IF;
833: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
834: WHEN OTHERS THEN
835: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
836: IF (x_msg_data IS NOT NULL) THEN
837: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Create_Bsc_Kpi_Dim_Sets_Tl ';
838: ELSE
839: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Create_Bsc_Kpi_Dim_Sets_Tl ';

Line 848: p_commit IN varchar2 := FND_API.G_FALSE

844: /************************************************************************************
845: ************************************************************************************/
846:
847: procedure Retrieve_Bsc_Kpi_Dim_Sets_Tl(
848: p_commit IN varchar2 := FND_API.G_FALSE
849: ,p_Dim_Set_Rec IN BSC_DIMENSION_SETS_PUB.Bsc_Dim_Set_Rec_Type
850: ,x_Dim_Set_Rec IN OUT NOCOPY BSC_DIMENSION_SETS_PUB.Bsc_Dim_Set_Rec_Type
851: ,x_return_status OUT NOCOPY varchar2
852: ,x_msg_count OUT NOCOPY number

Line 857: x_return_status := FND_API.G_RET_STS_SUCCESS;

853: ,x_msg_data OUT NOCOPY varchar2
854: ) is
855:
856: begin
857: x_return_status := FND_API.G_RET_STS_SUCCESS;
858: BSC_DIMENSION_SETS_PVT.Retrieve_Bsc_Kpi_Dim_Sets_Tl( p_commit
859: ,p_Dim_Set_Rec
860: ,x_Dim_Set_Rec
861: ,x_return_status

Line 865: WHEN FND_API.G_EXC_ERROR THEN

861: ,x_return_status
862: ,x_msg_count
863: ,x_msg_data);
864: EXCEPTION
865: WHEN FND_API.G_EXC_ERROR THEN
866: IF (x_msg_data IS NULL) THEN
867: FND_MSG_PUB.Count_And_Get
868: ( p_encoded => FND_API.G_FALSE
869: , p_count => x_msg_count

Line 868: ( p_encoded => FND_API.G_FALSE

864: EXCEPTION
865: WHEN FND_API.G_EXC_ERROR THEN
866: IF (x_msg_data IS NULL) THEN
867: FND_MSG_PUB.Count_And_Get
868: ( p_encoded => FND_API.G_FALSE
869: , p_count => x_msg_count
870: , p_data => x_msg_data
871: );
872: END IF;

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

869: , p_count => x_msg_count
870: , p_data => x_msg_data
871: );
872: END IF;
873: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
874: x_return_status := FND_API.G_RET_STS_ERROR;
875: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
876: IF (x_msg_data IS NULL) THEN
877: FND_MSG_PUB.Count_And_Get

Line 874: x_return_status := FND_API.G_RET_STS_ERROR;

870: , p_data => x_msg_data
871: );
872: END IF;
873: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
874: x_return_status := FND_API.G_RET_STS_ERROR;
875: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
876: IF (x_msg_data IS NULL) THEN
877: FND_MSG_PUB.Count_And_Get
878: ( p_encoded => FND_API.G_FALSE

Line 875: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

871: );
872: END IF;
873: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
874: x_return_status := FND_API.G_RET_STS_ERROR;
875: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
876: IF (x_msg_data IS NULL) THEN
877: FND_MSG_PUB.Count_And_Get
878: ( p_encoded => FND_API.G_FALSE
879: , p_count => x_msg_count

Line 878: ( p_encoded => FND_API.G_FALSE

874: x_return_status := FND_API.G_RET_STS_ERROR;
875: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
876: IF (x_msg_data IS NULL) THEN
877: FND_MSG_PUB.Count_And_Get
878: ( p_encoded => FND_API.G_FALSE
879: , p_count => x_msg_count
880: , p_data => x_msg_data
881: );
882: END IF;

Line 883: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

879: , p_count => x_msg_count
880: , p_data => x_msg_data
881: );
882: END IF;
883: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
884: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
885: WHEN NO_DATA_FOUND THEN
886: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
887: IF (x_msg_data IS NOT NULL) THEN

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

880: , p_data => x_msg_data
881: );
882: END IF;
883: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
884: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
885: WHEN NO_DATA_FOUND THEN
886: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
887: IF (x_msg_data IS NOT NULL) THEN
888: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Retrieve_Bsc_Kpi_Dim_Sets_Tl ';

Line 886: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

882: END IF;
883: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
884: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
885: WHEN NO_DATA_FOUND THEN
886: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
887: IF (x_msg_data IS NOT NULL) THEN
888: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Retrieve_Bsc_Kpi_Dim_Sets_Tl ';
889: ELSE
890: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Retrieve_Bsc_Kpi_Dim_Sets_Tl ';

Line 894: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

890: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Retrieve_Bsc_Kpi_Dim_Sets_Tl ';
891: END IF;
892: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
893: WHEN OTHERS THEN
894: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
895: IF (x_msg_data IS NOT NULL) THEN
896: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Retrieve_Bsc_Kpi_Dim_Sets_Tl ';
897: ELSE
898: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Retrieve_Bsc_Kpi_Dim_Sets_Tl ';

Line 907: p_commit IN varchar2 := FND_API.G_FALSE

903: /************************************************************************************
904: ************************************************************************************/
905:
906: procedure Update_Bsc_Kpi_Dim_Sets_Tl(
907: p_commit IN varchar2 := FND_API.G_FALSE
908: ,p_Dim_Set_Rec IN BSC_DIMENSION_SETS_PUB.Bsc_Dim_Set_Rec_Type
909: ,x_return_status OUT NOCOPY varchar2
910: ,x_msg_count OUT NOCOPY number
911: ,x_msg_data OUT NOCOPY varchar2

Line 915: x_return_status := FND_API.G_RET_STS_SUCCESS;

911: ,x_msg_data OUT NOCOPY varchar2
912: ) is
913:
914: begin
915: x_return_status := FND_API.G_RET_STS_SUCCESS;
916: BSC_DIMENSION_SETS_PVT.Update_Bsc_Kpi_Dim_Sets_Tl( p_commit
917: ,p_Dim_Set_Rec
918: ,x_return_status
919: ,x_msg_count

Line 923: WHEN FND_API.G_EXC_ERROR THEN

919: ,x_msg_count
920: ,x_msg_data);
921:
922: EXCEPTION
923: WHEN FND_API.G_EXC_ERROR THEN
924: IF (x_msg_data IS NULL) THEN
925: FND_MSG_PUB.Count_And_Get
926: ( p_encoded => FND_API.G_FALSE
927: , p_count => x_msg_count

Line 926: ( p_encoded => FND_API.G_FALSE

922: EXCEPTION
923: WHEN FND_API.G_EXC_ERROR THEN
924: IF (x_msg_data IS NULL) THEN
925: FND_MSG_PUB.Count_And_Get
926: ( p_encoded => FND_API.G_FALSE
927: , p_count => x_msg_count
928: , p_data => x_msg_data
929: );
930: END IF;

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

927: , p_count => x_msg_count
928: , p_data => x_msg_data
929: );
930: END IF;
931: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
932: x_return_status := FND_API.G_RET_STS_ERROR;
933: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
934: IF (x_msg_data IS NULL) THEN
935: FND_MSG_PUB.Count_And_Get

Line 932: x_return_status := FND_API.G_RET_STS_ERROR;

928: , p_data => x_msg_data
929: );
930: END IF;
931: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
932: x_return_status := FND_API.G_RET_STS_ERROR;
933: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
934: IF (x_msg_data IS NULL) THEN
935: FND_MSG_PUB.Count_And_Get
936: ( p_encoded => FND_API.G_FALSE

Line 933: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

929: );
930: END IF;
931: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
932: x_return_status := FND_API.G_RET_STS_ERROR;
933: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
934: IF (x_msg_data IS NULL) THEN
935: FND_MSG_PUB.Count_And_Get
936: ( p_encoded => FND_API.G_FALSE
937: , p_count => x_msg_count

Line 936: ( p_encoded => FND_API.G_FALSE

932: x_return_status := FND_API.G_RET_STS_ERROR;
933: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
934: IF (x_msg_data IS NULL) THEN
935: FND_MSG_PUB.Count_And_Get
936: ( p_encoded => FND_API.G_FALSE
937: , p_count => x_msg_count
938: , p_data => x_msg_data
939: );
940: END IF;

Line 941: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

937: , p_count => x_msg_count
938: , p_data => x_msg_data
939: );
940: END IF;
941: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
942: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
943: WHEN NO_DATA_FOUND THEN
944: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
945: IF (x_msg_data IS NOT NULL) THEN

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

938: , p_data => x_msg_data
939: );
940: END IF;
941: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
942: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
943: WHEN NO_DATA_FOUND THEN
944: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
945: IF (x_msg_data IS NOT NULL) THEN
946: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Update_Bsc_Kpi_Dim_Sets_Tl ';

Line 944: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

940: END IF;
941: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
942: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
943: WHEN NO_DATA_FOUND THEN
944: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
945: IF (x_msg_data IS NOT NULL) THEN
946: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Update_Bsc_Kpi_Dim_Sets_Tl ';
947: ELSE
948: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Update_Bsc_Kpi_Dim_Sets_Tl ';

Line 952: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

948: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Update_Bsc_Kpi_Dim_Sets_Tl ';
949: END IF;
950: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
951: WHEN OTHERS THEN
952: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
953: IF (x_msg_data IS NOT NULL) THEN
954: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Update_Bsc_Kpi_Dim_Sets_Tl ';
955: ELSE
956: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Update_Bsc_Kpi_Dim_Sets_Tl ';

Line 965: p_commit IN varchar2 := FND_API.G_FALSE

961: /************************************************************************************
962: ************************************************************************************/
963:
964: procedure Delete_Bsc_Kpi_Dim_Sets_Tl(
965: p_commit IN varchar2 := FND_API.G_FALSE
966: ,p_Dim_Set_Rec IN BSC_DIMENSION_SETS_PUB.Bsc_Dim_Set_Rec_Type
967: ,x_return_status OUT NOCOPY varchar2
968: ,x_msg_count OUT NOCOPY number
969: ,x_msg_data OUT NOCOPY varchar2

Line 975: x_return_status := FND_API.G_RET_STS_SUCCESS;

971:
972: l_count number;
973:
974: begin
975: x_return_status := FND_API.G_RET_STS_SUCCESS;
976: BSC_DIMENSION_SETS_PVT.Delete_Bsc_Kpi_Dim_Sets_Tl( p_commit
977: ,p_Dim_Set_Rec
978: ,x_return_status
979: ,x_msg_count

Line 983: WHEN FND_API.G_EXC_ERROR THEN

979: ,x_msg_count
980: ,x_msg_data);
981:
982: EXCEPTION
983: WHEN FND_API.G_EXC_ERROR THEN
984: IF (x_msg_data IS NULL) THEN
985: FND_MSG_PUB.Count_And_Get
986: ( p_encoded => FND_API.G_FALSE
987: , p_count => x_msg_count

Line 986: ( p_encoded => FND_API.G_FALSE

982: EXCEPTION
983: WHEN FND_API.G_EXC_ERROR THEN
984: IF (x_msg_data IS NULL) THEN
985: FND_MSG_PUB.Count_And_Get
986: ( p_encoded => FND_API.G_FALSE
987: , p_count => x_msg_count
988: , p_data => x_msg_data
989: );
990: END IF;

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

987: , p_count => x_msg_count
988: , p_data => x_msg_data
989: );
990: END IF;
991: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
992: x_return_status := FND_API.G_RET_STS_ERROR;
993: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
994: IF (x_msg_data IS NULL) THEN
995: FND_MSG_PUB.Count_And_Get

Line 992: x_return_status := FND_API.G_RET_STS_ERROR;

988: , p_data => x_msg_data
989: );
990: END IF;
991: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
992: x_return_status := FND_API.G_RET_STS_ERROR;
993: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
994: IF (x_msg_data IS NULL) THEN
995: FND_MSG_PUB.Count_And_Get
996: ( p_encoded => FND_API.G_FALSE

Line 993: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

989: );
990: END IF;
991: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
992: x_return_status := FND_API.G_RET_STS_ERROR;
993: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
994: IF (x_msg_data IS NULL) THEN
995: FND_MSG_PUB.Count_And_Get
996: ( p_encoded => FND_API.G_FALSE
997: , p_count => x_msg_count

Line 996: ( p_encoded => FND_API.G_FALSE

992: x_return_status := FND_API.G_RET_STS_ERROR;
993: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
994: IF (x_msg_data IS NULL) THEN
995: FND_MSG_PUB.Count_And_Get
996: ( p_encoded => FND_API.G_FALSE
997: , p_count => x_msg_count
998: , p_data => x_msg_data
999: );
1000: END IF;

Line 1001: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

997: , p_count => x_msg_count
998: , p_data => x_msg_data
999: );
1000: END IF;
1001: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1002: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1003: WHEN NO_DATA_FOUND THEN
1004: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1005: IF (x_msg_data IS NOT NULL) THEN

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

998: , p_data => x_msg_data
999: );
1000: END IF;
1001: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1002: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1003: WHEN NO_DATA_FOUND THEN
1004: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1005: IF (x_msg_data IS NOT NULL) THEN
1006: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Delete_Bsc_Kpi_Dim_Sets_Tl ';

Line 1004: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1000: END IF;
1001: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1002: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1003: WHEN NO_DATA_FOUND THEN
1004: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1005: IF (x_msg_data IS NOT NULL) THEN
1006: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Delete_Bsc_Kpi_Dim_Sets_Tl ';
1007: ELSE
1008: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Delete_Bsc_Kpi_Dim_Sets_Tl ';

Line 1012: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1008: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Delete_Bsc_Kpi_Dim_Sets_Tl ';
1009: END IF;
1010: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1011: WHEN OTHERS THEN
1012: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1013: IF (x_msg_data IS NOT NULL) THEN
1014: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Delete_Bsc_Kpi_Dim_Sets_Tl ';
1015: ELSE
1016: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Delete_Bsc_Kpi_Dim_Sets_Tl ';

Line 1028: p_commit IN varchar2 := FND_API.G_FALSE

1024: --: This procedure creates the properties for the dimension set for the KPI.
1025: --: This procedure belongs to the Dimension Set API.
1026:
1027: procedure Create_Dim_Level_Properties(
1028: p_commit IN varchar2 := FND_API.G_FALSE
1029: ,p_Dim_Set_Rec IN BSC_DIMENSION_SETS_PUB.Bsc_Dim_Set_Rec_Type
1030: ,x_return_status OUT NOCOPY varchar2
1031: ,x_msg_count OUT NOCOPY number
1032: ,x_msg_data OUT NOCOPY varchar2

Line 1046: x_return_status := FND_API.G_RET_STS_SUCCESS;

1042: FROM BSC_SYS_DIM_LEVELS_BY_GROUP
1043: WHERE DIM_GROUP_ID = p_Dim_Set_Rec.Bsc_Dim_Level_Group_Id;
1044:
1045: begin
1046: x_return_status := FND_API.G_RET_STS_SUCCESS;
1047: IF (BSC_DIMENSION_SETS_PUB.Is_Valid_Dimension(p_Dim_Set_Rec.Bsc_Dim_Level_Group_Id)) THEN
1048: -- Set the first values of the Table Record equal to the Record passed.
1049: l_Dim_Set_Rec(1).Bsc_Kpi_Id := p_Dim_Set_Rec.Bsc_Kpi_Id;
1050: l_Dim_Set_Rec(1).Bsc_Dim_Set_Id := p_Dim_Set_Rec.Bsc_Dim_Set_Id;

Line 1115: WHEN FND_API.G_EXC_ERROR THEN

1111: end loop;
1112: END IF;
1113:
1114: EXCEPTION
1115: WHEN FND_API.G_EXC_ERROR THEN
1116: IF (x_msg_data IS NULL) THEN
1117: FND_MSG_PUB.Count_And_Get
1118: ( p_encoded => FND_API.G_FALSE
1119: , p_count => x_msg_count

Line 1118: ( p_encoded => FND_API.G_FALSE

1114: EXCEPTION
1115: WHEN FND_API.G_EXC_ERROR THEN
1116: IF (x_msg_data IS NULL) THEN
1117: FND_MSG_PUB.Count_And_Get
1118: ( p_encoded => FND_API.G_FALSE
1119: , p_count => x_msg_count
1120: , p_data => x_msg_data
1121: );
1122: END IF;

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

1119: , p_count => x_msg_count
1120: , p_data => x_msg_data
1121: );
1122: END IF;
1123: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1124: x_return_status := FND_API.G_RET_STS_ERROR;
1125: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1126: IF (x_msg_data IS NULL) THEN
1127: FND_MSG_PUB.Count_And_Get

Line 1124: x_return_status := FND_API.G_RET_STS_ERROR;

1120: , p_data => x_msg_data
1121: );
1122: END IF;
1123: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1124: x_return_status := FND_API.G_RET_STS_ERROR;
1125: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1126: IF (x_msg_data IS NULL) THEN
1127: FND_MSG_PUB.Count_And_Get
1128: ( p_encoded => FND_API.G_FALSE

Line 1125: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1121: );
1122: END IF;
1123: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1124: x_return_status := FND_API.G_RET_STS_ERROR;
1125: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1126: IF (x_msg_data IS NULL) THEN
1127: FND_MSG_PUB.Count_And_Get
1128: ( p_encoded => FND_API.G_FALSE
1129: , p_count => x_msg_count

Line 1128: ( p_encoded => FND_API.G_FALSE

1124: x_return_status := FND_API.G_RET_STS_ERROR;
1125: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1126: IF (x_msg_data IS NULL) THEN
1127: FND_MSG_PUB.Count_And_Get
1128: ( p_encoded => FND_API.G_FALSE
1129: , p_count => x_msg_count
1130: , p_data => x_msg_data
1131: );
1132: END IF;

Line 1133: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1129: , p_count => x_msg_count
1130: , p_data => x_msg_data
1131: );
1132: END IF;
1133: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1134: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1135: WHEN NO_DATA_FOUND THEN
1136: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1137: IF (x_msg_data IS NOT NULL) THEN

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

1130: , p_data => x_msg_data
1131: );
1132: END IF;
1133: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1134: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1135: WHEN NO_DATA_FOUND THEN
1136: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1137: IF (x_msg_data IS NOT NULL) THEN
1138: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Create_Dim_Level_Properties ';

Line 1136: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1132: END IF;
1133: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1134: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1135: WHEN NO_DATA_FOUND THEN
1136: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1137: IF (x_msg_data IS NOT NULL) THEN
1138: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Create_Dim_Level_Properties ';
1139: ELSE
1140: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Create_Dim_Level_Properties ';

Line 1144: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1140: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Create_Dim_Level_Properties ';
1141: END IF;
1142: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1143: WHEN OTHERS THEN
1144: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1145: IF (x_msg_data IS NOT NULL) THEN
1146: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Create_Dim_Level_Properties ';
1147: ELSE
1148: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Create_Dim_Level_Properties ';

Line 1157: p_commit IN varchar2 := FND_API.G_FALSE

1153: /************************************************************************************
1154: ************************************************************************************/
1155:
1156: procedure Retrieve_Dim_Level_Properties(
1157: p_commit IN varchar2 := FND_API.G_FALSE
1158: ,p_Dim_Set_Rec IN BSC_DIMENSION_SETS_PUB.Bsc_Dim_Set_Rec_Type
1159: ,x_Dim_Set_Rec IN OUT NOCOPY BSC_DIMENSION_SETS_PUB.Bsc_Dim_Set_Rec_Type
1160: ,x_return_status OUT NOCOPY varchar2
1161: ,x_msg_count OUT NOCOPY number

Line 1166: x_return_status := FND_API.G_RET_STS_SUCCESS;

1162: ,x_msg_data OUT NOCOPY varchar2
1163: ) is
1164:
1165: begin
1166: x_return_status := FND_API.G_RET_STS_SUCCESS;
1167: BSC_DIMENSION_SETS_PVT.Retrieve_Dim_Level_Properties( p_commit
1168: ,p_Dim_Set_Rec
1169: ,x_Dim_Set_Rec
1170: ,x_return_status

Line 1175: WHEN FND_API.G_EXC_ERROR THEN

1171: ,x_msg_count
1172: ,x_msg_data);
1173:
1174: EXCEPTION
1175: WHEN FND_API.G_EXC_ERROR THEN
1176: IF (x_msg_data IS NULL) THEN
1177: FND_MSG_PUB.Count_And_Get
1178: ( p_encoded => FND_API.G_FALSE
1179: , p_count => x_msg_count

Line 1178: ( p_encoded => FND_API.G_FALSE

1174: EXCEPTION
1175: WHEN FND_API.G_EXC_ERROR THEN
1176: IF (x_msg_data IS NULL) THEN
1177: FND_MSG_PUB.Count_And_Get
1178: ( p_encoded => FND_API.G_FALSE
1179: , p_count => x_msg_count
1180: , p_data => x_msg_data
1181: );
1182: END IF;

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

1179: , p_count => x_msg_count
1180: , p_data => x_msg_data
1181: );
1182: END IF;
1183: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1184: x_return_status := FND_API.G_RET_STS_ERROR;
1185: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1186: IF (x_msg_data IS NULL) THEN
1187: FND_MSG_PUB.Count_And_Get

Line 1184: x_return_status := FND_API.G_RET_STS_ERROR;

1180: , p_data => x_msg_data
1181: );
1182: END IF;
1183: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1184: x_return_status := FND_API.G_RET_STS_ERROR;
1185: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1186: IF (x_msg_data IS NULL) THEN
1187: FND_MSG_PUB.Count_And_Get
1188: ( p_encoded => FND_API.G_FALSE

Line 1185: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1181: );
1182: END IF;
1183: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1184: x_return_status := FND_API.G_RET_STS_ERROR;
1185: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1186: IF (x_msg_data IS NULL) THEN
1187: FND_MSG_PUB.Count_And_Get
1188: ( p_encoded => FND_API.G_FALSE
1189: , p_count => x_msg_count

Line 1188: ( p_encoded => FND_API.G_FALSE

1184: x_return_status := FND_API.G_RET_STS_ERROR;
1185: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1186: IF (x_msg_data IS NULL) THEN
1187: FND_MSG_PUB.Count_And_Get
1188: ( p_encoded => FND_API.G_FALSE
1189: , p_count => x_msg_count
1190: , p_data => x_msg_data
1191: );
1192: END IF;

Line 1193: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1189: , p_count => x_msg_count
1190: , p_data => x_msg_data
1191: );
1192: END IF;
1193: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1194: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1195: WHEN NO_DATA_FOUND THEN
1196: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1197: IF (x_msg_data IS NOT NULL) THEN

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

1190: , p_data => x_msg_data
1191: );
1192: END IF;
1193: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1194: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1195: WHEN NO_DATA_FOUND THEN
1196: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1197: IF (x_msg_data IS NOT NULL) THEN
1198: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Retrieve_Dim_Level_Properties ';

Line 1196: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1192: END IF;
1193: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1194: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1195: WHEN NO_DATA_FOUND THEN
1196: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1197: IF (x_msg_data IS NOT NULL) THEN
1198: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Retrieve_Dim_Level_Properties ';
1199: ELSE
1200: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Retrieve_Dim_Level_Properties ';

Line 1204: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1200: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Retrieve_Dim_Level_Properties ';
1201: END IF;
1202: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1203: WHEN OTHERS THEN
1204: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1205: IF (x_msg_data IS NOT NULL) THEN
1206: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Retrieve_Dim_Level_Properties ';
1207: ELSE
1208: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Retrieve_Dim_Level_Properties ';

Line 1217: p_commit IN varchar2 := FND_API.G_FALSE

1213: /************************************************************************************
1214: ************************************************************************************/
1215:
1216: procedure Update_Dim_Level_Properties(
1217: p_commit IN varchar2 := FND_API.G_FALSE
1218: ,p_Dim_Set_Rec IN BSC_DIMENSION_SETS_PUB.Bsc_Dim_Set_Rec_Type
1219: ,x_return_status OUT NOCOPY varchar2
1220: ,x_msg_count OUT NOCOPY number
1221: ,x_msg_data OUT NOCOPY varchar2

Line 1225: x_return_status := FND_API.G_RET_STS_SUCCESS;

1221: ,x_msg_data OUT NOCOPY varchar2
1222: ) is
1223:
1224: begin
1225: x_return_status := FND_API.G_RET_STS_SUCCESS;
1226: BSC_DIMENSION_SETS_PVT.Update_Dim_Level_Properties( p_commit
1227: ,p_Dim_Set_Rec
1228: ,x_return_status
1229: ,x_msg_count

Line 1233: WHEN FND_API.G_EXC_ERROR THEN

1229: ,x_msg_count
1230: ,x_msg_data);
1231:
1232: EXCEPTION
1233: WHEN FND_API.G_EXC_ERROR THEN
1234: IF (x_msg_data IS NULL) THEN
1235: FND_MSG_PUB.Count_And_Get
1236: ( p_encoded => FND_API.G_FALSE
1237: , p_count => x_msg_count

Line 1236: ( p_encoded => FND_API.G_FALSE

1232: EXCEPTION
1233: WHEN FND_API.G_EXC_ERROR THEN
1234: IF (x_msg_data IS NULL) THEN
1235: FND_MSG_PUB.Count_And_Get
1236: ( p_encoded => FND_API.G_FALSE
1237: , p_count => x_msg_count
1238: , p_data => x_msg_data
1239: );
1240: END IF;

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

1237: , p_count => x_msg_count
1238: , p_data => x_msg_data
1239: );
1240: END IF;
1241: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1242: x_return_status := FND_API.G_RET_STS_ERROR;
1243: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1244: IF (x_msg_data IS NULL) THEN
1245: FND_MSG_PUB.Count_And_Get

Line 1242: x_return_status := FND_API.G_RET_STS_ERROR;

1238: , p_data => x_msg_data
1239: );
1240: END IF;
1241: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1242: x_return_status := FND_API.G_RET_STS_ERROR;
1243: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1244: IF (x_msg_data IS NULL) THEN
1245: FND_MSG_PUB.Count_And_Get
1246: ( p_encoded => FND_API.G_FALSE

Line 1243: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1239: );
1240: END IF;
1241: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1242: x_return_status := FND_API.G_RET_STS_ERROR;
1243: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1244: IF (x_msg_data IS NULL) THEN
1245: FND_MSG_PUB.Count_And_Get
1246: ( p_encoded => FND_API.G_FALSE
1247: , p_count => x_msg_count

Line 1246: ( p_encoded => FND_API.G_FALSE

1242: x_return_status := FND_API.G_RET_STS_ERROR;
1243: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1244: IF (x_msg_data IS NULL) THEN
1245: FND_MSG_PUB.Count_And_Get
1246: ( p_encoded => FND_API.G_FALSE
1247: , p_count => x_msg_count
1248: , p_data => x_msg_data
1249: );
1250: END IF;

Line 1251: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1247: , p_count => x_msg_count
1248: , p_data => x_msg_data
1249: );
1250: END IF;
1251: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1252: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1253: WHEN NO_DATA_FOUND THEN
1254: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1255: IF (x_msg_data IS NOT NULL) THEN

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

1248: , p_data => x_msg_data
1249: );
1250: END IF;
1251: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1252: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1253: WHEN NO_DATA_FOUND THEN
1254: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1255: IF (x_msg_data IS NOT NULL) THEN
1256: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Update_Dim_Level_Properties ';

Line 1254: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1250: END IF;
1251: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1252: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1253: WHEN NO_DATA_FOUND THEN
1254: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1255: IF (x_msg_data IS NOT NULL) THEN
1256: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Update_Dim_Level_Properties ';
1257: ELSE
1258: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Update_Dim_Level_Properties ';

Line 1262: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1258: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Update_Dim_Level_Properties ';
1259: END IF;
1260: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1261: WHEN OTHERS THEN
1262: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1263: IF (x_msg_data IS NOT NULL) THEN
1264: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Update_Dim_Level_Properties ';
1265: ELSE
1266: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Update_Dim_Level_Properties ';

Line 1275: p_commit IN varchar2 := FND_API.G_FALSE

1271: /************************************************************************************
1272: ************************************************************************************/
1273:
1274: procedure Delete_Dim_Level_Properties(
1275: p_commit IN varchar2 := FND_API.G_FALSE
1276: ,p_Dim_Set_Rec IN BSC_DIMENSION_SETS_PUB.Bsc_Dim_Set_Rec_Type
1277: ,x_return_status OUT NOCOPY varchar2
1278: ,x_msg_count OUT NOCOPY number
1279: ,x_msg_data OUT NOCOPY varchar2

Line 1298: x_return_status := FND_API.G_RET_STS_SUCCESS;

1294: FROM BSC_SYS_DIM_LEVELS_BY_GROUP
1295: WHERE DIM_GROUP_ID = p_Dim_Set_Rec.Bsc_Dim_Level_Group_Id;
1296:
1297: begin
1298: x_return_status := FND_API.G_RET_STS_SUCCESS;
1299: -- Set the first values of the Table Record equal to the Record passed.
1300: l_Dim_Set_Rec(1).Bsc_Kpi_Id := p_Dim_Set_Rec.Bsc_Kpi_Id;
1301: l_Dim_Set_Rec(1).Bsc_Dim_Set_Id := p_Dim_Set_Rec.Bsc_Dim_Set_Id;
1302: l_Dim_Set_Rec(1).Bsc_Dim_Set_Name := p_Dim_Set_Rec.Bsc_Dim_Set_Name;

Line 1345: WHEN FND_API.G_EXC_ERROR THEN

1341: end loop;
1342:
1343:
1344: EXCEPTION
1345: WHEN FND_API.G_EXC_ERROR THEN
1346: IF (x_msg_data IS NULL) THEN
1347: FND_MSG_PUB.Count_And_Get
1348: ( p_encoded => FND_API.G_FALSE
1349: , p_count => x_msg_count

Line 1348: ( p_encoded => FND_API.G_FALSE

1344: EXCEPTION
1345: WHEN FND_API.G_EXC_ERROR THEN
1346: IF (x_msg_data IS NULL) THEN
1347: FND_MSG_PUB.Count_And_Get
1348: ( p_encoded => FND_API.G_FALSE
1349: , p_count => x_msg_count
1350: , p_data => x_msg_data
1351: );
1352: END IF;

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

1349: , p_count => x_msg_count
1350: , p_data => x_msg_data
1351: );
1352: END IF;
1353: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1354: x_return_status := FND_API.G_RET_STS_ERROR;
1355: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1356: IF (x_msg_data IS NULL) THEN
1357: FND_MSG_PUB.Count_And_Get

Line 1354: x_return_status := FND_API.G_RET_STS_ERROR;

1350: , p_data => x_msg_data
1351: );
1352: END IF;
1353: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1354: x_return_status := FND_API.G_RET_STS_ERROR;
1355: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1356: IF (x_msg_data IS NULL) THEN
1357: FND_MSG_PUB.Count_And_Get
1358: ( p_encoded => FND_API.G_FALSE

Line 1355: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1351: );
1352: END IF;
1353: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1354: x_return_status := FND_API.G_RET_STS_ERROR;
1355: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1356: IF (x_msg_data IS NULL) THEN
1357: FND_MSG_PUB.Count_And_Get
1358: ( p_encoded => FND_API.G_FALSE
1359: , p_count => x_msg_count

Line 1358: ( p_encoded => FND_API.G_FALSE

1354: x_return_status := FND_API.G_RET_STS_ERROR;
1355: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1356: IF (x_msg_data IS NULL) THEN
1357: FND_MSG_PUB.Count_And_Get
1358: ( p_encoded => FND_API.G_FALSE
1359: , p_count => x_msg_count
1360: , p_data => x_msg_data
1361: );
1362: END IF;

Line 1363: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1359: , p_count => x_msg_count
1360: , p_data => x_msg_data
1361: );
1362: END IF;
1363: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1364: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1365: WHEN NO_DATA_FOUND THEN
1366: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1367: IF (x_msg_data IS NOT NULL) THEN

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

1360: , p_data => x_msg_data
1361: );
1362: END IF;
1363: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1364: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1365: WHEN NO_DATA_FOUND THEN
1366: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1367: IF (x_msg_data IS NOT NULL) THEN
1368: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Delete_Dim_Level_Properties ';

Line 1366: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1362: END IF;
1363: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1364: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1365: WHEN NO_DATA_FOUND THEN
1366: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1367: IF (x_msg_data IS NOT NULL) THEN
1368: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Delete_Dim_Level_Properties ';
1369: ELSE
1370: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Delete_Dim_Level_Properties ';

Line 1374: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1370: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Delete_Dim_Level_Properties ';
1371: END IF;
1372: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1373: WHEN OTHERS THEN
1374: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1375: IF (x_msg_data IS NOT NULL) THEN
1376: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Delete_Dim_Level_Properties ';
1377: ELSE
1378: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Delete_Dim_Level_Properties ';

Line 1391: p_commit IN VARCHAR2 := FND_API.G_FALSE

1387: --: This procedure reorders the dimension ids to the dimension set.
1388:
1389: PROCEDURE Reorder_Dim_Levels
1390: (
1391: p_commit IN VARCHAR2 := FND_API.G_FALSE
1392: , p_Dim_Set_Rec IN BSC_DIMENSION_SETS_PUB.Bsc_Dim_Set_Rec_Type
1393: , x_return_status OUT NOCOPY VARCHAR2
1394: , x_msg_count OUT NOCOPY NUMBER
1395: , x_msg_data OUT NOCOPY VARCHAR2

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

1439: l_count := l_count + 1;
1440:
1441: END LOOP;
1442:
1443: IF (p_commit = FND_API.G_TRUE) THEN
1444: COMMIT;
1445: END IF;
1446:
1447:

Line 1449: WHEN FND_API.G_EXC_ERROR THEN

1445: END IF;
1446:
1447:
1448: EXCEPTION
1449: WHEN FND_API.G_EXC_ERROR THEN
1450: ROLLBACK TO ReorderBSCDimLevsPUB;
1451: IF (x_msg_data IS NULL) THEN
1452: FND_MSG_PUB.Count_And_Get
1453: ( p_encoded => FND_API.G_FALSE

Line 1453: ( p_encoded => FND_API.G_FALSE

1449: WHEN FND_API.G_EXC_ERROR THEN
1450: ROLLBACK TO ReorderBSCDimLevsPUB;
1451: IF (x_msg_data IS NULL) THEN
1452: FND_MSG_PUB.Count_And_Get
1453: ( p_encoded => FND_API.G_FALSE
1454: , p_count => x_msg_count
1455: , p_data => x_msg_data
1456: );
1457: END IF;

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

1454: , p_count => x_msg_count
1455: , p_data => x_msg_data
1456: );
1457: END IF;
1458: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1459: x_return_status := FND_API.G_RET_STS_ERROR;
1460: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1461: ROLLBACK TO ReorderBSCDimLevsPUB;
1462: IF (x_msg_data IS NULL) THEN

Line 1459: x_return_status := FND_API.G_RET_STS_ERROR;

1455: , p_data => x_msg_data
1456: );
1457: END IF;
1458: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1459: x_return_status := FND_API.G_RET_STS_ERROR;
1460: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1461: ROLLBACK TO ReorderBSCDimLevsPUB;
1462: IF (x_msg_data IS NULL) THEN
1463: FND_MSG_PUB.Count_And_Get

Line 1460: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1456: );
1457: END IF;
1458: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1459: x_return_status := FND_API.G_RET_STS_ERROR;
1460: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1461: ROLLBACK TO ReorderBSCDimLevsPUB;
1462: IF (x_msg_data IS NULL) THEN
1463: FND_MSG_PUB.Count_And_Get
1464: ( p_encoded => FND_API.G_FALSE

Line 1464: ( p_encoded => FND_API.G_FALSE

1460: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1461: ROLLBACK TO ReorderBSCDimLevsPUB;
1462: IF (x_msg_data IS NULL) THEN
1463: FND_MSG_PUB.Count_And_Get
1464: ( p_encoded => FND_API.G_FALSE
1465: , p_count => x_msg_count
1466: , p_data => x_msg_data
1467: );
1468: END IF;

Line 1469: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1465: , p_count => x_msg_count
1466: , p_data => x_msg_data
1467: );
1468: END IF;
1469: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1470: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1471: WHEN NO_DATA_FOUND THEN
1472: ROLLBACK TO ReorderBSCDimLevsPUB;
1473: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

1466: , p_data => x_msg_data
1467: );
1468: END IF;
1469: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1470: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1471: WHEN NO_DATA_FOUND THEN
1472: ROLLBACK TO ReorderBSCDimLevsPUB;
1473: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1474: IF (x_msg_data IS NOT NULL) THEN

Line 1473: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1469: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1470: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1471: WHEN NO_DATA_FOUND THEN
1472: ROLLBACK TO ReorderBSCDimLevsPUB;
1473: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1474: IF (x_msg_data IS NOT NULL) THEN
1475: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Reorder_Dim_Levels ';
1476: ELSE
1477: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Reorder_Dim_Levels ';

Line 1482: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1478: END IF;
1479: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1480: WHEN OTHERS THEN
1481: ROLLBACK TO ReorderBSCDimLevsPUB;
1482: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1483: IF (x_msg_data IS NOT NULL) THEN
1484: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Reorder_Dim_Levels ';
1485: ELSE
1486: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Reorder_Dim_Levels ';

Line 1500: ( p_commit IN VARCHAR2 := FND_API.G_FALSE

1496:
1497:
1498:
1499: PROCEDURE Create_Dim_Levels
1500: ( p_commit IN VARCHAR2 := FND_API.G_FALSE
1501: , p_Dim_Set_Rec IN BSC_DIMENSION_SETS_PUB.Bsc_Dim_Set_Rec_Type
1502: , x_return_status OUT NOCOPY VARCHAR2
1503: , x_msg_count OUT NOCOPY NUMBER
1504: , x_msg_data OUT NOCOPY VARCHAR2

Line 1598: x_return_status := FND_API.G_RET_STS_SUCCESS;

1594:
1595: BEGIN
1596: SAVEPOINT CreateBSCDimLevsPUB;
1597: FND_MSG_PUB.Initialize;
1598: x_return_status := FND_API.G_RET_STS_SUCCESS;
1599: IF (p_Dim_Set_Rec.Bsc_Dim_Level_Group_Id IS NULL) THEN
1600: -- Call private version of the procedure.
1601: --DBMS_OUTPUT.PUT_LINE(' Step 0');
1602:

Line 1725: ( p_commit => FND_API.G_FALSE

1721: l_Update_Dim_Set_Rec.Bsc_Dset_Parent_Level_Index := NULL;
1722: l_Update_Dim_Set_Rec.Bsc_Dset_Table_Relation := NULL;
1723: END IF;
1724: BSC_DIMENSION_SETS_PUB.Update_Dim_Levels
1725: ( p_commit => FND_API.G_FALSE
1726: , p_Dim_Set_Rec => l_Update_Dim_Set_Rec
1727: , x_return_status => x_return_status
1728: , x_msg_count => x_msg_count
1729: , x_msg_data => x_msg_data

Line 1731: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

1727: , x_return_status => x_return_status
1728: , x_msg_count => x_msg_count
1729: , x_msg_data => x_msg_data
1730: );
1731: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1732: --DBMS_OUTPUT.PUT_LINE('BSC_DIMENSION_SETS_PUB.Update_Dim_Levels');
1733: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1734: END IF;
1735: END IF;

Line 1733: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1729: , x_msg_data => x_msg_data
1730: );
1731: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1732: --DBMS_OUTPUT.PUT_LINE('BSC_DIMENSION_SETS_PUB.Update_Dim_Levels');
1733: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1734: END IF;
1735: END IF;
1736: END IF;
1737: END LOOP;

Line 1739: IF (BIS_UTILITIES_PUB.Enable_Generated_Source_Report = FND_API.G_TRUE) THEN

1735: END IF;
1736: END IF;
1737: END LOOP;
1738: ---//////////////Fix for the bug 5734259 //////////////////////
1739: IF (BIS_UTILITIES_PUB.Enable_Generated_Source_Report = FND_API.G_TRUE) THEN
1740: FOR cd IN c_pmf_dim_set_relations LOOP
1741: SELECT COUNT(1) INTO l_Count
1742: FROM BSC_KPI_DIM_LEVELS_B
1743: WHERE Indicator = p_Dim_Set_Rec.Bsc_Kpi_Id

Line 1760: ( p_commit => FND_API.G_FALSE

1756: l_Update_Dim_Set_Rec.Bsc_Dset_Parent_Level_Rel := cd.Level_Pk_Col;
1757: l_Update_Dim_Set_Rec.Bsc_Dset_Parent_Level_Index := cd.Par_Dim_Level_Index;
1758: l_Update_Dim_Set_Rec.Bsc_Dset_Table_Relation := NULL;
1759: BSC_DIMENSION_SETS_PUB.Update_Dim_Levels
1760: ( p_commit => FND_API.G_FALSE
1761: , p_Dim_Set_Rec => l_Update_Dim_Set_Rec
1762: , x_return_status => x_return_status
1763: , x_msg_count => x_msg_count
1764: , x_msg_data => x_msg_data

Line 1766: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

1762: , x_return_status => x_return_status
1763: , x_msg_count => x_msg_count
1764: , x_msg_data => x_msg_data
1765: );
1766: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1767: --DBMS_OUTPUT.PUT_LINE('BSC_DIMENSION_SETS_PUB.Update_Dim_Levels');
1768: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1769: END IF;
1770: END IF;

Line 1768: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1764: , x_msg_data => x_msg_data
1765: );
1766: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1767: --DBMS_OUTPUT.PUT_LINE('BSC_DIMENSION_SETS_PUB.Update_Dim_Levels');
1768: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1769: END IF;
1770: END IF;
1771: END IF;
1772: END LOOP;

Line 1779: ( p_commit => FND_API.G_FALSE

1775: -- Establish relationship if the Dimension Levels are from other Groups.
1776: --DBMS_OUTPUT.PUT_LINE(' Step 2');
1777:
1778: BSC_DIMENSION_SETS_PUB.Reorder_Dim_Levels
1779: ( p_commit => FND_API.G_FALSE
1780: , p_Dim_Set_Rec => p_Dim_Set_Rec
1781: , x_return_status => x_return_status
1782: , x_msg_count => x_msg_count
1783: , x_msg_data => x_msg_data

Line 1785: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

1781: , x_return_status => x_return_status
1782: , x_msg_count => x_msg_count
1783: , x_msg_data => x_msg_data
1784: );
1785: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1786: --DBMS_OUTPUT.PUT_LINE('BSC_DIMENSION_SETS_PUB.Reorder_Dim_Levels');
1787: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1788: END IF;
1789: -- 09/16 adrao added for bug# 3141813

Line 1787: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1783: , x_msg_data => x_msg_data
1784: );
1785: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1786: --DBMS_OUTPUT.PUT_LINE('BSC_DIMENSION_SETS_PUB.Reorder_Dim_Levels');
1787: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1788: END IF;
1789: -- 09/16 adrao added for bug# 3141813
1790: SELECT COUNT(0) INTO l_count
1791: FROM BSC_KPI_DIM_LEVELS_VL

Line 1798: RAISE FND_API.G_EXC_ERROR;

1794: AND Level_Source = 'BSC';
1795: IF (l_count > BSC_UTILITY.MAX_DIM_IN_DIM_SET) THEN
1796: FND_MESSAGE.SET_NAME('BSC','BSC_DIM_SET_OVERFLOW');
1797: FND_MSG_PUB.ADD;
1798: RAISE FND_API.G_EXC_ERROR;
1799: END IF;
1800:
1801: --DBMS_OUTPUT.PUT_LINE(' Step 3');
1802:

Line 1805: IF (BIS_UTILITIES_PUB.Enable_Generated_Source_Report = FND_API.G_FALSE) THEN

1801: --DBMS_OUTPUT.PUT_LINE(' Step 3');
1802:
1803: -- added to relax checking for mixed type of Dimension Objects within a Dimension
1804: -- for Autogenerated reports and removing the disctiction, BSC 5.3
1805: IF (BIS_UTILITIES_PUB.Enable_Generated_Source_Report = FND_API.G_FALSE) THEN
1806: SELECT COUNT(DISTINCT(Level_Source)) INTO l_count
1807: FROM BSC_KPI_DIM_LEVELS_VL
1808: WHERE Indicator = p_Dim_Set_Rec.Bsc_Kpi_Id
1809: AND Dim_Set_Id = p_Dim_Set_Rec.Bsc_Dim_Set_Id

Line 1814: RAISE FND_API.G_EXC_ERROR;

1810: AND Level_Source IS NOT NULL;
1811: IF (l_count > 1) THEN
1812: FND_MESSAGE.SET_NAME('BSC','BSC_NO_MIX_DIM_SET_SOURCE');
1813: FND_MSG_PUB.ADD;
1814: RAISE FND_API.G_EXC_ERROR;
1815: END IF;
1816: END IF;
1817:
1818: -- 09/20 adrao added for bug# 3152590

Line 1828: RAISE FND_API.G_EXC_ERROR;

1824: AND Level_Source = 'BSC';
1825: IF (l_count > 1) THEN -- not more that 1 DimObj can be in comparison within a Dimension Set.
1826: FND_MESSAGE.SET_NAME('BSC','BSC_D_ONE_DIM_IN_COMPARISON');
1827: FND_MSG_PUB.ADD;
1828: RAISE FND_API.G_EXC_ERROR;
1829: END IF;
1830: END IF;
1831: IF (p_commit = FND_API.G_TRUE) THEN
1832: COMMIT;

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

1827: FND_MSG_PUB.ADD;
1828: RAISE FND_API.G_EXC_ERROR;
1829: END IF;
1830: END IF;
1831: IF (p_commit = FND_API.G_TRUE) THEN
1832: COMMIT;
1833: --DBMS_OUTPUT.PUT_LINE('COMMIT SUCCESSFUL');
1834: END IF;
1835:

Line 1839: WHEN FND_API.G_EXC_ERROR THEN

1835:
1836: --DBMS_OUTPUT.PUT_LINE(' Step 4');
1837:
1838: EXCEPTION
1839: WHEN FND_API.G_EXC_ERROR THEN
1840: ROLLBACK TO CreateBSCDimLevsPUB;
1841: IF (x_msg_data IS NULL) THEN
1842: FND_MSG_PUB.Count_And_Get
1843: ( p_encoded => FND_API.G_FALSE

Line 1843: ( p_encoded => FND_API.G_FALSE

1839: WHEN FND_API.G_EXC_ERROR THEN
1840: ROLLBACK TO CreateBSCDimLevsPUB;
1841: IF (x_msg_data IS NULL) THEN
1842: FND_MSG_PUB.Count_And_Get
1843: ( p_encoded => FND_API.G_FALSE
1844: , p_count => x_msg_count
1845: , p_data => x_msg_data
1846: );
1847: END IF;

Line 1848: x_return_status := FND_API.G_RET_STS_ERROR;

1844: , p_count => x_msg_count
1845: , p_data => x_msg_data
1846: );
1847: END IF;
1848: x_return_status := FND_API.G_RET_STS_ERROR;
1849: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1850: ROLLBACK TO CreateBSCDimLevsPUB;
1851: IF (x_msg_data IS NULL) THEN
1852: FND_MSG_PUB.Count_And_Get

Line 1849: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1845: , p_data => x_msg_data
1846: );
1847: END IF;
1848: x_return_status := FND_API.G_RET_STS_ERROR;
1849: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1850: ROLLBACK TO CreateBSCDimLevsPUB;
1851: IF (x_msg_data IS NULL) THEN
1852: FND_MSG_PUB.Count_And_Get
1853: ( p_encoded => FND_API.G_FALSE

Line 1853: ( p_encoded => FND_API.G_FALSE

1849: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1850: ROLLBACK TO CreateBSCDimLevsPUB;
1851: IF (x_msg_data IS NULL) THEN
1852: FND_MSG_PUB.Count_And_Get
1853: ( p_encoded => FND_API.G_FALSE
1854: , p_count => x_msg_count
1855: , p_data => x_msg_data
1856: );
1857: END IF;

Line 1858: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1854: , p_count => x_msg_count
1855: , p_data => x_msg_data
1856: );
1857: END IF;
1858: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1859: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1860: WHEN NO_DATA_FOUND THEN
1861: ROLLBACK TO CreateBSCDimLevsPUB;
1862: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

1855: , p_data => x_msg_data
1856: );
1857: END IF;
1858: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1859: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1860: WHEN NO_DATA_FOUND THEN
1861: ROLLBACK TO CreateBSCDimLevsPUB;
1862: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1863: IF (x_msg_data IS NOT NULL) THEN

Line 1862: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1858: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1859: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1860: WHEN NO_DATA_FOUND THEN
1861: ROLLBACK TO CreateBSCDimLevsPUB;
1862: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1863: IF (x_msg_data IS NOT NULL) THEN
1864: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Create_Dim_Levels ';
1865: ELSE
1866: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Create_Dim_Levels ';

Line 1871: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1867: END IF;
1868: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1869: WHEN OTHERS THEN
1870: ROLLBACK TO CreateBSCDimLevsPUB;
1871: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1872: IF (x_msg_data IS NOT NULL) THEN
1873: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Create_Dim_Levels ';
1874: ELSE
1875: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Create_Dim_Levels ';

Line 1884: p_commit IN varchar2 := FND_API.G_FALSE

1880: /************************************************************************************
1881: ************************************************************************************/
1882:
1883: procedure Retrieve_Dim_Levels(
1884: p_commit IN varchar2 := FND_API.G_FALSE
1885: ,p_Dim_Set_Rec IN BSC_DIMENSION_SETS_PUB.Bsc_Dim_Set_Rec_Type
1886: ,x_Dim_Set_Rec IN OUT NOCOPY BSC_DIMENSION_SETS_PUB.Bsc_Dim_Set_Rec_Type
1887: ,x_return_status OUT NOCOPY varchar2
1888: ,x_msg_count OUT NOCOPY number

Line 1893: x_return_status := FND_API.G_RET_STS_SUCCESS;

1889: ,x_msg_data OUT NOCOPY varchar2
1890: ) is
1891:
1892: begin
1893: x_return_status := FND_API.G_RET_STS_SUCCESS;
1894: BSC_DIMENSION_SETS_PVT.Retrieve_Dim_Levels( p_commit
1895: ,p_Dim_Set_Rec
1896: ,x_Dim_Set_Rec
1897: ,x_return_status

Line 1902: WHEN FND_API.G_EXC_ERROR THEN

1898: ,x_msg_count
1899: ,x_msg_data);
1900:
1901: EXCEPTION
1902: WHEN FND_API.G_EXC_ERROR THEN
1903: IF (x_msg_data IS NULL) THEN
1904: FND_MSG_PUB.Count_And_Get
1905: ( p_encoded => FND_API.G_FALSE
1906: , p_count => x_msg_count

Line 1905: ( p_encoded => FND_API.G_FALSE

1901: EXCEPTION
1902: WHEN FND_API.G_EXC_ERROR THEN
1903: IF (x_msg_data IS NULL) THEN
1904: FND_MSG_PUB.Count_And_Get
1905: ( p_encoded => FND_API.G_FALSE
1906: , p_count => x_msg_count
1907: , p_data => x_msg_data
1908: );
1909: END IF;

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

1906: , p_count => x_msg_count
1907: , p_data => x_msg_data
1908: );
1909: END IF;
1910: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1911: x_return_status := FND_API.G_RET_STS_ERROR;
1912: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1913: IF (x_msg_data IS NULL) THEN
1914: FND_MSG_PUB.Count_And_Get

Line 1911: x_return_status := FND_API.G_RET_STS_ERROR;

1907: , p_data => x_msg_data
1908: );
1909: END IF;
1910: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1911: x_return_status := FND_API.G_RET_STS_ERROR;
1912: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1913: IF (x_msg_data IS NULL) THEN
1914: FND_MSG_PUB.Count_And_Get
1915: ( p_encoded => FND_API.G_FALSE

Line 1912: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1908: );
1909: END IF;
1910: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1911: x_return_status := FND_API.G_RET_STS_ERROR;
1912: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1913: IF (x_msg_data IS NULL) THEN
1914: FND_MSG_PUB.Count_And_Get
1915: ( p_encoded => FND_API.G_FALSE
1916: , p_count => x_msg_count

Line 1915: ( p_encoded => FND_API.G_FALSE

1911: x_return_status := FND_API.G_RET_STS_ERROR;
1912: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1913: IF (x_msg_data IS NULL) THEN
1914: FND_MSG_PUB.Count_And_Get
1915: ( p_encoded => FND_API.G_FALSE
1916: , p_count => x_msg_count
1917: , p_data => x_msg_data
1918: );
1919: END IF;

Line 1920: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1916: , p_count => x_msg_count
1917: , p_data => x_msg_data
1918: );
1919: END IF;
1920: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1921: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1922: WHEN NO_DATA_FOUND THEN
1923: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1924: IF (x_msg_data IS NOT NULL) THEN

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

1917: , p_data => x_msg_data
1918: );
1919: END IF;
1920: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1921: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1922: WHEN NO_DATA_FOUND THEN
1923: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1924: IF (x_msg_data IS NOT NULL) THEN
1925: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Retrieve_Dim_Levels ';

Line 1923: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1919: END IF;
1920: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1921: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1922: WHEN NO_DATA_FOUND THEN
1923: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1924: IF (x_msg_data IS NOT NULL) THEN
1925: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Retrieve_Dim_Levels ';
1926: ELSE
1927: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Retrieve_Dim_Levels ';

Line 1931: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1927: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Retrieve_Dim_Levels ';
1928: END IF;
1929: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1930: WHEN OTHERS THEN
1931: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1932: IF (x_msg_data IS NOT NULL) THEN
1933: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Retrieve_Dim_Levels ';
1934: ELSE
1935: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Retrieve_Dim_Levels ';

Line 1944: p_commit IN varchar2 := FND_API.G_FALSE

1940: /************************************************************************************
1941: ************************************************************************************/
1942:
1943: procedure Update_Dim_Levels(
1944: p_commit IN varchar2 := FND_API.G_FALSE
1945: ,p_Dim_Set_Rec IN BSC_DIMENSION_SETS_PUB.Bsc_Dim_Set_Rec_Type
1946: ,x_return_status OUT NOCOPY varchar2
1947: ,x_msg_count OUT NOCOPY number
1948: ,x_msg_data OUT NOCOPY varchar2

Line 1953: x_return_status := FND_API.G_RET_STS_SUCCESS;

1949: ) is
1950: l_count NUMBER;
1951: begin
1952: FND_MSG_PUB.Initialize;
1953: x_return_status := FND_API.G_RET_STS_SUCCESS;
1954: BSC_DIMENSION_SETS_PVT.Update_Dim_Levels( p_commit
1955: ,p_Dim_Set_Rec
1956: ,x_return_status
1957: ,x_msg_count

Line 1959: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

1955: ,p_Dim_Set_Rec
1956: ,x_return_status
1957: ,x_msg_count
1958: ,x_msg_data);
1959: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1960: --DBMS_OUTPUT.PUT_LINE('BSC_DIMENSION_SETS_PUB.Reorder_Dim_Levels');
1961: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1962: END IF;
1963:

Line 1961: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1957: ,x_msg_count
1958: ,x_msg_data);
1959: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1960: --DBMS_OUTPUT.PUT_LINE('BSC_DIMENSION_SETS_PUB.Reorder_Dim_Levels');
1961: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1962: END IF;
1963:
1964: -- added to relax checking for mixed type of Dimension Objects within a Dimension
1965: -- for Autogenerated reports and removing the disctiction, BSC 5.3

Line 1966: IF (BIS_UTILITIES_PUB.Enable_Generated_Source_Report = FND_API.G_FALSE) THEN

1962: END IF;
1963:
1964: -- added to relax checking for mixed type of Dimension Objects within a Dimension
1965: -- for Autogenerated reports and removing the disctiction, BSC 5.3
1966: IF (BIS_UTILITIES_PUB.Enable_Generated_Source_Report = FND_API.G_FALSE) THEN
1967: SELECT COUNT(DISTINCT(Level_Source)) INTO l_count
1968: FROM BSC_KPI_DIM_LEVELS_VL
1969: WHERE Indicator = p_Dim_Set_Rec.Bsc_Kpi_Id
1970: AND Dim_Set_Id = p_Dim_Set_Rec.Bsc_Dim_Set_Id

Line 1975: RAISE FND_API.G_EXC_ERROR;

1971: AND Level_Source IS NOT NULL;
1972: IF (l_count > 1) THEN
1973: FND_MESSAGE.SET_NAME('BSC','BSC_NO_MIX_DIM_SET_SOURCE');
1974: FND_MSG_PUB.ADD;
1975: RAISE FND_API.G_EXC_ERROR;
1976: END IF;
1977: END IF;
1978:
1979: -- 09/16 adrao added for bug# 3141813

Line 1989: RAISE FND_API.G_EXC_ERROR;

1985: IF (l_count > BSC_UTILITY.MAX_DIM_IN_DIM_SET) THEN
1986: FND_MESSAGE.SET_NAME('BSC','BSC_DIM_SET_OVERFLOW');
1987: x_msg_data := x_msg_data || bsc_apps.get_message('BSC_DIM_SET_OVERFLOW');
1988: FND_MSG_PUB.ADD;
1989: RAISE FND_API.G_EXC_ERROR;
1990: END IF;
1991:
1992: SELECT COUNT(0) INTO l_count
1993: FROM BSC_KPI_DIM_LEVELS_VL

Line 2001: RAISE FND_API.G_EXC_ERROR;

1997: IF (l_count > 1) THEN -- not more that 1 DimObj can be in comparison within a Dimension Set.
1998: FND_MESSAGE.SET_NAME('BSC','BSC_ONE_DIM_OBJ_IN_COMPARISON'); -- Need to change to a better meaning,
1999: x_msg_data := x_msg_data || bsc_apps.get_message('BSC_ONE_DIM_OBJ_IN_COMPARISON');
2000: FND_MSG_PUB.ADD;
2001: RAISE FND_API.G_EXC_ERROR;
2002: END IF;
2003:
2004: EXCEPTION
2005: WHEN FND_API.G_EXC_ERROR THEN

Line 2005: WHEN FND_API.G_EXC_ERROR THEN

2001: RAISE FND_API.G_EXC_ERROR;
2002: END IF;
2003:
2004: EXCEPTION
2005: WHEN FND_API.G_EXC_ERROR THEN
2006: IF (x_msg_data IS NULL) THEN
2007: FND_MSG_PUB.Count_And_Get
2008: ( p_encoded => FND_API.G_FALSE
2009: , p_count => x_msg_count

Line 2008: ( p_encoded => FND_API.G_FALSE

2004: EXCEPTION
2005: WHEN FND_API.G_EXC_ERROR THEN
2006: IF (x_msg_data IS NULL) THEN
2007: FND_MSG_PUB.Count_And_Get
2008: ( p_encoded => FND_API.G_FALSE
2009: , p_count => x_msg_count
2010: , p_data => x_msg_data
2011: );
2012: END IF;

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

2009: , p_count => x_msg_count
2010: , p_data => x_msg_data
2011: );
2012: END IF;
2013: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
2014: x_return_status := FND_API.G_RET_STS_ERROR;
2015: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2016: IF (x_msg_data IS NULL) THEN
2017: FND_MSG_PUB.Count_And_Get

Line 2014: x_return_status := FND_API.G_RET_STS_ERROR;

2010: , p_data => x_msg_data
2011: );
2012: END IF;
2013: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
2014: x_return_status := FND_API.G_RET_STS_ERROR;
2015: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2016: IF (x_msg_data IS NULL) THEN
2017: FND_MSG_PUB.Count_And_Get
2018: ( p_encoded => FND_API.G_FALSE

Line 2015: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2011: );
2012: END IF;
2013: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
2014: x_return_status := FND_API.G_RET_STS_ERROR;
2015: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2016: IF (x_msg_data IS NULL) THEN
2017: FND_MSG_PUB.Count_And_Get
2018: ( p_encoded => FND_API.G_FALSE
2019: , p_count => x_msg_count

Line 2018: ( p_encoded => FND_API.G_FALSE

2014: x_return_status := FND_API.G_RET_STS_ERROR;
2015: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2016: IF (x_msg_data IS NULL) THEN
2017: FND_MSG_PUB.Count_And_Get
2018: ( p_encoded => FND_API.G_FALSE
2019: , p_count => x_msg_count
2020: , p_data => x_msg_data
2021: );
2022: END IF;

Line 2023: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2019: , p_count => x_msg_count
2020: , p_data => x_msg_data
2021: );
2022: END IF;
2023: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2024: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
2025: WHEN NO_DATA_FOUND THEN
2026: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2027: IF (x_msg_data IS NOT NULL) THEN

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

2020: , p_data => x_msg_data
2021: );
2022: END IF;
2023: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2024: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
2025: WHEN NO_DATA_FOUND THEN
2026: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2027: IF (x_msg_data IS NOT NULL) THEN
2028: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Update_Dim_Levels ';

Line 2026: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2022: END IF;
2023: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2024: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
2025: WHEN NO_DATA_FOUND THEN
2026: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2027: IF (x_msg_data IS NOT NULL) THEN
2028: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Update_Dim_Levels ';
2029: ELSE
2030: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Update_Dim_Levels ';

Line 2034: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2030: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Update_Dim_Levels ';
2031: END IF;
2032: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
2033: WHEN OTHERS THEN
2034: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2035: IF (x_msg_data IS NOT NULL) THEN
2036: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Update_Dim_Levels ';
2037: ELSE
2038: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Update_Dim_Levels ';

Line 2048: p_commit IN VARCHAR2 := FND_API.G_FALSE

2044: ************************************************************************************/
2045:
2046: procedure Delete_Dim_Levels
2047: (
2048: p_commit IN VARCHAR2 := FND_API.G_FALSE
2049: , p_Dim_Set_Rec IN BSC_DIMENSION_SETS_PUB.Bsc_Dim_Set_Rec_Type
2050: , x_return_status OUT NOCOPY VARCHAR2
2051: , x_msg_count OUT NOCOPY NUMBER
2052: , x_msg_data OUT NOCOPY VARCHAR2

Line 2079: x_return_status := FND_API.G_RET_STS_SUCCESS;

2075:
2076: l_sql VARCHAR2(1000);
2077:
2078: begin
2079: x_return_status := FND_API.G_RET_STS_SUCCESS;
2080: IF ((p_Dim_Set_Rec.Bsc_Level_Id IS NULL) AND
2081: (p_Dim_Set_Rec.Bsc_Dim_Level_Group_Id IS NOT NULL)) THEN
2082: -- Set the first values of the Table Record equal to the Record passed.
2083: l_Dim_Set_Rec(1).Bsc_Kpi_Id := p_Dim_Set_Rec.Bsc_Kpi_Id;

Line 2152: WHEN FND_API.G_EXC_ERROR THEN

2148: ,x_msg_count
2149: ,x_msg_data);
2150:
2151: EXCEPTION
2152: WHEN FND_API.G_EXC_ERROR THEN
2153: IF (x_msg_data IS NULL) THEN
2154: FND_MSG_PUB.Count_And_Get
2155: ( p_encoded => FND_API.G_FALSE
2156: , p_count => x_msg_count

Line 2155: ( p_encoded => FND_API.G_FALSE

2151: EXCEPTION
2152: WHEN FND_API.G_EXC_ERROR THEN
2153: IF (x_msg_data IS NULL) THEN
2154: FND_MSG_PUB.Count_And_Get
2155: ( p_encoded => FND_API.G_FALSE
2156: , p_count => x_msg_count
2157: , p_data => x_msg_data
2158: );
2159: END IF;

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

2156: , p_count => x_msg_count
2157: , p_data => x_msg_data
2158: );
2159: END IF;
2160: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
2161: x_return_status := FND_API.G_RET_STS_ERROR;
2162: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2163: IF (x_msg_data IS NULL) THEN
2164: FND_MSG_PUB.Count_And_Get

Line 2161: x_return_status := FND_API.G_RET_STS_ERROR;

2157: , p_data => x_msg_data
2158: );
2159: END IF;
2160: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
2161: x_return_status := FND_API.G_RET_STS_ERROR;
2162: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2163: IF (x_msg_data IS NULL) THEN
2164: FND_MSG_PUB.Count_And_Get
2165: ( p_encoded => FND_API.G_FALSE

Line 2162: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2158: );
2159: END IF;
2160: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
2161: x_return_status := FND_API.G_RET_STS_ERROR;
2162: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2163: IF (x_msg_data IS NULL) THEN
2164: FND_MSG_PUB.Count_And_Get
2165: ( p_encoded => FND_API.G_FALSE
2166: , p_count => x_msg_count

Line 2165: ( p_encoded => FND_API.G_FALSE

2161: x_return_status := FND_API.G_RET_STS_ERROR;
2162: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2163: IF (x_msg_data IS NULL) THEN
2164: FND_MSG_PUB.Count_And_Get
2165: ( p_encoded => FND_API.G_FALSE
2166: , p_count => x_msg_count
2167: , p_data => x_msg_data
2168: );
2169: END IF;

Line 2170: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2166: , p_count => x_msg_count
2167: , p_data => x_msg_data
2168: );
2169: END IF;
2170: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2171: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
2172: WHEN NO_DATA_FOUND THEN
2173: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2174: IF (x_msg_data IS NOT NULL) THEN

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

2167: , p_data => x_msg_data
2168: );
2169: END IF;
2170: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2171: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
2172: WHEN NO_DATA_FOUND THEN
2173: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2174: IF (x_msg_data IS NOT NULL) THEN
2175: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Delete_Dim_Levels ';

Line 2173: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2169: END IF;
2170: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2171: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
2172: WHEN NO_DATA_FOUND THEN
2173: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2174: IF (x_msg_data IS NOT NULL) THEN
2175: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Delete_Dim_Levels ';
2176: ELSE
2177: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Delete_Dim_Levels ';

Line 2181: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2177: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Delete_Dim_Levels ';
2178: END IF;
2179: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
2180: WHEN OTHERS THEN
2181: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2182: IF (x_msg_data IS NOT NULL) THEN
2183: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Delete_Dim_Levels ';
2184: ELSE
2185: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Delete_Dim_Levels ';

Line 2197: p_commit IN varchar2 := FND_API.G_FALSE

2193: --: This procedure updates an analysis option with dimension set information.
2194: --: This procedure is part of the Dimension Set API.
2195:
2196: procedure Update_Kpi_Analysis_Options_B(
2197: p_commit IN varchar2 := FND_API.G_FALSE
2198: ,p_Dim_Set_Rec IN BSC_DIMENSION_SETS_PUB.Bsc_Dim_Set_Rec_Type
2199: ,x_return_status OUT NOCOPY varchar2
2200: ,x_msg_count OUT NOCOPY number
2201: ,x_msg_data OUT NOCOPY varchar2

Line 2204: x_return_status := FND_API.G_RET_STS_SUCCESS;

2200: ,x_msg_count OUT NOCOPY number
2201: ,x_msg_data OUT NOCOPY varchar2
2202: ) is
2203: begin
2204: x_return_status := FND_API.G_RET_STS_SUCCESS;
2205: BSC_DIMENSION_SETS_PVT.Update_Kpi_Analysis_Options_B( p_commit
2206: ,p_Dim_Set_Rec
2207: ,x_return_status
2208: ,x_msg_count

Line 2213: WHEN FND_API.G_EXC_ERROR THEN

2209: ,x_msg_data);
2210: --end if;
2211:
2212: EXCEPTION
2213: WHEN FND_API.G_EXC_ERROR THEN
2214: IF (x_msg_data IS NULL) THEN
2215: FND_MSG_PUB.Count_And_Get
2216: ( p_encoded => FND_API.G_FALSE
2217: , p_count => x_msg_count

Line 2216: ( p_encoded => FND_API.G_FALSE

2212: EXCEPTION
2213: WHEN FND_API.G_EXC_ERROR THEN
2214: IF (x_msg_data IS NULL) THEN
2215: FND_MSG_PUB.Count_And_Get
2216: ( p_encoded => FND_API.G_FALSE
2217: , p_count => x_msg_count
2218: , p_data => x_msg_data
2219: );
2220: END IF;

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

2217: , p_count => x_msg_count
2218: , p_data => x_msg_data
2219: );
2220: END IF;
2221: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
2222: x_return_status := FND_API.G_RET_STS_ERROR;
2223: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2224: IF (x_msg_data IS NULL) THEN
2225: FND_MSG_PUB.Count_And_Get

Line 2222: x_return_status := FND_API.G_RET_STS_ERROR;

2218: , p_data => x_msg_data
2219: );
2220: END IF;
2221: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
2222: x_return_status := FND_API.G_RET_STS_ERROR;
2223: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2224: IF (x_msg_data IS NULL) THEN
2225: FND_MSG_PUB.Count_And_Get
2226: ( p_encoded => FND_API.G_FALSE

Line 2223: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2219: );
2220: END IF;
2221: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
2222: x_return_status := FND_API.G_RET_STS_ERROR;
2223: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2224: IF (x_msg_data IS NULL) THEN
2225: FND_MSG_PUB.Count_And_Get
2226: ( p_encoded => FND_API.G_FALSE
2227: , p_count => x_msg_count

Line 2226: ( p_encoded => FND_API.G_FALSE

2222: x_return_status := FND_API.G_RET_STS_ERROR;
2223: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2224: IF (x_msg_data IS NULL) THEN
2225: FND_MSG_PUB.Count_And_Get
2226: ( p_encoded => FND_API.G_FALSE
2227: , p_count => x_msg_count
2228: , p_data => x_msg_data
2229: );
2230: END IF;

Line 2231: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2227: , p_count => x_msg_count
2228: , p_data => x_msg_data
2229: );
2230: END IF;
2231: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2232: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
2233: WHEN NO_DATA_FOUND THEN
2234: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2235: IF (x_msg_data IS NOT NULL) THEN

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

2228: , p_data => x_msg_data
2229: );
2230: END IF;
2231: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2232: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
2233: WHEN NO_DATA_FOUND THEN
2234: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2235: IF (x_msg_data IS NOT NULL) THEN
2236: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Update_Kpi_Analysis_Options_B ';

Line 2234: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2230: END IF;
2231: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2232: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
2233: WHEN NO_DATA_FOUND THEN
2234: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2235: IF (x_msg_data IS NOT NULL) THEN
2236: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Update_Kpi_Analysis_Options_B ';
2237: ELSE
2238: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Update_Kpi_Analysis_Options_B ';

Line 2242: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2238: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Update_Kpi_Analysis_Options_B ';
2239: END IF;
2240: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
2241: WHEN OTHERS THEN
2242: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2243: IF (x_msg_data IS NOT NULL) THEN
2244: x_msg_data := x_msg_data||' -> BSC_DIMENSION_SETS_PUB.Update_Kpi_Analysis_Options_B ';
2245: ELSE
2246: x_msg_data := SQLERRM||' at BSC_DIMENSION_SETS_PUB.Update_Kpi_Analysis_Options_B ';