DBA Data[Home] [Help]

APPS.PSB_YEAR_TYPE_PVT dependencies on FND_API

Line 11: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

7: /* ----------------------------------------------------------------------- */
8:
9: PROCEDURE Check_Unique_Sequence
10: ( p_api_version IN NUMBER,
11: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
12: p_commit IN VARCHAR2 := FND_API.G_FALSE,
13: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
14: p_return_status OUT NOCOPY VARCHAR2,
15: p_msg_count OUT NOCOPY NUMBER,

Line 12: p_commit IN VARCHAR2 := FND_API.G_FALSE,

8:
9: PROCEDURE Check_Unique_Sequence
10: ( p_api_version IN NUMBER,
11: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
12: p_commit IN VARCHAR2 := FND_API.G_FALSE,
13: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
14: p_return_status OUT NOCOPY VARCHAR2,
15: p_msg_count OUT NOCOPY NUMBER,
16: p_msg_data OUT NOCOPY VARCHAR2,

Line 13: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

9: PROCEDURE Check_Unique_Sequence
10: ( p_api_version IN NUMBER,
11: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
12: p_commit IN VARCHAR2 := FND_API.G_FALSE,
13: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
14: p_return_status OUT NOCOPY VARCHAR2,
15: p_msg_count OUT NOCOPY NUMBER,
16: p_msg_data OUT NOCOPY VARCHAR2,
17: p_year_type_id IN NUMBER,

Line 33: if not FND_API.Compatible_API_Call (l_api_version,

29: SAVEPOINT Check_Unique_Sequence;
30:
31: -- Standard call to check for call compatibility.
32:
33: if not FND_API.Compatible_API_Call (l_api_version,
34: p_api_version,
35: l_api_name,
36: G_PKG_NAME)
37: then

Line 38: raise FND_API.G_EXC_UNEXPECTED_ERROR;

34: p_api_version,
35: l_api_name,
36: G_PKG_NAME)
37: then
38: raise FND_API.G_EXC_UNEXPECTED_ERROR;
39: end if;
40:
41: -- Initialize message list if p_init_msg_list is set to TRUE.
42:

Line 43: if FND_API.to_Boolean (p_init_msg_list) then

39: end if;
40:
41: -- Initialize message list if p_init_msg_list is set to TRUE.
42:
43: if FND_API.to_Boolean (p_init_msg_list) then
44: FND_MSG_PUB.initialize;
45: end if;
46:
47: -- Initialize API return status to success

Line 49: p_return_status := FND_API.G_RET_STS_SUCCESS;

45: end if;
46:
47: -- Initialize API return status to success
48:
49: p_return_status := FND_API.G_RET_STS_SUCCESS;
50:
51: --
52: SELECT count(*)
53: INTO l_seq_count

Line 62: RAISE FND_API.G_EXC_ERROR;

58: --
59: if l_seq_count > 0 then
60: FND_MESSAGE.Set_Name('PSB', 'PSB_DUP_YEAR_TYPE_SEQ');
61: FND_MSG_PUB.Add;
62: RAISE FND_API.G_EXC_ERROR;
63: end if;
64: --
65:
66: -- Standard check of p_commit.

Line 68: if FND_API.to_Boolean (p_commit) then

64: --
65:
66: -- Standard check of p_commit.
67:
68: if FND_API.to_Boolean (p_commit) then
69: commit work;
70: end if;
71:
72: -- Standard call to get message count and if count is 1, get message info.

Line 79: when FND_API.G_EXC_ERROR then

75: p_data => p_msg_data);
76:
77: EXCEPTION
78:
79: when FND_API.G_EXC_ERROR then
80:
81: rollback to Check_Unique_Sequence;
82:
83: p_return_status := FND_API.G_RET_STS_ERROR;

Line 83: p_return_status := FND_API.G_RET_STS_ERROR;

79: when FND_API.G_EXC_ERROR then
80:
81: rollback to Check_Unique_Sequence;
82:
83: p_return_status := FND_API.G_RET_STS_ERROR;
84:
85: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
86: p_data => p_msg_data);
87:

Line 89: when FND_API.G_EXC_UNEXPECTED_ERROR then

85: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
86: p_data => p_msg_data);
87:
88:
89: when FND_API.G_EXC_UNEXPECTED_ERROR then
90:
91: rollback to Check_Unique_Sequence ;
92:
93: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 93: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

89: when FND_API.G_EXC_UNEXPECTED_ERROR then
90:
91: rollback to Check_Unique_Sequence ;
92:
93: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
94:
95: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
96: p_data => p_msg_data);
97:

Line 103: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

99: when OTHERS then
100:
101: rollback to Check_Unique_Sequence;
102:
103: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
104:
105: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
106:
107: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,

Line 119: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

115: --
116: --
117: PROCEDURE Check_Sequence
118: ( p_api_version IN NUMBER,
119: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
120: p_commit IN VARCHAR2 := FND_API.G_FALSE,
121: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
122: p_return_status OUT NOCOPY VARCHAR2,
123: p_msg_count OUT NOCOPY NUMBER,

Line 120: p_commit IN VARCHAR2 := FND_API.G_FALSE,

116: --
117: PROCEDURE Check_Sequence
118: ( p_api_version IN NUMBER,
119: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
120: p_commit IN VARCHAR2 := FND_API.G_FALSE,
121: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
122: p_return_status OUT NOCOPY VARCHAR2,
123: p_msg_count OUT NOCOPY NUMBER,
124: p_msg_data OUT NOCOPY VARCHAR2,

Line 121: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

117: PROCEDURE Check_Sequence
118: ( p_api_version IN NUMBER,
119: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
120: p_commit IN VARCHAR2 := FND_API.G_FALSE,
121: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
122: p_return_status OUT NOCOPY VARCHAR2,
123: p_msg_count OUT NOCOPY NUMBER,
124: p_msg_data OUT NOCOPY VARCHAR2,
125: p_year_type IN VARCHAR2,

Line 151: if not FND_API.Compatible_API_Call (l_api_version,

147: SAVEPOINT Check_Sequence;
148:
149: -- Standard call to check for call compatibility.
150:
151: if not FND_API.Compatible_API_Call (l_api_version,
152: p_api_version,
153: l_api_name,
154: G_PKG_NAME)
155: then

Line 156: raise FND_API.G_EXC_UNEXPECTED_ERROR;

152: p_api_version,
153: l_api_name,
154: G_PKG_NAME)
155: then
156: raise FND_API.G_EXC_UNEXPECTED_ERROR;
157: end if;
158:
159: -- Initialize message list if p_init_msg_list is set to TRUE.
160:

Line 161: if FND_API.to_Boolean (p_init_msg_list) then

157: end if;
158:
159: -- Initialize message list if p_init_msg_list is set to TRUE.
160:
161: if FND_API.to_Boolean (p_init_msg_list) then
162: FND_MSG_PUB.initialize;
163: end if;
164:
165: -- Initialize API return status to success

Line 167: p_return_status := FND_API.G_RET_STS_SUCCESS;

163: end if;
164:
165: -- Initialize API return status to success
166:
167: p_return_status := FND_API.G_RET_STS_SUCCESS;
168:
169: -- API body
170: open ytp_csr ;
171: fetch ytp_csr into l_py_max, l_pp_min, l_cy_min, l_dummy ;

Line 178: RAISE FND_API.G_EXC_ERROR;

174: if p_year_type = 'PY' then
175: if p_year_type_seq > l_cy_min then
176: FND_MESSAGE.Set_name ('PSB', 'PSB_PY_GREATER_THAN_CY');
177: FND_MSG_PUB.Add;
178: RAISE FND_API.G_EXC_ERROR;
179: end if;
180: --
181: if p_year_type_seq > l_pp_min then
182: FND_MESSAGE.Set_name ('PSB', 'PSB_PY_GREATER_THAN_PP');

Line 184: RAISE FND_API.G_EXC_ERROR;

180: --
181: if p_year_type_seq > l_pp_min then
182: FND_MESSAGE.Set_name ('PSB', 'PSB_PY_GREATER_THAN_PP');
183: FND_MSG_PUB.Add;
184: RAISE FND_API.G_EXC_ERROR;
185: end if;
186: end if;
187: --
188: --

Line 193: RAISE FND_API.G_EXC_ERROR;

189: if p_year_type = 'CY' then
190: if p_year_type_seq < l_py_max then
191: FND_MESSAGE.Set_name ('PSB', 'PSB_PY_GREATER_THAN_CY');
192: FND_MSG_PUB.Add;
193: RAISE FND_API.G_EXC_ERROR;
194: end if;
195: --
196: if p_year_type_seq > l_pp_min then
197: FND_MESSAGE.Set_name ('PSB', 'PSB_CY_GREATER_THAN_PP');

Line 199: RAISE FND_API.G_EXC_ERROR;

195: --
196: if p_year_type_seq > l_pp_min then
197: FND_MESSAGE.Set_name ('PSB', 'PSB_CY_GREATER_THAN_PP');
198: FND_MSG_PUB.Add;
199: RAISE FND_API.G_EXC_ERROR;
200: end if;
201: end if;
202: --
203: --

Line 208: RAISE FND_API.G_EXC_ERROR;

204: if p_year_type = 'PP' then
205: if p_year_type_seq < l_cy_min then
206: FND_MESSAGE.Set_name ('PSB', 'PSB_CY_GREATER_THAN_PP');
207: FND_MSG_PUB.Add;
208: RAISE FND_API.G_EXC_ERROR;
209: end if;
210: --
211: if p_year_type_seq < l_py_max then
212: FND_MESSAGE.Set_name ('PSB', 'PSB_PY_GREATER_THAN_PP');

Line 214: RAISE FND_API.G_EXC_ERROR;

210: --
211: if p_year_type_seq < l_py_max then
212: FND_MESSAGE.Set_name ('PSB', 'PSB_PY_GREATER_THAN_PP');
213: FND_MSG_PUB.Add;
214: RAISE FND_API.G_EXC_ERROR;
215: end if;
216: end if;
217: --
218: -- End of API body.

Line 222: if FND_API.to_Boolean (p_commit) then

218: -- End of API body.
219:
220: -- Standard check of p_commit.
221:
222: if FND_API.to_Boolean (p_commit) then
223: commit work;
224: end if;
225:
226: -- Standard call to get message count and if count is 1, get message info.

Line 233: when FND_API.G_EXC_ERROR then

229: p_data => p_msg_data);
230:
231: EXCEPTION
232:
233: when FND_API.G_EXC_ERROR then
234:
235: rollback to Check_Sequence ;
236:
237: p_return_status := FND_API.G_RET_STS_ERROR;

Line 237: p_return_status := FND_API.G_RET_STS_ERROR;

233: when FND_API.G_EXC_ERROR then
234:
235: rollback to Check_Sequence ;
236:
237: p_return_status := FND_API.G_RET_STS_ERROR;
238:
239: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
240: p_data => p_msg_data);
241:

Line 242: when FND_API.G_EXC_UNEXPECTED_ERROR then

238:
239: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
240: p_data => p_msg_data);
241:
242: when FND_API.G_EXC_UNEXPECTED_ERROR then
243:
244: rollback to Check_Sequence;
245:
246: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 246: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

242: when FND_API.G_EXC_UNEXPECTED_ERROR then
243:
244: rollback to Check_Sequence;
245:
246: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
247:
248: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
249: p_data => p_msg_data);
250:

Line 256: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

252: when OTHERS then
253:
254: rollback to Check_Sequence;
255:
256: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
257:
258: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
259:
260: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,

Line 272: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

268: --
269: --
270: PROCEDURE Check_CY_Count
271: ( p_api_version IN NUMBER,
272: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
273: p_commit IN VARCHAR2 := FND_API.G_FALSE,
274: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
275: p_return_status OUT NOCOPY VARCHAR2,
276: p_msg_count OUT NOCOPY NUMBER,

Line 273: p_commit IN VARCHAR2 := FND_API.G_FALSE,

269: --
270: PROCEDURE Check_CY_Count
271: ( p_api_version IN NUMBER,
272: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
273: p_commit IN VARCHAR2 := FND_API.G_FALSE,
274: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
275: p_return_status OUT NOCOPY VARCHAR2,
276: p_msg_count OUT NOCOPY NUMBER,
277: p_msg_data OUT NOCOPY VARCHAR2,

Line 274: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

270: PROCEDURE Check_CY_Count
271: ( p_api_version IN NUMBER,
272: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
273: p_commit IN VARCHAR2 := FND_API.G_FALSE,
274: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
275: p_return_status OUT NOCOPY VARCHAR2,
276: p_msg_count OUT NOCOPY NUMBER,
277: p_msg_data OUT NOCOPY VARCHAR2,
278: p_year_type_id IN NUMBER)

Line 293: if not FND_API.Compatible_API_Call (l_api_version,

289: SAVEPOINT Check_CY_Count;
290:
291: -- Standard call to check for call compatibility.
292:
293: if not FND_API.Compatible_API_Call (l_api_version,
294: p_api_version,
295: l_api_name,
296: G_PKG_NAME)
297: then

Line 298: raise FND_API.G_EXC_UNEXPECTED_ERROR;

294: p_api_version,
295: l_api_name,
296: G_PKG_NAME)
297: then
298: raise FND_API.G_EXC_UNEXPECTED_ERROR;
299: end if;
300:
301: -- Initialize message list if p_init_msg_list is set to TRUE.
302:

Line 303: if FND_API.to_Boolean (p_init_msg_list) then

299: end if;
300:
301: -- Initialize message list if p_init_msg_list is set to TRUE.
302:
303: if FND_API.to_Boolean (p_init_msg_list) then
304: FND_MSG_PUB.initialize;
305: end if;
306:
307: -- Initialize API return status to success

Line 309: p_return_status := FND_API.G_RET_STS_SUCCESS;

305: end if;
306:
307: -- Initialize API return status to success
308:
309: p_return_status := FND_API.G_RET_STS_SUCCESS;
310:
311: -- API body
312: SELECT count(*)
313: INTO l_cy_count

Line 322: RAISE FND_API.G_EXC_ERROR ;

318: --
319: if l_cy_count > 0 then
320: FND_MESSAGE.Set_Name('PSB', 'PSB_DUP_CY_TYPE');
321: FND_MSG_PUB.Add;
322: RAISE FND_API.G_EXC_ERROR ;
323: end if;
324: -- End of API body.
325:
326: -- Standard check of p_commit.

Line 328: if FND_API.to_Boolean (p_commit) then

324: -- End of API body.
325:
326: -- Standard check of p_commit.
327:
328: if FND_API.to_Boolean (p_commit) then
329: commit work;
330: end if;
331:
332: -- Standard call to get message count and if count is 1, get message info.

Line 339: when FND_API.G_EXC_ERROR then

335: p_data => p_msg_data);
336:
337: EXCEPTION
338:
339: when FND_API.G_EXC_ERROR then
340:
341: rollback to Check_CY_Count;
342:
343: p_return_status := FND_API.G_RET_STS_ERROR;

Line 343: p_return_status := FND_API.G_RET_STS_ERROR;

339: when FND_API.G_EXC_ERROR then
340:
341: rollback to Check_CY_Count;
342:
343: p_return_status := FND_API.G_RET_STS_ERROR;
344:
345: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
346: p_data => p_msg_data);
347:

Line 349: when FND_API.G_EXC_UNEXPECTED_ERROR then

345: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
346: p_data => p_msg_data);
347:
348:
349: when FND_API.G_EXC_UNEXPECTED_ERROR then
350:
351: rollback to Check_CY_Count;
352:
353: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 353: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

349: when FND_API.G_EXC_UNEXPECTED_ERROR then
350:
351: rollback to Check_CY_Count;
352:
353: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
354:
355: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
356: p_data => p_msg_data);
357:

Line 363: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

359: when OTHERS then
360:
361: rollback to Check_CY_Count;
362:
363: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
364:
365: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
366:
367: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,

Line 379: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

375: --
376: --
377: PROCEDURE Check_Reference
378: ( p_api_version IN NUMBER,
379: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
380: p_commit IN VARCHAR2 := FND_API.G_FALSE,
381: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
382: p_return_status OUT NOCOPY VARCHAR2,
383: p_msg_count OUT NOCOPY NUMBER,

Line 380: p_commit IN VARCHAR2 := FND_API.G_FALSE,

376: --
377: PROCEDURE Check_Reference
378: ( p_api_version IN NUMBER,
379: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
380: p_commit IN VARCHAR2 := FND_API.G_FALSE,
381: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
382: p_return_status OUT NOCOPY VARCHAR2,
383: p_msg_count OUT NOCOPY NUMBER,
384: p_msg_data OUT NOCOPY VARCHAR2,

Line 381: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

377: PROCEDURE Check_Reference
378: ( p_api_version IN NUMBER,
379: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
380: p_commit IN VARCHAR2 := FND_API.G_FALSE,
381: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
382: p_return_status OUT NOCOPY VARCHAR2,
383: p_msg_count OUT NOCOPY NUMBER,
384: p_msg_data OUT NOCOPY VARCHAR2,
385: p_year_type_id IN NUMBER

Line 400: if not FND_API.Compatible_API_Call (l_api_version,

396: SAVEPOINT Check_Ref_Integrity;
397:
398: -- Standard call to check for call compatibility.
399:
400: if not FND_API.Compatible_API_Call (l_api_version,
401: p_api_version,
402: l_api_name,
403: G_PKG_NAME)
404: then

Line 405: raise FND_API.G_EXC_UNEXPECTED_ERROR;

401: p_api_version,
402: l_api_name,
403: G_PKG_NAME)
404: then
405: raise FND_API.G_EXC_UNEXPECTED_ERROR;
406: end if;
407:
408: -- Initialize message list if p_init_msg_list is set to TRUE.
409:

Line 410: if FND_API.to_Boolean (p_init_msg_list) then

406: end if;
407:
408: -- Initialize message list if p_init_msg_list is set to TRUE.
409:
410: if FND_API.to_Boolean (p_init_msg_list) then
411: FND_MSG_PUB.initialize;
412: end if;
413:
414: -- Initialize API return status to success

Line 416: p_return_status := FND_API.G_RET_STS_SUCCESS;

412: end if;
413:
414: -- Initialize API return status to success
415:
416: p_return_status := FND_API.G_RET_STS_SUCCESS;
417:
418: -- API body
419: SELECT 1
420: INTO l_dummy

Line 430: if FND_API.to_Boolean (p_commit) then

426: -- End of API body.
427:
428: -- Standard check of p_commit.
429:
430: if FND_API.to_Boolean (p_commit) then
431: commit work;
432: end if;
433:
434: -- Standard call to get message count and if count is 1, get message info.

Line 446: p_return_status := FND_API.G_RET_STS_ERROR;

442:
443: FND_MESSAGE.Set_Name('PSB', 'PSB_CANNOT_DELETE_YTP');
444: FND_MSG_PUB.Add;
445:
446: p_return_status := FND_API.G_RET_STS_ERROR;
447:
448: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
449: p_data => p_msg_data);
450:

Line 452: when FND_API.G_EXC_ERROR then

448: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
449: p_data => p_msg_data);
450:
451:
452: when FND_API.G_EXC_ERROR then
453:
454: rollback to Check_Ref_Integrity;
455:
456: p_return_status := FND_API.G_RET_STS_ERROR;

Line 456: p_return_status := FND_API.G_RET_STS_ERROR;

452: when FND_API.G_EXC_ERROR then
453:
454: rollback to Check_Ref_Integrity;
455:
456: p_return_status := FND_API.G_RET_STS_ERROR;
457:
458: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
459: p_data => p_msg_data);
460:

Line 462: when FND_API.G_EXC_UNEXPECTED_ERROR then

458: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
459: p_data => p_msg_data);
460:
461:
462: when FND_API.G_EXC_UNEXPECTED_ERROR then
463:
464: rollback to Check_Ref_Integrity;
465:
466: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 466: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

462: when FND_API.G_EXC_UNEXPECTED_ERROR then
463:
464: rollback to Check_Ref_Integrity;
465:
466: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
467:
468: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
469: p_data => p_msg_data);
470:

Line 476: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

472: when OTHERS then
473:
474: rollback to Check_Ref_Integrity;
475:
476: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
477:
478: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
479:
480: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,

Line 493: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

489: --
490: --
491: PROCEDURE Check_Unique_Name
492: ( p_api_version IN NUMBER,
493: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
494: p_commit IN VARCHAR2 := FND_API.G_FALSE,
495: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
496: p_return_status OUT NOCOPY VARCHAR2,
497: p_msg_count OUT NOCOPY NUMBER,

Line 494: p_commit IN VARCHAR2 := FND_API.G_FALSE,

490: --
491: PROCEDURE Check_Unique_Name
492: ( p_api_version IN NUMBER,
493: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
494: p_commit IN VARCHAR2 := FND_API.G_FALSE,
495: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
496: p_return_status OUT NOCOPY VARCHAR2,
497: p_msg_count OUT NOCOPY NUMBER,
498: p_msg_data OUT NOCOPY VARCHAR2,

Line 495: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

491: PROCEDURE Check_Unique_Name
492: ( p_api_version IN NUMBER,
493: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
494: p_commit IN VARCHAR2 := FND_API.G_FALSE,
495: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
496: p_return_status OUT NOCOPY VARCHAR2,
497: p_msg_count OUT NOCOPY NUMBER,
498: p_msg_data OUT NOCOPY VARCHAR2,
499: p_year_type_id IN NUMBER,

Line 515: if not FND_API.Compatible_API_Call (l_api_version,

511: SAVEPOINT Check_Unique_Name;
512:
513: -- Standard call to check for call compatibility.
514:
515: if not FND_API.Compatible_API_Call (l_api_version,
516: p_api_version,
517: l_api_name,
518: G_PKG_NAME)
519: then

Line 520: raise FND_API.G_EXC_UNEXPECTED_ERROR;

516: p_api_version,
517: l_api_name,
518: G_PKG_NAME)
519: then
520: raise FND_API.G_EXC_UNEXPECTED_ERROR;
521: end if;
522:
523: -- Initialize message list if p_init_msg_list is set to TRUE.
524:

Line 525: if FND_API.to_Boolean (p_init_msg_list) then

521: end if;
522:
523: -- Initialize message list if p_init_msg_list is set to TRUE.
524:
525: if FND_API.to_Boolean (p_init_msg_list) then
526: FND_MSG_PUB.initialize;
527: end if;
528:
529: -- Initialize API return status to success

Line 531: p_return_status := FND_API.G_RET_STS_SUCCESS;

527: end if;
528:
529: -- Initialize API return status to success
530:
531: p_return_status := FND_API.G_RET_STS_SUCCESS;
532:
533: --
534: SELECT count(*)
535: INTO l_seq_count

Line 544: RAISE FND_API.G_EXC_ERROR;

540: --
541: if l_seq_count > 0 then
542: FND_MESSAGE.Set_Name('PSB', 'PSB_DUPLICATE_NAME');
543: FND_MSG_PUB.Add;
544: RAISE FND_API.G_EXC_ERROR;
545: end if;
546: --
547:
548: -- Standard check of p_commit.

Line 550: if FND_API.to_Boolean (p_commit) then

546: --
547:
548: -- Standard check of p_commit.
549:
550: if FND_API.to_Boolean (p_commit) then
551: commit work;
552: end if;
553:
554: -- Standard call to get message count and if count is 1, get message info.

Line 561: when FND_API.G_EXC_ERROR then

557: p_data => p_msg_data);
558:
559: EXCEPTION
560:
561: when FND_API.G_EXC_ERROR then
562:
563: rollback to Check_Unique_Name;
564:
565: p_return_status := FND_API.G_RET_STS_ERROR;

Line 565: p_return_status := FND_API.G_RET_STS_ERROR;

561: when FND_API.G_EXC_ERROR then
562:
563: rollback to Check_Unique_Name;
564:
565: p_return_status := FND_API.G_RET_STS_ERROR;
566:
567: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
568: p_data => p_msg_data);
569:

Line 571: when FND_API.G_EXC_UNEXPECTED_ERROR then

567: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
568: p_data => p_msg_data);
569:
570:
571: when FND_API.G_EXC_UNEXPECTED_ERROR then
572:
573: rollback to Check_Unique_Name ;
574:
575: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 575: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

571: when FND_API.G_EXC_UNEXPECTED_ERROR then
572:
573: rollback to Check_Unique_Name ;
574:
575: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
576:
577: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
578: p_data => p_msg_data);
579:

Line 585: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

581: when OTHERS then
582:
583: rollback to Check_Unique_Name;
584:
585: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
586:
587: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
588:
589: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,

Line 622: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

618: /* ----------------------------------------------------------------------- */
619:
620: procedure INSERT_ROW
621: ( p_api_version IN NUMBER,
622: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
623: p_commit IN VARCHAR2 := FND_API.G_FALSE,
624: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
625: p_return_status OUT NOCOPY VARCHAR2,
626: p_msg_count OUT NOCOPY NUMBER,

Line 623: p_commit IN VARCHAR2 := FND_API.G_FALSE,

619:
620: procedure INSERT_ROW
621: ( p_api_version IN NUMBER,
622: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
623: p_commit IN VARCHAR2 := FND_API.G_FALSE,
624: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
625: p_return_status OUT NOCOPY VARCHAR2,
626: p_msg_count OUT NOCOPY NUMBER,
627: p_msg_data OUT NOCOPY VARCHAR2,

Line 624: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

620: procedure INSERT_ROW
621: ( p_api_version IN NUMBER,
622: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
623: p_commit IN VARCHAR2 := FND_API.G_FALSE,
624: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
625: p_return_status OUT NOCOPY VARCHAR2,
626: p_msg_count OUT NOCOPY NUMBER,
627: p_msg_data OUT NOCOPY VARCHAR2,
628: --

Line 657: if not FND_API.Compatible_API_Call (l_api_version,

653: SAVEPOINT Check_Unique_Name;
654:
655: -- Standard call to check for call compatibility.
656:
657: if not FND_API.Compatible_API_Call (l_api_version,
658: p_api_version,
659: l_api_name,
660: G_PKG_NAME)
661: then

Line 662: raise FND_API.G_EXC_UNEXPECTED_ERROR;

658: p_api_version,
659: l_api_name,
660: G_PKG_NAME)
661: then
662: raise FND_API.G_EXC_UNEXPECTED_ERROR;
663: end if;
664:
665: -- Initialize message list if p_init_msg_list is set to TRUE.
666:

Line 667: if FND_API.to_Boolean (p_init_msg_list) then

663: end if;
664:
665: -- Initialize message list if p_init_msg_list is set to TRUE.
666:
667: if FND_API.to_Boolean (p_init_msg_list) then
668: FND_MSG_PUB.initialize;
669: end if;
670:
671: -- Initialize API return status to success

Line 673: p_return_status := FND_API.G_RET_STS_SUCCESS;

669: end if;
670:
671: -- Initialize API return status to success
672:
673: p_return_status := FND_API.G_RET_STS_SUCCESS;
674:
675: insert into PSB_BUDGET_YEAR_TYPES (
676: BUDGET_YEAR_TYPE_ID,
677: YEAR_CATEGORY_TYPE,

Line 737: if FND_API.to_Boolean (p_commit) then

733: close c;
734:
735: -- Standard check of p_commit.
736:
737: if FND_API.to_Boolean (p_commit) then
738: commit work;
739: end if;
740:
741: -- Standard call to get message count and if count is 1, get message info.

Line 748: when FND_API.G_EXC_ERROR then

744: p_data => p_msg_data);
745:
746: EXCEPTION
747:
748: when FND_API.G_EXC_ERROR then
749:
750: rollback to Check_Unique_Name;
751:
752: p_return_status := FND_API.G_RET_STS_ERROR;

Line 752: p_return_status := FND_API.G_RET_STS_ERROR;

748: when FND_API.G_EXC_ERROR then
749:
750: rollback to Check_Unique_Name;
751:
752: p_return_status := FND_API.G_RET_STS_ERROR;
753:
754: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
755: p_data => p_msg_data);
756:

Line 758: when FND_API.G_EXC_UNEXPECTED_ERROR then

754: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
755: p_data => p_msg_data);
756:
757:
758: when FND_API.G_EXC_UNEXPECTED_ERROR then
759:
760: rollback to Check_Unique_Name ;
761:
762: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 762: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

758: when FND_API.G_EXC_UNEXPECTED_ERROR then
759:
760: rollback to Check_Unique_Name ;
761:
762: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
763:
764: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
765: p_data => p_msg_data);
766:

Line 772: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

768: when OTHERS then
769:
770: rollback to Check_Unique_Name;
771:
772: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
773:
774: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
775:
776: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,

Line 788: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

784:
785:
786: procedure LOCK_ROW
787: ( p_api_version IN NUMBER,
788: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
789: p_commit IN VARCHAR2 := FND_API.G_FALSE,
790: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
791: p_return_status OUT NOCOPY VARCHAR2,
792: p_msg_count OUT NOCOPY NUMBER,

Line 789: p_commit IN VARCHAR2 := FND_API.G_FALSE,

785:
786: procedure LOCK_ROW
787: ( p_api_version IN NUMBER,
788: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
789: p_commit IN VARCHAR2 := FND_API.G_FALSE,
790: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
791: p_return_status OUT NOCOPY VARCHAR2,
792: p_msg_count OUT NOCOPY NUMBER,
793: p_msg_data OUT NOCOPY VARCHAR2,

Line 790: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

786: procedure LOCK_ROW
787: ( p_api_version IN NUMBER,
788: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
789: p_commit IN VARCHAR2 := FND_API.G_FALSE,
790: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
791: p_return_status OUT NOCOPY VARCHAR2,
792: p_msg_count OUT NOCOPY NUMBER,
793: p_msg_data OUT NOCOPY VARCHAR2,
794: --

Line 829: if not FND_API.Compatible_API_Call (l_api_version,

825: SAVEPOINT Check_Unique_Name;
826:
827: -- Standard call to check for call compatibility.
828:
829: if not FND_API.Compatible_API_Call (l_api_version,
830: p_api_version,
831: l_api_name,
832: G_PKG_NAME)
833: then

Line 834: raise FND_API.G_EXC_UNEXPECTED_ERROR;

830: p_api_version,
831: l_api_name,
832: G_PKG_NAME)
833: then
834: raise FND_API.G_EXC_UNEXPECTED_ERROR;
835: end if;
836:
837: -- Initialize message list if p_init_msg_list is set to TRUE.
838:

Line 839: if FND_API.to_Boolean (p_init_msg_list) then

835: end if;
836:
837: -- Initialize message list if p_init_msg_list is set to TRUE.
838:
839: if FND_API.to_Boolean (p_init_msg_list) then
840: FND_MSG_PUB.initialize;
841: end if;
842:
843: -- Initialize API return status to success

Line 845: p_return_status := FND_API.G_RET_STS_SUCCESS;

841: end if;
842:
843: -- Initialize API return status to success
844:
845: p_return_status := FND_API.G_RET_STS_SUCCESS;
846:
847: open c;
848: fetch c into recinfo;
849: if (c%notfound) then

Line 880: if FND_API.to_Boolean (p_commit) then

876: return;
877:
878: -- Standard check of p_commit.
879:
880: if FND_API.to_Boolean (p_commit) then
881: commit work;
882: end if;
883:
884: -- Standard call to get message count and if count is 1, get message info.

Line 891: when FND_API.G_EXC_ERROR then

887: p_data => p_msg_data);
888:
889: EXCEPTION
890:
891: when FND_API.G_EXC_ERROR then
892:
893: rollback to Check_Unique_Name;
894:
895: p_return_status := FND_API.G_RET_STS_ERROR;

Line 895: p_return_status := FND_API.G_RET_STS_ERROR;

891: when FND_API.G_EXC_ERROR then
892:
893: rollback to Check_Unique_Name;
894:
895: p_return_status := FND_API.G_RET_STS_ERROR;
896:
897: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
898: p_data => p_msg_data);
899:

Line 901: when FND_API.G_EXC_UNEXPECTED_ERROR then

897: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
898: p_data => p_msg_data);
899:
900:
901: when FND_API.G_EXC_UNEXPECTED_ERROR then
902:
903: rollback to Check_Unique_Name ;
904:
905: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 905: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

901: when FND_API.G_EXC_UNEXPECTED_ERROR then
902:
903: rollback to Check_Unique_Name ;
904:
905: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
906:
907: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
908: p_data => p_msg_data);
909:

Line 915: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

911: when OTHERS then
912:
913: rollback to Check_Unique_Name;
914:
915: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
916:
917: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
918:
919: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,

Line 931: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

927:
928:
929: procedure UPDATE_ROW
930: ( p_api_version IN NUMBER,
931: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
932: p_commit IN VARCHAR2 := FND_API.G_FALSE,
933: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
934: p_return_status OUT NOCOPY VARCHAR2,
935: p_msg_count OUT NOCOPY NUMBER,

Line 932: p_commit IN VARCHAR2 := FND_API.G_FALSE,

928:
929: procedure UPDATE_ROW
930: ( p_api_version IN NUMBER,
931: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
932: p_commit IN VARCHAR2 := FND_API.G_FALSE,
933: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
934: p_return_status OUT NOCOPY VARCHAR2,
935: p_msg_count OUT NOCOPY NUMBER,
936: p_msg_data OUT NOCOPY VARCHAR2,

Line 933: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

929: procedure UPDATE_ROW
930: ( p_api_version IN NUMBER,
931: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
932: p_commit IN VARCHAR2 := FND_API.G_FALSE,
933: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
934: p_return_status OUT NOCOPY VARCHAR2,
935: p_msg_count OUT NOCOPY NUMBER,
936: p_msg_data OUT NOCOPY VARCHAR2,
937: --

Line 960: if not FND_API.Compatible_API_Call (l_api_version,

956: SAVEPOINT Check_Unique_Name;
957:
958: -- Standard call to check for call compatibility.
959:
960: if not FND_API.Compatible_API_Call (l_api_version,
961: p_api_version,
962: l_api_name,
963: G_PKG_NAME)
964: then

Line 965: raise FND_API.G_EXC_UNEXPECTED_ERROR;

961: p_api_version,
962: l_api_name,
963: G_PKG_NAME)
964: then
965: raise FND_API.G_EXC_UNEXPECTED_ERROR;
966: end if;
967:
968: -- Initialize message list if p_init_msg_list is set to TRUE.
969:

Line 970: if FND_API.to_Boolean (p_init_msg_list) then

966: end if;
967:
968: -- Initialize message list if p_init_msg_list is set to TRUE.
969:
970: if FND_API.to_Boolean (p_init_msg_list) then
971: FND_MSG_PUB.initialize;
972: end if;
973:
974: -- Initialize API return status to success

Line 976: p_return_status := FND_API.G_RET_STS_SUCCESS;

972: end if;
973:
974: -- Initialize API return status to success
975:
976: p_return_status := FND_API.G_RET_STS_SUCCESS;
977:
978: update PSB_BUDGET_YEAR_TYPES set
979: YEAR_CATEGORY_TYPE = p_YEAR_CATEGORY_TYPE,
980: SEQUENCE_NUMBER = p_SEQUENCE_NUMBER,

Line 1006: if FND_API.to_Boolean (p_commit) then

1002: end if;
1003:
1004: -- Standard check of p_commit.
1005:
1006: if FND_API.to_Boolean (p_commit) then
1007: commit work;
1008: end if;
1009:
1010: -- Standard call to get message count and if count is 1, get message info.

Line 1017: when FND_API.G_EXC_ERROR then

1013: p_data => p_msg_data);
1014:
1015: EXCEPTION
1016:
1017: when FND_API.G_EXC_ERROR then
1018:
1019: rollback to Check_Unique_Name;
1020:
1021: p_return_status := FND_API.G_RET_STS_ERROR;

Line 1021: p_return_status := FND_API.G_RET_STS_ERROR;

1017: when FND_API.G_EXC_ERROR then
1018:
1019: rollback to Check_Unique_Name;
1020:
1021: p_return_status := FND_API.G_RET_STS_ERROR;
1022:
1023: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
1024: p_data => p_msg_data);
1025:

Line 1027: when FND_API.G_EXC_UNEXPECTED_ERROR then

1023: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
1024: p_data => p_msg_data);
1025:
1026:
1027: when FND_API.G_EXC_UNEXPECTED_ERROR then
1028:
1029: rollback to Check_Unique_Name ;
1030:
1031: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1031: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1027: when FND_API.G_EXC_UNEXPECTED_ERROR then
1028:
1029: rollback to Check_Unique_Name ;
1030:
1031: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1032:
1033: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
1034: p_data => p_msg_data);
1035:

Line 1041: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1037: when OTHERS then
1038:
1039: rollback to Check_Unique_Name;
1040:
1041: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1042:
1043: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
1044:
1045: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,

Line 1056: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

1052: end UPDATE_ROW;
1053:
1054: procedure DELETE_ROW
1055: ( p_api_version IN NUMBER,
1056: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1057: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1058: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1059: p_return_status OUT NOCOPY VARCHAR2,
1060: p_msg_count OUT NOCOPY NUMBER,

Line 1057: p_commit IN VARCHAR2 := FND_API.G_FALSE,

1053:
1054: procedure DELETE_ROW
1055: ( p_api_version IN NUMBER,
1056: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1057: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1058: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1059: p_return_status OUT NOCOPY VARCHAR2,
1060: p_msg_count OUT NOCOPY NUMBER,
1061: p_msg_data OUT NOCOPY VARCHAR2,

Line 1058: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1054: procedure DELETE_ROW
1055: ( p_api_version IN NUMBER,
1056: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1057: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1058: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1059: p_return_status OUT NOCOPY VARCHAR2,
1060: p_msg_count OUT NOCOPY NUMBER,
1061: p_msg_data OUT NOCOPY VARCHAR2,
1062: p_BUDGET_YEAR_TYPE_ID in NUMBER

Line 1076: if not FND_API.Compatible_API_Call (l_api_version,

1072: SAVEPOINT Check_Unique_Name;
1073:
1074: -- Standard call to check for call compatibility.
1075:
1076: if not FND_API.Compatible_API_Call (l_api_version,
1077: p_api_version,
1078: l_api_name,
1079: G_PKG_NAME)
1080: then

Line 1081: raise FND_API.G_EXC_UNEXPECTED_ERROR;

1077: p_api_version,
1078: l_api_name,
1079: G_PKG_NAME)
1080: then
1081: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1082: end if;
1083:
1084: -- Initialize message list if p_init_msg_list is set to TRUE.
1085:

Line 1086: if FND_API.to_Boolean (p_init_msg_list) then

1082: end if;
1083:
1084: -- Initialize message list if p_init_msg_list is set to TRUE.
1085:
1086: if FND_API.to_Boolean (p_init_msg_list) then
1087: FND_MSG_PUB.initialize;
1088: end if;
1089:
1090: -- Initialize API return status to success

Line 1092: p_return_status := FND_API.G_RET_STS_SUCCESS;

1088: end if;
1089:
1090: -- Initialize API return status to success
1091:
1092: p_return_status := FND_API.G_RET_STS_SUCCESS;
1093:
1094: delete from PSB_BUDGET_YEAR_TYPES_TL
1095: where BUDGET_YEAR_TYPE_ID = p_BUDGET_YEAR_TYPE_ID;
1096:

Line 1110: if FND_API.to_Boolean (p_commit) then

1106: end if;
1107:
1108: -- Standard check of p_commit.
1109:
1110: if FND_API.to_Boolean (p_commit) then
1111: commit work;
1112: end if;
1113:
1114: -- Standard call to get message count and if count is 1, get message info.

Line 1121: when FND_API.G_EXC_ERROR then

1117: p_data => p_msg_data);
1118:
1119: EXCEPTION
1120:
1121: when FND_API.G_EXC_ERROR then
1122:
1123: rollback to Check_Unique_Name;
1124:
1125: p_return_status := FND_API.G_RET_STS_ERROR;

Line 1125: p_return_status := FND_API.G_RET_STS_ERROR;

1121: when FND_API.G_EXC_ERROR then
1122:
1123: rollback to Check_Unique_Name;
1124:
1125: p_return_status := FND_API.G_RET_STS_ERROR;
1126:
1127: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
1128: p_data => p_msg_data);
1129:

Line 1131: when FND_API.G_EXC_UNEXPECTED_ERROR then

1127: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
1128: p_data => p_msg_data);
1129:
1130:
1131: when FND_API.G_EXC_UNEXPECTED_ERROR then
1132:
1133: rollback to Check_Unique_Name ;
1134:
1135: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1135: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1131: when FND_API.G_EXC_UNEXPECTED_ERROR then
1132:
1133: rollback to Check_Unique_Name ;
1134:
1135: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1136:
1137: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
1138: p_data => p_msg_data);
1139:

Line 1145: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1141: when OTHERS then
1142:
1143: rollback to Check_Unique_Name;
1144:
1145: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1146:
1147: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
1148:
1149: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,