APPS.BSC_DIMENSION_LEVELS_PVT dependencies on FND_API

Line 85: p_commit IN varchar2 := FND_API.G_FALSE

81:
82: -- Stubbed for Bug#3739872
83:
84: procedure Create_Dim_Level(
85: p_commit IN varchar2 := FND_API.G_FALSE
86: ,p_Dim_Level_Rec IN BSC_DIMENSION_LEVELS_PUB.Bsc_Dim_Level_Rec_Type
87: ,x_return_status OUT NOCOPY varchar2
88: ,x_msg_count OUT NOCOPY number
89: ,x_msg_data OUT NOCOPY varchar2

Line 93: x_return_status := FND_API.G_RET_STS_SUCCESS;

89: ,x_msg_data OUT NOCOPY varchar2
90: ) is
91:
92: BEGIN
93: x_return_status := FND_API.G_RET_STS_SUCCESS;
94:
95: -- do nothing
96: -- Please use BSC_BIS_DIM_OBJ_PUB.Refresh_BSC_PMF_Dim_View to create views instead
97: NULL;

Line 101: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

97: NULL;
98:
99: EXCEPTION
100: WHEN OTHERS THEN
101: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
102: IF (x_msg_data IS NOT NULL) THEN
103: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Create_Dim_Level ';
104: ELSE
105: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Create_Dim_Level ';

Line 113: p_commit IN varchar2 := FND_API.G_FALSE

109: /************************************************************************************
110: ************************************************************************************/
111:
112: procedure Retrieve_Dim_Level(
113: p_commit IN varchar2 := FND_API.G_FALSE
114: ,p_Dim_Level_Rec IN BSC_DIMENSION_LEVELS_PUB.Bsc_Dim_Level_Rec_Type
115: ,x_Dim_Level_Rec IN OUT NOCOPY BSC_DIMENSION_LEVELS_PUB.Bsc_Dim_Level_Rec_Type
116: ,x_return_status OUT NOCOPY varchar2
117: ,x_msg_count OUT NOCOPY number

Line 124: x_return_status := FND_API.G_RET_STS_SUCCESS;

120:
121: l_count number;
122:
123: begin
124: x_return_status := FND_API.G_RET_STS_SUCCESS;
125: -- This procedure itself does not retrieve anything. The two calls below are usually
126: -- never executed, because the public version calls these procedures.
127:
128: Retrieve_Bsc_Dim_Levels_Md( p_commit

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

131: ,x_return_status
132: ,x_msg_count
133: ,x_msg_data);
134:
135: if (p_commit = FND_API.G_TRUE) then
136: commit;
137: end if;
138:
139: EXCEPTION

Line 140: WHEN FND_API.G_EXC_ERROR THEN

136: commit;
137: end if;
138:
139: EXCEPTION
140: WHEN FND_API.G_EXC_ERROR THEN
141: FND_MSG_PUB.Count_And_Get
142: ( p_encoded => FND_API.G_FALSE
143: , p_count => x_msg_count
144: , p_data => x_msg_data

Line 142: ( p_encoded => FND_API.G_FALSE

138:
139: EXCEPTION
140: WHEN FND_API.G_EXC_ERROR THEN
141: FND_MSG_PUB.Count_And_Get
142: ( p_encoded => FND_API.G_FALSE
143: , p_count => x_msg_count
144: , p_data => x_msg_data
145: );
146: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);

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

142: ( p_encoded => FND_API.G_FALSE
143: , p_count => x_msg_count
144: , p_data => x_msg_data
145: );
146: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
147: x_return_status := FND_API.G_RET_STS_ERROR;
148: RAISE;
149: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
150: FND_MSG_PUB.Count_And_Get

Line 147: x_return_status := FND_API.G_RET_STS_ERROR;

143: , p_count => x_msg_count
144: , p_data => x_msg_data
145: );
146: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
147: x_return_status := FND_API.G_RET_STS_ERROR;
148: RAISE;
149: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
150: FND_MSG_PUB.Count_And_Get
151: ( p_encoded => FND_API.G_FALSE

Line 149: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

145: );
146: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
147: x_return_status := FND_API.G_RET_STS_ERROR;
148: RAISE;
149: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
150: FND_MSG_PUB.Count_And_Get
151: ( p_encoded => FND_API.G_FALSE
152: , p_count => x_msg_count
153: , p_data => x_msg_data

Line 151: ( p_encoded => FND_API.G_FALSE

147: x_return_status := FND_API.G_RET_STS_ERROR;
148: RAISE;
149: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
150: FND_MSG_PUB.Count_And_Get
151: ( p_encoded => FND_API.G_FALSE
152: , p_count => x_msg_count
153: , p_data => x_msg_data
154: );
155: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 155: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

151: ( p_encoded => FND_API.G_FALSE
152: , p_count => x_msg_count
153: , p_data => x_msg_data
154: );
155: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
156: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
157: RAISE;
158: WHEN NO_DATA_FOUND THEN
159: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

152: , p_count => x_msg_count
153: , p_data => x_msg_data
154: );
155: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
156: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
157: RAISE;
158: WHEN NO_DATA_FOUND THEN
159: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
160: IF (x_msg_data IS NOT NULL) THEN

Line 159: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

155: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
156: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
157: RAISE;
158: WHEN NO_DATA_FOUND THEN
159: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
160: IF (x_msg_data IS NOT NULL) THEN
161: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retrieve_Dim_Level ';
162: ELSE
163: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retrieve_Dim_Level ';

Line 168: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

164: END IF;
165: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
166: RAISE;
167: WHEN OTHERS THEN
168: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
169: IF (x_msg_data IS NOT NULL) THEN
170: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retrieve_Dim_Level ';
171: ELSE
172: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retrieve_Dim_Level ';

Line 182: p_commit IN varchar2 := FND_API.G_FALSE

178: /************************************************************************************
179: ************************************************************************************/
180:
181: procedure Update_Dim_Level(
182: p_commit IN varchar2 := FND_API.G_FALSE
183: ,p_Dim_Level_Rec IN BSC_DIMENSION_LEVELS_PUB.Bsc_Dim_Level_Rec_Type
184: ,x_return_status OUT NOCOPY varchar2
185: ,x_msg_count OUT NOCOPY number
186: ,x_msg_data OUT NOCOPY varchar2

Line 192: x_return_status := FND_API.G_RET_STS_SUCCESS;

188:
189: l_dummy varchar2(10);
190:
191: begin
192: x_return_status := FND_API.G_RET_STS_SUCCESS;
193: SAVEPOINT UpdateBSCDimLevPVT;
194: l_dummy := 'dummy';
195:
196: -- This procedure itself does not update anything. The two calls below are usually

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

195:
196: -- This procedure itself does not update anything. The two calls below are usually
197: -- never executed, because the public version calls these procedures.
198:
199: if (p_commit = FND_API.G_TRUE) then
200: commit;
201: end if;
202:
203: EXCEPTION

Line 204: WHEN FND_API.G_EXC_ERROR THEN

200: commit;
201: end if;
202:
203: EXCEPTION
204: WHEN FND_API.G_EXC_ERROR THEN
205: ROLLBACK TO UpdateBSCDimLevPVT;
206: FND_MSG_PUB.Count_And_Get
207: ( p_encoded => FND_API.G_FALSE
208: , p_count => x_msg_count

Line 207: ( p_encoded => FND_API.G_FALSE

203: EXCEPTION
204: WHEN FND_API.G_EXC_ERROR THEN
205: ROLLBACK TO UpdateBSCDimLevPVT;
206: FND_MSG_PUB.Count_And_Get
207: ( p_encoded => FND_API.G_FALSE
208: , p_count => x_msg_count
209: , p_data => x_msg_data
210: );
211: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);

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

207: ( p_encoded => FND_API.G_FALSE
208: , p_count => x_msg_count
209: , p_data => x_msg_data
210: );
211: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
212: x_return_status := FND_API.G_RET_STS_ERROR;
213: RAISE;
214: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
215: ROLLBACK TO UpdateBSCDimLevPVT;

Line 212: x_return_status := FND_API.G_RET_STS_ERROR;

208: , p_count => x_msg_count
209: , p_data => x_msg_data
210: );
211: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
212: x_return_status := FND_API.G_RET_STS_ERROR;
213: RAISE;
214: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
215: ROLLBACK TO UpdateBSCDimLevPVT;
216: FND_MSG_PUB.Count_And_Get

Line 214: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

210: );
211: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
212: x_return_status := FND_API.G_RET_STS_ERROR;
213: RAISE;
214: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
215: ROLLBACK TO UpdateBSCDimLevPVT;
216: FND_MSG_PUB.Count_And_Get
217: ( p_encoded => FND_API.G_FALSE
218: , p_count => x_msg_count

Line 217: ( p_encoded => FND_API.G_FALSE

213: RAISE;
214: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
215: ROLLBACK TO UpdateBSCDimLevPVT;
216: FND_MSG_PUB.Count_And_Get
217: ( p_encoded => FND_API.G_FALSE
218: , p_count => x_msg_count
219: , p_data => x_msg_data
220: );
221: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 221: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

217: ( p_encoded => FND_API.G_FALSE
218: , p_count => x_msg_count
219: , p_data => x_msg_data
220: );
221: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
222: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
223: RAISE;
224: WHEN NO_DATA_FOUND THEN
225: ROLLBACK TO UpdateBSCDimLevPVT;

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

218: , p_count => x_msg_count
219: , p_data => x_msg_data
220: );
221: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
222: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
223: RAISE;
224: WHEN NO_DATA_FOUND THEN
225: ROLLBACK TO UpdateBSCDimLevPVT;
226: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 226: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

222: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
223: RAISE;
224: WHEN NO_DATA_FOUND THEN
225: ROLLBACK TO UpdateBSCDimLevPVT;
226: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
227: IF (x_msg_data IS NOT NULL) THEN
228: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Update_Dim_Level ';
229: ELSE
230: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Update_Dim_Level ';

Line 236: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

232: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
233: RAISE;
234: WHEN OTHERS THEN
235: ROLLBACK TO UpdateBSCDimLevPVT;
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_LEVELS_PVT.Update_Dim_Level ';
239: ELSE
240: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Update_Dim_Level ';

Line 250: p_commit IN varchar2 := FND_API.G_FALSE

246: /************************************************************************************
247: ************************************************************************************/
248:
249: procedure Delete_Dim_Level(
250: p_commit IN varchar2 := FND_API.G_FALSE
251: ,p_Dim_Level_Rec IN BSC_DIMENSION_LEVELS_PUB.Bsc_Dim_Level_Rec_Type
252: ,x_return_status OUT NOCOPY varchar2
253: ,x_msg_count OUT NOCOPY number
254: ,x_msg_data OUT NOCOPY varchar2

Line 269: x_return_status := FND_API.G_RET_STS_SUCCESS;

265: NVL(SOURCE, 'BSC') SOURCE
266: FROM BSC_SYS_DIM_LEVELS_B
267: WHERE DIM_LEVEL_ID = p_Dim_Level_Rec.Bsc_Level_Id;
268: begin
269: x_return_status := FND_API.G_RET_STS_SUCCESS;
270: FND_MSG_PUB.Initialize;
271: SAVEPOINT DeleteBSCDimLevPVT;
272: BSC_APPS.Init_Bsc_Apps;
273:

Line 282: RAISE FND_API.G_EXC_ERROR;

278: if l_count = 0 then
279: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_LEVEL_ID');
280: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Dim_Level_Rec.Bsc_Level_Id);
281: FND_MSG_PUB.ADD;
282: RAISE FND_API.G_EXC_ERROR;
283: end if;
284: else
285: FND_MESSAGE.SET_NAME('BSC','BSC_NO_LEVEL_ID_ENTERED');
286: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Dim_Level_Rec.Bsc_Level_Id);

Line 288: RAISE FND_API.G_EXC_ERROR;

284: else
285: FND_MESSAGE.SET_NAME('BSC','BSC_NO_LEVEL_ID_ENTERED');
286: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Dim_Level_Rec.Bsc_Level_Id);
287: FND_MSG_PUB.ADD;
288: RAISE FND_API.G_EXC_ERROR;
289: end if;
290: IF ((l_Dim_Level_Rec.Bsc_Level_Name IS NOT NULL) OR
291: (l_Dim_Level_Rec.Bsc_Level_View_Name IS NOT NULL) OR
292: (l_Dim_Level_Rec.Bsc_Source IS NOT NULL)) THEN

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

358: , x_return_status => x_return_status
359: , x_msg_Count => x_msg_Count
360: , x_msg_data => x_msg_data
361: );
362: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
363: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
364: END IF;
365: END IF;
366: if (p_commit = FND_API.G_TRUE) then

Line 363: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

359: , x_msg_Count => x_msg_Count
360: , x_msg_data => x_msg_data
361: );
362: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
363: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
364: END IF;
365: END IF;
366: if (p_commit = FND_API.G_TRUE) then
367: commit;

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

362: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
363: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
364: END IF;
365: END IF;
366: if (p_commit = FND_API.G_TRUE) then
367: commit;
368: end if;
369:
370: EXCEPTION

Line 371: WHEN FND_API.G_EXC_ERROR THEN

367: commit;
368: end if;
369:
370: EXCEPTION
371: WHEN FND_API.G_EXC_ERROR THEN
372: IF (c_drop_tabs%ISOPEN) THEN
373: CLOSE c_drop_tabs;
374: END IF;
375: ROLLBACK TO DeleteBSCDimLevPVT;

Line 377: ( p_encoded => FND_API.G_FALSE

373: CLOSE c_drop_tabs;
374: END IF;
375: ROLLBACK TO DeleteBSCDimLevPVT;
376: FND_MSG_PUB.Count_And_Get
377: ( p_encoded => FND_API.G_FALSE
378: , p_count => x_msg_count
379: , p_data => x_msg_data
380: );
381: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);

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

377: ( p_encoded => FND_API.G_FALSE
378: , p_count => x_msg_count
379: , p_data => x_msg_data
380: );
381: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
382: x_return_status := FND_API.G_RET_STS_ERROR;
383: RAISE;
384: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
385: IF (c_drop_tabs%ISOPEN) THEN

Line 382: x_return_status := FND_API.G_RET_STS_ERROR;

378: , p_count => x_msg_count
379: , p_data => x_msg_data
380: );
381: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
382: x_return_status := FND_API.G_RET_STS_ERROR;
383: RAISE;
384: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
385: IF (c_drop_tabs%ISOPEN) THEN
386: CLOSE c_drop_tabs;

Line 384: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

380: );
381: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
382: x_return_status := FND_API.G_RET_STS_ERROR;
383: RAISE;
384: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
385: IF (c_drop_tabs%ISOPEN) THEN
386: CLOSE c_drop_tabs;
387: END IF;
388: ROLLBACK TO DeleteBSCDimLevPVT;

Line 390: ( p_encoded => FND_API.G_FALSE

386: CLOSE c_drop_tabs;
387: END IF;
388: ROLLBACK TO DeleteBSCDimLevPVT;
389: FND_MSG_PUB.Count_And_Get
390: ( p_encoded => FND_API.G_FALSE
391: , p_count => x_msg_count
392: , p_data => x_msg_data
393: );
394: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 394: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

390: ( p_encoded => FND_API.G_FALSE
391: , p_count => x_msg_count
392: , p_data => x_msg_data
393: );
394: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
395: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
396: RAISE;
397: WHEN NO_DATA_FOUND THEN
398: IF (c_drop_tabs%ISOPEN) THEN

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

391: , p_count => x_msg_count
392: , p_data => x_msg_data
393: );
394: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
395: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
396: RAISE;
397: WHEN NO_DATA_FOUND THEN
398: IF (c_drop_tabs%ISOPEN) THEN
399: CLOSE c_drop_tabs;

Line 402: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

398: IF (c_drop_tabs%ISOPEN) THEN
399: CLOSE c_drop_tabs;
400: END IF;
401: ROLLBACK TO DeleteBSCDimLevPVT;
402: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
403: IF (x_msg_data IS NOT NULL) THEN
404: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level ';
405: ELSE
406: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level ';

Line 415: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

411: IF (c_drop_tabs%ISOPEN) THEN
412: CLOSE c_drop_tabs;
413: END IF;
414: ROLLBACK TO DeleteBSCDimLevPVT;
415: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
416: IF (x_msg_data IS NOT NULL) THEN
417: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level ';
418: ELSE
419: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level ';

Line 434: p_commit IN varchar2 := FND_API.G_FALSE

430: --: dimension id, dimension names, dimension view/table columns.
431: --: This procedure is part of the Dimension API.
432:
433: procedure Create_Bsc_Dim_Levels_Md(
434: p_commit IN varchar2 := FND_API.G_FALSE
435: ,p_Dim_Level_Rec IN BSC_DIMENSION_LEVELS_PUB.Bsc_Dim_Level_Rec_Type
436: ,x_return_status OUT NOCOPY varchar2
437: ,x_msg_count OUT NOCOPY number
438: ,x_msg_data OUT NOCOPY varchar2

Line 445: x_return_status := FND_API.G_RET_STS_SUCCESS;

441: l_Dim_Level_Rec BSC_DIMENSION_LEVELS_PUB.Bsc_Dim_Level_Rec_Type;
442: l_count number;
443: l_level_view_name VARCHAR2(30);
444: begin
445: x_return_status := FND_API.G_RET_STS_SUCCESS;
446: l_Dim_Level_Rec := p_Dim_Level_Rec;
447:
448: SAVEPOINT CreateBSCDimLevMdPVT;
449: FND_MSG_PUB.Initialize;

Line 457: RAISE FND_API.G_EXC_ERROR;

453: if l_count <> 0 then
454: FND_MESSAGE.SET_NAME('BSC','BSC_LEVEL_ID_EXISTS');
455: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Dim_Level_Rec.Bsc_Level_Id);
456: FND_MSG_PUB.ADD;
457: RAISE FND_API.G_EXC_ERROR;
458: end if;
459: else
460: FND_MESSAGE.SET_NAME('BSC','BSC_NO_LEVEL_ID_ENTERED');
461: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Dim_Level_Rec.Bsc_Level_Id);

Line 463: RAISE FND_API.G_EXC_ERROR;

459: else
460: FND_MESSAGE.SET_NAME('BSC','BSC_NO_LEVEL_ID_ENTERED');
461: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Dim_Level_Rec.Bsc_Level_Id);
462: FND_MSG_PUB.ADD;
463: RAISE FND_API.G_EXC_ERROR;
464: end if;
465:
466: g_db_object := 'BSC_SYS_DIM_LEVELS_B';
467:

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

539: FROM BSC_SYS_DIM_LEVELS_TL T
540: WHERE T.DIM_LEVEL_ID = p_Dim_Level_Rec.Bsc_Level_Id
541: AND T.LANGUAGE = L.LANGUAGE_CODE);
542:
543: if (p_commit = FND_API.G_TRUE) then
544: commit;
545: end if;
546:
547: EXCEPTION

Line 548: WHEN FND_API.G_EXC_ERROR THEN

544: commit;
545: end if;
546:
547: EXCEPTION
548: WHEN FND_API.G_EXC_ERROR THEN
549: ROLLBACK TO CreateBSCDimLevMdPVT;
550: FND_MSG_PUB.Count_And_Get
551: ( p_encoded => FND_API.G_FALSE
552: , p_count => x_msg_count

Line 551: ( p_encoded => FND_API.G_FALSE

547: EXCEPTION
548: WHEN FND_API.G_EXC_ERROR THEN
549: ROLLBACK TO CreateBSCDimLevMdPVT;
550: FND_MSG_PUB.Count_And_Get
551: ( p_encoded => FND_API.G_FALSE
552: , p_count => x_msg_count
553: , p_data => x_msg_data
554: );
555: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);

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

551: ( p_encoded => FND_API.G_FALSE
552: , p_count => x_msg_count
553: , p_data => x_msg_data
554: );
555: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
556: x_return_status := FND_API.G_RET_STS_ERROR;
557: RAISE;
558: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
559: ROLLBACK TO CreateBSCDimLevMdPVT;

Line 556: x_return_status := FND_API.G_RET_STS_ERROR;

552: , p_count => x_msg_count
553: , p_data => x_msg_data
554: );
555: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
556: x_return_status := FND_API.G_RET_STS_ERROR;
557: RAISE;
558: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
559: ROLLBACK TO CreateBSCDimLevMdPVT;
560: FND_MSG_PUB.Count_And_Get

Line 558: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

554: );
555: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
556: x_return_status := FND_API.G_RET_STS_ERROR;
557: RAISE;
558: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
559: ROLLBACK TO CreateBSCDimLevMdPVT;
560: FND_MSG_PUB.Count_And_Get
561: ( p_encoded => FND_API.G_FALSE
562: , p_count => x_msg_count

Line 561: ( p_encoded => FND_API.G_FALSE

557: RAISE;
558: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
559: ROLLBACK TO CreateBSCDimLevMdPVT;
560: FND_MSG_PUB.Count_And_Get
561: ( p_encoded => FND_API.G_FALSE
562: , p_count => x_msg_count
563: , p_data => x_msg_data
564: );
565: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 565: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

561: ( p_encoded => FND_API.G_FALSE
562: , p_count => x_msg_count
563: , p_data => x_msg_data
564: );
565: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
566: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
567: RAISE;
568: WHEN NO_DATA_FOUND THEN
569: ROLLBACK TO CreateBSCDimLevMdPVT;

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

562: , p_count => x_msg_count
563: , p_data => x_msg_data
564: );
565: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
566: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
567: RAISE;
568: WHEN NO_DATA_FOUND THEN
569: ROLLBACK TO CreateBSCDimLevMdPVT;
570: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 570: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

566: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
567: RAISE;
568: WHEN NO_DATA_FOUND THEN
569: ROLLBACK TO CreateBSCDimLevMdPVT;
570: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
571: IF (x_msg_data IS NOT NULL) THEN
572: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Dim_Levels_Md ';
573: ELSE
574: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Dim_Levels_Md ';

Line 584: RAISE FND_API.G_EXC_ERROR;

580: if (SQLCODE = -01400) then
581: FND_MESSAGE.SET_NAME('BSC','BSC_TABLE_NULL_VALUE');
582: FND_MESSAGE.SET_TOKEN('BSC_OBJECT', g_db_object);
583: FND_MSG_PUB.ADD;
584: RAISE FND_API.G_EXC_ERROR;
585: end if;
586: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
587: IF (x_msg_data IS NOT NULL) THEN
588: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Dim_Levels_Md ';

Line 586: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

582: FND_MESSAGE.SET_TOKEN('BSC_OBJECT', g_db_object);
583: FND_MSG_PUB.ADD;
584: RAISE FND_API.G_EXC_ERROR;
585: end if;
586: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
587: IF (x_msg_data IS NOT NULL) THEN
588: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Dim_Levels_Md ';
589: ELSE
590: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Dim_Levels_Md ';

Line 600: p_commit IN varchar2 := FND_API.G_FALSE

596: /************************************************************************************
597: ************************************************************************************/
598:
599: procedure Retrieve_Bsc_Dim_Levels_Md(
600: p_commit IN varchar2 := FND_API.G_FALSE
601: ,p_Dim_Level_Rec IN BSC_DIMENSION_LEVELS_PUB.Bsc_Dim_Level_Rec_Type
602: ,x_Dim_Level_Rec IN OUT NOCOPY BSC_DIMENSION_LEVELS_PUB.Bsc_Dim_Level_Rec_Type
603: ,x_return_status OUT NOCOPY varchar2
604: ,x_msg_count OUT NOCOPY number

Line 610: x_return_status:= FND_API.G_RET_STS_SUCCESS;

606: ) is
607:
608: begin
609:
610: x_return_status:= FND_API.G_RET_STS_SUCCESS;
611: FND_MSG_PUB.Initialize;
612: g_db_object := 'Retrieve_Bsc_Dim_Levels_Md';
613:
614: select a.level_view_name

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

659: and a.dim_level_id = p_Dim_Level_Rec.Bsc_Level_Id
660: and b.language = NVL(p_Dim_Level_Rec.Bsc_Language,USERENV('LANG')); --Bug #3528143
661:
662:
663: if (p_commit = FND_API.G_TRUE) then
664: commit;
665: end if;
666:
667: EXCEPTION

Line 668: WHEN FND_API.G_EXC_ERROR THEN

664: commit;
665: end if;
666:
667: EXCEPTION
668: WHEN FND_API.G_EXC_ERROR THEN
669: FND_MSG_PUB.Count_And_Get
670: ( p_encoded => FND_API.G_FALSE
671: , p_count => x_msg_count
672: , p_data => x_msg_data

Line 670: ( p_encoded => FND_API.G_FALSE

666:
667: EXCEPTION
668: WHEN FND_API.G_EXC_ERROR THEN
669: FND_MSG_PUB.Count_And_Get
670: ( p_encoded => FND_API.G_FALSE
671: , p_count => x_msg_count
672: , p_data => x_msg_data
673: );
674: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);

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

670: ( p_encoded => FND_API.G_FALSE
671: , p_count => x_msg_count
672: , p_data => x_msg_data
673: );
674: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
675: x_return_status := FND_API.G_RET_STS_ERROR;
676: RAISE;
677: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
678: FND_MSG_PUB.Count_And_Get

Line 675: x_return_status := FND_API.G_RET_STS_ERROR;

671: , p_count => x_msg_count
672: , p_data => x_msg_data
673: );
674: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
675: x_return_status := FND_API.G_RET_STS_ERROR;
676: RAISE;
677: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
678: FND_MSG_PUB.Count_And_Get
679: ( p_encoded => FND_API.G_FALSE

Line 677: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

673: );
674: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
675: x_return_status := FND_API.G_RET_STS_ERROR;
676: RAISE;
677: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
678: FND_MSG_PUB.Count_And_Get
679: ( p_encoded => FND_API.G_FALSE
680: , p_count => x_msg_count
681: , p_data => x_msg_data

Line 679: ( p_encoded => FND_API.G_FALSE

675: x_return_status := FND_API.G_RET_STS_ERROR;
676: RAISE;
677: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
678: FND_MSG_PUB.Count_And_Get
679: ( p_encoded => FND_API.G_FALSE
680: , p_count => x_msg_count
681: , p_data => x_msg_data
682: );
683: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 683: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

679: ( p_encoded => FND_API.G_FALSE
680: , p_count => x_msg_count
681: , p_data => x_msg_data
682: );
683: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
684: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
685: RAISE;
686: WHEN NO_DATA_FOUND THEN
687: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

680: , p_count => x_msg_count
681: , p_data => x_msg_data
682: );
683: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
684: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
685: RAISE;
686: WHEN NO_DATA_FOUND THEN
687: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
688: IF (x_msg_data IS NOT NULL) THEN

Line 687: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

683: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
684: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
685: RAISE;
686: WHEN NO_DATA_FOUND THEN
687: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
688: IF (x_msg_data IS NOT NULL) THEN
689: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retrieve_Bsc_Dim_Levels_Md ';
690: ELSE
691: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retrieve_Bsc_Dim_Levels_Md ';

Line 696: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

692: END IF;
693: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
694: RAISE;
695: WHEN OTHERS THEN
696: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
697: IF (x_msg_data IS NOT NULL) THEN
698: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retrieve_Bsc_Dim_Levels_Md ';
699: ELSE
700: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retrieve_Bsc_Dim_Levels_Md ';

Line 710: p_commit IN varchar2 := FND_API.G_FALSE

706: /************************************************************************************
707: ************************************************************************************/
708:
709: procedure Update_Bsc_Dim_Levels_Md(
710: p_commit IN varchar2 := FND_API.G_FALSE
711: ,p_Dim_Level_Rec IN BSC_DIMENSION_LEVELS_PUB.Bsc_Dim_Level_Rec_Type
712: ,x_return_status OUT NOCOPY varchar2
713: ,x_msg_count OUT NOCOPY number
714: ,x_msg_data OUT NOCOPY varchar2

Line 722: x_return_status := FND_API.G_RET_STS_SUCCESS;

718: l_level_view_name VARCHAR2(30);
719: l_count number;
720:
721: begin
722: x_return_status := FND_API.G_RET_STS_SUCCESS;
723: FND_MSG_PUB.Initialize;
724: SAVEPOINT UpdateBSCDimLevMdPVT;
725: -- Check that valid level id was entered.
726: if p_Dim_Level_Rec.Bsc_Level_Id is not null then

Line 732: RAISE FND_API.G_EXC_ERROR;

728: if l_count = 0 then
729: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_LEVEL_ID');
730: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Dim_Level_Rec.Bsc_Level_Id);
731: FND_MSG_PUB.ADD;
732: RAISE FND_API.G_EXC_ERROR;
733: end if;
734: else
735: FND_MESSAGE.SET_NAME('BSC','BSC_NO_LEVEL_ID_ENTERED');
736: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Dim_Level_Rec.Bsc_Level_Id);

Line 738: RAISE FND_API.G_EXC_ERROR;

734: else
735: FND_MESSAGE.SET_NAME('BSC','BSC_NO_LEVEL_ID_ENTERED');
736: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Dim_Level_Rec.Bsc_Level_Id);
737: FND_MSG_PUB.ADD;
738: RAISE FND_API.G_EXC_ERROR;
739: end if;
740:
741: -- Not all values will be passed. We need to make sure values not passed are not
742: -- changed by procedure, therefore we get what is there before we do any updates.

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

850: ,SOURCE_LANG = userenv('LANG')
851: where dim_level_id = l_Dim_Level_Rec.Bsc_Level_Id
852: and userenv('LANG') IN (LANGUAGE, SOURCE_LANG);
853:
854: if (p_commit = FND_API.G_TRUE) then
855: commit;
856: end if;
857:
858: EXCEPTION

Line 859: WHEN FND_API.G_EXC_ERROR THEN

855: commit;
856: end if;
857:
858: EXCEPTION
859: WHEN FND_API.G_EXC_ERROR THEN
860: ROLLBACK TO UpdateBSCDimLevMdPVT;
861: FND_MSG_PUB.Count_And_Get
862: ( p_encoded => FND_API.G_FALSE
863: , p_count => x_msg_count

Line 862: ( p_encoded => FND_API.G_FALSE

858: EXCEPTION
859: WHEN FND_API.G_EXC_ERROR THEN
860: ROLLBACK TO UpdateBSCDimLevMdPVT;
861: FND_MSG_PUB.Count_And_Get
862: ( p_encoded => FND_API.G_FALSE
863: , p_count => x_msg_count
864: , p_data => x_msg_data
865: );
866: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);

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

862: ( p_encoded => FND_API.G_FALSE
863: , p_count => x_msg_count
864: , p_data => x_msg_data
865: );
866: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
867: x_return_status := FND_API.G_RET_STS_ERROR;
868: RAISE;
869: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
870: ROLLBACK TO UpdateBSCDimLevMdPVT;

Line 867: x_return_status := FND_API.G_RET_STS_ERROR;

863: , p_count => x_msg_count
864: , p_data => x_msg_data
865: );
866: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
867: x_return_status := FND_API.G_RET_STS_ERROR;
868: RAISE;
869: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
870: ROLLBACK TO UpdateBSCDimLevMdPVT;
871: FND_MSG_PUB.Count_And_Get

Line 869: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

865: );
866: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
867: x_return_status := FND_API.G_RET_STS_ERROR;
868: RAISE;
869: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
870: ROLLBACK TO UpdateBSCDimLevMdPVT;
871: FND_MSG_PUB.Count_And_Get
872: ( p_encoded => FND_API.G_FALSE
873: , p_count => x_msg_count

Line 872: ( p_encoded => FND_API.G_FALSE

868: RAISE;
869: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
870: ROLLBACK TO UpdateBSCDimLevMdPVT;
871: FND_MSG_PUB.Count_And_Get
872: ( p_encoded => FND_API.G_FALSE
873: , p_count => x_msg_count
874: , p_data => x_msg_data
875: );
876: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 876: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

872: ( p_encoded => FND_API.G_FALSE
873: , p_count => x_msg_count
874: , p_data => x_msg_data
875: );
876: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
877: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
878: RAISE;
879: WHEN NO_DATA_FOUND THEN
880: ROLLBACK TO UpdateBSCDimLevMdPVT;

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

873: , p_count => x_msg_count
874: , p_data => x_msg_data
875: );
876: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
877: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
878: RAISE;
879: WHEN NO_DATA_FOUND THEN
880: ROLLBACK TO UpdateBSCDimLevMdPVT;
881: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 881: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

877: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
878: RAISE;
879: WHEN NO_DATA_FOUND THEN
880: ROLLBACK TO UpdateBSCDimLevMdPVT;
881: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
882: IF (x_msg_data IS NOT NULL) THEN
883: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Dim_Levels_Md ';
884: ELSE
885: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Dim_Levels_Md ';

Line 891: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

887: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
888: RAISE;
889: WHEN OTHERS THEN
890: ROLLBACK TO UpdateBSCDimLevMdPVT;
891: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
892: IF (x_msg_data IS NOT NULL) THEN
893: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Dim_Levels_Md ';
894: ELSE
895: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Dim_Levels_Md ';

Line 905: p_commit IN varchar2 := FND_API.G_FALSE

901: /************************************************************************************
902: ************************************************************************************/
903:
904: procedure Delete_Bsc_Dim_Levels_Md(
905: p_commit IN varchar2 := FND_API.G_FALSE
906: ,p_Dim_Level_Rec IN BSC_DIMENSION_LEVELS_PUB.Bsc_Dim_Level_Rec_Type
907: ,x_return_status OUT NOCOPY varchar2
908: ,x_msg_count OUT NOCOPY number
909: ,x_msg_data OUT NOCOPY varchar2

Line 917: x_return_status := FND_API.G_RET_STS_SUCCESS;

913:
914: l_sql varchar2(1000);
915:
916: begin
917: x_return_status := FND_API.G_RET_STS_SUCCESS;
918: SAVEPOINT DeleteBSCDimLevMdPVT;
919: delete from BSC_SYS_DIM_LEVELS_B
920: where dim_level_id = p_Dim_Level_Rec.Bsc_Level_Id;
921:

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

930: --delete dimension from relationships
931: DELETE FROM BSC_SYS_DIM_LEVEL_RELS
932: WHERE dim_level_id = p_Dim_Level_Rec.Bsc_Level_Id
933: OR parent_dim_level_id = p_Dim_Level_Rec.Bsc_Level_Id;
934: if (p_commit = FND_API.G_TRUE) then
935: commit;
936: end if;
937:
938: EXCEPTION

Line 939: WHEN FND_API.G_EXC_ERROR THEN

935: commit;
936: end if;
937:
938: EXCEPTION
939: WHEN FND_API.G_EXC_ERROR THEN
940: ROLLBACK TO DeleteBSCDimLevMdPVT;
941: FND_MSG_PUB.Count_And_Get
942: ( p_encoded => FND_API.G_FALSE
943: , p_count => x_msg_count

Line 942: ( p_encoded => FND_API.G_FALSE

938: EXCEPTION
939: WHEN FND_API.G_EXC_ERROR THEN
940: ROLLBACK TO DeleteBSCDimLevMdPVT;
941: FND_MSG_PUB.Count_And_Get
942: ( p_encoded => FND_API.G_FALSE
943: , p_count => x_msg_count
944: , p_data => x_msg_data
945: );
946: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);

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

942: ( p_encoded => FND_API.G_FALSE
943: , p_count => x_msg_count
944: , p_data => x_msg_data
945: );
946: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
947: x_return_status := FND_API.G_RET_STS_ERROR;
948: RAISE;
949: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
950: ROLLBACK TO DeleteBSCDimLevMdPVT;

Line 947: x_return_status := FND_API.G_RET_STS_ERROR;

943: , p_count => x_msg_count
944: , p_data => x_msg_data
945: );
946: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
947: x_return_status := FND_API.G_RET_STS_ERROR;
948: RAISE;
949: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
950: ROLLBACK TO DeleteBSCDimLevMdPVT;
951: FND_MSG_PUB.Count_And_Get

Line 949: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

945: );
946: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
947: x_return_status := FND_API.G_RET_STS_ERROR;
948: RAISE;
949: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
950: ROLLBACK TO DeleteBSCDimLevMdPVT;
951: FND_MSG_PUB.Count_And_Get
952: ( p_encoded => FND_API.G_FALSE
953: , p_count => x_msg_count

Line 952: ( p_encoded => FND_API.G_FALSE

948: RAISE;
949: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
950: ROLLBACK TO DeleteBSCDimLevMdPVT;
951: FND_MSG_PUB.Count_And_Get
952: ( p_encoded => FND_API.G_FALSE
953: , p_count => x_msg_count
954: , p_data => x_msg_data
955: );
956: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 956: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

952: ( p_encoded => FND_API.G_FALSE
953: , p_count => x_msg_count
954: , p_data => x_msg_data
955: );
956: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
957: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
958: RAISE;
959: WHEN NO_DATA_FOUND THEN
960: ROLLBACK TO DeleteBSCDimLevMdPVT;

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

953: , p_count => x_msg_count
954: , p_data => x_msg_data
955: );
956: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
957: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
958: RAISE;
959: WHEN NO_DATA_FOUND THEN
960: ROLLBACK TO DeleteBSCDimLevMdPVT;
961: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 961: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

957: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
958: RAISE;
959: WHEN NO_DATA_FOUND THEN
960: ROLLBACK TO DeleteBSCDimLevMdPVT;
961: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
962: IF (x_msg_data IS NOT NULL) THEN
963: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Dim_Levels_Md ';
964: ELSE
965: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Dim_Levels_Md ';

Line 971: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

967: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
968: RAISE;
969: WHEN OTHERS THEN
970: ROLLBACK TO DeleteBSCDimLevMdPVT;
971: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
972: IF (x_msg_data IS NOT NULL) THEN
973: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Dim_Levels_Md ';
974: ELSE
975: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Dim_Levels_Md ';

Line 988: p_commit IN varchar2 := FND_API.G_FALSE

984: --: This procedure populates column information for the Dimension view/table.
985: --: This procedure is part of the Dimension API.
986:
987: procedure Create_Bsc_Sys_Dim_Lvl_Cols(
988: p_commit IN varchar2 := FND_API.G_FALSE
989: ,p_Dim_Level_Rec IN BSC_DIMENSION_LEVELS_PUB.Bsc_Dim_Level_Rec_Type
990: ,x_return_status OUT NOCOPY varchar2
991: ,x_msg_count OUT NOCOPY number
992: ,x_msg_data OUT NOCOPY varchar2

Line 998: x_return_status := FND_API.G_RET_STS_SUCCESS;

994:
995: l_count number;
996:
997: begin
998: x_return_status := FND_API.G_RET_STS_SUCCESS;
999: FND_MSG_PUB.Initialize;
1000: SAVEPOINT CreateBSCSysDimLevColsPVT;
1001: -- Validate Level Id exists.
1002: if p_Dim_Level_Rec.Bsc_Level_Id is not null then

Line 1008: RAISE FND_API.G_EXC_ERROR;

1004: if l_count <> 1 then
1005: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_LEVEL_ID');
1006: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Dim_Level_Rec.Bsc_Level_Id);
1007: FND_MSG_PUB.ADD;
1008: RAISE FND_API.G_EXC_ERROR;
1009: end if;
1010: else
1011: FND_MESSAGE.SET_NAME('BSC','BSC_NO_LEVEL_ID_ENTERED');
1012: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Dim_Level_Rec.Bsc_Level_Id);

Line 1014: RAISE FND_API.G_EXC_ERROR;

1010: else
1011: FND_MESSAGE.SET_NAME('BSC','BSC_NO_LEVEL_ID_ENTERED');
1012: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Dim_Level_Rec.Bsc_Level_Id);
1013: FND_MSG_PUB.ADD;
1014: RAISE FND_API.G_EXC_ERROR;
1015: end if;
1016:
1017: g_db_object := 'BSC_SYS_DIM_LEVEL_COLS';
1018:

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

1023: values( p_Dim_Level_Rec.Bsc_Level_Id
1024: ,p_Dim_Level_Rec.Bsc_Level_Column_Name
1025: ,p_Dim_Level_Rec.Bsc_Level_Column_Type);
1026:
1027: if (p_commit = FND_API.G_TRUE) then
1028: commit;
1029: end if;
1030:
1031: EXCEPTION

Line 1032: WHEN FND_API.G_EXC_ERROR THEN

1028: commit;
1029: end if;
1030:
1031: EXCEPTION
1032: WHEN FND_API.G_EXC_ERROR THEN
1033: ROLLBACK TO CreateBSCSysDimLevColsPVT;
1034: FND_MSG_PUB.Count_And_Get
1035: ( p_encoded => FND_API.G_FALSE
1036: , p_count => x_msg_count

Line 1035: ( p_encoded => FND_API.G_FALSE

1031: EXCEPTION
1032: WHEN FND_API.G_EXC_ERROR THEN
1033: ROLLBACK TO CreateBSCSysDimLevColsPVT;
1034: FND_MSG_PUB.Count_And_Get
1035: ( p_encoded => FND_API.G_FALSE
1036: , p_count => x_msg_count
1037: , p_data => x_msg_data
1038: );
1039: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);

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

1035: ( p_encoded => FND_API.G_FALSE
1036: , p_count => x_msg_count
1037: , p_data => x_msg_data
1038: );
1039: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1040: x_return_status := FND_API.G_RET_STS_ERROR;
1041: RAISE;
1042: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1043: ROLLBACK TO CreateBSCSysDimLevColsPVT;

Line 1040: x_return_status := FND_API.G_RET_STS_ERROR;

1036: , p_count => x_msg_count
1037: , p_data => x_msg_data
1038: );
1039: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1040: x_return_status := FND_API.G_RET_STS_ERROR;
1041: RAISE;
1042: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1043: ROLLBACK TO CreateBSCSysDimLevColsPVT;
1044: FND_MSG_PUB.Count_And_Get

Line 1042: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1038: );
1039: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1040: x_return_status := FND_API.G_RET_STS_ERROR;
1041: RAISE;
1042: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1043: ROLLBACK TO CreateBSCSysDimLevColsPVT;
1044: FND_MSG_PUB.Count_And_Get
1045: ( p_encoded => FND_API.G_FALSE
1046: , p_count => x_msg_count

Line 1045: ( p_encoded => FND_API.G_FALSE

1041: RAISE;
1042: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1043: ROLLBACK TO CreateBSCSysDimLevColsPVT;
1044: FND_MSG_PUB.Count_And_Get
1045: ( p_encoded => FND_API.G_FALSE
1046: , p_count => x_msg_count
1047: , p_data => x_msg_data
1048: );
1049: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1049: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1045: ( p_encoded => FND_API.G_FALSE
1046: , p_count => x_msg_count
1047: , p_data => x_msg_data
1048: );
1049: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1050: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1051: RAISE;
1052: WHEN NO_DATA_FOUND THEN
1053: ROLLBACK TO CreateBSCSysDimLevColsPVT;

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

1046: , p_count => x_msg_count
1047: , p_data => x_msg_data
1048: );
1049: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1050: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1051: RAISE;
1052: WHEN NO_DATA_FOUND THEN
1053: ROLLBACK TO CreateBSCSysDimLevColsPVT;
1054: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1054: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1050: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1051: RAISE;
1052: WHEN NO_DATA_FOUND THEN
1053: ROLLBACK TO CreateBSCSysDimLevColsPVT;
1054: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1055: IF (x_msg_data IS NOT NULL) THEN
1056: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Sys_Dim_Lvl_Cols ';
1057: ELSE
1058: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Sys_Dim_Lvl_Cols ';

Line 1064: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1060: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1061: RAISE;
1062: WHEN OTHERS THEN
1063: ROLLBACK TO CreateBSCSysDimLevColsPVT;
1064: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1065: if (SQLCODE = -01400) then
1066: FND_MESSAGE.SET_NAME('BSC','BSC_TABLE_NULL_VALUE');
1067: FND_MESSAGE.SET_TOKEN('BSC_OBJECT', g_db_object);
1068: FND_MSG_PUB.ADD;

Line 1069: RAISE FND_API.G_EXC_ERROR;

1065: if (SQLCODE = -01400) then
1066: FND_MESSAGE.SET_NAME('BSC','BSC_TABLE_NULL_VALUE');
1067: FND_MESSAGE.SET_TOKEN('BSC_OBJECT', g_db_object);
1068: FND_MSG_PUB.ADD;
1069: RAISE FND_API.G_EXC_ERROR;
1070: end if;
1071: IF (x_msg_data IS NOT NULL) THEN
1072: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Create_Bsc_Sys_Dim_Lvl_Cols ';
1073: ELSE

Line 1084: p_commit IN varchar2 := FND_API.G_FALSE

1080: /************************************************************************************
1081: ************************************************************************************/
1082:
1083: procedure Retrieve_Bsc_Sys_Dim_Lvl_Cols(
1084: p_commit IN varchar2 := FND_API.G_FALSE
1085: ,p_Dim_Level_Rec IN BSC_DIMENSION_LEVELS_PUB.Bsc_Dim_Level_Rec_Type
1086: ,x_Dim_Level_Rec IN OUT NOCOPY BSC_DIMENSION_LEVELS_PUB.Bsc_Dim_Level_Rec_Type
1087: ,x_return_status OUT NOCOPY varchar2
1088: ,x_msg_count OUT NOCOPY number

Line 1093: x_return_status := FND_API.G_RET_STS_SUCCESS;

1089: ,x_msg_data OUT NOCOPY varchar2
1090: ) is
1091:
1092: begin
1093: x_return_status := FND_API.G_RET_STS_SUCCESS;
1094: g_db_object := 'Retrieve_Bsc_Sys_Dim_Lvl_Cols';
1095:
1096: select distinct column_name
1097: into x_Dim_Level_Rec.Bsc_Level_Column_Name

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

1098: from BSC_SYS_DIM_LEVEL_COLS
1099: where dim_level_id = p_Dim_Level_Rec.Bsc_Level_Id
1100: and column_type = p_Dim_Level_Rec.Bsc_Level_Column_Type;
1101:
1102: if (p_commit = FND_API.G_TRUE) then
1103: commit;
1104: end if;
1105:
1106: EXCEPTION

Line 1107: WHEN FND_API.G_EXC_ERROR THEN

1103: commit;
1104: end if;
1105:
1106: EXCEPTION
1107: WHEN FND_API.G_EXC_ERROR THEN
1108: FND_MSG_PUB.Count_And_Get
1109: ( p_encoded => FND_API.G_FALSE
1110: , p_count => x_msg_count
1111: , p_data => x_msg_data

Line 1109: ( p_encoded => FND_API.G_FALSE

1105:
1106: EXCEPTION
1107: WHEN FND_API.G_EXC_ERROR THEN
1108: FND_MSG_PUB.Count_And_Get
1109: ( p_encoded => FND_API.G_FALSE
1110: , p_count => x_msg_count
1111: , p_data => x_msg_data
1112: );
1113: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);

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

1109: ( p_encoded => FND_API.G_FALSE
1110: , p_count => x_msg_count
1111: , p_data => x_msg_data
1112: );
1113: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1114: x_return_status := FND_API.G_RET_STS_ERROR;
1115: RAISE;
1116: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1117: FND_MSG_PUB.Count_And_Get

Line 1114: x_return_status := FND_API.G_RET_STS_ERROR;

1110: , p_count => x_msg_count
1111: , p_data => x_msg_data
1112: );
1113: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1114: x_return_status := FND_API.G_RET_STS_ERROR;
1115: RAISE;
1116: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1117: FND_MSG_PUB.Count_And_Get
1118: ( p_encoded => FND_API.G_FALSE

Line 1116: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1112: );
1113: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1114: x_return_status := FND_API.G_RET_STS_ERROR;
1115: RAISE;
1116: WHEN FND_API.G_EXC_UNEXPECTED_ERROR 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

Line 1118: ( p_encoded => FND_API.G_FALSE

1114: x_return_status := FND_API.G_RET_STS_ERROR;
1115: RAISE;
1116: WHEN FND_API.G_EXC_UNEXPECTED_ERROR 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: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1122: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1118: ( p_encoded => FND_API.G_FALSE
1119: , p_count => x_msg_count
1120: , p_data => x_msg_data
1121: );
1122: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1123: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1124: RAISE;
1125: WHEN NO_DATA_FOUND THEN
1126: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

1119: , p_count => x_msg_count
1120: , p_data => x_msg_data
1121: );
1122: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1123: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1124: RAISE;
1125: WHEN NO_DATA_FOUND THEN
1126: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1127: IF (x_msg_data IS NOT NULL) THEN

Line 1126: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1122: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1123: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1124: RAISE;
1125: WHEN NO_DATA_FOUND THEN
1126: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1127: IF (x_msg_data IS NOT NULL) THEN
1128: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retrieve_Bsc_Sys_Dim_Lvl_Cols ';
1129: ELSE
1130: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retrieve_Bsc_Sys_Dim_Lvl_Cols ';

Line 1135: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

Line 1149: p_commit IN varchar2 := FND_API.G_FALSE

1145: /************************************************************************************
1146: ************************************************************************************/
1147:
1148: procedure Update_Bsc_Sys_Dim_Lvl_Cols(
1149: p_commit IN varchar2 := FND_API.G_FALSE
1150: ,p_Dim_Level_Rec IN BSC_DIMENSION_LEVELS_PUB.Bsc_Dim_Level_Rec_Type
1151: ,x_return_status OUT NOCOPY varchar2
1152: ,x_msg_count OUT NOCOPY number
1153: ,x_msg_data OUT NOCOPY varchar2

Line 1161: x_return_status := FND_API.G_RET_STS_SUCCESS;

1157:
1158: l_count number;
1159:
1160: begin
1161: x_return_status := FND_API.G_RET_STS_SUCCESS;
1162: FND_MSG_PUB.Initialize;
1163: SAVEPOINT UpdateBSCSysDimLevColsPVT;
1164: -- Check that valid level id was entered.
1165: if p_Dim_Level_Rec.Bsc_Level_Id is not null then

Line 1171: RAISE FND_API.G_EXC_ERROR;

1167: if l_count <> 1 then
1168: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_LEVEL_ID');
1169: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Dim_Level_Rec.Bsc_Level_Id);
1170: FND_MSG_PUB.ADD;
1171: RAISE FND_API.G_EXC_ERROR;
1172: end if;
1173: else
1174: FND_MESSAGE.SET_NAME('BSC','BSC_NO_LEVEL_ID_ENTERED');
1175: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Dim_Level_Rec.Bsc_Level_Id);

Line 1177: RAISE FND_API.G_EXC_ERROR;

1173: else
1174: FND_MESSAGE.SET_NAME('BSC','BSC_NO_LEVEL_ID_ENTERED');
1175: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Dim_Level_Rec.Bsc_Level_Id);
1176: FND_MSG_PUB.ADD;
1177: RAISE FND_API.G_EXC_ERROR;
1178: end if;
1179:
1180: -- Level Column Type must be entered, if not raise error.
1181: if l_Dim_Level_Rec.Bsc_Level_Column_Type not in ('A', 'D', 'F', 'P', 'U') then

Line 1185: RAISE FND_API.G_EXC_ERROR;

1181: if l_Dim_Level_Rec.Bsc_Level_Column_Type not in ('A', 'D', 'F', 'P', 'U') then
1182: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_LEVEL_COL_TYPE');
1183: FND_MESSAGE.SET_TOKEN('BSC_COL_TYPE', l_Dim_Level_Rec.Bsc_Level_Column_Type);
1184: FND_MSG_PUB.ADD;
1185: RAISE FND_API.G_EXC_ERROR;
1186: end if;
1187:
1188: -- In this case there is only one column that may be updated, therefore there is no
1189: -- retrieval of previous values.

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

1192: set column_name = l_Dim_Level_Rec.Bsc_Level_Column_Name
1193: where dim_level_id = l_Dim_Level_Rec.Bsc_Level_Id
1194: and column_type = l_Dim_Level_Rec.Bsc_Level_Column_Type;
1195:
1196: if (p_commit = FND_API.G_TRUE) then
1197: commit;
1198: end if;
1199:
1200: EXCEPTION

Line 1201: WHEN FND_API.G_EXC_ERROR THEN

1197: commit;
1198: end if;
1199:
1200: EXCEPTION
1201: WHEN FND_API.G_EXC_ERROR THEN
1202: ROLLBACK TO UpdateBSCSysDimLevColsPVT;
1203: FND_MSG_PUB.Count_And_Get
1204: ( p_encoded => FND_API.G_FALSE
1205: , p_count => x_msg_count

Line 1204: ( p_encoded => FND_API.G_FALSE

1200: EXCEPTION
1201: WHEN FND_API.G_EXC_ERROR THEN
1202: ROLLBACK TO UpdateBSCSysDimLevColsPVT;
1203: FND_MSG_PUB.Count_And_Get
1204: ( p_encoded => FND_API.G_FALSE
1205: , p_count => x_msg_count
1206: , p_data => x_msg_data
1207: );
1208: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);

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

1204: ( p_encoded => FND_API.G_FALSE
1205: , p_count => x_msg_count
1206: , p_data => x_msg_data
1207: );
1208: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1209: x_return_status := FND_API.G_RET_STS_ERROR;
1210: RAISE;
1211: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1212: ROLLBACK TO UpdateBSCSysDimLevColsPVT;

Line 1209: x_return_status := FND_API.G_RET_STS_ERROR;

1205: , p_count => x_msg_count
1206: , p_data => x_msg_data
1207: );
1208: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1209: x_return_status := FND_API.G_RET_STS_ERROR;
1210: RAISE;
1211: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1212: ROLLBACK TO UpdateBSCSysDimLevColsPVT;
1213: FND_MSG_PUB.Count_And_Get

Line 1211: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1207: );
1208: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1209: x_return_status := FND_API.G_RET_STS_ERROR;
1210: RAISE;
1211: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1212: ROLLBACK TO UpdateBSCSysDimLevColsPVT;
1213: FND_MSG_PUB.Count_And_Get
1214: ( p_encoded => FND_API.G_FALSE
1215: , p_count => x_msg_count

Line 1214: ( p_encoded => FND_API.G_FALSE

1210: RAISE;
1211: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1212: ROLLBACK TO UpdateBSCSysDimLevColsPVT;
1213: FND_MSG_PUB.Count_And_Get
1214: ( p_encoded => FND_API.G_FALSE
1215: , p_count => x_msg_count
1216: , p_data => x_msg_data
1217: );
1218: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1218: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1214: ( p_encoded => FND_API.G_FALSE
1215: , p_count => x_msg_count
1216: , p_data => x_msg_data
1217: );
1218: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1219: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1220: RAISE;
1221: WHEN NO_DATA_FOUND THEN
1222: ROLLBACK TO UpdateBSCSysDimLevColsPVT;

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

1215: , p_count => x_msg_count
1216: , p_data => x_msg_data
1217: );
1218: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1219: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1220: RAISE;
1221: WHEN NO_DATA_FOUND THEN
1222: ROLLBACK TO UpdateBSCSysDimLevColsPVT;
1223: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1223: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1219: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1220: RAISE;
1221: WHEN NO_DATA_FOUND THEN
1222: ROLLBACK TO UpdateBSCSysDimLevColsPVT;
1223: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1224: IF (x_msg_data IS NOT NULL) THEN
1225: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Sys_Dim_Lvl_Cols ';
1226: ELSE
1227: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Sys_Dim_Lvl_Cols ';

Line 1233: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1229: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1230: RAISE;
1231: WHEN OTHERS THEN
1232: ROLLBACK TO UpdateBSCSysDimLevColsPVT;
1233: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1234: IF (x_msg_data IS NOT NULL) THEN
1235: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Sys_Dim_Lvl_Cols ';
1236: ELSE
1237: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Update_Bsc_Sys_Dim_Lvl_Cols ';

Line 1247: p_commit IN varchar2 := FND_API.G_FALSE

1243: /************************************************************************************
1244: ************************************************************************************/
1245:
1246: procedure Delete_Bsc_Sys_Dim_Lvl_Cols(
1247: p_commit IN varchar2 := FND_API.G_FALSE
1248: ,p_Dim_Level_Rec IN BSC_DIMENSION_LEVELS_PUB.Bsc_Dim_Level_Rec_Type
1249: ,x_return_status OUT NOCOPY varchar2
1250: ,x_msg_count OUT NOCOPY number
1251: ,x_msg_data OUT NOCOPY varchar2

Line 1259: x_return_status := FND_API.G_RET_STS_SUCCESS;

1255:
1256: l_sql varchar2(1000);
1257:
1258: begin
1259: x_return_status := FND_API.G_RET_STS_SUCCESS;
1260: SAVEPOINT DeleteBSCSysDimLevColsPVT;
1261: delete from BSC_SYS_DIM_LEVEL_COLS
1262: where dim_level_id = p_Dim_Level_Rec.Bsc_Level_Id;
1263:

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

1260: SAVEPOINT DeleteBSCSysDimLevColsPVT;
1261: delete from BSC_SYS_DIM_LEVEL_COLS
1262: where dim_level_id = p_Dim_Level_Rec.Bsc_Level_Id;
1263:
1264: if (p_commit = FND_API.G_TRUE) then
1265: commit;
1266: end if;
1267:
1268: EXCEPTION

Line 1269: WHEN FND_API.G_EXC_ERROR THEN

1265: commit;
1266: end if;
1267:
1268: EXCEPTION
1269: WHEN FND_API.G_EXC_ERROR THEN
1270: ROLLBACK TO DeleteBSCSysDimLevColsPVT;
1271: FND_MSG_PUB.Count_And_Get
1272: ( p_encoded => FND_API.G_FALSE
1273: , p_count => x_msg_count

Line 1272: ( p_encoded => FND_API.G_FALSE

1268: EXCEPTION
1269: WHEN FND_API.G_EXC_ERROR THEN
1270: ROLLBACK TO DeleteBSCSysDimLevColsPVT;
1271: FND_MSG_PUB.Count_And_Get
1272: ( p_encoded => FND_API.G_FALSE
1273: , p_count => x_msg_count
1274: , p_data => x_msg_data
1275: );
1276: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);

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

1272: ( p_encoded => FND_API.G_FALSE
1273: , p_count => x_msg_count
1274: , p_data => x_msg_data
1275: );
1276: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1277: x_return_status := FND_API.G_RET_STS_ERROR;
1278: RAISE;
1279: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1280: ROLLBACK TO DeleteBSCSysDimLevColsPVT;

Line 1277: x_return_status := FND_API.G_RET_STS_ERROR;

1273: , p_count => x_msg_count
1274: , p_data => x_msg_data
1275: );
1276: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1277: x_return_status := FND_API.G_RET_STS_ERROR;
1278: RAISE;
1279: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1280: ROLLBACK TO DeleteBSCSysDimLevColsPVT;
1281: FND_MSG_PUB.Count_And_Get

Line 1279: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1275: );
1276: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1277: x_return_status := FND_API.G_RET_STS_ERROR;
1278: RAISE;
1279: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1280: ROLLBACK TO DeleteBSCSysDimLevColsPVT;
1281: FND_MSG_PUB.Count_And_Get
1282: ( p_encoded => FND_API.G_FALSE
1283: , p_count => x_msg_count

Line 1282: ( p_encoded => FND_API.G_FALSE

1278: RAISE;
1279: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1280: ROLLBACK TO DeleteBSCSysDimLevColsPVT;
1281: FND_MSG_PUB.Count_And_Get
1282: ( p_encoded => FND_API.G_FALSE
1283: , p_count => x_msg_count
1284: , p_data => x_msg_data
1285: );
1286: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1286: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1282: ( p_encoded => FND_API.G_FALSE
1283: , p_count => x_msg_count
1284: , p_data => x_msg_data
1285: );
1286: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1287: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1288: RAISE;
1289: WHEN NO_DATA_FOUND THEN
1290: ROLLBACK TO DeleteBSCSysDimLevColsPVT;

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

1283: , p_count => x_msg_count
1284: , p_data => x_msg_data
1285: );
1286: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1287: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1288: RAISE;
1289: WHEN NO_DATA_FOUND THEN
1290: ROLLBACK TO DeleteBSCSysDimLevColsPVT;
1291: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1291: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1287: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1288: RAISE;
1289: WHEN NO_DATA_FOUND THEN
1290: ROLLBACK TO DeleteBSCSysDimLevColsPVT;
1291: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1292: IF (x_msg_data IS NOT NULL) THEN
1293: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Sys_Dim_Lvl_Cols ';
1294: ELSE
1295: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Sys_Dim_Lvl_Cols ';

Line 1301: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1297: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1298: RAISE;
1299: WHEN OTHERS THEN
1300: ROLLBACK TO DeleteBSCSysDimLevColsPVT;
1301: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1302: IF (x_msg_data IS NOT NULL) THEN
1303: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Sys_Dim_Lvl_Cols ';
1304: ELSE
1305: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Bsc_Sys_Dim_Lvl_Cols ';

Line 1370: WHEN FND_API.G_EXC_ERROR THEN

1366:
1367: RETURN l_next;
1368:
1369: EXCEPTION
1370: WHEN FND_API.G_EXC_ERROR THEN
1371: l_return_status := FND_API.G_RET_STS_ERROR;
1372: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1373: ,p_data => l_msg_data);
1374: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1371: l_return_status := FND_API.G_RET_STS_ERROR;

1367: RETURN l_next;
1368:
1369: EXCEPTION
1370: WHEN FND_API.G_EXC_ERROR THEN
1371: l_return_status := FND_API.G_RET_STS_ERROR;
1372: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1373: ,p_data => l_msg_data);
1374: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1375: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1374: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1370: WHEN FND_API.G_EXC_ERROR THEN
1371: l_return_status := FND_API.G_RET_STS_ERROR;
1372: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1373: ,p_data => l_msg_data);
1374: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1375: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1376: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1377: ,p_data => l_msg_data);
1378: raise;

Line 1375: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1371: l_return_status := FND_API.G_RET_STS_ERROR;
1372: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1373: ,p_data => l_msg_data);
1374: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1375: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1376: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1377: ,p_data => l_msg_data);
1378: raise;
1379: WHEN NO_DATA_FOUND THEN

Line 1380: l_return_status := FND_API.G_RET_STS_ERROR;

1376: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1377: ,p_data => l_msg_data);
1378: raise;
1379: WHEN NO_DATA_FOUND THEN
1380: l_return_status := FND_API.G_RET_STS_ERROR;
1381: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1382: ,p_data => l_msg_data);
1383: raise;
1384: WHEN OTHERS THEN

Line 1385: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1381: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1382: ,p_data => l_msg_data);
1383: raise;
1384: WHEN OTHERS THEN
1385: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1386: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1387: ,p_data => l_msg_data);
1388: raise;
1389:

Line 1430: WHEN FND_API.G_EXC_ERROR THEN

1426:
1427: return l_ID;
1428:
1429: EXCEPTION
1430: WHEN FND_API.G_EXC_ERROR THEN
1431: l_return_status := FND_API.G_RET_STS_ERROR;
1432: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1433: ,p_data => l_msg_data);
1434: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1431: l_return_status := FND_API.G_RET_STS_ERROR;

1427: return l_ID;
1428:
1429: EXCEPTION
1430: WHEN FND_API.G_EXC_ERROR THEN
1431: l_return_status := FND_API.G_RET_STS_ERROR;
1432: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1433: ,p_data => l_msg_data);
1434: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1435: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1434: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1430: WHEN FND_API.G_EXC_ERROR THEN
1431: l_return_status := FND_API.G_RET_STS_ERROR;
1432: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1433: ,p_data => l_msg_data);
1434: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1435: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1436: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1437: ,p_data => l_msg_data);
1438: raise;

Line 1435: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1431: l_return_status := FND_API.G_RET_STS_ERROR;
1432: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1433: ,p_data => l_msg_data);
1434: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1435: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1436: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1437: ,p_data => l_msg_data);
1438: raise;
1439: WHEN NO_DATA_FOUND THEN

Line 1440: l_return_status := FND_API.G_RET_STS_ERROR;

1436: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1437: ,p_data => l_msg_data);
1438: raise;
1439: WHEN NO_DATA_FOUND THEN
1440: l_return_status := FND_API.G_RET_STS_ERROR;
1441: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1442: ,p_data => l_msg_data);
1443: raise;
1444: WHEN OTHERS THEN

Line 1445: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1441: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1442: ,p_data => l_msg_data);
1443: raise;
1444: WHEN OTHERS THEN
1445: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1446: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1447: ,p_data => l_msg_data);
1448: raise;
1449:

Line 1476: WHEN FND_API.G_EXC_ERROR THEN

1472: WHERE Level_Table_Name = p_level_name;
1473:
1474: RETURN l_Count;
1475: EXCEPTION
1476: WHEN FND_API.G_EXC_ERROR THEN
1477: l_return_status := FND_API.G_RET_STS_ERROR;
1478: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1479: ,p_data => l_msg_data);
1480: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1477: l_return_status := FND_API.G_RET_STS_ERROR;

1473:
1474: RETURN l_Count;
1475: EXCEPTION
1476: WHEN FND_API.G_EXC_ERROR THEN
1477: l_return_status := FND_API.G_RET_STS_ERROR;
1478: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1479: ,p_data => l_msg_data);
1480: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1481: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1480: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1476: WHEN FND_API.G_EXC_ERROR THEN
1477: l_return_status := FND_API.G_RET_STS_ERROR;
1478: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1479: ,p_data => l_msg_data);
1480: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1481: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1482: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1483: ,p_data => l_msg_data);
1484: raise;

Line 1481: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1477: l_return_status := FND_API.G_RET_STS_ERROR;
1478: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1479: ,p_data => l_msg_data);
1480: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1481: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1482: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1483: ,p_data => l_msg_data);
1484: raise;
1485: WHEN NO_DATA_FOUND THEN

Line 1486: l_return_status := FND_API.G_RET_STS_ERROR;

1482: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1483: ,p_data => l_msg_data);
1484: raise;
1485: WHEN NO_DATA_FOUND THEN
1486: l_return_status := FND_API.G_RET_STS_ERROR;
1487: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1488: ,p_data => l_msg_data);
1489: raise;
1490: WHEN OTHERS THEN

Line 1491: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1487: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1488: ,p_data => l_msg_data);
1489: raise;
1490: WHEN OTHERS THEN
1491: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1492: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1493: ,p_data => l_msg_data);
1494: raise;
1495:

Line 1521: WHEN FND_API.G_EXC_ERROR THEN

1517: WHERE UPPER(NAME) = UPPER(p_group_name);
1518:
1519: RETURN l_Count;
1520: EXCEPTION
1521: WHEN FND_API.G_EXC_ERROR THEN
1522: l_return_status := FND_API.G_RET_STS_ERROR;
1523: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1524: ,p_data => l_msg_data);
1525: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1522: l_return_status := FND_API.G_RET_STS_ERROR;

1518:
1519: RETURN l_Count;
1520: EXCEPTION
1521: WHEN FND_API.G_EXC_ERROR THEN
1522: l_return_status := FND_API.G_RET_STS_ERROR;
1523: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1524: ,p_data => l_msg_data);
1525: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1526: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1525: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1521: WHEN FND_API.G_EXC_ERROR THEN
1522: l_return_status := FND_API.G_RET_STS_ERROR;
1523: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1524: ,p_data => l_msg_data);
1525: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1526: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1527: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1528: ,p_data => l_msg_data);
1529: raise;

Line 1526: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1522: l_return_status := FND_API.G_RET_STS_ERROR;
1523: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1524: ,p_data => l_msg_data);
1525: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1526: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1527: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1528: ,p_data => l_msg_data);
1529: raise;
1530: WHEN NO_DATA_FOUND THEN

Line 1531: l_return_status := FND_API.G_RET_STS_ERROR;

1527: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1528: ,p_data => l_msg_data);
1529: raise;
1530: WHEN NO_DATA_FOUND THEN
1531: l_return_status := FND_API.G_RET_STS_ERROR;
1532: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1533: ,p_data => l_msg_data);
1534: raise;
1535: WHEN OTHERS THEN

Line 1536: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1532: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1533: ,p_data => l_msg_data);
1534: raise;
1535: WHEN OTHERS THEN
1536: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1537: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1538: ,p_data => l_msg_data);
1539: raise;
1540:

Line 1614: WHEN FND_API.G_EXC_ERROR THEN

1610:
1611: return l_Dim_Level_Tbl;
1612:
1613: EXCEPTION
1614: WHEN FND_API.G_EXC_ERROR THEN
1615: l_return_status := FND_API.G_RET_STS_ERROR;
1616: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1617: ,p_data => l_msg_data);
1618: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1615: l_return_status := FND_API.G_RET_STS_ERROR;

1611: return l_Dim_Level_Tbl;
1612:
1613: EXCEPTION
1614: WHEN FND_API.G_EXC_ERROR THEN
1615: l_return_status := FND_API.G_RET_STS_ERROR;
1616: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1617: ,p_data => l_msg_data);
1618: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1619: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1618: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1614: WHEN FND_API.G_EXC_ERROR THEN
1615: l_return_status := FND_API.G_RET_STS_ERROR;
1616: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1617: ,p_data => l_msg_data);
1618: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1619: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1620: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1621: ,p_data => l_msg_data);
1622: raise;

Line 1619: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1615: l_return_status := FND_API.G_RET_STS_ERROR;
1616: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1617: ,p_data => l_msg_data);
1618: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1619: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1620: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1621: ,p_data => l_msg_data);
1622: raise;
1623: WHEN NO_DATA_FOUND THEN

Line 1624: l_return_status := FND_API.G_RET_STS_ERROR;

1620: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1621: ,p_data => l_msg_data);
1622: raise;
1623: WHEN NO_DATA_FOUND THEN
1624: l_return_status := FND_API.G_RET_STS_ERROR;
1625: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1626: ,p_data => l_msg_data);
1627: raise;
1628: WHEN OTHERS THEN

Line 1629: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1625: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1626: ,p_data => l_msg_data);
1627: raise;
1628: WHEN OTHERS THEN
1629: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1630: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1631: ,p_data => l_msg_data);
1632: raise;
1633:

Line 1669: WHEN FND_API.G_EXC_ERROR THEN

1665:
1666: return l_count;
1667:
1668: EXCEPTION
1669: WHEN FND_API.G_EXC_ERROR THEN
1670: l_return_status := FND_API.G_RET_STS_ERROR;
1671: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1672: ,p_data => l_msg_data);
1673: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1670: l_return_status := FND_API.G_RET_STS_ERROR;

1666: return l_count;
1667:
1668: EXCEPTION
1669: WHEN FND_API.G_EXC_ERROR THEN
1670: l_return_status := FND_API.G_RET_STS_ERROR;
1671: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1672: ,p_data => l_msg_data);
1673: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1674: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1673: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1669: WHEN FND_API.G_EXC_ERROR THEN
1670: l_return_status := FND_API.G_RET_STS_ERROR;
1671: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1672: ,p_data => l_msg_data);
1673: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1674: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1675: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1676: ,p_data => l_msg_data);
1677: raise;

Line 1674: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1670: l_return_status := FND_API.G_RET_STS_ERROR;
1671: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1672: ,p_data => l_msg_data);
1673: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1674: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1675: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1676: ,p_data => l_msg_data);
1677: raise;
1678: WHEN NO_DATA_FOUND THEN

Line 1679: l_return_status := FND_API.G_RET_STS_ERROR;

1675: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1676: ,p_data => l_msg_data);
1677: raise;
1678: WHEN NO_DATA_FOUND THEN
1679: l_return_status := FND_API.G_RET_STS_ERROR;
1680: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1681: ,p_data => l_msg_data);
1682: raise;
1683: WHEN OTHERS THEN

Line 1684: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1680: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1681: ,p_data => l_msg_data);
1682: raise;
1683: WHEN OTHERS THEN
1684: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1685: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1686: ,p_data => l_msg_data);
1687: raise;
1688:

Line 1726: WHEN FND_API.G_EXC_ERROR THEN

1722:
1723: return l_count;
1724:
1725: EXCEPTION
1726: WHEN FND_API.G_EXC_ERROR THEN
1727: l_return_status := FND_API.G_RET_STS_ERROR;
1728: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1729: ,p_data => l_msg_data);
1730: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1727: l_return_status := FND_API.G_RET_STS_ERROR;

1723: return l_count;
1724:
1725: EXCEPTION
1726: WHEN FND_API.G_EXC_ERROR THEN
1727: l_return_status := FND_API.G_RET_STS_ERROR;
1728: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1729: ,p_data => l_msg_data);
1730: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1731: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1730: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1726: WHEN FND_API.G_EXC_ERROR THEN
1727: l_return_status := FND_API.G_RET_STS_ERROR;
1728: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1729: ,p_data => l_msg_data);
1730: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1731: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1732: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1733: ,p_data => l_msg_data);
1734: raise;

Line 1731: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1727: l_return_status := FND_API.G_RET_STS_ERROR;
1728: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1729: ,p_data => l_msg_data);
1730: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1731: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1732: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1733: ,p_data => l_msg_data);
1734: raise;
1735: WHEN NO_DATA_FOUND THEN

Line 1736: l_return_status := FND_API.G_RET_STS_ERROR;

1732: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1733: ,p_data => l_msg_data);
1734: raise;
1735: WHEN NO_DATA_FOUND THEN
1736: l_return_status := FND_API.G_RET_STS_ERROR;
1737: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1738: ,p_data => l_msg_data);
1739: raise;
1740: WHEN OTHERS THEN

Line 1741: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1737: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1738: ,p_data => l_msg_data);
1739: raise;
1740: WHEN OTHERS THEN
1741: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1742: FND_MSG_PUB.Count_And_Get( p_count => l_msg_count
1743: ,p_data => l_msg_data);
1744: raise;
1745:

Line 1759: p_commit IN varchar2 := FND_API.G_FALSE

1755: /*---------------------------------------------------------------------------------------
1756: Create_Dim_Level_Relation
1757: ---------------------------------------------------------------------------------------*/
1758: PROCEDURE Create_Dim_Level_Relation(
1759: p_commit IN varchar2 := FND_API.G_FALSE
1760: ,p_Dim_Level_Rec IN BSC_DIMENSION_LEVELS_PUB.Bsc_Dim_Level_Rec_Type
1761: ,x_return_status OUT NOCOPY varchar2
1762: ,x_msg_count OUT NOCOPY number
1763: ,x_msg_data OUT NOCOPY varchar2

Line 1770: x_return_status := FND_API.G_RET_STS_SUCCESS;

1766: l_count NUMBER;
1767: l_temp_col VARCHAR2(50);
1768:
1769: BEGIN
1770: x_return_status := FND_API.G_RET_STS_SUCCESS;
1771: FND_MSG_PUB.Initialize;
1772: SAVEPOINT CreateBSCDimLevRelsPVT;
1773: g_db_object := 'Create_Dim_Level_Relation';
1774: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1774: x_return_status := FND_API.G_RET_STS_SUCCESS;

1770: x_return_status := FND_API.G_RET_STS_SUCCESS;
1771: FND_MSG_PUB.Initialize;
1772: SAVEPOINT CreateBSCDimLevRelsPVT;
1773: g_db_object := 'Create_Dim_Level_Relation';
1774: x_return_status := FND_API.G_RET_STS_SUCCESS;
1775: -- Validate level id exists.
1776:
1777: IF ((p_Dim_Level_Rec.Bsc_Level_Id IS NOT NULL) AND (p_Dim_Level_Rec.Bsc_Parent_Level_Id IS NOT NULL)) THEN
1778:

Line 1784: RAISE FND_API.G_EXC_ERROR;

1780: IF (l_count = 0) THEN
1781: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_LEVEL_ID');
1782: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Dim_Level_Rec.Bsc_Level_Id);
1783: FND_MSG_PUB.ADD;
1784: RAISE FND_API.G_EXC_ERROR;
1785: END IF;
1786:
1787: l_count := BSC_DIMENSION_LEVELS_PVT.Validate_Value( 'BSC_SYS_DIM_LEVELS_B', 'DIM_LEVEL_ID', p_Dim_Level_Rec.Bsc_Parent_Level_Id);
1788: IF (l_count = 0) THEN

Line 1792: RAISE FND_API.G_EXC_ERROR;

1788: IF (l_count = 0) THEN
1789: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_LEVEL_ID');
1790: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Dim_Level_Rec.Bsc_Parent_Level_Id);
1791: FND_MSG_PUB.ADD;
1792: RAISE FND_API.G_EXC_ERROR;
1793: END IF;
1794:
1795: ---- DBMS_OUTPUT.PUT_LINE('After Validation');
1796:

Line 1901: RAISE FND_API.G_EXC_ERROR;

1897: ELSE
1898: FND_MESSAGE.SET_NAME('BSC','BSC_NO_LEVEL_ID_ENTERED');
1899: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', P_DIM_LEVEL_REC.BSC_LEVEL_ID);
1900: FND_MSG_PUB.ADD;
1901: RAISE FND_API.G_EXC_ERROR;
1902: END IF;
1903:
1904: ---- DBMS_OUTPUT.PUT_LINE('END ....');
1905:

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

1902: END IF;
1903:
1904: ---- DBMS_OUTPUT.PUT_LINE('END ....');
1905:
1906: IF (p_commit = FND_API.G_TRUE) THEN
1907: COMMIT;
1908: END IF;
1909:
1910: EXCEPTION

Line 1911: WHEN FND_API.G_EXC_ERROR THEN

1907: COMMIT;
1908: END IF;
1909:
1910: EXCEPTION
1911: WHEN FND_API.G_EXC_ERROR THEN
1912: ROLLBACK TO CreateBSCDimLevRelsPVT;
1913: FND_MSG_PUB.Count_And_Get
1914: ( p_encoded => FND_API.G_FALSE
1915: , p_count => x_msg_count

Line 1914: ( p_encoded => FND_API.G_FALSE

1910: EXCEPTION
1911: WHEN FND_API.G_EXC_ERROR THEN
1912: ROLLBACK TO CreateBSCDimLevRelsPVT;
1913: FND_MSG_PUB.Count_And_Get
1914: ( p_encoded => FND_API.G_FALSE
1915: , p_count => x_msg_count
1916: , p_data => x_msg_data
1917: );
1918: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);

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

1914: ( p_encoded => FND_API.G_FALSE
1915: , p_count => x_msg_count
1916: , p_data => x_msg_data
1917: );
1918: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1919: x_return_status := FND_API.G_RET_STS_ERROR;
1920: RAISE;
1921: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1922: ROLLBACK TO CreateBSCDimLevRelsPVT;

Line 1919: x_return_status := FND_API.G_RET_STS_ERROR;

1915: , p_count => x_msg_count
1916: , p_data => x_msg_data
1917: );
1918: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1919: x_return_status := FND_API.G_RET_STS_ERROR;
1920: RAISE;
1921: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1922: ROLLBACK TO CreateBSCDimLevRelsPVT;
1923: FND_MSG_PUB.Count_And_Get

Line 1921: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1917: );
1918: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1919: x_return_status := FND_API.G_RET_STS_ERROR;
1920: RAISE;
1921: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1922: ROLLBACK TO CreateBSCDimLevRelsPVT;
1923: FND_MSG_PUB.Count_And_Get
1924: ( p_encoded => FND_API.G_FALSE
1925: , p_count => x_msg_count

Line 1924: ( p_encoded => FND_API.G_FALSE

1920: RAISE;
1921: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1922: ROLLBACK TO CreateBSCDimLevRelsPVT;
1923: FND_MSG_PUB.Count_And_Get
1924: ( p_encoded => FND_API.G_FALSE
1925: , p_count => x_msg_count
1926: , p_data => x_msg_data
1927: );
1928: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1928: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1924: ( p_encoded => FND_API.G_FALSE
1925: , p_count => x_msg_count
1926: , p_data => x_msg_data
1927: );
1928: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1929: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1930: RAISE;
1931: WHEN NO_DATA_FOUND THEN
1932: ROLLBACK TO CreateBSCDimLevRelsPVT;

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

1925: , p_count => x_msg_count
1926: , p_data => x_msg_data
1927: );
1928: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1929: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1930: RAISE;
1931: WHEN NO_DATA_FOUND THEN
1932: ROLLBACK TO CreateBSCDimLevRelsPVT;
1933: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1933: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1929: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1930: RAISE;
1931: WHEN NO_DATA_FOUND THEN
1932: ROLLBACK TO CreateBSCDimLevRelsPVT;
1933: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1934: IF (x_msg_data IS NOT NULL) THEN
1935: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Create_Dim_Level_Relation ';
1936: ELSE
1937: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Create_Dim_Level_Relation ';

Line 1943: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1939: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
1940: RAISE;
1941: WHEN OTHERS THEN
1942: ROLLBACK TO CreateBSCDimLevRelsPVT;
1943: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1944: IF (x_msg_data IS NOT NULL) THEN
1945: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Create_Dim_Level_Relation ';
1946: ELSE
1947: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Create_Dim_Level_Relation ';

Line 1959: p_commit IN varchar2 := FND_API.G_FALSE

1955: Parameters: p_Dim_Level_Rec.Bsc_Level_Id
1956: p_Dim_Level_Rec.Bsc_Parent_Level_Id
1957: ---------------------------------------------------------------------------------------*/
1958: PROCEDURE Delete_Dim_Level_Relation(
1959: p_commit IN varchar2 := FND_API.G_FALSE
1960: ,p_Dim_Level_Rec IN BSC_DIMENSION_LEVELS_PUB.Bsc_Dim_Level_Rec_Type
1961: ,x_return_status OUT NOCOPY varchar2
1962: ,x_msg_count OUT NOCOPY number
1963: ,x_msg_data OUT NOCOPY varchar2

Line 1967: x_return_status := FND_API.G_RET_STS_SUCCESS;

1963: ,x_msg_data OUT NOCOPY varchar2
1964: ) IS
1965:
1966: BEGIN
1967: x_return_status := FND_API.G_RET_STS_SUCCESS;
1968: SAVEPOINT DeleteBSCDimLevRelsPVT;
1969:
1970: DELETE FROM BSC_SYS_DIM_LEVEL_RELS
1971: WHERE DIM_LEVEL_ID = p_Dim_Level_Rec.Bsc_Level_Id

Line 1975: WHEN FND_API.G_EXC_ERROR THEN

1971: WHERE DIM_LEVEL_ID = p_Dim_Level_Rec.Bsc_Level_Id
1972: AND PARENT_DIM_LEVEL_ID = p_Dim_Level_Rec.Bsc_Parent_Level_Id;
1973:
1974: EXCEPTION
1975: WHEN FND_API.G_EXC_ERROR THEN
1976: ROLLBACK TO DeleteBSCDimLevRelsPVT;
1977: FND_MSG_PUB.Count_And_Get
1978: ( p_encoded => FND_API.G_FALSE
1979: , p_count => x_msg_count

Line 1978: ( p_encoded => FND_API.G_FALSE

1974: EXCEPTION
1975: WHEN FND_API.G_EXC_ERROR THEN
1976: ROLLBACK TO DeleteBSCDimLevRelsPVT;
1977: FND_MSG_PUB.Count_And_Get
1978: ( p_encoded => FND_API.G_FALSE
1979: , p_count => x_msg_count
1980: , p_data => x_msg_data
1981: );
1982: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);

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

1978: ( p_encoded => FND_API.G_FALSE
1979: , p_count => x_msg_count
1980: , p_data => x_msg_data
1981: );
1982: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1983: x_return_status := FND_API.G_RET_STS_ERROR;
1984: RAISE;
1985: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1986: ROLLBACK TO DeleteBSCDimLevRelsPVT;

Line 1983: x_return_status := FND_API.G_RET_STS_ERROR;

1979: , p_count => x_msg_count
1980: , p_data => x_msg_data
1981: );
1982: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1983: x_return_status := FND_API.G_RET_STS_ERROR;
1984: RAISE;
1985: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1986: ROLLBACK TO DeleteBSCDimLevRelsPVT;
1987: FND_MSG_PUB.Count_And_Get

Line 1985: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1981: );
1982: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
1983: x_return_status := FND_API.G_RET_STS_ERROR;
1984: RAISE;
1985: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1986: ROLLBACK TO DeleteBSCDimLevRelsPVT;
1987: FND_MSG_PUB.Count_And_Get
1988: ( p_encoded => FND_API.G_FALSE
1989: , p_count => x_msg_count

Line 1988: ( p_encoded => FND_API.G_FALSE

1984: RAISE;
1985: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1986: ROLLBACK TO DeleteBSCDimLevRelsPVT;
1987: FND_MSG_PUB.Count_And_Get
1988: ( p_encoded => FND_API.G_FALSE
1989: , p_count => x_msg_count
1990: , p_data => x_msg_data
1991: );
1992: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1992: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1988: ( p_encoded => FND_API.G_FALSE
1989: , p_count => x_msg_count
1990: , p_data => x_msg_data
1991: );
1992: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1993: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1994: RAISE;
1995: WHEN NO_DATA_FOUND THEN
1996: ROLLBACK TO DeleteBSCDimLevRelsPVT;

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

1989: , p_count => x_msg_count
1990: , p_data => x_msg_data
1991: );
1992: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1993: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1994: RAISE;
1995: WHEN NO_DATA_FOUND THEN
1996: ROLLBACK TO DeleteBSCDimLevRelsPVT;
1997: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1997: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1993: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
1994: RAISE;
1995: WHEN NO_DATA_FOUND THEN
1996: ROLLBACK TO DeleteBSCDimLevRelsPVT;
1997: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1998: IF (x_msg_data IS NOT NULL) THEN
1999: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level_Relation ';
2000: ELSE
2001: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level_Relation ';

Line 2007: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2003: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
2004: RAISE;
2005: WHEN OTHERS THEN
2006: ROLLBACK TO DeleteBSCDimLevRelsPVT;
2007: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2008: IF (x_msg_data IS NOT NULL) THEN
2009: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level_Relation ';
2010: ELSE
2011: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Delete_Dim_Level_Relation ';

Line 2047: x_return_status := FND_API.G_RET_STS_SUCCESS;

2043: v_parents VARCHAR2(3000) := '';
2044: l_count NUMBER;
2045: l_num NUMBER := 0;
2046: BEGIN
2047: x_return_status := FND_API.G_RET_STS_SUCCESS;
2048:
2049: IF (p_Relation_Type <> 1) THEN
2050: RETURN TRUE;
2051: END IF;

Line 2112: WHEN FND_API.G_EXC_ERROR THEN

2108: END IF;
2109: END IF;
2110: RETURN v_temp;
2111: EXCEPTION
2112: WHEN FND_API.G_EXC_ERROR THEN
2113: FND_MSG_PUB.Count_And_Get
2114: ( p_encoded => FND_API.G_FALSE
2115: , p_count => x_msg_count
2116: , p_data => x_msg_data

Line 2114: ( p_encoded => FND_API.G_FALSE

2110: RETURN v_temp;
2111: EXCEPTION
2112: WHEN FND_API.G_EXC_ERROR THEN
2113: FND_MSG_PUB.Count_And_Get
2114: ( p_encoded => FND_API.G_FALSE
2115: , p_count => x_msg_count
2116: , p_data => x_msg_data
2117: );
2118: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);

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

2114: ( p_encoded => FND_API.G_FALSE
2115: , p_count => x_msg_count
2116: , p_data => x_msg_data
2117: );
2118: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
2119: x_return_status := FND_API.G_RET_STS_ERROR;
2120: RAISE;
2121: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2122: FND_MSG_PUB.Count_And_Get

Line 2119: x_return_status := FND_API.G_RET_STS_ERROR;

2115: , p_count => x_msg_count
2116: , p_data => x_msg_data
2117: );
2118: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
2119: x_return_status := FND_API.G_RET_STS_ERROR;
2120: RAISE;
2121: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2122: FND_MSG_PUB.Count_And_Get
2123: ( p_encoded => FND_API.G_FALSE

Line 2121: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2117: );
2118: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
2119: x_return_status := FND_API.G_RET_STS_ERROR;
2120: RAISE;
2121: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2122: FND_MSG_PUB.Count_And_Get
2123: ( p_encoded => FND_API.G_FALSE
2124: , p_count => x_msg_count
2125: , p_data => x_msg_data

Line 2123: ( p_encoded => FND_API.G_FALSE

2119: x_return_status := FND_API.G_RET_STS_ERROR;
2120: RAISE;
2121: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2122: FND_MSG_PUB.Count_And_Get
2123: ( p_encoded => FND_API.G_FALSE
2124: , p_count => x_msg_count
2125: , p_data => x_msg_data
2126: );
2127: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2127: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2123: ( p_encoded => FND_API.G_FALSE
2124: , p_count => x_msg_count
2125: , p_data => x_msg_data
2126: );
2127: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2128: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
2129: RAISE;
2130: WHEN NO_DATA_FOUND THEN
2131: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

2124: , p_count => x_msg_count
2125: , p_data => x_msg_data
2126: );
2127: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2128: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
2129: RAISE;
2130: WHEN NO_DATA_FOUND THEN
2131: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2132: IF (x_msg_data IS NOT NULL) THEN

Line 2131: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2127: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2128: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
2129: RAISE;
2130: WHEN NO_DATA_FOUND THEN
2131: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2132: IF (x_msg_data IS NOT NULL) THEN
2133: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Evaluate_Circular_Relationship ';
2134: ELSE
2135: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Evaluate_Circular_Relationship ';

Line 2140: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2136: END IF;
2137: --DBMS_OUTPUT.PUT_LINE('EXCEPTION NO_DATA_FOUND '||x_msg_data);
2138: RAISE;
2139: WHEN OTHERS THEN
2140: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2141: IF (x_msg_data IS NOT NULL) THEN
2142: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Evaluate_Circular_Relationship ';
2143: ELSE
2144: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Evaluate_Circular_Relationship ';

Line 2154: p_commit IN varchar2 := FND_API.G_FALSE

2150: /*-------------------------------------------------------------------------------------
2151: Create_BSC_Dim_Level_View
2152: ---------------------------------------------------------------------------------------*/
2153: PROCEDURE Create_BSC_Dim_Level_View (
2154: p_commit IN varchar2 := FND_API.G_FALSE
2155: ,p_Dim_Level_Rec IN BSC_DIMENSION_LEVELS_PUB.Bsc_Dim_Level_Rec_Type
2156: ,x_return_status OUT NOCOPY varchar2
2157: ,x_msg_count OUT NOCOPY number
2158: ,x_msg_data OUT NOCOPY varchar2

Line 2162: x_return_status := FND_API.G_RET_STS_SUCCESS;

2158: ,x_msg_data OUT NOCOPY varchar2
2159: )IS
2160: v_Temp Number;
2161: BEGIN
2162: x_return_status := FND_API.G_RET_STS_SUCCESS;
2163:
2164: --DBMS_OUTPUT.PUT_LINE('Begin Create_BSC_Dim_Level_View - PENDING ');
2165:
2166: v_Temp:=0;

Line 2171: x_return_status := FND_API.G_RET_STS_SUCCESS;

2167: -- ***** PENDING *****
2168:
2169: --DBMS_OUTPUT.PUT_LINE('End Create_BSC_Dim_Level_View ');
2170:
2171: x_return_status := FND_API.G_RET_STS_SUCCESS;
2172: END Create_BSC_Dim_Level_View;
2173:
2174: /*-------------------------------------------------------------------------------------
2175: get_Dim_Level_Name

Line 2270: x_return_status := FND_API.G_RET_STS_SUCCESS;

2266: AND PL.dim_level_id = LR.parent_dim_level_id
2267: AND DL.SHORT_NAME = p_Dim_Level_Rec.Bsc_Level_Short_Name
2268: AND PL.SHORT_NAME = p_Dim_Level_Rec.Bsc_Parent_Level_Short_Name;
2269: BEGIN
2270: x_return_status := FND_API.G_RET_STS_SUCCESS;
2271: FND_MSG_PUB.Initialize;
2272: g_db_object := 'Retrieve_Relationship';
2273: -- Validate level id exists.
2274: IF ((p_Dim_Level_Rec.Bsc_Level_Id IS NOT NULL) AND (p_Dim_Level_Rec.Bsc_Parent_Level_Id IS NOT NULL)) THEN

Line 2280: RAISE FND_API.G_EXC_ERROR;

2276: IF (l_count = 0) THEN
2277: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_LEVEL_ID');
2278: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Dim_Level_Rec.Bsc_Level_Id);
2279: FND_MSG_PUB.ADD;
2280: RAISE FND_API.G_EXC_ERROR;
2281: END IF;
2282: l_count := BSC_DIMENSION_LEVELS_PVT.validate_dim_level_id(p_Dim_Level_Rec.Bsc_Parent_Level_Id);
2283: IF (l_count = 0) THEN
2284: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_LEVEL_ID');

Line 2287: RAISE FND_API.G_EXC_ERROR;

2283: IF (l_count = 0) THEN
2284: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_LEVEL_ID');
2285: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Dim_Level_Rec.Bsc_Parent_Level_Id);
2286: FND_MSG_PUB.ADD;
2287: RAISE FND_API.G_EXC_ERROR;
2288: END IF;
2289: IF (cr_getId_rels%ISOPEN) THEN
2290: CLOSE cr_getId_rels;
2291: END IF;

Line 2315: RAISE FND_API.G_EXC_ERROR;

2311: IF (l_count = 0) THEN
2312: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_LEVEL_NAME');
2313: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_NAME', p_Dim_Level_Rec.Bsc_Level_Short_Name);
2314: FND_MSG_PUB.ADD;
2315: RAISE FND_API.G_EXC_ERROR;
2316: END IF;
2317:
2318: -- bug# 3814375: Most often short name and parent are the same - hence, need not fire this SQL if the above is validated.
2319: IF (p_Dim_Level_Rec.Bsc_Parent_Level_Short_Name <> p_Dim_Level_Rec.Bsc_Level_Short_Name) THEN

Line 2328: RAISE FND_API.G_EXC_ERROR;

2324: IF (l_count = 0) THEN
2325: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_LEVEL_NAME');
2326: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_NAME', p_Dim_Level_Rec.Bsc_Parent_Level_Short_Name);
2327: FND_MSG_PUB.ADD;
2328: RAISE FND_API.G_EXC_ERROR;
2329: END IF;
2330: END IF;
2331:
2332: IF (cr_getName_rels%ISOPEN) THEN

Line 2353: RAISE FND_API.G_EXC_ERROR;

2349: ELSE
2350: FND_MESSAGE.SET_NAME('BSC','BSC_NO_LEVEL_ID_ENTERED');
2351: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', P_DIM_LEVEL_REC.BSC_LEVEL_ID);
2352: FND_MSG_PUB.ADD;
2353: RAISE FND_API.G_EXC_ERROR;
2354: END IF;
2355: EXCEPTION
2356: WHEN FND_API.G_EXC_ERROR THEN
2357: IF (cr_getId_rels%ISOPEN) THEN

Line 2356: WHEN FND_API.G_EXC_ERROR THEN

2352: FND_MSG_PUB.ADD;
2353: RAISE FND_API.G_EXC_ERROR;
2354: END IF;
2355: EXCEPTION
2356: WHEN FND_API.G_EXC_ERROR THEN
2357: IF (cr_getId_rels%ISOPEN) THEN
2358: CLOSE cr_getId_rels;
2359: END IF;
2360: FND_MSG_PUB.Count_And_Get

Line 2361: ( p_encoded => FND_API.G_FALSE

2357: IF (cr_getId_rels%ISOPEN) THEN
2358: CLOSE cr_getId_rels;
2359: END IF;
2360: FND_MSG_PUB.Count_And_Get
2361: ( p_encoded => FND_API.G_FALSE
2362: , p_count => x_msg_count
2363: , p_data => x_msg_data
2364: );
2365: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);

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

2361: ( p_encoded => FND_API.G_FALSE
2362: , p_count => x_msg_count
2363: , p_data => x_msg_data
2364: );
2365: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
2366: x_return_status := FND_API.G_RET_STS_ERROR;
2367: RAISE;
2368: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2369: IF (cr_getId_rels%ISOPEN) THEN

Line 2366: x_return_status := FND_API.G_RET_STS_ERROR;

2362: , p_count => x_msg_count
2363: , p_data => x_msg_data
2364: );
2365: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
2366: x_return_status := FND_API.G_RET_STS_ERROR;
2367: RAISE;
2368: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2369: IF (cr_getId_rels%ISOPEN) THEN
2370: CLOSE cr_getId_rels;

Line 2368: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2364: );
2365: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
2366: x_return_status := FND_API.G_RET_STS_ERROR;
2367: RAISE;
2368: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2369: IF (cr_getId_rels%ISOPEN) THEN
2370: CLOSE cr_getId_rels;
2371: END IF;
2372: FND_MSG_PUB.Count_And_Get

Line 2373: ( p_encoded => FND_API.G_FALSE

2369: IF (cr_getId_rels%ISOPEN) THEN
2370: CLOSE cr_getId_rels;
2371: END IF;
2372: FND_MSG_PUB.Count_And_Get
2373: ( p_encoded => FND_API.G_FALSE
2374: , p_count => x_msg_count
2375: , p_data => x_msg_data
2376: );
2377: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2377: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2373: ( p_encoded => FND_API.G_FALSE
2374: , p_count => x_msg_count
2375: , p_data => x_msg_data
2376: );
2377: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2378: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
2379: RAISE;
2380: WHEN NO_DATA_FOUND THEN
2381: IF (cr_getId_rels%ISOPEN) THEN

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

2374: , p_count => x_msg_count
2375: , p_data => x_msg_data
2376: );
2377: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2378: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
2379: RAISE;
2380: WHEN NO_DATA_FOUND THEN
2381: IF (cr_getId_rels%ISOPEN) THEN
2382: CLOSE cr_getId_rels;

Line 2384: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2380: WHEN NO_DATA_FOUND THEN
2381: IF (cr_getId_rels%ISOPEN) THEN
2382: CLOSE cr_getId_rels;
2383: END IF;
2384: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2385: IF (x_msg_data IS NOT NULL) THEN
2386: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retrieve_Relationship ';
2387: ELSE
2388: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retrieve_Relationship ';

Line 2396: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2392: WHEN OTHERS THEN
2393: IF (cr_getId_rels%ISOPEN) THEN
2394: CLOSE cr_getId_rels;
2395: END IF;
2396: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2397: IF (x_msg_data IS NOT NULL) THEN
2398: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retrieve_Relationship ';
2399: ELSE
2400: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retrieve_Relationship ';

Line 2462: x_return_status := FND_API.G_RET_STS_SUCCESS;

2458: FROM BSC_SYS_DIM_LEVELS_B
2459: WHERE DIM_LEVEL_ID = p_Parent_level_Id;
2460:
2461: BEGIN
2462: x_return_status := FND_API.G_RET_STS_SUCCESS;
2463: g_db_object := 'get_Relation_Column';
2464: FND_MSG_PUB.Initialize;
2465:
2466: IF ((p_Child_level_Id IS NOT NULL) AND (p_Parent_level_Id IS NOT NULL)) THEN

Line 2473: RAISE FND_API.G_EXC_ERROR;

2469: IF (l_count = 0) THEN
2470: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_LEVEL_ID');
2471: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Child_level_Id);
2472: FND_MSG_PUB.ADD;
2473: RAISE FND_API.G_EXC_ERROR;
2474: END IF;
2475:
2476: l_count := BSC_DIMENSION_LEVELS_PVT.Validate_Value( 'BSC_SYS_DIM_LEVELS_B', 'DIM_LEVEL_ID', p_Parent_level_Id);
2477: IF (l_count = 0) THEN

Line 2481: RAISE FND_API.G_EXC_ERROR;

2477: IF (l_count = 0) THEN
2478: FND_MESSAGE.SET_NAME('BSC','BSC_INVALID_LEVEL_ID');
2479: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Parent_level_Id);
2480: FND_MSG_PUB.ADD;
2481: RAISE FND_API.G_EXC_ERROR;
2482: END IF;
2483:
2484:
2485: IF (p_Relation_Type = 1) THEN

Line 2538: RAISE FND_API.G_EXC_ERROR;

2534: ELSE
2535: FND_MESSAGE.SET_NAME('BSC','BSC_NO_LEVEL_ID_ENTERED');
2536: FND_MESSAGE.SET_TOKEN('BSC_LEVEL_ID', p_Child_level_Id);
2537: FND_MSG_PUB.ADD;
2538: RAISE FND_API.G_EXC_ERROR;
2539: END IF;
2540:
2541: RETURN x_rel_col;
2542:

Line 2544: WHEN FND_API.G_EXC_ERROR THEN

2540:
2541: RETURN x_rel_col;
2542:
2543: EXCEPTION
2544: WHEN FND_API.G_EXC_ERROR THEN
2545: IF (c_abbr%ISOPEN) THEN
2546: CLOSE c_abbr;
2547: END IF;
2548: IF (p_abbr%ISOPEN) THEN

Line 2555: ( p_encoded => FND_API.G_FALSE

2551: IF (r_col%ISOPEN) THEN
2552: CLOSE r_col;
2553: END IF;
2554: FND_MSG_PUB.Count_And_Get
2555: ( p_encoded => FND_API.G_FALSE
2556: , p_count => x_msg_count
2557: , p_data => x_msg_data
2558: );
2559: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);

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

2555: ( p_encoded => FND_API.G_FALSE
2556: , p_count => x_msg_count
2557: , p_data => x_msg_data
2558: );
2559: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
2560: x_return_status := FND_API.G_RET_STS_ERROR;
2561: RAISE;
2562: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2563: IF (c_abbr%ISOPEN) THEN

Line 2560: x_return_status := FND_API.G_RET_STS_ERROR;

2556: , p_count => x_msg_count
2557: , p_data => x_msg_data
2558: );
2559: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
2560: x_return_status := FND_API.G_RET_STS_ERROR;
2561: RAISE;
2562: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2563: IF (c_abbr%ISOPEN) THEN
2564: CLOSE c_abbr;

Line 2562: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2558: );
2559: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_ERROR '||x_msg_data);
2560: x_return_status := FND_API.G_RET_STS_ERROR;
2561: RAISE;
2562: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2563: IF (c_abbr%ISOPEN) THEN
2564: CLOSE c_abbr;
2565: END IF;
2566: IF (p_abbr%ISOPEN) THEN

Line 2573: ( p_encoded => FND_API.G_FALSE

2569: IF (r_col%ISOPEN) THEN
2570: CLOSE r_col;
2571: END IF;
2572: FND_MSG_PUB.Count_And_Get
2573: ( p_encoded => FND_API.G_FALSE
2574: , p_count => x_msg_count
2575: , p_data => x_msg_data
2576: );
2577: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2577: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2573: ( p_encoded => FND_API.G_FALSE
2574: , p_count => x_msg_count
2575: , p_data => x_msg_data
2576: );
2577: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2578: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
2579: RAISE;
2580: WHEN NO_DATA_FOUND THEN
2581: IF (c_abbr%ISOPEN) THEN

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

2574: , p_count => x_msg_count
2575: , p_data => x_msg_data
2576: );
2577: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2578: --DBMS_OUTPUT.PUT_LINE('EXCEPTION FND_API.G_EXC_UNEXPECTED_ERROR '||x_msg_data);
2579: RAISE;
2580: WHEN NO_DATA_FOUND THEN
2581: IF (c_abbr%ISOPEN) THEN
2582: CLOSE c_abbr;

Line 2590: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2586: END IF;
2587: IF (r_col%ISOPEN) THEN
2588: CLOSE r_col;
2589: END IF;
2590: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2591: IF (x_msg_data IS NOT NULL) THEN
2592: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.get_Relation_Column ';
2593: ELSE
2594: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.get_Relation_Column ';

Line 2608: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2604: END IF;
2605: IF (r_col%ISOPEN) THEN
2606: CLOSE r_col;
2607: END IF;
2608: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2609: IF (x_msg_data IS NOT NULL) THEN
2610: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.get_Relation_Column ';
2611: ELSE
2612: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.get_Relation_Column ';

Line 2630: x_return_status:= FND_API.G_RET_STS_SUCCESS;

2626: ) IS
2627:
2628: BEGIN
2629:
2630: x_return_status:= FND_API.G_RET_STS_SUCCESS;
2631:
2632: SELECT
2633: dim_level_id
2634: ,short_name

Line 2667: WHEN FND_API.G_EXC_ERROR THEN

2663: x_Dim_Level_Rec.Bsc_Dim_Level_Help := p_Dim_Level_Rec.Bsc_Dim_Level_Help;
2664: END IF;
2665:
2666: EXCEPTION
2667: WHEN FND_API.G_EXC_ERROR THEN
2668: x_return_status := FND_API.G_RET_STS_ERROR;
2669: FND_MSG_PUB.Count_And_Get(
2670: p_encoded => 'F'
2671: ,p_count => x_msg_count

Line 2668: x_return_status := FND_API.G_RET_STS_ERROR;

2664: END IF;
2665:
2666: EXCEPTION
2667: WHEN FND_API.G_EXC_ERROR THEN
2668: x_return_status := FND_API.G_RET_STS_ERROR;
2669: FND_MSG_PUB.Count_And_Get(
2670: p_encoded => 'F'
2671: ,p_count => x_msg_count
2672: ,p_data => x_msg_data

Line 2675: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2671: ,p_count => x_msg_count
2672: ,p_data => x_msg_data
2673: );
2674: RAISE;
2675: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2676: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2677: FND_MSG_PUB.Count_And_Get(
2678: p_encoded => 'F'
2679: ,p_count => x_msg_count

Line 2676: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2672: ,p_data => x_msg_data
2673: );
2674: RAISE;
2675: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2676: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2677: FND_MSG_PUB.Count_And_Get(
2678: p_encoded => 'F'
2679: ,p_count => x_msg_count
2680: ,p_data => x_msg_data

Line 2684: x_return_status := FND_API.G_RET_STS_ERROR;

2680: ,p_data => x_msg_data
2681: );
2682: RAISE;
2683: WHEN NO_DATA_FOUND THEN
2684: x_return_status := FND_API.G_RET_STS_ERROR;
2685: IF (x_msg_data IS NOT NULL) THEN
2686: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retr_Updated_Bsc_Dim_Levels ';
2687: ELSE
2688: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retr_Updated_Bsc_Dim_Levels ';

Line 2690: RAISE FND_API.G_EXC_ERROR;

2686: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retr_Updated_Bsc_Dim_Levels ';
2687: ELSE
2688: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retr_Updated_Bsc_Dim_Levels ';
2689: END IF;
2690: RAISE FND_API.G_EXC_ERROR;
2691: WHEN OTHERS THEN
2692: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2693: IF (x_msg_data IS NOT NULL) THEN
2694: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retr_Updated_Bsc_Dim_Levels ';

Line 2692: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2688: x_msg_data := SQLERRM||' at BSC_DIMENSION_LEVELS_PVT.Retr_Updated_Bsc_Dim_Levels ';
2689: END IF;
2690: RAISE FND_API.G_EXC_ERROR;
2691: WHEN OTHERS THEN
2692: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2693: IF (x_msg_data IS NOT NULL) THEN
2694: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Retr_Updated_Bsc_Dim_Levels ';
2695: ELSE
2696: x_msg_data := 'BSC_DIMENSION_LEVELS_PVT.Retr_Updated_Bsc_Dim_Levels '||SQLERRM;

Line 2706: p_Commit IN VARCHAR2 := FND_API.G_FALSE

2702: --
2703: --================================================================================================
2704: --
2705: PROCEDURE Translate_Dimension_Level (
2706: p_Commit IN VARCHAR2 := FND_API.G_FALSE
2707: ,p_Bsc_Pmf_Dim_Rec IN BSC_PMF_UI_API_PUB.Bsc_Pmf_Dim_Rec_Type
2708: ,p_Bsc_Dim_Level_Rec IN BSC_DIMENSION_LEVELS_PUB.Bsc_Dim_Level_Rec_Type
2709: ,x_return_status OUT NOCOPY VARCHAR2
2710: ,x_msg_count OUT NOCOPY NUMBER

Line 2720: x_return_status:= FND_API.G_RET_STS_SUCCESS;

2716:
2717: BEGIN
2718:
2719: SAVEPOINT TranslateBSCDimLevPVT;
2720: x_return_status:= FND_API.G_RET_STS_SUCCESS;
2721: l_Dim_Level_Rec_In := p_Bsc_Dim_Level_Rec;
2722:
2723: l_Dim_Level_Rec_In.Bsc_Dim_Level_Long_Name := p_Bsc_Pmf_Dim_Rec.dimension_Level_long_name;
2724: l_Dim_Level_Rec_In.Bsc_Level_Short_Name := p_Bsc_Pmf_Dim_Rec.dimension_level_short_name;

Line 2735: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2731: ,x_msg_data => x_msg_data
2732: );
2733:
2734:
2735: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2736: RAISE FND_API.G_EXC_ERROR;
2737: END IF;
2738:
2739: UPDATE bsc_sys_dim_levels_tl

Line 2736: RAISE FND_API.G_EXC_ERROR;

2732: );
2733:
2734:
2735: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2736: RAISE FND_API.G_EXC_ERROR;
2737: END IF;
2738:
2739: UPDATE bsc_sys_dim_levels_tl
2740: SET name = l_Dim_Level_Rec_Out.Bsc_Dim_Level_Long_Name

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

2744: ,SOURCE_LANG = userenv('LANG')
2745: WHERE dim_level_id = l_Dim_Level_Rec_Out.Bsc_Level_Id
2746: AND userenv('LANG') IN (LANGUAGE, SOURCE_LANG);
2747:
2748: IF (p_commit = FND_API.G_TRUE) THEN
2749: COMMIT;
2750: END IF;
2751: EXCEPTION
2752: WHEN FND_API.G_EXC_ERROR THEN

Line 2752: WHEN FND_API.G_EXC_ERROR THEN

2748: IF (p_commit = FND_API.G_TRUE) THEN
2749: COMMIT;
2750: END IF;
2751: EXCEPTION
2752: WHEN FND_API.G_EXC_ERROR THEN
2753: x_return_status := FND_API.G_RET_STS_ERROR ;
2754: ROLLBACK TO TranslateBSCDimLevPVT;
2755: FND_MSG_PUB.Count_And_Get(
2756: p_encoded => 'F'

Line 2753: x_return_status := FND_API.G_RET_STS_ERROR ;

2749: COMMIT;
2750: END IF;
2751: EXCEPTION
2752: WHEN FND_API.G_EXC_ERROR THEN
2753: x_return_status := FND_API.G_RET_STS_ERROR ;
2754: ROLLBACK TO TranslateBSCDimLevPVT;
2755: FND_MSG_PUB.Count_And_Get(
2756: p_encoded => 'F'
2757: ,p_count => x_msg_count

Line 2760: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2756: p_encoded => 'F'
2757: ,p_count => x_msg_count
2758: ,p_data => x_msg_data
2759: );
2760: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2761: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2762: ROLLBACK TO TranslateBSCDimLevPVT;
2763: FND_MSG_PUB.Count_And_Get(
2764: p_encoded => 'F'

Line 2761: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

2757: ,p_count => x_msg_count
2758: ,p_data => x_msg_data
2759: );
2760: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2761: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2762: ROLLBACK TO TranslateBSCDimLevPVT;
2763: FND_MSG_PUB.Count_And_Get(
2764: p_encoded => 'F'
2765: ,p_count => x_msg_count

Line 2769: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

2765: ,p_count => x_msg_count
2766: ,p_data => x_msg_data
2767: );
2768: WHEN OTHERS THEN
2769: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2770: ROLLBACK TO TranslateBSCDimLevPVT;
2771: IF (x_msg_data IS NOT NULL) THEN
2772: x_msg_data := x_msg_data||' -> BSC_DIMENSION_LEVELS_PVT.Translate_Dimension_Level ';
2773: ELSE

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

2783:
2784: *************************************************************************************/
2785:
2786: procedure Trans_DimObj_By_Given_Lang
2787: ( p_commit IN VARCHAR2 := FND_API.G_FALSE
2788: , p_dim_level_rec IN BSC_DIMENSION_LEVELS_PUB.Bsc_Dim_Level_Rec_Type
2789: , x_return_status OUT NOCOPY VARCHAR2
2790: , x_msg_count OUT NOCOPY NUMBER
2791: , x_msg_data OUT NOCOPY VARCHAR2

Line 2797: x_return_status := FND_API.G_RET_STS_SUCCESS;

2793: IS
2794: l_Dim_Level_Id NUMBER;
2795: BEGIN
2796: SAVEPOINT TransDimObjByLangBsc;
2797: x_return_status := FND_API.G_RET_STS_SUCCESS;
2798: FND_MSG_PUB.Initialize;
2799:
2800: SELECT Dim_Level_Id
2801: INTO l_Dim_Level_Id

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

2810: WHERE DIM_LEVEL_ID = l_Dim_Level_Id
2811: AND LANGUAGE = p_dim_level_rec.Bsc_Language;
2812:
2813:
2814: IF (p_commit = FND_API.G_TRUE) THEN
2815: COMMIT;
2816: END IF;
2817:
2818:

Line 2820: WHEN FND_API.G_EXC_ERROR THEN

2816: END IF;
2817:
2818:
2819: EXCEPTION
2820: WHEN FND_API.G_EXC_ERROR THEN
2821: ROLLBACK TO TransDimObjByLangBsc;
2822: x_return_status := FND_API.G_RET_STS_ERROR;
2823: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2824: ,p_data => x_msg_data);

Line 2822: x_return_status := FND_API.G_RET_STS_ERROR;

2818:
2819: EXCEPTION
2820: WHEN FND_API.G_EXC_ERROR THEN
2821: ROLLBACK TO TransDimObjByLangBsc;
2822: x_return_status := FND_API.G_RET_STS_ERROR;
2823: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2824: ,p_data => x_msg_data);
2825:
2826: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2826: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2822: x_return_status := FND_API.G_RET_STS_ERROR;
2823: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2824: ,p_data => x_msg_data);
2825:
2826: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2827: ROLLBACK TO TransDimObjByLangBsc;
2828: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2829: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2830: ,p_data => x_msg_data);

Line 2828: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2824: ,p_data => x_msg_data);
2825:
2826: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2827: ROLLBACK TO TransDimObjByLangBsc;
2828: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2829: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2830: ,p_data => x_msg_data);
2831: WHEN NO_DATA_FOUND THEN
2832: ROLLBACK TO TransDimObjByLangBsc;

Line 2833: x_return_status := FND_API.G_RET_STS_ERROR;

2829: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2830: ,p_data => x_msg_data);
2831: WHEN NO_DATA_FOUND THEN
2832: ROLLBACK TO TransDimObjByLangBsc;
2833: x_return_status := FND_API.G_RET_STS_ERROR;
2834: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2835: ,p_data => x_msg_data);
2836:
2837: WHEN OTHERS THEN

Line 2839: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2835: ,p_data => x_msg_data);
2836:
2837: WHEN OTHERS THEN
2838: ROLLBACK TO TransDimObjByLangBsc;
2839: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2840: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
2841: ,p_data => x_msg_data);
2842:
2843: END Trans_DimObj_By_Given_Lang;