APPS.OKL_TMG_PVT dependencies on OKL_API

Line 7: px_error_rec IN OUT NOCOPY OKL_API.ERROR_REC_TYPE,

3: ---------------------------------------------------------------------------
4: -- PROCEDURE load_error_tbl
5: ---------------------------------------------------------------------------
6: PROCEDURE load_error_tbl (
7: px_error_rec IN OUT NOCOPY OKL_API.ERROR_REC_TYPE,
8: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS
9:
10: j INTEGER := NVL(px_error_tbl.LAST, 0) + 1;
11: last_msg_idx INTEGER := FND_MSG_PUB.COUNT_MSG;

Line 8: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS

4: -- PROCEDURE load_error_tbl
5: ---------------------------------------------------------------------------
6: PROCEDURE load_error_tbl (
7: px_error_rec IN OUT NOCOPY OKL_API.ERROR_REC_TYPE,
8: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS
9:
10: j INTEGER := NVL(px_error_tbl.LAST, 0) + 1;
11: last_msg_idx INTEGER := FND_MSG_PUB.COUNT_MSG;
12: l_msg_idx INTEGER := FND_MSG_PUB.G_NEXT;

Line 28: p_encoded => okl_api.g_false, -- RMUNJULU 3018641 Changed from fnd

24: END IF;
25: LOOP
26: fnd_msg_pub.get(
27: p_msg_index => l_msg_idx,
28: p_encoded => okl_api.g_false, -- RMUNJULU 3018641 Changed from fnd
29: p_data => px_error_rec.msg_data,
30: p_msg_index_out => px_error_rec.msg_count);
31: px_error_tbl(j) := px_error_rec;
32: j := j + 1;

Line 40: -- in a OKL_API.ERROR_TBL_TYPE, and returns it.

36: ---------------------------------------------------------------------------
37: -- FUNCTION find_highest_exception
38: ---------------------------------------------------------------------------
39: -- Finds the highest exception (G_RET_STS_UNEXP_ERROR)
40: -- in a OKL_API.ERROR_TBL_TYPE, and returns it.
41: FUNCTION find_highest_exception(
42: p_error_tbl IN OKL_API.ERROR_TBL_TYPE
43: ) RETURN VARCHAR2 IS
44: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

Line 42: p_error_tbl IN OKL_API.ERROR_TBL_TYPE

38: ---------------------------------------------------------------------------
39: -- Finds the highest exception (G_RET_STS_UNEXP_ERROR)
40: -- in a OKL_API.ERROR_TBL_TYPE, and returns it.
41: FUNCTION find_highest_exception(
42: p_error_tbl IN OKL_API.ERROR_TBL_TYPE
43: ) RETURN VARCHAR2 IS
44: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
45: i INTEGER := 1;
46: BEGIN

Line 44: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

40: -- in a OKL_API.ERROR_TBL_TYPE, and returns it.
41: FUNCTION find_highest_exception(
42: p_error_tbl IN OKL_API.ERROR_TBL_TYPE
43: ) RETURN VARCHAR2 IS
44: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
45: i INTEGER := 1;
46: BEGIN
47: IF (p_error_tbl.COUNT > 0) THEN
48: i := p_error_tbl.FIRST;

Line 50: IF (p_error_tbl(i).error_type <> OKL_API.G_RET_STS_SUCCESS) THEN

46: BEGIN
47: IF (p_error_tbl.COUNT > 0) THEN
48: i := p_error_tbl.FIRST;
49: LOOP
50: IF (p_error_tbl(i).error_type <> OKL_API.G_RET_STS_SUCCESS) THEN
51: IF (l_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
52: l_return_status := p_error_tbl(i).error_type;
53: END IF;
54: END IF;

Line 51: IF (l_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

47: IF (p_error_tbl.COUNT > 0) THEN
48: i := p_error_tbl.FIRST;
49: LOOP
50: IF (p_error_tbl(i).error_type <> OKL_API.G_RET_STS_SUCCESS) THEN
51: IF (l_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
52: l_return_status := p_error_tbl(i).error_type;
53: END IF;
54: END IF;
55: EXIT WHEN (i = p_error_tbl.LAST);

Line 174: OKL_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');

170: x_return_status := OKC_API.G_RET_STS_SUCCESS;
171:
172: l_tmgv_rec := get_rec(p_tmgv_rec, l_row_notfound);
173: IF (l_row_notfound) THEN
174: OKL_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
175: x_return_status := OKL_API.G_RET_STS_ERROR;
176: END IF;
177: RETURN(l_tmgv_rec);
178: END get_rec;

Line 175: x_return_status := OKL_API.G_RET_STS_ERROR;

171:
172: l_tmgv_rec := get_rec(p_tmgv_rec, l_row_notfound);
173: IF (l_row_notfound) THEN
174: OKL_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
175: x_return_status := OKL_API.G_RET_STS_ERROR;
176: END IF;
177: RETURN(l_tmgv_rec);
178: END get_rec;
179: -----------------------------------------------------------

Line 269: OKL_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');

265: x_return_status := OKC_API.G_RET_STS_SUCCESS;
266:
267: l_tmg_rec := get_rec(p_tmg_rec, l_row_notfound);
268: IF (l_row_notfound) THEN
269: OKL_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
270: x_return_status := OKL_API.G_RET_STS_ERROR;
271: END IF;
272: RETURN(l_tmg_rec);
273: END get_rec;

Line 270: x_return_status := OKL_API.G_RET_STS_ERROR;

266:
267: l_tmg_rec := get_rec(p_tmg_rec, l_row_notfound);
268: IF (l_row_notfound) THEN
269: OKL_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
270: x_return_status := OKL_API.G_RET_STS_ERROR;
271: END IF;
272: RETURN(l_tmg_rec);
273: END get_rec;
274: -----------------------------------------------------------

Line 293: IF (l_tmgv_rec.id = OKL_API.G_MISS_NUM ) THEN

289: p_tmgv_rec IN tmgv_rec_type
290: ) RETURN tmgv_rec_type IS
291: l_tmgv_rec tmgv_rec_type := p_tmgv_rec;
292: BEGIN
293: IF (l_tmgv_rec.id = OKL_API.G_MISS_NUM ) THEN
294: l_tmgv_rec.id := NULL;
295: END IF;
296: IF (l_tmgv_rec.object_version_number = OKL_API.G_MISS_NUM ) THEN
297: l_tmgv_rec.object_version_number := NULL;

Line 296: IF (l_tmgv_rec.object_version_number = OKL_API.G_MISS_NUM ) THEN

292: BEGIN
293: IF (l_tmgv_rec.id = OKL_API.G_MISS_NUM ) THEN
294: l_tmgv_rec.id := NULL;
295: END IF;
296: IF (l_tmgv_rec.object_version_number = OKL_API.G_MISS_NUM ) THEN
297: l_tmgv_rec.object_version_number := NULL;
298: END IF;
299: IF (l_tmgv_rec.bch_id = OKL_API.G_MISS_NUM ) THEN
300: l_tmgv_rec.bch_id := NULL;

Line 299: IF (l_tmgv_rec.bch_id = OKL_API.G_MISS_NUM ) THEN

295: END IF;
296: IF (l_tmgv_rec.object_version_number = OKL_API.G_MISS_NUM ) THEN
297: l_tmgv_rec.object_version_number := NULL;
298: END IF;
299: IF (l_tmgv_rec.bch_id = OKL_API.G_MISS_NUM ) THEN
300: l_tmgv_rec.bch_id := NULL;
301: END IF;
302: IF (l_tmgv_rec.tmg_message_name = OKL_API.G_MISS_CHAR ) THEN
303: l_tmgv_rec.tmg_message_name := NULL;

Line 302: IF (l_tmgv_rec.tmg_message_name = OKL_API.G_MISS_CHAR ) THEN

298: END IF;
299: IF (l_tmgv_rec.bch_id = OKL_API.G_MISS_NUM ) THEN
300: l_tmgv_rec.bch_id := NULL;
301: END IF;
302: IF (l_tmgv_rec.tmg_message_name = OKL_API.G_MISS_CHAR ) THEN
303: l_tmgv_rec.tmg_message_name := NULL;
304: END IF;
305: IF (l_tmgv_rec.tmg_application_id = OKL_API.G_MISS_NUM ) THEN
306: l_tmgv_rec.tmg_application_id := NULL;

Line 305: IF (l_tmgv_rec.tmg_application_id = OKL_API.G_MISS_NUM ) THEN

301: END IF;
302: IF (l_tmgv_rec.tmg_message_name = OKL_API.G_MISS_CHAR ) THEN
303: l_tmgv_rec.tmg_message_name := NULL;
304: END IF;
305: IF (l_tmgv_rec.tmg_application_id = OKL_API.G_MISS_NUM ) THEN
306: l_tmgv_rec.tmg_application_id := NULL;
307: END IF;
308: IF (l_tmgv_rec.tmg_language_code = OKL_API.G_MISS_CHAR ) THEN
309: l_tmgv_rec.tmg_language_code := NULL;

Line 308: IF (l_tmgv_rec.tmg_language_code = OKL_API.G_MISS_CHAR ) THEN

304: END IF;
305: IF (l_tmgv_rec.tmg_application_id = OKL_API.G_MISS_NUM ) THEN
306: l_tmgv_rec.tmg_application_id := NULL;
307: END IF;
308: IF (l_tmgv_rec.tmg_language_code = OKL_API.G_MISS_CHAR ) THEN
309: l_tmgv_rec.tmg_language_code := NULL;
310: END IF;
311: IF (l_tmgv_rec.message_text = OKL_API.G_MISS_CHAR ) THEN
312: l_tmgv_rec.message_text := NULL;

Line 311: IF (l_tmgv_rec.message_text = OKL_API.G_MISS_CHAR ) THEN

307: END IF;
308: IF (l_tmgv_rec.tmg_language_code = OKL_API.G_MISS_CHAR ) THEN
309: l_tmgv_rec.tmg_language_code := NULL;
310: END IF;
311: IF (l_tmgv_rec.message_text = OKL_API.G_MISS_CHAR ) THEN
312: l_tmgv_rec.message_text := NULL;
313: END IF;
314: IF (l_tmgv_rec.trx_id = OKL_API.G_MISS_NUM ) THEN
315: l_tmgv_rec.trx_id := NULL;

Line 314: IF (l_tmgv_rec.trx_id = OKL_API.G_MISS_NUM ) THEN

310: END IF;
311: IF (l_tmgv_rec.message_text = OKL_API.G_MISS_CHAR ) THEN
312: l_tmgv_rec.message_text := NULL;
313: END IF;
314: IF (l_tmgv_rec.trx_id = OKL_API.G_MISS_NUM ) THEN
315: l_tmgv_rec.trx_id := NULL;
316: END IF;
317: IF (l_tmgv_rec.trx_source_table = OKL_API.G_MISS_CHAR ) THEN
318: l_tmgv_rec.trx_source_table := NULL;

Line 317: IF (l_tmgv_rec.trx_source_table = OKL_API.G_MISS_CHAR ) THEN

313: END IF;
314: IF (l_tmgv_rec.trx_id = OKL_API.G_MISS_NUM ) THEN
315: l_tmgv_rec.trx_id := NULL;
316: END IF;
317: IF (l_tmgv_rec.trx_source_table = OKL_API.G_MISS_CHAR ) THEN
318: l_tmgv_rec.trx_source_table := NULL;
319: END IF;
320: IF (l_tmgv_rec.sequence_number = OKL_API.G_MISS_NUM ) THEN
321: l_tmgv_rec.sequence_number := NULL;

Line 320: IF (l_tmgv_rec.sequence_number = OKL_API.G_MISS_NUM ) THEN

316: END IF;
317: IF (l_tmgv_rec.trx_source_table = OKL_API.G_MISS_CHAR ) THEN
318: l_tmgv_rec.trx_source_table := NULL;
319: END IF;
320: IF (l_tmgv_rec.sequence_number = OKL_API.G_MISS_NUM ) THEN
321: l_tmgv_rec.sequence_number := NULL;
322: END IF;
323: IF (l_tmgv_rec.request_id = OKL_API.G_MISS_NUM ) THEN
324: l_tmgv_rec.request_id := NULL;

Line 323: IF (l_tmgv_rec.request_id = OKL_API.G_MISS_NUM ) THEN

319: END IF;
320: IF (l_tmgv_rec.sequence_number = OKL_API.G_MISS_NUM ) THEN
321: l_tmgv_rec.sequence_number := NULL;
322: END IF;
323: IF (l_tmgv_rec.request_id = OKL_API.G_MISS_NUM ) THEN
324: l_tmgv_rec.request_id := NULL;
325: END IF;
326: IF (l_tmgv_rec.program_application_id = OKL_API.G_MISS_NUM ) THEN
327: l_tmgv_rec.program_application_id := NULL;

Line 326: IF (l_tmgv_rec.program_application_id = OKL_API.G_MISS_NUM ) THEN

322: END IF;
323: IF (l_tmgv_rec.request_id = OKL_API.G_MISS_NUM ) THEN
324: l_tmgv_rec.request_id := NULL;
325: END IF;
326: IF (l_tmgv_rec.program_application_id = OKL_API.G_MISS_NUM ) THEN
327: l_tmgv_rec.program_application_id := NULL;
328: END IF;
329: IF (l_tmgv_rec.program_id = OKL_API.G_MISS_NUM ) THEN
330: l_tmgv_rec.program_id := NULL;

Line 329: IF (l_tmgv_rec.program_id = OKL_API.G_MISS_NUM ) THEN

325: END IF;
326: IF (l_tmgv_rec.program_application_id = OKL_API.G_MISS_NUM ) THEN
327: l_tmgv_rec.program_application_id := NULL;
328: END IF;
329: IF (l_tmgv_rec.program_id = OKL_API.G_MISS_NUM ) THEN
330: l_tmgv_rec.program_id := NULL;
331: END IF;
332: IF (l_tmgv_rec.program_update_date = OKL_API.G_MISS_DATE ) THEN
333: l_tmgv_rec.program_update_date := NULL;

Line 332: IF (l_tmgv_rec.program_update_date = OKL_API.G_MISS_DATE ) THEN

328: END IF;
329: IF (l_tmgv_rec.program_id = OKL_API.G_MISS_NUM ) THEN
330: l_tmgv_rec.program_id := NULL;
331: END IF;
332: IF (l_tmgv_rec.program_update_date = OKL_API.G_MISS_DATE ) THEN
333: l_tmgv_rec.program_update_date := NULL;
334: END IF;
335: IF (l_tmgv_rec.created_by = OKL_API.G_MISS_NUM ) THEN
336: l_tmgv_rec.created_by := NULL;

Line 335: IF (l_tmgv_rec.created_by = OKL_API.G_MISS_NUM ) THEN

331: END IF;
332: IF (l_tmgv_rec.program_update_date = OKL_API.G_MISS_DATE ) THEN
333: l_tmgv_rec.program_update_date := NULL;
334: END IF;
335: IF (l_tmgv_rec.created_by = OKL_API.G_MISS_NUM ) THEN
336: l_tmgv_rec.created_by := NULL;
337: END IF;
338: IF (l_tmgv_rec.creation_date = OKL_API.G_MISS_DATE ) THEN
339: l_tmgv_rec.creation_date := NULL;

Line 338: IF (l_tmgv_rec.creation_date = OKL_API.G_MISS_DATE ) THEN

334: END IF;
335: IF (l_tmgv_rec.created_by = OKL_API.G_MISS_NUM ) THEN
336: l_tmgv_rec.created_by := NULL;
337: END IF;
338: IF (l_tmgv_rec.creation_date = OKL_API.G_MISS_DATE ) THEN
339: l_tmgv_rec.creation_date := NULL;
340: END IF;
341: IF (l_tmgv_rec.last_updated_by = OKL_API.G_MISS_NUM ) THEN
342: l_tmgv_rec.last_updated_by := NULL;

Line 341: IF (l_tmgv_rec.last_updated_by = OKL_API.G_MISS_NUM ) THEN

337: END IF;
338: IF (l_tmgv_rec.creation_date = OKL_API.G_MISS_DATE ) THEN
339: l_tmgv_rec.creation_date := NULL;
340: END IF;
341: IF (l_tmgv_rec.last_updated_by = OKL_API.G_MISS_NUM ) THEN
342: l_tmgv_rec.last_updated_by := NULL;
343: END IF;
344: IF (l_tmgv_rec.last_update_date = OKL_API.G_MISS_DATE ) THEN
345: l_tmgv_rec.last_update_date := NULL;

Line 344: IF (l_tmgv_rec.last_update_date = OKL_API.G_MISS_DATE ) THEN

340: END IF;
341: IF (l_tmgv_rec.last_updated_by = OKL_API.G_MISS_NUM ) THEN
342: l_tmgv_rec.last_updated_by := NULL;
343: END IF;
344: IF (l_tmgv_rec.last_update_date = OKL_API.G_MISS_DATE ) THEN
345: l_tmgv_rec.last_update_date := NULL;
346: END IF;
347: IF (l_tmgv_rec.last_update_login = OKL_API.G_MISS_NUM ) THEN
348: l_tmgv_rec.last_update_login := NULL;

Line 347: IF (l_tmgv_rec.last_update_login = OKL_API.G_MISS_NUM ) THEN

343: END IF;
344: IF (l_tmgv_rec.last_update_date = OKL_API.G_MISS_DATE ) THEN
345: l_tmgv_rec.last_update_date := NULL;
346: END IF;
347: IF (l_tmgv_rec.last_update_login = OKL_API.G_MISS_NUM ) THEN
348: l_tmgv_rec.last_update_login := NULL;
349: END IF;
350:
351: -- RMUNJULU 3018641 Added Code

Line 352: IF (l_tmgv_rec.tmg_run = OKL_API.G_MISS_NUM ) THEN

348: l_tmgv_rec.last_update_login := NULL;
349: END IF;
350:
351: -- RMUNJULU 3018641 Added Code
352: IF (l_tmgv_rec.tmg_run = OKL_API.G_MISS_NUM ) THEN
353: l_tmgv_rec.tmg_run := NULL;
354: END IF;
355:
356: RETURN(l_tmgv_rec);

Line 365: x_return_status := OKL_API.G_RET_STS_SUCCESS;

361: PROCEDURE validate_id(
362: x_return_status OUT NOCOPY VARCHAR2,
363: p_id IN NUMBER) IS
364: BEGIN
365: x_return_status := OKL_API.G_RET_STS_SUCCESS;
366: IF (p_id = OKL_API.G_MISS_NUM OR
367: p_id IS NULL)
368: THEN
369: OKL_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'id');

Line 366: IF (p_id = OKL_API.G_MISS_NUM OR

362: x_return_status OUT NOCOPY VARCHAR2,
363: p_id IN NUMBER) IS
364: BEGIN
365: x_return_status := OKL_API.G_RET_STS_SUCCESS;
366: IF (p_id = OKL_API.G_MISS_NUM OR
367: p_id IS NULL)
368: THEN
369: OKL_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'id');
370: x_return_status := OKL_API.G_RET_STS_ERROR;

Line 369: OKL_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'id');

365: x_return_status := OKL_API.G_RET_STS_SUCCESS;
366: IF (p_id = OKL_API.G_MISS_NUM OR
367: p_id IS NULL)
368: THEN
369: OKL_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'id');
370: x_return_status := OKL_API.G_RET_STS_ERROR;
371: RAISE G_EXCEPTION_HALT_VALIDATION;
372: END IF;
373:

Line 370: x_return_status := OKL_API.G_RET_STS_ERROR;

366: IF (p_id = OKL_API.G_MISS_NUM OR
367: p_id IS NULL)
368: THEN
369: OKL_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'id');
370: x_return_status := OKL_API.G_RET_STS_ERROR;
371: RAISE G_EXCEPTION_HALT_VALIDATION;
372: END IF;
373:
374: /*Bug 4603850 :Commented

Line 381: IF (x_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

377: ,p_col_name => 'id'
378: ,p_col_value => p_id
379: ,x_return_status => x_return_status);
380: -- verify that length is within allowed limits
381: IF (x_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
382: x_return_status := OKL_API.G_RET_STS_ERROR;
383: RAISE G_EXCEPTION_HALT_VALIDATION;
384: END IF;
385: */

Line 382: x_return_status := OKL_API.G_RET_STS_ERROR;

378: ,p_col_value => p_id
379: ,x_return_status => x_return_status);
380: -- verify that length is within allowed limits
381: IF (x_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
382: x_return_status := OKL_API.G_RET_STS_ERROR;
383: RAISE G_EXCEPTION_HALT_VALIDATION;
384: END IF;
385: */
386: EXCEPTION

Line 390: OKL_API.SET_MESSAGE( p_app_name => G_APP_NAME

386: EXCEPTION
387: WHEN G_EXCEPTION_HALT_VALIDATION THEN
388: null;
389: WHEN OTHERS THEN
390: OKL_API.SET_MESSAGE( p_app_name => G_APP_NAME
391: ,p_msg_name => G_UNEXPECTED_ERROR
392: ,p_token1 => G_SQLCODE_TOKEN
393: ,p_token1_value => SQLCODE
394: ,p_token2 => G_SQLERRM_TOKEN

Line 396: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

392: ,p_token1 => G_SQLCODE_TOKEN
393: ,p_token1_value => SQLCODE
394: ,p_token2 => G_SQLERRM_TOKEN
395: ,p_token2_value => SQLERRM);
396: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
397: END validate_id;
398: ----------------------------------------------------
399: -- Validate_Attributes for: OBJECT_VERSION_NUMBER --
400: ----------------------------------------------------

Line 405: x_return_status := OKL_API.G_RET_STS_SUCCESS;

401: PROCEDURE validate_object_version_number(
402: x_return_status OUT NOCOPY VARCHAR2,
403: p_object_version_number IN NUMBER) IS
404: BEGIN
405: x_return_status := OKL_API.G_RET_STS_SUCCESS;
406: IF (p_object_version_number = OKL_API.G_MISS_NUM OR
407: p_object_version_number IS NULL)
408: THEN
409: OKL_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'object_version_number');

Line 406: IF (p_object_version_number = OKL_API.G_MISS_NUM OR

402: x_return_status OUT NOCOPY VARCHAR2,
403: p_object_version_number IN NUMBER) IS
404: BEGIN
405: x_return_status := OKL_API.G_RET_STS_SUCCESS;
406: IF (p_object_version_number = OKL_API.G_MISS_NUM OR
407: p_object_version_number IS NULL)
408: THEN
409: OKL_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'object_version_number');
410: x_return_status := OKL_API.G_RET_STS_ERROR;

Line 409: OKL_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'object_version_number');

405: x_return_status := OKL_API.G_RET_STS_SUCCESS;
406: IF (p_object_version_number = OKL_API.G_MISS_NUM OR
407: p_object_version_number IS NULL)
408: THEN
409: OKL_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'object_version_number');
410: x_return_status := OKL_API.G_RET_STS_ERROR;
411: RAISE G_EXCEPTION_HALT_VALIDATION;
412: END IF;
413: /*Bug 4603850 :Commented

Line 410: x_return_status := OKL_API.G_RET_STS_ERROR;

406: IF (p_object_version_number = OKL_API.G_MISS_NUM OR
407: p_object_version_number IS NULL)
408: THEN
409: OKL_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'object_version_number');
410: x_return_status := OKL_API.G_RET_STS_ERROR;
411: RAISE G_EXCEPTION_HALT_VALIDATION;
412: END IF;
413: /*Bug 4603850 :Commented
414:

Line 421: IF (x_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

417: ,p_col_name => 'object_version_number'
418: ,p_col_value => p_object_version_number
419: ,x_return_status => x_return_status);
420: -- verify that length is within allowed limits
421: IF (x_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
422: x_return_status := OKL_API.G_RET_STS_ERROR;
423: RAISE G_EXCEPTION_HALT_VALIDATION;
424: END IF;
425: */

Line 422: x_return_status := OKL_API.G_RET_STS_ERROR;

418: ,p_col_value => p_object_version_number
419: ,x_return_status => x_return_status);
420: -- verify that length is within allowed limits
421: IF (x_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
422: x_return_status := OKL_API.G_RET_STS_ERROR;
423: RAISE G_EXCEPTION_HALT_VALIDATION;
424: END IF;
425: */
426:

Line 431: OKL_API.SET_MESSAGE( p_app_name => G_APP_NAME

427: EXCEPTION
428: WHEN G_EXCEPTION_HALT_VALIDATION THEN
429: null;
430: WHEN OTHERS THEN
431: OKL_API.SET_MESSAGE( p_app_name => G_APP_NAME
432: ,p_msg_name => G_UNEXPECTED_ERROR
433: ,p_token1 => G_SQLCODE_TOKEN
434: ,p_token1_value => SQLCODE
435: ,p_token2 => G_SQLERRM_TOKEN

Line 437: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

433: ,p_token1 => G_SQLCODE_TOKEN
434: ,p_token1_value => SQLCODE
435: ,p_token2 => G_SQLERRM_TOKEN
436: ,p_token2_value => SQLERRM);
437: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
438: END validate_object_version_number;
439: ---------------------------------------------------------------------------
440: -- FUNCTION Validate_Attributes
441: ---------------------------------------------------------------------------

Line 448: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

444: --------------------------------------------
445: FUNCTION Validate_Attributes (
446: p_tmgv_rec IN tmgv_rec_type
447: ) RETURN VARCHAR2 IS
448: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
449: x_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
450: BEGIN
451: /*Bug 4603850 :Commented
452: -- Call OKC_UTIL.ADD_VIEW to prepare the PL/SQL table to hold columns of view

Line 449: x_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

445: FUNCTION Validate_Attributes (
446: p_tmgv_rec IN tmgv_rec_type
447: ) RETURN VARCHAR2 IS
448: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
449: x_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
450: BEGIN
451: /*Bug 4603850 :Commented
452: -- Call OKC_UTIL.ADD_VIEW to prepare the PL/SQL table to hold columns of view
453: OKC_UTIL.ADD_VIEW('OKL_TRX_MSGS_V', x_return_status);

Line 454: IF (x_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

450: BEGIN
451: /*Bug 4603850 :Commented
452: -- Call OKC_UTIL.ADD_VIEW to prepare the PL/SQL table to hold columns of view
453: OKC_UTIL.ADD_VIEW('OKL_TRX_MSGS_V', x_return_status);
454: IF (x_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
455: l_return_status := x_return_status;
456: RAISE G_EXCEPTION_HALT_VALIDATION;
457: END IF;
458: */

Line 466: IF (x_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

462: -- ***
463: -- id
464: -- ***
465: validate_id(x_return_status, p_tmgv_rec.id);
466: IF (x_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
467: l_return_status := x_return_status;
468: RAISE G_EXCEPTION_HALT_VALIDATION;
469: END IF;
470:

Line 475: IF (x_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

471: -- ***
472: -- object_version_number
473: -- ***
474: validate_object_version_number(x_return_status, p_tmgv_rec.object_version_number);
475: IF (x_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
476: l_return_status := x_return_status;
477: RAISE G_EXCEPTION_HALT_VALIDATION;
478: END IF;
479:

Line 485: OKL_API.SET_MESSAGE( p_app_name => G_APP_NAME

481: EXCEPTION
482: WHEN G_EXCEPTION_HALT_VALIDATION THEN
483: RETURN(l_return_status);
484: WHEN OTHERS THEN
485: OKL_API.SET_MESSAGE( p_app_name => G_APP_NAME
486: ,p_msg_name => G_UNEXPECTED_ERROR
487: ,p_token1 => G_SQLCODE_TOKEN
488: ,p_token1_value => SQLCODE
489: ,p_token2 => G_SQLERRM_TOKEN

Line 491: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

487: ,p_token1 => G_SQLCODE_TOKEN
488: ,p_token1_value => SQLCODE
489: ,p_token2 => G_SQLERRM_TOKEN
490: ,p_token2_value => SQLERRM);
491: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
492: RETURN(l_return_status);
493: END Validate_Attributes;
494: ---------------------------------------------------------------------------
495: -- PROCEDURE Validate_Record

Line 504: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

500: FUNCTION Validate_Record (
501: p_tmgv_rec IN tmgv_rec_type,
502: p_db_tmgv_rec IN tmgv_rec_type
503: ) RETURN VARCHAR2 IS
504: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
505: ------------------------------------
506: -- FUNCTION validate_foreign_keys --
507: ------------------------------------
508: FUNCTION validate_foreign_keys (

Line 529: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

525: AND fnd_new_messages.message_name = p_message_name
526: AND fnd_new_messages.language_code = p_language_code;
527: l_fnd_new_messages_pk fnd_new_messages_pk_csr%ROWTYPE;
528:
529: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
530: l_row_notfound BOOLEAN := TRUE;
531: BEGIN
532: IF (((p_tmgv_rec.TMG_APPLICATION_ID IS NOT NULL) AND
533: (p_tmgv_rec.TMG_LANGUAGE_CODE IS NOT NULL) AND

Line 547: OKL_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'TMG_APPLICATION_ID');

543: FETCH fnd_new_messages_pk_csr INTO l_fnd_new_messages_pk;
544: l_row_notfound := fnd_new_messages_pk_csr%NOTFOUND;
545: CLOSE fnd_new_messages_pk_csr;
546: IF (l_row_notfound) THEN
547: OKL_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'TMG_APPLICATION_ID');
548: OKL_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'TMG_MESSAGE_NAME');
549: OKL_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'TMG_LANGUAGE_CODE');
550: RAISE item_not_found_error;
551: END IF;

Line 548: OKL_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'TMG_MESSAGE_NAME');

544: l_row_notfound := fnd_new_messages_pk_csr%NOTFOUND;
545: CLOSE fnd_new_messages_pk_csr;
546: IF (l_row_notfound) THEN
547: OKL_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'TMG_APPLICATION_ID');
548: OKL_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'TMG_MESSAGE_NAME');
549: OKL_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'TMG_LANGUAGE_CODE');
550: RAISE item_not_found_error;
551: END IF;
552: END IF;

Line 549: OKL_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'TMG_LANGUAGE_CODE');

545: CLOSE fnd_new_messages_pk_csr;
546: IF (l_row_notfound) THEN
547: OKL_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'TMG_APPLICATION_ID');
548: OKL_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'TMG_MESSAGE_NAME');
549: OKL_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'TMG_LANGUAGE_CODE');
550: RAISE item_not_found_error;
551: END IF;
552: END IF;
553: IF ((p_tmgv_rec.BCH_ID IS NOT NULL)

Line 562: OKL_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'BCH_ID');

558: FETCH okl_tmgv_bchv_fk_csr INTO l_okl_tmgv_bchv_fk;
559: l_row_notfound := okl_tmgv_bchv_fk_csr%NOTFOUND;
560: CLOSE okl_tmgv_bchv_fk_csr;
561: IF (l_row_notfound) THEN
562: OKL_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'BCH_ID');
563: RAISE item_not_found_error;
564: END IF;
565: END IF;
566: RETURN (l_return_status);

Line 569: l_return_status := OKL_API.G_RET_STS_ERROR;

565: END IF;
566: RETURN (l_return_status);
567: EXCEPTION
568: WHEN item_not_found_error THEN
569: l_return_status := OKL_API.G_RET_STS_ERROR;
570: RETURN (l_return_status);
571: END validate_foreign_keys;
572: BEGIN
573: l_return_status := validate_foreign_keys(p_tmgv_rec, p_db_tmgv_rec);

Line 579: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

575: END Validate_Record;
576: FUNCTION Validate_Record (
577: p_tmgv_rec IN tmgv_rec_type
578: ) RETURN VARCHAR2 IS
579: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
580: l_db_tmgv_rec tmgv_rec_type := get_rec(p_tmgv_rec);
581: BEGIN
582: l_return_status := Validate_Record(p_tmgv_rec => p_tmgv_rec,
583: p_db_tmgv_rec => l_db_tmgv_rec);

Line 657: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

653: -- validate_row for:OKL_TRX_MSGS_V --
654: -------------------------------------
655: PROCEDURE validate_row(
656: p_api_version IN NUMBER,
657: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
658: x_return_status OUT NOCOPY VARCHAR2,
659: x_msg_count OUT NOCOPY NUMBER,
660: x_msg_data OUT NOCOPY VARCHAR2,
661: p_tmgv_rec IN tmgv_rec_type) IS

Line 665: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

661: p_tmgv_rec IN tmgv_rec_type) IS
662:
663: l_api_version CONSTANT NUMBER := 1;
664: l_api_name CONSTANT VARCHAR2(30) := 'V_validate_row';
665: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
666: l_tmgv_rec tmgv_rec_type := p_tmgv_rec;
667: l_tmg_rec tmg_rec_type;
668: l_tmg_rec tmg_rec_type;
669: BEGIN

Line 670: l_return_status := OKL_API.START_ACTIVITY(l_api_name,

666: l_tmgv_rec tmgv_rec_type := p_tmgv_rec;
667: l_tmg_rec tmg_rec_type;
668: l_tmg_rec tmg_rec_type;
669: BEGIN
670: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
671: G_PKG_NAME,
672: p_init_msg_list,
673: l_api_version,
674: p_api_version,

Line 677: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

673: l_api_version,
674: p_api_version,
675: '_PVT',
676: x_return_status);
677: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
678: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
679: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
680: RAISE OKL_API.G_EXCEPTION_ERROR;
681: END IF;

Line 678: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

674: p_api_version,
675: '_PVT',
676: x_return_status);
677: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
678: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
679: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
680: RAISE OKL_API.G_EXCEPTION_ERROR;
681: END IF;
682: --- Validate all non-missing attributes (Item Level Validation)

Line 679: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

675: '_PVT',
676: x_return_status);
677: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
678: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
679: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
680: RAISE OKL_API.G_EXCEPTION_ERROR;
681: END IF;
682: --- Validate all non-missing attributes (Item Level Validation)
683: l_return_status := Validate_Attributes(l_tmgv_rec);

Line 680: RAISE OKL_API.G_EXCEPTION_ERROR;

676: x_return_status);
677: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
678: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
679: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
680: RAISE OKL_API.G_EXCEPTION_ERROR;
681: END IF;
682: --- Validate all non-missing attributes (Item Level Validation)
683: l_return_status := Validate_Attributes(l_tmgv_rec);
684: --- If any errors happen abort API

Line 685: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

681: END IF;
682: --- Validate all non-missing attributes (Item Level Validation)
683: l_return_status := Validate_Attributes(l_tmgv_rec);
684: --- If any errors happen abort API
685: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
686: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
687: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
688: RAISE OKL_API.G_EXCEPTION_ERROR;
689: END IF;

Line 686: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

682: --- Validate all non-missing attributes (Item Level Validation)
683: l_return_status := Validate_Attributes(l_tmgv_rec);
684: --- If any errors happen abort API
685: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
686: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
687: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
688: RAISE OKL_API.G_EXCEPTION_ERROR;
689: END IF;
690: l_return_status := Validate_Record(l_tmgv_rec);

Line 687: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

683: l_return_status := Validate_Attributes(l_tmgv_rec);
684: --- If any errors happen abort API
685: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
686: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
687: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
688: RAISE OKL_API.G_EXCEPTION_ERROR;
689: END IF;
690: l_return_status := Validate_Record(l_tmgv_rec);
691: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

Line 688: RAISE OKL_API.G_EXCEPTION_ERROR;

684: --- If any errors happen abort API
685: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
686: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
687: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
688: RAISE OKL_API.G_EXCEPTION_ERROR;
689: END IF;
690: l_return_status := Validate_Record(l_tmgv_rec);
691: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
692: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 691: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

687: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
688: RAISE OKL_API.G_EXCEPTION_ERROR;
689: END IF;
690: l_return_status := Validate_Record(l_tmgv_rec);
691: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
692: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
693: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
694: RAISE OKL_API.G_EXCEPTION_ERROR;
695: END IF;

Line 692: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

688: RAISE OKL_API.G_EXCEPTION_ERROR;
689: END IF;
690: l_return_status := Validate_Record(l_tmgv_rec);
691: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
692: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
693: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
694: RAISE OKL_API.G_EXCEPTION_ERROR;
695: END IF;
696: x_return_status := l_return_status;

Line 693: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

689: END IF;
690: l_return_status := Validate_Record(l_tmgv_rec);
691: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
692: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
693: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
694: RAISE OKL_API.G_EXCEPTION_ERROR;
695: END IF;
696: x_return_status := l_return_status;
697: EXCEPTION

Line 694: RAISE OKL_API.G_EXCEPTION_ERROR;

690: l_return_status := Validate_Record(l_tmgv_rec);
691: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
692: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
693: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
694: RAISE OKL_API.G_EXCEPTION_ERROR;
695: END IF;
696: x_return_status := l_return_status;
697: EXCEPTION
698: WHEN OKL_API.G_EXCEPTION_ERROR THEN

Line 698: WHEN OKL_API.G_EXCEPTION_ERROR THEN

694: RAISE OKL_API.G_EXCEPTION_ERROR;
695: END IF;
696: x_return_status := l_return_status;
697: EXCEPTION
698: WHEN OKL_API.G_EXCEPTION_ERROR THEN
699: x_return_status := OKL_API.HANDLE_EXCEPTIONS
700: (
701: l_api_name,
702: G_PKG_NAME,

Line 699: x_return_status := OKL_API.HANDLE_EXCEPTIONS

695: END IF;
696: x_return_status := l_return_status;
697: EXCEPTION
698: WHEN OKL_API.G_EXCEPTION_ERROR THEN
699: x_return_status := OKL_API.HANDLE_EXCEPTIONS
700: (
701: l_api_name,
702: G_PKG_NAME,
703: 'OKL_API.G_RET_STS_ERROR',

Line 703: 'OKL_API.G_RET_STS_ERROR',

699: x_return_status := OKL_API.HANDLE_EXCEPTIONS
700: (
701: l_api_name,
702: G_PKG_NAME,
703: 'OKL_API.G_RET_STS_ERROR',
704: x_msg_count,
705: x_msg_data,
706: '_PVT'
707: );

Line 708: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

704: x_msg_count,
705: x_msg_data,
706: '_PVT'
707: );
708: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
709: x_return_status := OKL_API.HANDLE_EXCEPTIONS
710: (
711: l_api_name,
712: G_PKG_NAME,

Line 709: x_return_status := OKL_API.HANDLE_EXCEPTIONS

705: x_msg_data,
706: '_PVT'
707: );
708: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
709: x_return_status := OKL_API.HANDLE_EXCEPTIONS
710: (
711: l_api_name,
712: G_PKG_NAME,
713: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 713: 'OKL_API.G_RET_STS_UNEXP_ERROR',

709: x_return_status := OKL_API.HANDLE_EXCEPTIONS
710: (
711: l_api_name,
712: G_PKG_NAME,
713: 'OKL_API.G_RET_STS_UNEXP_ERROR',
714: x_msg_count,
715: x_msg_data,
716: '_PVT'
717: );

Line 719: x_return_status := OKL_API.HANDLE_EXCEPTIONS

715: x_msg_data,
716: '_PVT'
717: );
718: WHEN OTHERS THEN
719: x_return_status := OKL_API.HANDLE_EXCEPTIONS
720: (
721: l_api_name,
722: G_PKG_NAME,
723: 'OTHERS',

Line 734: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

730: -- PL/SQL TBL validate_row for:OKL_TRX_MSGS_V --
731: ------------------------------------------------
732: PROCEDURE validate_row(
733: p_api_version IN NUMBER,
734: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
735: x_return_status OUT NOCOPY VARCHAR2,
736: x_msg_count OUT NOCOPY NUMBER,
737: x_msg_data OUT NOCOPY VARCHAR2,
738: p_tmgv_tbl IN tmgv_tbl_type,

Line 739: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS

735: x_return_status OUT NOCOPY VARCHAR2,
736: x_msg_count OUT NOCOPY NUMBER,
737: x_msg_data OUT NOCOPY VARCHAR2,
738: p_tmgv_tbl IN tmgv_tbl_type,
739: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS
740:
741: l_api_version CONSTANT NUMBER := 1;
742: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_validate_row';
743: i NUMBER := 0;

Line 745: OKL_API.init_msg_list(p_init_msg_list);

741: l_api_version CONSTANT NUMBER := 1;
742: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_validate_row';
743: i NUMBER := 0;
744: BEGIN
745: OKL_API.init_msg_list(p_init_msg_list);
746: -- Make sure PL/SQL table has records in it before passing
747: IF (p_tmgv_tbl.COUNT > 0) THEN
748: i := p_tmgv_tbl.FIRST;
749: LOOP

Line 751: l_error_rec OKL_API.ERROR_REC_TYPE;

747: IF (p_tmgv_tbl.COUNT > 0) THEN
748: i := p_tmgv_tbl.FIRST;
749: LOOP
750: DECLARE
751: l_error_rec OKL_API.ERROR_REC_TYPE;
752: BEGIN
753: l_error_rec.api_name := l_api_name;
754: l_error_rec.api_package := G_PKG_NAME;
755: l_error_rec.idx := i;

Line 758: p_init_msg_list => OKL_API.G_FALSE,

754: l_error_rec.api_package := G_PKG_NAME;
755: l_error_rec.idx := i;
756: validate_row (
757: p_api_version => p_api_version,
758: p_init_msg_list => OKL_API.G_FALSE,
759: x_return_status => l_error_rec.error_type,
760: x_msg_count => l_error_rec.msg_count,
761: x_msg_data => l_error_rec.msg_data,
762: p_tmgv_rec => p_tmgv_tbl(i));

Line 763: IF (l_error_rec.error_type <> OKL_API.G_RET_STS_SUCCESS) THEN

759: x_return_status => l_error_rec.error_type,
760: x_msg_count => l_error_rec.msg_count,
761: x_msg_data => l_error_rec.msg_data,
762: p_tmgv_rec => p_tmgv_tbl(i));
763: IF (l_error_rec.error_type <> OKL_API.G_RET_STS_SUCCESS) THEN
764: l_error_rec.sqlcode := SQLCODE;
765: load_error_tbl(l_error_rec, px_error_tbl);
766: ELSE
767: x_msg_count := l_error_rec.msg_count;

Line 771: WHEN OKL_API.G_EXCEPTION_ERROR THEN

767: x_msg_count := l_error_rec.msg_count;
768: x_msg_data := l_error_rec.msg_data;
769: END IF;
770: EXCEPTION
771: WHEN OKL_API.G_EXCEPTION_ERROR THEN
772: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
773: l_error_rec.sqlcode := SQLCODE;
774: load_error_tbl(l_error_rec, px_error_tbl);
775: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 772: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;

768: x_msg_data := l_error_rec.msg_data;
769: END IF;
770: EXCEPTION
771: WHEN OKL_API.G_EXCEPTION_ERROR THEN
772: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
773: l_error_rec.sqlcode := SQLCODE;
774: load_error_tbl(l_error_rec, px_error_tbl);
775: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
776: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;

Line 775: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

771: WHEN OKL_API.G_EXCEPTION_ERROR THEN
772: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
773: l_error_rec.sqlcode := SQLCODE;
774: load_error_tbl(l_error_rec, px_error_tbl);
775: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
776: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
777: l_error_rec.sqlcode := SQLCODE;
778: load_error_tbl(l_error_rec, px_error_tbl);
779: WHEN OTHERS THEN

Line 776: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;

772: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
773: l_error_rec.sqlcode := SQLCODE;
774: load_error_tbl(l_error_rec, px_error_tbl);
775: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
776: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
777: l_error_rec.sqlcode := SQLCODE;
778: load_error_tbl(l_error_rec, px_error_tbl);
779: WHEN OTHERS THEN
780: l_error_rec.error_type := 'OTHERS';

Line 791: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

787: END IF;
788: -- Loop through the error_tbl to find the error with the highest severity
789: -- and return it.
790: x_return_status := find_highest_exception(px_error_tbl);
791: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
792: EXCEPTION
793: WHEN OKL_API.G_EXCEPTION_ERROR THEN
794: x_return_status := OKL_API.HANDLE_EXCEPTIONS
795: (

Line 793: WHEN OKL_API.G_EXCEPTION_ERROR THEN

789: -- and return it.
790: x_return_status := find_highest_exception(px_error_tbl);
791: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
792: EXCEPTION
793: WHEN OKL_API.G_EXCEPTION_ERROR THEN
794: x_return_status := OKL_API.HANDLE_EXCEPTIONS
795: (
796: l_api_name,
797: G_PKG_NAME,

Line 794: x_return_status := OKL_API.HANDLE_EXCEPTIONS

790: x_return_status := find_highest_exception(px_error_tbl);
791: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
792: EXCEPTION
793: WHEN OKL_API.G_EXCEPTION_ERROR THEN
794: x_return_status := OKL_API.HANDLE_EXCEPTIONS
795: (
796: l_api_name,
797: G_PKG_NAME,
798: 'OKL_API.G_RET_STS_ERROR',

Line 798: 'OKL_API.G_RET_STS_ERROR',

794: x_return_status := OKL_API.HANDLE_EXCEPTIONS
795: (
796: l_api_name,
797: G_PKG_NAME,
798: 'OKL_API.G_RET_STS_ERROR',
799: x_msg_count,
800: x_msg_data,
801: '_PVT'
802: );

Line 803: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

799: x_msg_count,
800: x_msg_data,
801: '_PVT'
802: );
803: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
804: x_return_status := OKL_API.HANDLE_EXCEPTIONS
805: (
806: l_api_name,
807: G_PKG_NAME,

Line 804: x_return_status := OKL_API.HANDLE_EXCEPTIONS

800: x_msg_data,
801: '_PVT'
802: );
803: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
804: x_return_status := OKL_API.HANDLE_EXCEPTIONS
805: (
806: l_api_name,
807: G_PKG_NAME,
808: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 808: 'OKL_API.G_RET_STS_UNEXP_ERROR',

804: x_return_status := OKL_API.HANDLE_EXCEPTIONS
805: (
806: l_api_name,
807: G_PKG_NAME,
808: 'OKL_API.G_RET_STS_UNEXP_ERROR',
809: x_msg_count,
810: x_msg_data,
811: '_PVT'
812: );

Line 814: x_return_status := OKL_API.HANDLE_EXCEPTIONS

810: x_msg_data,
811: '_PVT'
812: );
813: WHEN OTHERS THEN
814: x_return_status := OKL_API.HANDLE_EXCEPTIONS
815: (
816: l_api_name,
817: G_PKG_NAME,
818: 'OTHERS',

Line 830: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

826: -- PL/SQL TBL validate_row for:OKL_TRX_MSGS_V --
827: ------------------------------------------------
828: PROCEDURE validate_row(
829: p_api_version IN NUMBER,
830: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
831: x_return_status OUT NOCOPY VARCHAR2,
832: x_msg_count OUT NOCOPY NUMBER,
833: x_msg_data OUT NOCOPY VARCHAR2,
834: p_tmgv_tbl IN tmgv_tbl_type) IS

Line 838: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

834: p_tmgv_tbl IN tmgv_tbl_type) IS
835:
836: l_api_version CONSTANT NUMBER := 1;
837: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
838: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
839: l_error_tbl OKL_API.ERROR_TBL_TYPE;
840: BEGIN
841: OKL_API.init_msg_list(p_init_msg_list);
842: -- Make sure PL/SQL table has records in it before passing

Line 839: l_error_tbl OKL_API.ERROR_TBL_TYPE;

835:
836: l_api_version CONSTANT NUMBER := 1;
837: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
838: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
839: l_error_tbl OKL_API.ERROR_TBL_TYPE;
840: BEGIN
841: OKL_API.init_msg_list(p_init_msg_list);
842: -- Make sure PL/SQL table has records in it before passing
843: IF (p_tmgv_tbl.COUNT > 0) THEN

Line 841: OKL_API.init_msg_list(p_init_msg_list);

837: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
838: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
839: l_error_tbl OKL_API.ERROR_TBL_TYPE;
840: BEGIN
841: OKL_API.init_msg_list(p_init_msg_list);
842: -- Make sure PL/SQL table has records in it before passing
843: IF (p_tmgv_tbl.COUNT > 0) THEN
844: validate_row (
845: p_api_version => p_api_version,

Line 846: p_init_msg_list => OKL_API.G_FALSE,

842: -- Make sure PL/SQL table has records in it before passing
843: IF (p_tmgv_tbl.COUNT > 0) THEN
844: validate_row (
845: p_api_version => p_api_version,
846: p_init_msg_list => OKL_API.G_FALSE,
847: x_return_status => x_return_status,
848: x_msg_count => x_msg_count,
849: x_msg_data => x_msg_data,
850: p_tmgv_tbl => p_tmgv_tbl,

Line 853: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

849: x_msg_data => x_msg_data,
850: p_tmgv_tbl => p_tmgv_tbl,
851: px_error_tbl => l_error_tbl);
852: END IF;
853: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
854: EXCEPTION
855: WHEN OKL_API.G_EXCEPTION_ERROR THEN
856: x_return_status := OKL_API.HANDLE_EXCEPTIONS
857: (

Line 855: WHEN OKL_API.G_EXCEPTION_ERROR THEN

851: px_error_tbl => l_error_tbl);
852: END IF;
853: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
854: EXCEPTION
855: WHEN OKL_API.G_EXCEPTION_ERROR THEN
856: x_return_status := OKL_API.HANDLE_EXCEPTIONS
857: (
858: l_api_name,
859: G_PKG_NAME,

Line 856: x_return_status := OKL_API.HANDLE_EXCEPTIONS

852: END IF;
853: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
854: EXCEPTION
855: WHEN OKL_API.G_EXCEPTION_ERROR THEN
856: x_return_status := OKL_API.HANDLE_EXCEPTIONS
857: (
858: l_api_name,
859: G_PKG_NAME,
860: 'OKL_API.G_RET_STS_ERROR',

Line 860: 'OKL_API.G_RET_STS_ERROR',

856: x_return_status := OKL_API.HANDLE_EXCEPTIONS
857: (
858: l_api_name,
859: G_PKG_NAME,
860: 'OKL_API.G_RET_STS_ERROR',
861: x_msg_count,
862: x_msg_data,
863: '_PVT'
864: );

Line 865: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

861: x_msg_count,
862: x_msg_data,
863: '_PVT'
864: );
865: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
866: x_return_status := OKL_API.HANDLE_EXCEPTIONS
867: (
868: l_api_name,
869: G_PKG_NAME,

Line 866: x_return_status := OKL_API.HANDLE_EXCEPTIONS

862: x_msg_data,
863: '_PVT'
864: );
865: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
866: x_return_status := OKL_API.HANDLE_EXCEPTIONS
867: (
868: l_api_name,
869: G_PKG_NAME,
870: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 870: 'OKL_API.G_RET_STS_UNEXP_ERROR',

866: x_return_status := OKL_API.HANDLE_EXCEPTIONS
867: (
868: l_api_name,
869: G_PKG_NAME,
870: 'OKL_API.G_RET_STS_UNEXP_ERROR',
871: x_msg_count,
872: x_msg_data,
873: '_PVT'
874: );

Line 876: x_return_status := OKL_API.HANDLE_EXCEPTIONS

872: x_msg_data,
873: '_PVT'
874: );
875: WHEN OTHERS THEN
876: x_return_status := OKL_API.HANDLE_EXCEPTIONS
877: (
878: l_api_name,
879: G_PKG_NAME,
880: 'OTHERS',

Line 895: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

891: ---------------------------------
892: -- insert_row for:OKL_TRX_MSGS --
893: ---------------------------------
894: PROCEDURE insert_row(
895: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
896: x_return_status OUT NOCOPY VARCHAR2,
897: x_msg_count OUT NOCOPY NUMBER,
898: x_msg_data OUT NOCOPY VARCHAR2,
899: p_tmg_rec IN tmg_rec_type,

Line 904: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

900: x_tmg_rec OUT NOCOPY tmg_rec_type) IS
901:
902: l_api_version CONSTANT NUMBER := 1;
903: l_api_name CONSTANT VARCHAR2(30) := 'B_insert_row';
904: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
905: l_tmg_rec tmg_rec_type := p_tmg_rec;
906: l_def_tmg_rec tmg_rec_type;
907: -------------------------------------
908: -- Set_Attributes for:OKL_TRX_MSGS --

Line 914: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

910: FUNCTION Set_Attributes (
911: p_tmg_rec IN tmg_rec_type,
912: x_tmg_rec OUT NOCOPY tmg_rec_type
913: ) RETURN VARCHAR2 IS
914: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
915: BEGIN
916: x_tmg_rec := p_tmg_rec;
917: RETURN(l_return_status);
918: END Set_Attributes;

Line 920: l_return_status := OKL_API.START_ACTIVITY(l_api_name,

916: x_tmg_rec := p_tmg_rec;
917: RETURN(l_return_status);
918: END Set_Attributes;
919: BEGIN
920: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
921: p_init_msg_list,
922: '_PVT',
923: x_return_status);
924: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

Line 924: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

920: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
921: p_init_msg_list,
922: '_PVT',
923: x_return_status);
924: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
925: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
926: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
927: RAISE OKL_API.G_EXCEPTION_ERROR;
928: END IF;

Line 925: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

921: p_init_msg_list,
922: '_PVT',
923: x_return_status);
924: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
925: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
926: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
927: RAISE OKL_API.G_EXCEPTION_ERROR;
928: END IF;
929: --- Setting item atributes

Line 926: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

922: '_PVT',
923: x_return_status);
924: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
925: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
926: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
927: RAISE OKL_API.G_EXCEPTION_ERROR;
928: END IF;
929: --- Setting item atributes
930: l_return_status := Set_Attributes(

Line 927: RAISE OKL_API.G_EXCEPTION_ERROR;

923: x_return_status);
924: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
925: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
926: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
927: RAISE OKL_API.G_EXCEPTION_ERROR;
928: END IF;
929: --- Setting item atributes
930: l_return_status := Set_Attributes(
931: p_tmg_rec, -- IN

Line 934: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

930: l_return_status := Set_Attributes(
931: p_tmg_rec, -- IN
932: l_tmg_rec); -- OUT
933: --- If any errors happen abort API
934: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
935: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
936: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
937: RAISE OKL_API.G_EXCEPTION_ERROR;
938: END IF;

Line 935: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

931: p_tmg_rec, -- IN
932: l_tmg_rec); -- OUT
933: --- If any errors happen abort API
934: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
935: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
936: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
937: RAISE OKL_API.G_EXCEPTION_ERROR;
938: END IF;
939: INSERT INTO OKL_TRX_MSGS(

Line 936: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

932: l_tmg_rec); -- OUT
933: --- If any errors happen abort API
934: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
935: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
936: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
937: RAISE OKL_API.G_EXCEPTION_ERROR;
938: END IF;
939: INSERT INTO OKL_TRX_MSGS(
940: id,

Line 937: RAISE OKL_API.G_EXCEPTION_ERROR;

933: --- If any errors happen abort API
934: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
935: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
936: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
937: RAISE OKL_API.G_EXCEPTION_ERROR;
938: END IF;
939: INSERT INTO OKL_TRX_MSGS(
940: id,
941: sequence_number,

Line 986: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

982: );
983: -- Set OUT values
984: x_tmg_rec := l_tmg_rec;
985: x_return_status := l_return_status;
986: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
987: EXCEPTION
988: WHEN OKL_API.G_EXCEPTION_ERROR THEN
989: x_return_status := OKL_API.HANDLE_EXCEPTIONS
990: (

Line 988: WHEN OKL_API.G_EXCEPTION_ERROR THEN

984: x_tmg_rec := l_tmg_rec;
985: x_return_status := l_return_status;
986: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
987: EXCEPTION
988: WHEN OKL_API.G_EXCEPTION_ERROR THEN
989: x_return_status := OKL_API.HANDLE_EXCEPTIONS
990: (
991: l_api_name,
992: G_PKG_NAME,

Line 989: x_return_status := OKL_API.HANDLE_EXCEPTIONS

985: x_return_status := l_return_status;
986: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
987: EXCEPTION
988: WHEN OKL_API.G_EXCEPTION_ERROR THEN
989: x_return_status := OKL_API.HANDLE_EXCEPTIONS
990: (
991: l_api_name,
992: G_PKG_NAME,
993: 'OKL_API.G_RET_STS_ERROR',

Line 993: 'OKL_API.G_RET_STS_ERROR',

989: x_return_status := OKL_API.HANDLE_EXCEPTIONS
990: (
991: l_api_name,
992: G_PKG_NAME,
993: 'OKL_API.G_RET_STS_ERROR',
994: x_msg_count,
995: x_msg_data,
996: '_PVT'
997: );

Line 998: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

994: x_msg_count,
995: x_msg_data,
996: '_PVT'
997: );
998: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
999: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1000: (
1001: l_api_name,
1002: G_PKG_NAME,

Line 999: x_return_status := OKL_API.HANDLE_EXCEPTIONS

995: x_msg_data,
996: '_PVT'
997: );
998: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
999: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1000: (
1001: l_api_name,
1002: G_PKG_NAME,
1003: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 1003: 'OKL_API.G_RET_STS_UNEXP_ERROR',

999: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1000: (
1001: l_api_name,
1002: G_PKG_NAME,
1003: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1004: x_msg_count,
1005: x_msg_data,
1006: '_PVT'
1007: );

Line 1009: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1005: x_msg_data,
1006: '_PVT'
1007: );
1008: WHEN OTHERS THEN
1009: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1010: (
1011: l_api_name,
1012: G_PKG_NAME,
1013: 'OTHERS',

Line 1024: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

1020: -- insert_row for :OKL_TRX_MSGS_V --
1021: ------------------------------------
1022: PROCEDURE insert_row(
1023: p_api_version IN NUMBER,
1024: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
1025: x_return_status OUT NOCOPY VARCHAR2,
1026: x_msg_count OUT NOCOPY NUMBER,
1027: x_msg_data OUT NOCOPY VARCHAR2,
1028: p_tmgv_rec IN tmgv_rec_type,

Line 1033: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

1029: x_tmgv_rec OUT NOCOPY tmgv_rec_type) IS
1030:
1031: l_api_version CONSTANT NUMBER := 1;
1032: l_api_name CONSTANT VARCHAR2(30) := 'V_insert_row';
1033: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1034: l_tmgv_rec tmgv_rec_type := p_tmgv_rec;
1035: l_def_tmgv_rec tmgv_rec_type;
1036: l_tmg_rec tmg_rec_type;
1037: lx_tmg_rec tmg_rec_type;

Line 1060: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

1056: FUNCTION Set_Attributes (
1057: p_tmgv_rec IN tmgv_rec_type,
1058: x_tmgv_rec OUT NOCOPY tmgv_rec_type
1059: ) RETURN VARCHAR2 IS
1060: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1061: BEGIN
1062: x_tmgv_rec := p_tmgv_rec;
1063: x_tmgv_rec.OBJECT_VERSION_NUMBER := 1;
1064: RETURN(l_return_status);

Line 1067: l_return_status := OKL_API.START_ACTIVITY(l_api_name,

1063: x_tmgv_rec.OBJECT_VERSION_NUMBER := 1;
1064: RETURN(l_return_status);
1065: END Set_Attributes;
1066: BEGIN
1067: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
1068: G_PKG_NAME,
1069: p_init_msg_list,
1070: l_api_version,
1071: p_api_version,

Line 1074: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1070: l_api_version,
1071: p_api_version,
1072: '_PVT',
1073: x_return_status);
1074: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1075: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1076: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1077: RAISE OKL_API.G_EXCEPTION_ERROR;
1078: END IF;

Line 1075: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1071: p_api_version,
1072: '_PVT',
1073: x_return_status);
1074: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1075: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1076: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1077: RAISE OKL_API.G_EXCEPTION_ERROR;
1078: END IF;
1079: l_tmgv_rec := null_out_defaults(p_tmgv_rec);

Line 1076: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

1072: '_PVT',
1073: x_return_status);
1074: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1075: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1076: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1077: RAISE OKL_API.G_EXCEPTION_ERROR;
1078: END IF;
1079: l_tmgv_rec := null_out_defaults(p_tmgv_rec);
1080: -- Set primary key value

Line 1077: RAISE OKL_API.G_EXCEPTION_ERROR;

1073: x_return_status);
1074: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1075: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1076: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1077: RAISE OKL_API.G_EXCEPTION_ERROR;
1078: END IF;
1079: l_tmgv_rec := null_out_defaults(p_tmgv_rec);
1080: -- Set primary key value
1081: l_tmgv_rec.ID := get_seq_id;

Line 1087: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1083: l_return_Status := Set_Attributes(
1084: l_tmgv_rec, -- IN
1085: l_def_tmgv_rec); -- OUT
1086: --- If any errors happen abort API
1087: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1088: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1089: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1090: RAISE OKL_API.G_EXCEPTION_ERROR;
1091: END IF;

Line 1088: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1084: l_tmgv_rec, -- IN
1085: l_def_tmgv_rec); -- OUT
1086: --- If any errors happen abort API
1087: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1088: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1089: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1090: RAISE OKL_API.G_EXCEPTION_ERROR;
1091: END IF;
1092: l_def_tmgv_rec := fill_who_columns(l_def_tmgv_rec);

Line 1089: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

1085: l_def_tmgv_rec); -- OUT
1086: --- If any errors happen abort API
1087: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1088: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1089: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1090: RAISE OKL_API.G_EXCEPTION_ERROR;
1091: END IF;
1092: l_def_tmgv_rec := fill_who_columns(l_def_tmgv_rec);
1093: --- Validate all non-missing attributes (Item Level Validation)

Line 1090: RAISE OKL_API.G_EXCEPTION_ERROR;

1086: --- If any errors happen abort API
1087: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1088: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1089: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1090: RAISE OKL_API.G_EXCEPTION_ERROR;
1091: END IF;
1092: l_def_tmgv_rec := fill_who_columns(l_def_tmgv_rec);
1093: --- Validate all non-missing attributes (Item Level Validation)
1094: l_return_status := Validate_Attributes(l_def_tmgv_rec);

Line 1096: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1092: l_def_tmgv_rec := fill_who_columns(l_def_tmgv_rec);
1093: --- Validate all non-missing attributes (Item Level Validation)
1094: l_return_status := Validate_Attributes(l_def_tmgv_rec);
1095: --- If any errors happen abort API
1096: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1097: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1098: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1099: RAISE OKL_API.G_EXCEPTION_ERROR;
1100: END IF;

Line 1097: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1093: --- Validate all non-missing attributes (Item Level Validation)
1094: l_return_status := Validate_Attributes(l_def_tmgv_rec);
1095: --- If any errors happen abort API
1096: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1097: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1098: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1099: RAISE OKL_API.G_EXCEPTION_ERROR;
1100: END IF;
1101: l_return_status := Validate_Record(l_def_tmgv_rec);

Line 1098: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

1094: l_return_status := Validate_Attributes(l_def_tmgv_rec);
1095: --- If any errors happen abort API
1096: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1097: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1098: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1099: RAISE OKL_API.G_EXCEPTION_ERROR;
1100: END IF;
1101: l_return_status := Validate_Record(l_def_tmgv_rec);
1102: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1099: RAISE OKL_API.G_EXCEPTION_ERROR;

1095: --- If any errors happen abort API
1096: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1097: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1098: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1099: RAISE OKL_API.G_EXCEPTION_ERROR;
1100: END IF;
1101: l_return_status := Validate_Record(l_def_tmgv_rec);
1102: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1103: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1102: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1098: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1099: RAISE OKL_API.G_EXCEPTION_ERROR;
1100: END IF;
1101: l_return_status := Validate_Record(l_def_tmgv_rec);
1102: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1103: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1104: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1105: RAISE OKL_API.G_EXCEPTION_ERROR;
1106: END IF;

Line 1103: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1099: RAISE OKL_API.G_EXCEPTION_ERROR;
1100: END IF;
1101: l_return_status := Validate_Record(l_def_tmgv_rec);
1102: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1103: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1104: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1105: RAISE OKL_API.G_EXCEPTION_ERROR;
1106: END IF;
1107: -----------------------------------------

Line 1104: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

1100: END IF;
1101: l_return_status := Validate_Record(l_def_tmgv_rec);
1102: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1103: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1104: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1105: RAISE OKL_API.G_EXCEPTION_ERROR;
1106: END IF;
1107: -----------------------------------------
1108: -- Move VIEW record to "Child" records --

Line 1105: RAISE OKL_API.G_EXCEPTION_ERROR;

1101: l_return_status := Validate_Record(l_def_tmgv_rec);
1102: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1103: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1104: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1105: RAISE OKL_API.G_EXCEPTION_ERROR;
1106: END IF;
1107: -----------------------------------------
1108: -- Move VIEW record to "Child" records --
1109: -----------------------------------------

Line 1122: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1118: x_msg_data,
1119: l_tmg_rec,
1120: lx_tmg_rec
1121: );
1122: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1123: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1124: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1125: RAISE OKL_API.G_EXCEPTION_ERROR;
1126: END IF;

Line 1123: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1119: l_tmg_rec,
1120: lx_tmg_rec
1121: );
1122: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1123: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1124: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1125: RAISE OKL_API.G_EXCEPTION_ERROR;
1126: END IF;
1127: migrate(lx_tmg_rec, l_def_tmgv_rec);

Line 1124: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

1120: lx_tmg_rec
1121: );
1122: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1123: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1124: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1125: RAISE OKL_API.G_EXCEPTION_ERROR;
1126: END IF;
1127: migrate(lx_tmg_rec, l_def_tmgv_rec);
1128: -- Set OUT values

Line 1125: RAISE OKL_API.G_EXCEPTION_ERROR;

1121: );
1122: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1123: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1124: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1125: RAISE OKL_API.G_EXCEPTION_ERROR;
1126: END IF;
1127: migrate(lx_tmg_rec, l_def_tmgv_rec);
1128: -- Set OUT values
1129: x_tmgv_rec := l_def_tmgv_rec;

Line 1131: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

1127: migrate(lx_tmg_rec, l_def_tmgv_rec);
1128: -- Set OUT values
1129: x_tmgv_rec := l_def_tmgv_rec;
1130: x_return_status := l_return_status;
1131: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1132: EXCEPTION
1133: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1134: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1135: (

Line 1133: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1129: x_tmgv_rec := l_def_tmgv_rec;
1130: x_return_status := l_return_status;
1131: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1132: EXCEPTION
1133: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1134: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1135: (
1136: l_api_name,
1137: G_PKG_NAME,

Line 1134: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1130: x_return_status := l_return_status;
1131: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1132: EXCEPTION
1133: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1134: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1135: (
1136: l_api_name,
1137: G_PKG_NAME,
1138: 'OKL_API.G_RET_STS_ERROR',

Line 1138: 'OKL_API.G_RET_STS_ERROR',

1134: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1135: (
1136: l_api_name,
1137: G_PKG_NAME,
1138: 'OKL_API.G_RET_STS_ERROR',
1139: x_msg_count,
1140: x_msg_data,
1141: '_PVT'
1142: );

Line 1143: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1139: x_msg_count,
1140: x_msg_data,
1141: '_PVT'
1142: );
1143: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1144: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1145: (
1146: l_api_name,
1147: G_PKG_NAME,

Line 1144: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1140: x_msg_data,
1141: '_PVT'
1142: );
1143: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1144: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1145: (
1146: l_api_name,
1147: G_PKG_NAME,
1148: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 1148: 'OKL_API.G_RET_STS_UNEXP_ERROR',

1144: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1145: (
1146: l_api_name,
1147: G_PKG_NAME,
1148: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1149: x_msg_count,
1150: x_msg_data,
1151: '_PVT'
1152: );

Line 1154: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1150: x_msg_data,
1151: '_PVT'
1152: );
1153: WHEN OTHERS THEN
1154: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1155: (
1156: l_api_name,
1157: G_PKG_NAME,
1158: 'OTHERS',

Line 1169: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

1165: -- PL/SQL TBL insert_row for:TMGV_TBL --
1166: ----------------------------------------
1167: PROCEDURE insert_row(
1168: p_api_version IN NUMBER,
1169: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
1170: x_return_status OUT NOCOPY VARCHAR2,
1171: x_msg_count OUT NOCOPY NUMBER,
1172: x_msg_data OUT NOCOPY VARCHAR2,
1173: p_tmgv_tbl IN tmgv_tbl_type,

Line 1175: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS

1171: x_msg_count OUT NOCOPY NUMBER,
1172: x_msg_data OUT NOCOPY VARCHAR2,
1173: p_tmgv_tbl IN tmgv_tbl_type,
1174: x_tmgv_tbl OUT NOCOPY tmgv_tbl_type,
1175: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS
1176:
1177: l_api_version CONSTANT NUMBER := 1;
1178: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_insert_row';
1179: i NUMBER := 0;

Line 1181: OKL_API.init_msg_list(p_init_msg_list);

1177: l_api_version CONSTANT NUMBER := 1;
1178: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_insert_row';
1179: i NUMBER := 0;
1180: BEGIN
1181: OKL_API.init_msg_list(p_init_msg_list);
1182: -- Make sure PL/SQL table has records in it before passing
1183: IF (p_tmgv_tbl.COUNT > 0) THEN
1184: i := p_tmgv_tbl.FIRST;
1185: LOOP

Line 1187: l_error_rec OKL_API.ERROR_REC_TYPE;

1183: IF (p_tmgv_tbl.COUNT > 0) THEN
1184: i := p_tmgv_tbl.FIRST;
1185: LOOP
1186: DECLARE
1187: l_error_rec OKL_API.ERROR_REC_TYPE;
1188: BEGIN
1189: l_error_rec.api_name := l_api_name;
1190: l_error_rec.api_package := G_PKG_NAME;
1191: l_error_rec.idx := i;

Line 1194: p_init_msg_list => OKL_API.G_FALSE,

1190: l_error_rec.api_package := G_PKG_NAME;
1191: l_error_rec.idx := i;
1192: insert_row (
1193: p_api_version => p_api_version,
1194: p_init_msg_list => OKL_API.G_FALSE,
1195: x_return_status => l_error_rec.error_type,
1196: x_msg_count => l_error_rec.msg_count,
1197: x_msg_data => l_error_rec.msg_data,
1198: p_tmgv_rec => p_tmgv_tbl(i),

Line 1200: IF (l_error_rec.error_type <> OKL_API.G_RET_STS_SUCCESS) THEN

1196: x_msg_count => l_error_rec.msg_count,
1197: x_msg_data => l_error_rec.msg_data,
1198: p_tmgv_rec => p_tmgv_tbl(i),
1199: x_tmgv_rec => x_tmgv_tbl(i));
1200: IF (l_error_rec.error_type <> OKL_API.G_RET_STS_SUCCESS) THEN
1201: l_error_rec.sqlcode := SQLCODE;
1202: load_error_tbl(l_error_rec, px_error_tbl);
1203: ELSE
1204: x_msg_count := l_error_rec.msg_count;

Line 1208: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1204: x_msg_count := l_error_rec.msg_count;
1205: x_msg_data := l_error_rec.msg_data;
1206: END IF;
1207: EXCEPTION
1208: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1209: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
1210: l_error_rec.sqlcode := SQLCODE;
1211: load_error_tbl(l_error_rec, px_error_tbl);
1212: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1209: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;

1205: x_msg_data := l_error_rec.msg_data;
1206: END IF;
1207: EXCEPTION
1208: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1209: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
1210: l_error_rec.sqlcode := SQLCODE;
1211: load_error_tbl(l_error_rec, px_error_tbl);
1212: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1213: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;

Line 1212: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1208: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1209: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
1210: l_error_rec.sqlcode := SQLCODE;
1211: load_error_tbl(l_error_rec, px_error_tbl);
1212: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1213: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
1214: l_error_rec.sqlcode := SQLCODE;
1215: load_error_tbl(l_error_rec, px_error_tbl);
1216: WHEN OTHERS THEN

Line 1213: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;

1209: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
1210: l_error_rec.sqlcode := SQLCODE;
1211: load_error_tbl(l_error_rec, px_error_tbl);
1212: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1213: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
1214: l_error_rec.sqlcode := SQLCODE;
1215: load_error_tbl(l_error_rec, px_error_tbl);
1216: WHEN OTHERS THEN
1217: l_error_rec.error_type := 'OTHERS';

Line 1228: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

1224: END IF;
1225: -- Loop through the error_tbl to find the error with the highest severity
1226: -- and return it.
1227: x_return_status := find_highest_exception(px_error_tbl);
1228: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1229: EXCEPTION
1230: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1231: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1232: (

Line 1230: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1226: -- and return it.
1227: x_return_status := find_highest_exception(px_error_tbl);
1228: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1229: EXCEPTION
1230: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1231: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1232: (
1233: l_api_name,
1234: G_PKG_NAME,

Line 1231: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1227: x_return_status := find_highest_exception(px_error_tbl);
1228: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1229: EXCEPTION
1230: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1231: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1232: (
1233: l_api_name,
1234: G_PKG_NAME,
1235: 'OKL_API.G_RET_STS_ERROR',

Line 1235: 'OKL_API.G_RET_STS_ERROR',

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

Line 1240: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1236: x_msg_count,
1237: x_msg_data,
1238: '_PVT'
1239: );
1240: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1241: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1242: (
1243: l_api_name,
1244: G_PKG_NAME,

Line 1241: x_return_status := OKL_API.HANDLE_EXCEPTIONS

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

Line 1245: 'OKL_API.G_RET_STS_UNEXP_ERROR',

1241: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1242: (
1243: l_api_name,
1244: G_PKG_NAME,
1245: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1246: x_msg_count,
1247: x_msg_data,
1248: '_PVT'
1249: );

Line 1251: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1247: x_msg_data,
1248: '_PVT'
1249: );
1250: WHEN OTHERS THEN
1251: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1252: (
1253: l_api_name,
1254: G_PKG_NAME,
1255: 'OTHERS',

Line 1267: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

1263: -- PL/SQL TBL insert_row for:TMGV_TBL --
1264: ----------------------------------------
1265: PROCEDURE insert_row(
1266: p_api_version IN NUMBER,
1267: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
1268: x_return_status OUT NOCOPY VARCHAR2,
1269: x_msg_count OUT NOCOPY NUMBER,
1270: x_msg_data OUT NOCOPY VARCHAR2,
1271: p_tmgv_tbl IN tmgv_tbl_type,

Line 1276: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

1272: x_tmgv_tbl OUT NOCOPY tmgv_tbl_type) IS
1273:
1274: l_api_version CONSTANT NUMBER := 1;
1275: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
1276: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1277: l_error_tbl OKL_API.ERROR_TBL_TYPE;
1278: BEGIN
1279: OKL_API.init_msg_list(p_init_msg_list);
1280: -- Make sure PL/SQL table has records in it before passing

Line 1277: l_error_tbl OKL_API.ERROR_TBL_TYPE;

1273:
1274: l_api_version CONSTANT NUMBER := 1;
1275: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
1276: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1277: l_error_tbl OKL_API.ERROR_TBL_TYPE;
1278: BEGIN
1279: OKL_API.init_msg_list(p_init_msg_list);
1280: -- Make sure PL/SQL table has records in it before passing
1281: IF (p_tmgv_tbl.COUNT > 0) THEN

Line 1279: OKL_API.init_msg_list(p_init_msg_list);

1275: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
1276: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1277: l_error_tbl OKL_API.ERROR_TBL_TYPE;
1278: BEGIN
1279: OKL_API.init_msg_list(p_init_msg_list);
1280: -- Make sure PL/SQL table has records in it before passing
1281: IF (p_tmgv_tbl.COUNT > 0) THEN
1282: insert_row (
1283: p_api_version => p_api_version,

Line 1284: p_init_msg_list => OKL_API.G_FALSE,

1280: -- Make sure PL/SQL table has records in it before passing
1281: IF (p_tmgv_tbl.COUNT > 0) THEN
1282: insert_row (
1283: p_api_version => p_api_version,
1284: p_init_msg_list => OKL_API.G_FALSE,
1285: x_return_status => x_return_status,
1286: x_msg_count => x_msg_count,
1287: x_msg_data => x_msg_data,
1288: p_tmgv_tbl => p_tmgv_tbl,

Line 1292: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

1288: p_tmgv_tbl => p_tmgv_tbl,
1289: x_tmgv_tbl => x_tmgv_tbl,
1290: px_error_tbl => l_error_tbl);
1291: END IF;
1292: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1293: EXCEPTION
1294: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1295: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1296: (

Line 1294: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1290: px_error_tbl => l_error_tbl);
1291: END IF;
1292: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1293: EXCEPTION
1294: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1295: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1296: (
1297: l_api_name,
1298: G_PKG_NAME,

Line 1295: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1291: END IF;
1292: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1293: EXCEPTION
1294: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1295: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1296: (
1297: l_api_name,
1298: G_PKG_NAME,
1299: 'OKL_API.G_RET_STS_ERROR',

Line 1299: 'OKL_API.G_RET_STS_ERROR',

1295: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1296: (
1297: l_api_name,
1298: G_PKG_NAME,
1299: 'OKL_API.G_RET_STS_ERROR',
1300: x_msg_count,
1301: x_msg_data,
1302: '_PVT'
1303: );

Line 1304: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

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

Line 1305: x_return_status := OKL_API.HANDLE_EXCEPTIONS

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

Line 1309: 'OKL_API.G_RET_STS_UNEXP_ERROR',

1305: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1306: (
1307: l_api_name,
1308: G_PKG_NAME,
1309: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1310: x_msg_count,
1311: x_msg_data,
1312: '_PVT'
1313: );

Line 1315: x_return_status := OKL_API.HANDLE_EXCEPTIONS

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

Line 1333: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

1329: -------------------------------
1330: -- lock_row for:OKL_TRX_MSGS --
1331: -------------------------------
1332: PROCEDURE lock_row(
1333: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
1334: x_return_status OUT NOCOPY VARCHAR2,
1335: x_msg_count OUT NOCOPY NUMBER,
1336: x_msg_data OUT NOCOPY VARCHAR2,
1337: p_tmg_rec IN tmg_rec_type) IS

Line 1354: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

1350: FROM OKL_TRX_MSGS
1351: WHERE ID = p_tmg_rec.id;
1352: l_api_version CONSTANT NUMBER := 1;
1353: l_api_name CONSTANT VARCHAR2(30) := 'B_lock_row';
1354: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1355: l_object_version_number OKL_TRX_MSGS.OBJECT_VERSION_NUMBER%TYPE;
1356: lc_object_version_number OKL_TRX_MSGS.OBJECT_VERSION_NUMBER%TYPE;
1357: l_row_notfound BOOLEAN := FALSE;
1358: lc_row_notfound BOOLEAN := FALSE;

Line 1360: l_return_status := OKL_API.START_ACTIVITY(l_api_name,

1356: lc_object_version_number OKL_TRX_MSGS.OBJECT_VERSION_NUMBER%TYPE;
1357: l_row_notfound BOOLEAN := FALSE;
1358: lc_row_notfound BOOLEAN := FALSE;
1359: BEGIN
1360: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
1361: p_init_msg_list,
1362: '_PVT',
1363: x_return_status);
1364: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1364: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1360: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
1361: p_init_msg_list,
1362: '_PVT',
1363: x_return_status);
1364: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1365: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1366: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1367: RAISE OKL_API.G_EXCEPTION_ERROR;
1368: END IF;

Line 1365: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1361: p_init_msg_list,
1362: '_PVT',
1363: x_return_status);
1364: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1365: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1366: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1367: RAISE OKL_API.G_EXCEPTION_ERROR;
1368: END IF;
1369: BEGIN

Line 1366: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

1362: '_PVT',
1363: x_return_status);
1364: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1365: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1366: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1367: RAISE OKL_API.G_EXCEPTION_ERROR;
1368: END IF;
1369: BEGIN
1370: OPEN lock_csr(p_tmg_rec);

Line 1367: RAISE OKL_API.G_EXCEPTION_ERROR;

1363: x_return_status);
1364: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1365: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1366: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1367: RAISE OKL_API.G_EXCEPTION_ERROR;
1368: END IF;
1369: BEGIN
1370: OPEN lock_csr(p_tmg_rec);
1371: FETCH lock_csr INTO l_object_version_number;

Line 1379: OKL_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);

1375: WHEN E_Resource_Busy THEN
1376: IF (lock_csr%ISOPEN) THEN
1377: CLOSE lock_csr;
1378: END IF;
1379: OKL_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);
1380: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
1381: END;
1382:
1383: IF ( l_row_notfound ) THEN

Line 1390: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);

1386: lc_row_notfound := lchk_csr%NOTFOUND;
1387: CLOSE lchk_csr;
1388: END IF;
1389: IF (lc_row_notfound) THEN
1390: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1391: RAISE OKL_API.G_EXCEPTION_ERROR;
1392: ELSIF lc_object_version_number > p_tmg_rec.object_version_number THEN
1393: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1394: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 1391: RAISE OKL_API.G_EXCEPTION_ERROR;

1387: CLOSE lchk_csr;
1388: END IF;
1389: IF (lc_row_notfound) THEN
1390: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1391: RAISE OKL_API.G_EXCEPTION_ERROR;
1392: ELSIF lc_object_version_number > p_tmg_rec.object_version_number THEN
1393: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1394: RAISE OKL_API.G_EXCEPTION_ERROR;
1395: ELSIF lc_object_version_number <> p_tmg_rec.object_version_number THEN

Line 1393: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);

1389: IF (lc_row_notfound) THEN
1390: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1391: RAISE OKL_API.G_EXCEPTION_ERROR;
1392: ELSIF lc_object_version_number > p_tmg_rec.object_version_number THEN
1393: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1394: RAISE OKL_API.G_EXCEPTION_ERROR;
1395: ELSIF lc_object_version_number <> p_tmg_rec.object_version_number THEN
1396: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1397: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 1394: RAISE OKL_API.G_EXCEPTION_ERROR;

1390: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1391: RAISE OKL_API.G_EXCEPTION_ERROR;
1392: ELSIF lc_object_version_number > p_tmg_rec.object_version_number THEN
1393: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1394: RAISE OKL_API.G_EXCEPTION_ERROR;
1395: ELSIF lc_object_version_number <> p_tmg_rec.object_version_number THEN
1396: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1397: RAISE OKL_API.G_EXCEPTION_ERROR;
1398: ELSIF lc_object_version_number = -1 THEN

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

1392: ELSIF lc_object_version_number > p_tmg_rec.object_version_number THEN
1393: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1394: RAISE OKL_API.G_EXCEPTION_ERROR;
1395: ELSIF lc_object_version_number <> p_tmg_rec.object_version_number THEN
1396: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1397: RAISE OKL_API.G_EXCEPTION_ERROR;
1398: ELSIF lc_object_version_number = -1 THEN
1399: OKL_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1400: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 1397: RAISE OKL_API.G_EXCEPTION_ERROR;

1393: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1394: RAISE OKL_API.G_EXCEPTION_ERROR;
1395: ELSIF lc_object_version_number <> p_tmg_rec.object_version_number THEN
1396: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1397: RAISE OKL_API.G_EXCEPTION_ERROR;
1398: ELSIF lc_object_version_number = -1 THEN
1399: OKL_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1400: RAISE OKL_API.G_EXCEPTION_ERROR;
1401: END IF;

Line 1399: OKL_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);

1395: ELSIF lc_object_version_number <> p_tmg_rec.object_version_number THEN
1396: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1397: RAISE OKL_API.G_EXCEPTION_ERROR;
1398: ELSIF lc_object_version_number = -1 THEN
1399: OKL_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1400: RAISE OKL_API.G_EXCEPTION_ERROR;
1401: END IF;
1402: x_return_status := l_return_status;
1403: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 1400: RAISE OKL_API.G_EXCEPTION_ERROR;

1396: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1397: RAISE OKL_API.G_EXCEPTION_ERROR;
1398: ELSIF lc_object_version_number = -1 THEN
1399: OKL_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1400: RAISE OKL_API.G_EXCEPTION_ERROR;
1401: END IF;
1402: x_return_status := l_return_status;
1403: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1404: EXCEPTION

Line 1403: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

1399: OKL_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1400: RAISE OKL_API.G_EXCEPTION_ERROR;
1401: END IF;
1402: x_return_status := l_return_status;
1403: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1404: EXCEPTION
1405: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1406: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1407: (

Line 1405: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1401: END IF;
1402: x_return_status := l_return_status;
1403: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1404: EXCEPTION
1405: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1406: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1407: (
1408: l_api_name,
1409: G_PKG_NAME,

Line 1406: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1402: x_return_status := l_return_status;
1403: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1404: EXCEPTION
1405: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1406: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1407: (
1408: l_api_name,
1409: G_PKG_NAME,
1410: 'OKL_API.G_RET_STS_ERROR',

Line 1410: 'OKL_API.G_RET_STS_ERROR',

1406: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1407: (
1408: l_api_name,
1409: G_PKG_NAME,
1410: 'OKL_API.G_RET_STS_ERROR',
1411: x_msg_count,
1412: x_msg_data,
1413: '_PVT'
1414: );

Line 1415: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

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

Line 1416: x_return_status := OKL_API.HANDLE_EXCEPTIONS

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

Line 1420: 'OKL_API.G_RET_STS_UNEXP_ERROR',

1416: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1417: (
1418: l_api_name,
1419: G_PKG_NAME,
1420: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1421: x_msg_count,
1422: x_msg_data,
1423: '_PVT'
1424: );

Line 1426: x_return_status := OKL_API.HANDLE_EXCEPTIONS

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

Line 1441: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

1437: -- lock_row for: OKL_TRX_MSGS_V --
1438: ----------------------------------
1439: PROCEDURE lock_row(
1440: p_api_version IN NUMBER,
1441: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
1442: x_return_status OUT NOCOPY VARCHAR2,
1443: x_msg_count OUT NOCOPY NUMBER,
1444: x_msg_data OUT NOCOPY VARCHAR2,
1445: p_tmgv_rec IN tmgv_rec_type) IS

Line 1449: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

1445: p_tmgv_rec IN tmgv_rec_type) IS
1446:
1447: l_api_version CONSTANT NUMBER := 1;
1448: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
1449: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1450: l_tmg_rec tmg_rec_type;
1451: BEGIN
1452: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
1453: G_PKG_NAME,

Line 1452: l_return_status := OKL_API.START_ACTIVITY(l_api_name,

1448: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
1449: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1450: l_tmg_rec tmg_rec_type;
1451: BEGIN
1452: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
1453: G_PKG_NAME,
1454: p_init_msg_list,
1455: l_api_version,
1456: p_api_version,

Line 1459: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1455: l_api_version,
1456: p_api_version,
1457: '_PVT',
1458: x_return_status);
1459: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1460: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1461: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1462: RAISE OKL_API.G_EXCEPTION_ERROR;
1463: END IF;

Line 1460: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1456: p_api_version,
1457: '_PVT',
1458: x_return_status);
1459: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1460: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1461: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1462: RAISE OKL_API.G_EXCEPTION_ERROR;
1463: END IF;
1464: -----------------------------------------

Line 1461: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

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

Line 1462: RAISE OKL_API.G_EXCEPTION_ERROR;

1458: x_return_status);
1459: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1460: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1461: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1462: RAISE OKL_API.G_EXCEPTION_ERROR;
1463: END IF;
1464: -----------------------------------------
1465: -- Move VIEW record to "Child" records --
1466: -----------------------------------------

Line 1478: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1474: x_msg_count,
1475: x_msg_data,
1476: l_tmg_rec
1477: );
1478: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1479: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1480: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1481: RAISE OKL_API.G_EXCEPTION_ERROR;
1482: END IF;

Line 1479: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1475: x_msg_data,
1476: l_tmg_rec
1477: );
1478: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1479: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1480: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1481: RAISE OKL_API.G_EXCEPTION_ERROR;
1482: END IF;
1483: x_return_status := l_return_status;

Line 1480: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

1476: l_tmg_rec
1477: );
1478: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1479: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1480: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1481: RAISE OKL_API.G_EXCEPTION_ERROR;
1482: END IF;
1483: x_return_status := l_return_status;
1484: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 1481: RAISE OKL_API.G_EXCEPTION_ERROR;

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

Line 1484: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

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

Line 1486: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1482: END IF;
1483: x_return_status := l_return_status;
1484: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1485: EXCEPTION
1486: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1487: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1488: (
1489: l_api_name,
1490: G_PKG_NAME,

Line 1487: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1483: x_return_status := l_return_status;
1484: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1485: EXCEPTION
1486: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1487: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1488: (
1489: l_api_name,
1490: G_PKG_NAME,
1491: 'OKL_API.G_RET_STS_ERROR',

Line 1491: 'OKL_API.G_RET_STS_ERROR',

1487: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1488: (
1489: l_api_name,
1490: G_PKG_NAME,
1491: 'OKL_API.G_RET_STS_ERROR',
1492: x_msg_count,
1493: x_msg_data,
1494: '_PVT'
1495: );

Line 1496: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

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

Line 1497: x_return_status := OKL_API.HANDLE_EXCEPTIONS

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

Line 1501: 'OKL_API.G_RET_STS_UNEXP_ERROR',

1497: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1498: (
1499: l_api_name,
1500: G_PKG_NAME,
1501: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1502: x_msg_count,
1503: x_msg_data,
1504: '_PVT'
1505: );

Line 1507: x_return_status := OKL_API.HANDLE_EXCEPTIONS

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

Line 1522: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

1518: -- PL/SQL TBL lock_row for:TMGV_TBL --
1519: --------------------------------------
1520: PROCEDURE lock_row(
1521: p_api_version IN NUMBER,
1522: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
1523: x_return_status OUT NOCOPY VARCHAR2,
1524: x_msg_count OUT NOCOPY NUMBER,
1525: x_msg_data OUT NOCOPY VARCHAR2,
1526: p_tmgv_tbl IN tmgv_tbl_type,

Line 1527: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS

1523: x_return_status OUT NOCOPY VARCHAR2,
1524: x_msg_count OUT NOCOPY NUMBER,
1525: x_msg_data OUT NOCOPY VARCHAR2,
1526: p_tmgv_tbl IN tmgv_tbl_type,
1527: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS
1528:
1529: l_api_version CONSTANT NUMBER := 1;
1530: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_lock_row';
1531: i NUMBER := 0;

Line 1533: OKL_API.init_msg_list(p_init_msg_list);

1529: l_api_version CONSTANT NUMBER := 1;
1530: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_lock_row';
1531: i NUMBER := 0;
1532: BEGIN
1533: OKL_API.init_msg_list(p_init_msg_list);
1534: -- Make sure PL/SQL table has recrods in it before passing
1535: IF (p_tmgv_tbl.COUNT > 0) THEN
1536: i := p_tmgv_tbl.FIRST;
1537: LOOP

Line 1539: l_error_rec OKL_API.ERROR_REC_TYPE;

1535: IF (p_tmgv_tbl.COUNT > 0) THEN
1536: i := p_tmgv_tbl.FIRST;
1537: LOOP
1538: DECLARE
1539: l_error_rec OKL_API.ERROR_REC_TYPE;
1540: BEGIN
1541: l_error_rec.api_name := l_api_name;
1542: l_error_rec.api_package := G_PKG_NAME;
1543: l_error_rec.idx := i;

Line 1546: p_init_msg_list => OKL_API.G_FALSE,

1542: l_error_rec.api_package := G_PKG_NAME;
1543: l_error_rec.idx := i;
1544: lock_row(
1545: p_api_version => p_api_version,
1546: p_init_msg_list => OKL_API.G_FALSE,
1547: x_return_status => l_error_rec.error_type,
1548: x_msg_count => l_error_rec.msg_count,
1549: x_msg_data => l_error_rec.msg_data,
1550: p_tmgv_rec => p_tmgv_tbl(i));

Line 1551: IF (l_error_rec.error_type <> OKL_API.G_RET_STS_SUCCESS) THEN

1547: x_return_status => l_error_rec.error_type,
1548: x_msg_count => l_error_rec.msg_count,
1549: x_msg_data => l_error_rec.msg_data,
1550: p_tmgv_rec => p_tmgv_tbl(i));
1551: IF (l_error_rec.error_type <> OKL_API.G_RET_STS_SUCCESS) THEN
1552: l_error_rec.sqlcode := SQLCODE;
1553: load_error_tbl(l_error_rec, px_error_tbl);
1554: ELSE
1555: x_msg_count := l_error_rec.msg_count;

Line 1559: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1555: x_msg_count := l_error_rec.msg_count;
1556: x_msg_data := l_error_rec.msg_data;
1557: END IF;
1558: EXCEPTION
1559: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1560: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
1561: l_error_rec.sqlcode := SQLCODE;
1562: load_error_tbl(l_error_rec, px_error_tbl);
1563: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1560: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;

1556: x_msg_data := l_error_rec.msg_data;
1557: END IF;
1558: EXCEPTION
1559: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1560: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
1561: l_error_rec.sqlcode := SQLCODE;
1562: load_error_tbl(l_error_rec, px_error_tbl);
1563: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1564: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;

Line 1563: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1559: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1560: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
1561: l_error_rec.sqlcode := SQLCODE;
1562: load_error_tbl(l_error_rec, px_error_tbl);
1563: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1564: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
1565: l_error_rec.sqlcode := SQLCODE;
1566: load_error_tbl(l_error_rec, px_error_tbl);
1567: WHEN OTHERS THEN

Line 1564: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;

1560: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
1561: l_error_rec.sqlcode := SQLCODE;
1562: load_error_tbl(l_error_rec, px_error_tbl);
1563: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1564: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
1565: l_error_rec.sqlcode := SQLCODE;
1566: load_error_tbl(l_error_rec, px_error_tbl);
1567: WHEN OTHERS THEN
1568: l_error_rec.error_type := 'OTHERS';

Line 1579: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

1575: END IF;
1576: -- Loop through the error_tbl to find the error with the highest severity
1577: -- and return it.
1578: x_return_status := find_highest_exception(px_error_tbl);
1579: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1580: EXCEPTION
1581: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1582: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1583: (

Line 1581: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1577: -- and return it.
1578: x_return_status := find_highest_exception(px_error_tbl);
1579: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1580: EXCEPTION
1581: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1582: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1583: (
1584: l_api_name,
1585: G_PKG_NAME,

Line 1582: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1578: x_return_status := find_highest_exception(px_error_tbl);
1579: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1580: EXCEPTION
1581: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1582: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1583: (
1584: l_api_name,
1585: G_PKG_NAME,
1586: 'OKL_API.G_RET_STS_ERROR',

Line 1586: 'OKL_API.G_RET_STS_ERROR',

1582: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1583: (
1584: l_api_name,
1585: G_PKG_NAME,
1586: 'OKL_API.G_RET_STS_ERROR',
1587: x_msg_count,
1588: x_msg_data,
1589: '_PVT'
1590: );

Line 1591: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1587: x_msg_count,
1588: x_msg_data,
1589: '_PVT'
1590: );
1591: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1592: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1593: (
1594: l_api_name,
1595: G_PKG_NAME,

Line 1592: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1588: x_msg_data,
1589: '_PVT'
1590: );
1591: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1592: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1593: (
1594: l_api_name,
1595: G_PKG_NAME,
1596: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 1596: 'OKL_API.G_RET_STS_UNEXP_ERROR',

1592: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1593: (
1594: l_api_name,
1595: G_PKG_NAME,
1596: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1597: x_msg_count,
1598: x_msg_data,
1599: '_PVT'
1600: );

Line 1602: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1598: x_msg_data,
1599: '_PVT'
1600: );
1601: WHEN OTHERS THEN
1602: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1603: (
1604: l_api_name,
1605: G_PKG_NAME,
1606: 'OTHERS',

Line 1617: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

1613: -- PL/SQL TBL lock_row for:TMGV_TBL --
1614: --------------------------------------
1615: PROCEDURE lock_row(
1616: p_api_version IN NUMBER,
1617: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
1618: x_return_status OUT NOCOPY VARCHAR2,
1619: x_msg_count OUT NOCOPY NUMBER,
1620: x_msg_data OUT NOCOPY VARCHAR2,
1621: p_tmgv_tbl IN tmgv_tbl_type) IS

Line 1625: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

1621: p_tmgv_tbl IN tmgv_tbl_type) IS
1622:
1623: l_api_version CONSTANT NUMBER := 1;
1624: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
1625: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1626: l_error_tbl OKL_API.ERROR_TBL_TYPE;
1627: BEGIN
1628: OKL_API.init_msg_list(p_init_msg_list);
1629: -- Make sure PL/SQL table has recrods in it before passing

Line 1626: l_error_tbl OKL_API.ERROR_TBL_TYPE;

1622:
1623: l_api_version CONSTANT NUMBER := 1;
1624: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
1625: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1626: l_error_tbl OKL_API.ERROR_TBL_TYPE;
1627: BEGIN
1628: OKL_API.init_msg_list(p_init_msg_list);
1629: -- Make sure PL/SQL table has recrods in it before passing
1630: IF (p_tmgv_tbl.COUNT > 0) THEN

Line 1628: OKL_API.init_msg_list(p_init_msg_list);

1624: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
1625: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1626: l_error_tbl OKL_API.ERROR_TBL_TYPE;
1627: BEGIN
1628: OKL_API.init_msg_list(p_init_msg_list);
1629: -- Make sure PL/SQL table has recrods in it before passing
1630: IF (p_tmgv_tbl.COUNT > 0) THEN
1631: lock_row(
1632: p_api_version => p_api_version,

Line 1633: p_init_msg_list => OKL_API.G_FALSE,

1629: -- Make sure PL/SQL table has recrods in it before passing
1630: IF (p_tmgv_tbl.COUNT > 0) THEN
1631: lock_row(
1632: p_api_version => p_api_version,
1633: p_init_msg_list => OKL_API.G_FALSE,
1634: x_return_status => x_return_status,
1635: x_msg_count => x_msg_count,
1636: x_msg_data => x_msg_data,
1637: p_tmgv_tbl => p_tmgv_tbl,

Line 1640: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

1636: x_msg_data => x_msg_data,
1637: p_tmgv_tbl => p_tmgv_tbl,
1638: px_error_tbl => l_error_tbl);
1639: END IF;
1640: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1641: EXCEPTION
1642: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1643: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1644: (

Line 1642: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1638: px_error_tbl => l_error_tbl);
1639: END IF;
1640: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1641: EXCEPTION
1642: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1643: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1644: (
1645: l_api_name,
1646: G_PKG_NAME,

Line 1643: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1639: END IF;
1640: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1641: EXCEPTION
1642: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1643: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1644: (
1645: l_api_name,
1646: G_PKG_NAME,
1647: 'OKL_API.G_RET_STS_ERROR',

Line 1647: 'OKL_API.G_RET_STS_ERROR',

1643: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1644: (
1645: l_api_name,
1646: G_PKG_NAME,
1647: 'OKL_API.G_RET_STS_ERROR',
1648: x_msg_count,
1649: x_msg_data,
1650: '_PVT'
1651: );

Line 1652: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1648: x_msg_count,
1649: x_msg_data,
1650: '_PVT'
1651: );
1652: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1653: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1654: (
1655: l_api_name,
1656: G_PKG_NAME,

Line 1653: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1649: x_msg_data,
1650: '_PVT'
1651: );
1652: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1653: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1654: (
1655: l_api_name,
1656: G_PKG_NAME,
1657: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 1657: 'OKL_API.G_RET_STS_UNEXP_ERROR',

1653: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1654: (
1655: l_api_name,
1656: G_PKG_NAME,
1657: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1658: x_msg_count,
1659: x_msg_data,
1660: '_PVT'
1661: );

Line 1663: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1659: x_msg_data,
1660: '_PVT'
1661: );
1662: WHEN OTHERS THEN
1663: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1664: (
1665: l_api_name,
1666: G_PKG_NAME,
1667: 'OTHERS',

Line 1681: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

1677: ---------------------------------
1678: -- update_row for:OKL_TRX_MSGS --
1679: ---------------------------------
1680: PROCEDURE update_row(
1681: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
1682: x_return_status OUT NOCOPY VARCHAR2,
1683: x_msg_count OUT NOCOPY NUMBER,
1684: x_msg_data OUT NOCOPY VARCHAR2,
1685: p_tmg_rec IN tmg_rec_type,

Line 1690: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

1686: x_tmg_rec OUT NOCOPY tmg_rec_type) IS
1687:
1688: l_api_version CONSTANT NUMBER := 1;
1689: l_api_name CONSTANT VARCHAR2(30) := 'B_update_row';
1690: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1691: l_tmg_rec tmg_rec_type := p_tmg_rec;
1692: l_def_tmg_rec tmg_rec_type;
1693: l_row_notfound BOOLEAN := TRUE;
1694: ----------------------------------

Line 1703: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

1699: x_tmg_rec OUT NOCOPY tmg_rec_type
1700: ) RETURN VARCHAR2 IS
1701: l_tmg_rec tmg_rec_type;
1702: l_row_notfound BOOLEAN := TRUE;
1703: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1704: BEGIN
1705: x_tmg_rec := p_tmg_rec;
1706: -- Get current database values
1707: l_tmg_rec := get_rec(p_tmg_rec, l_return_status);

Line 1708: IF (l_return_status = OKL_API.G_RET_STS_SUCCESS) THEN

1704: BEGIN
1705: x_tmg_rec := p_tmg_rec;
1706: -- Get current database values
1707: l_tmg_rec := get_rec(p_tmg_rec, l_return_status);
1708: IF (l_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
1709: IF (x_tmg_rec.id = OKL_API.G_MISS_NUM)
1710: THEN
1711: x_tmg_rec.id := l_tmg_rec.id;
1712: END IF;

Line 1709: IF (x_tmg_rec.id = OKL_API.G_MISS_NUM)

1705: x_tmg_rec := p_tmg_rec;
1706: -- Get current database values
1707: l_tmg_rec := get_rec(p_tmg_rec, l_return_status);
1708: IF (l_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
1709: IF (x_tmg_rec.id = OKL_API.G_MISS_NUM)
1710: THEN
1711: x_tmg_rec.id := l_tmg_rec.id;
1712: END IF;
1713: IF (x_tmg_rec.sequence_number = OKL_API.G_MISS_NUM)

Line 1713: IF (x_tmg_rec.sequence_number = OKL_API.G_MISS_NUM)

1709: IF (x_tmg_rec.id = OKL_API.G_MISS_NUM)
1710: THEN
1711: x_tmg_rec.id := l_tmg_rec.id;
1712: END IF;
1713: IF (x_tmg_rec.sequence_number = OKL_API.G_MISS_NUM)
1714: THEN
1715: x_tmg_rec.sequence_number := l_tmg_rec.sequence_number;
1716: END IF;
1717: IF (x_tmg_rec.trx_id = OKL_API.G_MISS_NUM)

Line 1717: IF (x_tmg_rec.trx_id = OKL_API.G_MISS_NUM)

1713: IF (x_tmg_rec.sequence_number = OKL_API.G_MISS_NUM)
1714: THEN
1715: x_tmg_rec.sequence_number := l_tmg_rec.sequence_number;
1716: END IF;
1717: IF (x_tmg_rec.trx_id = OKL_API.G_MISS_NUM)
1718: THEN
1719: x_tmg_rec.trx_id := l_tmg_rec.trx_id;
1720: END IF;
1721: IF (x_tmg_rec.trx_source_table = OKL_API.G_MISS_CHAR)

Line 1721: IF (x_tmg_rec.trx_source_table = OKL_API.G_MISS_CHAR)

1717: IF (x_tmg_rec.trx_id = OKL_API.G_MISS_NUM)
1718: THEN
1719: x_tmg_rec.trx_id := l_tmg_rec.trx_id;
1720: END IF;
1721: IF (x_tmg_rec.trx_source_table = OKL_API.G_MISS_CHAR)
1722: THEN
1723: x_tmg_rec.trx_source_table := l_tmg_rec.trx_source_table;
1724: END IF;
1725: IF (x_tmg_rec.bch_id = OKL_API.G_MISS_NUM)

Line 1725: IF (x_tmg_rec.bch_id = OKL_API.G_MISS_NUM)

1721: IF (x_tmg_rec.trx_source_table = OKL_API.G_MISS_CHAR)
1722: THEN
1723: x_tmg_rec.trx_source_table := l_tmg_rec.trx_source_table;
1724: END IF;
1725: IF (x_tmg_rec.bch_id = OKL_API.G_MISS_NUM)
1726: THEN
1727: x_tmg_rec.bch_id := l_tmg_rec.bch_id;
1728: END IF;
1729: IF (x_tmg_rec.tmg_language_code = OKL_API.G_MISS_CHAR)

Line 1729: IF (x_tmg_rec.tmg_language_code = OKL_API.G_MISS_CHAR)

1725: IF (x_tmg_rec.bch_id = OKL_API.G_MISS_NUM)
1726: THEN
1727: x_tmg_rec.bch_id := l_tmg_rec.bch_id;
1728: END IF;
1729: IF (x_tmg_rec.tmg_language_code = OKL_API.G_MISS_CHAR)
1730: THEN
1731: x_tmg_rec.tmg_language_code := l_tmg_rec.tmg_language_code;
1732: END IF;
1733: IF (x_tmg_rec.tmg_message_name = OKL_API.G_MISS_CHAR)

Line 1733: IF (x_tmg_rec.tmg_message_name = OKL_API.G_MISS_CHAR)

1729: IF (x_tmg_rec.tmg_language_code = OKL_API.G_MISS_CHAR)
1730: THEN
1731: x_tmg_rec.tmg_language_code := l_tmg_rec.tmg_language_code;
1732: END IF;
1733: IF (x_tmg_rec.tmg_message_name = OKL_API.G_MISS_CHAR)
1734: THEN
1735: x_tmg_rec.tmg_message_name := l_tmg_rec.tmg_message_name;
1736: END IF;
1737: IF (x_tmg_rec.tmg_application_id = OKL_API.G_MISS_NUM)

Line 1737: IF (x_tmg_rec.tmg_application_id = OKL_API.G_MISS_NUM)

1733: IF (x_tmg_rec.tmg_message_name = OKL_API.G_MISS_CHAR)
1734: THEN
1735: x_tmg_rec.tmg_message_name := l_tmg_rec.tmg_message_name;
1736: END IF;
1737: IF (x_tmg_rec.tmg_application_id = OKL_API.G_MISS_NUM)
1738: THEN
1739: x_tmg_rec.tmg_application_id := l_tmg_rec.tmg_application_id;
1740: END IF;
1741: IF (x_tmg_rec.message_text = OKL_API.G_MISS_CHAR)

Line 1741: IF (x_tmg_rec.message_text = OKL_API.G_MISS_CHAR)

1737: IF (x_tmg_rec.tmg_application_id = OKL_API.G_MISS_NUM)
1738: THEN
1739: x_tmg_rec.tmg_application_id := l_tmg_rec.tmg_application_id;
1740: END IF;
1741: IF (x_tmg_rec.message_text = OKL_API.G_MISS_CHAR)
1742: THEN
1743: x_tmg_rec.message_text := l_tmg_rec.message_text;
1744: END IF;
1745: IF (x_tmg_rec.object_version_number = OKL_API.G_MISS_NUM)

Line 1745: IF (x_tmg_rec.object_version_number = OKL_API.G_MISS_NUM)

1741: IF (x_tmg_rec.message_text = OKL_API.G_MISS_CHAR)
1742: THEN
1743: x_tmg_rec.message_text := l_tmg_rec.message_text;
1744: END IF;
1745: IF (x_tmg_rec.object_version_number = OKL_API.G_MISS_NUM)
1746: THEN
1747: x_tmg_rec.object_version_number := l_tmg_rec.object_version_number;
1748: END IF;
1749: IF (x_tmg_rec.request_id = OKL_API.G_MISS_NUM)

Line 1749: IF (x_tmg_rec.request_id = OKL_API.G_MISS_NUM)

1745: IF (x_tmg_rec.object_version_number = OKL_API.G_MISS_NUM)
1746: THEN
1747: x_tmg_rec.object_version_number := l_tmg_rec.object_version_number;
1748: END IF;
1749: IF (x_tmg_rec.request_id = OKL_API.G_MISS_NUM)
1750: THEN
1751: x_tmg_rec.request_id := l_tmg_rec.request_id;
1752: END IF;
1753: IF (x_tmg_rec.program_application_id = OKL_API.G_MISS_NUM)

Line 1753: IF (x_tmg_rec.program_application_id = OKL_API.G_MISS_NUM)

1749: IF (x_tmg_rec.request_id = OKL_API.G_MISS_NUM)
1750: THEN
1751: x_tmg_rec.request_id := l_tmg_rec.request_id;
1752: END IF;
1753: IF (x_tmg_rec.program_application_id = OKL_API.G_MISS_NUM)
1754: THEN
1755: x_tmg_rec.program_application_id := l_tmg_rec.program_application_id;
1756: END IF;
1757: IF (x_tmg_rec.program_id = OKL_API.G_MISS_NUM)

Line 1757: IF (x_tmg_rec.program_id = OKL_API.G_MISS_NUM)

1753: IF (x_tmg_rec.program_application_id = OKL_API.G_MISS_NUM)
1754: THEN
1755: x_tmg_rec.program_application_id := l_tmg_rec.program_application_id;
1756: END IF;
1757: IF (x_tmg_rec.program_id = OKL_API.G_MISS_NUM)
1758: THEN
1759: x_tmg_rec.program_id := l_tmg_rec.program_id;
1760: END IF;
1761: IF (x_tmg_rec.program_update_date = OKL_API.G_MISS_DATE)

Line 1761: IF (x_tmg_rec.program_update_date = OKL_API.G_MISS_DATE)

1757: IF (x_tmg_rec.program_id = OKL_API.G_MISS_NUM)
1758: THEN
1759: x_tmg_rec.program_id := l_tmg_rec.program_id;
1760: END IF;
1761: IF (x_tmg_rec.program_update_date = OKL_API.G_MISS_DATE)
1762: THEN
1763: x_tmg_rec.program_update_date := l_tmg_rec.program_update_date;
1764: END IF;
1765: IF (x_tmg_rec.created_by = OKL_API.G_MISS_NUM)

Line 1765: IF (x_tmg_rec.created_by = OKL_API.G_MISS_NUM)

1761: IF (x_tmg_rec.program_update_date = OKL_API.G_MISS_DATE)
1762: THEN
1763: x_tmg_rec.program_update_date := l_tmg_rec.program_update_date;
1764: END IF;
1765: IF (x_tmg_rec.created_by = OKL_API.G_MISS_NUM)
1766: THEN
1767: x_tmg_rec.created_by := l_tmg_rec.created_by;
1768: END IF;
1769: IF (x_tmg_rec.creation_date = OKL_API.G_MISS_DATE)

Line 1769: IF (x_tmg_rec.creation_date = OKL_API.G_MISS_DATE)

1765: IF (x_tmg_rec.created_by = OKL_API.G_MISS_NUM)
1766: THEN
1767: x_tmg_rec.created_by := l_tmg_rec.created_by;
1768: END IF;
1769: IF (x_tmg_rec.creation_date = OKL_API.G_MISS_DATE)
1770: THEN
1771: x_tmg_rec.creation_date := l_tmg_rec.creation_date;
1772: END IF;
1773: IF (x_tmg_rec.last_updated_by = OKL_API.G_MISS_NUM)

Line 1773: IF (x_tmg_rec.last_updated_by = OKL_API.G_MISS_NUM)

1769: IF (x_tmg_rec.creation_date = OKL_API.G_MISS_DATE)
1770: THEN
1771: x_tmg_rec.creation_date := l_tmg_rec.creation_date;
1772: END IF;
1773: IF (x_tmg_rec.last_updated_by = OKL_API.G_MISS_NUM)
1774: THEN
1775: x_tmg_rec.last_updated_by := l_tmg_rec.last_updated_by;
1776: END IF;
1777: IF (x_tmg_rec.last_update_date = OKL_API.G_MISS_DATE)

Line 1777: IF (x_tmg_rec.last_update_date = OKL_API.G_MISS_DATE)

1773: IF (x_tmg_rec.last_updated_by = OKL_API.G_MISS_NUM)
1774: THEN
1775: x_tmg_rec.last_updated_by := l_tmg_rec.last_updated_by;
1776: END IF;
1777: IF (x_tmg_rec.last_update_date = OKL_API.G_MISS_DATE)
1778: THEN
1779: x_tmg_rec.last_update_date := l_tmg_rec.last_update_date;
1780: END IF;
1781: IF (x_tmg_rec.last_update_login = OKL_API.G_MISS_NUM)

Line 1781: IF (x_tmg_rec.last_update_login = OKL_API.G_MISS_NUM)

1777: IF (x_tmg_rec.last_update_date = OKL_API.G_MISS_DATE)
1778: THEN
1779: x_tmg_rec.last_update_date := l_tmg_rec.last_update_date;
1780: END IF;
1781: IF (x_tmg_rec.last_update_login = OKL_API.G_MISS_NUM)
1782: THEN
1783: x_tmg_rec.last_update_login := l_tmg_rec.last_update_login;
1784: END IF;
1785:

Line 1787: IF (x_tmg_rec.tmg_run = OKL_API.G_MISS_NUM)

1783: x_tmg_rec.last_update_login := l_tmg_rec.last_update_login;
1784: END IF;
1785:
1786: -- RMUNJULU 3018641 Added code
1787: IF (x_tmg_rec.tmg_run = OKL_API.G_MISS_NUM)
1788: THEN
1789: x_tmg_rec.tmg_run := l_tmg_rec.tmg_run;
1790: END IF;
1791:

Line 1802: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

1798: FUNCTION Set_Attributes (
1799: p_tmg_rec IN tmg_rec_type,
1800: x_tmg_rec OUT NOCOPY tmg_rec_type
1801: ) RETURN VARCHAR2 IS
1802: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1803: BEGIN
1804: x_tmg_rec := p_tmg_rec;
1805: x_tmg_rec.OBJECT_VERSION_NUMBER := p_tmg_rec.OBJECT_VERSION_NUMBER + 1;
1806: RETURN(l_return_status);

Line 1809: l_return_status := OKL_API.START_ACTIVITY(l_api_name,

1805: x_tmg_rec.OBJECT_VERSION_NUMBER := p_tmg_rec.OBJECT_VERSION_NUMBER + 1;
1806: RETURN(l_return_status);
1807: END Set_Attributes;
1808: BEGIN
1809: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
1810: p_init_msg_list,
1811: '_PVT',
1812: x_return_status);
1813: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1813: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1809: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
1810: p_init_msg_list,
1811: '_PVT',
1812: x_return_status);
1813: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1814: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1815: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1816: RAISE OKL_API.G_EXCEPTION_ERROR;
1817: END IF;

Line 1814: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1810: p_init_msg_list,
1811: '_PVT',
1812: x_return_status);
1813: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1814: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1815: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1816: RAISE OKL_API.G_EXCEPTION_ERROR;
1817: END IF;
1818: --- Setting item attributes

Line 1815: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

1811: '_PVT',
1812: x_return_status);
1813: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1814: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1815: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1816: RAISE OKL_API.G_EXCEPTION_ERROR;
1817: END IF;
1818: --- Setting item attributes
1819: l_return_status := Set_Attributes(

Line 1816: RAISE OKL_API.G_EXCEPTION_ERROR;

1812: x_return_status);
1813: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1814: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1815: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1816: RAISE OKL_API.G_EXCEPTION_ERROR;
1817: END IF;
1818: --- Setting item attributes
1819: l_return_status := Set_Attributes(
1820: p_tmg_rec, -- IN

Line 1823: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1819: l_return_status := Set_Attributes(
1820: p_tmg_rec, -- IN
1821: l_tmg_rec); -- OUT
1822: --- If any errors happen abort API
1823: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1824: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1825: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1826: RAISE OKL_API.G_EXCEPTION_ERROR;
1827: END IF;

Line 1824: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1820: p_tmg_rec, -- IN
1821: l_tmg_rec); -- OUT
1822: --- If any errors happen abort API
1823: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1824: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1825: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1826: RAISE OKL_API.G_EXCEPTION_ERROR;
1827: END IF;
1828: l_return_status := populate_new_record(l_tmg_rec, l_def_tmg_rec);

Line 1825: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

1821: l_tmg_rec); -- OUT
1822: --- If any errors happen abort API
1823: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1824: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1825: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1826: RAISE OKL_API.G_EXCEPTION_ERROR;
1827: END IF;
1828: l_return_status := populate_new_record(l_tmg_rec, l_def_tmg_rec);
1829: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1826: RAISE OKL_API.G_EXCEPTION_ERROR;

1822: --- If any errors happen abort API
1823: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1824: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1825: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1826: RAISE OKL_API.G_EXCEPTION_ERROR;
1827: END IF;
1828: l_return_status := populate_new_record(l_tmg_rec, l_def_tmg_rec);
1829: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1830: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1829: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1825: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1826: RAISE OKL_API.G_EXCEPTION_ERROR;
1827: END IF;
1828: l_return_status := populate_new_record(l_tmg_rec, l_def_tmg_rec);
1829: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1830: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1831: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1832: RAISE OKL_API.G_EXCEPTION_ERROR;
1833: END IF;

Line 1830: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1826: RAISE OKL_API.G_EXCEPTION_ERROR;
1827: END IF;
1828: l_return_status := populate_new_record(l_tmg_rec, l_def_tmg_rec);
1829: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1830: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1831: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1832: RAISE OKL_API.G_EXCEPTION_ERROR;
1833: END IF;
1834: UPDATE OKL_TRX_MSGS

Line 1831: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

1827: END IF;
1828: l_return_status := populate_new_record(l_tmg_rec, l_def_tmg_rec);
1829: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1830: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1831: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1832: RAISE OKL_API.G_EXCEPTION_ERROR;
1833: END IF;
1834: UPDATE OKL_TRX_MSGS
1835: SET SEQUENCE_NUMBER = l_def_tmg_rec.sequence_number,

Line 1832: RAISE OKL_API.G_EXCEPTION_ERROR;

1828: l_return_status := populate_new_record(l_tmg_rec, l_def_tmg_rec);
1829: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1830: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1831: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1832: RAISE OKL_API.G_EXCEPTION_ERROR;
1833: END IF;
1834: UPDATE OKL_TRX_MSGS
1835: SET SEQUENCE_NUMBER = l_def_tmg_rec.sequence_number,
1836: TRX_ID = l_def_tmg_rec.trx_id,

Line 1858: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

1854: WHERE ID = l_def_tmg_rec.id;
1855:
1856: x_tmg_rec := l_tmg_rec;
1857: x_return_status := l_return_status;
1858: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1859: EXCEPTION
1860: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1861: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1862: (

Line 1860: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1856: x_tmg_rec := l_tmg_rec;
1857: x_return_status := l_return_status;
1858: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1859: EXCEPTION
1860: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1861: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1862: (
1863: l_api_name,
1864: G_PKG_NAME,

Line 1861: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1857: x_return_status := l_return_status;
1858: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1859: EXCEPTION
1860: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1861: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1862: (
1863: l_api_name,
1864: G_PKG_NAME,
1865: 'OKL_API.G_RET_STS_ERROR',

Line 1865: 'OKL_API.G_RET_STS_ERROR',

1861: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1862: (
1863: l_api_name,
1864: G_PKG_NAME,
1865: 'OKL_API.G_RET_STS_ERROR',
1866: x_msg_count,
1867: x_msg_data,
1868: '_PVT'
1869: );

Line 1870: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1866: x_msg_count,
1867: x_msg_data,
1868: '_PVT'
1869: );
1870: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1871: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1872: (
1873: l_api_name,
1874: G_PKG_NAME,

Line 1871: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1867: x_msg_data,
1868: '_PVT'
1869: );
1870: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1871: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1872: (
1873: l_api_name,
1874: G_PKG_NAME,
1875: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 1875: 'OKL_API.G_RET_STS_UNEXP_ERROR',

1871: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1872: (
1873: l_api_name,
1874: G_PKG_NAME,
1875: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1876: x_msg_count,
1877: x_msg_data,
1878: '_PVT'
1879: );

Line 1881: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1877: x_msg_data,
1878: '_PVT'
1879: );
1880: WHEN OTHERS THEN
1881: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1882: (
1883: l_api_name,
1884: G_PKG_NAME,
1885: 'OTHERS',

Line 1897: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

1893: -- RMUNJULU 3018641 Added Code for New Column TMG_RUN
1894: -----------------------------------
1895: PROCEDURE update_row(
1896: p_api_version IN NUMBER,
1897: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
1898: x_return_status OUT NOCOPY VARCHAR2,
1899: x_msg_count OUT NOCOPY NUMBER,
1900: x_msg_data OUT NOCOPY VARCHAR2,
1901: p_tmgv_rec IN tmgv_rec_type,

Line 1906: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

1902: x_tmgv_rec OUT NOCOPY tmgv_rec_type) IS
1903:
1904: l_api_version CONSTANT NUMBER := 1;
1905: l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
1906: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1907: l_tmgv_rec tmgv_rec_type := p_tmgv_rec;
1908: l_def_tmgv_rec tmgv_rec_type;
1909: l_db_tmgv_rec tmgv_rec_type;
1910: l_tmg_rec tmg_rec_type;

Line 1933: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

1929: p_tmgv_rec IN tmgv_rec_type,
1930: x_tmgv_rec OUT NOCOPY tmgv_rec_type
1931: ) RETURN VARCHAR2 IS
1932: l_row_notfound BOOLEAN := TRUE;
1933: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1934: BEGIN
1935: x_tmgv_rec := p_tmgv_rec;
1936: -- Get current database values
1937: -- NOTE: Never assign the OBJECT_VERSION_NUMBER. Force the user to pass it

Line 1940: IF (l_return_status = OKL_API.G_RET_STS_SUCCESS) THEN

1936: -- Get current database values
1937: -- NOTE: Never assign the OBJECT_VERSION_NUMBER. Force the user to pass it
1938: -- so it may be verified through LOCK_ROW.
1939: l_db_tmgv_rec := get_rec(p_tmgv_rec, l_return_status);
1940: IF (l_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
1941: IF (x_tmgv_rec.id = OKL_API.G_MISS_NUM)
1942: THEN
1943: x_tmgv_rec.id := l_db_tmgv_rec.id;
1944: END IF;

Line 1941: IF (x_tmgv_rec.id = OKL_API.G_MISS_NUM)

1937: -- NOTE: Never assign the OBJECT_VERSION_NUMBER. Force the user to pass it
1938: -- so it may be verified through LOCK_ROW.
1939: l_db_tmgv_rec := get_rec(p_tmgv_rec, l_return_status);
1940: IF (l_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
1941: IF (x_tmgv_rec.id = OKL_API.G_MISS_NUM)
1942: THEN
1943: x_tmgv_rec.id := l_db_tmgv_rec.id;
1944: END IF;
1945: IF (x_tmgv_rec.bch_id = OKL_API.G_MISS_NUM)

Line 1945: IF (x_tmgv_rec.bch_id = OKL_API.G_MISS_NUM)

1941: IF (x_tmgv_rec.id = OKL_API.G_MISS_NUM)
1942: THEN
1943: x_tmgv_rec.id := l_db_tmgv_rec.id;
1944: END IF;
1945: IF (x_tmgv_rec.bch_id = OKL_API.G_MISS_NUM)
1946: THEN
1947: x_tmgv_rec.bch_id := l_db_tmgv_rec.bch_id;
1948: END IF;
1949: IF (x_tmgv_rec.tmg_message_name = OKL_API.G_MISS_CHAR)

Line 1949: IF (x_tmgv_rec.tmg_message_name = OKL_API.G_MISS_CHAR)

1945: IF (x_tmgv_rec.bch_id = OKL_API.G_MISS_NUM)
1946: THEN
1947: x_tmgv_rec.bch_id := l_db_tmgv_rec.bch_id;
1948: END IF;
1949: IF (x_tmgv_rec.tmg_message_name = OKL_API.G_MISS_CHAR)
1950: THEN
1951: x_tmgv_rec.tmg_message_name := l_db_tmgv_rec.tmg_message_name;
1952: END IF;
1953: IF (x_tmgv_rec.tmg_application_id = OKL_API.G_MISS_NUM)

Line 1953: IF (x_tmgv_rec.tmg_application_id = OKL_API.G_MISS_NUM)

1949: IF (x_tmgv_rec.tmg_message_name = OKL_API.G_MISS_CHAR)
1950: THEN
1951: x_tmgv_rec.tmg_message_name := l_db_tmgv_rec.tmg_message_name;
1952: END IF;
1953: IF (x_tmgv_rec.tmg_application_id = OKL_API.G_MISS_NUM)
1954: THEN
1955: x_tmgv_rec.tmg_application_id := l_db_tmgv_rec.tmg_application_id;
1956: END IF;
1957: IF (x_tmgv_rec.tmg_language_code = OKL_API.G_MISS_CHAR)

Line 1957: IF (x_tmgv_rec.tmg_language_code = OKL_API.G_MISS_CHAR)

1953: IF (x_tmgv_rec.tmg_application_id = OKL_API.G_MISS_NUM)
1954: THEN
1955: x_tmgv_rec.tmg_application_id := l_db_tmgv_rec.tmg_application_id;
1956: END IF;
1957: IF (x_tmgv_rec.tmg_language_code = OKL_API.G_MISS_CHAR)
1958: THEN
1959: x_tmgv_rec.tmg_language_code := l_db_tmgv_rec.tmg_language_code;
1960: END IF;
1961: IF (x_tmgv_rec.message_text = OKL_API.G_MISS_CHAR)

Line 1961: IF (x_tmgv_rec.message_text = OKL_API.G_MISS_CHAR)

1957: IF (x_tmgv_rec.tmg_language_code = OKL_API.G_MISS_CHAR)
1958: THEN
1959: x_tmgv_rec.tmg_language_code := l_db_tmgv_rec.tmg_language_code;
1960: END IF;
1961: IF (x_tmgv_rec.message_text = OKL_API.G_MISS_CHAR)
1962: THEN
1963: x_tmgv_rec.message_text := l_db_tmgv_rec.message_text;
1964: END IF;
1965: IF (x_tmgv_rec.trx_id = OKL_API.G_MISS_NUM)

Line 1965: IF (x_tmgv_rec.trx_id = OKL_API.G_MISS_NUM)

1961: IF (x_tmgv_rec.message_text = OKL_API.G_MISS_CHAR)
1962: THEN
1963: x_tmgv_rec.message_text := l_db_tmgv_rec.message_text;
1964: END IF;
1965: IF (x_tmgv_rec.trx_id = OKL_API.G_MISS_NUM)
1966: THEN
1967: x_tmgv_rec.trx_id := l_db_tmgv_rec.trx_id;
1968: END IF;
1969: IF (x_tmgv_rec.trx_source_table = OKL_API.G_MISS_CHAR)

Line 1969: IF (x_tmgv_rec.trx_source_table = OKL_API.G_MISS_CHAR)

1965: IF (x_tmgv_rec.trx_id = OKL_API.G_MISS_NUM)
1966: THEN
1967: x_tmgv_rec.trx_id := l_db_tmgv_rec.trx_id;
1968: END IF;
1969: IF (x_tmgv_rec.trx_source_table = OKL_API.G_MISS_CHAR)
1970: THEN
1971: x_tmgv_rec.trx_source_table := l_db_tmgv_rec.trx_source_table;
1972: END IF;
1973: IF (x_tmgv_rec.sequence_number = OKL_API.G_MISS_NUM)

Line 1973: IF (x_tmgv_rec.sequence_number = OKL_API.G_MISS_NUM)

1969: IF (x_tmgv_rec.trx_source_table = OKL_API.G_MISS_CHAR)
1970: THEN
1971: x_tmgv_rec.trx_source_table := l_db_tmgv_rec.trx_source_table;
1972: END IF;
1973: IF (x_tmgv_rec.sequence_number = OKL_API.G_MISS_NUM)
1974: THEN
1975: x_tmgv_rec.sequence_number := l_db_tmgv_rec.sequence_number;
1976: END IF;
1977: IF (x_tmgv_rec.request_id = OKL_API.G_MISS_NUM)

Line 1977: IF (x_tmgv_rec.request_id = OKL_API.G_MISS_NUM)

1973: IF (x_tmgv_rec.sequence_number = OKL_API.G_MISS_NUM)
1974: THEN
1975: x_tmgv_rec.sequence_number := l_db_tmgv_rec.sequence_number;
1976: END IF;
1977: IF (x_tmgv_rec.request_id = OKL_API.G_MISS_NUM)
1978: THEN
1979: x_tmgv_rec.request_id := l_db_tmgv_rec.request_id;
1980: END IF;
1981: IF (x_tmgv_rec.program_application_id = OKL_API.G_MISS_NUM)

Line 1981: IF (x_tmgv_rec.program_application_id = OKL_API.G_MISS_NUM)

1977: IF (x_tmgv_rec.request_id = OKL_API.G_MISS_NUM)
1978: THEN
1979: x_tmgv_rec.request_id := l_db_tmgv_rec.request_id;
1980: END IF;
1981: IF (x_tmgv_rec.program_application_id = OKL_API.G_MISS_NUM)
1982: THEN
1983: x_tmgv_rec.program_application_id := l_db_tmgv_rec.program_application_id;
1984: END IF;
1985: IF (x_tmgv_rec.program_id = OKL_API.G_MISS_NUM)

Line 1985: IF (x_tmgv_rec.program_id = OKL_API.G_MISS_NUM)

1981: IF (x_tmgv_rec.program_application_id = OKL_API.G_MISS_NUM)
1982: THEN
1983: x_tmgv_rec.program_application_id := l_db_tmgv_rec.program_application_id;
1984: END IF;
1985: IF (x_tmgv_rec.program_id = OKL_API.G_MISS_NUM)
1986: THEN
1987: x_tmgv_rec.program_id := l_db_tmgv_rec.program_id;
1988: END IF;
1989: IF (x_tmgv_rec.program_update_date = OKL_API.G_MISS_DATE)

Line 1989: IF (x_tmgv_rec.program_update_date = OKL_API.G_MISS_DATE)

1985: IF (x_tmgv_rec.program_id = OKL_API.G_MISS_NUM)
1986: THEN
1987: x_tmgv_rec.program_id := l_db_tmgv_rec.program_id;
1988: END IF;
1989: IF (x_tmgv_rec.program_update_date = OKL_API.G_MISS_DATE)
1990: THEN
1991: x_tmgv_rec.program_update_date := l_db_tmgv_rec.program_update_date;
1992: END IF;
1993: IF (x_tmgv_rec.created_by = OKL_API.G_MISS_NUM)

Line 1993: IF (x_tmgv_rec.created_by = OKL_API.G_MISS_NUM)

1989: IF (x_tmgv_rec.program_update_date = OKL_API.G_MISS_DATE)
1990: THEN
1991: x_tmgv_rec.program_update_date := l_db_tmgv_rec.program_update_date;
1992: END IF;
1993: IF (x_tmgv_rec.created_by = OKL_API.G_MISS_NUM)
1994: THEN
1995: x_tmgv_rec.created_by := l_db_tmgv_rec.created_by;
1996: END IF;
1997: IF (x_tmgv_rec.creation_date = OKL_API.G_MISS_DATE)

Line 1997: IF (x_tmgv_rec.creation_date = OKL_API.G_MISS_DATE)

1993: IF (x_tmgv_rec.created_by = OKL_API.G_MISS_NUM)
1994: THEN
1995: x_tmgv_rec.created_by := l_db_tmgv_rec.created_by;
1996: END IF;
1997: IF (x_tmgv_rec.creation_date = OKL_API.G_MISS_DATE)
1998: THEN
1999: x_tmgv_rec.creation_date := l_db_tmgv_rec.creation_date;
2000: END IF;
2001: IF (x_tmgv_rec.last_updated_by = OKL_API.G_MISS_NUM)

Line 2001: IF (x_tmgv_rec.last_updated_by = OKL_API.G_MISS_NUM)

1997: IF (x_tmgv_rec.creation_date = OKL_API.G_MISS_DATE)
1998: THEN
1999: x_tmgv_rec.creation_date := l_db_tmgv_rec.creation_date;
2000: END IF;
2001: IF (x_tmgv_rec.last_updated_by = OKL_API.G_MISS_NUM)
2002: THEN
2003: x_tmgv_rec.last_updated_by := l_db_tmgv_rec.last_updated_by;
2004: END IF;
2005: IF (x_tmgv_rec.last_update_date = OKL_API.G_MISS_DATE)

Line 2005: IF (x_tmgv_rec.last_update_date = OKL_API.G_MISS_DATE)

2001: IF (x_tmgv_rec.last_updated_by = OKL_API.G_MISS_NUM)
2002: THEN
2003: x_tmgv_rec.last_updated_by := l_db_tmgv_rec.last_updated_by;
2004: END IF;
2005: IF (x_tmgv_rec.last_update_date = OKL_API.G_MISS_DATE)
2006: THEN
2007: x_tmgv_rec.last_update_date := l_db_tmgv_rec.last_update_date;
2008: END IF;
2009: IF (x_tmgv_rec.last_update_login = OKL_API.G_MISS_NUM)

Line 2009: IF (x_tmgv_rec.last_update_login = OKL_API.G_MISS_NUM)

2005: IF (x_tmgv_rec.last_update_date = OKL_API.G_MISS_DATE)
2006: THEN
2007: x_tmgv_rec.last_update_date := l_db_tmgv_rec.last_update_date;
2008: END IF;
2009: IF (x_tmgv_rec.last_update_login = OKL_API.G_MISS_NUM)
2010: THEN
2011: x_tmgv_rec.last_update_login := l_db_tmgv_rec.last_update_login;
2012: END IF;
2013:

Line 2015: IF (x_tmgv_rec.tmg_run = OKL_API.G_MISS_NUM)

2011: x_tmgv_rec.last_update_login := l_db_tmgv_rec.last_update_login;
2012: END IF;
2013:
2014: -- RMUNJULU 3018641 Added Code
2015: IF (x_tmgv_rec.tmg_run = OKL_API.G_MISS_NUM)
2016: THEN
2017: x_tmgv_rec.tmg_run := l_db_tmgv_rec.tmg_run;
2018: END IF;
2019:

Line 2030: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

2026: FUNCTION Set_Attributes (
2027: p_tmgv_rec IN tmgv_rec_type,
2028: x_tmgv_rec OUT NOCOPY tmgv_rec_type
2029: ) RETURN VARCHAR2 IS
2030: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2031: BEGIN
2032: x_tmgv_rec := p_tmgv_rec;
2033: RETURN(l_return_status);
2034: END Set_Attributes;

Line 2036: l_return_status := OKL_API.START_ACTIVITY(l_api_name,

2032: x_tmgv_rec := p_tmgv_rec;
2033: RETURN(l_return_status);
2034: END Set_Attributes;
2035: BEGIN
2036: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
2037: G_PKG_NAME,
2038: p_init_msg_list,
2039: l_api_version,
2040: p_api_version,

Line 2043: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2039: l_api_version,
2040: p_api_version,
2041: '_PVT',
2042: x_return_status);
2043: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2044: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2045: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2046: RAISE OKL_API.G_EXCEPTION_ERROR;
2047: END IF;

Line 2044: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2040: p_api_version,
2041: '_PVT',
2042: x_return_status);
2043: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2044: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2045: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2046: RAISE OKL_API.G_EXCEPTION_ERROR;
2047: END IF;
2048: --- Setting item attributes

Line 2045: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

2041: '_PVT',
2042: x_return_status);
2043: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2044: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2045: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2046: RAISE OKL_API.G_EXCEPTION_ERROR;
2047: END IF;
2048: --- Setting item attributes
2049: l_return_status := Set_Attributes(

Line 2046: RAISE OKL_API.G_EXCEPTION_ERROR;

2042: x_return_status);
2043: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2044: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2045: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2046: RAISE OKL_API.G_EXCEPTION_ERROR;
2047: END IF;
2048: --- Setting item attributes
2049: l_return_status := Set_Attributes(
2050: p_tmgv_rec, -- IN

Line 2053: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2049: l_return_status := Set_Attributes(
2050: p_tmgv_rec, -- IN
2051: x_tmgv_rec); -- OUT
2052: --- If any errors happen abort API
2053: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2054: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2055: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2056: RAISE OKL_API.G_EXCEPTION_ERROR;
2057: END IF;

Line 2054: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2050: p_tmgv_rec, -- IN
2051: x_tmgv_rec); -- OUT
2052: --- If any errors happen abort API
2053: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2054: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2055: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2056: RAISE OKL_API.G_EXCEPTION_ERROR;
2057: END IF;
2058: l_return_status := populate_new_record(l_tmgv_rec, l_def_tmgv_rec);

Line 2055: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

2051: x_tmgv_rec); -- OUT
2052: --- If any errors happen abort API
2053: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2054: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2055: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2056: RAISE OKL_API.G_EXCEPTION_ERROR;
2057: END IF;
2058: l_return_status := populate_new_record(l_tmgv_rec, l_def_tmgv_rec);
2059: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

Line 2056: RAISE OKL_API.G_EXCEPTION_ERROR;

2052: --- If any errors happen abort API
2053: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2054: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2055: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2056: RAISE OKL_API.G_EXCEPTION_ERROR;
2057: END IF;
2058: l_return_status := populate_new_record(l_tmgv_rec, l_def_tmgv_rec);
2059: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2060: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 2059: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2055: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2056: RAISE OKL_API.G_EXCEPTION_ERROR;
2057: END IF;
2058: l_return_status := populate_new_record(l_tmgv_rec, l_def_tmgv_rec);
2059: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2060: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2061: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2062: RAISE OKL_API.G_EXCEPTION_ERROR;
2063: END IF;

Line 2060: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2056: RAISE OKL_API.G_EXCEPTION_ERROR;
2057: END IF;
2058: l_return_status := populate_new_record(l_tmgv_rec, l_def_tmgv_rec);
2059: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2060: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2061: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2062: RAISE OKL_API.G_EXCEPTION_ERROR;
2063: END IF;
2064: l_def_tmgv_rec := fill_who_columns(l_def_tmgv_rec);

Line 2061: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

2057: END IF;
2058: l_return_status := populate_new_record(l_tmgv_rec, l_def_tmgv_rec);
2059: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2060: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2061: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2062: RAISE OKL_API.G_EXCEPTION_ERROR;
2063: END IF;
2064: l_def_tmgv_rec := fill_who_columns(l_def_tmgv_rec);
2065: --- Validate all non-missing attributes (Item Level Validation)

Line 2062: RAISE OKL_API.G_EXCEPTION_ERROR;

2058: l_return_status := populate_new_record(l_tmgv_rec, l_def_tmgv_rec);
2059: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2060: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2061: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2062: RAISE OKL_API.G_EXCEPTION_ERROR;
2063: END IF;
2064: l_def_tmgv_rec := fill_who_columns(l_def_tmgv_rec);
2065: --- Validate all non-missing attributes (Item Level Validation)
2066: l_return_status := Validate_Attributes(l_def_tmgv_rec);

Line 2068: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2064: l_def_tmgv_rec := fill_who_columns(l_def_tmgv_rec);
2065: --- Validate all non-missing attributes (Item Level Validation)
2066: l_return_status := Validate_Attributes(l_def_tmgv_rec);
2067: --- If any errors happen abort API
2068: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2069: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2070: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2071: RAISE OKL_API.G_EXCEPTION_ERROR;
2072: END IF;

Line 2069: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2065: --- Validate all non-missing attributes (Item Level Validation)
2066: l_return_status := Validate_Attributes(l_def_tmgv_rec);
2067: --- If any errors happen abort API
2068: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2069: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2070: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2071: RAISE OKL_API.G_EXCEPTION_ERROR;
2072: END IF;
2073: l_return_status := Validate_Record(l_def_tmgv_rec, l_db_tmgv_rec);

Line 2070: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

2066: l_return_status := Validate_Attributes(l_def_tmgv_rec);
2067: --- If any errors happen abort API
2068: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2069: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2070: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2071: RAISE OKL_API.G_EXCEPTION_ERROR;
2072: END IF;
2073: l_return_status := Validate_Record(l_def_tmgv_rec, l_db_tmgv_rec);
2074: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

Line 2071: RAISE OKL_API.G_EXCEPTION_ERROR;

2067: --- If any errors happen abort API
2068: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2069: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2070: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2071: RAISE OKL_API.G_EXCEPTION_ERROR;
2072: END IF;
2073: l_return_status := Validate_Record(l_def_tmgv_rec, l_db_tmgv_rec);
2074: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2075: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 2074: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2070: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2071: RAISE OKL_API.G_EXCEPTION_ERROR;
2072: END IF;
2073: l_return_status := Validate_Record(l_def_tmgv_rec, l_db_tmgv_rec);
2074: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2075: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2076: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2077: RAISE OKL_API.G_EXCEPTION_ERROR;
2078: END IF;

Line 2075: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2071: RAISE OKL_API.G_EXCEPTION_ERROR;
2072: END IF;
2073: l_return_status := Validate_Record(l_def_tmgv_rec, l_db_tmgv_rec);
2074: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2075: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2076: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2077: RAISE OKL_API.G_EXCEPTION_ERROR;
2078: END IF;
2079:

Line 2076: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

2072: END IF;
2073: l_return_status := Validate_Record(l_def_tmgv_rec, l_db_tmgv_rec);
2074: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2075: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2076: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2077: RAISE OKL_API.G_EXCEPTION_ERROR;
2078: END IF;
2079:
2080: -- Lock the Record

Line 2077: RAISE OKL_API.G_EXCEPTION_ERROR;

2073: l_return_status := Validate_Record(l_def_tmgv_rec, l_db_tmgv_rec);
2074: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2075: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2076: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2077: RAISE OKL_API.G_EXCEPTION_ERROR;
2078: END IF;
2079:
2080: -- Lock the Record
2081: lock_row(

Line 2088: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2084: x_return_status => l_return_status,
2085: x_msg_count => x_msg_count,
2086: x_msg_data => x_msg_data,
2087: p_tmgv_rec => p_tmgv_rec);
2088: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2089: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2090: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2091: RAISE OKL_API.G_EXCEPTION_ERROR;
2092: END IF;

Line 2089: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2085: x_msg_count => x_msg_count,
2086: x_msg_data => x_msg_data,
2087: p_tmgv_rec => p_tmgv_rec);
2088: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2089: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2090: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2091: RAISE OKL_API.G_EXCEPTION_ERROR;
2092: END IF;
2093:

Line 2090: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

2086: x_msg_data => x_msg_data,
2087: p_tmgv_rec => p_tmgv_rec);
2088: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2089: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2090: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2091: RAISE OKL_API.G_EXCEPTION_ERROR;
2092: END IF;
2093:
2094: -----------------------------------------

Line 2091: RAISE OKL_API.G_EXCEPTION_ERROR;

2087: p_tmgv_rec => p_tmgv_rec);
2088: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2089: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2090: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2091: RAISE OKL_API.G_EXCEPTION_ERROR;
2092: END IF;
2093:
2094: -----------------------------------------
2095: -- Move VIEW record to "Child" records --

Line 2109: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2105: x_msg_data,
2106: l_tmg_rec,
2107: lx_tmg_rec
2108: );
2109: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2110: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2111: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2112: RAISE OKL_API.G_EXCEPTION_ERROR;
2113: END IF;

Line 2110: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2106: l_tmg_rec,
2107: lx_tmg_rec
2108: );
2109: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2110: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2111: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2112: RAISE OKL_API.G_EXCEPTION_ERROR;
2113: END IF;
2114: migrate(lx_tmg_rec, l_def_tmgv_rec);

Line 2111: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

2107: lx_tmg_rec
2108: );
2109: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2110: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2111: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2112: RAISE OKL_API.G_EXCEPTION_ERROR;
2113: END IF;
2114: migrate(lx_tmg_rec, l_def_tmgv_rec);
2115: x_tmgv_rec := l_def_tmgv_rec;

Line 2112: RAISE OKL_API.G_EXCEPTION_ERROR;

2108: );
2109: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2110: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2111: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2112: RAISE OKL_API.G_EXCEPTION_ERROR;
2113: END IF;
2114: migrate(lx_tmg_rec, l_def_tmgv_rec);
2115: x_tmgv_rec := l_def_tmgv_rec;
2116: x_return_status := l_return_status;

Line 2117: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

2113: END IF;
2114: migrate(lx_tmg_rec, l_def_tmgv_rec);
2115: x_tmgv_rec := l_def_tmgv_rec;
2116: x_return_status := l_return_status;
2117: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2118: EXCEPTION
2119: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2120: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2121: (

Line 2119: WHEN OKL_API.G_EXCEPTION_ERROR THEN

2115: x_tmgv_rec := l_def_tmgv_rec;
2116: x_return_status := l_return_status;
2117: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2118: EXCEPTION
2119: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2120: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2121: (
2122: l_api_name,
2123: G_PKG_NAME,

Line 2120: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2116: x_return_status := l_return_status;
2117: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2118: EXCEPTION
2119: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2120: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2121: (
2122: l_api_name,
2123: G_PKG_NAME,
2124: 'OKL_API.G_RET_STS_ERROR',

Line 2124: 'OKL_API.G_RET_STS_ERROR',

2120: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2121: (
2122: l_api_name,
2123: G_PKG_NAME,
2124: 'OKL_API.G_RET_STS_ERROR',
2125: x_msg_count,
2126: x_msg_data,
2127: '_PVT'
2128: );

Line 2129: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2125: x_msg_count,
2126: x_msg_data,
2127: '_PVT'
2128: );
2129: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2130: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2131: (
2132: l_api_name,
2133: G_PKG_NAME,

Line 2130: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2126: x_msg_data,
2127: '_PVT'
2128: );
2129: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2130: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2131: (
2132: l_api_name,
2133: G_PKG_NAME,
2134: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 2134: 'OKL_API.G_RET_STS_UNEXP_ERROR',

2130: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2131: (
2132: l_api_name,
2133: G_PKG_NAME,
2134: 'OKL_API.G_RET_STS_UNEXP_ERROR',
2135: x_msg_count,
2136: x_msg_data,
2137: '_PVT'
2138: );

Line 2140: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2136: x_msg_data,
2137: '_PVT'
2138: );
2139: WHEN OTHERS THEN
2140: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2141: (
2142: l_api_name,
2143: G_PKG_NAME,
2144: 'OTHERS',

Line 2155: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

2151: -- PL/SQL TBL update_row for:tmgv_tbl --
2152: ----------------------------------------
2153: PROCEDURE update_row(
2154: p_api_version IN NUMBER,
2155: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
2156: x_return_status OUT NOCOPY VARCHAR2,
2157: x_msg_count OUT NOCOPY NUMBER,
2158: x_msg_data OUT NOCOPY VARCHAR2,
2159: p_tmgv_tbl IN tmgv_tbl_type,

Line 2161: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS

2157: x_msg_count OUT NOCOPY NUMBER,
2158: x_msg_data OUT NOCOPY VARCHAR2,
2159: p_tmgv_tbl IN tmgv_tbl_type,
2160: x_tmgv_tbl OUT NOCOPY tmgv_tbl_type,
2161: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS
2162:
2163: l_api_version CONSTANT NUMBER := 1;
2164: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_update_row';
2165: i NUMBER := 0;

Line 2167: OKL_API.init_msg_list(p_init_msg_list);

2163: l_api_version CONSTANT NUMBER := 1;
2164: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_update_row';
2165: i NUMBER := 0;
2166: BEGIN
2167: OKL_API.init_msg_list(p_init_msg_list);
2168: -- Make sure PL/SQL table has records in it before passing
2169: IF (p_tmgv_tbl.COUNT > 0) THEN
2170: i := p_tmgv_tbl.FIRST;
2171: LOOP

Line 2173: l_error_rec OKL_API.ERROR_REC_TYPE;

2169: IF (p_tmgv_tbl.COUNT > 0) THEN
2170: i := p_tmgv_tbl.FIRST;
2171: LOOP
2172: DECLARE
2173: l_error_rec OKL_API.ERROR_REC_TYPE;
2174: BEGIN
2175: l_error_rec.api_name := l_api_name;
2176: l_error_rec.api_package := G_PKG_NAME;
2177: l_error_rec.idx := i;

Line 2180: p_init_msg_list => OKL_API.G_FALSE,

2176: l_error_rec.api_package := G_PKG_NAME;
2177: l_error_rec.idx := i;
2178: update_row (
2179: p_api_version => p_api_version,
2180: p_init_msg_list => OKL_API.G_FALSE,
2181: x_return_status => l_error_rec.error_type,
2182: x_msg_count => l_error_rec.msg_count,
2183: x_msg_data => l_error_rec.msg_data,
2184: p_tmgv_rec => p_tmgv_tbl(i),

Line 2186: IF (l_error_rec.error_type <> OKL_API.G_RET_STS_SUCCESS) THEN

2182: x_msg_count => l_error_rec.msg_count,
2183: x_msg_data => l_error_rec.msg_data,
2184: p_tmgv_rec => p_tmgv_tbl(i),
2185: x_tmgv_rec => x_tmgv_tbl(i));
2186: IF (l_error_rec.error_type <> OKL_API.G_RET_STS_SUCCESS) THEN
2187: l_error_rec.sqlcode := SQLCODE;
2188: load_error_tbl(l_error_rec, px_error_tbl);
2189: ELSE
2190: x_msg_count := l_error_rec.msg_count;

Line 2194: WHEN OKL_API.G_EXCEPTION_ERROR THEN

2190: x_msg_count := l_error_rec.msg_count;
2191: x_msg_data := l_error_rec.msg_data;
2192: END IF;
2193: EXCEPTION
2194: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2195: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
2196: l_error_rec.sqlcode := SQLCODE;
2197: load_error_tbl(l_error_rec, px_error_tbl);
2198: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 2195: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;

2191: x_msg_data := l_error_rec.msg_data;
2192: END IF;
2193: EXCEPTION
2194: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2195: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
2196: l_error_rec.sqlcode := SQLCODE;
2197: load_error_tbl(l_error_rec, px_error_tbl);
2198: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2199: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;

Line 2198: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2194: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2195: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
2196: l_error_rec.sqlcode := SQLCODE;
2197: load_error_tbl(l_error_rec, px_error_tbl);
2198: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2199: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
2200: l_error_rec.sqlcode := SQLCODE;
2201: load_error_tbl(l_error_rec, px_error_tbl);
2202: WHEN OTHERS THEN

Line 2199: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;

2195: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
2196: l_error_rec.sqlcode := SQLCODE;
2197: load_error_tbl(l_error_rec, px_error_tbl);
2198: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2199: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
2200: l_error_rec.sqlcode := SQLCODE;
2201: load_error_tbl(l_error_rec, px_error_tbl);
2202: WHEN OTHERS THEN
2203: l_error_rec.error_type := 'OTHERS';

Line 2214: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

2210: END IF;
2211: -- Loop through the error_tbl to find the error with the highest severity
2212: -- and return it.
2213: x_return_status := find_highest_exception(px_error_tbl);
2214: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2215: EXCEPTION
2216: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2217: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2218: (

Line 2216: WHEN OKL_API.G_EXCEPTION_ERROR THEN

2212: -- and return it.
2213: x_return_status := find_highest_exception(px_error_tbl);
2214: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2215: EXCEPTION
2216: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2217: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2218: (
2219: l_api_name,
2220: G_PKG_NAME,

Line 2217: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2213: x_return_status := find_highest_exception(px_error_tbl);
2214: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2215: EXCEPTION
2216: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2217: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2218: (
2219: l_api_name,
2220: G_PKG_NAME,
2221: 'OKL_API.G_RET_STS_ERROR',

Line 2221: 'OKL_API.G_RET_STS_ERROR',

2217: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2218: (
2219: l_api_name,
2220: G_PKG_NAME,
2221: 'OKL_API.G_RET_STS_ERROR',
2222: x_msg_count,
2223: x_msg_data,
2224: '_PVT'
2225: );

Line 2226: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2222: x_msg_count,
2223: x_msg_data,
2224: '_PVT'
2225: );
2226: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2227: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2228: (
2229: l_api_name,
2230: G_PKG_NAME,

Line 2227: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2223: x_msg_data,
2224: '_PVT'
2225: );
2226: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2227: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2228: (
2229: l_api_name,
2230: G_PKG_NAME,
2231: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 2231: 'OKL_API.G_RET_STS_UNEXP_ERROR',

2227: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2228: (
2229: l_api_name,
2230: G_PKG_NAME,
2231: 'OKL_API.G_RET_STS_UNEXP_ERROR',
2232: x_msg_count,
2233: x_msg_data,
2234: '_PVT'
2235: );

Line 2237: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2233: x_msg_data,
2234: '_PVT'
2235: );
2236: WHEN OTHERS THEN
2237: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2238: (
2239: l_api_name,
2240: G_PKG_NAME,
2241: 'OTHERS',

Line 2253: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

2249: -- PL/SQL TBL update_row for:TMGV_TBL --
2250: ----------------------------------------
2251: PROCEDURE update_row(
2252: p_api_version IN NUMBER,
2253: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
2254: x_return_status OUT NOCOPY VARCHAR2,
2255: x_msg_count OUT NOCOPY NUMBER,
2256: x_msg_data OUT NOCOPY VARCHAR2,
2257: p_tmgv_tbl IN tmgv_tbl_type,

Line 2262: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

2258: x_tmgv_tbl OUT NOCOPY tmgv_tbl_type) IS
2259:
2260: l_api_version CONSTANT NUMBER := 1;
2261: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
2262: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2263: l_error_tbl OKL_API.ERROR_TBL_TYPE;
2264: BEGIN
2265: OKL_API.init_msg_list(p_init_msg_list);
2266: -- Make sure PL/SQL table has records in it before passing

Line 2263: l_error_tbl OKL_API.ERROR_TBL_TYPE;

2259:
2260: l_api_version CONSTANT NUMBER := 1;
2261: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
2262: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2263: l_error_tbl OKL_API.ERROR_TBL_TYPE;
2264: BEGIN
2265: OKL_API.init_msg_list(p_init_msg_list);
2266: -- Make sure PL/SQL table has records in it before passing
2267: IF (p_tmgv_tbl.COUNT > 0) THEN

Line 2265: OKL_API.init_msg_list(p_init_msg_list);

2261: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
2262: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2263: l_error_tbl OKL_API.ERROR_TBL_TYPE;
2264: BEGIN
2265: OKL_API.init_msg_list(p_init_msg_list);
2266: -- Make sure PL/SQL table has records in it before passing
2267: IF (p_tmgv_tbl.COUNT > 0) THEN
2268: update_row (
2269: p_api_version => p_api_version,

Line 2270: p_init_msg_list => OKL_API.G_FALSE,

2266: -- Make sure PL/SQL table has records in it before passing
2267: IF (p_tmgv_tbl.COUNT > 0) THEN
2268: update_row (
2269: p_api_version => p_api_version,
2270: p_init_msg_list => OKL_API.G_FALSE,
2271: x_return_status => x_return_status,
2272: x_msg_count => x_msg_count,
2273: x_msg_data => x_msg_data,
2274: p_tmgv_tbl => p_tmgv_tbl,

Line 2278: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

2274: p_tmgv_tbl => p_tmgv_tbl,
2275: x_tmgv_tbl => x_tmgv_tbl,
2276: px_error_tbl => l_error_tbl);
2277: END IF;
2278: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2279: EXCEPTION
2280: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2281: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2282: (

Line 2280: WHEN OKL_API.G_EXCEPTION_ERROR THEN

2276: px_error_tbl => l_error_tbl);
2277: END IF;
2278: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2279: EXCEPTION
2280: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2281: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2282: (
2283: l_api_name,
2284: G_PKG_NAME,

Line 2281: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2277: END IF;
2278: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2279: EXCEPTION
2280: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2281: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2282: (
2283: l_api_name,
2284: G_PKG_NAME,
2285: 'OKL_API.G_RET_STS_ERROR',

Line 2285: 'OKL_API.G_RET_STS_ERROR',

2281: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2282: (
2283: l_api_name,
2284: G_PKG_NAME,
2285: 'OKL_API.G_RET_STS_ERROR',
2286: x_msg_count,
2287: x_msg_data,
2288: '_PVT'
2289: );

Line 2290: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2286: x_msg_count,
2287: x_msg_data,
2288: '_PVT'
2289: );
2290: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2291: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2292: (
2293: l_api_name,
2294: G_PKG_NAME,

Line 2291: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2287: x_msg_data,
2288: '_PVT'
2289: );
2290: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2291: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2292: (
2293: l_api_name,
2294: G_PKG_NAME,
2295: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 2295: 'OKL_API.G_RET_STS_UNEXP_ERROR',

2291: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2292: (
2293: l_api_name,
2294: G_PKG_NAME,
2295: 'OKL_API.G_RET_STS_UNEXP_ERROR',
2296: x_msg_count,
2297: x_msg_data,
2298: '_PVT'
2299: );

Line 2301: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2297: x_msg_data,
2298: '_PVT'
2299: );
2300: WHEN OTHERS THEN
2301: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2302: (
2303: l_api_name,
2304: G_PKG_NAME,
2305: 'OTHERS',

Line 2319: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

2315: ---------------------------------
2316: -- delete_row for:OKL_TRX_MSGS --
2317: ---------------------------------
2318: PROCEDURE delete_row(
2319: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
2320: x_return_status OUT NOCOPY VARCHAR2,
2321: x_msg_count OUT NOCOPY NUMBER,
2322: x_msg_data OUT NOCOPY VARCHAR2,
2323: p_tmg_rec IN tmg_rec_type) IS

Line 2327: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

2323: p_tmg_rec IN tmg_rec_type) IS
2324:
2325: l_api_version CONSTANT NUMBER := 1;
2326: l_api_name CONSTANT VARCHAR2(30) := 'B_delete_row';
2327: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2328: l_tmg_rec tmg_rec_type := p_tmg_rec;
2329: l_row_notfound BOOLEAN := TRUE;
2330: BEGIN
2331: l_return_status := OKL_API.START_ACTIVITY(l_api_name,

Line 2331: l_return_status := OKL_API.START_ACTIVITY(l_api_name,

2327: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2328: l_tmg_rec tmg_rec_type := p_tmg_rec;
2329: l_row_notfound BOOLEAN := TRUE;
2330: BEGIN
2331: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
2332: p_init_msg_list,
2333: '_PVT',
2334: x_return_status);
2335: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

Line 2335: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2331: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
2332: p_init_msg_list,
2333: '_PVT',
2334: x_return_status);
2335: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2336: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2337: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2338: RAISE OKL_API.G_EXCEPTION_ERROR;
2339: END IF;

Line 2336: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2332: p_init_msg_list,
2333: '_PVT',
2334: x_return_status);
2335: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2336: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2337: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2338: RAISE OKL_API.G_EXCEPTION_ERROR;
2339: END IF;
2340:

Line 2337: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

2333: '_PVT',
2334: x_return_status);
2335: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2336: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2337: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2338: RAISE OKL_API.G_EXCEPTION_ERROR;
2339: END IF;
2340:
2341: DELETE FROM OKL_TRX_MSGS

Line 2338: RAISE OKL_API.G_EXCEPTION_ERROR;

2334: x_return_status);
2335: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2336: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2337: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2338: RAISE OKL_API.G_EXCEPTION_ERROR;
2339: END IF;
2340:
2341: DELETE FROM OKL_TRX_MSGS
2342: WHERE ID = p_tmg_rec.id;

Line 2345: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

2341: DELETE FROM OKL_TRX_MSGS
2342: WHERE ID = p_tmg_rec.id;
2343:
2344: x_return_status := l_return_status;
2345: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2346: EXCEPTION
2347: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2348: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2349: (

Line 2347: WHEN OKL_API.G_EXCEPTION_ERROR THEN

2343:
2344: x_return_status := l_return_status;
2345: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2346: EXCEPTION
2347: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2348: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2349: (
2350: l_api_name,
2351: G_PKG_NAME,

Line 2348: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2344: x_return_status := l_return_status;
2345: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2346: EXCEPTION
2347: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2348: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2349: (
2350: l_api_name,
2351: G_PKG_NAME,
2352: 'OKL_API.G_RET_STS_ERROR',

Line 2352: 'OKL_API.G_RET_STS_ERROR',

2348: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2349: (
2350: l_api_name,
2351: G_PKG_NAME,
2352: 'OKL_API.G_RET_STS_ERROR',
2353: x_msg_count,
2354: x_msg_data,
2355: '_PVT'
2356: );

Line 2357: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2353: x_msg_count,
2354: x_msg_data,
2355: '_PVT'
2356: );
2357: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2358: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2359: (
2360: l_api_name,
2361: G_PKG_NAME,

Line 2358: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2354: x_msg_data,
2355: '_PVT'
2356: );
2357: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2358: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2359: (
2360: l_api_name,
2361: G_PKG_NAME,
2362: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 2362: 'OKL_API.G_RET_STS_UNEXP_ERROR',

2358: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2359: (
2360: l_api_name,
2361: G_PKG_NAME,
2362: 'OKL_API.G_RET_STS_UNEXP_ERROR',
2363: x_msg_count,
2364: x_msg_data,
2365: '_PVT'
2366: );

Line 2368: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2364: x_msg_data,
2365: '_PVT'
2366: );
2367: WHEN OTHERS THEN
2368: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2369: (
2370: l_api_name,
2371: G_PKG_NAME,
2372: 'OTHERS',

Line 2383: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

2379: -- delete_row for:OKL_TRX_MSGS_V --
2380: -----------------------------------
2381: PROCEDURE delete_row(
2382: p_api_version IN NUMBER,
2383: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
2384: x_return_status OUT NOCOPY VARCHAR2,
2385: x_msg_count OUT NOCOPY NUMBER,
2386: x_msg_data OUT NOCOPY VARCHAR2,
2387: p_tmgv_rec IN tmgv_rec_type) IS

Line 2391: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

2387: p_tmgv_rec IN tmgv_rec_type) IS
2388:
2389: l_api_version CONSTANT NUMBER := 1;
2390: l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
2391: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2392: l_tmgv_rec tmgv_rec_type := p_tmgv_rec;
2393: l_tmg_rec tmg_rec_type;
2394: BEGIN
2395: l_return_status := OKL_API.START_ACTIVITY(l_api_name,

Line 2395: l_return_status := OKL_API.START_ACTIVITY(l_api_name,

2391: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2392: l_tmgv_rec tmgv_rec_type := p_tmgv_rec;
2393: l_tmg_rec tmg_rec_type;
2394: BEGIN
2395: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
2396: G_PKG_NAME,
2397: p_init_msg_list,
2398: l_api_version,
2399: p_api_version,

Line 2402: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2398: l_api_version,
2399: p_api_version,
2400: '_PVT',
2401: x_return_status);
2402: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2403: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2404: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2405: RAISE OKL_API.G_EXCEPTION_ERROR;
2406: END IF;

Line 2403: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2399: p_api_version,
2400: '_PVT',
2401: x_return_status);
2402: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2403: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2404: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2405: RAISE OKL_API.G_EXCEPTION_ERROR;
2406: END IF;
2407: -----------------------------------------

Line 2404: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

2400: '_PVT',
2401: x_return_status);
2402: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2403: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2404: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2405: RAISE OKL_API.G_EXCEPTION_ERROR;
2406: END IF;
2407: -----------------------------------------
2408: -- Move VIEW record to "Child" records --

Line 2405: RAISE OKL_API.G_EXCEPTION_ERROR;

2401: x_return_status);
2402: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2403: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2404: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2405: RAISE OKL_API.G_EXCEPTION_ERROR;
2406: END IF;
2407: -----------------------------------------
2408: -- Move VIEW record to "Child" records --
2409: -----------------------------------------

Line 2421: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2417: x_msg_count,
2418: x_msg_data,
2419: l_tmg_rec
2420: );
2421: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2422: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2423: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2424: RAISE OKL_API.G_EXCEPTION_ERROR;
2425: END IF;

Line 2422: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2418: x_msg_data,
2419: l_tmg_rec
2420: );
2421: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2422: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2423: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2424: RAISE OKL_API.G_EXCEPTION_ERROR;
2425: END IF;
2426: x_return_status := l_return_status;

Line 2423: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

2419: l_tmg_rec
2420: );
2421: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2422: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2423: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2424: RAISE OKL_API.G_EXCEPTION_ERROR;
2425: END IF;
2426: x_return_status := l_return_status;
2427: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 2424: RAISE OKL_API.G_EXCEPTION_ERROR;

2420: );
2421: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2422: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2423: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2424: RAISE OKL_API.G_EXCEPTION_ERROR;
2425: END IF;
2426: x_return_status := l_return_status;
2427: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2428: EXCEPTION

Line 2427: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

2423: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2424: RAISE OKL_API.G_EXCEPTION_ERROR;
2425: END IF;
2426: x_return_status := l_return_status;
2427: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2428: EXCEPTION
2429: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2430: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2431: (

Line 2429: WHEN OKL_API.G_EXCEPTION_ERROR THEN

2425: END IF;
2426: x_return_status := l_return_status;
2427: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2428: EXCEPTION
2429: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2430: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2431: (
2432: l_api_name,
2433: G_PKG_NAME,

Line 2430: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2426: x_return_status := l_return_status;
2427: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2428: EXCEPTION
2429: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2430: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2431: (
2432: l_api_name,
2433: G_PKG_NAME,
2434: 'OKL_API.G_RET_STS_ERROR',

Line 2434: 'OKL_API.G_RET_STS_ERROR',

2430: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2431: (
2432: l_api_name,
2433: G_PKG_NAME,
2434: 'OKL_API.G_RET_STS_ERROR',
2435: x_msg_count,
2436: x_msg_data,
2437: '_PVT'
2438: );

Line 2439: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2435: x_msg_count,
2436: x_msg_data,
2437: '_PVT'
2438: );
2439: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2440: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2441: (
2442: l_api_name,
2443: G_PKG_NAME,

Line 2440: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2436: x_msg_data,
2437: '_PVT'
2438: );
2439: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2440: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2441: (
2442: l_api_name,
2443: G_PKG_NAME,
2444: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 2444: 'OKL_API.G_RET_STS_UNEXP_ERROR',

2440: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2441: (
2442: l_api_name,
2443: G_PKG_NAME,
2444: 'OKL_API.G_RET_STS_UNEXP_ERROR',
2445: x_msg_count,
2446: x_msg_data,
2447: '_PVT'
2448: );

Line 2450: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2446: x_msg_data,
2447: '_PVT'
2448: );
2449: WHEN OTHERS THEN
2450: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2451: (
2452: l_api_name,
2453: G_PKG_NAME,
2454: 'OTHERS',

Line 2465: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

2461: -- PL/SQL TBL delete_row for:OKL_TRX_MSGS_V --
2462: ----------------------------------------------
2463: PROCEDURE delete_row(
2464: p_api_version IN NUMBER,
2465: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
2466: x_return_status OUT NOCOPY VARCHAR2,
2467: x_msg_count OUT NOCOPY NUMBER,
2468: x_msg_data OUT NOCOPY VARCHAR2,
2469: p_tmgv_tbl IN tmgv_tbl_type,

Line 2470: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS

2466: x_return_status OUT NOCOPY VARCHAR2,
2467: x_msg_count OUT NOCOPY NUMBER,
2468: x_msg_data OUT NOCOPY VARCHAR2,
2469: p_tmgv_tbl IN tmgv_tbl_type,
2470: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS
2471:
2472: l_api_version CONSTANT NUMBER := 1;
2473: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_delete_row';
2474: i NUMBER := 0;

Line 2476: OKL_API.init_msg_list(p_init_msg_list);

2472: l_api_version CONSTANT NUMBER := 1;
2473: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_delete_row';
2474: i NUMBER := 0;
2475: BEGIN
2476: OKL_API.init_msg_list(p_init_msg_list);
2477: -- Make sure PL/SQL table has records in it before passing
2478: IF (p_tmgv_tbl.COUNT > 0) THEN
2479: i := p_tmgv_tbl.FIRST;
2480: LOOP

Line 2482: l_error_rec OKL_API.ERROR_REC_TYPE;

2478: IF (p_tmgv_tbl.COUNT > 0) THEN
2479: i := p_tmgv_tbl.FIRST;
2480: LOOP
2481: DECLARE
2482: l_error_rec OKL_API.ERROR_REC_TYPE;
2483: BEGIN
2484: l_error_rec.api_name := l_api_name;
2485: l_error_rec.api_package := G_PKG_NAME;
2486: l_error_rec.idx := i;

Line 2489: p_init_msg_list => OKL_API.G_FALSE,

2485: l_error_rec.api_package := G_PKG_NAME;
2486: l_error_rec.idx := i;
2487: delete_row (
2488: p_api_version => p_api_version,
2489: p_init_msg_list => OKL_API.G_FALSE,
2490: x_return_status => l_error_rec.error_type,
2491: x_msg_count => l_error_rec.msg_count,
2492: x_msg_data => l_error_rec.msg_data,
2493: p_tmgv_rec => p_tmgv_tbl(i));

Line 2494: IF (l_error_rec.error_type <> OKL_API.G_RET_STS_SUCCESS) THEN

2490: x_return_status => l_error_rec.error_type,
2491: x_msg_count => l_error_rec.msg_count,
2492: x_msg_data => l_error_rec.msg_data,
2493: p_tmgv_rec => p_tmgv_tbl(i));
2494: IF (l_error_rec.error_type <> OKL_API.G_RET_STS_SUCCESS) THEN
2495: l_error_rec.sqlcode := SQLCODE;
2496: load_error_tbl(l_error_rec, px_error_tbl);
2497: ELSE
2498: x_msg_count := l_error_rec.msg_count;

Line 2502: WHEN OKL_API.G_EXCEPTION_ERROR THEN

2498: x_msg_count := l_error_rec.msg_count;
2499: x_msg_data := l_error_rec.msg_data;
2500: END IF;
2501: EXCEPTION
2502: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2503: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
2504: l_error_rec.sqlcode := SQLCODE;
2505: load_error_tbl(l_error_rec, px_error_tbl);
2506: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 2503: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;

2499: x_msg_data := l_error_rec.msg_data;
2500: END IF;
2501: EXCEPTION
2502: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2503: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
2504: l_error_rec.sqlcode := SQLCODE;
2505: load_error_tbl(l_error_rec, px_error_tbl);
2506: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2507: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;

Line 2506: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2502: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2503: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
2504: l_error_rec.sqlcode := SQLCODE;
2505: load_error_tbl(l_error_rec, px_error_tbl);
2506: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2507: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
2508: l_error_rec.sqlcode := SQLCODE;
2509: load_error_tbl(l_error_rec, px_error_tbl);
2510: WHEN OTHERS THEN

Line 2507: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;

2503: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
2504: l_error_rec.sqlcode := SQLCODE;
2505: load_error_tbl(l_error_rec, px_error_tbl);
2506: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2507: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
2508: l_error_rec.sqlcode := SQLCODE;
2509: load_error_tbl(l_error_rec, px_error_tbl);
2510: WHEN OTHERS THEN
2511: l_error_rec.error_type := 'OTHERS';

Line 2522: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

2518: END IF;
2519: -- Loop through the error_tbl to find the error with the highest severity
2520: -- and return it.
2521: x_return_status := find_highest_exception(px_error_tbl);
2522: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2523: EXCEPTION
2524: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2525: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2526: (

Line 2524: WHEN OKL_API.G_EXCEPTION_ERROR THEN

2520: -- and return it.
2521: x_return_status := find_highest_exception(px_error_tbl);
2522: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2523: EXCEPTION
2524: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2525: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2526: (
2527: l_api_name,
2528: G_PKG_NAME,

Line 2525: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2521: x_return_status := find_highest_exception(px_error_tbl);
2522: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2523: EXCEPTION
2524: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2525: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2526: (
2527: l_api_name,
2528: G_PKG_NAME,
2529: 'OKL_API.G_RET_STS_ERROR',

Line 2529: 'OKL_API.G_RET_STS_ERROR',

2525: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2526: (
2527: l_api_name,
2528: G_PKG_NAME,
2529: 'OKL_API.G_RET_STS_ERROR',
2530: x_msg_count,
2531: x_msg_data,
2532: '_PVT'
2533: );

Line 2534: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2530: x_msg_count,
2531: x_msg_data,
2532: '_PVT'
2533: );
2534: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2535: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2536: (
2537: l_api_name,
2538: G_PKG_NAME,

Line 2535: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2531: x_msg_data,
2532: '_PVT'
2533: );
2534: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2535: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2536: (
2537: l_api_name,
2538: G_PKG_NAME,
2539: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 2539: 'OKL_API.G_RET_STS_UNEXP_ERROR',

2535: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2536: (
2537: l_api_name,
2538: G_PKG_NAME,
2539: 'OKL_API.G_RET_STS_UNEXP_ERROR',
2540: x_msg_count,
2541: x_msg_data,
2542: '_PVT'
2543: );

Line 2545: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2541: x_msg_data,
2542: '_PVT'
2543: );
2544: WHEN OTHERS THEN
2545: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2546: (
2547: l_api_name,
2548: G_PKG_NAME,
2549: 'OTHERS',

Line 2561: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

2557: -- PL/SQL TBL delete_row for:OKL_TRX_MSGS_V --
2558: ----------------------------------------------
2559: PROCEDURE delete_row(
2560: p_api_version IN NUMBER,
2561: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
2562: x_return_status OUT NOCOPY VARCHAR2,
2563: x_msg_count OUT NOCOPY NUMBER,
2564: x_msg_data OUT NOCOPY VARCHAR2,
2565: p_tmgv_tbl IN tmgv_tbl_type) IS

Line 2569: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

2565: p_tmgv_tbl IN tmgv_tbl_type) IS
2566:
2567: l_api_version CONSTANT NUMBER := 1;
2568: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
2569: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2570: l_error_tbl OKL_API.ERROR_TBL_TYPE;
2571: BEGIN
2572: OKL_API.init_msg_list(p_init_msg_list);
2573: -- Make sure PL/SQL table has records in it before passing

Line 2570: l_error_tbl OKL_API.ERROR_TBL_TYPE;

2566:
2567: l_api_version CONSTANT NUMBER := 1;
2568: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
2569: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2570: l_error_tbl OKL_API.ERROR_TBL_TYPE;
2571: BEGIN
2572: OKL_API.init_msg_list(p_init_msg_list);
2573: -- Make sure PL/SQL table has records in it before passing
2574: IF (p_tmgv_tbl.COUNT > 0) THEN

Line 2572: OKL_API.init_msg_list(p_init_msg_list);

2568: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
2569: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2570: l_error_tbl OKL_API.ERROR_TBL_TYPE;
2571: BEGIN
2572: OKL_API.init_msg_list(p_init_msg_list);
2573: -- Make sure PL/SQL table has records in it before passing
2574: IF (p_tmgv_tbl.COUNT > 0) THEN
2575: delete_row (
2576: p_api_version => p_api_version,

Line 2577: p_init_msg_list => OKL_API.G_FALSE,

2573: -- Make sure PL/SQL table has records in it before passing
2574: IF (p_tmgv_tbl.COUNT > 0) THEN
2575: delete_row (
2576: p_api_version => p_api_version,
2577: p_init_msg_list => OKL_API.G_FALSE,
2578: x_return_status => x_return_status,
2579: x_msg_count => x_msg_count,
2580: x_msg_data => x_msg_data,
2581: p_tmgv_tbl => p_tmgv_tbl,

Line 2584: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

2580: x_msg_data => x_msg_data,
2581: p_tmgv_tbl => p_tmgv_tbl,
2582: px_error_tbl => l_error_tbl);
2583: END IF;
2584: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2585: EXCEPTION
2586: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2587: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2588: (

Line 2586: WHEN OKL_API.G_EXCEPTION_ERROR THEN

2582: px_error_tbl => l_error_tbl);
2583: END IF;
2584: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2585: EXCEPTION
2586: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2587: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2588: (
2589: l_api_name,
2590: G_PKG_NAME,

Line 2587: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2583: END IF;
2584: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2585: EXCEPTION
2586: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2587: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2588: (
2589: l_api_name,
2590: G_PKG_NAME,
2591: 'OKL_API.G_RET_STS_ERROR',

Line 2591: 'OKL_API.G_RET_STS_ERROR',

2587: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2588: (
2589: l_api_name,
2590: G_PKG_NAME,
2591: 'OKL_API.G_RET_STS_ERROR',
2592: x_msg_count,
2593: x_msg_data,
2594: '_PVT'
2595: );

Line 2596: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2592: x_msg_count,
2593: x_msg_data,
2594: '_PVT'
2595: );
2596: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2597: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2598: (
2599: l_api_name,
2600: G_PKG_NAME,

Line 2597: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2593: x_msg_data,
2594: '_PVT'
2595: );
2596: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2597: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2598: (
2599: l_api_name,
2600: G_PKG_NAME,
2601: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 2601: 'OKL_API.G_RET_STS_UNEXP_ERROR',

2597: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2598: (
2599: l_api_name,
2600: G_PKG_NAME,
2601: 'OKL_API.G_RET_STS_UNEXP_ERROR',
2602: x_msg_count,
2603: x_msg_data,
2604: '_PVT'
2605: );

Line 2607: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2603: x_msg_data,
2604: '_PVT'
2605: );
2606: WHEN OTHERS THEN
2607: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2608: (
2609: l_api_name,
2610: G_PKG_NAME,
2611: 'OTHERS',