43: SAVEPOINT CheckFiltersNotApply;
44: --DBMS_OUTPUT.PUT_LINE('BEGIN Check_Filters_Not_Apply' );
45: --DBMS_OUTPUT.PUT_LINE('Check_Filters_Not_Apply p_Tab_Id = ' || p_Tab_Id );
46:
47: x_return_status := FND_API.G_RET_STS_SUCCESS;
48:
49: IF (p_Tab_Id IS NOT NULL) THEN
50:
51: --INSERT INTO TESTBUG values('Check_Filters_Not_Apply pub-->'|| to_char(p_Tab_Id));
76: END IF;
77: --DBMS_OUTPUT.PUT_LINE('END Check_Filters_Not_Apply' );
78: EXCEPTION
79: /*
80: WHEN FND_API.G_EXC_ERROR THEN
81: IF (c_tabs_with_filters%ISOPEN) THEN
82: CLOSE c_tabs_with_filters;
83: END IF;
84: ROLLBACK TO CheckFiltersNotApply;
81: IF (c_tabs_with_filters%ISOPEN) THEN
82: CLOSE c_tabs_with_filters;
83: END IF;
84: ROLLBACK TO CheckFiltersNotApply;
85: x_return_status := FND_API.G_RET_STS_ERROR;
86: FND_MSG_PUB.COUNT_And_Get
87: ( p_encoded => FND_API.G_FALSE
88: , p_COUNT => x_msg_COUNT
89: , p_data => x_msg_data
83: END IF;
84: ROLLBACK TO CheckFiltersNotApply;
85: x_return_status := FND_API.G_RET_STS_ERROR;
86: FND_MSG_PUB.COUNT_And_Get
87: ( p_encoded => FND_API.G_FALSE
88: , p_COUNT => x_msg_COUNT
89: , p_data => x_msg_data
90: );
91: RAISE;
89: , p_data => x_msg_data
90: );
91: RAISE;
92: */
93: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
94: IF (c_tabs_with_filters%ISOPEN) THEN
95: CLOSE c_tabs_with_filters;
96: END IF;
97: ROLLBACK TO CheckFiltersNotApply;
94: IF (c_tabs_with_filters%ISOPEN) THEN
95: CLOSE c_tabs_with_filters;
96: END IF;
97: ROLLBACK TO CheckFiltersNotApply;
98: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
99: FND_MSG_PUB.COUNT_And_Get
100: ( p_encoded => FND_API.G_FALSE
101: , p_COUNT => x_msg_COUNT
102: , p_data => x_msg_data
96: END IF;
97: ROLLBACK TO CheckFiltersNotApply;
98: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
99: FND_MSG_PUB.COUNT_And_Get
100: ( p_encoded => FND_API.G_FALSE
101: , p_COUNT => x_msg_COUNT
102: , p_data => x_msg_data
103: );
104: RAISE;
106: IF (c_tabs_with_filters%ISOPEN) THEN
107: CLOSE c_tabs_with_filters;
108: END IF;
109: ROLLBACK TO CheckFiltersNotApply;
110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
111: FND_MSG_PUB.COUNT_And_Get
112: ( p_encoded => FND_API.G_FALSE
113: , p_COUNT => x_msg_COUNT
114: , p_data => x_msg_data
108: END IF;
109: ROLLBACK TO CheckFiltersNotApply;
110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
111: FND_MSG_PUB.COUNT_And_Get
112: ( p_encoded => FND_API.G_FALSE
113: , p_COUNT => x_msg_COUNT
114: , p_data => x_msg_data
115: );
116: RAISE;
133: AND ((B.Indicator = p_kpi_id) OR (B.Source_Indicator = p_kpi_id));
134:
135: BEGIN
136: --DBMS_OUTPUT.PUT_LINE('Entered inside BSC_BIS_KPI_MEAS_PUB.Check_Filters_Not_Apply Procedure');
137: x_return_status := FND_API.G_RET_STS_SUCCESS;
138:
139: FOR cd IN c_Filters_Tab LOOP
140:
141: --INSERT INTO TESTBUG values('Now deleting -->'|| to_char(cd.Source_Code));
146: , x_return_status => x_return_status
147: , x_msg_count => x_msg_count
148: , x_msg_data => x_msg_data
149: );
150: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
151: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_KPI_MEAS_PUB.Check_Filters_Not_Apply Failed: at BSC_DIM_FILTERS_PUB.Check_Filters_Not_Apply');
152: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
153: END IF;
154: END LOOP;
148: , x_msg_data => x_msg_data
149: );
150: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
151: --DBMS_OUTPUT.PUT_LINE('BSC_BIS_KPI_MEAS_PUB.Check_Filters_Not_Apply Failed: at BSC_DIM_FILTERS_PUB.Check_Filters_Not_Apply');
152: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
153: END IF;
154: END LOOP;
155:
156: --DBMS_OUTPUT.PUT_LINE('Exiting from BSC_BIS_KPI_MEAS_PUB.Check_Filters_Not_Apply Procedure');
154: END LOOP;
155:
156: --DBMS_OUTPUT.PUT_LINE('Exiting from BSC_BIS_KPI_MEAS_PUB.Check_Filters_Not_Apply Procedure');
157: EXCEPTION
158: WHEN FND_API.G_EXC_ERROR THEN
159: IF (x_msg_data IS NULL) THEN
160: FND_MSG_PUB.Count_And_Get
161: ( p_encoded => FND_API.G_FALSE
162: , p_count => x_msg_count
157: EXCEPTION
158: WHEN FND_API.G_EXC_ERROR THEN
159: IF (x_msg_data IS NULL) THEN
160: FND_MSG_PUB.Count_And_Get
161: ( p_encoded => FND_API.G_FALSE
162: , p_count => x_msg_count
163: , p_data => x_msg_data
164: );
165: END IF;
162: , p_count => x_msg_count
163: , p_data => x_msg_data
164: );
165: END IF;
166: x_return_status := FND_API.G_RET_STS_ERROR;
167: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
168: IF (x_msg_data IS NULL) THEN
169: FND_MSG_PUB.Count_And_Get
170: ( p_encoded => FND_API.G_FALSE
163: , p_data => x_msg_data
164: );
165: END IF;
166: x_return_status := FND_API.G_RET_STS_ERROR;
167: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
168: IF (x_msg_data IS NULL) THEN
169: FND_MSG_PUB.Count_And_Get
170: ( p_encoded => FND_API.G_FALSE
171: , p_count => x_msg_count
166: x_return_status := FND_API.G_RET_STS_ERROR;
167: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
168: IF (x_msg_data IS NULL) THEN
169: FND_MSG_PUB.Count_And_Get
170: ( p_encoded => FND_API.G_FALSE
171: , p_count => x_msg_count
172: , p_data => x_msg_data
173: );
174: END IF;
171: , p_count => x_msg_count
172: , p_data => x_msg_data
173: );
174: END IF;
175: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
176: WHEN OTHERS THEN
177: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
178: IF (x_msg_data IS NULL) THEN
179: x_msg_data := x_msg_data||' -> BSC_DIM_FILTERS_PUB.Check_Filters_Not_Apply_By_KPI ';
173: );
174: END IF;
175: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
176: WHEN OTHERS THEN
177: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
178: IF (x_msg_data IS NULL) THEN
179: x_msg_data := x_msg_data||' -> BSC_DIM_FILTERS_PUB.Check_Filters_Not_Apply_By_KPI ';
180: ELSE
181: x_msg_data := SQLERRM||' at BSC_DIM_FILTERS_PUB.Check_Filters_Not_Apply_By_KPI ';
206:
207:
208: --DBMS_OUTPUT.PUT_LINE('END Drop_Filter p_Tab_Id = ' || p_Tab_Id || ' p_Dim_Level_Id = ' || p_Dim_Level_Id );
209: EXCEPTION
210: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
211: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
212: FND_MSG_PUB.COUNT_And_Get
213: ( p_encoded => FND_API.G_FALSE
214: , p_COUNT => x_msg_COUNT
207:
208: --DBMS_OUTPUT.PUT_LINE('END Drop_Filter p_Tab_Id = ' || p_Tab_Id || ' p_Dim_Level_Id = ' || p_Dim_Level_Id );
209: EXCEPTION
210: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
211: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
212: FND_MSG_PUB.COUNT_And_Get
213: ( p_encoded => FND_API.G_FALSE
214: , p_COUNT => x_msg_COUNT
215: , p_data => x_msg_data
209: EXCEPTION
210: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
211: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
212: FND_MSG_PUB.COUNT_And_Get
213: ( p_encoded => FND_API.G_FALSE
214: , p_COUNT => x_msg_COUNT
215: , p_data => x_msg_data
216: );
217: RAISE;
215: , p_data => x_msg_data
216: );
217: RAISE;
218: WHEN OTHERS THEN
219: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
220: IF (x_msg_data IS NOT NULL) THEN
221: x_msg_data := x_msg_data||' -> BSC_DIM_FILTERS_PUB.Drop_Filter';
222: ELSE
223: x_msg_data := SQLERRM||' at BSC_DIM_FILTERS_PUB.Drop_Filter';
243: );
244:
245: --DBMS_OUTPUT.PUT_LINE('END Synch_Fiters_And_Kpi_Dim' );
246: EXCEPTION
247: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
248: ROLLBACK TO BcsFiltersPubSynchKpiDim;
249: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
250: FND_MSG_PUB.COUNT_And_Get
251: ( p_encoded => FND_API.G_FALSE
245: --DBMS_OUTPUT.PUT_LINE('END Synch_Fiters_And_Kpi_Dim' );
246: EXCEPTION
247: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
248: ROLLBACK TO BcsFiltersPubSynchKpiDim;
249: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
250: FND_MSG_PUB.COUNT_And_Get
251: ( p_encoded => FND_API.G_FALSE
252: , p_COUNT => x_msg_COUNT
253: , p_data => x_msg_data
247: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
248: ROLLBACK TO BcsFiltersPubSynchKpiDim;
249: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
250: FND_MSG_PUB.COUNT_And_Get
251: ( p_encoded => FND_API.G_FALSE
252: , p_COUNT => x_msg_COUNT
253: , p_data => x_msg_data
254: );
255: RAISE;
254: );
255: RAISE;
256: WHEN OTHERS THEN
257: ROLLBACK TO BcsFiltersPubSynchKpiDim;
258: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
259: IF (x_msg_data IS NOT NULL) THEN
260: x_msg_data := x_msg_data ||' -> BSC_DIM_FILTERS_PUB.Synch_Fiters_And_Kpi_Dim ';
261: ELSE
262: x_msg_data := SQLERRM ||' at BSC_DIM_FILTERS_PUB.Synch_Fiters_And_Kpi_Dim ';
280: WHERE Dim_Level_Id = p_Dim_Level_Id;
281: BEGIN
282: --DBMS_OUTPUT.PUT_LINE(' BEGIN Drop_Filter_By_Dim_Obj ');
283: --DBMS_OUTPUT.PUT_LINE(' p_Dim_Level_Id = ' || p_Dim_Level_Id);
284: x_return_status := FND_API.G_RET_STS_SUCCESS;
285:
286: SAVEPOINT BcsFiltersPubDelFilterViewBDO;
287:
288: OPEN c_tabs_with_current_dim_obj;
303: END LOOP;
304: CLOSE c_tabs_with_current_dim_obj;
305: --DBMS_OUTPUT.PUT_LINE(' END Drop_Filter_By_Dim_Obj ');
306: EXCEPTION
307: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
308: IF (c_tabs_with_current_dim_obj%ISOPEN) THEN
309: CLOSE c_tabs_with_current_dim_obj;
310: END IF;
311: ROLLBACK TO BcsFiltersPubDelFilterViewBDO;
308: IF (c_tabs_with_current_dim_obj%ISOPEN) THEN
309: CLOSE c_tabs_with_current_dim_obj;
310: END IF;
311: ROLLBACK TO BcsFiltersPubDelFilterViewBDO;
312: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
313: FND_MSG_PUB.COUNT_And_Get
314: ( p_encoded => FND_API.G_FALSE
315: , p_COUNT => x_msg_COUNT
316: , p_data => x_msg_data
310: END IF;
311: ROLLBACK TO BcsFiltersPubDelFilterViewBDO;
312: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
313: FND_MSG_PUB.COUNT_And_Get
314: ( p_encoded => FND_API.G_FALSE
315: , p_COUNT => x_msg_COUNT
316: , p_data => x_msg_data
317: );
318: RAISE;
320: IF (c_tabs_with_current_dim_obj%ISOPEN) THEN
321: CLOSE c_tabs_with_current_dim_obj;
322: END IF;
323: ROLLBACK TO BcsFiltersPubDelFilterViewBDO;
324: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
325: IF (x_msg_data IS NOT NULL) THEN
326: x_msg_data := x_msg_data||' -> BSC_DIM_FILTERS_PUB.Drop_Filter_By_Dim_Obj';
327: ELSE
328: x_msg_data := SQLERRM||' at BSC_DIM_FILTERS_PUB.Drop_Filter_By_Dim_Obj';
345: WHERE Source_Code = p_Tab_Id;
346:
347: l_Dim_Level_id NUMBER;
348: BEGIN
349: x_return_status := FND_API.G_RET_STS_SUCCESS;
350: SAVEPOINT BcsFiltersPubDelFilterViewBT;
351: --DBMS_OUTPUT.PUT_LINE(' BEGIN Drop_Filter_By_Tab ');
352: --DBMS_OUTPUT.PUT_LINE(' p_Tab_Id = ' || p_Tab_Id);
353:
369: END LOOP;
370: CLOSE c_dim_filters;
371: --DBMS_OUTPUT.PUT_LINE(' END Drop_Filter_By_Tab ');
372: EXCEPTION
373: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
374: IF (c_dim_filters%ISOPEN) THEN
375: CLOSE c_dim_filters;
376: END IF;
377: ROLLBACK TO BcsFiltersPubDelFilterViewBT;
374: IF (c_dim_filters%ISOPEN) THEN
375: CLOSE c_dim_filters;
376: END IF;
377: ROLLBACK TO BcsFiltersPubDelFilterViewBT;
378: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
379: FND_MSG_PUB.COUNT_And_Get
380: ( p_encoded => FND_API.G_FALSE
381: , p_COUNT => x_msg_COUNT
382: , p_data => x_msg_data
376: END IF;
377: ROLLBACK TO BcsFiltersPubDelFilterViewBT;
378: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
379: FND_MSG_PUB.COUNT_And_Get
380: ( p_encoded => FND_API.G_FALSE
381: , p_COUNT => x_msg_COUNT
382: , p_data => x_msg_data
383: );
384: RAISE;
386: IF (c_dim_filters%ISOPEN) THEN
387: CLOSE c_dim_filters;
388: END IF;
389: ROLLBACK TO BcsFiltersPubDelFilterViewBT;
390: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
391: IF (x_msg_data IS NOT NULL) THEN
392: x_msg_data := x_msg_data||' -> BSC_DIM_FILTERS_PUB.Drop_Filter_By_Tab';
393: ELSE
394: x_msg_data := SQLERRM||' at BSC_DIM_FILTERS_PUB.Drop_Filter_By_Tab';