DBA Data[Home] [Help]

APPS.OKL_INVESTOR_BILLING_PVT dependencies on OKL_API

Line 36: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;

32: -- Declare variables required by APIs
33: ------------------------------------------------------------
34: l_api_version CONSTANT NUMBER := 1;
35: l_api_name CONSTANT VARCHAR2(30) := 'create_investor_bill';
36: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
37:
38: -- nikshah -- Bug # 5484903 Fixed,
39: -- Changed bill_invstr_csr ( p_inv_agr NUMBER ) SQL definition
40: ------------------------------------------------------------

Line 357: x_return_status := Okl_Api.G_RET_STS_SUCCESS;

353: BEGIN
354: ------------------------------------------------------------
355: -- Start processing
356: ------------------------------------------------------------
357: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
358:
359: l_return_status := Okl_Api.START_ACTIVITY(
360: p_api_name => l_api_name,
361: p_pkg_name => G_PKG_NAME,

Line 359: l_return_status := Okl_Api.START_ACTIVITY(

355: -- Start processing
356: ------------------------------------------------------------
357: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
358:
359: l_return_status := Okl_Api.START_ACTIVITY(
360: p_api_name => l_api_name,
361: p_pkg_name => G_PKG_NAME,
362: p_init_msg_list => p_init_msg_list,
363: l_api_version => l_api_version,

Line 383: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

379: ,p_primary_sty_purpose => 'INVESTOR_RECEIVABLE'
380: ,x_return_status => l_return_status
381: ,x_primary_sty_id => l_sty_id);
382:
383: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
384: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Obtaining sty id for: INVESTOR_RECEIVABLE.');
385: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
386: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
387: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Obtaining sty id for: INVESTOR_RECEIVABLE.');

Line 385: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

381: ,x_primary_sty_id => l_sty_id);
382:
383: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
384: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Obtaining sty id for: INVESTOR_RECEIVABLE.');
385: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
386: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
387: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Obtaining sty id for: INVESTOR_RECEIVABLE.');
388: RAISE Okl_Api.G_EXCEPTION_ERROR;
389: END IF;

Line 386: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN

382:
383: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
384: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Obtaining sty id for: INVESTOR_RECEIVABLE.');
385: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
386: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
387: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Obtaining sty id for: INVESTOR_RECEIVABLE.');
388: RAISE Okl_Api.G_EXCEPTION_ERROR;
389: END IF;
390:

Line 388: RAISE Okl_Api.G_EXCEPTION_ERROR;

384: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Obtaining sty id for: INVESTOR_RECEIVABLE.');
385: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
386: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
387: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Obtaining sty id for: INVESTOR_RECEIVABLE.');
388: RAISE Okl_Api.G_EXCEPTION_ERROR;
389: END IF;
390:
391: OPEN c_sty_id(cp_sty_id=>l_sty_id);
392: --FETCH c_sty_id INTO l_sty_id;

Line 446: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,

442: CLOSE bill_site_rul_csr;
443:
444:
445: IF (l_cust_site_id IS NULL) THEN
446: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
447: p_msg_name => 'OKL_BPD_INVEST_BILL_BTOS_ERR');
448:
449: l_return_status := Okl_Api.G_RET_STS_ERROR;
450: raise G_EXCEPTION_HALT_VALIDATION;

Line 449: l_return_status := Okl_Api.G_RET_STS_ERROR;

445: IF (l_cust_site_id IS NULL) THEN
446: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
447: p_msg_name => 'OKL_BPD_INVEST_BILL_BTOS_ERR');
448:
449: l_return_status := Okl_Api.G_RET_STS_ERROR;
450: raise G_EXCEPTION_HALT_VALIDATION;
451: END IF;
452:
453: -- Payment Terms

Line 487: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,

483: FETCH c_trx_id INTO l_cust_trx_id;
484: CLOSE c_trx_id;
485:
486: IF (l_cust_trx_id IS NULL) THEN
487: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
488: p_msg_name => 'OKL_BPD_INVEST_BILL_TRANS_ERR');
489:
490: l_return_status := Okl_Api.G_RET_STS_ERROR;
491: raise G_EXCEPTION_HALT_VALIDATION;

Line 490: l_return_status := Okl_Api.G_RET_STS_ERROR;

486: IF (l_cust_trx_id IS NULL) THEN
487: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
488: p_msg_name => 'OKL_BPD_INVEST_BILL_TRANS_ERR');
489:
490: l_return_status := Okl_Api.G_RET_STS_ERROR;
491: raise G_EXCEPTION_HALT_VALIDATION;
492: END IF;
493:
494: -- Multi-Currency parameters

Line 532: Okl_Api.set_message(p_app_name => g_app_name,

528: -- Fetch a unique Id
529: l_unique_id := get_seq_id;
530: l_legal_entity_id := OKL_LEGAL_ENTITY_UTIL.get_khr_le_id(p_inv_agr); -- for LE Uptake project 08-11-2006
531: /*IF l_legal_entity_id IS NULL THEN
532: Okl_Api.set_message(p_app_name => g_app_name,
533: p_msg_name => 'OKL_LE_NOT_EXIST_CNTRCT',
534: p_token1 => 'CONTRACT_ID',
535: p_token1_value => p_inv_agr);
536: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 536: RAISE OKL_API.G_EXCEPTION_ERROR;

532: Okl_Api.set_message(p_app_name => g_app_name,
533: p_msg_name => 'OKL_LE_NOT_EXIST_CNTRCT',
534: p_token1 => 'CONTRACT_ID',
535: p_token1_value => p_inv_agr);
536: RAISE OKL_API.G_EXCEPTION_ERROR;
537: END IF;*/
538:
539: BEGIN
540: /* ankushar 05-Feb-2007 Billing R12 project

Line 936: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,

932:
933: EXCEPTION
934: WHEN OTHERS THEN
935: --modified by pgomes 01-Aug-2003 fix for bug 3078976
936: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
937: p_msg_name => 'OKL_BPD_INVEST_BILL_LINES_ERR');
938:
939: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
940: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

Line 939: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

935: --modified by pgomes 01-Aug-2003 fix for bug 3078976
936: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
937: p_msg_name => 'OKL_BPD_INVEST_BILL_LINES_ERR');
938:
939: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
940: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
941: END;
942:
943: -- Create accounting distributions

Line 940: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

936: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
937: p_msg_name => 'OKL_BPD_INVEST_BILL_LINES_ERR');
938:
939: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
940: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
941: END;
942:
943: -- Create accounting distributions
944: BEGIN

Line 1002: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,

998: ,l_currency_code);
999:
1000: --modified by pgomes 01-Aug-2003 fix for bug 3078976
1001: IF (l_distr_err) THEN
1002: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1003: p_msg_name => 'OKL_BPD_INVEST_BILL_DISTR_ERR');
1004:
1005: l_return_status := Okl_Api.G_RET_STS_ERROR;
1006: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 1005: l_return_status := Okl_Api.G_RET_STS_ERROR;

1001: IF (l_distr_err) THEN
1002: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1003: p_msg_name => 'OKL_BPD_INVEST_BILL_DISTR_ERR');
1004:
1005: l_return_status := Okl_Api.G_RET_STS_ERROR;
1006: RAISE G_EXCEPTION_HALT_VALIDATION;
1007: END IF;
1008:
1009: INSERT INTO RA_INTERFACE_DISTRIBUTIONS

Line 1058: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,

1054: ) ;
1055: END LOOP; -- Distribution Loop
1056:
1057: IF (nvl(l_distr_cnt, 0) = 0) THEN
1058: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1059: p_msg_name => 'OKL_BPD_INVEST_BILL_DISTR_ERR');
1060:
1061: l_return_status := Okl_Api.G_RET_STS_ERROR;
1062: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 1061: l_return_status := Okl_Api.G_RET_STS_ERROR;

1057: IF (nvl(l_distr_cnt, 0) = 0) THEN
1058: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1059: p_msg_name => 'OKL_BPD_INVEST_BILL_DISTR_ERR');
1060:
1061: l_return_status := Okl_Api.G_RET_STS_ERROR;
1062: RAISE G_EXCEPTION_HALT_VALIDATION;
1063: END IF;
1064:
1065: EXCEPTION

Line 1071: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,

1067: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1068: x_return_status := l_return_status;
1069: RAISE;
1070: WHEN OTHERS THEN
1071: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1072: p_msg_name => 'OKL_BPD_INVEST_BILL_DISTR_ERR');
1073:
1074: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
1075: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1074: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

1070: WHEN OTHERS THEN
1071: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1072: p_msg_name => 'OKL_BPD_INVEST_BILL_DISTR_ERR');
1073:
1074: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
1075: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1076: */
1077:
1078: END;

Line 1075: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

1071: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1072: p_msg_name => 'OKL_BPD_INVEST_BILL_DISTR_ERR');
1073:
1074: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
1075: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1076: */
1077:
1078: END;
1079:

Line 1088: Okl_Api.END_ACTIVITY (

1084: ----------------------------------------------------
1085: -- End activity
1086: ----------------------------------------------------
1087:
1088: Okl_Api.END_ACTIVITY (
1089: x_msg_count => x_msg_count,
1090: x_msg_data => x_msg_data);
1091: EXCEPTION
1092: ------------------------------------------------------------

Line 1098: OKL_API.SET_MESSAGE( p_app_name => G_APP_NAME

1094: ------------------------------------------------------------
1095: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1096: x_return_status := l_return_status;
1097: WHEN OTHERS THEN
1098: OKL_API.SET_MESSAGE( p_app_name => G_APP_NAME
1099: ,p_msg_name => G_UNEXPECTED_ERROR
1100: ,p_token1 => G_SQLCODE_TOKEN
1101: ,p_token1_value => SQLCODE
1102: ,p_token2 => G_SQLERRM_TOKEN

Line 1109: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

1105: ,p_token3_value => G_PKG_NAME
1106: ,p_token4 => 'Procedure'
1107: ,p_token4_value => l_api_name
1108: );
1109: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1110:
1111: END create_investor_bill;
1112:
1113:

Line 1186: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;

1182: ------------------------------------------------------------
1183:
1184: l_api_version CONSTANT NUMBER := 1;
1185: l_api_name CONSTANT VARCHAR2(30) := 'Create_Billing_Transaction';
1186: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
1187:
1188:
1189: CURSOR get_try_id_csr IS
1190: SELECT id

Line 1216: x_return_status := Okl_Api.G_RET_STS_SUCCESS;

1212: ------------------------------------------------------------
1213: -- Start processing
1214: ------------------------------------------------------------
1215:
1216: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
1217:
1218: l_return_status := Okl_Api.START_ACTIVITY(
1219: p_api_name => l_api_name,
1220: p_pkg_name => G_PKG_NAME,

Line 1218: l_return_status := Okl_Api.START_ACTIVITY(

1214: ------------------------------------------------------------
1215:
1216: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
1217:
1218: l_return_status := Okl_Api.START_ACTIVITY(
1219: p_api_name => l_api_name,
1220: p_pkg_name => G_PKG_NAME,
1221: p_init_msg_list => p_init_msg_list,
1222: l_api_version => l_api_version,

Line 1227: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

1223: p_api_version => p_api_version,
1224: p_api_type => '_PVT',
1225: x_return_status => l_return_status);
1226:
1227: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1228: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1229: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1230: RAISE Okl_Api.G_EXCEPTION_ERROR;
1231: END IF;

Line 1228: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

1224: p_api_type => '_PVT',
1225: x_return_status => l_return_status);
1226:
1227: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1228: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1229: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1230: RAISE Okl_Api.G_EXCEPTION_ERROR;
1231: END IF;
1232:

Line 1229: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN

1225: x_return_status => l_return_status);
1226:
1227: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1228: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1229: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1230: RAISE Okl_Api.G_EXCEPTION_ERROR;
1231: END IF;
1232:
1233: ---------------------------------------------

Line 1230: RAISE Okl_Api.G_EXCEPTION_ERROR;

1226:
1227: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1228: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1229: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1230: RAISE Okl_Api.G_EXCEPTION_ERROR;
1231: END IF;
1232:
1233: ---------------------------------------------
1234: -- Populate Header record

Line 1262: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

1258: ,x_msg_data
1259: ,i_taiv_rec
1260: ,r_taiv_rec);
1261:
1262: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1263: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1264: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1265: RAISE Okl_Api.G_EXCEPTION_ERROR;
1266: END IF;

Line 1263: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

1259: ,i_taiv_rec
1260: ,r_taiv_rec);
1261:
1262: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1263: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1264: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1265: RAISE Okl_Api.G_EXCEPTION_ERROR;
1266: END IF;
1267:

Line 1264: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN

1260: ,r_taiv_rec);
1261:
1262: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1263: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1264: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1265: RAISE Okl_Api.G_EXCEPTION_ERROR;
1266: END IF;
1267:
1268: ---------------------------------------------

Line 1265: RAISE Okl_Api.G_EXCEPTION_ERROR;

1261:
1262: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1263: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1264: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1265: RAISE Okl_Api.G_EXCEPTION_ERROR;
1266: END IF;
1267:
1268: ---------------------------------------------
1269: -- Create Lines and accounting entries for each

Line 1307: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

1303: ,x_msg_data
1304: ,i_tilv_rec
1305: ,r_tilv_rec);
1306:
1307: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1308: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1309: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1310: RAISE Okl_Api.G_EXCEPTION_ERROR;
1311: END IF;

Line 1308: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

1304: ,i_tilv_rec
1305: ,r_tilv_rec);
1306:
1307: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1308: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1309: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1310: RAISE Okl_Api.G_EXCEPTION_ERROR;
1311: END IF;
1312:

Line 1309: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN

1305: ,r_tilv_rec);
1306:
1307: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1308: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1309: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1310: RAISE Okl_Api.G_EXCEPTION_ERROR;
1311: END IF;
1312:
1313: ---------------------------------------------

Line 1310: RAISE Okl_Api.G_EXCEPTION_ERROR;

1306:
1307: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1308: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1309: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1310: RAISE Okl_Api.G_EXCEPTION_ERROR;
1311: END IF;
1312:
1313: ---------------------------------------------
1314: -- Populate Accounting record

Line 1330: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

1326: ,x_msg_data
1327: ,p_bpd_acc_rec
1328: );
1329:
1330: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1331: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1332: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1333: RAISE Okl_Api.G_EXCEPTION_ERROR;
1334: END IF;

Line 1331: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

1327: ,p_bpd_acc_rec
1328: );
1329:
1330: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1331: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1332: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1333: RAISE Okl_Api.G_EXCEPTION_ERROR;
1334: END IF;
1335: END LOOP;

Line 1332: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN

1328: );
1329:
1330: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1331: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1332: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1333: RAISE Okl_Api.G_EXCEPTION_ERROR;
1334: END IF;
1335: END LOOP;
1336:

Line 1333: RAISE Okl_Api.G_EXCEPTION_ERROR;

1329:
1330: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1331: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1332: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1333: RAISE Okl_Api.G_EXCEPTION_ERROR;
1334: END IF;
1335: END LOOP;
1336:
1337: ----------------------------------------------------

Line 1341: Okl_Api.END_ACTIVITY (

1337: ----------------------------------------------------
1338: -- End activity
1339: ----------------------------------------------------
1340:
1341: Okl_Api.END_ACTIVITY (
1342: x_msg_count => x_msg_count,
1343: x_msg_data => x_msg_data);
1344: EXCEPTION
1345: ------------------------------------------------------------

Line 1348: WHEN Okl_Api.G_EXCEPTION_ERROR THEN

1344: EXCEPTION
1345: ------------------------------------------------------------
1346: -- Exception handling
1347: ------------------------------------------------------------
1348: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
1349:
1350: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '*=>ERROR: '||SQLERRM);
1351: x_return_status := Okl_Api.HANDLE_EXCEPTIONS (
1352: p_api_name => l_api_name,

Line 1351: x_return_status := Okl_Api.HANDLE_EXCEPTIONS (

1347: ------------------------------------------------------------
1348: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
1349:
1350: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '*=>ERROR: '||SQLERRM);
1351: x_return_status := Okl_Api.HANDLE_EXCEPTIONS (
1352: p_api_name => l_api_name,
1353: p_pkg_name => G_PKG_NAME,
1354: p_exc_name => 'Okl_Api.G_RET_STS_ERROR',
1355: x_msg_count => x_msg_count,

Line 1354: p_exc_name => 'Okl_Api.G_RET_STS_ERROR',

1350: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '*=>ERROR: '||SQLERRM);
1351: x_return_status := Okl_Api.HANDLE_EXCEPTIONS (
1352: p_api_name => l_api_name,
1353: p_pkg_name => G_PKG_NAME,
1354: p_exc_name => 'Okl_Api.G_RET_STS_ERROR',
1355: x_msg_count => x_msg_count,
1356: x_msg_data => x_msg_data,
1357: p_api_type => '_PVT');
1358:

Line 1359: WHEN Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN

1355: x_msg_count => x_msg_count,
1356: x_msg_data => x_msg_data,
1357: p_api_type => '_PVT');
1358:
1359: WHEN Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
1360: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '*=>ERROR: '||SQLERRM);
1361: x_return_status := Okl_Api.HANDLE_EXCEPTIONS (
1362: p_api_name => l_api_name,
1363: p_pkg_name => G_PKG_NAME,

Line 1361: x_return_status := Okl_Api.HANDLE_EXCEPTIONS (

1357: p_api_type => '_PVT');
1358:
1359: WHEN Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
1360: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '*=>ERROR: '||SQLERRM);
1361: x_return_status := Okl_Api.HANDLE_EXCEPTIONS (
1362: p_api_name => l_api_name,
1363: p_pkg_name => G_PKG_NAME,
1364: p_exc_name => 'Okl_Api.G_RET_STS_UNEXP_ERROR',
1365: x_msg_count => x_msg_count,

Line 1364: p_exc_name => 'Okl_Api.G_RET_STS_UNEXP_ERROR',

1360: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '*=>ERROR: '||SQLERRM);
1361: x_return_status := Okl_Api.HANDLE_EXCEPTIONS (
1362: p_api_name => l_api_name,
1363: p_pkg_name => G_PKG_NAME,
1364: p_exc_name => 'Okl_Api.G_RET_STS_UNEXP_ERROR',
1365: x_msg_count => x_msg_count,
1366: x_msg_data => x_msg_data,
1367: p_api_type => '_PVT');
1368:

Line 1371: x_return_status := Okl_Api.HANDLE_EXCEPTIONS (

1367: p_api_type => '_PVT');
1368:
1369: WHEN OTHERS THEN
1370: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '*=>ERROR: '||SQLERRM);
1371: x_return_status := Okl_Api.HANDLE_EXCEPTIONS (
1372: p_api_name => l_api_name,
1373: p_pkg_name => G_PKG_NAME,
1374: p_exc_name => 'OTHERS',
1375: x_msg_count => x_msg_count,