58: -- x_return_status OUT VARCHAR2
59: -- x_msg_count OUT NUMBER
60: -- x_msg_data OUT VARCHAR2
61: -- Version : Current version 1.0
62: -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
63: -- and basic operation, developer must manually add parameters and business logic as necessary.
64: --
65: -- History
66: --
91: l_object_id NUMBER;
92: l_dummy NUMBER;
93:
94: BEGIN
95: -- Standard Start of API savepoint
96: SAVEPOINT create_appr_hist_pvt;
97:
98: -- Standard call to check for call compatibility.
99: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
94: BEGIN
95: -- Standard Start of API savepoint
96: SAVEPOINT create_appr_hist_pvt;
97:
98: -- Standard call to check for call compatibility.
99: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
100: p_api_version_number,
101: l_api_name,
102: G_PKG_NAME)
175: --
176: -- End of API body
177: --
178:
179: -- Standard check for p_commit
180: IF FND_API.to_Boolean( p_commit )
181: THEN
182: COMMIT WORK;
183: END IF;
181: THEN
182: COMMIT WORK;
183: END IF;
184:
185: -- Standard call to get message count and if count is 1, get message info.
186: FND_MSG_PUB.Count_And_Get
187: (p_count => x_msg_count,
188: p_data => x_msg_data
189: );
194:
195: WHEN FND_API.G_EXC_ERROR THEN
196: ROLLBACK TO CREATE_Appr_Hist_PVT;
197: x_return_status := FND_API.G_RET_STS_ERROR;
198: -- Standard call to get message count and if count=1, get the message
199: FND_MSG_PUB.Count_And_Get (
200: p_encoded => FND_API.G_FALSE,
201: p_count => x_msg_count,
202: p_data => x_msg_data
204:
205: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
206: ROLLBACK TO CREATE_Appr_Hist_PVT;
207: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
208: -- Standard call to get message count and if count=1, get the message
209: FND_MSG_PUB.Count_And_Get (
210: p_encoded => FND_API.G_FALSE,
211: p_count => x_msg_count,
212: p_data => x_msg_data
218: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
219: THEN
220: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
221: END IF;
222: -- Standard call to get message count and if count=1, get the message
223: FND_MSG_PUB.Count_And_Get (
224: p_encoded => FND_API.G_FALSE,
225: p_count => x_msg_count,
226: p_data => x_msg_data
250: -- x_return_status OUT VARCHAR2
251: -- x_msg_count OUT NUMBER
252: -- x_msg_data OUT VARCHAR2
253: -- Version : Current version 1.0
254: -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
255: -- and basic operation, developer must manually add parameters and business logic as necessary.
256: --
257: -- History
258: --
296: l_rowid ROWID;
297:
298: BEGIN
299:
300: -- Standard Start of API savepoint
301: SAVEPOINT update_appr_hist_pvt;
302:
303:
304: -- Standard call to check for call compatibility.
300: -- Standard Start of API savepoint
301: SAVEPOINT update_appr_hist_pvt;
302:
303:
304: -- Standard call to check for call compatibility.
305: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
306: p_api_version_number,
307: l_api_name,
308: G_PKG_NAME)
394: --
395: -- End of API body.
396: --
397:
398: -- Standard check for p_commit
399: IF FND_API.to_Boolean( p_commit )
400: THEN
401: COMMIT WORK;
402: END IF;
404:
405:
406:
407:
408: -- Standard call to get message count and if count is 1, get message info.
409: FND_MSG_PUB.Count_And_Get
410: (p_count => x_msg_count,
411: p_data => x_msg_data
412: );
418:
419: WHEN FND_API.G_EXC_ERROR THEN
420: ROLLBACK TO UPDATE_Appr_Hist_PVT;
421: x_return_status := FND_API.G_RET_STS_ERROR;
422: -- Standard call to get message count and if count=1, get the message
423: FND_MSG_PUB.Count_And_Get (
424: p_encoded => FND_API.G_FALSE,
425: p_count => x_msg_count,
426: p_data => x_msg_data
428:
429: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
430: ROLLBACK TO UPDATE_Appr_Hist_PVT;
431: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
432: -- Standard call to get message count and if count=1, get the message
433: FND_MSG_PUB.Count_And_Get (
434: p_encoded => FND_API.G_FALSE,
435: p_count => x_msg_count,
436: p_data => x_msg_data
442: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
443: THEN
444: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
445: END IF;
446: -- Standard call to get message count and if count=1, get the message
447: FND_MSG_PUB.Count_And_Get (
448: p_encoded => FND_API.G_FALSE,
449: p_count => x_msg_count,
450: p_data => x_msg_data
475: -- x_return_status OUT VARCHAR2
476: -- x_msg_count OUT NUMBER
477: -- x_msg_data OUT VARCHAR2
478: -- Version : Current version 1.0
479: -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
480: -- and basic operation, developer must manually add parameters and business logic as necessary.
481: --
482: -- History
483: --
507: L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
508: l_object_version_number NUMBER;
509:
510: BEGIN
511: -- Standard Start of API savepoint
512: SAVEPOINT delete_appr_hist_pvt;
513:
514: -- Standard call to check for call compatibility.
515: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
510: BEGIN
511: -- Standard Start of API savepoint
512: SAVEPOINT delete_appr_hist_pvt;
513:
514: -- Standard call to check for call compatibility.
515: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
516: p_api_version_number,
517: l_api_name,
518: G_PKG_NAME)
541: --
542: -- End of API body
543: --
544:
545: -- Standard check for p_commit
546: IF FND_API.to_Boolean( p_commit )
547: THEN
548: COMMIT WORK;
549: END IF;
547: THEN
548: COMMIT WORK;
549: END IF;
550:
551: -- Standard call to get message count and if count is 1, get message info.
552: FND_MSG_PUB.Count_And_Get
553: (p_count => x_msg_count,
554: p_data => x_msg_data
555: );
560:
561: WHEN FND_API.G_EXC_ERROR THEN
562: ROLLBACK TO DELETE_Appr_Hist_PVT;
563: x_return_status := FND_API.G_RET_STS_ERROR;
564: -- Standard call to get message count and if count=1, get the message
565: FND_MSG_PUB.Count_And_Get (
566: p_encoded => FND_API.G_FALSE,
567: p_count => x_msg_count,
568: p_data => x_msg_data
570:
571: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
572: ROLLBACK TO DELETE_Appr_Hist_PVT;
573: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
574: -- Standard call to get message count and if count=1, get the message
575: FND_MSG_PUB.Count_And_Get (
576: p_encoded => FND_API.G_FALSE,
577: p_count => x_msg_count,
578: p_data => x_msg_data
584: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
585: THEN
586: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
587: END IF;
588: -- Standard call to get message count and if count=1, get the message
589: FND_MSG_PUB.Count_And_Get (
590: p_encoded => FND_API.G_FALSE,
591: p_count => x_msg_count,
592: p_data => x_msg_data
917: l_object_version_number NUMBER;
918: l_appr_hist_rec appr_hist_rec_type;
919:
920: BEGIN
921: -- Standard Start of API savepoint
922: SAVEPOINT validate_appr_hist_;
923:
924: -- Standard call to check for call compatibility.
925: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
920: BEGIN
921: -- Standard Start of API savepoint
922: SAVEPOINT validate_appr_hist_;
923:
924: -- Standard call to check for call compatibility.
925: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
926: p_api_version_number,
927: l_api_name,
928: G_PKG_NAME)
982:
983: -- Initialize API return status to SUCCESS
984: x_return_status := FND_API.G_RET_STS_SUCCESS;
985:
986: -- Standard call to get message count and if count is 1, get message info.
987: FND_MSG_PUB.Count_And_Get
988: (p_count => x_msg_count,
989: p_data => x_msg_data
990: );
996:
997: WHEN FND_API.G_EXC_ERROR THEN
998: ROLLBACK TO VALIDATE_Appr_Hist_;
999: x_return_status := FND_API.G_RET_STS_ERROR;
1000: -- Standard call to get message count and if count=1, get the message
1001: FND_MSG_PUB.Count_And_Get (
1002: p_encoded => FND_API.G_FALSE,
1003: p_count => x_msg_count,
1004: p_data => x_msg_data
1006:
1007: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1008: ROLLBACK TO VALIDATE_Appr_Hist_;
1009: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1010: -- Standard call to get message count and if count=1, get the message
1011: FND_MSG_PUB.Count_And_Get (
1012: p_encoded => FND_API.G_FALSE,
1013: p_count => x_msg_count,
1014: p_data => x_msg_data
1020: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1021: THEN
1022: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1023: END IF;
1024: -- Standard call to get message count and if count=1, get the message
1025: FND_MSG_PUB.Count_And_Get (
1026: p_encoded => FND_API.G_FALSE,
1027: p_count => x_msg_count,
1028: p_data => x_msg_data
1055: -- If data not valid
1056: -- THEN
1057: -- x_return_status := FND_API.G_RET_STS_ERROR;
1058:
1059: -- Standard call to get message count and if count is 1, get message info.
1060: FND_MSG_PUB.Count_And_Get
1061: (p_count => x_msg_count,
1062: p_data => x_msg_data
1063: );