49: )IS
50: l_Calendar_Record BSC_CALENDAR_PUB.Calendar_Type_Record;
51: BEGIN
52: FND_MSG_PUB.Initialize;
53: x_Return_Status := FND_API.G_RET_STS_SUCCESS;
54: --Here Just populate the calendar record with the values passed from UI and call public API
55: l_Calendar_Record.Calendar_Id := p_Calendar_Id;
56: l_Calendar_Record.Edw_Flag := p_Edw_Flag;
57: l_Calendar_Record.Edw_Calendar_Id := p_Edw_Calendar_Id;
79: , x_Return_Status => x_Return_Status
80: , x_Msg_Count => x_Msg_Count
81: , x_Msg_Data => x_Msg_Data
82: );
83: IF(x_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
84: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
85: END IF;
86:
87: EXCEPTION
80: , x_Msg_Count => x_Msg_Count
81: , x_Msg_Data => x_Msg_Data
82: );
83: IF(x_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
84: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
85: END IF;
86:
87: EXCEPTION
88: WHEN FND_API.G_EXC_ERROR THEN
84: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
85: END IF;
86:
87: EXCEPTION
88: WHEN FND_API.G_EXC_ERROR THEN
89: IF (x_msg_data IS NULL) THEN
90: FND_MSG_PUB.Count_And_Get
91: ( p_encoded => FND_API.G_FALSE
92: , p_count => x_msg_count
87: EXCEPTION
88: WHEN FND_API.G_EXC_ERROR THEN
89: IF (x_msg_data IS NULL) THEN
90: FND_MSG_PUB.Count_And_Get
91: ( p_encoded => FND_API.G_FALSE
92: , p_count => x_msg_count
93: , p_data => x_msg_data
94: );
95: END IF;
92: , p_count => x_msg_count
93: , p_data => x_msg_data
94: );
95: END IF;
96: x_return_status := FND_API.G_RET_STS_ERROR;
97: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
98: IF (x_msg_data IS NULL) THEN
99: FND_MSG_PUB.Count_And_Get
100: ( p_encoded => FND_API.G_FALSE
93: , p_data => x_msg_data
94: );
95: END IF;
96: x_return_status := FND_API.G_RET_STS_ERROR;
97: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
98: IF (x_msg_data IS NULL) THEN
99: FND_MSG_PUB.Count_And_Get
100: ( p_encoded => FND_API.G_FALSE
101: , p_count => x_msg_count
96: x_return_status := FND_API.G_RET_STS_ERROR;
97: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
98: IF (x_msg_data IS NULL) THEN
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: END IF;
101: , p_count => x_msg_count
102: , p_data => x_msg_data
103: );
104: END IF;
105: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
106: WHEN NO_DATA_FOUND THEN
107: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
108: IF (x_msg_data IS NOT NULL) THEN
109: x_msg_data := x_msg_data||' -> BSC_CALENDAR_WRAPPER.Create_Calendar_UI ';
103: );
104: END IF;
105: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
106: WHEN NO_DATA_FOUND THEN
107: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
108: IF (x_msg_data IS NOT NULL) THEN
109: x_msg_data := x_msg_data||' -> BSC_CALENDAR_WRAPPER.Create_Calendar_UI ';
110: ELSE
111: x_msg_data := SQLERRM||' at BSC_CALENDAR_WRAPPER.Create_Calendar_UI ';
110: ELSE
111: x_msg_data := SQLERRM||' at BSC_CALENDAR_WRAPPER.Create_Calendar_UI ';
112: END IF;
113: WHEN OTHERS THEN
114: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
115: IF (x_msg_data IS NOT NULL) THEN
116: x_msg_data := x_msg_data||' -> BSC_CALENDAR_WRAPPER.Create_Calendar_UI ';
117: ELSE
118: x_msg_data := SQLERRM||' at BSC_CALENDAR_WRAPPER.Create_Calendar_UI ';
150: l_Calendar_Record BSC_CALENDAR_PUB.Calendar_Type_Record;
151: BEGIN
152: --dbms_output.put_line('i came here');
153: FND_MSG_PUB.Initialize;
154: x_Return_Status := FND_API.G_RET_STS_SUCCESS;
155: --Here Just populate the calendar record with the values passed from UI and call public API
156: l_Calendar_Record.Calendar_Id := p_Calendar_Id;
157: --dbms_output.put_line('not able to assign the value');
158: l_Calendar_Record.Edw_Flag := p_Edw_Flag;
181: , x_Return_Status => x_Return_Status
182: , x_Msg_Count => x_Msg_Count
183: , x_Msg_Data => x_Msg_Data
184: );
185: IF(x_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
186: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
187: END IF;
188:
189:
182: , x_Msg_Count => x_Msg_Count
183: , x_Msg_Data => x_Msg_Data
184: );
185: IF(x_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
186: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
187: END IF;
188:
189:
190: BSC_CALENDAR_PUB.Update_Calendar
194: , x_Return_Status => x_Return_Status
195: , x_Msg_Count => x_Msg_Count
196: , x_Msg_Data => x_Msg_Data
197: );
198: IF(x_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
199: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
200: END IF;
201:
202: EXCEPTION
195: , x_Msg_Count => x_Msg_Count
196: , x_Msg_Data => x_Msg_Data
197: );
198: IF(x_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
199: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
200: END IF;
201:
202: EXCEPTION
203: WHEN FND_API.G_EXC_ERROR THEN
199: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
200: END IF;
201:
202: EXCEPTION
203: WHEN FND_API.G_EXC_ERROR THEN
204: IF (x_msg_data IS NULL) THEN
205: FND_MSG_PUB.Count_And_Get
206: ( p_encoded => FND_API.G_FALSE
207: , p_count => x_msg_count
202: EXCEPTION
203: WHEN FND_API.G_EXC_ERROR THEN
204: IF (x_msg_data IS NULL) THEN
205: FND_MSG_PUB.Count_And_Get
206: ( p_encoded => FND_API.G_FALSE
207: , p_count => x_msg_count
208: , p_data => x_msg_data
209: );
210: END IF;
207: , p_count => x_msg_count
208: , p_data => x_msg_data
209: );
210: END IF;
211: x_return_status := FND_API.G_RET_STS_ERROR;
212: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
213: IF (x_msg_data IS NULL) THEN
214: FND_MSG_PUB.Count_And_Get
215: ( p_encoded => FND_API.G_FALSE
208: , p_data => x_msg_data
209: );
210: END IF;
211: x_return_status := FND_API.G_RET_STS_ERROR;
212: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
213: IF (x_msg_data IS NULL) THEN
214: FND_MSG_PUB.Count_And_Get
215: ( p_encoded => FND_API.G_FALSE
216: , p_count => x_msg_count
211: x_return_status := FND_API.G_RET_STS_ERROR;
212: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
213: IF (x_msg_data IS NULL) THEN
214: FND_MSG_PUB.Count_And_Get
215: ( p_encoded => FND_API.G_FALSE
216: , p_count => x_msg_count
217: , p_data => x_msg_data
218: );
219: END IF;
216: , p_count => x_msg_count
217: , p_data => x_msg_data
218: );
219: END IF;
220: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
221: WHEN NO_DATA_FOUND THEN
222: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
223: IF (x_msg_data IS NOT NULL) THEN
224: x_msg_data := x_msg_data||' -> BSC_CALENDAR_WRAPPER.Update_Calendar_UI ';
218: );
219: END IF;
220: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
221: WHEN NO_DATA_FOUND THEN
222: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
223: IF (x_msg_data IS NOT NULL) THEN
224: x_msg_data := x_msg_data||' -> BSC_CALENDAR_WRAPPER.Update_Calendar_UI ';
225: ELSE
226: x_msg_data := SQLERRM||' at BSC_CALENDAR_WRAPPER.Update_Calendar_UI ';
225: ELSE
226: x_msg_data := SQLERRM||' at BSC_CALENDAR_WRAPPER.Update_Calendar_UI ';
227: END IF;
228: WHEN OTHERS THEN
229: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
230: IF (x_msg_data IS NOT NULL) THEN
231: x_msg_data := x_msg_data||' -> BSC_CALENDAR_WRAPPER.Update_Calendar_UI ';
232: ELSE
233: x_msg_data := SQLERRM||' at BSC_CALENDAR_WRAPPER.Update_Calendar_UI ';
246: )IS
247: l_Calendar_Record BSC_CALENDAR_PUB.Calendar_Type_Record;
248: BEGIN
249: FND_MSG_PUB.Initialize;
250: x_Return_Status := FND_API.G_RET_STS_SUCCESS;
251: --Here Just populate the calendar record with the values passed from UI and call public API
252: l_Calendar_Record.Calendar_Id := p_Calendar_Id;
253:
254: BSC_BIS_LOCKS_PUB.Lock_Calendar_And_Periods (
257: , x_Return_Status => x_Return_Status
258: , x_Msg_Count => x_Msg_Count
259: , x_Msg_Data => x_Msg_Data
260: );
261: IF(x_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
262: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
263: END IF;
264:
265: BSC_CALENDAR_PUB.Delete_Calendar
258: , x_Msg_Count => x_Msg_Count
259: , x_Msg_Data => x_Msg_Data
260: );
261: IF(x_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
262: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
263: END IF;
264:
265: BSC_CALENDAR_PUB.Delete_Calendar
266: ( p_Api_Version => p_Api_Version
269: , x_Return_Status => x_Return_Status
270: , x_Msg_Count => x_Msg_Count
271: , x_Msg_Data => x_Msg_Data
272: );
273: IF(x_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
274: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
275: END IF;
276:
277: EXCEPTION
270: , x_Msg_Count => x_Msg_Count
271: , x_Msg_Data => x_Msg_Data
272: );
273: IF(x_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
274: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
275: END IF;
276:
277: EXCEPTION
278: WHEN FND_API.G_EXC_ERROR THEN
274: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
275: END IF;
276:
277: EXCEPTION
278: WHEN FND_API.G_EXC_ERROR THEN
279: IF (x_msg_data IS NULL) THEN
280: FND_MSG_PUB.Count_And_Get
281: ( p_encoded => FND_API.G_FALSE
282: , p_count => x_msg_count
277: EXCEPTION
278: WHEN FND_API.G_EXC_ERROR THEN
279: IF (x_msg_data IS NULL) THEN
280: FND_MSG_PUB.Count_And_Get
281: ( p_encoded => FND_API.G_FALSE
282: , p_count => x_msg_count
283: , p_data => x_msg_data
284: );
285: END IF;
282: , p_count => x_msg_count
283: , p_data => x_msg_data
284: );
285: END IF;
286: x_return_status := FND_API.G_RET_STS_ERROR;
287: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
288: IF (x_msg_data IS NULL) THEN
289: FND_MSG_PUB.Count_And_Get
290: ( p_encoded => FND_API.G_FALSE
283: , p_data => x_msg_data
284: );
285: END IF;
286: x_return_status := FND_API.G_RET_STS_ERROR;
287: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
288: IF (x_msg_data IS NULL) THEN
289: FND_MSG_PUB.Count_And_Get
290: ( p_encoded => FND_API.G_FALSE
291: , p_count => x_msg_count
286: x_return_status := FND_API.G_RET_STS_ERROR;
287: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
288: IF (x_msg_data IS NULL) THEN
289: FND_MSG_PUB.Count_And_Get
290: ( p_encoded => FND_API.G_FALSE
291: , p_count => x_msg_count
292: , p_data => x_msg_data
293: );
294: END IF;
291: , p_count => x_msg_count
292: , p_data => x_msg_data
293: );
294: END IF;
295: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
296: WHEN NO_DATA_FOUND THEN
297: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
298: IF (x_msg_data IS NOT NULL) THEN
299: x_msg_data := x_msg_data||' -> BSC_CALENDAR_WRAPPER.Delete_Calendar_UI ';
293: );
294: END IF;
295: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
296: WHEN NO_DATA_FOUND THEN
297: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
298: IF (x_msg_data IS NOT NULL) THEN
299: x_msg_data := x_msg_data||' -> BSC_CALENDAR_WRAPPER.Delete_Calendar_UI ';
300: ELSE
301: x_msg_data := SQLERRM||' at BSC_CALENDAR_WRAPPER.Delete_Calendar_UI ';
300: ELSE
301: x_msg_data := SQLERRM||' at BSC_CALENDAR_WRAPPER.Delete_Calendar_UI ';
302: END IF;
303: WHEN OTHERS THEN
304: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
305: IF (x_msg_data IS NOT NULL) THEN
306: x_msg_data := x_msg_data||' -> BSC_CALENDAR_WRAPPER.Delete_Calendar_UI ';
307: ELSE
308: x_msg_data := SQLERRM||' at BSC_CALENDAR_WRAPPER.Delete_Calendar_UI ';
318: RETURN VARCHAR2 IS
319: BEGIN
320:
321: IF (bsc_dbi_calendar.check_for_dbi) THEN
322: RETURN FND_API.G_TRUE;
323: ELSE
324: RETURN FND_API.G_FALSE;
325: END IF;
326:
320:
321: IF (bsc_dbi_calendar.check_for_dbi) THEN
322: RETURN FND_API.G_TRUE;
323: ELSE
324: RETURN FND_API.G_FALSE;
325: END IF;
326:
327: EXCEPTION
328: WHEN OTHERS THEN
325: END IF;
326:
327: EXCEPTION
328: WHEN OTHERS THEN
329: RETURN FND_API.G_FALSE;
330: END Is_Dbi_Calendar_Enabled;
331:
332:
333: END BSC_CALENDAR_WRAPPER;