6:
7:
8: procedure UPDATE_ROW (
9: p_api_version IN NUMBER,
10: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
11: p_commit IN VARCHAR2 := FND_API.G_FALSE,
12: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
13: p_return_status OUT NOCOPY VARCHAR2,
14: p_msg_count OUT NOCOPY NUMBER,
7:
8: procedure UPDATE_ROW (
9: p_api_version IN NUMBER,
10: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
11: p_commit IN VARCHAR2 := FND_API.G_FALSE,
12: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
13: p_return_status OUT NOCOPY VARCHAR2,
14: p_msg_count OUT NOCOPY NUMBER,
15: p_msg_data OUT NOCOPY VARCHAR2,
8: procedure UPDATE_ROW (
9: p_api_version IN NUMBER,
10: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
11: p_commit IN VARCHAR2 := FND_API.G_FALSE,
12: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
13: p_return_status OUT NOCOPY VARCHAR2,
14: p_msg_count OUT NOCOPY NUMBER,
15: p_msg_data OUT NOCOPY VARCHAR2,
16: --
36: BEGIN
37: --
38: SAVEPOINT Update_Row_Pvt ;
39: --
40: IF NOT FND_API.Compatible_API_Call ( l_api_version,
41: p_api_version,
42: l_api_name,
43: G_PKG_NAME )
44: THEN
41: p_api_version,
42: l_api_name,
43: G_PKG_NAME )
44: THEN
45: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
46: END IF;
47: --
48:
49: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
45: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
46: END IF;
47: --
48:
49: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
50: FND_MSG_PUB.initialize ;
51: END IF;
52: --
53: p_return_status := FND_API.G_RET_STS_SUCCESS ;
49: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
50: FND_MSG_PUB.initialize ;
51: END IF;
52: --
53: p_return_status := FND_API.G_RET_STS_SUCCESS ;
54: --
55: update PSB_WS_POSITION_LINES set
56: DESCRIPTION = P_DESCRIPTION,
57: ATTRIBUTE1 = P_ATTRIBUTE1,
71: if (sql%notfound) then
72: raise no_data_found;
73: end if;
74: --
75: IF FND_API.To_Boolean ( p_commit ) THEN
76: COMMIT WORK;
77: END iF;
78: --
79: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
80: p_data => p_msg_data );
81: --
82: EXCEPTION
83: --
84: WHEN FND_API.G_EXC_ERROR THEN
85: --
86: ROLLBACK TO Update_Row_Pvt ;
87: p_return_status := FND_API.G_RET_STS_ERROR;
88: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
83: --
84: WHEN FND_API.G_EXC_ERROR THEN
85: --
86: ROLLBACK TO Update_Row_Pvt ;
87: p_return_status := FND_API.G_RET_STS_ERROR;
88: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
89: p_data => p_msg_data );
90: --
91: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
87: p_return_status := FND_API.G_RET_STS_ERROR;
88: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
89: p_data => p_msg_data );
90: --
91: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
92: --
93: ROLLBACK TO Update_Row_Pvt ;
94: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
95: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
90: --
91: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
92: --
93: ROLLBACK TO Update_Row_Pvt ;
94: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
95: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
96: p_data => p_msg_data );
97: --
98: WHEN OTHERS THEN
97: --
98: WHEN OTHERS THEN
99: --
100: ROLLBACK TO Update_Row_Pvt ;
101: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
102: --
103: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
104: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
105: l_api_name);