27: ) IS
28: BEGIN
29:
30: -- Initialize the Error Stack
31: PA_DEBUG.init_err_stack('PA_STATUS_LIST_ITEMS_PVT.CreateStatusListItem');
32: x_msg_count := 0;
33: x_msg_data := NULL;
34:
35:
49: X_CREATED_BY => P_CREATED_BY,
50: X_LAST_UPDATE_LOGIN => P_LAST_UPDATE_LOGIN
51: );
52: -- Reset the Error Stack
53: PA_DEBUG.reset_err_stack;
54:
55: EXCEPTION
56: WHEN OTHERS THEN
57: x_msg_count := 1;
58: x_msg_data := substr(SQLERRM,1,240);
59: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
60: FND_MSG_PUB.add_exc_msg
61: (p_pkg_name => 'PA_STATUS_LIST_ITEMS_PVT'
62: , p_procedure_name => PA_DEBUG.G_Err_Stack
63: , p_error_text => substr(SQLERRM,1,240));
64: RETURN;
65:
66: END CreateStatusListItem;
93:
94: BEGIN
95:
96: -- Initialize the Error Stack
97: PA_DEBUG.init_err_stack('PA_STATUS_LIST_ITEMS_PVT.Update_Row');
98: x_msg_count := 0;
99: x_msg_data := NULL;
100:
101: -- Initialize the return status to success
115: X_LAST_UPDATE_LOGIN => P_LAST_UPDATE_LOGIN
116: );
117:
118: -- Reset the Error Stack
119: PA_DEBUG.reset_err_stack;
120:
121: EXCEPTION
122: WHEN OTHERS THEN
123: x_msg_count := 1;
124: x_msg_data := substr(SQLERRM,1,240);
125: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
126: FND_MSG_PUB.add_exc_msg
127: (p_pkg_name => 'PA_STATUS_LIST_ITEMS_PVT'
128: , p_procedure_name => PA_DEBUG.G_Err_Stack
129: , p_error_text => substr(SQLERRM,1,240));
130: RETURN;
131:
132: END UpdateStatusListItem;
157:
158:
159:
160: -- Initialize the Error Stack
161: PA_DEBUG.init_err_stack('PA_STATUS_LIST_ITEMS_PVT.Delete_Row');
162: x_msg_count := 0;
163: x_msg_data := NULL;
164:
165: -- Initialize the return status to success
173: X_RECORD_VERSION_NUMBER => P_RECORD_VERSION_NUMBER
174: );
175:
176: -- Reset the Error Stack
177: PA_DEBUG.reset_err_stack;
178:
179: EXCEPTION
180: WHEN OTHERS THEN
181: x_msg_count := 1;
182: x_msg_data := substr(SQLERRM,1,240);
183: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
184: FND_MSG_PUB.add_exc_msg
185: (p_pkg_name => 'PA_STATUS_LIST_ITEMS_PVT'
186: , p_procedure_name => PA_DEBUG.G_Err_Stack
187: , p_error_text => substr(SQLERRM,1,240));
188: RETURN;
189:
190: END DeleteStatusListItem;