DBA Data[Home] [Help]

APPS.OKL_SUBSIDY_POOL_AUTH_TRX_PVT dependencies on OKL_API

Line 71: x_return_status := OKL_API.G_RET_STS_SUCCESS;

67: l_debug_enabled VARCHAR2(10);
68: is_debug_statement_on BOOLEAN;
69:
70: BEGIN
71: x_return_status := OKL_API.G_RET_STS_SUCCESS;
72:
73: l_debug_enabled := okl_debug_pub.check_log_enabled;
74: -- check for logging on STATEMENT level
75: is_debug_statement_on := okl_debug_pub.check_log_on(l_module,FND_LOG.LEVEL_STATEMENT);

Line 88: OKL_API.set_message(G_APP_NAME, G_SOURCE_TRX_DATE_POOL_VAL

84: CLOSE c_get_pool_dates_csr;
85: -- validate if the source transaction date is between the passed subsidy pool dates
86: IF NOT(TRUNC(p_source_trx_date) BETWEEN cv_get_pool_dates_csr.effective_from_date AND
87: NVL(cv_get_pool_dates_csr.effective_to_date,OKL_ACCOUNTING_UTIL.g_final_date))THEN
88: OKL_API.set_message(G_APP_NAME, G_SOURCE_TRX_DATE_POOL_VAL
89: ,'TRX_DATE', p_source_trx_date
90: ,'POOL_NAME', cv_get_pool_dates_csr.subsidy_pool_name
91: ,'ASSET_NUMBER',lv_six_tbl(idx).dnz_asset_number);
92: x_return_status := OKL_API.G_RET_STS_ERROR;

Line 92: x_return_status := OKL_API.G_RET_STS_ERROR;

88: OKL_API.set_message(G_APP_NAME, G_SOURCE_TRX_DATE_POOL_VAL
89: ,'TRX_DATE', p_source_trx_date
90: ,'POOL_NAME', cv_get_pool_dates_csr.subsidy_pool_name
91: ,'ASSET_NUMBER',lv_six_tbl(idx).dnz_asset_number);
92: x_return_status := OKL_API.G_RET_STS_ERROR;
93: -- any errors here would be rolled up to display as a bundled error; i.e. all subsidy elements are
94: -- processed to show applicable errors. hence no raise statement
95: ELSE
96: -- assign the source trx date to the date of the rebook

Line 109: IF(lv_six_tbl(idx).trx_type_code = 'ADDITION' AND x_return_status = OKL_API.G_RET_STS_SUCCESS)THEN

105: END IF;
106: -- for ADDITION to pool balance, check if there was a prior REDUCTION operation.
107: -- this validation ensures that we are not adding back to the pool balance without ever reducing from it
108: -- in ideal scenarios, this check never fails, but this check is essential to stop data corruption
109: IF(lv_six_tbl(idx).trx_type_code = 'ADDITION' AND x_return_status = OKL_API.G_RET_STS_SUCCESS)THEN
110: IF(NVL(l_debug_enabled,'N')='Y' AND is_debug_statement_on) THEN
111: okl_debug_pub.log_debug(FND_LOG.LEVEL_STATEMENT,
112: l_module,
113: ' finding trx for pool '||lv_six_tbl(idx).subsidy_pool_id || ' lv_six_tbl(idx).source_object_id '||lv_six_tbl(idx).source_object_id

Line 134: OKL_API.set_message(G_APP_NAME, G_NO_POOL_TRANSACTION_EXISTS

130: );
131: FETCH c_get_pool_trx_details INTO cv_get_pool_trx_details;
132: IF(c_get_pool_trx_details%NOTFOUND)THEN
133: CLOSE c_get_pool_trx_details;
134: OKL_API.set_message(G_APP_NAME, G_NO_POOL_TRANSACTION_EXISTS
135: ,'ASSET_NUMBER', lv_six_tbl(idx).dnz_asset_number);
136: x_return_status := OKL_API.G_RET_STS_ERROR;
137: END IF;
138: CLOSE c_get_pool_trx_details;

Line 136: x_return_status := OKL_API.G_RET_STS_ERROR;

132: IF(c_get_pool_trx_details%NOTFOUND)THEN
133: CLOSE c_get_pool_trx_details;
134: OKL_API.set_message(G_APP_NAME, G_NO_POOL_TRANSACTION_EXISTS
135: ,'ASSET_NUMBER', lv_six_tbl(idx).dnz_asset_number);
136: x_return_status := OKL_API.G_RET_STS_ERROR;
137: END IF;
138: CLOSE c_get_pool_trx_details;
139: lv_six_tbl(idx).subsidy_pool_amount := cv_get_pool_trx_details.subsidy_pool_amount;
140: lv_six_tbl(idx).conversion_rate := cv_get_pool_trx_details.conversion_rate;

Line 150: END IF; -- end of lv_six_tbl(idx).trx_type_code = 'ADDITION' AND x_return_status = OKL_API.G_RET_STS_SUCCESS

146: ||' lv_six_tbl(idx).vendor_id '||lv_six_tbl(idx).vendor_id||' lv_six_tbl(idx).dnz_asset_number '||lv_six_tbl(idx).dnz_asset_number
147: ||' lv_six_tbl(idx).subsidy_id '||lv_six_tbl(idx).subsidy_id
148: );
149: END IF; -- end of NVL(l_debug_enabled,'N')='Y' AND is_debug_statement_on
150: END IF; -- end of lv_six_tbl(idx).trx_type_code = 'ADDITION' AND x_return_status = OKL_API.G_RET_STS_SUCCESS
151: lv_six_tbl(idx).source_type_code := G_TRX_SOURCE_TYPE_CODE;
152: lv_six_tbl(idx).trx_reason_code := G_CONTRACT_REBOOK_CODE;
153: END LOOP;
154: -- now call the create pool transacation api

Line 155: IF(x_return_status = OKL_API.G_RET_STS_SUCCESS)THEN

151: lv_six_tbl(idx).source_type_code := G_TRX_SOURCE_TYPE_CODE;
152: lv_six_tbl(idx).trx_reason_code := G_CONTRACT_REBOOK_CODE;
153: END LOOP;
154: -- now call the create pool transacation api
155: IF(x_return_status = OKL_API.G_RET_STS_SUCCESS)THEN
156: okl_subsidy_pool_trx_pvt.create_pool_transaction(p_api_version => l_api_version
157: ,p_init_msg_list => OKL_API.G_TRUE
158: ,x_return_status => x_return_status
159: ,x_msg_count => x_msg_count

Line 157: ,p_init_msg_list => OKL_API.G_TRUE

153: END LOOP;
154: -- now call the create pool transacation api
155: IF(x_return_status = OKL_API.G_RET_STS_SUCCESS)THEN
156: okl_subsidy_pool_trx_pvt.create_pool_transaction(p_api_version => l_api_version
157: ,p_init_msg_list => OKL_API.G_TRUE
158: ,x_return_status => x_return_status
159: ,x_msg_count => x_msg_count
160: ,x_msg_data => x_msg_data
161: ,p_sixv_tbl => lv_six_tbl

Line 164: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

160: ,x_msg_data => x_msg_data
161: ,p_sixv_tbl => lv_six_tbl
162: ,x_sixv_tbl => lx_six_tbl
163: );
164: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
165: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
166: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
167: RAISE OKL_API.G_EXCEPTION_ERROR;
168: END IF;

Line 165: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

161: ,p_sixv_tbl => lv_six_tbl
162: ,x_sixv_tbl => lx_six_tbl
163: );
164: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
165: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
166: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
167: RAISE OKL_API.G_EXCEPTION_ERROR;
168: END IF;
169: END IF;

Line 166: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

162: ,x_sixv_tbl => lx_six_tbl
163: );
164: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
165: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
166: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
167: RAISE OKL_API.G_EXCEPTION_ERROR;
168: END IF;
169: END IF;
170: EXCEPTION WHEN OTHERS THEN

Line 167: RAISE OKL_API.G_EXCEPTION_ERROR;

163: );
164: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
165: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
166: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
167: RAISE OKL_API.G_EXCEPTION_ERROR;
168: END IF;
169: END IF;
170: EXCEPTION WHEN OTHERS THEN
171: x_return_status := OKL_API.G_RET_STS_ERROR;

Line 171: x_return_status := OKL_API.G_RET_STS_ERROR;

167: RAISE OKL_API.G_EXCEPTION_ERROR;
168: END IF;
169: END IF;
170: EXCEPTION WHEN OTHERS THEN
171: x_return_status := OKL_API.G_RET_STS_ERROR;
172: END pool_trx_khr_rbk;
173: -- local procedure 1. END
174:
175: -- local procedure 2. START

Line 244: x_return_status := OKL_API.G_RET_STS_SUCCESS;

240: );
241: END IF; -- end of NVL(l_debug_enabled,'N')='Y' AND is_debug_statement_on
242:
243:
244: x_return_status := OKL_API.G_RET_STS_SUCCESS;
245:
246: -- initialize tbl type parameters and idx
247: lv_six_tbl.DELETE; lx_six_tbl.DELETE;
248: idx := 0;

Line 294: ,p_init_msg_list => OKL_API.G_FALSE

290: );
291: END IF; -- end of NVL(l_debug_enabled,'N')='Y' AND is_debug_statement_on
292:
293: okl_subsidy_pool_trx_pvt.create_pool_transaction(p_api_version => l_api_version
294: ,p_init_msg_list => OKL_API.G_FALSE
295: ,x_return_status => x_return_status
296: ,x_msg_count => x_msg_count
297: ,x_msg_data => x_msg_data
298: ,p_sixv_tbl => lv_six_tbl

Line 309: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

305: ||' x_msg_data '||x_msg_data
306: );
307: END IF; -- end of NVL(l_debug_enabled,'N')='Y' AND is_debug_statement_on
308:
309: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
310: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
311: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
312: RAISE OKL_API.G_EXCEPTION_ERROR;
313: END IF;

Line 310: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

306: );
307: END IF; -- end of NVL(l_debug_enabled,'N')='Y' AND is_debug_statement_on
308:
309: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
310: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
311: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
312: RAISE OKL_API.G_EXCEPTION_ERROR;
313: END IF;
314: END IF;

Line 311: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

307: END IF; -- end of NVL(l_debug_enabled,'N')='Y' AND is_debug_statement_on
308:
309: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
310: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
311: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
312: RAISE OKL_API.G_EXCEPTION_ERROR;
313: END IF;
314: END IF;
315:

Line 312: RAISE OKL_API.G_EXCEPTION_ERROR;

308:
309: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
310: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
311: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
312: RAISE OKL_API.G_EXCEPTION_ERROR;
313: END IF;
314: END IF;
315:
316: EXCEPTION WHEN OTHERS THEN

Line 317: x_return_status := OKL_API.G_RET_STS_ERROR;

313: END IF;
314: END IF;
315:
316: EXCEPTION WHEN OTHERS THEN
317: x_return_status := OKL_API.G_RET_STS_ERROR;
318: END reduce_pool_balance;
319: -- local procedure 2. END
320:
321: PROCEDURE create_pool_trx_khr_book(p_api_version IN NUMBER

Line 369: x_return_status := OKL_API.G_RET_STS_SUCCESS;

365: is_debug_statement_on BOOLEAN;
366:
367: BEGIN
368:
369: x_return_status := OKL_API.G_RET_STS_SUCCESS;
370:
371: l_debug_enabled := okl_debug_pub.check_log_enabled;
372: is_debug_procedure_on := okl_debug_pub.check_log_on(l_module,FND_LOG.LEVEL_PROCEDURE);
373: IF(l_debug_enabled='Y' AND is_debug_procedure_on) THEN

Line 378: x_return_status := OKL_API.START_ACTIVITY (

374: okl_debug_pub.log_debug(FND_LOG.LEVEL_PROCEDURE,l_module,'begin debug OKLRSIUB.pls call create_pool_trx_khr_book');
375: END IF;
376:
377: -- Call start_activity to create savepoint, check compatibility and initialize message list
378: x_return_status := OKL_API.START_ACTIVITY (
379: l_api_name
380: ,p_init_msg_list
381: ,'_PVT'
382: ,x_return_status);

Line 384: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

380: ,p_init_msg_list
381: ,'_PVT'
382: ,x_return_status);
383: -- Check if activity started successfully
384: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
385: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
386: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
387: RAISE OKL_API.G_EXCEPTION_ERROR;
388: END IF;

Line 385: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

381: ,'_PVT'
382: ,x_return_status);
383: -- Check if activity started successfully
384: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
385: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
386: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
387: RAISE OKL_API.G_EXCEPTION_ERROR;
388: END IF;
389:

Line 386: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

382: ,x_return_status);
383: -- Check if activity started successfully
384: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
385: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
386: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
387: RAISE OKL_API.G_EXCEPTION_ERROR;
388: END IF;
389:
390: -- check for logging on STATEMENT level

Line 387: RAISE OKL_API.G_EXCEPTION_ERROR;

383: -- Check if activity started successfully
384: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
385: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
386: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
387: RAISE OKL_API.G_EXCEPTION_ERROR;
388: END IF;
389:
390: -- check for logging on STATEMENT level
391: is_debug_statement_on := okl_debug_pub.check_log_on(l_module,FND_LOG.LEVEL_STATEMENT);

Line 456: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

452: 'OKL_LEASE_QUOTE_SUBPOOL_PVT.process_active_contract with status '||x_return_status||' x_msg_data '||x_msg_data
453: );
454: END IF; -- end of NVL(l_debug_enabled,'N')='Y' AND is_debug_statement_on
455:
456: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
457: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
458: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
459: RAISE OKL_API.G_EXCEPTION_ERROR;
460: END IF;

Line 457: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

453: );
454: END IF; -- end of NVL(l_debug_enabled,'N')='Y' AND is_debug_statement_on
455:
456: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
457: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
458: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
459: RAISE OKL_API.G_EXCEPTION_ERROR;
460: END IF;
461:

Line 458: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

454: END IF; -- end of NVL(l_debug_enabled,'N')='Y' AND is_debug_statement_on
455:
456: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
457: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
458: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
459: RAISE OKL_API.G_EXCEPTION_ERROR;
460: END IF;
461:
462: END IF;

Line 459: RAISE OKL_API.G_EXCEPTION_ERROR;

455:
456: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
457: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
458: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
459: RAISE OKL_API.G_EXCEPTION_ERROR;
460: END IF;
461:
462: END IF;
463: -- END 09/09/2005 cklee

Line 495: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

491: 'OKL_SUBSIDY_POOL_TRX_PVT.create_pool_transaction with status '||x_return_status||' x_msg_data '||x_msg_data
492: );
493: END IF; -- end of NVL(l_debug_enabled,'N')='Y' AND is_debug_statement_on
494:
495: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
496: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
497: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
498: RAISE OKL_API.G_EXCEPTION_ERROR;
499: END IF;

Line 496: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

492: );
493: END IF; -- end of NVL(l_debug_enabled,'N')='Y' AND is_debug_statement_on
494:
495: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
496: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
497: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
498: RAISE OKL_API.G_EXCEPTION_ERROR;
499: END IF;
500: -- start: cklee 07/12/2005

Line 497: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

493: END IF; -- end of NVL(l_debug_enabled,'N')='Y' AND is_debug_statement_on
494:
495: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
496: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
497: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
498: RAISE OKL_API.G_EXCEPTION_ERROR;
499: END IF;
500: -- start: cklee 07/12/2005
501: /* ELSIF(cv_chk_orig_source.orig_system_source_code = 'LEASE_APPLICATION')THEN

Line 498: RAISE OKL_API.G_EXCEPTION_ERROR;

494:
495: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
496: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
497: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
498: RAISE OKL_API.G_EXCEPTION_ERROR;
499: END IF;
500: -- start: cklee 07/12/2005
501: /* ELSIF(cv_chk_orig_source.orig_system_source_code = 'LEASE_APPLICATION')THEN
502: -- contract has been originated from Lease Application. here we need to add back the subsidy amount on

Line 510: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);

506: */
507: -- 09/09/2005 cklee:comment out END IF;
508: -- end: cklee 07/12/2005
509:
510: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
511:
512: IF(l_debug_enabled='Y' AND is_debug_procedure_on) THEN
513: okl_debug_pub.log_debug(FND_LOG.LEVEL_PROCEDURE,l_module,'end debug OKLRSIUB.pls call create_pool_trx_khr_book');
514: END IF;

Line 517: WHEN OKL_API.G_EXCEPTION_ERROR THEN

513: okl_debug_pub.log_debug(FND_LOG.LEVEL_PROCEDURE,l_module,'end debug OKLRSIUB.pls call create_pool_trx_khr_book');
514: END IF;
515:
516: EXCEPTION
517: WHEN OKL_API.G_EXCEPTION_ERROR THEN
518: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
519: p_api_name => l_api_name,
520: p_pkg_name => G_PKG_NAME,
521: p_exc_name => 'OKL_API.G_RET_STS_ERROR',

Line 518: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

514: END IF;
515:
516: EXCEPTION
517: WHEN OKL_API.G_EXCEPTION_ERROR THEN
518: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
519: p_api_name => l_api_name,
520: p_pkg_name => G_PKG_NAME,
521: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
522: x_msg_count => x_msg_count,

Line 521: p_exc_name => 'OKL_API.G_RET_STS_ERROR',

517: WHEN OKL_API.G_EXCEPTION_ERROR THEN
518: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
519: p_api_name => l_api_name,
520: p_pkg_name => G_PKG_NAME,
521: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
522: x_msg_count => x_msg_count,
523: x_msg_data => x_msg_data,
524: p_api_type => g_api_type);
525:

Line 526: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

522: x_msg_count => x_msg_count,
523: x_msg_data => x_msg_data,
524: p_api_type => g_api_type);
525:
526: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
527: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
528: p_api_name => l_api_name,
529: p_pkg_name => G_PKG_NAME,
530: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 527: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

523: x_msg_data => x_msg_data,
524: p_api_type => g_api_type);
525:
526: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
527: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
528: p_api_name => l_api_name,
529: p_pkg_name => G_PKG_NAME,
530: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
531: x_msg_count => x_msg_count,

Line 530: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',

526: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
527: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
528: p_api_name => l_api_name,
529: p_pkg_name => G_PKG_NAME,
530: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
531: x_msg_count => x_msg_count,
532: x_msg_data => x_msg_data,
533: p_api_type => g_api_type);
534:

Line 536: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

532: x_msg_data => x_msg_data,
533: p_api_type => g_api_type);
534:
535: WHEN OTHERS THEN
536: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
537: p_api_name => l_api_name,
538: p_pkg_name => G_PKG_NAME,
539: p_exc_name => 'OTHERS',
540: x_msg_count => x_msg_count,

Line 628: x_return_status := OKL_API.G_RET_STS_SUCCESS;

624: is_debug_procedure_on BOOLEAN;
625: is_debug_statement_on BOOLEAN;
626:
627: BEGIN
628: x_return_status := OKL_API.G_RET_STS_SUCCESS;
629:
630: l_debug_enabled := okl_debug_pub.check_log_enabled;
631: is_debug_procedure_on := okl_debug_pub.check_log_on(l_module,FND_LOG.LEVEL_PROCEDURE);
632: IF(l_debug_enabled='Y' AND is_debug_procedure_on) THEN

Line 637: x_return_status := OKL_API.START_ACTIVITY (

633: okl_debug_pub.log_debug(FND_LOG.LEVEL_PROCEDURE,l_module,'begin debug OKLRSIUB.pls call create_pool_trx_khr_reverse');
634: END IF;
635:
636: -- Call start_activity to create savepoint, check compatibility and initialize message list
637: x_return_status := OKL_API.START_ACTIVITY (
638: l_api_name
639: ,p_init_msg_list
640: ,'_PVT'
641: ,x_return_status);

Line 643: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

639: ,p_init_msg_list
640: ,'_PVT'
641: ,x_return_status);
642: -- Check if activity started successfully
643: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
644: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
645: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
646: RAISE OKL_API.G_EXCEPTION_ERROR;
647: END IF;

Line 644: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

640: ,'_PVT'
641: ,x_return_status);
642: -- Check if activity started successfully
643: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
644: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
645: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
646: RAISE OKL_API.G_EXCEPTION_ERROR;
647: END IF;
648:

Line 645: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

641: ,x_return_status);
642: -- Check if activity started successfully
643: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
644: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
645: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
646: RAISE OKL_API.G_EXCEPTION_ERROR;
647: END IF;
648:
649: -- check for logging on STATEMENT level

Line 646: RAISE OKL_API.G_EXCEPTION_ERROR;

642: -- Check if activity started successfully
643: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
644: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
645: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
646: RAISE OKL_API.G_EXCEPTION_ERROR;
647: END IF;
648:
649: -- check for logging on STATEMENT level
650: is_debug_statement_on := okl_debug_pub.check_log_on(l_module,FND_LOG.LEVEL_STATEMENT);

Line 678: x_return_status := OKL_API.G_RET_STS_ERROR;

674: );
675: FETCH c_sub_pool_trx_csr INTO cv_sub_pool_trx_rec;
676: IF(c_sub_pool_trx_csr%NOTFOUND)THEN
677: CLOSE c_sub_pool_trx_csr;
678: x_return_status := OKL_API.G_RET_STS_ERROR;
679: OKL_API.Set_Message(p_app_name => G_APP_NAME,
680: p_msg_name => G_NO_SUB_POOL_TRX_FOUND,
681: p_token1 => 'SUBSIDY',
682: p_token1_value => c_subsidy_csr_rec.subsidy_name,

Line 679: OKL_API.Set_Message(p_app_name => G_APP_NAME,

675: FETCH c_sub_pool_trx_csr INTO cv_sub_pool_trx_rec;
676: IF(c_sub_pool_trx_csr%NOTFOUND)THEN
677: CLOSE c_sub_pool_trx_csr;
678: x_return_status := OKL_API.G_RET_STS_ERROR;
679: OKL_API.Set_Message(p_app_name => G_APP_NAME,
680: p_msg_name => G_NO_SUB_POOL_TRX_FOUND,
681: p_token1 => 'SUBSIDY',
682: p_token1_value => c_subsidy_csr_rec.subsidy_name,
683: p_token2 => 'ASSET_NUMBER',

Line 734: ,p_init_msg_list => OKL_API.G_TRUE

730:
731: -- now check the length of the table lv_sixv_tbl and then call the okl_subsidy_pool_trx_pvt api to create ADDITION transactions
732: IF(lv_sixv_tbl.COUNT > 0)THEN
733: okl_subsidy_pool_trx_pvt.create_pool_transaction(p_api_version => p_api_version
734: ,p_init_msg_list => OKL_API.G_TRUE
735: ,x_return_status => x_return_status
736: ,x_msg_count => x_msg_count
737: ,x_msg_data => x_msg_data
738: ,p_sixv_tbl => lv_sixv_tbl

Line 747: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

743: l_module,
744: 'okl_subsidy_pool_trx_pvt.create_pool_transaction with status '||x_return_status || ' x_msg_data '||x_msg_data
745: );
746: END IF; -- end of NVL(l_debug_enabled,'N')='Y' AND is_debug_statement_on
747: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
748: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
749: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
750: RAISE OKL_API.G_EXCEPTION_ERROR;
751: END IF;

Line 748: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

744: 'okl_subsidy_pool_trx_pvt.create_pool_transaction with status '||x_return_status || ' x_msg_data '||x_msg_data
745: );
746: END IF; -- end of NVL(l_debug_enabled,'N')='Y' AND is_debug_statement_on
747: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
748: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
749: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
750: RAISE OKL_API.G_EXCEPTION_ERROR;
751: END IF;
752: END IF;

Line 749: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

745: );
746: END IF; -- end of NVL(l_debug_enabled,'N')='Y' AND is_debug_statement_on
747: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
748: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
749: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
750: RAISE OKL_API.G_EXCEPTION_ERROR;
751: END IF;
752: END IF;
753:

Line 750: RAISE OKL_API.G_EXCEPTION_ERROR;

746: END IF; -- end of NVL(l_debug_enabled,'N')='Y' AND is_debug_statement_on
747: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
748: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
749: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
750: RAISE OKL_API.G_EXCEPTION_ERROR;
751: END IF;
752: END IF;
753:
754: IF(l_debug_enabled='Y' AND is_debug_procedure_on) THEN

Line 758: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);

754: IF(l_debug_enabled='Y' AND is_debug_procedure_on) THEN
755: okl_debug_pub.log_debug(FND_LOG.LEVEL_PROCEDURE,l_module,'end debug OKLRSIUB.pls call create_pool_trx_khr_reverse');
756: END IF;
757:
758: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
759:
760: EXCEPTION
761: WHEN OKL_API.G_EXCEPTION_ERROR THEN
762: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

Line 761: WHEN OKL_API.G_EXCEPTION_ERROR THEN

757:
758: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
759:
760: EXCEPTION
761: WHEN OKL_API.G_EXCEPTION_ERROR THEN
762: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
763: p_api_name => l_api_name,
764: p_pkg_name => G_PKG_NAME,
765: p_exc_name => 'OKL_API.G_RET_STS_ERROR',

Line 762: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

758: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
759:
760: EXCEPTION
761: WHEN OKL_API.G_EXCEPTION_ERROR THEN
762: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
763: p_api_name => l_api_name,
764: p_pkg_name => G_PKG_NAME,
765: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
766: x_msg_count => x_msg_count,

Line 765: p_exc_name => 'OKL_API.G_RET_STS_ERROR',

761: WHEN OKL_API.G_EXCEPTION_ERROR THEN
762: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
763: p_api_name => l_api_name,
764: p_pkg_name => G_PKG_NAME,
765: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
766: x_msg_count => x_msg_count,
767: x_msg_data => x_msg_data,
768: p_api_type => g_api_type);
769:

Line 770: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

766: x_msg_count => x_msg_count,
767: x_msg_data => x_msg_data,
768: p_api_type => g_api_type);
769:
770: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
771: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
772: p_api_name => l_api_name,
773: p_pkg_name => G_PKG_NAME,
774: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 771: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

767: x_msg_data => x_msg_data,
768: p_api_type => g_api_type);
769:
770: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
771: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
772: p_api_name => l_api_name,
773: p_pkg_name => G_PKG_NAME,
774: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
775: x_msg_count => x_msg_count,

Line 774: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',

770: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
771: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
772: p_api_name => l_api_name,
773: p_pkg_name => G_PKG_NAME,
774: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
775: x_msg_count => x_msg_count,
776: x_msg_data => x_msg_data,
777: p_api_type => g_api_type);
778:

Line 780: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

776: x_msg_data => x_msg_data,
777: p_api_type => g_api_type);
778:
779: WHEN OTHERS THEN
780: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
781: p_api_name => l_api_name,
782: p_pkg_name => G_PKG_NAME,
783: p_exc_name => 'OTHERS',
784: x_msg_count => x_msg_count,

Line 999: x_return_status := OKL_API.G_RET_STS_SUCCESS;

995: is_debug_procedure_on BOOLEAN;
996: is_debug_statement_on BOOLEAN;
997:
998: BEGIN
999: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1000:
1001: l_debug_enabled := okl_debug_pub.check_log_enabled;
1002: is_debug_procedure_on := okl_debug_pub.check_log_on(l_module,FND_LOG.LEVEL_PROCEDURE);
1003: IF(l_debug_enabled='Y' AND is_debug_procedure_on) THEN

Line 1008: x_return_status := OKL_API.START_ACTIVITY(l_api_name,p_init_msg_list,'_PVT',x_return_status);

1004: okl_debug_pub.log_debug(FND_LOG.LEVEL_PROCEDURE,l_module,'begin debug OKLRSIUB.pls call create_pool_trx_khr_rbk');
1005: END IF;
1006:
1007: -- Call start_activity to create savepoint, check compatibility and initialize message list
1008: x_return_status := OKL_API.START_ACTIVITY(l_api_name,p_init_msg_list,'_PVT',x_return_status);
1009: -- Check if activity started successfully
1010: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1011: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1012: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN

Line 1010: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1006:
1007: -- Call start_activity to create savepoint, check compatibility and initialize message list
1008: x_return_status := OKL_API.START_ACTIVITY(l_api_name,p_init_msg_list,'_PVT',x_return_status);
1009: -- Check if activity started successfully
1010: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1011: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1012: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1013: RAISE OKL_API.G_EXCEPTION_ERROR;
1014: END IF;

Line 1011: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1007: -- Call start_activity to create savepoint, check compatibility and initialize message list
1008: x_return_status := OKL_API.START_ACTIVITY(l_api_name,p_init_msg_list,'_PVT',x_return_status);
1009: -- Check if activity started successfully
1010: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1011: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1012: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1013: RAISE OKL_API.G_EXCEPTION_ERROR;
1014: END IF;
1015:

Line 1012: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN

1008: x_return_status := OKL_API.START_ACTIVITY(l_api_name,p_init_msg_list,'_PVT',x_return_status);
1009: -- Check if activity started successfully
1010: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1011: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1012: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1013: RAISE OKL_API.G_EXCEPTION_ERROR;
1014: END IF;
1015:
1016: -- check for logging on STATEMENT level

Line 1013: RAISE OKL_API.G_EXCEPTION_ERROR;

1009: -- Check if activity started successfully
1010: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1011: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1012: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1013: RAISE OKL_API.G_EXCEPTION_ERROR;
1014: END IF;
1015:
1016: -- check for logging on STATEMENT level
1017: is_debug_statement_on := okl_debug_pub.check_log_on(l_module,FND_LOG.LEVEL_STATEMENT);

Line 1203: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1199: 'pool_trx_khr_rbk returned with status '||x_return_status || ' x_msg_data '||x_msg_data
1200: );
1201: END IF; -- end of NVL(l_debug_enabled,'N')='Y' AND is_debug_statement_on
1202:
1203: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1204: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1205: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1206: RAISE OKL_API.G_EXCEPTION_ERROR;
1207: END IF;

Line 1204: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1200: );
1201: END IF; -- end of NVL(l_debug_enabled,'N')='Y' AND is_debug_statement_on
1202:
1203: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1204: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1205: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1206: RAISE OKL_API.G_EXCEPTION_ERROR;
1207: END IF;
1208: END IF;

Line 1205: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN

1201: END IF; -- end of NVL(l_debug_enabled,'N')='Y' AND is_debug_statement_on
1202:
1203: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1204: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1205: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1206: RAISE OKL_API.G_EXCEPTION_ERROR;
1207: END IF;
1208: END IF;
1209:

Line 1206: RAISE OKL_API.G_EXCEPTION_ERROR;

1202:
1203: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1204: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1205: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1206: RAISE OKL_API.G_EXCEPTION_ERROR;
1207: END IF;
1208: END IF;
1209:
1210: IF(l_debug_enabled='Y' AND is_debug_procedure_on) THEN

Line 1214: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);

1210: IF(l_debug_enabled='Y' AND is_debug_procedure_on) THEN
1211: okl_debug_pub.log_debug(FND_LOG.LEVEL_PROCEDURE,l_module,'end debug OKLRSIUB.pls call create_pool_trx_khr_rbk');
1212: END IF;
1213:
1214: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
1215: EXCEPTION
1216: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1217: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
1218: p_api_name => l_api_name,

Line 1216: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1212: END IF;
1213:
1214: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
1215: EXCEPTION
1216: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1217: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
1218: p_api_name => l_api_name,
1219: p_pkg_name => G_PKG_NAME,
1220: p_exc_name => 'OKL_API.G_RET_STS_ERROR',

Line 1217: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

1213:
1214: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
1215: EXCEPTION
1216: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1217: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
1218: p_api_name => l_api_name,
1219: p_pkg_name => G_PKG_NAME,
1220: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
1221: x_msg_count => x_msg_count,

Line 1220: p_exc_name => 'OKL_API.G_RET_STS_ERROR',

1216: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1217: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
1218: p_api_name => l_api_name,
1219: p_pkg_name => G_PKG_NAME,
1220: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
1221: x_msg_count => x_msg_count,
1222: x_msg_data => x_msg_data,
1223: p_api_type => g_api_type);
1224:

Line 1225: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1221: x_msg_count => x_msg_count,
1222: x_msg_data => x_msg_data,
1223: p_api_type => g_api_type);
1224:
1225: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1226: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
1227: p_api_name => l_api_name,
1228: p_pkg_name => G_PKG_NAME,
1229: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 1226: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

1222: x_msg_data => x_msg_data,
1223: p_api_type => g_api_type);
1224:
1225: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1226: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
1227: p_api_name => l_api_name,
1228: p_pkg_name => G_PKG_NAME,
1229: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
1230: x_msg_count => x_msg_count,

Line 1229: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',

1225: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1226: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
1227: p_api_name => l_api_name,
1228: p_pkg_name => G_PKG_NAME,
1229: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
1230: x_msg_count => x_msg_count,
1231: x_msg_data => x_msg_data,
1232: p_api_type => g_api_type);
1233:

Line 1235: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

1231: x_msg_data => x_msg_data,
1232: p_api_type => g_api_type);
1233:
1234: WHEN OTHERS THEN
1235: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
1236: p_api_name => l_api_name,
1237: p_pkg_name => G_PKG_NAME,
1238: p_exc_name => 'OTHERS',
1239: x_msg_count => x_msg_count,

Line 1282: x_return_status := OKL_API.G_RET_STS_SUCCESS;

1278: is_debug_procedure_on BOOLEAN;
1279: is_debug_statement_on BOOLEAN;
1280:
1281: BEGIN
1282: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1283:
1284: l_debug_enabled := okl_debug_pub.check_log_enabled;
1285: is_debug_procedure_on := okl_debug_pub.check_log_on(l_module,FND_LOG.LEVEL_PROCEDURE);
1286: IF(l_debug_enabled='Y' AND is_debug_procedure_on) THEN

Line 1291: x_return_status := OKL_API.START_ACTIVITY(l_api_name,p_init_msg_list,'_PVT',x_return_status);

1287: okl_debug_pub.log_debug(FND_LOG.LEVEL_PROCEDURE,l_module,'begin debug OKLRSIUB.pls call create_pool_trx_khr_split');
1288: END IF;
1289:
1290: -- Call start_activity to create savepoint, check compatibility and initialize message list
1291: x_return_status := OKL_API.START_ACTIVITY(l_api_name,p_init_msg_list,'_PVT',x_return_status);
1292: -- Check if activity started successfully
1293: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1294: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1295: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN

Line 1293: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1289:
1290: -- Call start_activity to create savepoint, check compatibility and initialize message list
1291: x_return_status := OKL_API.START_ACTIVITY(l_api_name,p_init_msg_list,'_PVT',x_return_status);
1292: -- Check if activity started successfully
1293: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1294: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1295: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1296: RAISE OKL_API.G_EXCEPTION_ERROR;
1297: END IF;

Line 1294: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1290: -- Call start_activity to create savepoint, check compatibility and initialize message list
1291: x_return_status := OKL_API.START_ACTIVITY(l_api_name,p_init_msg_list,'_PVT',x_return_status);
1292: -- Check if activity started successfully
1293: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1294: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1295: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1296: RAISE OKL_API.G_EXCEPTION_ERROR;
1297: END IF;
1298:

Line 1295: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN

1291: x_return_status := OKL_API.START_ACTIVITY(l_api_name,p_init_msg_list,'_PVT',x_return_status);
1292: -- Check if activity started successfully
1293: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1294: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1295: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1296: RAISE OKL_API.G_EXCEPTION_ERROR;
1297: END IF;
1298:
1299: -- check for logging on STATEMENT level

Line 1296: RAISE OKL_API.G_EXCEPTION_ERROR;

1292: -- Check if activity started successfully
1293: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1294: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1295: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1296: RAISE OKL_API.G_EXCEPTION_ERROR;
1297: END IF;
1298:
1299: -- check for logging on STATEMENT level
1300: is_debug_statement_on := okl_debug_pub.check_log_on(l_module,FND_LOG.LEVEL_STATEMENT);

Line 1343: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1339: 'create_pool_trx_khr_reverse called from create_pool_trx_khr_split return status '||x_return_status || ' x_msg_data '||x_msg_data
1340: );
1341: END IF; -- end of NVL(l_debug_enabled,'N')='Y' AND is_debug_statement_on
1342:
1343: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1344: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1345: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1346: RAISE OKL_API.G_EXCEPTION_ERROR;
1347: END IF;

Line 1344: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1340: );
1341: END IF; -- end of NVL(l_debug_enabled,'N')='Y' AND is_debug_statement_on
1342:
1343: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1344: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1345: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1346: RAISE OKL_API.G_EXCEPTION_ERROR;
1347: END IF;
1348:

Line 1345: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN

1341: END IF; -- end of NVL(l_debug_enabled,'N')='Y' AND is_debug_statement_on
1342:
1343: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1344: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1345: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1346: RAISE OKL_API.G_EXCEPTION_ERROR;
1347: END IF;
1348:
1349: -- write to log

Line 1346: RAISE OKL_API.G_EXCEPTION_ERROR;

1342:
1343: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1344: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1345: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1346: RAISE OKL_API.G_EXCEPTION_ERROR;
1347: END IF;
1348:
1349: -- write to log
1350: IF(NVL(l_debug_enabled,'N')='Y' AND is_debug_statement_on) THEN

Line 1370: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1366: 'reduce pool balance from first contract api return status '||x_return_status||' x_msg_data '||x_msg_data
1367: );
1368: END IF; -- end of NVL(l_debug_enabled,'N')='Y' AND is_debug_statement_on
1369:
1370: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1371: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1372: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1373: RAISE OKL_API.G_EXCEPTION_ERROR;
1374: END IF;

Line 1371: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1367: );
1368: END IF; -- end of NVL(l_debug_enabled,'N')='Y' AND is_debug_statement_on
1369:
1370: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1371: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1372: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1373: RAISE OKL_API.G_EXCEPTION_ERROR;
1374: END IF;
1375:

Line 1372: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN

1368: END IF; -- end of NVL(l_debug_enabled,'N')='Y' AND is_debug_statement_on
1369:
1370: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1371: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1372: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1373: RAISE OKL_API.G_EXCEPTION_ERROR;
1374: END IF;
1375:
1376: -- no errors from the first contract, process the second split contract for pool balance reduction.

Line 1373: RAISE OKL_API.G_EXCEPTION_ERROR;

1369:
1370: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1371: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1372: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1373: RAISE OKL_API.G_EXCEPTION_ERROR;
1374: END IF;
1375:
1376: -- no errors from the first contract, process the second split contract for pool balance reduction.
1377: -- call local api for this reduction operation

Line 1389: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1385: 'reduce pool balance from second contract api return status '||x_return_status|| ' x_msg_data '||x_msg_data
1386: );
1387: END IF; -- end of NVL(l_debug_enabled,'N')='Y' AND is_debug_statement_on
1388:
1389: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1390: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1391: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1392: RAISE OKL_API.G_EXCEPTION_ERROR;
1393: END IF;

Line 1390: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1386: );
1387: END IF; -- end of NVL(l_debug_enabled,'N')='Y' AND is_debug_statement_on
1388:
1389: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1390: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1391: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1392: RAISE OKL_API.G_EXCEPTION_ERROR;
1393: END IF;
1394:

Line 1391: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN

1387: END IF; -- end of NVL(l_debug_enabled,'N')='Y' AND is_debug_statement_on
1388:
1389: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1390: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1391: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1392: RAISE OKL_API.G_EXCEPTION_ERROR;
1393: END IF;
1394:
1395: IF(l_debug_enabled='Y' AND is_debug_procedure_on) THEN

Line 1392: RAISE OKL_API.G_EXCEPTION_ERROR;

1388:
1389: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1390: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1391: ELSIF(x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1392: RAISE OKL_API.G_EXCEPTION_ERROR;
1393: END IF;
1394:
1395: IF(l_debug_enabled='Y' AND is_debug_procedure_on) THEN
1396: okl_debug_pub.log_debug(FND_LOG.LEVEL_PROCEDURE,l_module,'end debug OKLRSIUB.pls call create_pool_trx_khr_split');

Line 1399: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);

1395: IF(l_debug_enabled='Y' AND is_debug_procedure_on) THEN
1396: okl_debug_pub.log_debug(FND_LOG.LEVEL_PROCEDURE,l_module,'end debug OKLRSIUB.pls call create_pool_trx_khr_split');
1397: END IF;
1398:
1399: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
1400: EXCEPTION
1401: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1402: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
1403: p_api_name => l_api_name,

Line 1401: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1397: END IF;
1398:
1399: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
1400: EXCEPTION
1401: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1402: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
1403: p_api_name => l_api_name,
1404: p_pkg_name => G_PKG_NAME,
1405: p_exc_name => 'OKL_API.G_RET_STS_ERROR',

Line 1402: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

1398:
1399: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
1400: EXCEPTION
1401: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1402: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
1403: p_api_name => l_api_name,
1404: p_pkg_name => G_PKG_NAME,
1405: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
1406: x_msg_count => x_msg_count,

Line 1405: p_exc_name => 'OKL_API.G_RET_STS_ERROR',

1401: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1402: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
1403: p_api_name => l_api_name,
1404: p_pkg_name => G_PKG_NAME,
1405: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
1406: x_msg_count => x_msg_count,
1407: x_msg_data => x_msg_data,
1408: p_api_type => g_api_type);
1409:

Line 1410: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1406: x_msg_count => x_msg_count,
1407: x_msg_data => x_msg_data,
1408: p_api_type => g_api_type);
1409:
1410: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1411: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
1412: p_api_name => l_api_name,
1413: p_pkg_name => G_PKG_NAME,
1414: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 1411: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

1407: x_msg_data => x_msg_data,
1408: p_api_type => g_api_type);
1409:
1410: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1411: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
1412: p_api_name => l_api_name,
1413: p_pkg_name => G_PKG_NAME,
1414: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
1415: x_msg_count => x_msg_count,

Line 1414: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',

1410: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1411: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
1412: p_api_name => l_api_name,
1413: p_pkg_name => G_PKG_NAME,
1414: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
1415: x_msg_count => x_msg_count,
1416: x_msg_data => x_msg_data,
1417: p_api_type => g_api_type);
1418:

Line 1420: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

1416: x_msg_data => x_msg_data,
1417: p_api_type => g_api_type);
1418:
1419: WHEN OTHERS THEN
1420: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
1421: p_api_name => l_api_name,
1422: p_pkg_name => G_PKG_NAME,
1423: p_exc_name => 'OTHERS',
1424: x_msg_count => x_msg_count,