89: , X_LAST_UPDATE_LOGIN => fnd_global.user_id
90: );
91:
92: EXCEPTION
93: WHEN FND_API.G_EXC_ERROR THEN
94: IF(cResponsibility%ISOPEN) THEN
95: CLOSE cResponsibility;
96: END IF;
97: x_return_status := FND_API.G_RET_STS_ERROR;
93: WHEN FND_API.G_EXC_ERROR THEN
94: IF(cResponsibility%ISOPEN) THEN
95: CLOSE cResponsibility;
96: END IF;
97: x_return_status := FND_API.G_RET_STS_ERROR;
98: FND_MSG_PUB.Count_And_Get( p_encoded => 'F'
99: ,p_count => x_msg_count
100: ,p_data => x_msg_data);
101: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
97: x_return_status := FND_API.G_RET_STS_ERROR;
98: FND_MSG_PUB.Count_And_Get( p_encoded => 'F'
99: ,p_count => x_msg_count
100: ,p_data => x_msg_data);
101: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
102: IF(cResponsibility%ISOPEN) THEN
103: CLOSE cResponsibility;
104: END IF;
105: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
101: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
102: IF(cResponsibility%ISOPEN) THEN
103: CLOSE cResponsibility;
104: END IF;
105: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
106: FND_MSG_PUB.Count_And_Get( p_encoded => 'F'
107: ,p_count => x_msg_count
108: ,p_data => x_msg_data);
109: WHEN NO_DATA_FOUND THEN
109: WHEN NO_DATA_FOUND THEN
110: IF(cResponsibility%ISOPEN) THEN
111: CLOSE cResponsibility;
112: END IF;
113: x_return_status := FND_API.G_RET_STS_ERROR;
114: FND_MSG_PUB.Count_And_Get( p_encoded => 'F'
115: ,p_count => x_msg_count
116: ,p_data => x_msg_data);
117: WHEN OTHERS THEN
117: WHEN OTHERS THEN
118: IF(cResponsibility%ISOPEN) THEN
119: CLOSE cResponsibility;
120: END IF;
121: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
122:
123: FND_MSG_PUB.Count_And_Get( p_encoded => 'F'
124: ,p_count => x_msg_count
125: ,p_data => x_msg_data);
159:
160: IF (cResponsibility%NOTFOUND) THEN
161: FND_MESSAGE.SET_NAME('BIS','BIS_RESP_DELETED_ERROR');
162: FND_MSG_PUB.ADD;
163: RAISE FND_API.G_EXC_ERROR;
164: END IF;
165:
166: IF p_last_update_date IS NOT NULL THEN
167: IF p_last_update_date <> l_last_update_date THEN
166: IF p_last_update_date IS NOT NULL THEN
167: IF p_last_update_date <> l_last_update_date THEN
168: FND_MESSAGE.SET_NAME('BIS','BIS_RESP_CHANGED_ERROR');
169: FND_MSG_PUB.ADD;
170: RAISE FND_API.G_EXC_ERROR;
171: END IF;
172: END IF;
173:
174: ROLLBACK TO SP_LOCK_ROW;
174: ROLLBACK TO SP_LOCK_ROW;
175: CLOSE cResponsibility;
176:
177: EXCEPTION
178: WHEN FND_API.G_EXC_ERROR
179: THEN NULL;
180: WHEN OTHERS THEN
181: IF(cResponsibility%ISOPEN) THEN
182: CLOSE cResponsibility;
183: END IF;
184: ROLLBACK TO SP_LOCK_ROW;
185: FND_MESSAGE.SET_NAME('BIS','BIS_RESP_LOCKED_ERROR');
186: FND_MSG_PUB.ADD;
187: RAISE FND_API.G_EXC_ERROR;
188: END LOCK_ROW;
189:
190: END BIS_RESPONSIBILITY_PUB;