10: G_LAST_UPDATE_LOGIN NUMBER := fnd_global.login_id;
11:
12: PROCEDURE get_adj(
13: p_api_version IN NUMBER,
14: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
15: p_validation_level IN VARCHAR2 := FND_API.G_VALID_LEVEL_FULL,
16: x_return_status OUT NOCOPY VARCHAR2,
17: x_msg_count OUT NOCOPY NUMBER,
18: x_msg_data OUT NOCOPY VARCHAR2,
11:
12: PROCEDURE get_adj(
13: p_api_version IN NUMBER,
14: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
15: p_validation_level IN VARCHAR2 := FND_API.G_VALID_LEVEL_FULL,
16: x_return_status OUT NOCOPY VARCHAR2,
17: x_msg_count OUT NOCOPY NUMBER,
18: x_msg_data OUT NOCOPY VARCHAR2,
19: x_loading_status OUT NOCOPY VARCHAR2,
57: BEGIN
58: --
59: -- Standard call to check for call compatibility.
60: --
61: IF NOT FND_API.Compatible_API_Call(
62: l_api_version,
63: p_api_version,
64: l_api_name,
65: G_PKG_NAME )
63: p_api_version,
64: l_api_name,
65: G_PKG_NAME )
66: THEN
67: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
68: END IF;
69: --
70: -- Initialize message list if p_init_msg_list is set to TRUE.
71: --
68: END IF;
69: --
70: -- Initialize message list if p_init_msg_list is set to TRUE.
71: --
72: IF FND_API.to_Boolean( p_init_msg_list ) THEN
73: FND_MSG_PUB.initialize;
74: END IF;
75: --
76: -- Initialize API return status to success
74: END IF;
75: --
76: -- Initialize API return status to success
77: --
78: x_return_status := FND_API.G_RET_STS_SUCCESS;
79: x_loading_status := 'CN_INSERTED';
80: --
81: -- API body
82: --
406: END IF;
407: END IF;
408: END LOOP;
409: EXCEPTION
410: WHEN FND_API.G_EXC_ERROR THEN
411: x_return_status := FND_API.G_RET_STS_ERROR ;
412: FND_MSG_PUB.Count_And_Get (
413: p_count => x_msg_count ,
414: p_data => x_msg_data ,
407: END IF;
408: END LOOP;
409: EXCEPTION
410: WHEN FND_API.G_EXC_ERROR THEN
411: x_return_status := FND_API.G_RET_STS_ERROR ;
412: FND_MSG_PUB.Count_And_Get (
413: p_count => x_msg_count ,
414: p_data => x_msg_data ,
415: p_encoded => FND_API.G_FALSE);
411: x_return_status := FND_API.G_RET_STS_ERROR ;
412: FND_MSG_PUB.Count_And_Get (
413: p_count => x_msg_count ,
414: p_data => x_msg_data ,
415: p_encoded => FND_API.G_FALSE);
416: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
417: x_loading_status := 'UNEXPECTED_ERR';
418: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
419: FND_MSG_PUB.Count_And_Get (
412: FND_MSG_PUB.Count_And_Get (
413: p_count => x_msg_count ,
414: p_data => x_msg_data ,
415: p_encoded => FND_API.G_FALSE);
416: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
417: x_loading_status := 'UNEXPECTED_ERR';
418: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
419: FND_MSG_PUB.Count_And_Get (
420: p_count => x_msg_count ,
414: p_data => x_msg_data ,
415: p_encoded => FND_API.G_FALSE);
416: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
417: x_loading_status := 'UNEXPECTED_ERR';
418: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
419: FND_MSG_PUB.Count_And_Get (
420: p_count => x_msg_count ,
421: p_data => x_msg_data ,
422: p_encoded => FND_API.G_FALSE);
418: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
419: FND_MSG_PUB.Count_And_Get (
420: p_count => x_msg_count ,
421: p_data => x_msg_data ,
422: p_encoded => FND_API.G_FALSE);
423: WHEN OTHERS THEN
424: x_loading_status := 'UNEXPECTED_ERR';
425: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
426: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
421: p_data => x_msg_data ,
422: p_encoded => FND_API.G_FALSE);
423: WHEN OTHERS THEN
424: x_loading_status := 'UNEXPECTED_ERR';
425: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
426: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
427: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
428: END IF;
429: FND_MSG_PUB.Count_And_Get (
428: END IF;
429: FND_MSG_PUB.Count_And_Get (
430: p_count => x_msg_count ,
431: p_data => x_msg_data ,
432: p_encoded => FND_API.G_FALSE);
433:
434: END;
435: --
436: END cn_un_proc_pub;