DBA Data[Home] [Help]

APPS.OKL_QVE_PVT dependencies on OKC_API

Line 154: IF (l_qvev_rec.object_version_number = OKC_API.G_MISS_NUM) THEN

150: p_qvev_rec IN qvev_rec_type
151: ) RETURN qvev_rec_type IS
152: l_qvev_rec qvev_rec_type := p_qvev_rec;
153: BEGIN
154: IF (l_qvev_rec.object_version_number = OKC_API.G_MISS_NUM) THEN
155: l_qvev_rec.object_version_number := NULL;
156: END IF;
157: IF (l_qvev_rec.pqy_id = OKC_API.G_MISS_NUM) THEN
158: l_qvev_rec.pqy_id := NULL;

Line 157: IF (l_qvev_rec.pqy_id = OKC_API.G_MISS_NUM) THEN

153: BEGIN
154: IF (l_qvev_rec.object_version_number = OKC_API.G_MISS_NUM) THEN
155: l_qvev_rec.object_version_number := NULL;
156: END IF;
157: IF (l_qvev_rec.pqy_id = OKC_API.G_MISS_NUM) THEN
158: l_qvev_rec.pqy_id := NULL;
159: END IF;
160: IF (l_qvev_rec.value = OKC_API.G_MISS_CHAR) THEN
161: l_qvev_rec.value := NULL;

Line 160: IF (l_qvev_rec.value = OKC_API.G_MISS_CHAR) THEN

156: END IF;
157: IF (l_qvev_rec.pqy_id = OKC_API.G_MISS_NUM) THEN
158: l_qvev_rec.pqy_id := NULL;
159: END IF;
160: IF (l_qvev_rec.value = OKC_API.G_MISS_CHAR) THEN
161: l_qvev_rec.value := NULL;
162: END IF;
163: IF (l_qvev_rec.description = OKC_API.G_MISS_CHAR) THEN
164: l_qvev_rec.description := NULL;

Line 163: IF (l_qvev_rec.description = OKC_API.G_MISS_CHAR) THEN

159: END IF;
160: IF (l_qvev_rec.value = OKC_API.G_MISS_CHAR) THEN
161: l_qvev_rec.value := NULL;
162: END IF;
163: IF (l_qvev_rec.description = OKC_API.G_MISS_CHAR) THEN
164: l_qvev_rec.description := NULL;
165: END IF;
166: IF (l_qvev_rec.from_date = OKC_API.G_MISS_DATE) THEN
167: l_qvev_rec.from_date := NULL;

Line 166: IF (l_qvev_rec.from_date = OKC_API.G_MISS_DATE) THEN

162: END IF;
163: IF (l_qvev_rec.description = OKC_API.G_MISS_CHAR) THEN
164: l_qvev_rec.description := NULL;
165: END IF;
166: IF (l_qvev_rec.from_date = OKC_API.G_MISS_DATE) THEN
167: l_qvev_rec.from_date := NULL;
168: END IF;
169: IF (l_qvev_rec.TO_DATE = OKC_API.G_MISS_DATE) THEN
170: l_qvev_rec.TO_DATE := NULL;

Line 169: IF (l_qvev_rec.TO_DATE = OKC_API.G_MISS_DATE) THEN

165: END IF;
166: IF (l_qvev_rec.from_date = OKC_API.G_MISS_DATE) THEN
167: l_qvev_rec.from_date := NULL;
168: END IF;
169: IF (l_qvev_rec.TO_DATE = OKC_API.G_MISS_DATE) THEN
170: l_qvev_rec.TO_DATE := NULL;
171: END IF;
172: IF (l_qvev_rec.created_by = OKC_API.G_MISS_NUM) THEN
173: l_qvev_rec.created_by := NULL;

Line 172: IF (l_qvev_rec.created_by = OKC_API.G_MISS_NUM) THEN

168: END IF;
169: IF (l_qvev_rec.TO_DATE = OKC_API.G_MISS_DATE) THEN
170: l_qvev_rec.TO_DATE := NULL;
171: END IF;
172: IF (l_qvev_rec.created_by = OKC_API.G_MISS_NUM) THEN
173: l_qvev_rec.created_by := NULL;
174: END IF;
175: IF (l_qvev_rec.creation_date = OKC_API.G_MISS_DATE) THEN
176: l_qvev_rec.creation_date := NULL;

Line 175: IF (l_qvev_rec.creation_date = OKC_API.G_MISS_DATE) THEN

171: END IF;
172: IF (l_qvev_rec.created_by = OKC_API.G_MISS_NUM) THEN
173: l_qvev_rec.created_by := NULL;
174: END IF;
175: IF (l_qvev_rec.creation_date = OKC_API.G_MISS_DATE) THEN
176: l_qvev_rec.creation_date := NULL;
177: END IF;
178: IF (l_qvev_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN
179: l_qvev_rec.last_updated_by := NULL;

Line 178: IF (l_qvev_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN

174: END IF;
175: IF (l_qvev_rec.creation_date = OKC_API.G_MISS_DATE) THEN
176: l_qvev_rec.creation_date := NULL;
177: END IF;
178: IF (l_qvev_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN
179: l_qvev_rec.last_updated_by := NULL;
180: END IF;
181: IF (l_qvev_rec.last_update_date = OKC_API.G_MISS_DATE) THEN
182: l_qvev_rec.last_update_date := NULL;

Line 181: IF (l_qvev_rec.last_update_date = OKC_API.G_MISS_DATE) THEN

177: END IF;
178: IF (l_qvev_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN
179: l_qvev_rec.last_updated_by := NULL;
180: END IF;
181: IF (l_qvev_rec.last_update_date = OKC_API.G_MISS_DATE) THEN
182: l_qvev_rec.last_update_date := NULL;
183: END IF;
184: IF (l_qvev_rec.last_update_login = OKC_API.G_MISS_NUM) THEN
185: l_qvev_rec.last_update_login := NULL;

Line 184: IF (l_qvev_rec.last_update_login = OKC_API.G_MISS_NUM) THEN

180: END IF;
181: IF (l_qvev_rec.last_update_date = OKC_API.G_MISS_DATE) THEN
182: l_qvev_rec.last_update_date := NULL;
183: END IF;
184: IF (l_qvev_rec.last_update_login = OKC_API.G_MISS_NUM) THEN
185: l_qvev_rec.last_update_login := NULL;
186: END IF;
187: RETURN(l_qvev_rec);
188: END null_out_defaults;

Line 214: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

210: PROCEDURE Validate_Id (
211: p_qvev_rec IN qvev_rec_type,
212: x_return_status OUT NOCOPY VARCHAR2
213: ) IS
214: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
215: BEGIN
216: x_return_status := OKC_API.G_RET_STS_SUCCESS;
217:
218: IF p_qvev_rec.id = OKC_API.G_MISS_NUM OR

Line 216: x_return_status := OKC_API.G_RET_STS_SUCCESS;

212: x_return_status OUT NOCOPY VARCHAR2
213: ) IS
214: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
215: BEGIN
216: x_return_status := OKC_API.G_RET_STS_SUCCESS;
217:
218: IF p_qvev_rec.id = OKC_API.G_MISS_NUM OR
219: p_qvev_rec.id IS NULL
220: THEN

Line 218: IF p_qvev_rec.id = OKC_API.G_MISS_NUM OR

214: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
215: BEGIN
216: x_return_status := OKC_API.G_RET_STS_SUCCESS;
217:
218: IF p_qvev_rec.id = OKC_API.G_MISS_NUM OR
219: p_qvev_rec.id IS NULL
220: THEN
221: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
222: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 221: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');

217:
218: IF p_qvev_rec.id = OKC_API.G_MISS_NUM OR
219: p_qvev_rec.id IS NULL
220: THEN
221: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
222: x_return_status := OKC_API.G_RET_STS_ERROR;
223: END IF;
224: EXCEPTION
225: WHEN OTHERS THEN

Line 222: x_return_status := OKC_API.G_RET_STS_ERROR;

218: IF p_qvev_rec.id = OKC_API.G_MISS_NUM OR
219: p_qvev_rec.id IS NULL
220: THEN
221: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
222: x_return_status := OKC_API.G_RET_STS_ERROR;
223: END IF;
224: EXCEPTION
225: WHEN OTHERS THEN
226: OKC_API.set_message(p_app_name =>G_APP_NAME,

Line 226: OKC_API.set_message(p_app_name =>G_APP_NAME,

222: x_return_status := OKC_API.G_RET_STS_ERROR;
223: END IF;
224: EXCEPTION
225: WHEN OTHERS THEN
226: OKC_API.set_message(p_app_name =>G_APP_NAME,
227: p_msg_name =>G_UNEXPECTED_ERROR,
228: p_token1 =>G_SQL_SQLCODE_TOKEN,
229: p_token1_value =>SQLCODE,
230: p_token2 =>G_SQL_SQLERRM_TOKEN,

Line 232: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

228: p_token1 =>G_SQL_SQLCODE_TOKEN,
229: p_token1_value =>SQLCODE,
230: p_token2 =>G_SQL_SQLERRM_TOKEN,
231: p_token2_value =>SQLERRM);
232: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
233:
234: END Validate_Id;
235: -----end of Validate_Id------------------------
236:

Line 255: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

251: PROCEDURE Validate_Object_Version_Number (
252: p_qvev_rec IN qvev_rec_type,
253: x_return_status OUT NOCOPY VARCHAR2
254: ) IS
255: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
256: BEGIN
257: x_return_status := OKC_API.G_RET_STS_SUCCESS;
258:
259: IF p_qvev_rec.object_version_number = OKC_API.G_MISS_NUM OR

Line 257: x_return_status := OKC_API.G_RET_STS_SUCCESS;

253: x_return_status OUT NOCOPY VARCHAR2
254: ) IS
255: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
256: BEGIN
257: x_return_status := OKC_API.G_RET_STS_SUCCESS;
258:
259: IF p_qvev_rec.object_version_number = OKC_API.G_MISS_NUM OR
260: p_qvev_rec.object_version_number IS NULL
261: THEN

Line 259: IF p_qvev_rec.object_version_number = OKC_API.G_MISS_NUM OR

255: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
256: BEGIN
257: x_return_status := OKC_API.G_RET_STS_SUCCESS;
258:
259: IF p_qvev_rec.object_version_number = OKC_API.G_MISS_NUM OR
260: p_qvev_rec.object_version_number IS NULL
261: THEN
262: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
263: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 262: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');

258:
259: IF p_qvev_rec.object_version_number = OKC_API.G_MISS_NUM OR
260: p_qvev_rec.object_version_number IS NULL
261: THEN
262: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
263: x_return_status := OKC_API.G_RET_STS_ERROR;
264: END IF;
265: EXCEPTION
266: WHEN OTHERS THEN

Line 263: x_return_status := OKC_API.G_RET_STS_ERROR;

259: IF p_qvev_rec.object_version_number = OKC_API.G_MISS_NUM OR
260: p_qvev_rec.object_version_number IS NULL
261: THEN
262: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
263: x_return_status := OKC_API.G_RET_STS_ERROR;
264: END IF;
265: EXCEPTION
266: WHEN OTHERS THEN
267: OKC_API.set_message(p_app_name =>G_APP_NAME,

Line 267: OKC_API.set_message(p_app_name =>G_APP_NAME,

263: x_return_status := OKC_API.G_RET_STS_ERROR;
264: END IF;
265: EXCEPTION
266: WHEN OTHERS THEN
267: OKC_API.set_message(p_app_name =>G_APP_NAME,
268: p_msg_name =>G_UNEXPECTED_ERROR,
269: p_token1 =>G_SQL_SQLCODE_TOKEN,
270: p_token1_value =>SQLCODE,
271: p_token2 =>G_SQL_SQLERRM_TOKEN,

Line 273: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

269: p_token1 =>G_SQL_SQLCODE_TOKEN,
270: p_token1_value =>SQLCODE,
271: p_token2 =>G_SQL_SQLERRM_TOKEN,
272: p_token2_value =>SQLERRM);
273: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
274:
275: END Validate_Object_Version_Number;
276: ------end of Validate_Object_Version_Number-----------------------------------
277:

Line 294: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

290: PROCEDURE Validate_Pqy_Id (
291: p_qvev_rec IN qvev_rec_type,
292: x_return_status OUT NOCOPY VARCHAR2
293: ) IS
294: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
295:
296: CURSOR okl_pqy_values_foreign (p_foreign OKL_PQY_VALUES.PQY_ID%TYPE) IS
297: SELECT '1'
298: FROM OKL_PDT_QUALITYS_V

Line 305: x_return_status := OKC_API.G_RET_STS_SUCCESS;

301: l_foreign_key OKL_PQY_VALUES_V.PQY_ID%TYPE;
302:
303: BEGIN
304: -- initialize return status
305: x_return_status := OKC_API.G_RET_STS_SUCCESS;
306:
307: IF p_qvev_rec.pqy_id = OKC_API.G_MISS_NUM OR
308: p_qvev_rec.pqy_id IS NULL
309: THEN

Line 307: IF p_qvev_rec.pqy_id = OKC_API.G_MISS_NUM OR

303: BEGIN
304: -- initialize return status
305: x_return_status := OKC_API.G_RET_STS_SUCCESS;
306:
307: IF p_qvev_rec.pqy_id = OKC_API.G_MISS_NUM OR
308: p_qvev_rec.pqy_id IS NULL
309: THEN
310: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'pqy_id');
311: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 310: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'pqy_id');

306:
307: IF p_qvev_rec.pqy_id = OKC_API.G_MISS_NUM OR
308: p_qvev_rec.pqy_id IS NULL
309: THEN
310: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'pqy_id');
311: x_return_status := OKC_API.G_RET_STS_ERROR;
312: ELSE
313: OPEN okl_pqy_values_foreign (p_qvev_rec.pqy_id);
314: FETCH okl_pqy_values_foreign INTO l_foreign_key;

Line 311: x_return_status := OKC_API.G_RET_STS_ERROR;

307: IF p_qvev_rec.pqy_id = OKC_API.G_MISS_NUM OR
308: p_qvev_rec.pqy_id IS NULL
309: THEN
310: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'pqy_id');
311: x_return_status := OKC_API.G_RET_STS_ERROR;
312: ELSE
313: OPEN okl_pqy_values_foreign (p_qvev_rec.pqy_id);
314: FETCH okl_pqy_values_foreign INTO l_foreign_key;
315: IF okl_pqy_values_foreign%NOTFOUND THEN

Line 316: OKC_API.set_message(G_APP_NAME, G_INVALID_KEY,G_COL_NAME_TOKEN,'pqy_id');

312: ELSE
313: OPEN okl_pqy_values_foreign (p_qvev_rec.pqy_id);
314: FETCH okl_pqy_values_foreign INTO l_foreign_key;
315: IF okl_pqy_values_foreign%NOTFOUND THEN
316: OKC_API.set_message(G_APP_NAME, G_INVALID_KEY,G_COL_NAME_TOKEN,'pqy_id');
317: x_return_status := OKC_API.G_RET_STS_ERROR;
318:
319: ELSE
320: x_return_status := OKC_API.G_RET_STS_SUCCESS;

Line 317: x_return_status := OKC_API.G_RET_STS_ERROR;

313: OPEN okl_pqy_values_foreign (p_qvev_rec.pqy_id);
314: FETCH okl_pqy_values_foreign INTO l_foreign_key;
315: IF okl_pqy_values_foreign%NOTFOUND THEN
316: OKC_API.set_message(G_APP_NAME, G_INVALID_KEY,G_COL_NAME_TOKEN,'pqy_id');
317: x_return_status := OKC_API.G_RET_STS_ERROR;
318:
319: ELSE
320: x_return_status := OKC_API.G_RET_STS_SUCCESS;
321: END IF;

Line 320: x_return_status := OKC_API.G_RET_STS_SUCCESS;

316: OKC_API.set_message(G_APP_NAME, G_INVALID_KEY,G_COL_NAME_TOKEN,'pqy_id');
317: x_return_status := OKC_API.G_RET_STS_ERROR;
318:
319: ELSE
320: x_return_status := OKC_API.G_RET_STS_SUCCESS;
321: END IF;
322: CLOSE okl_pqy_values_foreign;
323: END IF;
324: EXCEPTION

Line 326: OKC_API.set_message(p_app_name =>G_APP_NAME,

322: CLOSE okl_pqy_values_foreign;
323: END IF;
324: EXCEPTION
325: WHEN OTHERS THEN
326: OKC_API.set_message(p_app_name =>G_APP_NAME,
327: p_msg_name =>G_UNEXPECTED_ERROR,
328: p_token1 =>G_SQL_SQLCODE_TOKEN,
329: p_token1_value =>SQLCODE,
330: p_token2 =>G_SQL_SQLERRM_TOKEN,

Line 332: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

328: p_token1 =>G_SQL_SQLCODE_TOKEN,
329: p_token1_value =>SQLCODE,
330: p_token2 =>G_SQL_SQLERRM_TOKEN,
331: p_token2_value =>SQLERRM);
332: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
333:
334: END Validate_Pqy_Id;
335: ------end of Validate_Pqy_Id-----------------------------------
336:

Line 355: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

351: PROCEDURE Validate_Value (
352: p_qvev_rec IN OUT NOCOPY qvev_rec_type,
353: x_return_status OUT NOCOPY VARCHAR2
354: ) IS
355: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
356:
357: l_dummy VARCHAR2(1);
358:
359: BEGIN

Line 361: x_return_status := OKC_API.G_RET_STS_SUCCESS;

357: l_dummy VARCHAR2(1);
358:
359: BEGIN
360: -- initialize return status
361: x_return_status := OKC_API.G_RET_STS_SUCCESS;
362:
363: IF (p_qvev_rec.value IS NOT NULL) AND (p_qvev_rec.value <> OKC_API.G_MISS_CHAR) THEN
364:
365: IF p_qvev_rec.value IN('LEASEDF','LEASEOP','LOAN','LOAN-REVOLVING','LEASEST') THEN

Line 363: IF (p_qvev_rec.value IS NOT NULL) AND (p_qvev_rec.value <> OKC_API.G_MISS_CHAR) THEN

359: BEGIN
360: -- initialize return status
361: x_return_status := OKC_API.G_RET_STS_SUCCESS;
362:
363: IF (p_qvev_rec.value IS NOT NULL) AND (p_qvev_rec.value <> OKC_API.G_MISS_CHAR) THEN
364:
365: IF p_qvev_rec.value IN('LEASEDF','LEASEOP','LOAN','LOAN-REVOLVING','LEASEST') THEN
366: l_dummy := OKL_ACCOUNTING_UTIL.validate_lookup_code (p_lookup_type => 'OKL_BOOK_CLASS',
367: p_lookup_code => p_qvev_rec.value);

Line 382: IF (l_dummy = OKC_API.G_FALSE) THEN

378: l_dummy := OKL_ACCOUNTING_UTIL.validate_lookup_code (p_lookup_type => 'OKL_SECURITIZATION_TYPE',
379: p_lookup_code => p_qvev_rec.value);
380: END IF;
381:
382: IF (l_dummy = OKC_API.G_FALSE) THEN
383:
384: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
385: p_msg_name => g_invalid_value,
386: p_token1 => g_col_name_token,

Line 384: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

380: END IF;
381:
382: IF (l_dummy = OKC_API.G_FALSE) THEN
383:
384: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
385: p_msg_name => g_invalid_value,
386: p_token1 => g_col_name_token,
387: p_token1_value => 'VALUE');
388:

Line 389: x_return_status := OKC_API.G_RET_STS_ERROR;

385: p_msg_name => g_invalid_value,
386: p_token1 => g_col_name_token,
387: p_token1_value => 'VALUE');
388:
389: x_return_status := OKC_API.G_RET_STS_ERROR;
390: RAISE G_EXCEPTION_HALT_VALIDATION;
391:
392: END IF;
393:

Line 402: OKC_API.set_message(p_app_name =>G_APP_NAME,

398: EXCEPTION
399: WHEN G_EXCEPTION_HALT_VALIDATION THEN
400: NULL;
401: WHEN OTHERS THEN
402: OKC_API.set_message(p_app_name =>G_APP_NAME,
403: p_msg_name =>G_UNEXPECTED_ERROR,
404: p_token1 =>G_SQL_SQLCODE_TOKEN,
405: p_token1_value =>SQLCODE,
406: p_token2 =>G_SQL_SQLERRM_TOKEN,

Line 408: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

404: p_token1 =>G_SQL_SQLCODE_TOKEN,
405: p_token1_value =>SQLCODE,
406: p_token2 =>G_SQL_SQLERRM_TOKEN,
407: p_token2_value =>SQLERRM);
408: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
409:
410: END Validate_Value;
411: ------end of Validate_Value-----------------------------------
412:

Line 430: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

426: PROCEDURE Validate_From_Date(
427: p_qvev_rec IN qvev_rec_type,
428: x_return_status OUT NOCOPY VARCHAR2
429: ) IS
430: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
431: BEGIN
432: -- initialize return status
433: x_return_status := OKC_API.G_RET_STS_SUCCESS;
434: IF (p_qvev_rec.from_date IS NULL) OR

Line 433: x_return_status := OKC_API.G_RET_STS_SUCCESS;

429: ) IS
430: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
431: BEGIN
432: -- initialize return status
433: x_return_status := OKC_API.G_RET_STS_SUCCESS;
434: IF (p_qvev_rec.from_date IS NULL) OR
435: (p_qvev_rec.from_date = OKC_API.G_MISS_DATE) THEN
436: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'from_date');
437: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 435: (p_qvev_rec.from_date = OKC_API.G_MISS_DATE) THEN

431: BEGIN
432: -- initialize return status
433: x_return_status := OKC_API.G_RET_STS_SUCCESS;
434: IF (p_qvev_rec.from_date IS NULL) OR
435: (p_qvev_rec.from_date = OKC_API.G_MISS_DATE) THEN
436: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'from_date');
437: x_return_status := OKC_API.G_RET_STS_ERROR;
438: END IF;
439: EXCEPTION

Line 436: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'from_date');

432: -- initialize return status
433: x_return_status := OKC_API.G_RET_STS_SUCCESS;
434: IF (p_qvev_rec.from_date IS NULL) OR
435: (p_qvev_rec.from_date = OKC_API.G_MISS_DATE) THEN
436: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'from_date');
437: x_return_status := OKC_API.G_RET_STS_ERROR;
438: END IF;
439: EXCEPTION
440: WHEN OTHERS THEN

Line 437: x_return_status := OKC_API.G_RET_STS_ERROR;

433: x_return_status := OKC_API.G_RET_STS_SUCCESS;
434: IF (p_qvev_rec.from_date IS NULL) OR
435: (p_qvev_rec.from_date = OKC_API.G_MISS_DATE) THEN
436: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'from_date');
437: x_return_status := OKC_API.G_RET_STS_ERROR;
438: END IF;
439: EXCEPTION
440: WHEN OTHERS THEN
441: OKC_API.set_message(p_app_name =>G_APP_NAME,

Line 441: OKC_API.set_message(p_app_name =>G_APP_NAME,

437: x_return_status := OKC_API.G_RET_STS_ERROR;
438: END IF;
439: EXCEPTION
440: WHEN OTHERS THEN
441: OKC_API.set_message(p_app_name =>G_APP_NAME,
442:
443: p_msg_name =>G_UNEXPECTED_ERROR,
444: p_token1 =>G_SQL_SQLCODE_TOKEN,
445: p_token1_value =>SQLCODE,

Line 448: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

444: p_token1 =>G_SQL_SQLCODE_TOKEN,
445: p_token1_value =>SQLCODE,
446: p_token2 =>G_SQL_SQLERRM_TOKEN,
447: p_token2_value =>SQLERRM);
448: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
449:
450: END Validate_From_Date;
451: ------end of Validate_From_Date-----------------------------------
452:

Line 469: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

465:
466: PROCEDURE Validate_To_Date(p_qvev_rec IN qvev_rec_type,
467: x_return_status OUT NOCOPY VARCHAR2)IS
468:
469: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
470:
471: BEGIN
472: -- initialize return status
473: x_return_status := OKC_API.G_RET_STS_SUCCESS;

Line 473: x_return_status := OKC_API.G_RET_STS_SUCCESS;

469: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
470:
471: BEGIN
472: -- initialize return status
473: x_return_status := OKC_API.G_RET_STS_SUCCESS;
474:
475: -- check for data before processing
476: IF (p_qvev_rec.TO_DATE IS NOT NULL) AND
477: (p_qvev_rec.TO_DATE < p_qvev_rec.from_date) THEN

Line 478: OKC_API.SET_MESSAGE(p_app_name => g_app_name

474:
475: -- check for data before processing
476: IF (p_qvev_rec.TO_DATE IS NOT NULL) AND
477: (p_qvev_rec.TO_DATE < p_qvev_rec.from_date) THEN
478: OKC_API.SET_MESSAGE(p_app_name => g_app_name
479: ,p_msg_name => g_to_date_error
480: ,p_token1 => g_col_name_token
481: ,p_token1_value => 'to_date');
482: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 482: x_return_status := OKC_API.G_RET_STS_ERROR;

478: OKC_API.SET_MESSAGE(p_app_name => g_app_name
479: ,p_msg_name => g_to_date_error
480: ,p_token1 => g_col_name_token
481: ,p_token1_value => 'to_date');
482: x_return_status := OKC_API.G_RET_STS_ERROR;
483: RAISE G_EXCEPTION_HALT_VALIDATION;
484: END IF;
485:
486: EXCEPTION

Line 494: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

490: NULL;
491:
492: WHEN OTHERS THEN
493: -- store SQL error message on message stack for caller
494: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
495: p_msg_name => g_unexpected_error,
496: p_token1 => g_sql_sqlcode_token,
497: p_token1_value => SQLCODE,
498: p_token2 => g_sql_sqlerrm_token,

Line 502: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

498: p_token2 => g_sql_sqlerrm_token,
499: p_token2_value => SQLERRM);
500:
501: -- notify caller of an UNEXPECTED error
502: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
503:
504: END Validate_To_Date;
505: ------end of Validate_To_Date-----------------------------------
506:

Line 535: x_return_status := OKC_API.G_RET_STS_SUCCESS;

531: l_unique_key2 OKL_PQY_VALUES_V.PQY_ID%TYPE;
532:
533: BEGIN
534: -- initialize return status
535: x_return_status := OKC_API.G_RET_STS_SUCCESS;
536:
537: OPEN okl_pqy_values_unique (p_qvev_rec.value, p_qvev_rec.pqy_id);
538: FETCH okl_pqy_values_unique INTO l_unique_key;
539: IF okl_pqy_values_unique%FOUND THEN

Line 540: OKC_API.set_message('OKL',G_DUPLICATE_RECORD,G_COL_NAME_TOKEN,'value');

536:
537: OPEN okl_pqy_values_unique (p_qvev_rec.value, p_qvev_rec.pqy_id);
538: FETCH okl_pqy_values_unique INTO l_unique_key;
539: IF okl_pqy_values_unique%FOUND THEN
540: OKC_API.set_message('OKL',G_DUPLICATE_RECORD,G_COL_NAME_TOKEN,'value');
541: -- OKC_API.set_message(G_APP_NAME,G_DUPLICATE_RECORD,G_COL_NAME_TOKEN,'pqy_id');
542:
543: x_return_status := OKC_API.G_RET_STS_ERROR;
544: ELSE

Line 541: -- OKC_API.set_message(G_APP_NAME,G_DUPLICATE_RECORD,G_COL_NAME_TOKEN,'pqy_id');

537: OPEN okl_pqy_values_unique (p_qvev_rec.value, p_qvev_rec.pqy_id);
538: FETCH okl_pqy_values_unique INTO l_unique_key;
539: IF okl_pqy_values_unique%FOUND THEN
540: OKC_API.set_message('OKL',G_DUPLICATE_RECORD,G_COL_NAME_TOKEN,'value');
541: -- OKC_API.set_message(G_APP_NAME,G_DUPLICATE_RECORD,G_COL_NAME_TOKEN,'pqy_id');
542:
543: x_return_status := OKC_API.G_RET_STS_ERROR;
544: ELSE
545: x_return_status := OKC_API.G_RET_STS_SUCCESS;

Line 543: x_return_status := OKC_API.G_RET_STS_ERROR;

539: IF okl_pqy_values_unique%FOUND THEN
540: OKC_API.set_message('OKL',G_DUPLICATE_RECORD,G_COL_NAME_TOKEN,'value');
541: -- OKC_API.set_message(G_APP_NAME,G_DUPLICATE_RECORD,G_COL_NAME_TOKEN,'pqy_id');
542:
543: x_return_status := OKC_API.G_RET_STS_ERROR;
544: ELSE
545: x_return_status := OKC_API.G_RET_STS_SUCCESS;
546: END IF;
547: CLOSE okl_pqy_values_unique;

Line 545: x_return_status := OKC_API.G_RET_STS_SUCCESS;

541: -- OKC_API.set_message(G_APP_NAME,G_DUPLICATE_RECORD,G_COL_NAME_TOKEN,'pqy_id');
542:
543: x_return_status := OKC_API.G_RET_STS_ERROR;
544: ELSE
545: x_return_status := OKC_API.G_RET_STS_SUCCESS;
546: END IF;
547: CLOSE okl_pqy_values_unique;
548:
549: EXCEPTION

Line 551: OKC_API.set_message(p_app_name =>G_APP_NAME,

547: CLOSE okl_pqy_values_unique;
548:
549: EXCEPTION
550: WHEN OTHERS THEN
551: OKC_API.set_message(p_app_name =>G_APP_NAME,
552: p_msg_name =>G_UNEXPECTED_ERROR,
553: p_token1 =>G_SQL_SQLCODE_TOKEN,
554: p_token1_value =>SQLCODE,
555: p_token2 =>G_SQL_SQLERRM_TOKEN,

Line 557: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

553: p_token1 =>G_SQL_SQLCODE_TOKEN,
554: p_token1_value =>SQLCODE,
555: p_token2 =>G_SQL_SQLERRM_TOKEN,
556: p_token2_value =>SQLERRM);
557: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
558:
559:
560:
561: END Validate_Unique_Key;

Line 582: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

578:
579: FUNCTION Validate_Attributes(
580: p_qvev_rec IN OUT NOCOPY qvev_rec_type
581: ) RETURN VARCHAR IS
582: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
583: l_return_status VARCHAR2(1):= OKC_API.G_RET_STS_SUCCESS;
584:
585:
586: BEGIN

Line 583: l_return_status VARCHAR2(1):= OKC_API.G_RET_STS_SUCCESS;

579: FUNCTION Validate_Attributes(
580: p_qvev_rec IN OUT NOCOPY qvev_rec_type
581: ) RETURN VARCHAR IS
582: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
583: l_return_status VARCHAR2(1):= OKC_API.G_RET_STS_SUCCESS;
584:
585:
586: BEGIN
587: ---- CHECK FOR ID-------------------------

Line 589: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

585:
586: BEGIN
587: ---- CHECK FOR ID-------------------------
588: Validate_Id (p_qvev_rec, x_return_status);
589: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
590: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
591: -- need to leave
592: l_return_status := x_return_status;
593: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 590: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

586: BEGIN
587: ---- CHECK FOR ID-------------------------
588: Validate_Id (p_qvev_rec, x_return_status);
589: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
590: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
591: -- need to leave
592: l_return_status := x_return_status;
593: RAISE G_EXCEPTION_HALT_VALIDATION;
594: ELSE

Line 601: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

597: END IF;
598:
599: --------CHECK FOR VERSION NUMBER------------------
600: Validate_Object_Version_Number (p_qvev_rec, x_return_status);
601: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
602: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
603: -- need to leave
604: l_return_status := x_return_status;
605: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 602: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

598:
599: --------CHECK FOR VERSION NUMBER------------------
600: Validate_Object_Version_Number (p_qvev_rec, x_return_status);
601: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
602: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
603: -- need to leave
604: l_return_status := x_return_status;
605: RAISE G_EXCEPTION_HALT_VALIDATION;
606: ELSE

Line 613: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

609: END IF;
610:
611: -----CHECK FOR PQY_ID----------------------------
612: Validate_Pqy_Id (p_qvev_rec, x_return_status);
613: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
614: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
615: -- need to leave
616: l_return_status := x_return_status;
617: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 614: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

610:
611: -----CHECK FOR PQY_ID----------------------------
612: Validate_Pqy_Id (p_qvev_rec, x_return_status);
613: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
614: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
615: -- need to leave
616: l_return_status := x_return_status;
617: RAISE G_EXCEPTION_HALT_VALIDATION;
618: ELSE

Line 625: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

621: END IF;
622:
623: -----CHECK FOR PQY_VALUE----------------------------
624: Validate_Value (p_qvev_rec, x_return_status);
625: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
626: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
627: -- need to leave
628: l_return_status := x_return_status;
629: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 626: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

622:
623: -----CHECK FOR PQY_VALUE----------------------------
624: Validate_Value (p_qvev_rec, x_return_status);
625: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
626: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
627: -- need to leave
628: l_return_status := x_return_status;
629: RAISE G_EXCEPTION_HALT_VALIDATION;
630: ELSE

Line 638: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

634: END IF;
635:
636: -----CHECK FOR FROM_DATE----------------------------
637: Validate_From_Date (p_qvev_rec,x_return_status);
638: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
639: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
640: -- need to leave
641: l_return_status := x_return_status;
642:

Line 639: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

635:
636: -----CHECK FOR FROM_DATE----------------------------
637: Validate_From_Date (p_qvev_rec,x_return_status);
638: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
639: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
640: -- need to leave
641: l_return_status := x_return_status;
642:
643: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 658: OKC_API.set_message(p_app_name =>G_APP_NAME,

654: NULL;
655: RETURN (l_return_status);
656:
657: WHEN OTHERS THEN
658: OKC_API.set_message(p_app_name =>G_APP_NAME,
659: p_msg_name =>G_UNEXPECTED_ERROR,
660: p_token1 =>G_SQL_SQLCODE_TOKEN,
661: p_token1_value =>SQLCODE,
662: p_token2 =>G_SQL_SQLERRM_TOKEN,

Line 664: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

660: p_token1 =>G_SQL_SQLCODE_TOKEN,
661: p_token1_value =>SQLCODE,
662: p_token2 =>G_SQL_SQLERRM_TOKEN,
663: p_token2_value =>SQLERRM);
664: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
665: RETURN(l_return_status);
666:
667: END Validate_Attributes;
668:

Line 687: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

683:
684: FUNCTION Validate_Record(
685: p_qvev_rec IN qvev_rec_type
686: ) RETURN VARCHAR IS
687: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
688: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
689:
690:
691: BEGIN

Line 688: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

684: FUNCTION Validate_Record(
685: p_qvev_rec IN qvev_rec_type
686: ) RETURN VARCHAR IS
687: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
688: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
689:
690:
691: BEGIN
692:

Line 695: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

691: BEGIN
692:
693: --------CHECK FOR UNIQUE KEY------------------
694: Validate_Unique_Key (p_qvev_rec,x_return_status);
695: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
696: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
697: -- need to leave
698: l_return_status := x_return_status;
699: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 696: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

692:
693: --------CHECK FOR UNIQUE KEY------------------
694: Validate_Unique_Key (p_qvev_rec,x_return_status);
695: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
696: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
697: -- need to leave
698: l_return_status := x_return_status;
699: RAISE G_EXCEPTION_HALT_VALIDATION;
700: ELSE

Line 706: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

702: END IF;
703: END IF;
704: -----CHECK FOR TO_DATE----------------------------
705: Validate_To_Date (p_qvev_rec,x_return_status);
706: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
707: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
708: -- need to leave
709: l_return_status := x_return_status;
710: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 707: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

703: END IF;
704: -----CHECK FOR TO_DATE----------------------------
705: Validate_To_Date (p_qvev_rec,x_return_status);
706: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
707: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
708: -- need to leave
709: l_return_status := x_return_status;
710: RAISE G_EXCEPTION_HALT_VALIDATION;
711: ELSE

Line 725: OKC_API.set_message(p_app_name =>G_APP_NAME,

721: NULL;
722: RETURN (l_return_status);
723:
724: WHEN OTHERS THEN
725: OKC_API.set_message(p_app_name =>G_APP_NAME,
726: p_msg_name =>G_UNEXPECTED_ERROR,
727: p_token1 =>G_SQL_SQLCODE_TOKEN,
728: p_token1_value =>SQLCODE,
729: p_token2 =>G_SQL_SQLERRM_TOKEN,

Line 731: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

727: p_token1 =>G_SQL_SQLCODE_TOKEN,
728: p_token1_value =>SQLCODE,
729: p_token2 =>G_SQL_SQLERRM_TOKEN,
730: p_token2_value =>SQLERRM);
731: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
732: RETURN(l_return_status);
733:
734: END Validate_Record;
735:

Line 743: --l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

739: --FUNCTION Validate_Attributes (
740: --p_qvev_rec IN qvev_rec_type
741: --) RETURN VARCHAR2 IS
742:
743: --l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
744: --BEGIN
745: -- IF p_qvev_rec.id = OKC_API.G_MISS_NUM OR
746: -- --p_qvev_rec.id IS NULL
747: -- THEN

Line 745: -- IF p_qvev_rec.id = OKC_API.G_MISS_NUM OR

741: --) RETURN VARCHAR2 IS
742:
743: --l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
744: --BEGIN
745: -- IF p_qvev_rec.id = OKC_API.G_MISS_NUM OR
746: -- --p_qvev_rec.id IS NULL
747: -- THEN
748: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
749: -- l_return_status := OKC_API.G_RET_STS_ERROR;

Line 748: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');

744: --BEGIN
745: -- IF p_qvev_rec.id = OKC_API.G_MISS_NUM OR
746: -- --p_qvev_rec.id IS NULL
747: -- THEN
748: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
749: -- l_return_status := OKC_API.G_RET_STS_ERROR;
750: -- ELSIF p_qvev_rec.object_version_number = OKC_API.G_MISS_NUM OR
751: -- p_qvev_rec.object_version_number IS NULL
752: -- THEN

Line 749: -- l_return_status := OKC_API.G_RET_STS_ERROR;

745: -- IF p_qvev_rec.id = OKC_API.G_MISS_NUM OR
746: -- --p_qvev_rec.id IS NULL
747: -- THEN
748: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
749: -- l_return_status := OKC_API.G_RET_STS_ERROR;
750: -- ELSIF p_qvev_rec.object_version_number = OKC_API.G_MISS_NUM OR
751: -- p_qvev_rec.object_version_number IS NULL
752: -- THEN
753: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');

Line 750: -- ELSIF p_qvev_rec.object_version_number = OKC_API.G_MISS_NUM OR

746: -- --p_qvev_rec.id IS NULL
747: -- THEN
748: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
749: -- l_return_status := OKC_API.G_RET_STS_ERROR;
750: -- ELSIF p_qvev_rec.object_version_number = OKC_API.G_MISS_NUM OR
751: -- p_qvev_rec.object_version_number IS NULL
752: -- THEN
753: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
754: -- l_return_status := OKC_API.G_RET_STS_ERROR;

Line 753: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');

749: -- l_return_status := OKC_API.G_RET_STS_ERROR;
750: -- ELSIF p_qvev_rec.object_version_number = OKC_API.G_MISS_NUM OR
751: -- p_qvev_rec.object_version_number IS NULL
752: -- THEN
753: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
754: -- l_return_status := OKC_API.G_RET_STS_ERROR;
755: -- ELSIF p_qvev_rec.pqy_id = OKC_API.G_MISS_NUM OR
756: -- p_qvev_rec.pqy_id IS NULL
757: -- THEN

Line 754: -- l_return_status := OKC_API.G_RET_STS_ERROR;

750: -- ELSIF p_qvev_rec.object_version_number = OKC_API.G_MISS_NUM OR
751: -- p_qvev_rec.object_version_number IS NULL
752: -- THEN
753: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
754: -- l_return_status := OKC_API.G_RET_STS_ERROR;
755: -- ELSIF p_qvev_rec.pqy_id = OKC_API.G_MISS_NUM OR
756: -- p_qvev_rec.pqy_id IS NULL
757: -- THEN
758: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'pqy_id');

Line 755: -- ELSIF p_qvev_rec.pqy_id = OKC_API.G_MISS_NUM OR

751: -- p_qvev_rec.object_version_number IS NULL
752: -- THEN
753: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
754: -- l_return_status := OKC_API.G_RET_STS_ERROR;
755: -- ELSIF p_qvev_rec.pqy_id = OKC_API.G_MISS_NUM OR
756: -- p_qvev_rec.pqy_id IS NULL
757: -- THEN
758: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'pqy_id');
759: -- l_return_status := OKC_API.G_RET_STS_ERROR;

Line 758: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'pqy_id');

754: -- l_return_status := OKC_API.G_RET_STS_ERROR;
755: -- ELSIF p_qvev_rec.pqy_id = OKC_API.G_MISS_NUM OR
756: -- p_qvev_rec.pqy_id IS NULL
757: -- THEN
758: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'pqy_id');
759: -- l_return_status := OKC_API.G_RET_STS_ERROR;
760: -- ELSIF p_qvev_rec.value = OKC_API.G_MISS_CHAR OR
761: -- p_qvev_rec.value IS NULL
762: -- THEN

Line 759: -- l_return_status := OKC_API.G_RET_STS_ERROR;

755: -- ELSIF p_qvev_rec.pqy_id = OKC_API.G_MISS_NUM OR
756: -- p_qvev_rec.pqy_id IS NULL
757: -- THEN
758: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'pqy_id');
759: -- l_return_status := OKC_API.G_RET_STS_ERROR;
760: -- ELSIF p_qvev_rec.value = OKC_API.G_MISS_CHAR OR
761: -- p_qvev_rec.value IS NULL
762: -- THEN
763: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'value');

Line 760: -- ELSIF p_qvev_rec.value = OKC_API.G_MISS_CHAR OR

756: -- p_qvev_rec.pqy_id IS NULL
757: -- THEN
758: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'pqy_id');
759: -- l_return_status := OKC_API.G_RET_STS_ERROR;
760: -- ELSIF p_qvev_rec.value = OKC_API.G_MISS_CHAR OR
761: -- p_qvev_rec.value IS NULL
762: -- THEN
763: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'value');
764: -- l_return_status := OKC_API.G_RET_STS_ERROR;

Line 763: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'value');

759: -- l_return_status := OKC_API.G_RET_STS_ERROR;
760: -- ELSIF p_qvev_rec.value = OKC_API.G_MISS_CHAR OR
761: -- p_qvev_rec.value IS NULL
762: -- THEN
763: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'value');
764: -- l_return_status := OKC_API.G_RET_STS_ERROR;
765: -- ELSIF p_qvev_rec.description = OKC_API.G_MISS_CHAR
766: -- THEN
767: -- OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'description');

Line 764: -- l_return_status := OKC_API.G_RET_STS_ERROR;

760: -- ELSIF p_qvev_rec.value = OKC_API.G_MISS_CHAR OR
761: -- p_qvev_rec.value IS NULL
762: -- THEN
763: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'value');
764: -- l_return_status := OKC_API.G_RET_STS_ERROR;
765: -- ELSIF p_qvev_rec.description = OKC_API.G_MISS_CHAR
766: -- THEN
767: -- OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'description');
768: -- l_return_status := OKC_API.G_RET_STS_ERROR;

Line 765: -- ELSIF p_qvev_rec.description = OKC_API.G_MISS_CHAR

761: -- p_qvev_rec.value IS NULL
762: -- THEN
763: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'value');
764: -- l_return_status := OKC_API.G_RET_STS_ERROR;
765: -- ELSIF p_qvev_rec.description = OKC_API.G_MISS_CHAR
766: -- THEN
767: -- OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'description');
768: -- l_return_status := OKC_API.G_RET_STS_ERROR;
769: -- ELSIF p_qvev_rec.from_date = OKC_API.G_MISS_DATE

Line 767: -- OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'description');

763: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'value');
764: -- l_return_status := OKC_API.G_RET_STS_ERROR;
765: -- ELSIF p_qvev_rec.description = OKC_API.G_MISS_CHAR
766: -- THEN
767: -- OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'description');
768: -- l_return_status := OKC_API.G_RET_STS_ERROR;
769: -- ELSIF p_qvev_rec.from_date = OKC_API.G_MISS_DATE
770: -- THEN
771: -- OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'from_date');

Line 768: -- l_return_status := OKC_API.G_RET_STS_ERROR;

764: -- l_return_status := OKC_API.G_RET_STS_ERROR;
765: -- ELSIF p_qvev_rec.description = OKC_API.G_MISS_CHAR
766: -- THEN
767: -- OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'description');
768: -- l_return_status := OKC_API.G_RET_STS_ERROR;
769: -- ELSIF p_qvev_rec.from_date = OKC_API.G_MISS_DATE
770: -- THEN
771: -- OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'from_date');
772: -- l_return_status := OKC_API.G_RET_STS_ERROR;

Line 769: -- ELSIF p_qvev_rec.from_date = OKC_API.G_MISS_DATE

765: -- ELSIF p_qvev_rec.description = OKC_API.G_MISS_CHAR
766: -- THEN
767: -- OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'description');
768: -- l_return_status := OKC_API.G_RET_STS_ERROR;
769: -- ELSIF p_qvev_rec.from_date = OKC_API.G_MISS_DATE
770: -- THEN
771: -- OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'from_date');
772: -- l_return_status := OKC_API.G_RET_STS_ERROR;
773: -- ELSIF p_qvev_rec.to_date = OKC_API.G_MISS_DATE

Line 771: -- OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'from_date');

767: -- OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'description');
768: -- l_return_status := OKC_API.G_RET_STS_ERROR;
769: -- ELSIF p_qvev_rec.from_date = OKC_API.G_MISS_DATE
770: -- THEN
771: -- OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'from_date');
772: -- l_return_status := OKC_API.G_RET_STS_ERROR;
773: -- ELSIF p_qvev_rec.to_date = OKC_API.G_MISS_DATE
774: -- THEN
775: -- OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'to_date');

Line 772: -- l_return_status := OKC_API.G_RET_STS_ERROR;

768: -- l_return_status := OKC_API.G_RET_STS_ERROR;
769: -- ELSIF p_qvev_rec.from_date = OKC_API.G_MISS_DATE
770: -- THEN
771: -- OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'from_date');
772: -- l_return_status := OKC_API.G_RET_STS_ERROR;
773: -- ELSIF p_qvev_rec.to_date = OKC_API.G_MISS_DATE
774: -- THEN
775: -- OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'to_date');
776: -- l_return_status := OKC_API.G_RET_STS_ERROR;

Line 773: -- ELSIF p_qvev_rec.to_date = OKC_API.G_MISS_DATE

769: -- ELSIF p_qvev_rec.from_date = OKC_API.G_MISS_DATE
770: -- THEN
771: -- OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'from_date');
772: -- l_return_status := OKC_API.G_RET_STS_ERROR;
773: -- ELSIF p_qvev_rec.to_date = OKC_API.G_MISS_DATE
774: -- THEN
775: -- OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'to_date');
776: -- l_return_status := OKC_API.G_RET_STS_ERROR;
777: -- END IF;

Line 775: -- OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'to_date');

771: -- OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'from_date');
772: -- l_return_status := OKC_API.G_RET_STS_ERROR;
773: -- ELSIF p_qvev_rec.to_date = OKC_API.G_MISS_DATE
774: -- THEN
775: -- OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'to_date');
776: -- l_return_status := OKC_API.G_RET_STS_ERROR;
777: -- END IF;
778: -- RETURN(l_return_status);
779: -- END Validate_Attributes;

Line 776: -- l_return_status := OKC_API.G_RET_STS_ERROR;

772: -- l_return_status := OKC_API.G_RET_STS_ERROR;
773: -- ELSIF p_qvev_rec.to_date = OKC_API.G_MISS_DATE
774: -- THEN
775: -- OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'to_date');
776: -- l_return_status := OKC_API.G_RET_STS_ERROR;
777: -- END IF;
778: -- RETURN(l_return_status);
779: -- END Validate_Attributes;
780:

Line 791: -- l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

787:
788: --FUNCTION Validate_Record (
789: -- p_qvev_rec IN qvev_rec_type
790: --) RETURN VARCHAR2 IS
791: -- l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
792:
793: -- RETURN (l_return_status);
794:
795: --END Validate_Record;

Line 847: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

843: -- validate_row for:OKL_PQY_VALUES_V --
844: ---------------------------------------
845: PROCEDURE validate_row(
846: p_api_version IN NUMBER,
847: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
848: x_return_status OUT NOCOPY VARCHAR2,
849: x_msg_count OUT NOCOPY NUMBER,
850: x_msg_data OUT NOCOPY VARCHAR2,
851: p_qvev_rec IN qvev_rec_type) IS

Line 855: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

851: p_qvev_rec IN qvev_rec_type) IS
852:
853: l_api_version CONSTANT NUMBER := 1;
854: l_api_name CONSTANT VARCHAR2(30) := 'V_validate_row';
855: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
856: l_qvev_rec qvev_rec_type := p_qvev_rec;
857: l_qve_rec qve_rec_type;
858: BEGIN
859: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

Line 859: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

855: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
856: l_qvev_rec qvev_rec_type := p_qvev_rec;
857: l_qve_rec qve_rec_type;
858: BEGIN
859: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
860: G_PKG_NAME,
861: p_init_msg_list,
862: l_api_version,
863: p_api_version,

Line 866: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

862: l_api_version,
863: p_api_version,
864: '_PVT',
865: x_return_status);
866: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
867: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
868: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
869: RAISE OKC_API.G_EXCEPTION_ERROR;
870: END IF;

Line 867: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

863: p_api_version,
864: '_PVT',
865: x_return_status);
866: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
867: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
868: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
869: RAISE OKC_API.G_EXCEPTION_ERROR;
870: END IF;
871: --- Validate all non-missing attributes (Item Level Validation)

Line 868: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

864: '_PVT',
865: x_return_status);
866: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
867: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
868: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
869: RAISE OKC_API.G_EXCEPTION_ERROR;
870: END IF;
871: --- Validate all non-missing attributes (Item Level Validation)
872: l_return_status := Validate_Attributes(l_qvev_rec);

Line 869: RAISE OKC_API.G_EXCEPTION_ERROR;

865: x_return_status);
866: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
867: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
868: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
869: RAISE OKC_API.G_EXCEPTION_ERROR;
870: END IF;
871: --- Validate all non-missing attributes (Item Level Validation)
872: l_return_status := Validate_Attributes(l_qvev_rec);
873: --- If any errors happen abort API

Line 874: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

870: END IF;
871: --- Validate all non-missing attributes (Item Level Validation)
872: l_return_status := Validate_Attributes(l_qvev_rec);
873: --- If any errors happen abort API
874: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
875: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
876: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
877: RAISE OKC_API.G_EXCEPTION_ERROR;
878: END IF;

Line 875: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

871: --- Validate all non-missing attributes (Item Level Validation)
872: l_return_status := Validate_Attributes(l_qvev_rec);
873: --- If any errors happen abort API
874: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
875: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
876: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
877: RAISE OKC_API.G_EXCEPTION_ERROR;
878: END IF;
879: l_return_status := Validate_Record(l_qvev_rec);

Line 876: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

872: l_return_status := Validate_Attributes(l_qvev_rec);
873: --- If any errors happen abort API
874: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
875: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
876: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
877: RAISE OKC_API.G_EXCEPTION_ERROR;
878: END IF;
879: l_return_status := Validate_Record(l_qvev_rec);
880: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 877: RAISE OKC_API.G_EXCEPTION_ERROR;

873: --- If any errors happen abort API
874: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
875: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
876: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
877: RAISE OKC_API.G_EXCEPTION_ERROR;
878: END IF;
879: l_return_status := Validate_Record(l_qvev_rec);
880: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
881: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 880: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

876: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
877: RAISE OKC_API.G_EXCEPTION_ERROR;
878: END IF;
879: l_return_status := Validate_Record(l_qvev_rec);
880: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
881: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
882: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
883: RAISE OKC_API.G_EXCEPTION_ERROR;
884: END IF;

Line 881: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

877: RAISE OKC_API.G_EXCEPTION_ERROR;
878: END IF;
879: l_return_status := Validate_Record(l_qvev_rec);
880: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
881: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
882: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
883: RAISE OKC_API.G_EXCEPTION_ERROR;
884: END IF;
885: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 882: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

878: END IF;
879: l_return_status := Validate_Record(l_qvev_rec);
880: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
881: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
882: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
883: RAISE OKC_API.G_EXCEPTION_ERROR;
884: END IF;
885: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
886: EXCEPTION

Line 883: RAISE OKC_API.G_EXCEPTION_ERROR;

879: l_return_status := Validate_Record(l_qvev_rec);
880: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
881: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
882: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
883: RAISE OKC_API.G_EXCEPTION_ERROR;
884: END IF;
885: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
886: EXCEPTION
887: WHEN OKC_API.G_EXCEPTION_ERROR THEN

Line 885: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

881: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
882: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
883: RAISE OKC_API.G_EXCEPTION_ERROR;
884: END IF;
885: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
886: EXCEPTION
887: WHEN OKC_API.G_EXCEPTION_ERROR THEN
888: x_return_status := OKC_API.HANDLE_EXCEPTIONS
889: (

Line 887: WHEN OKC_API.G_EXCEPTION_ERROR THEN

883: RAISE OKC_API.G_EXCEPTION_ERROR;
884: END IF;
885: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
886: EXCEPTION
887: WHEN OKC_API.G_EXCEPTION_ERROR THEN
888: x_return_status := OKC_API.HANDLE_EXCEPTIONS
889: (
890: l_api_name,
891: G_PKG_NAME,

Line 888: x_return_status := OKC_API.HANDLE_EXCEPTIONS

884: END IF;
885: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
886: EXCEPTION
887: WHEN OKC_API.G_EXCEPTION_ERROR THEN
888: x_return_status := OKC_API.HANDLE_EXCEPTIONS
889: (
890: l_api_name,
891: G_PKG_NAME,
892: 'OKC_API.G_RET_STS_ERROR',

Line 892: 'OKC_API.G_RET_STS_ERROR',

888: x_return_status := OKC_API.HANDLE_EXCEPTIONS
889: (
890: l_api_name,
891: G_PKG_NAME,
892: 'OKC_API.G_RET_STS_ERROR',
893: x_msg_count,
894: x_msg_data,
895: '_PVT'
896: );

Line 897: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

893: x_msg_count,
894: x_msg_data,
895: '_PVT'
896: );
897: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
898: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
899: (
900: l_api_name,
901: G_PKG_NAME,

Line 898: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

894: x_msg_data,
895: '_PVT'
896: );
897: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
898: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
899: (
900: l_api_name,
901: G_PKG_NAME,
902: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 902: 'OKC_API.G_RET_STS_UNEXP_ERROR',

898: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
899: (
900: l_api_name,
901: G_PKG_NAME,
902: 'OKC_API.G_RET_STS_UNEXP_ERROR',
903: x_msg_count,
904: x_msg_data,
905: '_PVT'
906: );

Line 908: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

904: x_msg_data,
905: '_PVT'
906: );
907: WHEN OTHERS THEN
908: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
909: (
910: l_api_name,
911: G_PKG_NAME,
912: 'OTHERS',

Line 923: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

919: -- PL/SQL TBL validate_row for:QVEV_TBL --
920: ------------------------------------------
921: PROCEDURE validate_row(
922: p_api_version IN NUMBER,
923: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
924: x_return_status OUT NOCOPY VARCHAR2,
925: x_msg_count OUT NOCOPY NUMBER,
926: x_msg_data OUT NOCOPY VARCHAR2,
927: p_qvev_tbl IN qvev_tbl_type) IS

Line 931: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

927: p_qvev_tbl IN qvev_tbl_type) IS
928:
929: l_api_version CONSTANT NUMBER := 1;
930: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
931: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
932: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS
933: i NUMBER := 0;
934: BEGIN
935: OKC_API.init_msg_list(p_init_msg_list);

Line 932: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS

928:
929: l_api_version CONSTANT NUMBER := 1;
930: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
931: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
932: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS
933: i NUMBER := 0;
934: BEGIN
935: OKC_API.init_msg_list(p_init_msg_list);
936: -- Make sure PL/SQL table has records in it before passing

Line 935: OKC_API.init_msg_list(p_init_msg_list);

931: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
932: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS
933: i NUMBER := 0;
934: BEGIN
935: OKC_API.init_msg_list(p_init_msg_list);
936: -- Make sure PL/SQL table has records in it before passing
937: IF (p_qvev_tbl.COUNT > 0) THEN
938: i := p_qvev_tbl.FIRST;
939: LOOP

Line 943: p_init_msg_list => OKC_API.G_FALSE,

939: LOOP
940: validate_row (
941: p_api_version => p_api_version,
942:
943: p_init_msg_list => OKC_API.G_FALSE,
944: x_return_status => x_return_status,
945: x_msg_count => x_msg_count,
946: x_msg_data => x_msg_data,
947: p_qvev_rec => p_qvev_tbl(i));

Line 949: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

945: x_msg_count => x_msg_count,
946: x_msg_data => x_msg_data,
947: p_qvev_rec => p_qvev_tbl(i));
948: -- TCHGS: Store the highest degree of error
949: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
950: IF l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR THEN
951: l_overall_status := x_return_status;
952: END IF;
953: END IF;

Line 950: IF l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR THEN

946: x_msg_data => x_msg_data,
947: p_qvev_rec => p_qvev_tbl(i));
948: -- TCHGS: Store the highest degree of error
949: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
950: IF l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR THEN
951: l_overall_status := x_return_status;
952: END IF;
953: END IF;
954: EXIT WHEN (i = p_qvev_tbl.LAST);

Line 961: WHEN OKC_API.G_EXCEPTION_ERROR THEN

957: --TCHGS: return overall status
958: x_return_status := l_overall_status;
959: END IF;
960: EXCEPTION
961: WHEN OKC_API.G_EXCEPTION_ERROR THEN
962: x_return_status := OKC_API.HANDLE_EXCEPTIONS
963: (
964: l_api_name,
965: G_PKG_NAME,

Line 962: x_return_status := OKC_API.HANDLE_EXCEPTIONS

958: x_return_status := l_overall_status;
959: END IF;
960: EXCEPTION
961: WHEN OKC_API.G_EXCEPTION_ERROR THEN
962: x_return_status := OKC_API.HANDLE_EXCEPTIONS
963: (
964: l_api_name,
965: G_PKG_NAME,
966: 'OKC_API.G_RET_STS_ERROR',

Line 966: 'OKC_API.G_RET_STS_ERROR',

962: x_return_status := OKC_API.HANDLE_EXCEPTIONS
963: (
964: l_api_name,
965: G_PKG_NAME,
966: 'OKC_API.G_RET_STS_ERROR',
967: x_msg_count,
968: x_msg_data,
969: '_PVT'
970: );

Line 971: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

967: x_msg_count,
968: x_msg_data,
969: '_PVT'
970: );
971: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
972: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
973: (
974: l_api_name,
975: G_PKG_NAME,

Line 972: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

968: x_msg_data,
969: '_PVT'
970: );
971: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
972: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
973: (
974: l_api_name,
975: G_PKG_NAME,
976: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 976: 'OKC_API.G_RET_STS_UNEXP_ERROR',

972: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
973: (
974: l_api_name,
975: G_PKG_NAME,
976: 'OKC_API.G_RET_STS_UNEXP_ERROR',
977: x_msg_count,
978: x_msg_data,
979: '_PVT'
980: );

Line 982: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

978: x_msg_data,
979: '_PVT'
980: );
981: WHEN OTHERS THEN
982: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
983: (
984: l_api_name,
985: G_PKG_NAME,
986: 'OTHERS',

Line 1000: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

996: -----------------------------------
997: -- insert_row for:OKL_PQY_VALUES --
998: -----------------------------------
999: PROCEDURE insert_row(
1000: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1001: x_return_status OUT NOCOPY VARCHAR2,
1002: x_msg_count OUT NOCOPY NUMBER,
1003: x_msg_data OUT NOCOPY VARCHAR2,
1004: p_qve_rec IN qve_rec_type,

Line 1009: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1005: x_qve_rec OUT NOCOPY qve_rec_type) IS
1006:
1007: l_api_version CONSTANT NUMBER := 1;
1008: l_api_name CONSTANT VARCHAR2(30) := 'VALUES_insert_row';
1009: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1010: l_qve_rec qve_rec_type := p_qve_rec;
1011: l_def_qve_rec qve_rec_type;
1012: ---------------------------------------
1013: -- Set_Attributes for:OKL_PQY_VALUES --

Line 1019: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1015: FUNCTION Set_Attributes (
1016: p_qve_rec IN qve_rec_type,
1017: x_qve_rec OUT NOCOPY qve_rec_type
1018: ) RETURN VARCHAR2 IS
1019: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1020: BEGIN
1021: x_qve_rec := p_qve_rec;
1022: RETURN(l_return_status);
1023: END Set_Attributes;

Line 1025: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1021: x_qve_rec := p_qve_rec;
1022: RETURN(l_return_status);
1023: END Set_Attributes;
1024: BEGIN
1025: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1026: p_init_msg_list,
1027: '_PVT',
1028: x_return_status);
1029: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1029: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1025: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1026: p_init_msg_list,
1027: '_PVT',
1028: x_return_status);
1029: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1030: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1031: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1032: RAISE OKC_API.G_EXCEPTION_ERROR;
1033: END IF;

Line 1030: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1026: p_init_msg_list,
1027: '_PVT',
1028: x_return_status);
1029: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1030: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1031: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1032: RAISE OKC_API.G_EXCEPTION_ERROR;
1033: END IF;
1034: --- Setting item attributes

Line 1031: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1027: '_PVT',
1028: x_return_status);
1029: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1030: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1031: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1032: RAISE OKC_API.G_EXCEPTION_ERROR;
1033: END IF;
1034: --- Setting item attributes
1035: l_return_status := Set_Attributes(

Line 1032: RAISE OKC_API.G_EXCEPTION_ERROR;

1028: x_return_status);
1029: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1030: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1031: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1032: RAISE OKC_API.G_EXCEPTION_ERROR;
1033: END IF;
1034: --- Setting item attributes
1035: l_return_status := Set_Attributes(
1036: p_qve_rec, -- IN

Line 1039: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1035: l_return_status := Set_Attributes(
1036: p_qve_rec, -- IN
1037: l_qve_rec); -- OUT
1038: --- If any errors happen abort API
1039: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1040: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1041: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1042:
1043: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1040: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1036: p_qve_rec, -- IN
1037: l_qve_rec); -- OUT
1038: --- If any errors happen abort API
1039: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1040: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1041: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1042:
1043: RAISE OKC_API.G_EXCEPTION_ERROR;
1044: END IF;

Line 1041: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1037: l_qve_rec); -- OUT
1038: --- If any errors happen abort API
1039: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1040: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1041: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1042:
1043: RAISE OKC_API.G_EXCEPTION_ERROR;
1044: END IF;
1045: INSERT INTO OKL_PQY_VALUES(

Line 1043: RAISE OKC_API.G_EXCEPTION_ERROR;

1039: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1040: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1041: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1042:
1043: RAISE OKC_API.G_EXCEPTION_ERROR;
1044: END IF;
1045: INSERT INTO OKL_PQY_VALUES(
1046: id,
1047: value,

Line 1073: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1069: l_qve_rec.last_update_date,
1070: l_qve_rec.last_update_login);
1071: -- Set OUT values
1072: x_qve_rec := l_qve_rec;
1073: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1074: EXCEPTION
1075: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1076: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1077: (

Line 1075: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1071: -- Set OUT values
1072: x_qve_rec := l_qve_rec;
1073: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1074: EXCEPTION
1075: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1076: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1077: (
1078: l_api_name,
1079: G_PKG_NAME,

Line 1076: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1072: x_qve_rec := l_qve_rec;
1073: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1074: EXCEPTION
1075: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1076: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1077: (
1078: l_api_name,
1079: G_PKG_NAME,
1080: 'OKC_API.G_RET_STS_ERROR',

Line 1080: 'OKC_API.G_RET_STS_ERROR',

1076: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1077: (
1078: l_api_name,
1079: G_PKG_NAME,
1080: 'OKC_API.G_RET_STS_ERROR',
1081: x_msg_count,
1082: x_msg_data,
1083: '_PVT'
1084: );

Line 1085: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1081: x_msg_count,
1082: x_msg_data,
1083: '_PVT'
1084: );
1085: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1086: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1087: (
1088: l_api_name,
1089: G_PKG_NAME,

Line 1086: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1082: x_msg_data,
1083: '_PVT'
1084: );
1085: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1086: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1087: (
1088: l_api_name,
1089: G_PKG_NAME,
1090: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1090: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1086: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1087: (
1088: l_api_name,
1089: G_PKG_NAME,
1090: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1091: x_msg_count,
1092: x_msg_data,
1093: '_PVT'
1094: );

Line 1096: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1092: x_msg_data,
1093: '_PVT'
1094: );
1095: WHEN OTHERS THEN
1096: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1097: (
1098: l_api_name,
1099: G_PKG_NAME,
1100: 'OTHERS',

Line 1111: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1107: -- insert_row for:OKL_PQY_VALUES_V --
1108: -------------------------------------
1109: PROCEDURE insert_row(
1110: p_api_version IN NUMBER,
1111: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1112: x_return_status OUT NOCOPY VARCHAR2,
1113: x_msg_count OUT NOCOPY NUMBER,
1114: x_msg_data OUT NOCOPY VARCHAR2,
1115: p_qvev_rec IN qvev_rec_type,

Line 1120: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1116: x_qvev_rec OUT NOCOPY qvev_rec_type) IS
1117:
1118: l_api_version CONSTANT NUMBER := 1;
1119: l_api_name CONSTANT VARCHAR2(30) := 'V_insert_row';
1120: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1121: l_qvev_rec qvev_rec_type;
1122: l_def_qvev_rec qvev_rec_type;
1123: l_qve_rec qve_rec_type;
1124: lx_qve_rec qve_rec_type;

Line 1148: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1144: FUNCTION Set_Attributes (
1145: p_qvev_rec IN qvev_rec_type,
1146: x_qvev_rec OUT NOCOPY qvev_rec_type
1147: ) RETURN VARCHAR2 IS
1148: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1149: BEGIN
1150: x_qvev_rec := p_qvev_rec;
1151: x_qvev_rec.OBJECT_VERSION_NUMBER := 1;
1152: RETURN(l_return_status);

Line 1155: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1151: x_qvev_rec.OBJECT_VERSION_NUMBER := 1;
1152: RETURN(l_return_status);
1153: END Set_Attributes;
1154: BEGIN
1155: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1156: G_PKG_NAME,
1157: p_init_msg_list,
1158: l_api_version,
1159: p_api_version,

Line 1162: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1158: l_api_version,
1159: p_api_version,
1160: '_PVT',
1161: x_return_status);
1162: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1163: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1164: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1165: RAISE OKC_API.G_EXCEPTION_ERROR;
1166: END IF;

Line 1163: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1159: p_api_version,
1160: '_PVT',
1161: x_return_status);
1162: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1163: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1164: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1165: RAISE OKC_API.G_EXCEPTION_ERROR;
1166: END IF;
1167: l_qvev_rec := null_out_defaults(p_qvev_rec);

Line 1164: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1160: '_PVT',
1161: x_return_status);
1162: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1163: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1164: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1165: RAISE OKC_API.G_EXCEPTION_ERROR;
1166: END IF;
1167: l_qvev_rec := null_out_defaults(p_qvev_rec);
1168: -- Set primary key value

Line 1165: RAISE OKC_API.G_EXCEPTION_ERROR;

1161: x_return_status);
1162: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1163: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1164: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1165: RAISE OKC_API.G_EXCEPTION_ERROR;
1166: END IF;
1167: l_qvev_rec := null_out_defaults(p_qvev_rec);
1168: -- Set primary key value
1169: l_qvev_rec.ID := get_seq_id;

Line 1175: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1171: l_return_status := Set_Attributes(
1172: l_qvev_rec, -- IN
1173: l_def_qvev_rec); -- OUT
1174: --- If any errors happen abort API
1175: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1176: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1177: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1178: RAISE OKC_API.G_EXCEPTION_ERROR;
1179: END IF;

Line 1176: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1172: l_qvev_rec, -- IN
1173: l_def_qvev_rec); -- OUT
1174: --- If any errors happen abort API
1175: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1176: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1177: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1178: RAISE OKC_API.G_EXCEPTION_ERROR;
1179: END IF;
1180: l_def_qvev_rec := fill_who_columns(l_def_qvev_rec);

Line 1177: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1173: l_def_qvev_rec); -- OUT
1174: --- If any errors happen abort API
1175: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1176: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1177: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1178: RAISE OKC_API.G_EXCEPTION_ERROR;
1179: END IF;
1180: l_def_qvev_rec := fill_who_columns(l_def_qvev_rec);
1181: --- Validate all non-missing attributes (Item Level Validation)

Line 1178: RAISE OKC_API.G_EXCEPTION_ERROR;

1174: --- If any errors happen abort API
1175: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1176: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1177: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1178: RAISE OKC_API.G_EXCEPTION_ERROR;
1179: END IF;
1180: l_def_qvev_rec := fill_who_columns(l_def_qvev_rec);
1181: --- Validate all non-missing attributes (Item Level Validation)
1182: l_return_status := Validate_Attributes(l_def_qvev_rec);

Line 1184: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1180: l_def_qvev_rec := fill_who_columns(l_def_qvev_rec);
1181: --- Validate all non-missing attributes (Item Level Validation)
1182: l_return_status := Validate_Attributes(l_def_qvev_rec);
1183: --- If any errors happen abort API
1184: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1185: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1186: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1187: RAISE OKC_API.G_EXCEPTION_ERROR;
1188: END IF;

Line 1185: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1181: --- Validate all non-missing attributes (Item Level Validation)
1182: l_return_status := Validate_Attributes(l_def_qvev_rec);
1183: --- If any errors happen abort API
1184: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1185: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1186: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1187: RAISE OKC_API.G_EXCEPTION_ERROR;
1188: END IF;
1189: l_return_status := Validate_Record(l_def_qvev_rec);

Line 1186: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1182: l_return_status := Validate_Attributes(l_def_qvev_rec);
1183: --- If any errors happen abort API
1184: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1185: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1186: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1187: RAISE OKC_API.G_EXCEPTION_ERROR;
1188: END IF;
1189: l_return_status := Validate_Record(l_def_qvev_rec);
1190: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1187: RAISE OKC_API.G_EXCEPTION_ERROR;

1183: --- If any errors happen abort API
1184: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1185: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1186: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1187: RAISE OKC_API.G_EXCEPTION_ERROR;
1188: END IF;
1189: l_return_status := Validate_Record(l_def_qvev_rec);
1190: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1191: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1190: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1186: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1187: RAISE OKC_API.G_EXCEPTION_ERROR;
1188: END IF;
1189: l_return_status := Validate_Record(l_def_qvev_rec);
1190: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1191: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1192: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1193: RAISE OKC_API.G_EXCEPTION_ERROR;
1194: END IF;

Line 1191: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1187: RAISE OKC_API.G_EXCEPTION_ERROR;
1188: END IF;
1189: l_return_status := Validate_Record(l_def_qvev_rec);
1190: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1191: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1192: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1193: RAISE OKC_API.G_EXCEPTION_ERROR;
1194: END IF;
1195: --------------------------------------

Line 1192: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1188: END IF;
1189: l_return_status := Validate_Record(l_def_qvev_rec);
1190: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1191: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1192: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1193: RAISE OKC_API.G_EXCEPTION_ERROR;
1194: END IF;
1195: --------------------------------------
1196: -- Move VIEW record to "Child" records

Line 1193: RAISE OKC_API.G_EXCEPTION_ERROR;

1189: l_return_status := Validate_Record(l_def_qvev_rec);
1190: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1191: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1192: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1193: RAISE OKC_API.G_EXCEPTION_ERROR;
1194: END IF;
1195: --------------------------------------
1196: -- Move VIEW record to "Child" records
1197: --------------------------------------

Line 1210: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1206: x_msg_data,
1207: l_qve_rec,
1208: lx_qve_rec
1209: );
1210: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1211: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1212: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1213: RAISE OKC_API.G_EXCEPTION_ERROR;
1214: END IF;

Line 1211: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1207: l_qve_rec,
1208: lx_qve_rec
1209: );
1210: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1211: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1212: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1213: RAISE OKC_API.G_EXCEPTION_ERROR;
1214: END IF;
1215: migrate(lx_qve_rec, l_def_qvev_rec);

Line 1212: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

1208: lx_qve_rec
1209: );
1210: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1211: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1212: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1213: RAISE OKC_API.G_EXCEPTION_ERROR;
1214: END IF;
1215: migrate(lx_qve_rec, l_def_qvev_rec);
1216: -- Set OUT values

Line 1213: RAISE OKC_API.G_EXCEPTION_ERROR;

1209: );
1210: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1211: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1212: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1213: RAISE OKC_API.G_EXCEPTION_ERROR;
1214: END IF;
1215: migrate(lx_qve_rec, l_def_qvev_rec);
1216: -- Set OUT values
1217: x_qvev_rec := l_def_qvev_rec;

Line 1218: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1214: END IF;
1215: migrate(lx_qve_rec, l_def_qvev_rec);
1216: -- Set OUT values
1217: x_qvev_rec := l_def_qvev_rec;
1218: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1219: EXCEPTION
1220: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1221: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1222: (

Line 1220: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1216: -- Set OUT values
1217: x_qvev_rec := l_def_qvev_rec;
1218: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1219: EXCEPTION
1220: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1221: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1222: (
1223: l_api_name,
1224: G_PKG_NAME,

Line 1221: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1217: x_qvev_rec := l_def_qvev_rec;
1218: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1219: EXCEPTION
1220: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1221: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1222: (
1223: l_api_name,
1224: G_PKG_NAME,
1225: 'OKC_API.G_RET_STS_ERROR',

Line 1225: 'OKC_API.G_RET_STS_ERROR',

1221: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1222: (
1223: l_api_name,
1224: G_PKG_NAME,
1225: 'OKC_API.G_RET_STS_ERROR',
1226: x_msg_count,
1227: x_msg_data,
1228: '_PVT'
1229: );

Line 1230: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1226: x_msg_count,
1227: x_msg_data,
1228: '_PVT'
1229: );
1230: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1231: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1232: (
1233: l_api_name,
1234: G_PKG_NAME,

Line 1231: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1227: x_msg_data,
1228: '_PVT'
1229: );
1230: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1231: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1232: (
1233: l_api_name,
1234: G_PKG_NAME,
1235: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1235: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1231: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1232: (
1233: l_api_name,
1234: G_PKG_NAME,
1235: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1236: x_msg_count,
1237: x_msg_data,
1238: '_PVT'
1239: );

Line 1241: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1237: x_msg_data,
1238: '_PVT'
1239: );
1240: WHEN OTHERS THEN
1241: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1242:
1243: (
1244: l_api_name,
1245: G_PKG_NAME,

Line 1257: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1253: -- PL/SQL TBL insert_row for:QVEV_TBL --
1254: ----------------------------------------
1255: PROCEDURE insert_row(
1256: p_api_version IN NUMBER,
1257: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1258: x_return_status OUT NOCOPY VARCHAR2,
1259: x_msg_count OUT NOCOPY NUMBER,
1260: x_msg_data OUT NOCOPY VARCHAR2,
1261: p_qvev_tbl IN qvev_tbl_type,

Line 1266: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1262: x_qvev_tbl OUT NOCOPY qvev_tbl_type) IS
1263:
1264: l_api_version CONSTANT NUMBER := 1;
1265: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
1266: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1267: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS
1268: i NUMBER := 0;
1269: BEGIN
1270: OKC_API.init_msg_list(p_init_msg_list);

Line 1267: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS

1263:
1264: l_api_version CONSTANT NUMBER := 1;
1265: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
1266: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1267: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS
1268: i NUMBER := 0;
1269: BEGIN
1270: OKC_API.init_msg_list(p_init_msg_list);
1271: -- Make sure PL/SQL table has records in it before passing

Line 1270: OKC_API.init_msg_list(p_init_msg_list);

1266: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1267: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS
1268: i NUMBER := 0;
1269: BEGIN
1270: OKC_API.init_msg_list(p_init_msg_list);
1271: -- Make sure PL/SQL table has records in it before passing
1272: IF (p_qvev_tbl.COUNT > 0) THEN
1273: i := p_qvev_tbl.FIRST;
1274: LOOP

Line 1277: p_init_msg_list => OKC_API.G_FALSE,

1273: i := p_qvev_tbl.FIRST;
1274: LOOP
1275: insert_row (
1276: p_api_version => p_api_version,
1277: p_init_msg_list => OKC_API.G_FALSE,
1278: x_return_status => x_return_status,
1279: x_msg_count => x_msg_count,
1280: x_msg_data => x_msg_data,
1281: p_qvev_rec => p_qvev_tbl(i),

Line 1284: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

1280: x_msg_data => x_msg_data,
1281: p_qvev_rec => p_qvev_tbl(i),
1282: x_qvev_rec => x_qvev_tbl(i));
1283: -- TCHGS: Store the highest degree of error
1284: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1285: IF l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR THEN
1286: l_overall_status := x_return_status;
1287: END IF;
1288: END IF;

Line 1285: IF l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR THEN

1281: p_qvev_rec => p_qvev_tbl(i),
1282: x_qvev_rec => x_qvev_tbl(i));
1283: -- TCHGS: Store the highest degree of error
1284: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1285: IF l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR THEN
1286: l_overall_status := x_return_status;
1287: END IF;
1288: END IF;
1289: EXIT WHEN (i = p_qvev_tbl.LAST);

Line 1296: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1292: --TCHGS: return overall status
1293: x_return_status := l_overall_status;
1294: END IF;
1295: EXCEPTION
1296: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1297: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1298: (
1299: l_api_name,
1300: G_PKG_NAME,

Line 1297: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1293: x_return_status := l_overall_status;
1294: END IF;
1295: EXCEPTION
1296: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1297: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1298: (
1299: l_api_name,
1300: G_PKG_NAME,
1301: 'OKC_API.G_RET_STS_ERROR',

Line 1301: 'OKC_API.G_RET_STS_ERROR',

1297: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1298: (
1299: l_api_name,
1300: G_PKG_NAME,
1301: 'OKC_API.G_RET_STS_ERROR',
1302: x_msg_count,
1303: x_msg_data,
1304: '_PVT'
1305: );

Line 1306: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1302: x_msg_count,
1303: x_msg_data,
1304: '_PVT'
1305: );
1306: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1307: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1308: (
1309: l_api_name,
1310: G_PKG_NAME,

Line 1307: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1303: x_msg_data,
1304: '_PVT'
1305: );
1306: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1307: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1308: (
1309: l_api_name,
1310: G_PKG_NAME,
1311: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1311: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1307: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1308: (
1309: l_api_name,
1310: G_PKG_NAME,
1311: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1312: x_msg_count,
1313: x_msg_data,
1314: '_PVT'
1315: );

Line 1317: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1313: x_msg_data,
1314: '_PVT'
1315: );
1316: WHEN OTHERS THEN
1317: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1318: (
1319: l_api_name,
1320: G_PKG_NAME,
1321: 'OTHERS',

Line 1335: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1331: ---------------------------------
1332: -- lock_row for:OKL_PQY_VALUES --
1333: ---------------------------------
1334: PROCEDURE lock_row(
1335: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1336: x_return_status OUT NOCOPY VARCHAR2,
1337: x_msg_count OUT NOCOPY NUMBER,
1338: x_msg_data OUT NOCOPY VARCHAR2,
1339: p_qve_rec IN qve_rec_type) IS

Line 1357: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1353: FROM OKL_PQY_VALUES
1354: WHERE ID = p_qve_rec.id;
1355: l_api_version CONSTANT NUMBER := 1;
1356: l_api_name CONSTANT VARCHAR2(30) := 'VALUES_lock_row';
1357: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1358: l_object_version_number OKL_PQY_VALUES.OBJECT_VERSION_NUMBER%TYPE;
1359: lc_object_version_number OKL_PQY_VALUES.OBJECT_VERSION_NUMBER%TYPE;
1360: l_row_notfound BOOLEAN := FALSE;
1361: lc_row_notfound BOOLEAN := FALSE;

Line 1363: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1359: lc_object_version_number OKL_PQY_VALUES.OBJECT_VERSION_NUMBER%TYPE;
1360: l_row_notfound BOOLEAN := FALSE;
1361: lc_row_notfound BOOLEAN := FALSE;
1362: BEGIN
1363: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1364: p_init_msg_list,
1365: '_PVT',
1366: x_return_status);
1367: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1367: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1363: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1364: p_init_msg_list,
1365: '_PVT',
1366: x_return_status);
1367: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1368: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1369: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1370: RAISE OKC_API.G_EXCEPTION_ERROR;
1371: END IF;

Line 1368: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1364: p_init_msg_list,
1365: '_PVT',
1366: x_return_status);
1367: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1368: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1369: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1370: RAISE OKC_API.G_EXCEPTION_ERROR;
1371: END IF;
1372: BEGIN

Line 1369: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1365: '_PVT',
1366: x_return_status);
1367: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1368: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1369: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1370: RAISE OKC_API.G_EXCEPTION_ERROR;
1371: END IF;
1372: BEGIN
1373: OPEN lock_csr(p_qve_rec);

Line 1370: RAISE OKC_API.G_EXCEPTION_ERROR;

1366: x_return_status);
1367: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1368: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1369: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1370: RAISE OKC_API.G_EXCEPTION_ERROR;
1371: END IF;
1372: BEGIN
1373: OPEN lock_csr(p_qve_rec);
1374: FETCH lock_csr INTO l_object_version_number;

Line 1382: OKC_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);

1378: WHEN E_Resource_Busy THEN
1379: IF (lock_csr%ISOPEN) THEN
1380: CLOSE lock_csr;
1381: END IF;
1382: OKC_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);
1383: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
1384: END;
1385:
1386: IF ( l_row_notfound ) THEN

Line 1393: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);

1389: lc_row_notfound := lchk_csr%NOTFOUND;
1390: CLOSE lchk_csr;
1391: END IF;
1392: IF (lc_row_notfound) THEN
1393: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1394: RAISE OKC_API.G_EXCEPTION_ERROR;
1395: ELSIF lc_object_version_number > p_qve_rec.object_version_number THEN
1396: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1397: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1394: RAISE OKC_API.G_EXCEPTION_ERROR;

1390: CLOSE lchk_csr;
1391: END IF;
1392: IF (lc_row_notfound) THEN
1393: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1394: RAISE OKC_API.G_EXCEPTION_ERROR;
1395: ELSIF lc_object_version_number > p_qve_rec.object_version_number THEN
1396: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1397: RAISE OKC_API.G_EXCEPTION_ERROR;
1398: ELSIF lc_object_version_number <> p_qve_rec.object_version_number THEN

Line 1396: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);

1392: IF (lc_row_notfound) THEN
1393: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1394: RAISE OKC_API.G_EXCEPTION_ERROR;
1395: ELSIF lc_object_version_number > p_qve_rec.object_version_number THEN
1396: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1397: RAISE OKC_API.G_EXCEPTION_ERROR;
1398: ELSIF lc_object_version_number <> p_qve_rec.object_version_number THEN
1399: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1400: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1397: RAISE OKC_API.G_EXCEPTION_ERROR;

1393: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1394: RAISE OKC_API.G_EXCEPTION_ERROR;
1395: ELSIF lc_object_version_number > p_qve_rec.object_version_number THEN
1396: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1397: RAISE OKC_API.G_EXCEPTION_ERROR;
1398: ELSIF lc_object_version_number <> p_qve_rec.object_version_number THEN
1399: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1400: RAISE OKC_API.G_EXCEPTION_ERROR;
1401: ELSIF lc_object_version_number = -1 THEN

Line 1399: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);

1395: ELSIF lc_object_version_number > p_qve_rec.object_version_number THEN
1396: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1397: RAISE OKC_API.G_EXCEPTION_ERROR;
1398: ELSIF lc_object_version_number <> p_qve_rec.object_version_number THEN
1399: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1400: RAISE OKC_API.G_EXCEPTION_ERROR;
1401: ELSIF lc_object_version_number = -1 THEN
1402: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1403: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1400: RAISE OKC_API.G_EXCEPTION_ERROR;

1396: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1397: RAISE OKC_API.G_EXCEPTION_ERROR;
1398: ELSIF lc_object_version_number <> p_qve_rec.object_version_number THEN
1399: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1400: RAISE OKC_API.G_EXCEPTION_ERROR;
1401: ELSIF lc_object_version_number = -1 THEN
1402: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1403: RAISE OKC_API.G_EXCEPTION_ERROR;
1404: END IF;

Line 1402: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);

1398: ELSIF lc_object_version_number <> p_qve_rec.object_version_number THEN
1399: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1400: RAISE OKC_API.G_EXCEPTION_ERROR;
1401: ELSIF lc_object_version_number = -1 THEN
1402: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1403: RAISE OKC_API.G_EXCEPTION_ERROR;
1404: END IF;
1405: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1406: EXCEPTION

Line 1403: RAISE OKC_API.G_EXCEPTION_ERROR;

1399: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1400: RAISE OKC_API.G_EXCEPTION_ERROR;
1401: ELSIF lc_object_version_number = -1 THEN
1402: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1403: RAISE OKC_API.G_EXCEPTION_ERROR;
1404: END IF;
1405: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1406: EXCEPTION
1407: WHEN OKC_API.G_EXCEPTION_ERROR THEN

Line 1405: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1401: ELSIF lc_object_version_number = -1 THEN
1402: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1403: RAISE OKC_API.G_EXCEPTION_ERROR;
1404: END IF;
1405: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1406: EXCEPTION
1407: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1408: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1409: (

Line 1407: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1403: RAISE OKC_API.G_EXCEPTION_ERROR;
1404: END IF;
1405: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1406: EXCEPTION
1407: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1408: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1409: (
1410: l_api_name,
1411: G_PKG_NAME,

Line 1408: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1404: END IF;
1405: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1406: EXCEPTION
1407: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1408: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1409: (
1410: l_api_name,
1411: G_PKG_NAME,
1412: 'OKC_API.G_RET_STS_ERROR',

Line 1412: 'OKC_API.G_RET_STS_ERROR',

1408: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1409: (
1410: l_api_name,
1411: G_PKG_NAME,
1412: 'OKC_API.G_RET_STS_ERROR',
1413: x_msg_count,
1414: x_msg_data,
1415: '_PVT'
1416: );

Line 1417: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1413: x_msg_count,
1414: x_msg_data,
1415: '_PVT'
1416: );
1417: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1418: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1419: (
1420: l_api_name,
1421: G_PKG_NAME,

Line 1418: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1414: x_msg_data,
1415: '_PVT'
1416: );
1417: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1418: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1419: (
1420: l_api_name,
1421: G_PKG_NAME,
1422: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1422: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1418: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1419: (
1420: l_api_name,
1421: G_PKG_NAME,
1422: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1423: x_msg_count,
1424: x_msg_data,
1425: '_PVT'
1426: );

Line 1428: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1424: x_msg_data,
1425: '_PVT'
1426: );
1427: WHEN OTHERS THEN
1428: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1429: (
1430: l_api_name,
1431: G_PKG_NAME,
1432: 'OTHERS',

Line 1444: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1440: -----------------------------------
1441: PROCEDURE lock_row(
1442:
1443: p_api_version IN NUMBER,
1444: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1445: x_return_status OUT NOCOPY VARCHAR2,
1446: x_msg_count OUT NOCOPY NUMBER,
1447: x_msg_data OUT NOCOPY VARCHAR2,
1448: p_qvev_rec IN qvev_rec_type) IS

Line 1452: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1448: p_qvev_rec IN qvev_rec_type) IS
1449:
1450: l_api_version CONSTANT NUMBER := 1;
1451: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
1452: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1453: l_qve_rec qve_rec_type;
1454: BEGIN
1455: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1456: G_PKG_NAME,

Line 1455: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1451: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
1452: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1453: l_qve_rec qve_rec_type;
1454: BEGIN
1455: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1456: G_PKG_NAME,
1457: p_init_msg_list,
1458: l_api_version,
1459: p_api_version,

Line 1462: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1458: l_api_version,
1459: p_api_version,
1460: '_PVT',
1461: x_return_status);
1462: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1463: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1464: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1465: RAISE OKC_API.G_EXCEPTION_ERROR;
1466: END IF;

Line 1463: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1459: p_api_version,
1460: '_PVT',
1461: x_return_status);
1462: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1463: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1464: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1465: RAISE OKC_API.G_EXCEPTION_ERROR;
1466: END IF;
1467: --------------------------------------

Line 1464: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1460: '_PVT',
1461: x_return_status);
1462: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1463: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1464: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1465: RAISE OKC_API.G_EXCEPTION_ERROR;
1466: END IF;
1467: --------------------------------------
1468: -- Move VIEW record to "Child" records

Line 1465: RAISE OKC_API.G_EXCEPTION_ERROR;

1461: x_return_status);
1462: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1463: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1464: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1465: RAISE OKC_API.G_EXCEPTION_ERROR;
1466: END IF;
1467: --------------------------------------
1468: -- Move VIEW record to "Child" records
1469: --------------------------------------

Line 1481: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1477: x_msg_count,
1478: x_msg_data,
1479: l_qve_rec
1480: );
1481: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1482: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1483: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1484: RAISE OKC_API.G_EXCEPTION_ERROR;
1485: END IF;

Line 1482: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1478: x_msg_data,
1479: l_qve_rec
1480: );
1481: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1482: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1483: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1484: RAISE OKC_API.G_EXCEPTION_ERROR;
1485: END IF;
1486: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 1483: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

1479: l_qve_rec
1480: );
1481: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1482: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1483: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1484: RAISE OKC_API.G_EXCEPTION_ERROR;
1485: END IF;
1486: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1487: EXCEPTION

Line 1484: RAISE OKC_API.G_EXCEPTION_ERROR;

1480: );
1481: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1482: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1483: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1484: RAISE OKC_API.G_EXCEPTION_ERROR;
1485: END IF;
1486: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1487: EXCEPTION
1488: WHEN OKC_API.G_EXCEPTION_ERROR THEN

Line 1486: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1482: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1483: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1484: RAISE OKC_API.G_EXCEPTION_ERROR;
1485: END IF;
1486: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1487: EXCEPTION
1488: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1489: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1490: (

Line 1488: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1484: RAISE OKC_API.G_EXCEPTION_ERROR;
1485: END IF;
1486: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1487: EXCEPTION
1488: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1489: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1490: (
1491: l_api_name,
1492: G_PKG_NAME,

Line 1489: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1485: END IF;
1486: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1487: EXCEPTION
1488: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1489: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1490: (
1491: l_api_name,
1492: G_PKG_NAME,
1493: 'OKC_API.G_RET_STS_ERROR',

Line 1493: 'OKC_API.G_RET_STS_ERROR',

1489: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1490: (
1491: l_api_name,
1492: G_PKG_NAME,
1493: 'OKC_API.G_RET_STS_ERROR',
1494: x_msg_count,
1495: x_msg_data,
1496: '_PVT'
1497: );

Line 1498: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1494: x_msg_count,
1495: x_msg_data,
1496: '_PVT'
1497: );
1498: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1499: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1500: (
1501: l_api_name,
1502: G_PKG_NAME,

Line 1499: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1495: x_msg_data,
1496: '_PVT'
1497: );
1498: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1499: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1500: (
1501: l_api_name,
1502: G_PKG_NAME,
1503: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1503: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1499: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1500: (
1501: l_api_name,
1502: G_PKG_NAME,
1503: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1504: x_msg_count,
1505: x_msg_data,
1506: '_PVT'
1507: );

Line 1509: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1505: x_msg_data,
1506: '_PVT'
1507: );
1508: WHEN OTHERS THEN
1509: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1510: (
1511: l_api_name,
1512: G_PKG_NAME,
1513: 'OTHERS',

Line 1524: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1520: -- PL/SQL TBL lock_row for:QVEV_TBL --
1521: --------------------------------------
1522: PROCEDURE lock_row(
1523: p_api_version IN NUMBER,
1524: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1525: x_return_status OUT NOCOPY VARCHAR2,
1526: x_msg_count OUT NOCOPY NUMBER,
1527: x_msg_data OUT NOCOPY VARCHAR2,
1528: p_qvev_tbl IN qvev_tbl_type) IS

Line 1532: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1528: p_qvev_tbl IN qvev_tbl_type) IS
1529:
1530: l_api_version CONSTANT NUMBER := 1;
1531: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
1532: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1533: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS
1534: i NUMBER := 0;
1535: BEGIN
1536: OKC_API.init_msg_list(p_init_msg_list);

Line 1533: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS

1529:
1530: l_api_version CONSTANT NUMBER := 1;
1531: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
1532: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1533: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS
1534: i NUMBER := 0;
1535: BEGIN
1536: OKC_API.init_msg_list(p_init_msg_list);
1537: -- Make sure PL/SQL table has records in it before passing

Line 1536: OKC_API.init_msg_list(p_init_msg_list);

1532: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1533: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS
1534: i NUMBER := 0;
1535: BEGIN
1536: OKC_API.init_msg_list(p_init_msg_list);
1537: -- Make sure PL/SQL table has records in it before passing
1538: IF (p_qvev_tbl.COUNT > 0) THEN
1539: i := p_qvev_tbl.FIRST;
1540: LOOP

Line 1544: p_init_msg_list => OKC_API.G_FALSE,

1540: LOOP
1541: lock_row (
1542:
1543: p_api_version => p_api_version,
1544: p_init_msg_list => OKC_API.G_FALSE,
1545: x_return_status => x_return_status,
1546: x_msg_count => x_msg_count,
1547: x_msg_data => x_msg_data,
1548: p_qvev_rec => p_qvev_tbl(i));

Line 1550: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

1546: x_msg_count => x_msg_count,
1547: x_msg_data => x_msg_data,
1548: p_qvev_rec => p_qvev_tbl(i));
1549: -- TCHGS: Store the highest degree of error
1550: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1551: IF l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR THEN
1552: l_overall_status := x_return_status;
1553: END IF;
1554: END IF;

Line 1551: IF l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR THEN

1547: x_msg_data => x_msg_data,
1548: p_qvev_rec => p_qvev_tbl(i));
1549: -- TCHGS: Store the highest degree of error
1550: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1551: IF l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR THEN
1552: l_overall_status := x_return_status;
1553: END IF;
1554: END IF;
1555: EXIT WHEN (i = p_qvev_tbl.LAST);

Line 1562: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1558: --TCHGS: return overall status
1559: x_return_status := l_overall_status;
1560: END IF;
1561: EXCEPTION
1562: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1563: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1564: (
1565: l_api_name,
1566: G_PKG_NAME,

Line 1563: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1559: x_return_status := l_overall_status;
1560: END IF;
1561: EXCEPTION
1562: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1563: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1564: (
1565: l_api_name,
1566: G_PKG_NAME,
1567: 'OKC_API.G_RET_STS_ERROR',

Line 1567: 'OKC_API.G_RET_STS_ERROR',

1563: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1564: (
1565: l_api_name,
1566: G_PKG_NAME,
1567: 'OKC_API.G_RET_STS_ERROR',
1568: x_msg_count,
1569: x_msg_data,
1570: '_PVT'
1571: );

Line 1572: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1568: x_msg_count,
1569: x_msg_data,
1570: '_PVT'
1571: );
1572: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1573: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1574: (
1575: l_api_name,
1576: G_PKG_NAME,

Line 1573: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1569: x_msg_data,
1570: '_PVT'
1571: );
1572: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1573: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1574: (
1575: l_api_name,
1576: G_PKG_NAME,
1577: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1577: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1573: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1574: (
1575: l_api_name,
1576: G_PKG_NAME,
1577: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1578: x_msg_count,
1579: x_msg_data,
1580: '_PVT'
1581: );

Line 1583: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1579: x_msg_data,
1580: '_PVT'
1581: );
1582: WHEN OTHERS THEN
1583: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1584: (
1585: l_api_name,
1586: G_PKG_NAME,
1587: 'OTHERS',

Line 1601: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1597: -----------------------------------
1598: -- update_row for:OKL_PQY_VALUES --
1599: -----------------------------------
1600: PROCEDURE update_row(
1601: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1602: x_return_status OUT NOCOPY VARCHAR2,
1603: x_msg_count OUT NOCOPY NUMBER,
1604: x_msg_data OUT NOCOPY VARCHAR2,
1605: p_qve_rec IN qve_rec_type,

Line 1610: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1606: x_qve_rec OUT NOCOPY qve_rec_type) IS
1607:
1608: l_api_version CONSTANT NUMBER := 1;
1609: l_api_name CONSTANT VARCHAR2(30) := 'VALUES_update_row';
1610: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1611: l_qve_rec qve_rec_type := p_qve_rec;
1612: l_def_qve_rec qve_rec_type;
1613: l_row_notfound BOOLEAN := TRUE;
1614: ----------------------------------

Line 1623: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1619: x_qve_rec OUT NOCOPY qve_rec_type
1620: ) RETURN VARCHAR2 IS
1621: l_qve_rec qve_rec_type;
1622: l_row_notfound BOOLEAN := TRUE;
1623: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1624: BEGIN
1625: x_qve_rec := p_qve_rec;
1626: -- Get current database values
1627: l_qve_rec := get_rec(p_qve_rec, l_row_notfound);

Line 1629: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1625: x_qve_rec := p_qve_rec;
1626: -- Get current database values
1627: l_qve_rec := get_rec(p_qve_rec, l_row_notfound);
1628: IF (l_row_notfound) THEN
1629: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1630: END IF;
1631: IF (x_qve_rec.id = OKC_API.G_MISS_NUM)
1632: THEN
1633: x_qve_rec.id := l_qve_rec.id;

Line 1631: IF (x_qve_rec.id = OKC_API.G_MISS_NUM)

1627: l_qve_rec := get_rec(p_qve_rec, l_row_notfound);
1628: IF (l_row_notfound) THEN
1629: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1630: END IF;
1631: IF (x_qve_rec.id = OKC_API.G_MISS_NUM)
1632: THEN
1633: x_qve_rec.id := l_qve_rec.id;
1634: END IF;
1635: IF (x_qve_rec.value = OKC_API.G_MISS_CHAR)

Line 1635: IF (x_qve_rec.value = OKC_API.G_MISS_CHAR)

1631: IF (x_qve_rec.id = OKC_API.G_MISS_NUM)
1632: THEN
1633: x_qve_rec.id := l_qve_rec.id;
1634: END IF;
1635: IF (x_qve_rec.value = OKC_API.G_MISS_CHAR)
1636: THEN
1637: x_qve_rec.value := l_qve_rec.value;
1638: END IF;
1639: IF (x_qve_rec.pqy_id = OKC_API.G_MISS_NUM)

Line 1639: IF (x_qve_rec.pqy_id = OKC_API.G_MISS_NUM)

1635: IF (x_qve_rec.value = OKC_API.G_MISS_CHAR)
1636: THEN
1637: x_qve_rec.value := l_qve_rec.value;
1638: END IF;
1639: IF (x_qve_rec.pqy_id = OKC_API.G_MISS_NUM)
1640: THEN
1641: x_qve_rec.pqy_id := l_qve_rec.pqy_id;
1642:
1643: END IF;

Line 1644: IF (x_qve_rec.object_version_number = OKC_API.G_MISS_NUM)

1640: THEN
1641: x_qve_rec.pqy_id := l_qve_rec.pqy_id;
1642:
1643: END IF;
1644: IF (x_qve_rec.object_version_number = OKC_API.G_MISS_NUM)
1645: THEN
1646: x_qve_rec.object_version_number := l_qve_rec.object_version_number;
1647: END IF;
1648: IF (x_qve_rec.description = OKC_API.G_MISS_CHAR)

Line 1648: IF (x_qve_rec.description = OKC_API.G_MISS_CHAR)

1644: IF (x_qve_rec.object_version_number = OKC_API.G_MISS_NUM)
1645: THEN
1646: x_qve_rec.object_version_number := l_qve_rec.object_version_number;
1647: END IF;
1648: IF (x_qve_rec.description = OKC_API.G_MISS_CHAR)
1649: THEN
1650: x_qve_rec.description := l_qve_rec.description;
1651: END IF;
1652: IF (x_qve_rec.from_date = OKC_API.G_MISS_DATE)

Line 1652: IF (x_qve_rec.from_date = OKC_API.G_MISS_DATE)

1648: IF (x_qve_rec.description = OKC_API.G_MISS_CHAR)
1649: THEN
1650: x_qve_rec.description := l_qve_rec.description;
1651: END IF;
1652: IF (x_qve_rec.from_date = OKC_API.G_MISS_DATE)
1653: THEN
1654: x_qve_rec.from_date := l_qve_rec.from_date;
1655: END IF;
1656: IF (x_qve_rec.TO_DATE = OKC_API.G_MISS_DATE)

Line 1656: IF (x_qve_rec.TO_DATE = OKC_API.G_MISS_DATE)

1652: IF (x_qve_rec.from_date = OKC_API.G_MISS_DATE)
1653: THEN
1654: x_qve_rec.from_date := l_qve_rec.from_date;
1655: END IF;
1656: IF (x_qve_rec.TO_DATE = OKC_API.G_MISS_DATE)
1657: THEN
1658: x_qve_rec.TO_DATE := l_qve_rec.TO_DATE;
1659: END IF;
1660: IF (x_qve_rec.created_by = OKC_API.G_MISS_NUM)

Line 1660: IF (x_qve_rec.created_by = OKC_API.G_MISS_NUM)

1656: IF (x_qve_rec.TO_DATE = OKC_API.G_MISS_DATE)
1657: THEN
1658: x_qve_rec.TO_DATE := l_qve_rec.TO_DATE;
1659: END IF;
1660: IF (x_qve_rec.created_by = OKC_API.G_MISS_NUM)
1661: THEN
1662: x_qve_rec.created_by := l_qve_rec.created_by;
1663: END IF;
1664: IF (x_qve_rec.creation_date = OKC_API.G_MISS_DATE)

Line 1664: IF (x_qve_rec.creation_date = OKC_API.G_MISS_DATE)

1660: IF (x_qve_rec.created_by = OKC_API.G_MISS_NUM)
1661: THEN
1662: x_qve_rec.created_by := l_qve_rec.created_by;
1663: END IF;
1664: IF (x_qve_rec.creation_date = OKC_API.G_MISS_DATE)
1665: THEN
1666: x_qve_rec.creation_date := l_qve_rec.creation_date;
1667: END IF;
1668: IF (x_qve_rec.last_updated_by = OKC_API.G_MISS_NUM)

Line 1668: IF (x_qve_rec.last_updated_by = OKC_API.G_MISS_NUM)

1664: IF (x_qve_rec.creation_date = OKC_API.G_MISS_DATE)
1665: THEN
1666: x_qve_rec.creation_date := l_qve_rec.creation_date;
1667: END IF;
1668: IF (x_qve_rec.last_updated_by = OKC_API.G_MISS_NUM)
1669: THEN
1670: x_qve_rec.last_updated_by := l_qve_rec.last_updated_by;
1671: END IF;
1672: IF (x_qve_rec.last_update_date = OKC_API.G_MISS_DATE)

Line 1672: IF (x_qve_rec.last_update_date = OKC_API.G_MISS_DATE)

1668: IF (x_qve_rec.last_updated_by = OKC_API.G_MISS_NUM)
1669: THEN
1670: x_qve_rec.last_updated_by := l_qve_rec.last_updated_by;
1671: END IF;
1672: IF (x_qve_rec.last_update_date = OKC_API.G_MISS_DATE)
1673: THEN
1674: x_qve_rec.last_update_date := l_qve_rec.last_update_date;
1675: END IF;
1676: IF (x_qve_rec.last_update_login = OKC_API.G_MISS_NUM)

Line 1676: IF (x_qve_rec.last_update_login = OKC_API.G_MISS_NUM)

1672: IF (x_qve_rec.last_update_date = OKC_API.G_MISS_DATE)
1673: THEN
1674: x_qve_rec.last_update_date := l_qve_rec.last_update_date;
1675: END IF;
1676: IF (x_qve_rec.last_update_login = OKC_API.G_MISS_NUM)
1677: THEN
1678: x_qve_rec.last_update_login := l_qve_rec.last_update_login;
1679: END IF;
1680: RETURN(l_return_status);

Line 1689: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1685: FUNCTION Set_Attributes (
1686: p_qve_rec IN qve_rec_type,
1687: x_qve_rec OUT NOCOPY qve_rec_type
1688: ) RETURN VARCHAR2 IS
1689: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1690: BEGIN
1691: x_qve_rec := p_qve_rec;
1692: RETURN(l_return_status);
1693: END Set_Attributes;

Line 1695: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1691: x_qve_rec := p_qve_rec;
1692: RETURN(l_return_status);
1693: END Set_Attributes;
1694: BEGIN
1695: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1696: p_init_msg_list,
1697: '_PVT',
1698: x_return_status);
1699: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1699: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1695: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1696: p_init_msg_list,
1697: '_PVT',
1698: x_return_status);
1699: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1700: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1701: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1702: RAISE OKC_API.G_EXCEPTION_ERROR;
1703: END IF;

Line 1700: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1696: p_init_msg_list,
1697: '_PVT',
1698: x_return_status);
1699: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1700: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1701: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1702: RAISE OKC_API.G_EXCEPTION_ERROR;
1703: END IF;
1704: --- Setting item attributes

Line 1701: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1697: '_PVT',
1698: x_return_status);
1699: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1700: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1701: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1702: RAISE OKC_API.G_EXCEPTION_ERROR;
1703: END IF;
1704: --- Setting item attributes
1705: l_return_status := Set_Attributes(

Line 1702: RAISE OKC_API.G_EXCEPTION_ERROR;

1698: x_return_status);
1699: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1700: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1701: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1702: RAISE OKC_API.G_EXCEPTION_ERROR;
1703: END IF;
1704: --- Setting item attributes
1705: l_return_status := Set_Attributes(
1706: p_qve_rec, -- IN

Line 1709: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1705: l_return_status := Set_Attributes(
1706: p_qve_rec, -- IN
1707: l_qve_rec); -- OUT
1708: --- If any errors happen abort API
1709: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1710: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1711: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1712: RAISE OKC_API.G_EXCEPTION_ERROR;
1713: END IF;

Line 1710: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1706: p_qve_rec, -- IN
1707: l_qve_rec); -- OUT
1708: --- If any errors happen abort API
1709: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1710: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1711: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1712: RAISE OKC_API.G_EXCEPTION_ERROR;
1713: END IF;
1714: l_return_status := populate_new_record(l_qve_rec, l_def_qve_rec);

Line 1711: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1707: l_qve_rec); -- OUT
1708: --- If any errors happen abort API
1709: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1710: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1711: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1712: RAISE OKC_API.G_EXCEPTION_ERROR;
1713: END IF;
1714: l_return_status := populate_new_record(l_qve_rec, l_def_qve_rec);
1715: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1712: RAISE OKC_API.G_EXCEPTION_ERROR;

1708: --- If any errors happen abort API
1709: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1710: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1711: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1712: RAISE OKC_API.G_EXCEPTION_ERROR;
1713: END IF;
1714: l_return_status := populate_new_record(l_qve_rec, l_def_qve_rec);
1715: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1716: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1715: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1711: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1712: RAISE OKC_API.G_EXCEPTION_ERROR;
1713: END IF;
1714: l_return_status := populate_new_record(l_qve_rec, l_def_qve_rec);
1715: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1716: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1717: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1718: RAISE OKC_API.G_EXCEPTION_ERROR;
1719: END IF;

Line 1716: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1712: RAISE OKC_API.G_EXCEPTION_ERROR;
1713: END IF;
1714: l_return_status := populate_new_record(l_qve_rec, l_def_qve_rec);
1715: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1716: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1717: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1718: RAISE OKC_API.G_EXCEPTION_ERROR;
1719: END IF;
1720: UPDATE OKL_PQY_VALUES

Line 1717: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1713: END IF;
1714: l_return_status := populate_new_record(l_qve_rec, l_def_qve_rec);
1715: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1716: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1717: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1718: RAISE OKC_API.G_EXCEPTION_ERROR;
1719: END IF;
1720: UPDATE OKL_PQY_VALUES
1721: SET VALUE = l_def_qve_rec.value,

Line 1718: RAISE OKC_API.G_EXCEPTION_ERROR;

1714: l_return_status := populate_new_record(l_qve_rec, l_def_qve_rec);
1715: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1716: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1717: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1718: RAISE OKC_API.G_EXCEPTION_ERROR;
1719: END IF;
1720: UPDATE OKL_PQY_VALUES
1721: SET VALUE = l_def_qve_rec.value,
1722: PQY_ID = l_def_qve_rec.pqy_id,

Line 1735: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1731: LAST_UPDATE_LOGIN = l_def_qve_rec.last_update_login
1732: WHERE ID = l_def_qve_rec.id;
1733:
1734: x_qve_rec := l_def_qve_rec;
1735: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1736: EXCEPTION
1737: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1738: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1739: (

Line 1737: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1733:
1734: x_qve_rec := l_def_qve_rec;
1735: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1736: EXCEPTION
1737: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1738: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1739: (
1740: l_api_name,
1741: G_PKG_NAME,

Line 1738: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1734: x_qve_rec := l_def_qve_rec;
1735: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1736: EXCEPTION
1737: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1738: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1739: (
1740: l_api_name,
1741: G_PKG_NAME,
1742:

Line 1743: 'OKC_API.G_RET_STS_ERROR',

1739: (
1740: l_api_name,
1741: G_PKG_NAME,
1742:
1743: 'OKC_API.G_RET_STS_ERROR',
1744: x_msg_count,
1745: x_msg_data,
1746: '_PVT'
1747: );

Line 1748: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1744: x_msg_count,
1745: x_msg_data,
1746: '_PVT'
1747: );
1748: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1749: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1750: (
1751: l_api_name,
1752: G_PKG_NAME,

Line 1749: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1745: x_msg_data,
1746: '_PVT'
1747: );
1748: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1749: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1750: (
1751: l_api_name,
1752: G_PKG_NAME,
1753: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1753: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1749: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1750: (
1751: l_api_name,
1752: G_PKG_NAME,
1753: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1754: x_msg_count,
1755: x_msg_data,
1756: '_PVT'
1757: );

Line 1759: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1755: x_msg_data,
1756: '_PVT'
1757: );
1758: WHEN OTHERS THEN
1759: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1760: (
1761: l_api_name,
1762: G_PKG_NAME,
1763: 'OTHERS',

Line 1774: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1770: -- update_row for:OKL_PQY_VALUES_V --
1771: -------------------------------------
1772: PROCEDURE update_row(
1773: p_api_version IN NUMBER,
1774: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1775: x_return_status OUT NOCOPY VARCHAR2,
1776: x_msg_count OUT NOCOPY NUMBER,
1777: x_msg_data OUT NOCOPY VARCHAR2,
1778: p_qvev_rec IN qvev_rec_type,

Line 1783: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1779: x_qvev_rec OUT NOCOPY qvev_rec_type) IS
1780:
1781: l_api_version CONSTANT NUMBER := 1;
1782: l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
1783: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1784: l_qvev_rec qvev_rec_type := p_qvev_rec;
1785: l_def_qvev_rec qvev_rec_type;
1786: l_qve_rec qve_rec_type;
1787: lx_qve_rec qve_rec_type;

Line 1810: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1806: x_qvev_rec OUT NOCOPY qvev_rec_type
1807: ) RETURN VARCHAR2 IS
1808: l_qvev_rec qvev_rec_type;
1809: l_row_notfound BOOLEAN := TRUE;
1810: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1811: BEGIN
1812: x_qvev_rec := p_qvev_rec;
1813: -- Get current database values
1814: l_qvev_rec := get_rec(p_qvev_rec, l_row_notfound);

Line 1816: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1812: x_qvev_rec := p_qvev_rec;
1813: -- Get current database values
1814: l_qvev_rec := get_rec(p_qvev_rec, l_row_notfound);
1815: IF (l_row_notfound) THEN
1816: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1817: END IF;
1818: IF (x_qvev_rec.id = OKC_API.G_MISS_NUM)
1819: THEN
1820: x_qvev_rec.id := l_qvev_rec.id;

Line 1818: IF (x_qvev_rec.id = OKC_API.G_MISS_NUM)

1814: l_qvev_rec := get_rec(p_qvev_rec, l_row_notfound);
1815: IF (l_row_notfound) THEN
1816: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1817: END IF;
1818: IF (x_qvev_rec.id = OKC_API.G_MISS_NUM)
1819: THEN
1820: x_qvev_rec.id := l_qvev_rec.id;
1821: END IF;
1822: IF (x_qvev_rec.object_version_number = OKC_API.G_MISS_NUM)

Line 1822: IF (x_qvev_rec.object_version_number = OKC_API.G_MISS_NUM)

1818: IF (x_qvev_rec.id = OKC_API.G_MISS_NUM)
1819: THEN
1820: x_qvev_rec.id := l_qvev_rec.id;
1821: END IF;
1822: IF (x_qvev_rec.object_version_number = OKC_API.G_MISS_NUM)
1823: THEN
1824: x_qvev_rec.object_version_number := l_qvev_rec.object_version_number;
1825: END IF;
1826: IF (x_qvev_rec.pqy_id = OKC_API.G_MISS_NUM)

Line 1826: IF (x_qvev_rec.pqy_id = OKC_API.G_MISS_NUM)

1822: IF (x_qvev_rec.object_version_number = OKC_API.G_MISS_NUM)
1823: THEN
1824: x_qvev_rec.object_version_number := l_qvev_rec.object_version_number;
1825: END IF;
1826: IF (x_qvev_rec.pqy_id = OKC_API.G_MISS_NUM)
1827: THEN
1828: x_qvev_rec.pqy_id := l_qvev_rec.pqy_id;
1829: END IF;
1830: IF (x_qvev_rec.value = OKC_API.G_MISS_CHAR)

Line 1830: IF (x_qvev_rec.value = OKC_API.G_MISS_CHAR)

1826: IF (x_qvev_rec.pqy_id = OKC_API.G_MISS_NUM)
1827: THEN
1828: x_qvev_rec.pqy_id := l_qvev_rec.pqy_id;
1829: END IF;
1830: IF (x_qvev_rec.value = OKC_API.G_MISS_CHAR)
1831: THEN
1832: x_qvev_rec.value := l_qvev_rec.value;
1833: END IF;
1834: IF (x_qvev_rec.description = OKC_API.G_MISS_CHAR)

Line 1834: IF (x_qvev_rec.description = OKC_API.G_MISS_CHAR)

1830: IF (x_qvev_rec.value = OKC_API.G_MISS_CHAR)
1831: THEN
1832: x_qvev_rec.value := l_qvev_rec.value;
1833: END IF;
1834: IF (x_qvev_rec.description = OKC_API.G_MISS_CHAR)
1835: THEN
1836: x_qvev_rec.description := l_qvev_rec.description;
1837: END IF;
1838: IF (x_qvev_rec.from_date = OKC_API.G_MISS_DATE)

Line 1838: IF (x_qvev_rec.from_date = OKC_API.G_MISS_DATE)

1834: IF (x_qvev_rec.description = OKC_API.G_MISS_CHAR)
1835: THEN
1836: x_qvev_rec.description := l_qvev_rec.description;
1837: END IF;
1838: IF (x_qvev_rec.from_date = OKC_API.G_MISS_DATE)
1839: THEN
1840: x_qvev_rec.from_date := l_qvev_rec.from_date;
1841: END IF;
1842:

Line 1843: IF (x_qvev_rec.TO_DATE = OKC_API.G_MISS_DATE)

1839: THEN
1840: x_qvev_rec.from_date := l_qvev_rec.from_date;
1841: END IF;
1842:
1843: IF (x_qvev_rec.TO_DATE = OKC_API.G_MISS_DATE)
1844: THEN
1845: x_qvev_rec.TO_DATE := l_qvev_rec.TO_DATE;
1846: END IF;
1847: IF (x_qvev_rec.created_by = OKC_API.G_MISS_NUM)

Line 1847: IF (x_qvev_rec.created_by = OKC_API.G_MISS_NUM)

1843: IF (x_qvev_rec.TO_DATE = OKC_API.G_MISS_DATE)
1844: THEN
1845: x_qvev_rec.TO_DATE := l_qvev_rec.TO_DATE;
1846: END IF;
1847: IF (x_qvev_rec.created_by = OKC_API.G_MISS_NUM)
1848: THEN
1849: x_qvev_rec.created_by := l_qvev_rec.created_by;
1850: END IF;
1851: IF (x_qvev_rec.creation_date = OKC_API.G_MISS_DATE)

Line 1851: IF (x_qvev_rec.creation_date = OKC_API.G_MISS_DATE)

1847: IF (x_qvev_rec.created_by = OKC_API.G_MISS_NUM)
1848: THEN
1849: x_qvev_rec.created_by := l_qvev_rec.created_by;
1850: END IF;
1851: IF (x_qvev_rec.creation_date = OKC_API.G_MISS_DATE)
1852: THEN
1853: x_qvev_rec.creation_date := l_qvev_rec.creation_date;
1854: END IF;
1855: IF (x_qvev_rec.last_updated_by = OKC_API.G_MISS_NUM)

Line 1855: IF (x_qvev_rec.last_updated_by = OKC_API.G_MISS_NUM)

1851: IF (x_qvev_rec.creation_date = OKC_API.G_MISS_DATE)
1852: THEN
1853: x_qvev_rec.creation_date := l_qvev_rec.creation_date;
1854: END IF;
1855: IF (x_qvev_rec.last_updated_by = OKC_API.G_MISS_NUM)
1856: THEN
1857: x_qvev_rec.last_updated_by := l_qvev_rec.last_updated_by;
1858: END IF;
1859: IF (x_qvev_rec.last_update_date = OKC_API.G_MISS_DATE)

Line 1859: IF (x_qvev_rec.last_update_date = OKC_API.G_MISS_DATE)

1855: IF (x_qvev_rec.last_updated_by = OKC_API.G_MISS_NUM)
1856: THEN
1857: x_qvev_rec.last_updated_by := l_qvev_rec.last_updated_by;
1858: END IF;
1859: IF (x_qvev_rec.last_update_date = OKC_API.G_MISS_DATE)
1860: THEN
1861: x_qvev_rec.last_update_date := l_qvev_rec.last_update_date;
1862: END IF;
1863: IF (x_qvev_rec.last_update_login = OKC_API.G_MISS_NUM)

Line 1863: IF (x_qvev_rec.last_update_login = OKC_API.G_MISS_NUM)

1859: IF (x_qvev_rec.last_update_date = OKC_API.G_MISS_DATE)
1860: THEN
1861: x_qvev_rec.last_update_date := l_qvev_rec.last_update_date;
1862: END IF;
1863: IF (x_qvev_rec.last_update_login = OKC_API.G_MISS_NUM)
1864: THEN
1865: x_qvev_rec.last_update_login := l_qvev_rec.last_update_login;
1866: END IF;
1867: RETURN(l_return_status);

Line 1876: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1872: FUNCTION Set_Attributes (
1873: p_qvev_rec IN qvev_rec_type,
1874: x_qvev_rec OUT NOCOPY qvev_rec_type
1875: ) RETURN VARCHAR2 IS
1876: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1877: BEGIN
1878: x_qvev_rec := p_qvev_rec;
1879: x_qvev_rec.OBJECT_VERSION_NUMBER := NVL(x_qvev_rec.OBJECT_VERSION_NUMBER, 0) + 1;
1880: RETURN(l_return_status);

Line 1883: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1879: x_qvev_rec.OBJECT_VERSION_NUMBER := NVL(x_qvev_rec.OBJECT_VERSION_NUMBER, 0) + 1;
1880: RETURN(l_return_status);
1881: END Set_Attributes;
1882: BEGIN
1883: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1884: G_PKG_NAME,
1885: p_init_msg_list,
1886: l_api_version,
1887: p_api_version,

Line 1890: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1886: l_api_version,
1887: p_api_version,
1888: '_PVT',
1889: x_return_status);
1890: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1891: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1892: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1893: RAISE OKC_API.G_EXCEPTION_ERROR;
1894: END IF;

Line 1891: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1887: p_api_version,
1888: '_PVT',
1889: x_return_status);
1890: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1891: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1892: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1893: RAISE OKC_API.G_EXCEPTION_ERROR;
1894: END IF;
1895: --- Setting item attributes

Line 1892: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1888: '_PVT',
1889: x_return_status);
1890: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1891: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1892: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1893: RAISE OKC_API.G_EXCEPTION_ERROR;
1894: END IF;
1895: --- Setting item attributes
1896: l_return_status := Set_Attributes(

Line 1893: RAISE OKC_API.G_EXCEPTION_ERROR;

1889: x_return_status);
1890: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1891: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1892: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1893: RAISE OKC_API.G_EXCEPTION_ERROR;
1894: END IF;
1895: --- Setting item attributes
1896: l_return_status := Set_Attributes(
1897: p_qvev_rec, -- IN

Line 1900: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1896: l_return_status := Set_Attributes(
1897: p_qvev_rec, -- IN
1898: l_qvev_rec); -- OUT
1899: --- If any errors happen abort API
1900: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1901: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1902: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1903: RAISE OKC_API.G_EXCEPTION_ERROR;
1904: END IF;

Line 1901: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1897: p_qvev_rec, -- IN
1898: l_qvev_rec); -- OUT
1899: --- If any errors happen abort API
1900: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1901: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1902: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1903: RAISE OKC_API.G_EXCEPTION_ERROR;
1904: END IF;
1905: l_return_status := populate_new_record(l_qvev_rec, l_def_qvev_rec);

Line 1902: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1898: l_qvev_rec); -- OUT
1899: --- If any errors happen abort API
1900: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1901: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1902: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1903: RAISE OKC_API.G_EXCEPTION_ERROR;
1904: END IF;
1905: l_return_status := populate_new_record(l_qvev_rec, l_def_qvev_rec);
1906: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1903: RAISE OKC_API.G_EXCEPTION_ERROR;

1899: --- If any errors happen abort API
1900: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1901: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1902: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1903: RAISE OKC_API.G_EXCEPTION_ERROR;
1904: END IF;
1905: l_return_status := populate_new_record(l_qvev_rec, l_def_qvev_rec);
1906: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1907: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1906: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1902: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1903: RAISE OKC_API.G_EXCEPTION_ERROR;
1904: END IF;
1905: l_return_status := populate_new_record(l_qvev_rec, l_def_qvev_rec);
1906: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1907: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1908: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1909: RAISE OKC_API.G_EXCEPTION_ERROR;
1910: END IF;

Line 1907: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1903: RAISE OKC_API.G_EXCEPTION_ERROR;
1904: END IF;
1905: l_return_status := populate_new_record(l_qvev_rec, l_def_qvev_rec);
1906: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1907: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1908: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1909: RAISE OKC_API.G_EXCEPTION_ERROR;
1910: END IF;
1911: l_def_qvev_rec := fill_who_columns(l_def_qvev_rec);

Line 1908: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1904: END IF;
1905: l_return_status := populate_new_record(l_qvev_rec, l_def_qvev_rec);
1906: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1907: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1908: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1909: RAISE OKC_API.G_EXCEPTION_ERROR;
1910: END IF;
1911: l_def_qvev_rec := fill_who_columns(l_def_qvev_rec);
1912: --- Validate all non-missing attributes (Item Level Validation)

Line 1909: RAISE OKC_API.G_EXCEPTION_ERROR;

1905: l_return_status := populate_new_record(l_qvev_rec, l_def_qvev_rec);
1906: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1907: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1908: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1909: RAISE OKC_API.G_EXCEPTION_ERROR;
1910: END IF;
1911: l_def_qvev_rec := fill_who_columns(l_def_qvev_rec);
1912: --- Validate all non-missing attributes (Item Level Validation)
1913: l_return_status := Validate_Attributes(l_def_qvev_rec);

Line 1915: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1911: l_def_qvev_rec := fill_who_columns(l_def_qvev_rec);
1912: --- Validate all non-missing attributes (Item Level Validation)
1913: l_return_status := Validate_Attributes(l_def_qvev_rec);
1914: --- If any errors happen abort API
1915: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1916: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1917: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1918: RAISE OKC_API.G_EXCEPTION_ERROR;
1919: END IF;

Line 1916: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1912: --- Validate all non-missing attributes (Item Level Validation)
1913: l_return_status := Validate_Attributes(l_def_qvev_rec);
1914: --- If any errors happen abort API
1915: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1916: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1917: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1918: RAISE OKC_API.G_EXCEPTION_ERROR;
1919: END IF;
1920: l_return_status := Validate_Record(l_def_qvev_rec);

Line 1917: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1913: l_return_status := Validate_Attributes(l_def_qvev_rec);
1914: --- If any errors happen abort API
1915: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1916: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1917: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1918: RAISE OKC_API.G_EXCEPTION_ERROR;
1919: END IF;
1920: l_return_status := Validate_Record(l_def_qvev_rec);
1921: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1918: RAISE OKC_API.G_EXCEPTION_ERROR;

1914: --- If any errors happen abort API
1915: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1916: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1917: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1918: RAISE OKC_API.G_EXCEPTION_ERROR;
1919: END IF;
1920: l_return_status := Validate_Record(l_def_qvev_rec);
1921: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1922: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1921: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1917: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1918: RAISE OKC_API.G_EXCEPTION_ERROR;
1919: END IF;
1920: l_return_status := Validate_Record(l_def_qvev_rec);
1921: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1922: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1923: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1924: RAISE OKC_API.G_EXCEPTION_ERROR;
1925: END IF;

Line 1922: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1918: RAISE OKC_API.G_EXCEPTION_ERROR;
1919: END IF;
1920: l_return_status := Validate_Record(l_def_qvev_rec);
1921: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1922: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1923: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1924: RAISE OKC_API.G_EXCEPTION_ERROR;
1925: END IF;
1926:

Line 1923: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1919: END IF;
1920: l_return_status := Validate_Record(l_def_qvev_rec);
1921: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1922: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1923: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1924: RAISE OKC_API.G_EXCEPTION_ERROR;
1925: END IF;
1926:
1927: --------------------------------------

Line 1924: RAISE OKC_API.G_EXCEPTION_ERROR;

1920: l_return_status := Validate_Record(l_def_qvev_rec);
1921: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1922: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1923: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1924: RAISE OKC_API.G_EXCEPTION_ERROR;
1925: END IF;
1926:
1927: --------------------------------------
1928: -- Move VIEW record to "Child" records

Line 1943: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1939: l_qve_rec,
1940: lx_qve_rec
1941: );
1942:
1943: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1944: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1945: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1946: RAISE OKC_API.G_EXCEPTION_ERROR;
1947: END IF;

Line 1944: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1940: lx_qve_rec
1941: );
1942:
1943: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1944: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1945: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1946: RAISE OKC_API.G_EXCEPTION_ERROR;
1947: END IF;
1948: migrate(lx_qve_rec, l_def_qvev_rec);

Line 1945: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

1941: );
1942:
1943: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1944: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1945: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1946: RAISE OKC_API.G_EXCEPTION_ERROR;
1947: END IF;
1948: migrate(lx_qve_rec, l_def_qvev_rec);
1949: x_qvev_rec := l_def_qvev_rec;

Line 1946: RAISE OKC_API.G_EXCEPTION_ERROR;

1942:
1943: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1944: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1945: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1946: RAISE OKC_API.G_EXCEPTION_ERROR;
1947: END IF;
1948: migrate(lx_qve_rec, l_def_qvev_rec);
1949: x_qvev_rec := l_def_qvev_rec;
1950: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 1950: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1946: RAISE OKC_API.G_EXCEPTION_ERROR;
1947: END IF;
1948: migrate(lx_qve_rec, l_def_qvev_rec);
1949: x_qvev_rec := l_def_qvev_rec;
1950: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1951: EXCEPTION
1952: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1953: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1954: (

Line 1952: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1948: migrate(lx_qve_rec, l_def_qvev_rec);
1949: x_qvev_rec := l_def_qvev_rec;
1950: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1951: EXCEPTION
1952: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1953: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1954: (
1955: l_api_name,
1956: G_PKG_NAME,

Line 1953: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1949: x_qvev_rec := l_def_qvev_rec;
1950: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1951: EXCEPTION
1952: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1953: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1954: (
1955: l_api_name,
1956: G_PKG_NAME,
1957: 'OKC_API.G_RET_STS_ERROR',

Line 1957: 'OKC_API.G_RET_STS_ERROR',

1953: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1954: (
1955: l_api_name,
1956: G_PKG_NAME,
1957: 'OKC_API.G_RET_STS_ERROR',
1958: x_msg_count,
1959: x_msg_data,
1960: '_PVT'
1961: );

Line 1962: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1958: x_msg_count,
1959: x_msg_data,
1960: '_PVT'
1961: );
1962: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1963: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1964: (
1965: l_api_name,
1966: G_PKG_NAME,

Line 1963: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1959: x_msg_data,
1960: '_PVT'
1961: );
1962: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1963: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1964: (
1965: l_api_name,
1966: G_PKG_NAME,
1967: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1967: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1963: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1964: (
1965: l_api_name,
1966: G_PKG_NAME,
1967: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1968: x_msg_count,
1969: x_msg_data,
1970: '_PVT'
1971: );

Line 1973: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1969: x_msg_data,
1970: '_PVT'
1971: );
1972: WHEN OTHERS THEN
1973: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1974: (
1975: l_api_name,
1976: G_PKG_NAME,
1977: 'OTHERS',

Line 1988: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1984: -- PL/SQL TBL update_row for:QVEV_TBL --
1985: ----------------------------------------
1986: PROCEDURE update_row(
1987: p_api_version IN NUMBER,
1988: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1989: x_return_status OUT NOCOPY VARCHAR2,
1990: x_msg_count OUT NOCOPY NUMBER,
1991: x_msg_data OUT NOCOPY VARCHAR2,
1992: p_qvev_tbl IN qvev_tbl_type,

Line 1997: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1993: x_qvev_tbl OUT NOCOPY qvev_tbl_type) IS
1994:
1995: l_api_version CONSTANT NUMBER := 1;
1996: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
1997: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1998: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS
1999: i NUMBER := 0;
2000: BEGIN
2001: OKC_API.init_msg_list(p_init_msg_list);

Line 1998: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS

1994:
1995: l_api_version CONSTANT NUMBER := 1;
1996: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
1997: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1998: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS
1999: i NUMBER := 0;
2000: BEGIN
2001: OKC_API.init_msg_list(p_init_msg_list);
2002: -- Make sure PL/SQL table has records in it before passing

Line 2001: OKC_API.init_msg_list(p_init_msg_list);

1997: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1998: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS
1999: i NUMBER := 0;
2000: BEGIN
2001: OKC_API.init_msg_list(p_init_msg_list);
2002: -- Make sure PL/SQL table has records in it before passing
2003: IF (p_qvev_tbl.COUNT > 0) THEN
2004: i := p_qvev_tbl.FIRST;
2005: LOOP

Line 2008: p_init_msg_list => OKC_API.G_FALSE,

2004: i := p_qvev_tbl.FIRST;
2005: LOOP
2006: update_row (
2007: p_api_version => p_api_version,
2008: p_init_msg_list => OKC_API.G_FALSE,
2009: x_return_status => x_return_status,
2010: x_msg_count => x_msg_count,
2011: x_msg_data => x_msg_data,
2012: p_qvev_rec => p_qvev_tbl(i),

Line 2015: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

2011: x_msg_data => x_msg_data,
2012: p_qvev_rec => p_qvev_tbl(i),
2013: x_qvev_rec => x_qvev_tbl(i));
2014: -- TCHGS: Store the highest degree of error
2015: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
2016: IF l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR THEN
2017: l_overall_status := x_return_status;
2018: END IF;
2019: END IF;

Line 2016: IF l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR THEN

2012: p_qvev_rec => p_qvev_tbl(i),
2013: x_qvev_rec => x_qvev_tbl(i));
2014: -- TCHGS: Store the highest degree of error
2015: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
2016: IF l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR THEN
2017: l_overall_status := x_return_status;
2018: END IF;
2019: END IF;
2020: EXIT WHEN (i = p_qvev_tbl.LAST);

Line 2027: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2023: --TCHGS: return overall status
2024: x_return_status := l_overall_status;
2025: END IF;
2026: EXCEPTION
2027: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2028: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2029: (
2030: l_api_name,
2031: G_PKG_NAME,

Line 2028: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2024: x_return_status := l_overall_status;
2025: END IF;
2026: EXCEPTION
2027: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2028: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2029: (
2030: l_api_name,
2031: G_PKG_NAME,
2032: 'OKC_API.G_RET_STS_ERROR',

Line 2032: 'OKC_API.G_RET_STS_ERROR',

2028: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2029: (
2030: l_api_name,
2031: G_PKG_NAME,
2032: 'OKC_API.G_RET_STS_ERROR',
2033: x_msg_count,
2034: x_msg_data,
2035: '_PVT'
2036: );

Line 2037: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2033: x_msg_count,
2034: x_msg_data,
2035: '_PVT'
2036: );
2037: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2038: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2039: (
2040: l_api_name,
2041: G_PKG_NAME,

Line 2038: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2034: x_msg_data,
2035: '_PVT'
2036: );
2037: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2038: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2039: (
2040: l_api_name,
2041: G_PKG_NAME,
2042:

Line 2043: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2039: (
2040: l_api_name,
2041: G_PKG_NAME,
2042:
2043: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2044: x_msg_count,
2045: x_msg_data,
2046: '_PVT'
2047: );

Line 2049: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2045: x_msg_data,
2046: '_PVT'
2047: );
2048: WHEN OTHERS THEN
2049: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2050: (
2051: l_api_name,
2052: G_PKG_NAME,
2053: 'OTHERS',

Line 2067: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

2063: -----------------------------------
2064: -- delete_row for:OKL_PQY_VALUES --
2065: -----------------------------------
2066: PROCEDURE delete_row(
2067: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2068: x_return_status OUT NOCOPY VARCHAR2,
2069: x_msg_count OUT NOCOPY NUMBER,
2070: x_msg_data OUT NOCOPY VARCHAR2,
2071: p_qve_rec IN qve_rec_type) IS

Line 2075: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

2071: p_qve_rec IN qve_rec_type) IS
2072:
2073: l_api_version CONSTANT NUMBER := 1;
2074: l_api_name CONSTANT VARCHAR2(30) := 'VALUES_delete_row';
2075: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2076: l_qve_rec qve_rec_type:= p_qve_rec;
2077: l_row_notfound BOOLEAN := TRUE;
2078: BEGIN
2079: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

Line 2079: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

2075: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2076: l_qve_rec qve_rec_type:= p_qve_rec;
2077: l_row_notfound BOOLEAN := TRUE;
2078: BEGIN
2079: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2080: p_init_msg_list,
2081: '_PVT',
2082: x_return_status);
2083: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 2083: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2079: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2080: p_init_msg_list,
2081: '_PVT',
2082: x_return_status);
2083: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2084: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2085: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2086: RAISE OKC_API.G_EXCEPTION_ERROR;
2087: END IF;

Line 2084: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2080: p_init_msg_list,
2081: '_PVT',
2082: x_return_status);
2083: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2084: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2085: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2086: RAISE OKC_API.G_EXCEPTION_ERROR;
2087: END IF;
2088: DELETE FROM OKL_PQY_VALUES

Line 2085: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

2081: '_PVT',
2082: x_return_status);
2083: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2084: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2085: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2086: RAISE OKC_API.G_EXCEPTION_ERROR;
2087: END IF;
2088: DELETE FROM OKL_PQY_VALUES
2089: WHERE ID = l_qve_rec.id;

Line 2086: RAISE OKC_API.G_EXCEPTION_ERROR;

2082: x_return_status);
2083: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2084: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2085: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2086: RAISE OKC_API.G_EXCEPTION_ERROR;
2087: END IF;
2088: DELETE FROM OKL_PQY_VALUES
2089: WHERE ID = l_qve_rec.id;
2090:

Line 2091: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

2087: END IF;
2088: DELETE FROM OKL_PQY_VALUES
2089: WHERE ID = l_qve_rec.id;
2090:
2091: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2092: EXCEPTION
2093: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2094: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2095: (

Line 2093: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2089: WHERE ID = l_qve_rec.id;
2090:
2091: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2092: EXCEPTION
2093: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2094: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2095: (
2096: l_api_name,
2097: G_PKG_NAME,

Line 2094: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2090:
2091: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2092: EXCEPTION
2093: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2094: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2095: (
2096: l_api_name,
2097: G_PKG_NAME,
2098: 'OKC_API.G_RET_STS_ERROR',

Line 2098: 'OKC_API.G_RET_STS_ERROR',

2094: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2095: (
2096: l_api_name,
2097: G_PKG_NAME,
2098: 'OKC_API.G_RET_STS_ERROR',
2099: x_msg_count,
2100: x_msg_data,
2101: '_PVT'
2102: );

Line 2103: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2099: x_msg_count,
2100: x_msg_data,
2101: '_PVT'
2102: );
2103: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2104: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2105: (
2106: l_api_name,
2107: G_PKG_NAME,

Line 2104: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2100: x_msg_data,
2101: '_PVT'
2102: );
2103: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2104: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2105: (
2106: l_api_name,
2107: G_PKG_NAME,
2108: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2108: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2104: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2105: (
2106: l_api_name,
2107: G_PKG_NAME,
2108: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2109: x_msg_count,
2110: x_msg_data,
2111: '_PVT'
2112: );

Line 2114: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2110: x_msg_data,
2111: '_PVT'
2112: );
2113: WHEN OTHERS THEN
2114: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2115: (
2116: l_api_name,
2117: G_PKG_NAME,
2118: 'OTHERS',

Line 2129: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

2125: -- delete_row for:OKL_PQY_VALUES_V --
2126: -------------------------------------
2127: PROCEDURE delete_row(
2128: p_api_version IN NUMBER,
2129: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2130: x_return_status OUT NOCOPY VARCHAR2,
2131: x_msg_count OUT NOCOPY NUMBER,
2132: x_msg_data OUT NOCOPY VARCHAR2,
2133: p_qvev_rec IN qvev_rec_type) IS

Line 2137: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

2133: p_qvev_rec IN qvev_rec_type) IS
2134:
2135: l_api_version CONSTANT NUMBER := 1;
2136: l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
2137: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2138: l_qvev_rec qvev_rec_type := p_qvev_rec;
2139: l_qve_rec qve_rec_type;
2140: BEGIN
2141: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

Line 2141: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

2137: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2138: l_qvev_rec qvev_rec_type := p_qvev_rec;
2139: l_qve_rec qve_rec_type;
2140: BEGIN
2141: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2142:
2143: G_PKG_NAME,
2144: p_init_msg_list,
2145: l_api_version,

Line 2149: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2145: l_api_version,
2146: p_api_version,
2147: '_PVT',
2148: x_return_status);
2149: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2150: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2151: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2152: RAISE OKC_API.G_EXCEPTION_ERROR;
2153: END IF;

Line 2150: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2146: p_api_version,
2147: '_PVT',
2148: x_return_status);
2149: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2150: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2151: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2152: RAISE OKC_API.G_EXCEPTION_ERROR;
2153: END IF;
2154: --------------------------------------

Line 2151: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

2147: '_PVT',
2148: x_return_status);
2149: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2150: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2151: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2152: RAISE OKC_API.G_EXCEPTION_ERROR;
2153: END IF;
2154: --------------------------------------
2155: -- Move VIEW record to "Child" records

Line 2152: RAISE OKC_API.G_EXCEPTION_ERROR;

2148: x_return_status);
2149: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2150: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2151: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2152: RAISE OKC_API.G_EXCEPTION_ERROR;
2153: END IF;
2154: --------------------------------------
2155: -- Move VIEW record to "Child" records
2156: --------------------------------------

Line 2168: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2164: x_msg_count,
2165: x_msg_data,
2166: l_qve_rec
2167: );
2168: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2169: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2170: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2171: RAISE OKC_API.G_EXCEPTION_ERROR;
2172: END IF;

Line 2169: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2165: x_msg_data,
2166: l_qve_rec
2167: );
2168: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2169: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2170: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2171: RAISE OKC_API.G_EXCEPTION_ERROR;
2172: END IF;
2173: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 2170: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

2166: l_qve_rec
2167: );
2168: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2169: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2170: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2171: RAISE OKC_API.G_EXCEPTION_ERROR;
2172: END IF;
2173: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2174: EXCEPTION

Line 2171: RAISE OKC_API.G_EXCEPTION_ERROR;

2167: );
2168: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2169: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2170: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2171: RAISE OKC_API.G_EXCEPTION_ERROR;
2172: END IF;
2173: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2174: EXCEPTION
2175: WHEN OKC_API.G_EXCEPTION_ERROR THEN

Line 2173: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

2169: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2170: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2171: RAISE OKC_API.G_EXCEPTION_ERROR;
2172: END IF;
2173: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2174: EXCEPTION
2175: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2176: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2177: (

Line 2175: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2171: RAISE OKC_API.G_EXCEPTION_ERROR;
2172: END IF;
2173: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2174: EXCEPTION
2175: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2176: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2177: (
2178: l_api_name,
2179: G_PKG_NAME,

Line 2176: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2172: END IF;
2173: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2174: EXCEPTION
2175: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2176: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2177: (
2178: l_api_name,
2179: G_PKG_NAME,
2180: 'OKC_API.G_RET_STS_ERROR',

Line 2180: 'OKC_API.G_RET_STS_ERROR',

2176: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2177: (
2178: l_api_name,
2179: G_PKG_NAME,
2180: 'OKC_API.G_RET_STS_ERROR',
2181: x_msg_count,
2182: x_msg_data,
2183: '_PVT'
2184: );

Line 2185: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2181: x_msg_count,
2182: x_msg_data,
2183: '_PVT'
2184: );
2185: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2186: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2187: (
2188: l_api_name,
2189: G_PKG_NAME,

Line 2186: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2182: x_msg_data,
2183: '_PVT'
2184: );
2185: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2186: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2187: (
2188: l_api_name,
2189: G_PKG_NAME,
2190: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2190: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2186: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2187: (
2188: l_api_name,
2189: G_PKG_NAME,
2190: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2191: x_msg_count,
2192: x_msg_data,
2193: '_PVT'
2194: );

Line 2196: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2192: x_msg_data,
2193: '_PVT'
2194: );
2195: WHEN OTHERS THEN
2196: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2197: (
2198: l_api_name,
2199: G_PKG_NAME,
2200: 'OTHERS',

Line 2211: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

2207: -- PL/SQL TBL delete_row for:QVEV_TBL --
2208: ----------------------------------------
2209: PROCEDURE delete_row(
2210: p_api_version IN NUMBER,
2211: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2212: x_return_status OUT NOCOPY VARCHAR2,
2213: x_msg_count OUT NOCOPY NUMBER,
2214: x_msg_data OUT NOCOPY VARCHAR2,
2215: p_qvev_tbl IN qvev_tbl_type) IS

Line 2219: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

2215: p_qvev_tbl IN qvev_tbl_type) IS
2216:
2217: l_api_version CONSTANT NUMBER := 1;
2218: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
2219: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2220: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS
2221: i NUMBER := 0;
2222: BEGIN
2223: OKC_API.init_msg_list(p_init_msg_list);

Line 2220: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS

2216:
2217: l_api_version CONSTANT NUMBER := 1;
2218: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
2219: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2220: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS
2221: i NUMBER := 0;
2222: BEGIN
2223: OKC_API.init_msg_list(p_init_msg_list);
2224: -- Make sure PL/SQL table has records in it before passing

Line 2223: OKC_API.init_msg_list(p_init_msg_list);

2219: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2220: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS
2221: i NUMBER := 0;
2222: BEGIN
2223: OKC_API.init_msg_list(p_init_msg_list);
2224: -- Make sure PL/SQL table has records in it before passing
2225: IF (p_qvev_tbl.COUNT > 0) THEN
2226: i := p_qvev_tbl.FIRST;
2227: LOOP

Line 2230: p_init_msg_list => OKC_API.G_FALSE,

2226: i := p_qvev_tbl.FIRST;
2227: LOOP
2228: delete_row (
2229: p_api_version => p_api_version,
2230: p_init_msg_list => OKC_API.G_FALSE,
2231: x_return_status => x_return_status,
2232: x_msg_count => x_msg_count,
2233: x_msg_data => x_msg_data,
2234: p_qvev_rec => p_qvev_tbl(i));

Line 2236: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

2232: x_msg_count => x_msg_count,
2233: x_msg_data => x_msg_data,
2234: p_qvev_rec => p_qvev_tbl(i));
2235: -- TCHGS: Store the highest degree of error
2236: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
2237: IF l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR THEN
2238: l_overall_status := x_return_status;
2239: END IF;
2240: END IF;

Line 2237: IF l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR THEN

2233: x_msg_data => x_msg_data,
2234: p_qvev_rec => p_qvev_tbl(i));
2235: -- TCHGS: Store the highest degree of error
2236: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
2237: IF l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR THEN
2238: l_overall_status := x_return_status;
2239: END IF;
2240: END IF;
2241: EXIT WHEN (i = p_qvev_tbl.LAST);

Line 2249: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2245: --TCHGS: return overall status
2246: x_return_status := l_overall_status;
2247: END IF;
2248: EXCEPTION
2249: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2250: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2251: (
2252: l_api_name,
2253: G_PKG_NAME,

Line 2250: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2246: x_return_status := l_overall_status;
2247: END IF;
2248: EXCEPTION
2249: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2250: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2251: (
2252: l_api_name,
2253: G_PKG_NAME,
2254: 'OKC_API.G_RET_STS_ERROR',

Line 2254: 'OKC_API.G_RET_STS_ERROR',

2250: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2251: (
2252: l_api_name,
2253: G_PKG_NAME,
2254: 'OKC_API.G_RET_STS_ERROR',
2255: x_msg_count,
2256: x_msg_data,
2257: '_PVT'
2258: );

Line 2259: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2255: x_msg_count,
2256: x_msg_data,
2257: '_PVT'
2258: );
2259: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2260: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2261: (
2262: l_api_name,
2263: G_PKG_NAME,

Line 2260: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2256: x_msg_data,
2257: '_PVT'
2258: );
2259: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2260: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2261: (
2262: l_api_name,
2263: G_PKG_NAME,
2264: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2264: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2260: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2261: (
2262: l_api_name,
2263: G_PKG_NAME,
2264: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2265: x_msg_count,
2266: x_msg_data,
2267: '_PVT'
2268: );

Line 2270: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2266: x_msg_data,
2267: '_PVT'
2268: );
2269: WHEN OTHERS THEN
2270: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2271: (
2272: l_api_name,
2273: G_PKG_NAME,
2274: 'OTHERS',