33: x_msg_count := 0;
34: x_msg_data := NULL;
35:
36: -- Initialize the return status to success
37: x_return_status := FND_API.G_RET_STS_SUCCESS;
38:
39: PA_STATUS_LIST_ITEMS_PVT.CreateStatusListItem
40: (
41: P_RECORD_VERSION_NUMBER=> P_RECORD_VERSION_NUMBER,
57: EXCEPTION
58: WHEN OTHERS THEN
59: x_msg_count := 1;
60: x_msg_data := substr(SQLERRM,1,240);
61: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
62: FND_MSG_PUB.add_exc_msg
63: (p_pkg_name => 'PA_STATUS_LIST_ITEMS_PUB'
64: , p_procedure_name => PA_DEBUG.G_Err_Stack
65: , p_error_text => substr(SQLERRM,1,240));
100: x_msg_count := 0;
101: x_msg_data := NULL;
102:
103: -- Initialize the return status to success
104: x_return_status := FND_API.G_RET_STS_SUCCESS;
105:
106:
107: PA_STATUS_LIST_ITEMS_PVT.UpdateStatusListItem
108: (
126: EXCEPTION
127: WHEN OTHERS THEN
128: x_msg_count := 1;
129: x_msg_data := substr(SQLERRM,1,240);
130: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
131: FND_MSG_PUB.add_exc_msg
132: (p_pkg_name => 'PA_STATUS_LIST_ITEMS_PUB'
133: , p_procedure_name => PA_DEBUG.G_Err_Stack
134: , p_error_text => substr(SQLERRM,1,240));
166: x_msg_count := 0;
167: x_msg_data := NULL;
168:
169: -- Initialize the return status to success
170: x_return_status := FND_API.G_RET_STS_SUCCESS;
171:
172:
173: -- Delete Role
174: PA_STATUS_LIST_ITEMS_PVT.DeleteStatusListItem
185: EXCEPTION
186: WHEN OTHERS THEN
187: x_msg_count := 1;
188: x_msg_data := substr(SQLERRM,1,240);
189: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
190: FND_MSG_PUB.add_exc_msg
191: (p_pkg_name => 'PA_STATUS_LIST_ITEMS_PUB'
192: , p_procedure_name => PA_DEBUG.G_Err_Stack
193: , p_error_text => substr(SQLERRM,1,240));