[Home] [Help]
47: p_cust_acct_id IN NUMBER,
48: p_fin_asset_id IN NUMBER,
49: x_ship_to_site_use_id OUT NOCOPY NUMBER) IS
50:
51: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
52:
53: --Cursor to get the install_location_id of the asset
54: CURSOR l_get_instlocid(cp_fin_asset_id IN NUMBER) IS
55: SELECT csi.install_location_id,
141: 'p_fin_asset_id :'||p_fin_asset_id);
142:
143: END IF;
144:
145: x_return_status := OKL_API.G_RET_STS_SUCCESS;
146:
147: OPEN l_get_instlocid(p_fin_asset_id);
148: FETCH l_get_instlocid INTO l_inst_loc_id, l_inst_loc_type_code;
149:
197: END IF;
198:
199: IF l_inst_loc_id IS NULL OR l_loc_id IS NULL THEN
200: -- Install Location id is required
201: OKL_API.set_message( p_app_name => 'OKC',
202: p_msg_name => G_REQUIRED_VALUE,
203: p_token1 => G_COL_NAME_TOKEN,
204: p_token1_value => 'INSTALL_LOCATION_ID');
205: RAISE OKL_API.G_EXCEPTION_ERROR;
201: OKL_API.set_message( p_app_name => 'OKC',
202: p_msg_name => G_REQUIRED_VALUE,
203: p_token1 => G_COL_NAME_TOKEN,
204: p_token1_value => 'INSTALL_LOCATION_ID');
205: RAISE OKL_API.G_EXCEPTION_ERROR;
206: END IF;
207: ELSE
208: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
209: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.get_ship_to_site_use_id.',
256: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.get_ship_to_site_use_id ','End(-)');
257: END IF;
258:
259: EXCEPTION
260: WHEN OKL_API.G_EXCEPTION_ERROR THEN
261: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
262: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_ship_to_site_use_id ',
263: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
264: END IF;
259: EXCEPTION
260: WHEN OKL_API.G_EXCEPTION_ERROR THEN
261: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
262: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_ship_to_site_use_id ',
263: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
264: END IF;
265:
266: IF l_get_instlocid%ISOPEN THEN
267: CLOSE l_get_instlocid;
291: IF l_get_shiptositeid%ISOPEN THEN
292: CLOSE l_get_shiptositeid;
293: END IF;
294:
295: x_return_status := OKL_API.G_RET_STS_ERROR;
296: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
297: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
298: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_ship_to_site_use_id ',
299: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
292: CLOSE l_get_shiptositeid;
293: END IF;
294:
295: x_return_status := OKL_API.G_RET_STS_ERROR;
296: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
297: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
298: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_ship_to_site_use_id ',
299: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
300: END IF;
295: x_return_status := OKL_API.G_RET_STS_ERROR;
296: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
297: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
298: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_ship_to_site_use_id ',
299: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
300: END IF;
301:
302: IF l_get_instlocid%ISOPEN THEN
303: CLOSE l_get_instlocid;
326:
327: IF l_get_shiptositeid%ISOPEN THEN
328: CLOSE l_get_shiptositeid;
329: END IF;
330: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
331: WHEN OTHERS THEN
332: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
333: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_ship_to_site_use_id ',
334: 'EXCEPTION :'||sqlerrm);
361:
362: IF l_get_shiptositeid%ISOPEN THEN
363: CLOSE l_get_shiptositeid;
364: END IF;
365: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
366: -- unexpected error
367: OKL_API.set_message(p_app_name => g_app_name,
368: p_msg_name => g_unexpected_error,
369: p_token1 => g_sqlcode_token,
363: CLOSE l_get_shiptositeid;
364: END IF;
365: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
366: -- unexpected error
367: OKL_API.set_message(p_app_name => g_app_name,
368: p_msg_name => g_unexpected_error,
369: p_token1 => g_sqlcode_token,
370: p_token1_value => sqlcode,
371: p_token2 => g_sqlerrm_token,
439: RETURN 'Y';
440: END IF;
441:
442: EXCEPTION
443: WHEN OKL_API.G_EXCEPTION_ERROR THEN
444:
445: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
446: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.is_serialized_and_alc ',
447: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
443: WHEN OKL_API.G_EXCEPTION_ERROR THEN
444:
445: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
446: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.is_serialized_and_alc ',
447: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
448: END IF;
449:
450: IF (l_k_serialized_and_alc%ISOPEN) THEN
451: CLOSE l_k_serialized_and_alc;
450: IF (l_k_serialized_and_alc%ISOPEN) THEN
451: CLOSE l_k_serialized_and_alc;
452: END IF;
453:
454: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
455: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
456: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.is_serialized_and_alc ',
457: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
458: END IF;
453:
454: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
455: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
456: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.is_serialized_and_alc ',
457: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
458: END IF;
459:
460: IF (l_k_serialized_and_alc%ISOPEN) THEN
461: CLOSE l_k_serialized_and_alc;
501: |
502: *=======================================================================*/
503: PROCEDURE validate_tax_code(
504: p_api_version IN NUMBER,
505: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
506: x_return_status OUT NOCOPY VARCHAR2,
507: x_msg_count OUT NOCOPY NUMBER,
508: x_msg_data OUT NOCOPY VARCHAR2,
509: p_trx_date IN DATE,
513: x_valid_code OUT NOCOPY VARCHAR2) IS
514:
515: -- Local variables
516: l_api_name CONSTANT VARCHAR2(30) := 'validate_tax_code';
517: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
518:
519: l_dummy VARCHAR2(1);
520:
521: -- Cursors
592: END IF;
593:
594: EXCEPTION
595:
596: WHEN OKL_API.G_EXCEPTION_ERROR THEN
597:
598: IF (l_tbc_csr%ISOPEN) THEN
599: CLOSE l_tbc_csr;
600: END IF;
608: END IF;
609:
610: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
611: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.validate_tax_code ',
612: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
613: END IF;
614:
615: x_return_status := OKL_API.G_RET_STS_ERROR;
616:
611: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.validate_tax_code ',
612: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
613: END IF;
614:
615: x_return_status := OKL_API.G_RET_STS_ERROR;
616:
617: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
618:
619: IF (l_tbc_csr%ISOPEN) THEN
613: END IF;
614:
615: x_return_status := OKL_API.G_RET_STS_ERROR;
616:
617: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
618:
619: IF (l_tbc_csr%ISOPEN) THEN
620: CLOSE l_tbc_csr;
621: END IF;
629: END IF;
630:
631: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
632: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.validate_tax_code ',
633: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
634: END IF;
635:
636: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
637:
632: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.validate_tax_code ',
633: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
634: END IF;
635:
636: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
637:
638: WHEN OTHERS THEN
639:
640: IF (l_tbc_csr%ISOPEN) THEN
653: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.validate_tax_code ',
654: 'EXCEPTION :'||sqlerrm);
655: END IF;
656:
657: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
658: -- unexpected error
659: OKL_API.set_message(p_app_name => g_app_name,
660: p_msg_name => g_unexpected_error,
661: p_token1 => g_sqlcode_token,
655: END IF;
656:
657: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
658: -- unexpected error
659: OKL_API.set_message(p_app_name => g_app_name,
660: p_msg_name => g_unexpected_error,
661: p_token1 => g_sqlcode_token,
662: p_token1_value => sqlcode,
663: p_token2 => g_sqlerrm_token,
695: |
696: *=======================================================================*/
697: PROCEDURE copy_tax_trx_data (
698: p_api_version IN NUMBER,
699: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
700: x_return_status OUT NOCOPY VARCHAR2,
701: x_msg_count OUT NOCOPY NUMBER,
702: x_msg_data OUT NOCOPY VARCHAR2,
703: p_trx_id IN NUMBER,
804:
805: OPEN l_taxsourceid_csr(l_get_tax_data_rec.trx_id, l_get_tax_data_rec.trx_line_id);
806: FETCH l_taxsourceid_csr INTO l_txs_id;
807: IF l_taxsourceid_csr%NOTFOUND THEN
808: OKL_API.set_message(p_app_name => 'OKL',
809: p_msg_name => 'OKL_TX_SRC_TRX_ERR',
810: p_token1 => 'LINE_NUM',
811: p_token1_value => i);
812: RAISE OKL_API.G_EXCEPTION_ERROR;
808: OKL_API.set_message(p_app_name => 'OKL',
809: p_msg_name => 'OKL_TX_SRC_TRX_ERR',
810: p_token1 => 'LINE_NUM',
811: p_token1_value => i);
812: RAISE OKL_API.G_EXCEPTION_ERROR;
813: END IF;
814: CLOSE l_taxsourceid_csr;
815:
816: l_tax_lines_tbl(i).txs_id := l_txs_id;
916: EXCEPTION
917: WHEN OTHERS THEN
918: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
919: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
920: OKL_API.set_message(
921: p_app_name => 'OKL',
922: p_msg_name => 'OKL_TX_TRX_INS_ERR',
923: p_token1 => 'TABLE_NAME',
924: p_token1_value => 'okl_tax_trx_details',
926: p_token2_value => SQLERRM(SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
927: p_token3 => 'ITERATION',
928: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
929: END LOOP;
930: RAISE OKL_API.G_EXCEPTION_ERROR;
931: END IF;
932: END;
933: ---- Insert into okl_tax_trx_details end -----
934:
936: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.copy_tax_trx_data ','End(-)');
937: END IF;
938:
939: EXCEPTION
940: WHEN OKL_API.G_EXCEPTION_ERROR THEN
941:
942: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
943: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.copy_tax_trx_data ',
944: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
940: WHEN OKL_API.G_EXCEPTION_ERROR THEN
941:
942: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
943: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.copy_tax_trx_data ',
944: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
945: END IF;
946:
947: x_return_status := OKL_API.G_RET_STS_ERROR;
948:
943: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.copy_tax_trx_data ',
944: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
945: END IF;
946:
947: x_return_status := OKL_API.G_RET_STS_ERROR;
948:
949: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
950: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
951: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.copy_tax_trx_data ',
945: END IF;
946:
947: x_return_status := OKL_API.G_RET_STS_ERROR;
948:
949: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
950: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
951: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.copy_tax_trx_data ',
952: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
953: END IF;
948:
949: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
950: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
951: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.copy_tax_trx_data ',
952: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
953: END IF;
954:
955: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
956:
951: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.copy_tax_trx_data ',
952: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
953: END IF;
954:
955: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
956:
957: WHEN OTHERS THEN
958:
959: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
960: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.copy_tax_trx_data ',
961: 'EXCEPTION :'||sqlerrm);
962: END IF;
963:
964: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
965: -- unexpected error
966: OKL_API.set_message(p_app_name => g_app_name,
967: p_msg_name => g_unexpected_error,
968: p_token1 => g_sqlcode_token,
962: END IF;
963:
964: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
965: -- unexpected error
966: OKL_API.set_message(p_app_name => g_app_name,
967: p_msg_name => g_unexpected_error,
968: p_token1 => g_sqlcode_token,
969: p_token1_value => sqlcode,
970: p_token2 => g_sqlerrm_token,
1000: |
1001: *=======================================================================*/
1002: PROCEDURE populate_ser_split_total_tax(
1003: p_api_version IN NUMBER,
1004: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
1005: x_return_status OUT NOCOPY VARCHAR2,
1006: x_msg_count OUT NOCOPY NUMBER,
1007: x_msg_data OUT NOCOPY VARCHAR2,
1008: p_asset_id IN NUMBER,
1009: p_serialized_asset IN VARCHAR2) IS
1010:
1011: -- Local variables
1012: l_api_name CONSTANT VARCHAR2(30) := 'populate_ser_split_total_tax';
1013: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1014: l_total_tax_amount NUMBER;
1015: i NUMBER;
1016: j NUMBER;
1017: l_total_line_amount NUMBER;
1130: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.populate_ser_split_total_tax',
1131: 'Return Status' || l_return_status);
1132: END IF;
1133:
1134: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1135: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1136: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1137: RAISE OKL_API.G_EXCEPTION_ERROR;
1138: END IF;
1131: 'Return Status' || l_return_status);
1132: END IF;
1133:
1134: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1135: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1136: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1137: RAISE OKL_API.G_EXCEPTION_ERROR;
1138: END IF;
1139:
1132: END IF;
1133:
1134: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1135: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1136: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1137: RAISE OKL_API.G_EXCEPTION_ERROR;
1138: END IF;
1139:
1140: END IF;
1133:
1134: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1135: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1136: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1137: RAISE OKL_API.G_EXCEPTION_ERROR;
1138: END IF;
1139:
1140: END IF;
1141:
1146: END IF;
1147:
1148: EXCEPTION
1149:
1150: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1151:
1152: IF (l_alc_total_tax_ser_csr%ISOPEN) THEN
1153: CLOSE l_alc_total_tax_ser_csr;
1154: END IF;
1166: END IF;
1167:
1168: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
1169: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_ser_split_total_tax ',
1170: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
1171: END IF;
1172:
1173: x_return_status := OKL_API.G_RET_STS_ERROR;
1174:
1169: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_ser_split_total_tax ',
1170: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
1171: END IF;
1172:
1173: x_return_status := OKL_API.G_RET_STS_ERROR;
1174:
1175: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1176:
1177: IF (l_alc_total_tax_ser_csr%ISOPEN) THEN
1171: END IF;
1172:
1173: x_return_status := OKL_API.G_RET_STS_ERROR;
1174:
1175: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1176:
1177: IF (l_alc_total_tax_ser_csr%ISOPEN) THEN
1178: CLOSE l_alc_total_tax_ser_csr;
1179: END IF;
1191: END IF;
1192:
1193: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
1194: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_ser_split_total_tax ',
1195: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
1196: END IF;
1197:
1198: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1199:
1194: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_ser_split_total_tax ',
1195: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
1196: END IF;
1197:
1198: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1199:
1200: WHEN OTHERS THEN
1201:
1202: IF (l_alc_total_tax_ser_csr%ISOPEN) THEN
1219: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_ser_split_total_tax ',
1220: 'EXCEPTION :'||sqlerrm);
1221: END IF;
1222:
1223: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1224: -- unexpected error
1225: OKL_API.set_message(p_app_name => g_app_name,
1226: p_msg_name => g_unexpected_error,
1227: p_token1 => g_sqlcode_token,
1221: END IF;
1222:
1223: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1224: -- unexpected error
1225: OKL_API.set_message(p_app_name => g_app_name,
1226: p_msg_name => g_unexpected_error,
1227: p_token1 => g_sqlcode_token,
1228: p_token1_value => sqlcode,
1229: p_token2 => g_sqlerrm_token,
1258: |
1259: *=======================================================================*/
1260: PROCEDURE populate_alc_total_tax(
1261: p_api_version IN NUMBER,
1262: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
1263: x_return_status OUT NOCOPY VARCHAR2,
1264: x_msg_count OUT NOCOPY NUMBER,
1265: x_msg_data OUT NOCOPY VARCHAR2,
1266: p_asset_id IN NUMBER,
1268: p_serialized_asset IN VARCHAR2 DEFAULT NULL) IS
1269:
1270: -- Local variables
1271: l_api_name CONSTANT VARCHAR2(30) := 'populate_alc_total_tax';
1272: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1273: l_total_tax_amount NUMBER;
1274: i NUMBER;
1275: j NUMBER;
1276:
1427: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.populate_alc_total_tax',
1428: 'Return Status' || l_return_status);
1429: END IF;
1430:
1431: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1432: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1433: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1434: RAISE OKL_API.G_EXCEPTION_ERROR;
1435: END IF;
1428: 'Return Status' || l_return_status);
1429: END IF;
1430:
1431: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1432: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1433: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1434: RAISE OKL_API.G_EXCEPTION_ERROR;
1435: END IF;
1436:
1429: END IF;
1430:
1431: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1432: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1433: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1434: RAISE OKL_API.G_EXCEPTION_ERROR;
1435: END IF;
1436:
1437: END IF;
1430:
1431: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1432: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1433: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1434: RAISE OKL_API.G_EXCEPTION_ERROR;
1435: END IF;
1436:
1437: END IF;
1438:
1443: END IF;
1444:
1445: EXCEPTION
1446:
1447: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1448:
1449: IF (l_alc_total_tax_csr%ISOPEN) THEN
1450: CLOSE l_alc_total_tax_csr;
1451: END IF;
1459: END IF;
1460:
1461: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
1462: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_alc_total_tax ',
1463: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
1464: END IF;
1465:
1466: IF (l_fetch_stream_types_csr%ISOPEN) THEN
1467: CLOSE l_fetch_stream_types_csr;
1466: IF (l_fetch_stream_types_csr%ISOPEN) THEN
1467: CLOSE l_fetch_stream_types_csr;
1468: END IF;
1469:
1470: x_return_status := OKL_API.G_RET_STS_ERROR;
1471:
1472: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1473:
1474: IF (l_alc_total_tax_csr%ISOPEN) THEN
1468: END IF;
1469:
1470: x_return_status := OKL_API.G_RET_STS_ERROR;
1471:
1472: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1473:
1474: IF (l_alc_total_tax_csr%ISOPEN) THEN
1475: CLOSE l_alc_total_tax_csr;
1476: END IF;
1488: END IF;
1489:
1490: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
1491: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_alc_total_tax ',
1492: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
1493: END IF;
1494:
1495: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1496:
1491: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_alc_total_tax ',
1492: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
1493: END IF;
1494:
1495: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1496:
1497: WHEN OTHERS THEN
1498:
1499: IF (l_alc_total_tax_csr%ISOPEN) THEN
1516: IF (l_fetch_stream_types_csr%ISOPEN) THEN
1517: CLOSE l_fetch_stream_types_csr;
1518: END IF;
1519:
1520: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1521: -- unexpected error
1522: OKL_API.set_message(p_app_name => g_app_name,
1523: p_msg_name => g_unexpected_error,
1524: p_token1 => g_sqlcode_token,
1518: END IF;
1519:
1520: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1521: -- unexpected error
1522: OKL_API.set_message(p_app_name => g_app_name,
1523: p_msg_name => g_unexpected_error,
1524: p_token1 => g_sqlcode_token,
1525: p_token1_value => sqlcode,
1526: p_token2 => g_sqlerrm_token,
1563: |
1564: *=======================================================================*/
1565: PROCEDURE update_tax_sources_total(
1566: p_api_version IN NUMBER,
1567: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
1568: x_return_status OUT NOCOPY VARCHAR2,
1569: x_msg_count OUT NOCOPY NUMBER,
1570: x_msg_data OUT NOCOPY VARCHAR2,
1571: p_source_trx_id IN NUMBER,
1573: p_serialized_asset IN VARCHAR2 DEFAULT NULL) IS
1574:
1575: -- Local variables
1576: l_api_name CONSTANT VARCHAR2(30) := 'update_tax_sources_total';
1577: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1578: l_total_tax_amount NUMBER;
1579: i NUMBER;
1580:
1581: -- Local data structure
1828: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.update_tax_sources_total',
1829: 'Return Status' || l_return_status);
1830: END IF;
1831:
1832: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1833: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1834: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1835: RAISE OKL_API.G_EXCEPTION_ERROR;
1836: END IF;
1829: 'Return Status' || l_return_status);
1830: END IF;
1831:
1832: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1833: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1834: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1835: RAISE OKL_API.G_EXCEPTION_ERROR;
1836: END IF;
1837:
1830: END IF;
1831:
1832: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1833: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1834: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1835: RAISE OKL_API.G_EXCEPTION_ERROR;
1836: END IF;
1837:
1838: END IF;
1831:
1832: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1833: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1834: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1835: RAISE OKL_API.G_EXCEPTION_ERROR;
1836: END IF;
1837:
1838: END IF;
1839:
1844: END IF;
1845:
1846: EXCEPTION
1847:
1848: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1849:
1850: IF (l_taxablelines_csr%ISOPEN) THEN
1851: CLOSE l_taxablelines_csr;
1852: END IF;
1872: END IF;
1873:
1874: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
1875: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.update_tax_sources_total ',
1876: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
1877: END IF;
1878:
1879: x_return_status := OKL_API.G_RET_STS_ERROR;
1880:
1875: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.update_tax_sources_total ',
1876: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
1877: END IF;
1878:
1879: x_return_status := OKL_API.G_RET_STS_ERROR;
1880:
1881: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1882:
1883: IF (l_taxablelines_csr%ISOPEN) THEN
1877: END IF;
1878:
1879: x_return_status := OKL_API.G_RET_STS_ERROR;
1880:
1881: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1882:
1883: IF (l_taxablelines_csr%ISOPEN) THEN
1884: CLOSE l_taxablelines_csr;
1885: END IF;
1905: END IF;
1906:
1907: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
1908: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.update_tax_sources_total ',
1909: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
1910: END IF;
1911:
1912: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1913:
1908: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.update_tax_sources_total ',
1909: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
1910: END IF;
1911:
1912: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1913:
1914: WHEN OTHERS THEN
1915:
1916: IF (l_taxablelines_csr%ISOPEN) THEN
1941: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.update_tax_sources_total ',
1942: 'EXCEPTION :'||sqlerrm);
1943: END IF;
1944:
1945: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1946: -- unexpected error
1947: OKL_API.set_message(p_app_name => g_app_name,
1948: p_msg_name => g_unexpected_error,
1949: p_token1 => g_sqlcode_token,
1943: END IF;
1944:
1945: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1946: -- unexpected error
1947: OKL_API.set_message(p_app_name => g_app_name,
1948: p_msg_name => g_unexpected_error,
1949: p_token1 => g_sqlcode_token,
1950: p_token1_value => sqlcode,
1951: p_token2 => g_sqlerrm_token,
1981: |
1982: *=======================================================================*/
1983: PROCEDURE make_tax_sources_reportable(
1984: p_api_version IN NUMBER,
1985: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
1986: x_return_status OUT NOCOPY VARCHAR2,
1987: x_msg_count OUT NOCOPY NUMBER,
1988: x_msg_data OUT NOCOPY VARCHAR2,
1989: p_source_trx_id IN NUMBER) IS
1989: p_source_trx_id IN NUMBER) IS
1990:
1991: -- Local variables
1992: l_api_name CONSTANT VARCHAR2(30) := 'make_tax_sources_reportable';
1993: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1994: l_total_tax_amount NUMBER;
1995:
1996: -- Local data structure
1997: l_txsv_tbl txsv_tbl_type;
2050: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.make_tax_sources_reportable',
2051: 'Return Status' || l_return_status);
2052: END IF;
2053:
2054: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2055: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2056: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2057: RAISE OKL_API.G_EXCEPTION_ERROR;
2058: END IF;
2051: 'Return Status' || l_return_status);
2052: END IF;
2053:
2054: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2055: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2056: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2057: RAISE OKL_API.G_EXCEPTION_ERROR;
2058: END IF;
2059:
2052: END IF;
2053:
2054: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2055: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2056: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2057: RAISE OKL_API.G_EXCEPTION_ERROR;
2058: END IF;
2059:
2060: END IF;
2053:
2054: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2055: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2056: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2057: RAISE OKL_API.G_EXCEPTION_ERROR;
2058: END IF;
2059:
2060: END IF;
2061:
2066: END IF;
2067:
2068: EXCEPTION
2069:
2070: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2071:
2072: IF (l_taxablelines_csr%ISOPEN) THEN
2073: CLOSE l_taxablelines_csr;
2074: END IF;
2074: END IF;
2075:
2076: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
2077: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.make_tax_sources_reportable ',
2078: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
2079: END IF;
2080:
2081: x_return_status := OKL_API.G_RET_STS_ERROR;
2082:
2077: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.make_tax_sources_reportable ',
2078: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
2079: END IF;
2080:
2081: x_return_status := OKL_API.G_RET_STS_ERROR;
2082:
2083: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2084:
2085: IF (l_taxablelines_csr%ISOPEN) THEN
2079: END IF;
2080:
2081: x_return_status := OKL_API.G_RET_STS_ERROR;
2082:
2083: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2084:
2085: IF (l_taxablelines_csr%ISOPEN) THEN
2086: CLOSE l_taxablelines_csr;
2087: END IF;
2087: END IF;
2088:
2089: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
2090: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.make_tax_sources_reportable ',
2091: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
2092: END IF;
2093:
2094: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
2095:
2090: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.make_tax_sources_reportable ',
2091: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
2092: END IF;
2093:
2094: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
2095:
2096: WHEN OTHERS THEN
2097:
2098: IF (l_taxablelines_csr%ISOPEN) THEN
2103: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.make_tax_sources_reportable ',
2104: 'EXCEPTION :'||sqlerrm);
2105: END IF;
2106:
2107: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
2108: -- unexpected error
2109: OKL_API.set_message(p_app_name => g_app_name,
2110: p_msg_name => g_unexpected_error,
2111: p_token1 => g_sqlcode_token,
2105: END IF;
2106:
2107: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
2108: -- unexpected error
2109: OKL_API.set_message(p_app_name => g_app_name,
2110: p_msg_name => g_unexpected_error,
2111: p_token1 => g_sqlcode_token,
2112: p_token1_value => sqlcode,
2113: p_token2 => g_sqlerrm_token,
2147: | 22-MAR-07 RRAVIKIR Created
2148: *=======================================================================*/
2149: PROCEDURE process_final_upfront_tax(
2150: p_api_version IN NUMBER,
2151: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
2152: x_return_status OUT NOCOPY VARCHAR2,
2153: x_msg_count OUT NOCOPY NUMBER,
2154: x_msg_data OUT NOCOPY VARCHAR2,
2155: p_trx_id IN NUMBER,
2159:
2160: -- Local variables
2161: l_api_version CONSTANT NUMBER := 1;
2162: l_api_name CONSTANT VARCHAR2(30) := 'process_final_upfront_tax';
2163: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2164:
2165: BEGIN
2166:
2167: IF (G_DEBUG_LEVEL_PROCEDURE >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
2183: END IF;
2184:
2185: -- Required Values
2186: IF p_trx_id IS NULL THEN
2187: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
2188: p_token1 => G_COL_NAME_TOKEN,
2189: p_token1_value => 'TRX_ID');
2190: RAISE OKL_API.G_EXCEPTION_ERROR;
2191: END IF;
2186: IF p_trx_id IS NULL THEN
2187: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
2188: p_token1 => G_COL_NAME_TOKEN,
2189: p_token1_value => 'TRX_ID');
2190: RAISE OKL_API.G_EXCEPTION_ERROR;
2191: END IF;
2192:
2193: IF p_application_id IS NULL THEN
2194: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
2190: RAISE OKL_API.G_EXCEPTION_ERROR;
2191: END IF;
2192:
2193: IF p_application_id IS NULL THEN
2194: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
2195: p_token1 => G_COL_NAME_TOKEN,
2196: p_token1_value => 'APPLICATION_ID');
2197: RAISE OKL_API.G_EXCEPTION_ERROR;
2198: END IF;
2193: IF p_application_id IS NULL THEN
2194: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
2195: p_token1 => G_COL_NAME_TOKEN,
2196: p_token1_value => 'APPLICATION_ID');
2197: RAISE OKL_API.G_EXCEPTION_ERROR;
2198: END IF;
2199:
2200: IF p_entity_code IS NULL THEN
2201: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
2197: RAISE OKL_API.G_EXCEPTION_ERROR;
2198: END IF;
2199:
2200: IF p_entity_code IS NULL THEN
2201: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
2202: p_token1 => G_COL_NAME_TOKEN,
2203: p_token1_value => 'ENTITY_CODE');
2204: RAISE OKL_API.G_EXCEPTION_ERROR;
2205: END IF;
2200: IF p_entity_code IS NULL THEN
2201: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
2202: p_token1 => G_COL_NAME_TOKEN,
2203: p_token1_value => 'ENTITY_CODE');
2204: RAISE OKL_API.G_EXCEPTION_ERROR;
2205: END IF;
2206:
2207: IF p_event_class_code IS NULL THEN
2208: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
2204: RAISE OKL_API.G_EXCEPTION_ERROR;
2205: END IF;
2206:
2207: IF p_event_class_code IS NULL THEN
2208: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
2209: p_token1 => G_COL_NAME_TOKEN,
2210: p_token1_value => 'EVENT_CLASS_CODE');
2211: RAISE OKL_API.G_EXCEPTION_ERROR;
2212: END IF;
2207: IF p_event_class_code IS NULL THEN
2208: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
2209: p_token1 => G_COL_NAME_TOKEN,
2210: p_token1_value => 'EVENT_CLASS_CODE');
2211: RAISE OKL_API.G_EXCEPTION_ERROR;
2212: END IF;
2213: -- End required values
2214:
2215: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
2231: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_final_upfront_tax.',
2232: 'Return Status' || l_return_status);
2233: END IF;
2234:
2235: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2236: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2237: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2238: RAISE OKL_API.G_EXCEPTION_ERROR;
2239: END IF;
2232: 'Return Status' || l_return_status);
2233: END IF;
2234:
2235: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2236: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2237: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2238: RAISE OKL_API.G_EXCEPTION_ERROR;
2239: END IF;
2240:
2233: END IF;
2234:
2235: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2236: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2237: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2238: RAISE OKL_API.G_EXCEPTION_ERROR;
2239: END IF;
2240:
2241: x_return_status := l_return_status;
2234:
2235: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2236: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2237: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2238: RAISE OKL_API.G_EXCEPTION_ERROR;
2239: END IF;
2240:
2241: x_return_status := l_return_status;
2242:
2244: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.process_final_upfront_tax ','End(-)');
2245: END IF;
2246:
2247: EXCEPTION
2248: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2249:
2250: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
2251: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_final_upfront_tax ',
2252: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
2248: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2249:
2250: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
2251: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_final_upfront_tax ',
2252: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
2253: END IF;
2254:
2255: x_return_status := OKL_API.G_RET_STS_ERROR;
2256:
2251: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_final_upfront_tax ',
2252: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
2253: END IF;
2254:
2255: x_return_status := OKL_API.G_RET_STS_ERROR;
2256:
2257: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2258: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
2259: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_final_upfront_tax ',
2253: END IF;
2254:
2255: x_return_status := OKL_API.G_RET_STS_ERROR;
2256:
2257: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2258: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
2259: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_final_upfront_tax ',
2260: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
2261: END IF;
2256:
2257: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2258: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
2259: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_final_upfront_tax ',
2260: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
2261: END IF;
2262:
2263: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
2264:
2259: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_final_upfront_tax ',
2260: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
2261: END IF;
2262:
2263: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
2264:
2265: WHEN OTHERS THEN
2266:
2267: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
2268: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_final_upfront_tax ',
2269: 'EXCEPTION :'||sqlerrm);
2270: END IF;
2271:
2272: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
2273: -- unexpected error
2274: OKL_API.set_message(p_app_name => g_app_name,
2275: p_msg_name => g_unexpected_error,
2276: p_token1 => g_sqlcode_token,
2270: END IF;
2271:
2272: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
2273: -- unexpected error
2274: OKL_API.set_message(p_app_name => g_app_name,
2275: p_msg_name => g_unexpected_error,
2276: p_token1 => g_sqlcode_token,
2277: p_token1_value => sqlcode,
2278: p_token2 => g_sqlerrm_token,
2313: |
2314: *=======================================================================*/
2315: PROCEDURE populate_tax_trx_details (
2316: p_api_version IN NUMBER,
2317: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
2318: x_return_status OUT NOCOPY VARCHAR2,
2319: x_msg_count OUT NOCOPY NUMBER,
2320: x_msg_data OUT NOCOPY VARCHAR2,
2321: p_trx_id IN NUMBER,
2327:
2328: -- Local variables
2329: l_api_version CONSTANT NUMBER := 1;
2330: l_api_name CONSTANT VARCHAR2(30) := 'populate_tax_trx_details';
2331: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2332:
2333: -- Cursor to retrieve tax data
2334: CURSOR l_get_tax_data_csr IS
2335: SELECT tax_determine_date,
2519: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_trx_details ','End(-)');
2520: END IF;
2521:
2522: EXCEPTION
2523: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2524:
2525: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
2526: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_trx_details ',
2527: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
2523: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2524:
2525: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
2526: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_trx_details ',
2527: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
2528: END IF;
2529:
2530: x_return_status := OKL_API.G_RET_STS_ERROR;
2531:
2526: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_trx_details ',
2527: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
2528: END IF;
2529:
2530: x_return_status := OKL_API.G_RET_STS_ERROR;
2531:
2532: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2533: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
2534: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_trx_details ',
2528: END IF;
2529:
2530: x_return_status := OKL_API.G_RET_STS_ERROR;
2531:
2532: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2533: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
2534: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_trx_details ',
2535: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
2536: END IF;
2531:
2532: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2533: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
2534: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_trx_details ',
2535: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
2536: END IF;
2537:
2538: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
2539:
2534: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_trx_details ',
2535: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
2536: END IF;
2537:
2538: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
2539:
2540: WHEN OTHERS THEN
2541:
2542: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
2543: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_trx_details ',
2544: 'EXCEPTION :'||sqlerrm);
2545: END IF;
2546:
2547: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
2548: -- unexpected error
2549: OKL_API.set_message(p_app_name => g_app_name,
2550: p_msg_name => g_unexpected_error,
2551: p_token1 => g_sqlcode_token,
2545: END IF;
2546:
2547: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
2548: -- unexpected error
2549: OKL_API.set_message(p_app_name => g_app_name,
2550: p_msg_name => g_unexpected_error,
2551: p_token1 => g_sqlcode_token,
2552: p_token1_value => sqlcode,
2553: p_token2 => g_sqlerrm_token,
2599: --p_source_trx_name ---> 'Reverse'
2600: --p_source_table ---> 'OKL_TRX_CONTRACTS'
2601: --------------------------------------------------
2602: -- Local variables
2603: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2604: l_rev_trx_type_id NUMBER;
2605: l_khr_id NUMBER;
2606: l_legal_entity_id NUMBER;
2607: l_trx_date DATE;
2675: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_contract_reversal_tax.',
2676: 'p_source_table :'||p_source_table);
2677: END IF;
2678:
2679: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2680:
2681: -- validate the source trx id
2682: OPEN l_trxcontracts_csr(p_source_trx_id, p_source_trx_name);
2683: FETCH l_trxcontracts_csr INTO l_rev_trx_type_id, l_khr_id, l_legal_entity_id, l_trx_date;
2686: OKC_API.set_message( p_app_name => 'OKC',
2687: p_msg_name => G_INVALID_VALUE,
2688: p_token1 => G_COL_NAME_TOKEN,
2689: p_token1_value => 'SOURCE_TRX_ID');
2690: RAISE OKL_API.G_EXCEPTION_ERROR;
2691: END IF;
2692: CLOSE l_trxcontracts_csr;
2693:
2694: -- Logic starts
2846: EXCEPTION
2847: WHEN OTHERS THEN
2848: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
2849: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
2850: OKL_API.set_message(
2851: p_app_name => 'OKL',
2852: p_msg_name => 'OKL_TX_TRX_UPD_ERR',
2853: p_token1 => 'TABLE_NAME',
2854: p_token1_value => 'OKL_TAX_SOURCES',
2856: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
2857: p_token3 => 'ITERATION',
2858: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
2859: END LOOP;
2860: RAISE OKL_API.G_EXCEPTION_ERROR;
2861: END IF;
2862: END;
2863: END IF;
2864:
2878: EXCEPTION
2879: WHEN OTHERS THEN
2880: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
2881: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
2882: OKL_API.set_message(p_app_name => 'OKL',
2883: p_msg_name => 'OKL_TX_TRX_INS_ERR',
2884: p_token1 => 'TABLE_NAME',
2885: p_token1_value => 'OKL_TAX_SOURCES',
2886: p_token2 => 'ERROR_CODE',
2887: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
2888: p_token3 => 'ITERATION',
2889: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
2890: END LOOP;
2891: RAISE OKL_API.G_EXCEPTION_ERROR;
2892: END IF;
2893: END;
2894: -- bulk insert into okl_tax_sources -- end
2895:
2930: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_contract_reversal_tax.',
2931: 'Return Status' || l_return_status);
2932: END IF;
2933:
2934: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2935: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2936: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2937: RAISE OKL_API.G_EXCEPTION_ERROR;
2938: END IF;
2931: 'Return Status' || l_return_status);
2932: END IF;
2933:
2934: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2935: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2936: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2937: RAISE OKL_API.G_EXCEPTION_ERROR;
2938: END IF;
2939:
2932: END IF;
2933:
2934: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2935: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2936: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2937: RAISE OKL_API.G_EXCEPTION_ERROR;
2938: END IF;
2939:
2940: -- Get the total tax amount corresponding to 'Reverse' transaction from
2933:
2934: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2935: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2936: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2937: RAISE OKL_API.G_EXCEPTION_ERROR;
2938: END IF;
2939:
2940: -- Get the total tax amount corresponding to 'Reverse' transaction from
2941: -- zx_lines and update total_tax on okl_tax_sources
2955: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_contract_reversal_tax.',
2956: 'Return Status' || l_return_status);
2957: END IF;
2958:
2959: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2960: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2961: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2962: RAISE OKL_API.G_EXCEPTION_ERROR;
2963: END IF;
2956: 'Return Status' || l_return_status);
2957: END IF;
2958:
2959: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2960: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2961: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2962: RAISE OKL_API.G_EXCEPTION_ERROR;
2963: END IF;
2964:
2957: END IF;
2958:
2959: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2960: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2961: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2962: RAISE OKL_API.G_EXCEPTION_ERROR;
2963: END IF;
2964:
2965: END IF;
2958:
2959: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2960: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2961: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2962: RAISE OKL_API.G_EXCEPTION_ERROR;
2963: END IF;
2964:
2965: END IF;
2966:
2968: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.process_contract_reversal_tax ','End(-)');
2969: END IF;
2970:
2971: EXCEPTION
2972: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2973: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
2974: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_contract_reversal_tax ',
2975: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
2976: END IF;
2971: EXCEPTION
2972: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2973: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
2974: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_contract_reversal_tax ',
2975: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
2976: END IF;
2977:
2978: IF l_prevtaxsourcesbk_csr%ISOPEN THEN
2979: CLOSE l_prevtaxsourcesbk_csr;
2982: IF l_trxcontracts_csr%ISOPEN THEN
2983: CLOSE l_trxcontracts_csr;
2984: END IF;
2985:
2986: x_return_status := OKL_API.G_RET_STS_ERROR;
2987: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2988: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
2989: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_contract_reversal_tax ',
2990: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
2983: CLOSE l_trxcontracts_csr;
2984: END IF;
2985:
2986: x_return_status := OKL_API.G_RET_STS_ERROR;
2987: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2988: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
2989: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_contract_reversal_tax ',
2990: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
2991: END IF;
2986: x_return_status := OKL_API.G_RET_STS_ERROR;
2987: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2988: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
2989: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_contract_reversal_tax ',
2990: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
2991: END IF;
2992:
2993: IF l_prevtaxsourcesbk_csr%ISOPEN THEN
2994: CLOSE l_prevtaxsourcesbk_csr;
2997: IF l_trxcontracts_csr%ISOPEN THEN
2998: CLOSE l_trxcontracts_csr;
2999: END IF;
3000:
3001: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
3002:
3003: WHEN OTHERS THEN
3004: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
3005: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_contract_reversal_tax ',
3013: IF l_trxcontracts_csr%ISOPEN THEN
3014: CLOSE l_trxcontracts_csr;
3015: END IF;
3016:
3017: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
3018: -- unexpected error
3019: OKL_API.set_message(p_app_name => g_app_name,
3020: p_msg_name => g_unexpected_error,
3021: p_token1 => g_sqlcode_token,
3015: END IF;
3016:
3017: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
3018: -- unexpected error
3019: OKL_API.set_message(p_app_name => g_app_name,
3020: p_msg_name => g_unexpected_error,
3021: p_token1 => g_sqlcode_token,
3022: p_token1_value => sqlcode,
3023: p_token2 => g_sqlerrm_token,
3075: | Modified the inner query of l_get_ship_to_ids
3076: *=======================================================================*/
3077: PROCEDURE get_location_party_ids(
3078: p_api_version IN NUMBER,
3079: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
3080: x_return_status OUT NOCOPY VARCHAR2,
3081: x_msg_count OUT NOCOPY NUMBER,
3082: x_msg_data OUT NOCOPY VARCHAR2,
3083: p_cust_acct_id IN NUMBER,
3091: x_ship_to_location_id OUT NOCOPY NUMBER,
3092: x_ship_to_party_id OUT NOCOPY NUMBER,
3093: x_ship_to_site_use_id OUT NOCOPY NUMBER) IS
3094:
3095: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
3096:
3097: --Cursor to get the 'SHIP_TO' identifiers corresponding to the install_location_id of the asset
3098: CURSOR l_get_ship_to_ids(cp_site_use_id IN NUMBER) IS -- asaanka changed for bug # 6612165
3099: SELECT
3178: END IF;
3179:
3180: -- Required Values
3181: IF p_fin_asset_id IS NULL AND p_khr_id IS NULL THEN
3182: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
3183: p_token1 => G_COL_NAME_TOKEN,
3184: p_token1_value => 'CONTRACT_ID');
3185: RAISE OKL_API.G_EXCEPTION_ERROR;
3186: END IF;
3181: IF p_fin_asset_id IS NULL AND p_khr_id IS NULL THEN
3182: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
3183: p_token1 => G_COL_NAME_TOKEN,
3184: p_token1_value => 'CONTRACT_ID');
3185: RAISE OKL_API.G_EXCEPTION_ERROR;
3186: END IF;
3187: IF (p_fin_asset_id IS NOT NULL) THEN
3188: get_ship_to_site_use_id(
3189: p_api_version => p_api_version,
3194: p_cust_acct_id => p_cust_acct_id,
3195: p_fin_asset_id => p_fin_asset_id,
3196: x_ship_to_site_use_id => l_ship_to_site_use_id);
3197:
3198: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN -- will never be setting this to unexpecetd inside get_tbc ?
3199: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3200: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3201: RAISE OKL_API.G_EXCEPTION_ERROR;
3202: END IF;
3195: p_fin_asset_id => p_fin_asset_id,
3196: x_ship_to_site_use_id => l_ship_to_site_use_id);
3197:
3198: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN -- will never be setting this to unexpecetd inside get_tbc ?
3199: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3200: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3201: RAISE OKL_API.G_EXCEPTION_ERROR;
3202: END IF;
3203: -- Get the 'SHIP_TO' indetifiers of the asset
3196: x_ship_to_site_use_id => l_ship_to_site_use_id);
3197:
3198: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN -- will never be setting this to unexpecetd inside get_tbc ?
3199: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3200: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3201: RAISE OKL_API.G_EXCEPTION_ERROR;
3202: END IF;
3203: -- Get the 'SHIP_TO' indetifiers of the asset
3204: IF l_ship_to_site_use_id IS NOT NULL THEN
3197:
3198: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN -- will never be setting this to unexpecetd inside get_tbc ?
3199: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3200: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3201: RAISE OKL_API.G_EXCEPTION_ERROR;
3202: END IF;
3203: -- Get the 'SHIP_TO' indetifiers of the asset
3204: IF l_ship_to_site_use_id IS NOT NULL THEN
3205: OPEN l_get_ship_to_ids(l_ship_to_site_use_id);
3250: x_bill_to_location_id := l_bill_to_location_id;
3251: x_bill_to_party_id := l_bill_to_party_id;
3252: x_bill_to_site_use_id := l_bill_to_site_use_id;
3253:
3254: x_return_status := OKL_API.G_RET_STS_SUCCESS;
3255:
3256: IF (G_DEBUG_LEVEL_PROCEDURE >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
3257: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.get_location_party_ids ','End(-)');
3258: END IF;
3257: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.get_location_party_ids ','End(-)');
3258: END IF;
3259:
3260: EXCEPTION
3261: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3262: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
3263: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_location_party_ids ',
3264: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
3265: END IF;
3260: EXCEPTION
3261: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3262: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
3263: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_location_party_ids ',
3264: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
3265: END IF;
3266:
3267: IF l_get_ship_to_ids%ISOPEN THEN
3268: CLOSE l_get_ship_to_ids;
3275: IF l_get_chr_bill_to_ids%ISOPEN THEN
3276: CLOSE l_get_chr_bill_to_ids;
3277: END IF;
3278:
3279: x_return_status := OKL_API.G_RET_STS_ERROR;
3280: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3281: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
3282: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_location_party_ids ',
3283: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
3276: CLOSE l_get_chr_bill_to_ids;
3277: END IF;
3278:
3279: x_return_status := OKL_API.G_RET_STS_ERROR;
3280: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3281: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
3282: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_location_party_ids ',
3283: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
3284: END IF;
3279: x_return_status := OKL_API.G_RET_STS_ERROR;
3280: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3281: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
3282: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_location_party_ids ',
3283: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
3284: END IF;
3285:
3286: IF l_get_ship_to_ids%ISOPEN THEN
3287: CLOSE l_get_ship_to_ids;
3294: IF l_get_chr_bill_to_ids%ISOPEN THEN
3295: CLOSE l_get_chr_bill_to_ids;
3296: END IF;
3297:
3298: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
3299:
3300: WHEN OTHERS THEN
3301: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
3302: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_location_party_ids ',
3314: IF l_get_chr_bill_to_ids%ISOPEN THEN
3315: CLOSE l_get_chr_bill_to_ids;
3316: END IF;
3317:
3318: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
3319: -- unexpected error
3320: OKL_API.set_message(p_app_name => g_app_name,
3321: p_msg_name => g_unexpected_error,
3322: p_token1 => g_sqlcode_token,
3316: END IF;
3317:
3318: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
3319: -- unexpected error
3320: OKL_API.set_message(p_app_name => g_app_name,
3321: p_msg_name => g_unexpected_error,
3322: p_token1 => g_sqlcode_token,
3323: p_token1_value => sqlcode,
3324: p_token2 => g_sqlerrm_token,
3741: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.get_tbc_code.',
3742: 'l_tbc_code '||l_tbc_code);
3743: END IF;
3744:
3745: x_return_status := OKL_API.G_RET_STS_SUCCESS;
3746:
3747: -- TBC can be NULL
3748: x_tbc_code := l_tbc_code;
3749:
3747: -- TBC can be NULL
3748: x_tbc_code := l_tbc_code;
3749:
3750: EXCEPTION
3751: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3752:
3753: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
3754: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_tbc_code ',
3755: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
3751: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3752:
3753: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
3754: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_tbc_code ',
3755: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
3756: END IF;
3757:
3758: IF l_tbcdef_csr%ISOPEN THEN
3759: CLOSE l_tbcdef_csr;
3758: IF l_tbcdef_csr%ISOPEN THEN
3759: CLOSE l_tbcdef_csr;
3760: END IF;
3761:
3762: x_return_status := OKL_API.G_RET_STS_ERROR;
3763: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3764:
3765: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
3766: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_tbc_code ',
3759: CLOSE l_tbcdef_csr;
3760: END IF;
3761:
3762: x_return_status := OKL_API.G_RET_STS_ERROR;
3763: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3764:
3765: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
3766: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_tbc_code ',
3767: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
3763: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3764:
3765: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
3766: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_tbc_code ',
3767: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
3768: END IF;
3769:
3770: IF l_tbcdef_csr%ISOPEN THEN
3771: CLOSE l_tbcdef_csr;
3770: IF l_tbcdef_csr%ISOPEN THEN
3771: CLOSE l_tbcdef_csr;
3772: END IF;
3773:
3774: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
3775:
3776: WHEN OTHERS THEN
3777: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
3778: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_tbc_code ',
3782: IF l_tbcdef_csr%ISOPEN THEN
3783: CLOSE l_tbcdef_csr;
3784: END IF;
3785:
3786: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
3787: -- unexpected error
3788: OKL_API.set_message(p_app_name => g_app_name,
3789: p_msg_name => g_unexpected_error,
3790: p_token1 => g_sqlcode_token,
3784: END IF;
3785:
3786: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
3787: -- unexpected error
3788: OKL_API.set_message(p_app_name => g_app_name,
3789: p_msg_name => g_unexpected_error,
3790: p_token1 => g_sqlcode_token,
3791: p_token1_value => sqlcode,
3792: p_token2 => g_sqlerrm_token,
4362: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.get_pc_code.',
4363: 'l_pc_code '||l_pc_code);
4364: END IF;
4365:
4366: x_return_status := OKL_API.G_RET_STS_SUCCESS;
4367:
4368: -- PC can be null
4369: x_pc_code := l_pc_code;
4370:
4368: -- PC can be null
4369: x_pc_code := l_pc_code;
4370:
4371: EXCEPTION
4372: WHEN OKL_API.G_EXCEPTION_ERROR THEN
4373:
4374: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
4375: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_pc_code ',
4376: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
4372: WHEN OKL_API.G_EXCEPTION_ERROR THEN
4373:
4374: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
4375: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_pc_code ',
4376: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
4377: END IF;
4378:
4379: IF l_pcdef_csr%ISOPEN THEN
4380: CLOSE l_pcdef_csr;
4379: IF l_pcdef_csr%ISOPEN THEN
4380: CLOSE l_pcdef_csr;
4381: END IF;
4382:
4383: x_return_status := OKL_API.G_RET_STS_ERROR;
4384: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4385:
4386: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
4387: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_pc_code ',
4380: CLOSE l_pcdef_csr;
4381: END IF;
4382:
4383: x_return_status := OKL_API.G_RET_STS_ERROR;
4384: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4385:
4386: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
4387: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_pc_code ',
4388: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
4384: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4385:
4386: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
4387: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_pc_code ',
4388: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
4389: END IF;
4390:
4391: IF l_pcdef_csr%ISOPEN THEN
4392: CLOSE l_pcdef_csr;
4391: IF l_pcdef_csr%ISOPEN THEN
4392: CLOSE l_pcdef_csr;
4393: END IF;
4394:
4395: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
4396:
4397: WHEN OTHERS THEN
4398: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
4399: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_pc_code ',
4403: IF l_pcdef_csr%ISOPEN THEN
4404: CLOSE l_pcdef_csr;
4405: END IF;
4406:
4407: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
4408: -- unexpected error
4409: OKL_API.set_message(p_app_name => g_app_name,
4410: p_msg_name => g_unexpected_error,
4411: p_token1 => g_sqlcode_token,
4405: END IF;
4406:
4407: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
4408: -- unexpected error
4409: OKL_API.set_message(p_app_name => g_app_name,
4410: p_msg_name => g_unexpected_error,
4411: p_token1 => g_sqlcode_token,
4412: p_token1_value => sqlcode,
4413: p_token2 => g_sqlerrm_token,
4480: p_term_quote_reason_code IN VARCHAR2 DEFAULT NULL,
4481: p_tax_country_code IN VARCHAR2,
4482: x_ufc_code OUT NOCOPY VARCHAR2) IS
4483:
4484: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
4485:
4486: -- Get all the UFC definitions applicable to a transaction type
4487: CURSOR l_ufcdef_csr(cp_try_id IN NUMBER) IS
4488: SELECT result_code ufc_code,
4563: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.get_ufc_code.',
4564: 'p_tax_country_code :'|| p_tax_country_code);
4565: END IF;
4566:
4567: x_return_status := OKL_API.G_RET_STS_SUCCESS;
4568:
4569: OPEN l_ufcdef_csr(p_try_id);
4570: FETCH l_ufcdef_csr BULK COLLECT INTO l_ufcdefs_tbl;
4571: CLOSE l_ufcdef_csr;
5445: -- UFC can be NULL
5446: x_ufc_code := l_ufc_code;
5447:
5448: EXCEPTION
5449: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5450:
5451: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
5452: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_ufc_code ',
5453: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
5449: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5450:
5451: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
5452: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_ufc_code ',
5453: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
5454: END IF;
5455:
5456: IF l_ufcdef_csr%ISOPEN THEN
5457: CLOSE l_ufcdef_csr;
5456: IF l_ufcdef_csr%ISOPEN THEN
5457: CLOSE l_ufcdef_csr;
5458: END IF;
5459:
5460: x_return_status := OKL_API.G_RET_STS_ERROR;
5461: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5462:
5463: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
5464: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_ufc_code ',
5457: CLOSE l_ufcdef_csr;
5458: END IF;
5459:
5460: x_return_status := OKL_API.G_RET_STS_ERROR;
5461: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5462:
5463: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
5464: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_ufc_code ',
5465: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
5461: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5462:
5463: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
5464: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_ufc_code ',
5465: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
5466: END IF;
5467:
5468: IF l_ufcdef_csr%ISOPEN THEN
5469: CLOSE l_ufcdef_csr;
5468: IF l_ufcdef_csr%ISOPEN THEN
5469: CLOSE l_ufcdef_csr;
5470: END IF;
5471:
5472: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
5473:
5474: WHEN OTHERS THEN
5475: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
5476: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_ufc_code ',
5481: CLOSE l_ufcdef_csr;
5482: END IF;
5483:
5484:
5485: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
5486: -- unexpected error
5487: OKL_API.set_message(p_app_name => g_app_name,
5488: p_msg_name => g_unexpected_error,
5489: p_token1 => g_sqlcode_token,
5483:
5484:
5485: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
5486: -- unexpected error
5487: OKL_API.set_message(p_app_name => g_app_name,
5488: p_msg_name => g_unexpected_error,
5489: p_token1 => g_sqlcode_token,
5490: p_token1_value => sqlcode,
5491: p_token2 => g_sqlerrm_token,
5709: p_book_class_code => p_book_class_code,
5710: p_tax_country_code => p_tax_src_params_rec.default_taxation_country,
5711: x_tbc_code => lx_tbc_code);
5712:
5713: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5714: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5715: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5716: RAISE OKL_API.G_EXCEPTION_ERROR;
5717: END IF;
5710: p_tax_country_code => p_tax_src_params_rec.default_taxation_country,
5711: x_tbc_code => lx_tbc_code);
5712:
5713: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5714: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5715: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5716: RAISE OKL_API.G_EXCEPTION_ERROR;
5717: END IF;
5718:
5711: x_tbc_code => lx_tbc_code);
5712:
5713: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5714: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5715: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5716: RAISE OKL_API.G_EXCEPTION_ERROR;
5717: END IF;
5718:
5719: -- Validate TBC Code
5712:
5713: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5714: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5715: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5716: RAISE OKL_API.G_EXCEPTION_ERROR;
5717: END IF;
5718:
5719: -- Validate TBC Code
5720: IF lx_tbc_code IS NOT NULL THEN
5727: p_trx_date => p_tax_src_params_rec.trx_date,
5728: p_tbc_code => lx_tbc_code,
5729: x_valid_code => lx_tax_valid_code); -- 'S' --> Success, 'F' --> Failure
5730:
5731: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5732: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5733: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5734: RAISE OKL_API.G_EXCEPTION_ERROR;
5735: END IF;
5728: p_tbc_code => lx_tbc_code,
5729: x_valid_code => lx_tax_valid_code); -- 'S' --> Success, 'F' --> Failure
5730:
5731: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5732: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5733: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5734: RAISE OKL_API.G_EXCEPTION_ERROR;
5735: END IF;
5736: END IF;
5729: x_valid_code => lx_tax_valid_code); -- 'S' --> Success, 'F' --> Failure
5730:
5731: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5732: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5733: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5734: RAISE OKL_API.G_EXCEPTION_ERROR;
5735: END IF;
5736: END IF;
5737:
5730:
5731: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5732: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5733: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5734: RAISE OKL_API.G_EXCEPTION_ERROR;
5735: END IF;
5736: END IF;
5737:
5738: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
5769: p_lease_purchased_code => p_lease_purchased_code,
5770: p_tax_country_code => p_tax_src_params_rec.default_taxation_country,
5771: x_pc_code => lx_pc_code);
5772:
5773: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5774: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5775: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5776: RAISE OKL_API.G_EXCEPTION_ERROR;
5777: END IF;
5770: p_tax_country_code => p_tax_src_params_rec.default_taxation_country,
5771: x_pc_code => lx_pc_code);
5772:
5773: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5774: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5775: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5776: RAISE OKL_API.G_EXCEPTION_ERROR;
5777: END IF;
5778:
5771: x_pc_code => lx_pc_code);
5772:
5773: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5774: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5775: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5776: RAISE OKL_API.G_EXCEPTION_ERROR;
5777: END IF;
5778:
5779: -- Validate PC Code
5772:
5773: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5774: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5775: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5776: RAISE OKL_API.G_EXCEPTION_ERROR;
5777: END IF;
5778:
5779: -- Validate PC Code
5780: IF lx_pc_code IS NOT NULL THEN
5791: IF (lx_tax_valid_code = 'F') THEN
5792: lx_pc_code := null;
5793: END IF;
5794:
5795: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5796: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5797: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5798: RAISE OKL_API.G_EXCEPTION_ERROR;
5799: END IF;
5792: lx_pc_code := null;
5793: END IF;
5794:
5795: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5796: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5797: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5798: RAISE OKL_API.G_EXCEPTION_ERROR;
5799: END IF;
5800: END IF;
5793: END IF;
5794:
5795: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5796: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5797: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5798: RAISE OKL_API.G_EXCEPTION_ERROR;
5799: END IF;
5800: END IF;
5801:
5794:
5795: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5796: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5797: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5798: RAISE OKL_API.G_EXCEPTION_ERROR;
5799: END IF;
5800: END IF;
5801:
5802: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
5832: p_term_quote_reason_code => p_term_quote_reason_code,
5833: p_tax_country_code => p_tax_src_params_rec.default_taxation_country,
5834: x_ufc_code => lx_ufc_code);
5835:
5836: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5837: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5838: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5839: RAISE OKL_API.G_EXCEPTION_ERROR;
5840: END IF;
5833: p_tax_country_code => p_tax_src_params_rec.default_taxation_country,
5834: x_ufc_code => lx_ufc_code);
5835:
5836: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5837: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5838: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5839: RAISE OKL_API.G_EXCEPTION_ERROR;
5840: END IF;
5841:
5834: x_ufc_code => lx_ufc_code);
5835:
5836: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5837: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5838: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5839: RAISE OKL_API.G_EXCEPTION_ERROR;
5840: END IF;
5841:
5842: -- Validate UFC Code
5835:
5836: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5837: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5838: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5839: RAISE OKL_API.G_EXCEPTION_ERROR;
5840: END IF;
5841:
5842: -- Validate UFC Code
5843: IF lx_ufc_code IS NOT NULL THEN
5854: IF (lx_tax_valid_code = 'F') THEN
5855: lx_ufc_code := null;
5856: END IF;
5857:
5858: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5859: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5860: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5861: RAISE OKL_API.G_EXCEPTION_ERROR;
5862: END IF;
5855: lx_ufc_code := null;
5856: END IF;
5857:
5858: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5859: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5860: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5861: RAISE OKL_API.G_EXCEPTION_ERROR;
5862: END IF;
5863: END IF;
5856: END IF;
5857:
5858: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5859: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5860: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5861: RAISE OKL_API.G_EXCEPTION_ERROR;
5862: END IF;
5863: END IF;
5864:
5857:
5858: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5859: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5860: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5861: RAISE OKL_API.G_EXCEPTION_ERROR;
5862: END IF;
5863: END IF;
5864:
5865: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
5979: p_additional_parameters => l_add_params,
5980: x_formula_value => l_assessable_value, --OVERRIDEN TAXABLE BASIS
5981: x_return_status => x_return_status);
5982:
5983: IF (x_return_status IN (OKL_API.G_RET_STS_UNEXP_ERROR, OKL_API.G_RET_STS_ERROR)) THEN
5984: OKL_API.init_msg_list('T');
5985: OKL_API.set_message(p_app_name => 'OKL',
5986: p_msg_name => 'OKL_TX_FRM_TXN_ERR',
5987: p_token1 => 'FMA_NAME',
5980: x_formula_value => l_assessable_value, --OVERRIDEN TAXABLE BASIS
5981: x_return_status => x_return_status);
5982:
5983: IF (x_return_status IN (OKL_API.G_RET_STS_UNEXP_ERROR, OKL_API.G_RET_STS_ERROR)) THEN
5984: OKL_API.init_msg_list('T');
5985: OKL_API.set_message(p_app_name => 'OKL',
5986: p_msg_name => 'OKL_TX_FRM_TXN_ERR',
5987: p_token1 => 'FMA_NAME',
5988: p_token1_value => p_formula_name,
5981: x_return_status => x_return_status);
5982:
5983: IF (x_return_status IN (OKL_API.G_RET_STS_UNEXP_ERROR, OKL_API.G_RET_STS_ERROR)) THEN
5984: OKL_API.init_msg_list('T');
5985: OKL_API.set_message(p_app_name => 'OKL',
5986: p_msg_name => 'OKL_TX_FRM_TXN_ERR',
5987: p_token1 => 'FMA_NAME',
5988: p_token1_value => p_formula_name,
5989: p_token2 => 'TRX_NAME ',
5987: p_token1 => 'FMA_NAME',
5988: p_token1_value => p_formula_name,
5989: p_token2 => 'TRX_NAME ',
5990: p_token2_value => p_source_trx_name);
5991: RAISE OKL_API.G_EXCEPTION_ERROR;
5992: END IF;
5993:
5994: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
5995: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_info.',
6036: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_info.',
6037: 'Return Status '|| x_return_status);
6038: END IF;
6039:
6040: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6041: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6042: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6043: RAISE OKL_API.G_EXCEPTION_ERROR;
6044: END IF;
6037: 'Return Status '|| x_return_status);
6038: END IF;
6039:
6040: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6041: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6042: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6043: RAISE OKL_API.G_EXCEPTION_ERROR;
6044: END IF;
6045:
6038: END IF;
6039:
6040: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6041: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6042: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6043: RAISE OKL_API.G_EXCEPTION_ERROR;
6044: END IF;
6045:
6046: IF (p_source_trx_name = 'Asset Relocation' AND
6039:
6040: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6041: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6042: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6043: RAISE OKL_API.G_EXCEPTION_ERROR;
6044: END IF;
6045:
6046: IF (p_source_trx_name = 'Asset Relocation' AND
6047: p_tax_src_params_rec.alc_serialized_yn = 'Y' AND
6287: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_info ','End(-)');
6288: END IF;
6289:
6290: EXCEPTION
6291: WHEN OKL_API.G_EXCEPTION_ERROR THEN
6292: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6293: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_info ',
6294: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
6295: END IF;
6290: EXCEPTION
6291: WHEN OKL_API.G_EXCEPTION_ERROR THEN
6292: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6293: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_info ',
6294: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
6295: END IF;
6296:
6297: IF (c_get_set_of_books_id%ISOPEN) THEN
6298: CLOSE c_get_set_of_books_id;
6297: IF (c_get_set_of_books_id%ISOPEN) THEN
6298: CLOSE c_get_set_of_books_id;
6299: END IF;
6300:
6301: x_return_status := OKL_API.G_RET_STS_ERROR;
6302: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
6303: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6304: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_info ',
6305: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
6298: CLOSE c_get_set_of_books_id;
6299: END IF;
6300:
6301: x_return_status := OKL_API.G_RET_STS_ERROR;
6302: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
6303: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6304: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_info ',
6305: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
6306: END IF;
6301: x_return_status := OKL_API.G_RET_STS_ERROR;
6302: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
6303: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6304: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_info ',
6305: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
6306: END IF;
6307:
6308: IF (c_get_set_of_books_id%ISOPEN) THEN
6309: CLOSE c_get_set_of_books_id;
6308: IF (c_get_set_of_books_id%ISOPEN) THEN
6309: CLOSE c_get_set_of_books_id;
6310: END IF;
6311:
6312: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
6313:
6314: WHEN OTHERS THEN
6315: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6316: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_info ',
6320: IF (c_get_set_of_books_id%ISOPEN) THEN
6321: CLOSE c_get_set_of_books_id;
6322: END IF;
6323:
6324: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
6325: -- unexpected error
6326: OKL_API.set_message(p_app_name => g_app_name,
6327: p_msg_name => g_unexpected_error,
6328: p_token1 => g_sqlcode_token,
6322: END IF;
6323:
6324: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
6325: -- unexpected error
6326: OKL_API.set_message(p_app_name => g_app_name,
6327: p_msg_name => g_unexpected_error,
6328: p_token1 => g_sqlcode_token,
6329: p_token1_value => sqlcode,
6330: p_token2 => g_sqlerrm_token,
6447: p_book_class_code => p_book_class_code,
6448: p_tax_country_code => p_tax_country_code,
6449: x_tbc_code => lx_tbc_code);
6450:
6451: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6452: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6453: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6454: RAISE OKL_API.G_EXCEPTION_ERROR;
6455: END IF;
6448: p_tax_country_code => p_tax_country_code,
6449: x_tbc_code => lx_tbc_code);
6450:
6451: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6452: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6453: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6454: RAISE OKL_API.G_EXCEPTION_ERROR;
6455: END IF;
6456:
6449: x_tbc_code => lx_tbc_code);
6450:
6451: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6452: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6453: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6454: RAISE OKL_API.G_EXCEPTION_ERROR;
6455: END IF;
6456:
6457: -- Validate TBC Code
6450:
6451: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6452: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6453: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6454: RAISE OKL_API.G_EXCEPTION_ERROR;
6455: END IF;
6456:
6457: -- Validate TBC Code
6458: IF lx_tbc_code IS NOT NULL THEN
6465: p_trx_date => p_trx_date,
6466: p_tbc_code => lx_tbc_code,
6467: x_valid_code => lx_tax_valid_code); -- 'S' --> Success, 'F' --> Failure
6468:
6469: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6470: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6471: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6472: RAISE OKL_API.G_EXCEPTION_ERROR;
6473: END IF;
6466: p_tbc_code => lx_tbc_code,
6467: x_valid_code => lx_tax_valid_code); -- 'S' --> Success, 'F' --> Failure
6468:
6469: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6470: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6471: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6472: RAISE OKL_API.G_EXCEPTION_ERROR;
6473: END IF;
6474: END IF;
6467: x_valid_code => lx_tax_valid_code); -- 'S' --> Success, 'F' --> Failure
6468:
6469: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6470: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6471: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6472: RAISE OKL_API.G_EXCEPTION_ERROR;
6473: END IF;
6474: END IF;
6475:
6468:
6469: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6470: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6471: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6472: RAISE OKL_API.G_EXCEPTION_ERROR;
6473: END IF;
6474: END IF;
6475:
6476: -- Get the first level determinant for TBC basing on transaction, if the value is null
6497: p_lease_purchased_code => p_lease_purchased_code,
6498: p_tax_country_code => p_tax_country_code,
6499: x_pc_code => lx_pc_code);
6500:
6501: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6502: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6503: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6504: RAISE OKL_API.G_EXCEPTION_ERROR;
6505: END IF;
6498: p_tax_country_code => p_tax_country_code,
6499: x_pc_code => lx_pc_code);
6500:
6501: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6502: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6503: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6504: RAISE OKL_API.G_EXCEPTION_ERROR;
6505: END IF;
6506:
6499: x_pc_code => lx_pc_code);
6500:
6501: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6502: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6503: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6504: RAISE OKL_API.G_EXCEPTION_ERROR;
6505: END IF;
6506:
6507: -- Validate PC Code
6500:
6501: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6502: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6503: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6504: RAISE OKL_API.G_EXCEPTION_ERROR;
6505: END IF;
6506:
6507: -- Validate PC Code
6508: IF lx_pc_code IS NOT NULL THEN
6519: IF (lx_tax_valid_code = 'F') THEN
6520: lx_pc_code := null;
6521: END IF;
6522:
6523: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6524: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6525: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6526: RAISE OKL_API.G_EXCEPTION_ERROR;
6527: END IF;
6520: lx_pc_code := null;
6521: END IF;
6522:
6523: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6524: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6525: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6526: RAISE OKL_API.G_EXCEPTION_ERROR;
6527: END IF;
6528: END IF;
6521: END IF;
6522:
6523: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6524: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6525: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6526: RAISE OKL_API.G_EXCEPTION_ERROR;
6527: END IF;
6528: END IF;
6529:
6522:
6523: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6524: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6525: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6526: RAISE OKL_API.G_EXCEPTION_ERROR;
6527: END IF;
6528: END IF;
6529:
6530: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6553: p_term_quote_reason_code => null,
6554: p_tax_country_code => p_tax_country_code,
6555: x_ufc_code => lx_ufc_code);
6556:
6557: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6558: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6559: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6560: RAISE OKL_API.G_EXCEPTION_ERROR;
6561: END IF;
6554: p_tax_country_code => p_tax_country_code,
6555: x_ufc_code => lx_ufc_code);
6556:
6557: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6558: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6559: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6560: RAISE OKL_API.G_EXCEPTION_ERROR;
6561: END IF;
6562:
6555: x_ufc_code => lx_ufc_code);
6556:
6557: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6558: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6559: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6560: RAISE OKL_API.G_EXCEPTION_ERROR;
6561: END IF;
6562:
6563: -- Validate UFC Code
6556:
6557: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6558: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6559: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6560: RAISE OKL_API.G_EXCEPTION_ERROR;
6561: END IF;
6562:
6563: -- Validate UFC Code
6564: IF lx_ufc_code IS NOT NULL THEN
6575: IF (lx_tax_valid_code = 'F') THEN
6576: lx_ufc_code := null;
6577: END IF;
6578:
6579: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6580: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6581: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6582: RAISE OKL_API.G_EXCEPTION_ERROR;
6583: END IF;
6576: lx_ufc_code := null;
6577: END IF;
6578:
6579: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6580: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6581: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6582: RAISE OKL_API.G_EXCEPTION_ERROR;
6583: END IF;
6584: END IF;
6577: END IF;
6578:
6579: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6580: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6581: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6582: RAISE OKL_API.G_EXCEPTION_ERROR;
6583: END IF;
6584: END IF;
6585:
6578:
6579: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6580: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6581: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6582: RAISE OKL_API.G_EXCEPTION_ERROR;
6583: END IF;
6584: END IF;
6585:
6586: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6618: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_codes.',
6619: 'Return Status '|| x_return_status);
6620: END IF;
6621:
6622: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6623: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6624: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6625: RAISE OKL_API.G_EXCEPTION_ERROR;
6626: END IF;
6619: 'Return Status '|| x_return_status);
6620: END IF;
6621:
6622: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6623: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6624: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6625: RAISE OKL_API.G_EXCEPTION_ERROR;
6626: END IF;
6627:
6620: END IF;
6621:
6622: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6623: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6624: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6625: RAISE OKL_API.G_EXCEPTION_ERROR;
6626: END IF;
6627:
6628: px_tax_codes_tbl(p_tax_code_cnt).khr_id := p_khr_id;
6621:
6622: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6623: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6624: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6625: RAISE OKL_API.G_EXCEPTION_ERROR;
6626: END IF;
6627:
6628: px_tax_codes_tbl(p_tax_code_cnt).khr_id := p_khr_id;
6629: px_tax_codes_tbl(p_tax_code_cnt).kle_id := p_kle_id;
6637: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_codes ','End(-)');
6638: END IF;
6639:
6640: EXCEPTION
6641: WHEN OKL_API.G_EXCEPTION_ERROR THEN
6642: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6643: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_codes ',
6644: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
6645: END IF;
6640: EXCEPTION
6641: WHEN OKL_API.G_EXCEPTION_ERROR THEN
6642: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6643: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_codes ',
6644: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
6645: END IF;
6646:
6647: IF (c_get_set_of_books_id%ISOPEN) THEN
6648: CLOSE c_get_set_of_books_id;
6647: IF (c_get_set_of_books_id%ISOPEN) THEN
6648: CLOSE c_get_set_of_books_id;
6649: END IF;
6650:
6651: x_return_status := OKL_API.G_RET_STS_ERROR;
6652:
6653: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
6654: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6655: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_codes ',
6649: END IF;
6650:
6651: x_return_status := OKL_API.G_RET_STS_ERROR;
6652:
6653: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
6654: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6655: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_codes ',
6656: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
6657: END IF;
6652:
6653: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
6654: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6655: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_codes ',
6656: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
6657: END IF;
6658:
6659: IF (c_get_set_of_books_id%ISOPEN) THEN
6660: CLOSE c_get_set_of_books_id;
6659: IF (c_get_set_of_books_id%ISOPEN) THEN
6660: CLOSE c_get_set_of_books_id;
6661: END IF;
6662:
6663: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
6664:
6665: WHEN OTHERS THEN
6666:
6667: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6672: IF (c_get_set_of_books_id%ISOPEN) THEN
6673: CLOSE c_get_set_of_books_id;
6674: END IF;
6675:
6676: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
6677:
6678: OKL_API.set_message(p_app_name => g_app_name,
6679: p_msg_name => g_unexpected_error,
6680: p_token1 => g_sqlcode_token,
6674: END IF;
6675:
6676: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
6677:
6678: OKL_API.set_message(p_app_name => g_app_name,
6679: p_msg_name => g_unexpected_error,
6680: p_token1 => g_sqlcode_token,
6681: p_token1_value => sqlcode,
6682: p_token2 => g_sqlerrm_token,
6785: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.get_billing_stream_types.',
6786: 'p_sty_code :'||p_sty_code);
6787: END IF;
6788:
6789: x_return_status := OKL_API.G_RET_STS_SUCCESS;
6790:
6791: -- Check if any stream generation template set exists for this OU
6792: OPEN l_stgentmptsets_csr(p_org_id);
6793: FETCH l_stgentmptsets_csr INTO l_id;
6897: END IF;
6898:
6899:
6900: EXCEPTION
6901: WHEN OKL_API.G_EXCEPTION_ERROR THEN
6902: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6903: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_billing_stream_types ',
6904: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
6905: END IF;
6900: EXCEPTION
6901: WHEN OKL_API.G_EXCEPTION_ERROR THEN
6902: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6903: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_billing_stream_types ',
6904: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
6905: END IF;
6906:
6907:
6908: IF l_strmtype_csr%ISOPEN THEN
6920: IF l_stgentmptlns_csr%ISOPEN THEN
6921: CLOSE l_stgentmptlns_csr;
6922: END IF;
6923:
6924: x_return_status := OKL_API.G_RET_STS_ERROR;
6925: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
6926: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6927: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_billing_stream_types ',
6928: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
6921: CLOSE l_stgentmptlns_csr;
6922: END IF;
6923:
6924: x_return_status := OKL_API.G_RET_STS_ERROR;
6925: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
6926: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6927: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_billing_stream_types ',
6928: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
6929: END IF;
6924: x_return_status := OKL_API.G_RET_STS_ERROR;
6925: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
6926: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6927: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_billing_stream_types ',
6928: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
6929: END IF;
6930:
6931: IF l_strmtype_csr%ISOPEN THEN
6932: CLOSE l_strmtype_csr;
6943: IF l_stgentmptlns_csr%ISOPEN THEN
6944: CLOSE l_stgentmptlns_csr;
6945: END IF;
6946:
6947: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
6948:
6949: WHEN OTHERS THEN
6950: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6951: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_billing_stream_types ',
6967: IF l_stgentmptlns_csr%ISOPEN THEN
6968: CLOSE l_stgentmptlns_csr;
6969: END IF;
6970:
6971: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
6972: -- unexpected error
6973: OKL_API.set_message(p_app_name => g_app_name,
6974: p_msg_name => g_unexpected_error,
6975: p_token1 => g_sqlcode_token,
6969: END IF;
6970:
6971: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
6972: -- unexpected error
6973: OKL_API.set_message(p_app_name => g_app_name,
6974: p_msg_name => g_unexpected_error,
6975: p_token1 => g_sqlcode_token,
6976: p_token1_value => sqlcode,
6977: p_token2 => g_sqlerrm_token,
7084: WHERE id = cp_khr_id;
7085:
7086: l_cust_trx_type_id NUMBER;
7087:
7088: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
7089: l_precision NUMBER;
7090: l_minimum_accountable_unit NUMBER;
7091:
7092: l_rulv_rec okl_rule_pub.rulv_rec_type;
7140: OKC_API.set_message( p_app_name => 'OKC',
7141: p_msg_name => G_INVALID_VALUE,
7142: p_token1 => G_COL_NAME_TOKEN,
7143: p_token1_value => 'KHR_ID');
7144: RAISE OKL_API.G_EXCEPTION_ERROR;
7145: END IF;
7146: CLOSE c_get_contractinfo_csr;
7147:
7148: IF l_get_contractinfo_rec.currency_code IS NULL THEN
7150: p_msg_name => G_REQUIRED_VALUE,
7151: p_token1 => G_COL_NAME_TOKEN,
7152: p_token1_value => 'CURRENCY_CODE');
7153:
7154: RAISE OKL_API.G_EXCEPTION_ERROR;
7155: END IF;
7156:
7157: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
7158: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.get_k_hdr_tax_params.',
7176: p_msg_name => G_INVALID_VALUE,
7177: p_token1 => G_COL_NAME_TOKEN,
7178: p_token1_value => 'CURRENCY_CODE');
7179:
7180: RAISE OKL_API.G_EXCEPTION_ERROR;
7181: END IF;
7182: CLOSE l_fndcurrency_csr;
7183:
7184: -- get the AR cust trx type ID
7190: p_msg_name => G_REQUIRED_VALUE,
7191: p_token1 => G_COL_NAME_TOKEN,
7192: p_token1_value => 'CUST_TRX_TYPE_ID');
7193:
7194: RAISE OKL_API.G_EXCEPTION_ERROR;
7195: END IF;
7196: CLOSE l_racusttrxtypes_csr;
7197:
7198:
7220: OKC_API.set_message( p_app_name => 'OKC',
7221: p_msg_name => G_REQUIRED_VALUE,
7222: p_token1 => G_COL_NAME_TOKEN,
7223: p_token1_value => 'Financial Product');
7224: RAISE OKL_API.G_EXCEPTION_ERROR;
7225: END IF;
7226:
7227: IF p_source_trx_name = 'Estimated Billing' AND p_source_table = 'OKL_TRX_QUOTES_B' THEN -- Termination/Repurchase quote creation/updation
7228: IF p_qtp_code LIKE 'TER%' THEN
7240: ,x_return_status => x_return_status
7241: ,x_msg_count => x_msg_count
7242: ,x_msg_data => x_msg_data);
7243:
7244: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7245: -- Rule instance is found
7246: IF (l_rulv_rec.rule_information11 IS NOT NULL) AND (l_rulv_rec.rule_information11 <> OKL_API.G_MISS_CHAR) THEN
7247:
7248: l_prch_opt_det := l_rulv_rec.rule_information11; -- It can have a value 'NONE' which is OK
7242: ,x_msg_data => x_msg_data);
7243:
7244: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7245: -- Rule instance is found
7246: IF (l_rulv_rec.rule_information11 IS NOT NULL) AND (l_rulv_rec.rule_information11 <> OKL_API.G_MISS_CHAR) THEN
7247:
7248: l_prch_opt_det := l_rulv_rec.rule_information11; -- It can have a value 'NONE' which is OK
7249:
7250: END IF;
7264: ,x_return_status => x_return_status
7265: ,x_msg_count => x_msg_count
7266: ,x_msg_data => x_msg_data);
7267:
7268: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7269: -- Rule instance is found
7270: IF (l_rulv_rec.rule_information11 IS NOT NULL) AND (l_rulv_rec.rule_information11 <> OKL_API.G_MISS_CHAR) THEN
7271:
7272: l_prch_opt_det := l_rulv_rec.rule_information11; -- It can have a value 'NONE' which is OK
7266: ,x_msg_data => x_msg_data);
7267:
7268: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7269: -- Rule instance is found
7270: IF (l_rulv_rec.rule_information11 IS NOT NULL) AND (l_rulv_rec.rule_information11 <> OKL_API.G_MISS_CHAR) THEN
7271:
7272: l_prch_opt_det := l_rulv_rec.rule_information11; -- It can have a value 'NONE' which is OK
7273:
7274: END IF;
7289: ,x_return_status => x_return_status
7290: ,x_msg_count => x_msg_count
7291: ,x_msg_data => x_msg_data);
7292:
7293: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7294: -- Rule instance is found
7295: IF (l_rulv_rec.rule_information2 IS NOT NULL) AND (l_rulv_rec.rule_information2 <> OKL_API.G_MISS_CHAR) THEN
7296:
7297: l_int_disclosed_det := l_rulv_rec.rule_information2;
7291: ,x_msg_data => x_msg_data);
7292:
7293: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7294: -- Rule instance is found
7295: IF (l_rulv_rec.rule_information2 IS NOT NULL) AND (l_rulv_rec.rule_information2 <> OKL_API.G_MISS_CHAR) THEN
7296:
7297: l_int_disclosed_det := l_rulv_rec.rule_information2;
7298: ELSE -- interest diclosed is optional on the contract
7299:
7302:
7303: ELSE -- interest diclosed is optional on the contract
7304:
7305: l_int_disclosed_det := 'N';
7306: x_return_status := OKL_API.G_RET_STS_SUCCESS;
7307: END IF;
7308: ----
7309:
7310: ELSE -- repurchase quote creation / updation
7329: ,x_return_status => x_return_status
7330: ,x_msg_count => x_msg_count
7331: ,x_msg_data => x_msg_data);
7332:
7333: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7334: -- Rule instance is found
7335: IF (l_rulv_rec.rule_information11 IS NOT NULL) AND (l_rulv_rec.rule_information11 <> OKL_API.G_MISS_CHAR) THEN
7336:
7337: l_prch_opt_det := l_rulv_rec.rule_information11; -- It can have a value 'NONE' which is OK
7331: ,x_msg_data => x_msg_data);
7332:
7333: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7334: -- Rule instance is found
7335: IF (l_rulv_rec.rule_information11 IS NOT NULL) AND (l_rulv_rec.rule_information11 <> OKL_API.G_MISS_CHAR) THEN
7336:
7337: l_prch_opt_det := l_rulv_rec.rule_information11; -- It can have a value 'NONE' which is OK
7338:
7339: END IF;
7353: ,x_return_status => x_return_status
7354: ,x_msg_count => x_msg_count
7355: ,x_msg_data => x_msg_data);
7356:
7357: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7358: -- Rule instance is found
7359: IF (l_rulv_rec.rule_information11 IS NOT NULL) AND (l_rulv_rec.rule_information11 <> OKL_API.G_MISS_CHAR) THEN
7360:
7361: l_prch_opt_det := l_rulv_rec.rule_information11; -- It can have a value 'NONE' which is OK
7355: ,x_msg_data => x_msg_data);
7356:
7357: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7358: -- Rule instance is found
7359: IF (l_rulv_rec.rule_information11 IS NOT NULL) AND (l_rulv_rec.rule_information11 <> OKL_API.G_MISS_CHAR) THEN
7360:
7361: l_prch_opt_det := l_rulv_rec.rule_information11; -- It can have a value 'NONE' which is OK
7362:
7363: END IF;
7377: ,x_return_status => x_return_status
7378: ,x_msg_count => x_msg_count
7379: ,x_msg_data => x_msg_data);
7380:
7381: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7382: -- Rule instance is found
7383: IF (l_rulv_rec.rule_information2 IS NOT NULL) AND (l_rulv_rec.rule_information2 <> OKL_API.G_MISS_CHAR) THEN
7384:
7385: l_int_disclosed_det := l_rulv_rec.rule_information2;
7379: ,x_msg_data => x_msg_data);
7380:
7381: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7382: -- Rule instance is found
7383: IF (l_rulv_rec.rule_information2 IS NOT NULL) AND (l_rulv_rec.rule_information2 <> OKL_API.G_MISS_CHAR) THEN
7384:
7385: l_int_disclosed_det := l_rulv_rec.rule_information2;
7386: ELSE -- interest diclosed is optional on the contract
7387:
7390:
7391: ELSE -- interest diclosed is optional on the contract
7392:
7393: l_int_disclosed_det := 'N';
7394: x_return_status := OKL_API.G_RET_STS_SUCCESS;
7395: END IF;
7396: ----
7397: ELSIF p_qtp_code LIKE 'REP%' OR p_purpose_code IN ('AMBSPR','CURE','REPAIR_CHARGE') THEN
7398: -- Repurchase quote billing OR Remk,asset repair or vendor cure billing
7414: ,x_return_status => x_return_status
7415: ,x_msg_count => x_msg_count
7416: ,x_msg_data => x_msg_data);
7417:
7418: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7419: -- Rule instance is found
7420: IF (l_rulv_rec.rule_information11 IS NOT NULL) AND (l_rulv_rec.rule_information11 <> OKL_API.G_MISS_CHAR) THEN
7421:
7422: l_prch_opt_det := l_rulv_rec.rule_information11; -- It can have a value 'NONE' which is OK
7416: ,x_msg_data => x_msg_data);
7417:
7418: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7419: -- Rule instance is found
7420: IF (l_rulv_rec.rule_information11 IS NOT NULL) AND (l_rulv_rec.rule_information11 <> OKL_API.G_MISS_CHAR) THEN
7421:
7422: l_prch_opt_det := l_rulv_rec.rule_information11; -- It can have a value 'NONE' which is OK
7423:
7424: END IF;
7436: ,x_return_status => x_return_status
7437: ,x_msg_count => x_msg_count
7438: ,x_msg_data => x_msg_data);
7439:
7440: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7441: -- Rule instance is found
7442: IF (l_rulv_rec.rule_information2 IS NOT NULL) AND (l_rulv_rec.rule_information2 <> OKL_API.G_MISS_CHAR) THEN
7443:
7444: l_int_disclosed_det := l_rulv_rec.rule_information2;
7438: ,x_msg_data => x_msg_data);
7439:
7440: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7441: -- Rule instance is found
7442: IF (l_rulv_rec.rule_information2 IS NOT NULL) AND (l_rulv_rec.rule_information2 <> OKL_API.G_MISS_CHAR) THEN
7443:
7444: l_int_disclosed_det := l_rulv_rec.rule_information2;
7445: ELSE -- interest diclosed is optional on the contract
7446:
7449:
7450: ELSE -- interest diclosed is optional on the contract
7451:
7452: l_int_disclosed_det := 'N';
7453: x_return_status := OKL_API.G_RET_STS_SUCCESS;
7454: END IF;
7455: -- SECHAWLA 23-NOV-05 4742539 : end
7456:
7457: END IF;
7470: ,x_return_status => x_return_status
7471: ,x_msg_count => x_msg_count
7472: ,x_msg_data => x_msg_data);
7473:
7474: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7475: -- Rule instance is found
7476: IF (l_rulv_rec.rule_information11 IS NOT NULL) AND (l_rulv_rec.rule_information11 <> OKL_API.G_MISS_CHAR) THEN
7477:
7478: l_prch_opt_det := l_rulv_rec.rule_information11; -- It can have a value 'NONE' which is OK
7472: ,x_msg_data => x_msg_data);
7473:
7474: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7475: -- Rule instance is found
7476: IF (l_rulv_rec.rule_information11 IS NOT NULL) AND (l_rulv_rec.rule_information11 <> OKL_API.G_MISS_CHAR) THEN
7477:
7478: l_prch_opt_det := l_rulv_rec.rule_information11; -- It can have a value 'NONE' which is OK
7479:
7480: END IF;
7492: ,x_return_status => x_return_status
7493: ,x_msg_count => x_msg_count
7494: ,x_msg_data => x_msg_data);
7495:
7496: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7497: -- Rule instance is found
7498: IF (l_rulv_rec.rule_information2 IS NOT NULL) AND (l_rulv_rec.rule_information2 <> OKL_API.G_MISS_CHAR) THEN
7499:
7500: l_int_disclosed_det := l_rulv_rec.rule_information2;
7494: ,x_msg_data => x_msg_data);
7495:
7496: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7497: -- Rule instance is found
7498: IF (l_rulv_rec.rule_information2 IS NOT NULL) AND (l_rulv_rec.rule_information2 <> OKL_API.G_MISS_CHAR) THEN
7499:
7500: l_int_disclosed_det := l_rulv_rec.rule_information2;
7501: ELSE -- interest diclosed is optional on the contract
7502:
7505:
7506: ELSE -- interest diclosed is optional on the contract
7507:
7508: l_int_disclosed_det := 'N';
7509: x_return_status := OKL_API.G_RET_STS_SUCCESS;
7510: END IF;
7511: END IF;
7512:
7513:
7541: x_ship_to_party_id => lx_ship_to_party_id,
7542: x_ship_to_site_use_id => lx_ship_to_siteuseid);
7543: END IF;
7544:
7545: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
7546: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
7547: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
7548: RAISE OKL_API.G_EXCEPTION_ERROR;
7549: END IF;
7542: x_ship_to_site_use_id => lx_ship_to_siteuseid);
7543: END IF;
7544:
7545: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
7546: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
7547: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
7548: RAISE OKL_API.G_EXCEPTION_ERROR;
7549: END IF;
7550:
7543: END IF;
7544:
7545: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
7546: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
7547: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
7548: RAISE OKL_API.G_EXCEPTION_ERROR;
7549: END IF;
7550:
7551: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
7544:
7545: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
7546: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
7547: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
7548: RAISE OKL_API.G_EXCEPTION_ERROR;
7549: END IF;
7550:
7551: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
7552: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.get_k_hdr_tax_params.',
7590: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.get_k_hdr_tax_params ','End(-)');
7591: END IF;
7592:
7593: EXCEPTION
7594: WHEN OKL_API.G_EXCEPTION_ERROR THEN
7595: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
7596: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_k_hdr_tax_params ',
7597: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
7598: END IF;
7593: EXCEPTION
7594: WHEN OKL_API.G_EXCEPTION_ERROR THEN
7595: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
7596: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_k_hdr_tax_params ',
7597: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
7598: END IF;
7599:
7600: IF c_get_contractinfo_csr%ISOPEN THEN
7601: CLOSE c_get_contractinfo_csr;
7612: IF l_oklkheaders_csr%ISOPEN THEN
7613: CLOSE l_oklkheaders_csr;
7614: END IF;
7615:
7616: x_return_status := OKL_API.G_RET_STS_ERROR;
7617: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
7618: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
7619: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_k_hdr_tax_params ',
7620: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
7613: CLOSE l_oklkheaders_csr;
7614: END IF;
7615:
7616: x_return_status := OKL_API.G_RET_STS_ERROR;
7617: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
7618: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
7619: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_k_hdr_tax_params ',
7620: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
7621: END IF;
7616: x_return_status := OKL_API.G_RET_STS_ERROR;
7617: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
7618: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
7619: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_k_hdr_tax_params ',
7620: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
7621: END IF;
7622:
7623: IF c_get_contractinfo_csr%ISOPEN THEN
7624: CLOSE c_get_contractinfo_csr;
7635: IF l_oklkheaders_csr%ISOPEN THEN
7636: CLOSE l_oklkheaders_csr;
7637: END IF;
7638:
7639: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
7640:
7641: WHEN OTHERS THEN
7642: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
7643: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_k_hdr_tax_params ',
7659: IF l_oklkheaders_csr%ISOPEN THEN
7660: CLOSE l_oklkheaders_csr;
7661: END IF;
7662:
7663: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
7664: -- unexpected error
7665: OKL_API.set_message(p_app_name => g_app_name,
7666: p_msg_name => g_unexpected_error,
7667: p_token1 => g_sqlcode_token,
7661: END IF;
7662:
7663: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
7664: -- unexpected error
7665: OKL_API.set_message(p_app_name => g_app_name,
7666: p_msg_name => g_unexpected_error,
7667: p_token1 => g_sqlcode_token,
7668: p_token1_value => sqlcode,
7669: p_token2 => g_sqlerrm_token,
7759: WHERE vendor_id = cp_vendor_id
7760: AND primary_pay_site_flag = 'Y';
7761:
7762:
7763: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
7764:
7765: l_rulv_rec okl_rule_pub.rulv_rec_type;
7766: l_rulv_empty_rec okl_rule_pub.rulv_rec_type;
7767: l_name VARCHAR2(150);
7830: ,x_return_status => x_return_status
7831: ,x_msg_count => x_msg_count
7832: ,x_msg_data => x_msg_data);
7833:
7834: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7835: -- Rule instance is found
7836: IF (l_rulv_rec.rule_information6 IS NOT NULL) AND (l_rulv_rec.rule_information6 <> OKL_API.G_MISS_CHAR) THEN
7837:
7838: l_transfer_of_title := l_rulv_rec.rule_information6;
7832: ,x_msg_data => x_msg_data);
7833:
7834: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7835: -- Rule instance is found
7836: IF (l_rulv_rec.rule_information6 IS NOT NULL) AND (l_rulv_rec.rule_information6 <> OKL_API.G_MISS_CHAR) THEN
7837:
7838: l_transfer_of_title := l_rulv_rec.rule_information6;
7839: ELSE -- transfer of title is optional on the contract
7840:
7842: END IF;
7843: ELSE -- transfer of title is optional on the contract
7844:
7845: l_transfer_of_title := 'N';
7846: x_return_status := OKL_API.G_RET_STS_SUCCESS;
7847: END IF;
7848: -- get transfer of title : end
7849:
7850: -- get sale_lease_back -- financial Asset level
7858: ,x_return_status => x_return_status
7859: ,x_msg_count => x_msg_count
7860: ,x_msg_data => x_msg_data);
7861:
7862: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7863: -- Rule instance is found
7864: IF (l_rulv_rec.rule_information7 IS NOT NULL) AND (l_rulv_rec.rule_information7 <> OKL_API.G_MISS_CHAR) THEN
7865:
7866: l_sale_lease_back := l_rulv_rec.rule_information7;
7860: ,x_msg_data => x_msg_data);
7861:
7862: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7863: -- Rule instance is found
7864: IF (l_rulv_rec.rule_information7 IS NOT NULL) AND (l_rulv_rec.rule_information7 <> OKL_API.G_MISS_CHAR) THEN
7865:
7866: l_sale_lease_back := l_rulv_rec.rule_information7;
7867: ELSE -- sale and lease back is optional on the contract
7868:
7870: END IF;
7871: ELSE -- sale and lease back is optional on the contract
7872:
7873: l_sale_lease_back := 'N';
7874: x_return_status := OKL_API.G_RET_STS_SUCCESS;
7875: END IF;
7876: -- get sale_lease_back : end
7877:
7878:
7887: ,x_return_status => x_return_status
7888: ,x_msg_count => x_msg_count
7889: ,x_msg_data => x_msg_data);
7890:
7891: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7892: -- Rule instance is found
7893: IF (l_rulv_rec.rule_information8 IS NOT NULL) AND (l_rulv_rec.rule_information8 <> OKL_API.G_MISS_CHAR) THEN
7894:
7895: l_purchase_of_lease := l_rulv_rec.rule_information8;
7889: ,x_msg_data => x_msg_data);
7890:
7891: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7892: -- Rule instance is found
7893: IF (l_rulv_rec.rule_information8 IS NOT NULL) AND (l_rulv_rec.rule_information8 <> OKL_API.G_MISS_CHAR) THEN
7894:
7895: l_purchase_of_lease := l_rulv_rec.rule_information8;
7896: ELSE -- purchase of lease is optional on the contract
7897:
7899: END IF;
7900: ELSE -- purchase of lease is optional on the contract
7901:
7902: l_purchase_of_lease := 'N';
7903: x_return_status := OKL_API.G_RET_STS_SUCCESS;
7904: END IF;
7905: -- get purchase_of_lease : end
7906:
7907:
7916: ,x_return_status => x_return_status
7917: ,x_msg_count => x_msg_count
7918: ,x_msg_data => x_msg_data);
7919:
7920: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7921: -- Rule instance is found
7922: IF (l_rulv_rec.rule_information9 IS NOT NULL) AND (l_rulv_rec.rule_information9 <> OKL_API.G_MISS_CHAR) THEN
7923:
7924: l_usage_of_equipment := l_rulv_rec.rule_information9;
7918: ,x_msg_data => x_msg_data);
7919:
7920: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7921: -- Rule instance is found
7922: IF (l_rulv_rec.rule_information9 IS NOT NULL) AND (l_rulv_rec.rule_information9 <> OKL_API.G_MISS_CHAR) THEN
7923:
7924: l_usage_of_equipment := l_rulv_rec.rule_information9;
7925:
7926: END IF;
7924: l_usage_of_equipment := l_rulv_rec.rule_information9;
7925:
7926: END IF;
7927: ELSE
7928: x_return_status := OKL_API.G_RET_STS_SUCCESS;
7929: END IF;
7930: -- get usage_of_equipment : end
7931:
7932:
7941: ,x_return_status => x_return_status
7942: ,x_msg_count => x_msg_count
7943: ,x_msg_data => x_msg_data);
7944:
7945: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7946: -- Rule instance is found
7947: IF (l_rulv_rec.rule_information10 IS NOT NULL) AND (l_rulv_rec.rule_information10 <> OKL_API.G_MISS_CHAR) THEN
7948:
7949: l_age_of_equipment := to_number(l_rulv_rec.rule_information10);
7943: ,x_msg_data => x_msg_data);
7944:
7945: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7946: -- Rule instance is found
7947: IF (l_rulv_rec.rule_information10 IS NOT NULL) AND (l_rulv_rec.rule_information10 <> OKL_API.G_MISS_CHAR) THEN
7948:
7949: l_age_of_equipment := to_number(l_rulv_rec.rule_information10);
7950:
7951: END IF;
7949: l_age_of_equipment := to_number(l_rulv_rec.rule_information10);
7950:
7951: END IF;
7952: ELSE
7953: x_return_status := OKL_API.G_RET_STS_SUCCESS;
7954: END IF;
7955: -- get age_of_equipment : end
7956:
7957:
8008: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.get_asset_tax_params ','End(-)');
8009: END IF;
8010:
8011: EXCEPTION
8012: WHEN OKL_API.G_EXCEPTION_ERROR THEN
8013:
8014: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
8015: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_asset_tax_params ',
8016: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
8012: WHEN OKL_API.G_EXCEPTION_ERROR THEN
8013:
8014: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
8015: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_asset_tax_params ',
8016: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
8017: END IF;
8018:
8019: IF l_okclines_csr%ISOPEN THEN
8020: CLOSE l_okclines_csr;
8031: IF l_povendorsites_csr%ISOPEN THEN
8032: CLOSE l_povendorsites_csr;
8033: END IF;
8034:
8035: x_return_status := OKL_API.G_RET_STS_ERROR;
8036: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
8037: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
8038: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_asset_tax_params ',
8039: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
8032: CLOSE l_povendorsites_csr;
8033: END IF;
8034:
8035: x_return_status := OKL_API.G_RET_STS_ERROR;
8036: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
8037: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
8038: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_asset_tax_params ',
8039: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
8040: END IF;
8035: x_return_status := OKL_API.G_RET_STS_ERROR;
8036: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
8037: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
8038: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_asset_tax_params ',
8039: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
8040: END IF;
8041:
8042: IF l_okclines_csr%ISOPEN THEN
8043: CLOSE l_okclines_csr;
8055: CLOSE l_povendorsites_csr;
8056: END IF;
8057:
8058:
8059: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
8060:
8061: WHEN OTHERS THEN
8062: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
8063: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_asset_tax_params ',
8080: CLOSE l_povendorsites_csr;
8081: END IF;
8082:
8083:
8084: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
8085: -- unexpected error
8086: OKL_API.set_message(p_app_name => g_app_name,
8087: p_msg_name => g_unexpected_error,
8088: p_token1 => g_sqlcode_token,
8082:
8083:
8084: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
8085: -- unexpected error
8086: OKL_API.set_message(p_app_name => g_app_name,
8087: p_msg_name => g_unexpected_error,
8088: p_token1 => g_sqlcode_token,
8089: p_token1_value => sqlcode,
8090: p_token2 => g_sqlerrm_token,
8138: p_source_trx_id IN NUMBER,
8139: p_source_trx_name IN VARCHAR2,
8140: p_source_table IN VARCHAR2) IS
8141:
8142: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
8143: i NUMBER;
8144:
8145: -- get the tax schedule request details
8146: CURSOR l_trxrequests_csr(cp_trx_id IN NUMBER, cp_trx_type_name IN VARCHAR2) IS
8628: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_tax_schedule_tax.',
8629: 'p_source_table :'||p_source_table);
8630: END IF;
8631:
8632: x_return_status := OKL_API.G_RET_STS_SUCCESS;
8633:
8634: OPEN l_trxrequests_csr(p_source_trx_id, p_source_trx_name);
8635: FETCH l_trxrequests_csr INTO l_ts_khr_id, l_ts_start_date, l_ts_end_date,
8636: l_ts_trx_type_id_det, l_legal_entity_id, l_org_id;
8639: OKC_API.set_message( p_app_name => 'OKC',
8640: p_msg_name => G_INVALID_VALUE,
8641: p_token1 => G_COL_NAME_TOKEN,
8642: p_token1_value => 'SOURCE_TRX_ID');
8643: RAISE OKL_API.G_EXCEPTION_ERROR;
8644: END IF;
8645: CLOSE l_trxrequests_csr;
8646:
8647: -- Fetch the Ledger info
8681: x_currency_conversion_rate => lx_currency_conversion_rate,
8682: x_currency_conversion_date => lx_currency_conversion_date,
8683: x_contract_start_date => lx_contract_start_date);
8684:
8685: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
8686: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
8687: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
8688: RAISE OKL_API.G_EXCEPTION_ERROR;
8689: END IF;
8682: x_currency_conversion_date => lx_currency_conversion_date,
8683: x_contract_start_date => lx_contract_start_date);
8684:
8685: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
8686: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
8687: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
8688: RAISE OKL_API.G_EXCEPTION_ERROR;
8689: END IF;
8690:
8683: x_contract_start_date => lx_contract_start_date);
8684:
8685: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
8686: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
8687: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
8688: RAISE OKL_API.G_EXCEPTION_ERROR;
8689: END IF;
8690:
8691: --------------- Process Billed Stream elements - Start -------------------
8684:
8685: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
8686: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
8687: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
8688: RAISE OKL_API.G_EXCEPTION_ERROR;
8689: END IF;
8690:
8691: --------------- Process Billed Stream elements - Start -------------------
8692:
8724: IF l_get_zx_taxable_line_info%NOTFOUND THEN -- data should exist in the billing tables
8725: --SECHAWLA 22-APR-08 6975983 : begin
8726: --SECHAWLA 22-APR-08 6975983 : shouldn't fail if no tax calculated in eBTax for AR Invoice
8727: /*
8728: OKL_API.set_message( p_app_name => 'OKL',
8729: p_msg_name => 'OKL_TX_NO_BILLING_INFO');
8730: RAISE OKL_API.G_EXCEPTION_ERROR;
8731: */
8732: -- In scenario where there is no tax in eBTax for billed AR invoices (stream elements),
8726: --SECHAWLA 22-APR-08 6975983 : shouldn't fail if no tax calculated in eBTax for AR Invoice
8727: /*
8728: OKL_API.set_message( p_app_name => 'OKL',
8729: p_msg_name => 'OKL_TX_NO_BILLING_INFO');
8730: RAISE OKL_API.G_EXCEPTION_ERROR;
8731: */
8732: -- In scenario where there is no tax in eBTax for billed AR invoices (stream elements),
8733: -- Tax determinants can not be derived. Tax determinants are passed to AR through Ar Interface
8734: -- But these are not stored in actual AR tables. When AR makes tax call to eBTax, these determinants
8970: EXCEPTION
8971: WHEN OTHERS THEN
8972: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
8973: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
8974: OKL_API.set_message(p_app_name => 'OKL',
8975: p_msg_name => 'OKL_TX_TRX_INS_ERR',
8976: p_token1 => 'TABLE_NAME',
8977: p_token1_value => 'OKL_TAX_SOURCES',
8978: p_token2 => 'ERROR_CODE',
8979: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
8980: p_token3 => 'ITERATION',
8981: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
8982: END LOOP;
8983: RAISE OKL_API.G_EXCEPTION_ERROR;
8984: END IF;
8985: END;
8986: ---- Insert into okl_tax_sources end -----
8987:
9000: EXCEPTION
9001: WHEN OTHERS THEN
9002: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
9003: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
9004: OKL_API.set_message(p_app_name => 'OKL',
9005: p_msg_name => 'OKL_TX_TRX_INS_ERR',
9006: p_token1 => 'TABLE_NAME',
9007: p_token1_value => 'OKL_TAX_TRX_DETAILS',
9008: p_token2 => 'ERROR_CODE',
9009: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
9010: p_token3 => 'ITERATION',
9011: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
9012: END LOOP;
9013: RAISE OKL_API.G_EXCEPTION_ERROR;
9014: END IF;
9015: END;
9016:
9017: ---- Insert into okl_tax_trx_details end -----
9066: x_usage_of_equipment => l_ts_usage_of_equipment,
9067: x_age_of_equipment => l_ts_age_of_equipment,
9068: x_vendor_site_id => l_ts_vendor_site_id);
9069:
9070: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9071: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9072: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9073: RAISE OKL_API.G_EXCEPTION_ERROR;
9074: END IF;
9067: x_age_of_equipment => l_ts_age_of_equipment,
9068: x_vendor_site_id => l_ts_vendor_site_id);
9069:
9070: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9071: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9072: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9073: RAISE OKL_API.G_EXCEPTION_ERROR;
9074: END IF;
9075:
9068: x_vendor_site_id => l_ts_vendor_site_id);
9069:
9070: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9071: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9072: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9073: RAISE OKL_API.G_EXCEPTION_ERROR;
9074: END IF;
9075:
9076: l_ts_asset_level_det_tbl(i).fin_asset_id := l_finassets_tbl(k).fin_asset_id;
9069:
9070: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9071: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9072: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9073: RAISE OKL_API.G_EXCEPTION_ERROR;
9074: END IF;
9075:
9076: l_ts_asset_level_det_tbl(i).fin_asset_id := l_finassets_tbl(k).fin_asset_id;
9077: l_ts_asset_level_det_tbl(i).transfer_of_title := l_ts_transfer_of_title;
9172: p_org_id => l_org_id,
9173: p_trx_date => l_ts_start_date,
9174: px_tax_codes_tbl => lx_tax_codes_tbl);
9175:
9176: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9177: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9178: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9179: RAISE OKL_API.G_EXCEPTION_ERROR;
9180: END IF;
9173: p_trx_date => l_ts_start_date,
9174: px_tax_codes_tbl => lx_tax_codes_tbl);
9175:
9176: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9177: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9178: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9179: RAISE OKL_API.G_EXCEPTION_ERROR;
9180: END IF;
9181:
9174: px_tax_codes_tbl => lx_tax_codes_tbl);
9175:
9176: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9177: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9178: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9179: RAISE OKL_API.G_EXCEPTION_ERROR;
9180: END IF;
9181:
9182: l_tax_code_count := l_tax_code_count + 1;
9175:
9176: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9177: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9178: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9179: RAISE OKL_API.G_EXCEPTION_ERROR;
9180: END IF;
9181:
9182: l_tax_code_count := l_tax_code_count + 1;
9183:
9208: -- get the inventory item id
9209: OPEN l_invitem_csr(l_fin_asset_id);
9210: FETCH l_invitem_csr INTO l_inv_item_id, l_inv_org_id;
9211: IF l_invitem_csr%NOTFOUND THEN
9212: OKL_API.set_message(
9213: p_app_name => 'OKL',
9214: p_msg_name => 'OKL_TX_INV_ITEM_ERR',
9215: p_token1 => 'ASSET_NUMBER',
9216: p_token1_value => 'FIN_ASSET_ID');
9214: p_msg_name => 'OKL_TX_INV_ITEM_ERR',
9215: p_token1 => 'ASSET_NUMBER',
9216: p_token1_value => 'FIN_ASSET_ID');
9217:
9218: RAISE OKL_API.G_EXCEPTION_ERROR;
9219: END IF;
9220: CLOSE l_invitem_csr;
9221:
9222: -- get the Location Party ID's
9237: x_ship_to_location_id => lx_ship_to_location_id,
9238: x_ship_to_party_id => lx_ship_to_party_id,
9239: x_ship_to_site_use_id => lx_ship_to_siteuseid);
9240:
9241: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9242: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9243: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9244: RAISE OKL_API.G_EXCEPTION_ERROR;
9245: END IF;
9238: x_ship_to_party_id => lx_ship_to_party_id,
9239: x_ship_to_site_use_id => lx_ship_to_siteuseid);
9240:
9241: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9242: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9243: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9244: RAISE OKL_API.G_EXCEPTION_ERROR;
9245: END IF;
9246:
9239: x_ship_to_site_use_id => lx_ship_to_siteuseid);
9240:
9241: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9242: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9243: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9244: RAISE OKL_API.G_EXCEPTION_ERROR;
9245: END IF;
9246:
9247: populate_tax_codes( p_api_version => p_api_version,
9240:
9241: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9242: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9243: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9244: RAISE OKL_API.G_EXCEPTION_ERROR;
9245: END IF;
9246:
9247: populate_tax_codes( p_api_version => p_api_version,
9248: p_init_msg_list => OKC_API.G_FALSE,
9278: p_org_id => l_org_id,
9279: p_trx_date => l_ts_start_date,
9280: px_tax_codes_tbl => lx_tax_codes_tbl);
9281:
9282: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9283: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9284: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9285: RAISE OKL_API.G_EXCEPTION_ERROR;
9286: END IF;
9279: p_trx_date => l_ts_start_date,
9280: px_tax_codes_tbl => lx_tax_codes_tbl);
9281:
9282: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9283: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9284: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9285: RAISE OKL_API.G_EXCEPTION_ERROR;
9286: END IF;
9287:
9280: px_tax_codes_tbl => lx_tax_codes_tbl);
9281:
9282: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9283: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9284: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9285: RAISE OKL_API.G_EXCEPTION_ERROR;
9286: END IF;
9287:
9288: l_tax_code_count := l_tax_code_count + 1;
9281:
9282: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9283: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9284: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9285: RAISE OKL_API.G_EXCEPTION_ERROR;
9286: END IF;
9287:
9288: l_tax_code_count := l_tax_code_count + 1;
9289:
9364: x_ship_to_location_id => lx_ship_to_location_id,
9365: x_ship_to_party_id => lx_ship_to_party_id,
9366: x_ship_to_site_use_id => lx_ship_to_siteuseid);
9367:
9368: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9369: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9370: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9371: RAISE OKL_API.G_EXCEPTION_ERROR;
9372: END IF;
9365: x_ship_to_party_id => lx_ship_to_party_id,
9366: x_ship_to_site_use_id => lx_ship_to_siteuseid);
9367:
9368: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9369: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9370: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9371: RAISE OKL_API.G_EXCEPTION_ERROR;
9372: END IF;
9373:
9366: x_ship_to_site_use_id => lx_ship_to_siteuseid);
9367:
9368: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9369: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9370: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9371: RAISE OKL_API.G_EXCEPTION_ERROR;
9372: END IF;
9373:
9374: l_contract_streams_tbl(k).ship_to_siteuseid := lx_ship_to_siteuseid;
9367:
9368: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9369: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9370: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9371: RAISE OKL_API.G_EXCEPTION_ERROR;
9372: END IF;
9373:
9374: l_contract_streams_tbl(k).ship_to_siteuseid := lx_ship_to_siteuseid;
9375:
9376: -- get the inventory item id
9377: OPEN l_invitem_csr(l_asset_line_id);
9378: FETCH l_invitem_csr INTO l_inv_item_id, l_inv_item_org_id;
9379: IF l_invitem_csr%NOTFOUND THEN
9380: OKL_API.set_message(p_app_name => 'OKL',
9381: p_msg_name => 'OKL_TX_INV_ITEM_ERR',
9382: p_token1 => 'ASSET_NUMBER',
9383: p_token1_value => l_asset_number);
9384: RAISE OKL_API.G_EXCEPTION_ERROR;
9380: OKL_API.set_message(p_app_name => 'OKL',
9381: p_msg_name => 'OKL_TX_INV_ITEM_ERR',
9382: p_token1 => 'ASSET_NUMBER',
9383: p_token1_value => l_asset_number);
9384: RAISE OKL_API.G_EXCEPTION_ERROR;
9385: END IF;
9386: CLOSE l_invitem_csr;
9387:
9388: l_contract_streams_tbl(k).inventory_item_id := l_inv_item_id;
9578: EXCEPTION
9579: WHEN OTHERS THEN
9580: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
9581: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
9582: OKL_API.set_message(p_app_name => 'OKL',
9583: p_msg_name => 'OKL_TX_TRX_INS_ERR',
9584: p_token1 => 'TABLE_NAME',
9585: p_token1_value => 'OKL_TAX_SOURCES',
9586: p_token2 => 'ERROR_CODE',
9587: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
9588: p_token3 => 'ITERATION',
9589: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
9590: END LOOP;
9591: RAISE OKL_API.G_EXCEPTION_ERROR;
9592: END IF;
9593: END;
9594: ---- Insert into okl_tax_sources end -----
9595:
9625: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_tax_schedule_tax.',
9626: 'After tax engine call '||x_return_status);
9627: END IF;
9628:
9629: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9630: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9631: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9632: RAISE OKL_API.G_EXCEPTION_ERROR;
9633: END IF;
9626: 'After tax engine call '||x_return_status);
9627: END IF;
9628:
9629: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9630: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9631: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9632: RAISE OKL_API.G_EXCEPTION_ERROR;
9633: END IF;
9634: END IF;
9627: END IF;
9628:
9629: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9630: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9631: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9632: RAISE OKL_API.G_EXCEPTION_ERROR;
9633: END IF;
9634: END IF;
9635:
9628:
9629: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9630: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9631: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9632: RAISE OKL_API.G_EXCEPTION_ERROR;
9633: END IF;
9634: END IF;
9635:
9636: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
9650: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_tax_schedule_tax.',
9651: 'Return Status' || x_return_status);
9652: END IF;
9653:
9654: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9655: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9656: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9657: RAISE OKL_API.G_EXCEPTION_ERROR;
9658: END IF;
9651: 'Return Status' || x_return_status);
9652: END IF;
9653:
9654: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9655: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9656: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9657: RAISE OKL_API.G_EXCEPTION_ERROR;
9658: END IF;
9659:
9652: END IF;
9653:
9654: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9655: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9656: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9657: RAISE OKL_API.G_EXCEPTION_ERROR;
9658: END IF;
9659:
9660: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
9653:
9654: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9655: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9656: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9657: RAISE OKL_API.G_EXCEPTION_ERROR;
9658: END IF;
9659:
9660: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
9661: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_tax_schedule_tax.',
9677: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_tax_schedule_tax.',
9678: 'Return Status' || x_return_status);
9679: END IF;
9680:
9681: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9682: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9683: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9684: RAISE OKL_API.G_EXCEPTION_ERROR;
9685: END IF;
9678: 'Return Status' || x_return_status);
9679: END IF;
9680:
9681: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9682: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9683: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9684: RAISE OKL_API.G_EXCEPTION_ERROR;
9685: END IF;
9686:
9679: END IF;
9680:
9681: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9682: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9683: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9684: RAISE OKL_API.G_EXCEPTION_ERROR;
9685: END IF;
9686:
9687: END IF; -- Processing for Unbilled streams - End
9680:
9681: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9682: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9683: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9684: RAISE OKL_API.G_EXCEPTION_ERROR;
9685: END IF;
9686:
9687: END IF; -- Processing for Unbilled streams - End
9688:
9692: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.process_tax_schedule_tax ','End(-)');
9693: END IF;
9694:
9695: EXCEPTION
9696: WHEN OKL_API.G_EXCEPTION_ERROR THEN
9697: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
9698: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_schedule_tax ',
9699: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
9700: END IF;
9695: EXCEPTION
9696: WHEN OKL_API.G_EXCEPTION_ERROR THEN
9697: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
9698: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_schedule_tax ',
9699: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
9700: END IF;
9701:
9702: IF l_trxrequests_csr%ISOPEN THEN
9703: CLOSE l_trxrequests_csr;
9754: IF l_get_zx_tax_lines%ISOPEN THEN
9755: CLOSE l_get_zx_tax_lines;
9756: END IF;
9757:
9758: x_return_status := OKL_API.G_RET_STS_ERROR;
9759:
9760: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
9761: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
9762: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_schedule_tax ',
9756: END IF;
9757:
9758: x_return_status := OKL_API.G_RET_STS_ERROR;
9759:
9760: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
9761: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
9762: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_schedule_tax ',
9763: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
9764: END IF;
9759:
9760: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
9761: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
9762: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_schedule_tax ',
9763: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
9764: END IF;
9765:
9766: IF l_trxrequests_csr%ISOPEN THEN
9767: CLOSE l_trxrequests_csr;
9818: IF l_get_zx_tax_lines%ISOPEN THEN
9819: CLOSE l_get_zx_tax_lines;
9820: END IF;
9821:
9822: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
9823:
9824: WHEN OTHERS THEN
9825: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
9826: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_schedule_tax ',
9882: IF l_get_zx_tax_lines%ISOPEN THEN
9883: CLOSE l_get_zx_tax_lines;
9884: END IF;
9885:
9886: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
9887: -- unexpected error
9888: OKL_API.set_message(p_app_name => g_app_name,
9889: p_msg_name => g_unexpected_error,
9890: p_token1 => g_sqlcode_token,
9884: END IF;
9885:
9886: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
9887: -- unexpected error
9888: OKL_API.set_message(p_app_name => g_app_name,
9889: p_msg_name => g_unexpected_error,
9890: p_token1 => g_sqlcode_token,
9891: p_token1_value => sqlcode,
9892: p_token2 => g_sqlerrm_token,
9942: --p_source_trx_name ---> 'Estimated Billing'
9943: --p_source_table ---> 'OKL_TRX_QUOTES_B'
9944: --------------------------------------------------
9945:
9946: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
9947:
9948: -- Get quote details
9949: CURSOR l_trxquotes_csr(cp_qte_id IN NUMBER) IS
9950: SELECT khr_id, date_effective_from, early_termination_yn, qtp_code,
10110: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quote_tax.',
10111: 'p_source_table :'||p_source_table);
10112: END IF;
10113:
10114: x_return_status := OKL_API.G_RET_STS_SUCCESS;
10115:
10116: -- Validate soure trx id
10117: OPEN l_trxquotes_csr(p_source_trx_id);
10118: FETCH l_trxquotes_csr INTO l_qte_khr_id, l_qte_dt_eff_from,
10123: OKC_API.set_message( p_app_name => 'OKC',
10124: p_msg_name => G_INVALID_VALUE,
10125: p_token1 => G_COL_NAME_TOKEN,
10126: p_token1_value => 'SOURCE_TRX_ID');
10127: RAISE OKL_API.G_EXCEPTION_ERROR;
10128: END IF;
10129: CLOSE l_trxquotes_csr;
10130:
10131: --Check if tax source transactions already exist for this quote. If so, delete the previous tax transcations and
10160: EXCEPTION
10161: WHEN OTHERS THEN
10162: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
10163: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
10164: OKL_API.set_message(
10165: p_app_name => 'OKL',
10166: p_msg_name => 'OKL_TX_TRX_DEL_ERR',
10167: p_token1 => 'TABLE_NAME',
10168: p_token1_value => 'OKL_TAX_TRX_DETAILS',
10170: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
10171: p_token3 => 'ITERATION',
10172: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
10173: END LOOP;
10174: RAISE OKL_API.G_EXCEPTION_ERROR;
10175: END IF;
10176: END;
10177:
10178: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10186: EXCEPTION
10187: WHEN OTHERS THEN
10188: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
10189: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
10190: OKL_API.set_message(
10191: p_app_name => 'OKL',
10192: p_msg_name => 'OKL_TX_TRX_DEL_ERR',
10193: p_token1 => 'TABLE_NAME',
10194: p_token1_value => 'OKL_TAX_SOURCES',
10196: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
10197: p_token3 => 'ITERATION',
10198: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
10199: END LOOP;
10200: RAISE OKL_API.G_EXCEPTION_ERROR;
10201: END IF;
10202: END;
10203:
10204: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10241: x_currency_conversion_rate => lx_currency_conversion_rate,
10242: x_currency_conversion_date => lx_currency_conversion_date,
10243: x_contract_start_date => lx_contract_start_date);
10244:
10245: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10246: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10247: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10248: RAISE OKL_API.G_EXCEPTION_ERROR;
10249: END IF;
10242: x_currency_conversion_date => lx_currency_conversion_date,
10243: x_contract_start_date => lx_contract_start_date);
10244:
10245: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10246: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10247: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10248: RAISE OKL_API.G_EXCEPTION_ERROR;
10249: END IF;
10250:
10243: x_contract_start_date => lx_contract_start_date);
10244:
10245: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10246: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10247: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10248: RAISE OKL_API.G_EXCEPTION_ERROR;
10249: END IF;
10250:
10251: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10244:
10245: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10246: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10247: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10248: RAISE OKL_API.G_EXCEPTION_ERROR;
10249: END IF;
10250:
10251: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10252: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quote_tax.',
10294: l_taxation_country := get_default_taxation_country(x_return_status => x_return_status,
10295: x_msg_count => x_msg_count,
10296: x_msg_data => x_msg_data,
10297: p_legal_entity_id => l_legal_entity_id);
10298: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10299: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10300: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10301: RAISE OKL_API.G_EXCEPTION_ERROR;
10302: END IF;
10295: x_msg_count => x_msg_count,
10296: x_msg_data => x_msg_data,
10297: p_legal_entity_id => l_legal_entity_id);
10298: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10299: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10300: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10301: RAISE OKL_API.G_EXCEPTION_ERROR;
10302: END IF;
10303:
10296: x_msg_data => x_msg_data,
10297: p_legal_entity_id => l_legal_entity_id);
10298: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10299: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10300: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10301: RAISE OKL_API.G_EXCEPTION_ERROR;
10302: END IF;
10303:
10304: tax_call_cnt := 1;
10297: p_legal_entity_id => l_legal_entity_id);
10298: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10299: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10300: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10301: RAISE OKL_API.G_EXCEPTION_ERROR;
10302: END IF;
10303:
10304: tax_call_cnt := 1;
10305: OPEN l_txlquotelines_csr(p_source_trx_id);
10346: x_usage_of_equipment => l_qte_usage_of_equipment,
10347: x_age_of_equipment => l_qte_age_of_equipment,
10348: x_vendor_site_id => l_qte_vendor_site_id);
10349:
10350: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10351: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10352: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10353: RAISE OKL_API.G_EXCEPTION_ERROR;
10354: END IF;
10347: x_age_of_equipment => l_qte_age_of_equipment,
10348: x_vendor_site_id => l_qte_vendor_site_id);
10349:
10350: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10351: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10352: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10353: RAISE OKL_API.G_EXCEPTION_ERROR;
10354: END IF;
10355:
10348: x_vendor_site_id => l_qte_vendor_site_id);
10349:
10350: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10351: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10352: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10353: RAISE OKL_API.G_EXCEPTION_ERROR;
10354: END IF;
10355:
10356: -- Equipment Type(inventory item id)
10349:
10350: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10351: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10352: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10353: RAISE OKL_API.G_EXCEPTION_ERROR;
10354: END IF;
10355:
10356: -- Equipment Type(inventory item id)
10357: -- get the inventory item id
10357: -- get the inventory item id
10358: OPEN l_invitem_csr(l_txlquotelines_tbl(k).kle_id);
10359: FETCH l_invitem_csr INTO l_inv_item_id, l_inv_item_org_id;
10360: IF l_invitem_csr%NOTFOUND THEN
10361: OKL_API.set_message(
10362: p_app_name => 'OKL',
10363: p_msg_name => 'OKL_TX_INV_ITEM_ERR',
10364: p_token1 => 'ASSET_NUMBER',
10365: p_token1_value => l_name);
10363: p_msg_name => 'OKL_TX_INV_ITEM_ERR',
10364: p_token1 => 'ASSET_NUMBER',
10365: p_token1_value => l_name);
10366:
10367: RAISE OKL_API.G_EXCEPTION_ERROR;
10368: END IF;
10369: CLOSE l_invitem_csr;
10370:
10371: IF l_qtp_code LIKE 'TER%' THEN -- Ship to Location is not applicable for repurchase quote
10387: x_ship_to_location_id => lx_ship_to_location_id,
10388: x_ship_to_party_id => lx_ship_to_party_id,
10389: x_ship_to_site_use_id => lx_ship_to_siteuseid);
10390:
10391: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10392: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10393: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10394: RAISE OKL_API.G_EXCEPTION_ERROR;
10395: END IF;
10388: x_ship_to_party_id => lx_ship_to_party_id,
10389: x_ship_to_site_use_id => lx_ship_to_siteuseid);
10390:
10391: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10392: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10393: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10394: RAISE OKL_API.G_EXCEPTION_ERROR;
10395: END IF;
10396: END IF;
10389: x_ship_to_site_use_id => lx_ship_to_siteuseid);
10390:
10391: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10392: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10393: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10394: RAISE OKL_API.G_EXCEPTION_ERROR;
10395: END IF;
10396: END IF;
10397:
10390:
10391: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10392: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10393: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10394: RAISE OKL_API.G_EXCEPTION_ERROR;
10395: END IF;
10396: END IF;
10397:
10398: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10446: p_primary_sty_purpose => l_txlquotelines_tbl(k).qlt_code,
10447: x_return_status => x_return_status,
10448: x_primary_sty_id => lx_sty_id);
10449:
10450: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10451: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10452: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10453: RAISE OKL_API.G_EXCEPTION_ERROR;
10454: END IF;
10447: x_return_status => x_return_status,
10448: x_primary_sty_id => lx_sty_id);
10449:
10450: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10451: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10452: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10453: RAISE OKL_API.G_EXCEPTION_ERROR;
10454: END IF;
10455: END IF;
10448: x_primary_sty_id => lx_sty_id);
10449:
10450: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10451: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10452: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10453: RAISE OKL_API.G_EXCEPTION_ERROR;
10454: END IF;
10455: END IF;
10456:
10449:
10450: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10451: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10452: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10453: RAISE OKL_API.G_EXCEPTION_ERROR;
10454: END IF;
10455: END IF;
10456:
10457: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10472: OKC_API.set_message( p_app_name => 'OKC',
10473: p_msg_name => G_INVALID_VALUE,
10474: p_token1 => G_COL_NAME_TOKEN,
10475: p_token1_value => 'FMA_ID');
10476: RAISE OKL_API.G_EXCEPTION_ERROR;
10477: END IF;
10478: CLOSE l_formulae_csr;
10479:
10480: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10575: p_term_quote_reason_code => l_qrs_code,
10576: px_tax_sources_tbl => lx_tax_sources_tbl,
10577: px_line_params_tbl => lx_line_params_tbl );
10578:
10579: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10580: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10581: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10582: RAISE OKL_API.G_EXCEPTION_ERROR;
10583: END IF;
10576: px_tax_sources_tbl => lx_tax_sources_tbl,
10577: px_line_params_tbl => lx_line_params_tbl );
10578:
10579: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10580: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10581: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10582: RAISE OKL_API.G_EXCEPTION_ERROR;
10583: END IF;
10584:
10577: px_line_params_tbl => lx_line_params_tbl );
10578:
10579: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10580: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10581: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10582: RAISE OKL_API.G_EXCEPTION_ERROR;
10583: END IF;
10584:
10585: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10578:
10579: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10580: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10581: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10582: RAISE OKL_API.G_EXCEPTION_ERROR;
10583: END IF;
10584:
10585: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10586: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quote_tax.',
10610: EXCEPTION
10611: WHEN OTHERS THEN
10612: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
10613: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
10614: OKL_API.set_message( p_app_name => 'OKL',
10615: p_msg_name => 'OKL_TX_TRX_INS_ERR',
10616: p_token1 => 'TABLE_NAME',
10617: p_token1_value => 'OKL_TAX_SOURCES',
10618: p_token2 => 'ERROR_CODE',
10619: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
10620: p_token3 => 'ITERATION',
10621: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
10622: END LOOP;
10623: RAISE OKL_API.G_EXCEPTION_ERROR;
10624: END IF;
10625: END;
10626: -- Insert into okl_tax_sources end
10627:
10657: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quote_tax.',
10658: 'After tax engine call '||x_return_status);
10659: END IF;
10660:
10661: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10662: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10663: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10664: RAISE OKL_API.G_EXCEPTION_ERROR;
10665: END IF;
10658: 'After tax engine call '||x_return_status);
10659: END IF;
10660:
10661: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10662: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10663: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10664: RAISE OKL_API.G_EXCEPTION_ERROR;
10665: END IF;
10666: END IF;
10659: END IF;
10660:
10661: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10662: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10663: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10664: RAISE OKL_API.G_EXCEPTION_ERROR;
10665: END IF;
10666: END IF;
10667:
10660:
10661: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10662: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10663: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10664: RAISE OKL_API.G_EXCEPTION_ERROR;
10665: END IF;
10666: END IF;
10667:
10668: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10682: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quote_tax.',
10683: 'Return Status' || x_return_status);
10684: END IF;
10685:
10686: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10687: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10688: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10689: RAISE OKL_API.G_EXCEPTION_ERROR;
10690: END IF;
10683: 'Return Status' || x_return_status);
10684: END IF;
10685:
10686: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10687: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10688: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10689: RAISE OKL_API.G_EXCEPTION_ERROR;
10690: END IF;
10691:
10684: END IF;
10685:
10686: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10687: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10688: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10689: RAISE OKL_API.G_EXCEPTION_ERROR;
10690: END IF;
10691:
10692: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10685:
10686: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10687: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10688: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10689: RAISE OKL_API.G_EXCEPTION_ERROR;
10690: END IF;
10691:
10692: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10693: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quote_tax.',
10709: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quote_tax.',
10710: 'Return Status' || x_return_status);
10711: END IF;
10712:
10713: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10714: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10715: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10716: RAISE OKL_API.G_EXCEPTION_ERROR;
10717: END IF;
10710: 'Return Status' || x_return_status);
10711: END IF;
10712:
10713: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10714: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10715: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10716: RAISE OKL_API.G_EXCEPTION_ERROR;
10717: END IF;
10718:
10711: END IF;
10712:
10713: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10714: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10715: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10716: RAISE OKL_API.G_EXCEPTION_ERROR;
10717: END IF;
10718:
10719: IF (G_DEBUG_LEVEL_PROCEDURE >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10712:
10713: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10714: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10715: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10716: RAISE OKL_API.G_EXCEPTION_ERROR;
10717: END IF;
10718:
10719: IF (G_DEBUG_LEVEL_PROCEDURE >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10720: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.process_quote_tax ','End(-)');
10720: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.process_quote_tax ','End(-)');
10721: END IF;
10722:
10723: EXCEPTION
10724: WHEN OKL_API.G_EXCEPTION_ERROR THEN
10725: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10726: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_quote_tax ',
10727: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
10728: END IF;
10723: EXCEPTION
10724: WHEN OKL_API.G_EXCEPTION_ERROR THEN
10725: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10726: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_quote_tax ',
10727: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
10728: END IF;
10729:
10730: IF l_trxquotes_csr%ISOPEN THEN
10731: CLOSE l_trxquotes_csr;
10758: IF l_formulae_csr%ISOPEN THEN
10759: CLOSE l_formulae_csr;
10760: END IF;
10761:
10762: x_return_status := OKL_API.G_RET_STS_ERROR;
10763: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
10764: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10765: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_quote_tax ',
10766: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
10759: CLOSE l_formulae_csr;
10760: END IF;
10761:
10762: x_return_status := OKL_API.G_RET_STS_ERROR;
10763: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
10764: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10765: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_quote_tax ',
10766: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
10767: END IF;
10762: x_return_status := OKL_API.G_RET_STS_ERROR;
10763: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
10764: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10765: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_quote_tax ',
10766: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
10767: END IF;
10768:
10769: IF l_trxquotes_csr%ISOPEN THEN
10770: CLOSE l_trxquotes_csr;
10797: IF l_formulae_csr%ISOPEN THEN
10798: CLOSE l_formulae_csr;
10799: END IF;
10800:
10801: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
10802:
10803: WHEN OTHERS THEN
10804: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10805: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_quote_tax ',
10837: IF l_formulae_csr%ISOPEN THEN
10838: CLOSE l_formulae_csr;
10839: END IF;
10840:
10841: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
10842: -- unexpected error
10843: OKL_API.set_message(p_app_name => g_app_name,
10844: p_msg_name => g_unexpected_error,
10845: p_token1 => g_sqlcode_token,
10839: END IF;
10840:
10841: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
10842: -- unexpected error
10843: OKL_API.set_message(p_app_name => g_app_name,
10844: p_msg_name => g_unexpected_error,
10845: p_token1 => g_sqlcode_token,
10846: p_token1_value => sqlcode,
10847: p_token2 => g_sqlerrm_token,
10910: --p_tax_call_type ---> Tax call type
10911: --p_serialized_asset ---> Serialized Asset (Y/N)
10912: --p_request_id ---> Id of OKL_trx_Requests
10913: --------------------------------------------------
10914: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
10915:
10916: -- validate source trx id
10917: CURSOR l_trxassets_csr(cp_trx_id IN NUMBER, cp_trx_type_name IN VARCHAR2) IS
10918: SELECT a.try_id, a.date_trans_occurred, a.legal_entity_id
11169: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax.',
11170: 'p_alc_final_call :'||p_alc_final_call);
11171: END IF;
11172:
11173: x_return_status := OKL_API.G_RET_STS_SUCCESS;
11174:
11175: -- validate the source trx id
11176: OPEN l_trxassets_csr(p_source_trx_id, p_source_trx_name);
11177: FETCH l_trxassets_csr INTO l_alc_trx_type_id_det, l_trx_date, l_legal_entity_id;
11180: OKC_API.set_message( p_app_name => 'OKC',
11181: p_msg_name => G_INVALID_VALUE,
11182: p_token1 => G_COL_NAME_TOKEN,
11183: p_token1_value => 'SOURCE_TRX_ID');
11184: RAISE OKL_API.G_EXCEPTION_ERROR;
11185: END IF;
11186: CLOSE l_trxassets_csr;
11187:
11188: IF p_tax_call_type = G_ESTIMATED_CALL_TYPE THEN
11194: OKC_API.set_message( p_app_name => 'OKC',
11195: p_msg_name => G_REQUIRED_VALUE,
11196: p_token1 => G_COL_NAME_TOKEN,
11197: p_token1_value => 'PARTY_SITE_USES_ID1');
11198: RAISE OKL_API.G_EXCEPTION_ERROR;
11199: END IF;
11200:
11201: IF l_fin_asset_id IS NULL THEN
11202: OKC_API.set_message( p_app_name => 'OKC',
11202: OKC_API.set_message( p_app_name => 'OKC',
11203: p_msg_name => G_REQUIRED_VALUE,
11204: p_token1 => G_COL_NAME_TOKEN,
11205: p_token1_value => 'DNZ_CLE_ID');
11206: RAISE OKL_API.G_EXCEPTION_ERROR;
11207: END IF;
11208: CLOSE l_txlitminsts_csr;
11209:
11210: OPEN l_okcklines_csr(l_fin_asset_id);
11213: OKC_API.set_message( p_app_name => 'OKC',
11214: p_msg_name => G_INVALID_VALUE,
11215: p_token1 => G_COL_NAME_TOKEN,
11216: p_token1_value => 'DNZ_CLE_ID');
11217: RAISE OKL_API.G_EXCEPTION_ERROR;
11218: END IF;
11219: CLOSE l_okcklines_csr;
11220:
11221: -- get the new location id
11225: OKC_API.set_message( p_app_name => 'OKC',
11226: p_msg_name => G_REQUIRED_VALUE,
11227: p_token1 => G_COL_NAME_TOKEN,
11228: p_token1_value => 'LOCATION_ID');
11229: RAISE OKL_API.G_EXCEPTION_ERROR;
11230: END IF;
11231: CLOSE l_partysiteuses_csr;
11232:
11233: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11280: EXCEPTION
11281: WHEN OTHERS THEN
11282: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
11283: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
11284: OKL_API.set_message(
11285: p_app_name => 'OKL',
11286: p_msg_name => 'OKL_TX_TRX_UPD_ERR',
11287: p_token1 => 'TABLE_NAME',
11288: p_token1_value => 'OKL_TAX_SOURCES',
11290: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
11291: p_token3 => 'ITERATION',
11292: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
11293: END LOOP;
11294: RAISE OKL_API.G_EXCEPTION_ERROR;
11295: END IF;
11296: END;
11297:
11298: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11337: x_currency_conversion_rate => lx_currency_conversion_rate,
11338: x_currency_conversion_date => lx_currency_conversion_date,
11339: x_contract_start_date => lx_contract_start_date);
11340:
11341: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11342: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11343: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11344: RAISE OKL_API.G_EXCEPTION_ERROR;
11345: END IF;
11338: x_currency_conversion_date => lx_currency_conversion_date,
11339: x_contract_start_date => lx_contract_start_date);
11340:
11341: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11342: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11343: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11344: RAISE OKL_API.G_EXCEPTION_ERROR;
11345: END IF;
11346:
11339: x_contract_start_date => lx_contract_start_date);
11340:
11341: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11342: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11343: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11344: RAISE OKL_API.G_EXCEPTION_ERROR;
11345: END IF;
11346:
11347: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11340:
11341: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11342: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11343: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11344: RAISE OKL_API.G_EXCEPTION_ERROR;
11345: END IF;
11346:
11347: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11348: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax.',
11400: x_usage_of_equipment => lx_alc_usage_of_equipment,
11401: x_age_of_equipment => lx_alc_age_of_equipment,
11402: x_vendor_site_id => lx_alc_vendor_site_id);
11403:
11404: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11405: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11406: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11407: RAISE OKL_API.G_EXCEPTION_ERROR;
11408: END IF;
11401: x_age_of_equipment => lx_alc_age_of_equipment,
11402: x_vendor_site_id => lx_alc_vendor_site_id);
11403:
11404: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11405: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11406: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11407: RAISE OKL_API.G_EXCEPTION_ERROR;
11408: END IF;
11409:
11402: x_vendor_site_id => lx_alc_vendor_site_id);
11403:
11404: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11405: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11406: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11407: RAISE OKL_API.G_EXCEPTION_ERROR;
11408: END IF;
11409:
11410: -- Equipment Type(inventory item id)
11403:
11404: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11405: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11406: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11407: RAISE OKL_API.G_EXCEPTION_ERROR;
11408: END IF;
11409:
11410: -- Equipment Type(inventory item id)
11411: -- get the inventory item id
11411: -- get the inventory item id
11412: OPEN l_invitem_csr(l_fin_asset_id);
11413: FETCH l_invitem_csr INTO l_inv_item_id, l_inv_item_org_id;
11414: IF l_invitem_csr%NOTFOUND THEN
11415: OKL_API.set_message( p_app_name => 'OKL',
11416: p_msg_name => 'OKL_TX_INV_ITEM_ERR',
11417: p_token1 => 'ASSET_NUMBER',
11418: p_token1_value => l_name);
11419: RAISE OKL_API.G_EXCEPTION_ERROR;
11415: OKL_API.set_message( p_app_name => 'OKL',
11416: p_msg_name => 'OKL_TX_INV_ITEM_ERR',
11417: p_token1 => 'ASSET_NUMBER',
11418: p_token1_value => l_name);
11419: RAISE OKL_API.G_EXCEPTION_ERROR;
11420: END IF;
11421: CLOSE l_invitem_csr;
11422:
11423: -- get the Equipment Locationn (IB Loc)
11437: x_ship_to_location_id => lx_ship_to_location_id,
11438: x_ship_to_party_id => lx_ship_to_party_id,
11439: x_ship_to_site_use_id => lx_ship_to_siteuseid);
11440:
11441: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN -- will never be setting this to unexpecetd inside get_ufc_code ?
11442: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11443: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11444: RAISE OKL_API.G_EXCEPTION_ERROR;
11445: END IF;
11438: x_ship_to_party_id => lx_ship_to_party_id,
11439: x_ship_to_site_use_id => lx_ship_to_siteuseid);
11440:
11441: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN -- will never be setting this to unexpecetd inside get_ufc_code ?
11442: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11443: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11444: RAISE OKL_API.G_EXCEPTION_ERROR;
11445: END IF;
11446:
11439: x_ship_to_site_use_id => lx_ship_to_siteuseid);
11440:
11441: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN -- will never be setting this to unexpecetd inside get_ufc_code ?
11442: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11443: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11444: RAISE OKL_API.G_EXCEPTION_ERROR;
11445: END IF;
11446:
11447: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11440:
11441: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN -- will never be setting this to unexpecetd inside get_ufc_code ?
11442: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11443: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11444: RAISE OKL_API.G_EXCEPTION_ERROR;
11445: END IF;
11446:
11447: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11448: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax.',
11522: OKC_API.set_message( p_app_name => 'OKC',
11523: p_msg_name => G_INVALID_VALUE,
11524: p_token1 => G_COL_NAME_TOKEN,
11525: p_token1_value => 'FMA_ID');
11526: RAISE OKL_API.G_EXCEPTION_ERROR;
11527: END IF;
11528: CLOSE l_formulae_csr;
11529:
11530: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11540: l_taxation_country := get_default_taxation_country(x_return_status => x_return_status,
11541: x_msg_count => x_msg_count,
11542: x_msg_data => x_msg_data,
11543: p_legal_entity_id => l_legal_entity_id);
11544: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11545: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11546: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11547: RAISE OKL_API.G_EXCEPTION_ERROR;
11548: END IF;
11541: x_msg_count => x_msg_count,
11542: x_msg_data => x_msg_data,
11543: p_legal_entity_id => l_legal_entity_id);
11544: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11545: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11546: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11547: RAISE OKL_API.G_EXCEPTION_ERROR;
11548: END IF;
11549:
11542: x_msg_data => x_msg_data,
11543: p_legal_entity_id => l_legal_entity_id);
11544: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11545: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11546: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11547: RAISE OKL_API.G_EXCEPTION_ERROR;
11548: END IF;
11549:
11550: OPEN c_get_streams_count(l_chr_id, l_fin_asset_id);
11543: p_legal_entity_id => l_legal_entity_id);
11544: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11545: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11546: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11547: RAISE OKL_API.G_EXCEPTION_ERROR;
11548: END IF;
11549:
11550: OPEN c_get_streams_count(l_chr_id, l_fin_asset_id);
11551: FETCH c_get_streams_count INTO l_stream_count;
11707: p_alc_ser_def_code => l_alc_ser_def_code,
11708: px_tax_sources_tbl => lx_tax_sources_tbl,
11709: px_line_params_tbl => lx_line_params_tbl );
11710:
11711: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11712: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11713: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11714: RAISE OKL_API.G_EXCEPTION_ERROR;
11715: END IF;
11708: px_tax_sources_tbl => lx_tax_sources_tbl,
11709: px_line_params_tbl => lx_line_params_tbl );
11710:
11711: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11712: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11713: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11714: RAISE OKL_API.G_EXCEPTION_ERROR;
11715: END IF;
11716:
11709: px_line_params_tbl => lx_line_params_tbl );
11710:
11711: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11712: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11713: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11714: RAISE OKL_API.G_EXCEPTION_ERROR;
11715: END IF;
11716:
11717: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11710:
11711: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11712: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11713: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11714: RAISE OKL_API.G_EXCEPTION_ERROR;
11715: END IF;
11716:
11717: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11718: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax.',
11737: EXCEPTION
11738: WHEN OTHERS THEN
11739: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
11740: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
11741: OKL_API.set_message(
11742: p_app_name => 'OKL',
11743: p_msg_name => 'OKL_TX_TRX_INS_ERR',
11744: p_token1 => 'TABLE_NAME',
11745: p_token1_value => 'OKL_TAX_SOURCES',
11747: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
11748: p_token3 => 'ITERATION',
11749: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
11750: END LOOP;
11751: RAISE OKL_API.G_EXCEPTION_ERROR;
11752: END IF;
11753: END;
11754: -- Insert into okl_tax_sources end --
11755:
11801: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax.',
11802: 'After tax engine call '||x_return_status);
11803: END IF;
11804:
11805: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11806: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11807: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11808: RAISE OKL_API.G_EXCEPTION_ERROR;
11809: END IF;
11802: 'After tax engine call '||x_return_status);
11803: END IF;
11804:
11805: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11806: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11807: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11808: RAISE OKL_API.G_EXCEPTION_ERROR;
11809: END IF;
11810: END IF;
11803: END IF;
11804:
11805: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11806: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11807: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11808: RAISE OKL_API.G_EXCEPTION_ERROR;
11809: END IF;
11810: END IF;
11811:
11804:
11805: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11806: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11807: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11808: RAISE OKL_API.G_EXCEPTION_ERROR;
11809: END IF;
11810: END IF;
11811:
11812: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11827: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax.',
11828: 'Return Status' || x_return_status);
11829: END IF;
11830:
11831: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11832: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11833: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11834: RAISE OKL_API.G_EXCEPTION_ERROR;
11835: END IF;
11828: 'Return Status' || x_return_status);
11829: END IF;
11830:
11831: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11832: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11833: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11834: RAISE OKL_API.G_EXCEPTION_ERROR;
11835: END IF;
11836:
11829: END IF;
11830:
11831: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11832: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11833: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11834: RAISE OKL_API.G_EXCEPTION_ERROR;
11835: END IF;
11836:
11837: IF (p_serialized_asset = 'Y' AND p_alc_final_call = 'Y') THEN
11830:
11831: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11832: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11833: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11834: RAISE OKL_API.G_EXCEPTION_ERROR;
11835: END IF;
11836:
11837: IF (p_serialized_asset = 'Y' AND p_alc_final_call = 'Y') THEN
11838: G_UFC_CODE := null;
11848: p_asset_id => l_fin_asset_id,
11849: p_request_id => p_request_id,
11850: p_serialized_asset => p_serialized_asset);
11851:
11852: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11853: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11854: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
11855: RAISE OKL_API.G_EXCEPTION_ERROR;
11856: END IF;
11849: p_request_id => p_request_id,
11850: p_serialized_asset => p_serialized_asset);
11851:
11852: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11853: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11854: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
11855: RAISE OKL_API.G_EXCEPTION_ERROR;
11856: END IF;
11857: ELSE
11850: p_serialized_asset => p_serialized_asset);
11851:
11852: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11853: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11854: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
11855: RAISE OKL_API.G_EXCEPTION_ERROR;
11856: END IF;
11857: ELSE
11858: populate_alc_total_tax(p_api_version => p_api_version,
11851:
11852: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11853: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11854: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
11855: RAISE OKL_API.G_EXCEPTION_ERROR;
11856: END IF;
11857: ELSE
11858: populate_alc_total_tax(p_api_version => p_api_version,
11859: p_init_msg_list => p_init_msg_list,
11862: x_msg_data => x_msg_data,
11863: p_asset_id => l_fin_asset_id,
11864: p_request_id => p_request_id);
11865:
11866: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11867: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11868: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
11869: RAISE OKL_API.G_EXCEPTION_ERROR;
11870: END IF;
11863: p_asset_id => l_fin_asset_id,
11864: p_request_id => p_request_id);
11865:
11866: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11867: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11868: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
11869: RAISE OKL_API.G_EXCEPTION_ERROR;
11870: END IF;
11871: END IF;
11864: p_request_id => p_request_id);
11865:
11866: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11867: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11868: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
11869: RAISE OKL_API.G_EXCEPTION_ERROR;
11870: END IF;
11871: END IF;
11872:
11865:
11866: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11867: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11868: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
11869: RAISE OKL_API.G_EXCEPTION_ERROR;
11870: END IF;
11871: END IF;
11872:
11873: ELSIF p_tax_call_type = G_ACTUAL_CALL_TYPE THEN
11898: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax.',
11899: 'Return Status' || x_return_status);
11900: END IF;
11901:
11902: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11903: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11904: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11905: RAISE OKL_API.G_EXCEPTION_ERROR;
11906: END IF;
11899: 'Return Status' || x_return_status);
11900: END IF;
11901:
11902: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11903: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11904: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11905: RAISE OKL_API.G_EXCEPTION_ERROR;
11906: END IF;
11907:
11900: END IF;
11901:
11902: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11903: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11904: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11905: RAISE OKL_API.G_EXCEPTION_ERROR;
11906: END IF;
11907:
11908: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11901:
11902: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11903: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11904: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11905: RAISE OKL_API.G_EXCEPTION_ERROR;
11906: END IF;
11907:
11908: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11909: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax.',
11921: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax.',
11922: 'Return Status' || x_return_status);
11923: END IF;
11924:
11925: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11926: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11927: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11928: RAISE OKL_API.G_EXCEPTION_ERROR;
11929: END IF;
11922: 'Return Status' || x_return_status);
11923: END IF;
11924:
11925: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11926: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11927: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11928: RAISE OKL_API.G_EXCEPTION_ERROR;
11929: END IF;
11930:
11923: END IF;
11924:
11925: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11926: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11927: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11928: RAISE OKL_API.G_EXCEPTION_ERROR;
11929: END IF;
11930:
11931: END IF;
11924:
11925: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11926: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11927: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11928: RAISE OKL_API.G_EXCEPTION_ERROR;
11929: END IF;
11930:
11931: END IF;
11932:
11935: IF (G_DEBUG_LEVEL_PROCEDURE >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11936: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax ','End(-)');
11937: END IF;
11938: EXCEPTION
11939: WHEN OKL_API.G_EXCEPTION_ERROR THEN
11940: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11941: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax ',
11942: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
11943: END IF;
11938: EXCEPTION
11939: WHEN OKL_API.G_EXCEPTION_ERROR THEN
11940: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11941: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax ',
11942: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
11943: END IF;
11944:
11945: IF l_trxassets_csr%ISOPEN THEN
11946: CLOSE l_trxassets_csr;
11985: IF c_get_streams_count%ISOPEN THEN
11986: CLOSE c_get_streams_count;
11987: END IF;
11988:
11989: x_return_status := OKL_API.G_RET_STS_ERROR;
11990: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
11991: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11992: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax ',
11993: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
11986: CLOSE c_get_streams_count;
11987: END IF;
11988:
11989: x_return_status := OKL_API.G_RET_STS_ERROR;
11990: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
11991: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11992: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax ',
11993: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
11994: END IF;
11989: x_return_status := OKL_API.G_RET_STS_ERROR;
11990: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
11991: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11992: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax ',
11993: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
11994: END IF;
11995:
11996: IF l_trxassets_csr%ISOPEN THEN
11997: CLOSE l_trxassets_csr;
12036: IF c_get_streams_count%ISOPEN THEN
12037: CLOSE c_get_streams_count;
12038: END IF;
12039:
12040: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
12041:
12042: WHEN OTHERS THEN
12043: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
12044: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax ',
12088: IF c_get_streams_count%ISOPEN THEN
12089: CLOSE c_get_streams_count;
12090: END IF;
12091:
12092: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
12093: -- unexpected error
12094: OKL_API.set_message(p_app_name => g_app_name,
12095: p_msg_name => g_unexpected_error,
12096: p_token1 => g_sqlcode_token,
12090: END IF;
12091:
12092: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
12093: -- unexpected error
12094: OKL_API.set_message(p_app_name => g_app_name,
12095: p_msg_name => g_unexpected_error,
12096: p_token1 => g_sqlcode_token,
12097: p_token1_value => sqlcode,
12098: p_token2 => g_sqlerrm_token,
12281: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_split_asset_tax.',
12282: 'p_source_table :'||p_source_table);
12283: END IF;
12284:
12285: x_return_status := OKL_API.G_RET_STS_SUCCESS;
12286:
12287: -- validate the source trx id
12288: OPEN l_trxassets_csr(p_source_trx_id, p_source_trx_name);
12289: FETCH l_trxassets_csr INTO l_spl_trx_type_id, l_trx_date;
12292: OKC_API.set_message( p_app_name => 'OKC',
12293: p_msg_name => G_INVALID_VALUE,
12294: p_token1 => G_COL_NAME_TOKEN,
12295: p_token1_value => 'SOURCE_TRX_ID');
12296: RAISE OKL_API.G_EXCEPTION_ERROR;
12297: END IF;
12298: CLOSE l_trxassets_csr;
12299:
12300: -- get trx line information
12305: OKC_API.set_message( p_app_name => 'OKC',
12306: p_msg_name => G_REQUIRED_VALUE,
12307: p_token1 => G_COL_NAME_TOKEN,
12308: p_token1_value => 'Financial Asset');
12309: RAISE OKL_API.G_EXCEPTION_ERROR;
12310: END IF;
12311:
12312: IF l_fin_asset_id IS NULL THEN
12313: OKC_API.set_message( p_app_name => 'OKC',
12313: OKC_API.set_message( p_app_name => 'OKC',
12314: p_msg_name => G_REQUIRED_VALUE,
12315: p_token1 => G_COL_NAME_TOKEN,
12316: p_token1_value => 'KLE_ID');
12317: RAISE OKL_API.G_EXCEPTION_ERROR;
12318: END IF;
12319:
12320: IF l_current_units IS NULL THEN
12321: OKC_API.set_message( p_app_name => 'OKC',
12321: OKC_API.set_message( p_app_name => 'OKC',
12322: p_msg_name => G_REQUIRED_VALUE,
12323: p_token1 => G_COL_NAME_TOKEN,
12324: p_token1_value => 'CURRENT_UNITS');
12325: RAISE OKL_API.G_EXCEPTION_ERROR;
12326: END IF;
12327:
12328: CLOSE l_txlassets_csr;
12329:
12334: OKC_API.set_message( p_app_name => 'OKC',
12335: p_msg_name => G_INVALID_VALUE,
12336: p_token1 => G_COL_NAME_TOKEN,
12337: p_token1_value => 'KLE_ID');
12338: RAISE OKL_API.G_EXCEPTION_ERROR;
12339: END IF;
12340: CLOSE l_okcklines_csr;
12341:
12342: IF l_dnz_khr_id IS NULL THEN
12349: OKC_API.set_message( p_app_name => 'OKC',
12350: p_msg_name => G_REQUIRED_VALUE,
12351: p_token1 => G_COL_NAME_TOKEN,
12352: p_token1_value => 'ASSET_NUMBER');
12353: RAISE OKL_API.G_EXCEPTION_ERROR;
12354: END IF;
12355: END IF;
12356: END IF;
12357:
12520: EXCEPTION
12521: WHEN OTHERS THEN
12522: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
12523: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
12524: OKL_API.set_message(
12525: p_app_name => 'OKL',
12526: p_msg_name => 'OKL_TX_TRX_UPD_ERR',
12527: p_token1 => 'TABLE_NAME',
12528: p_token1_value => 'OKL_TAX_SOURCES',
12530: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
12531: p_token3 => 'ITERATION',
12532: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
12533: END LOOP;
12534: RAISE OKL_API.G_EXCEPTION_ERROR;
12535: END IF;
12536: END;
12537: END IF;
12538:
12557: EXCEPTION
12558: WHEN OTHERS THEN
12559: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
12560: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
12561: OKL_API.set_message(p_app_name => 'OKL',
12562: p_msg_name => 'OKL_TX_TRX_INS_ERR',
12563: p_token1 => 'TABLE_NAME',
12564: p_token1_value => 'OKL_TAX_SOURCES',
12565: p_token2 => 'ERROR_CODE',
12566: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
12567: p_token3 => 'ITERATION',
12568: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
12569: END LOOP;
12570: RAISE OKL_API.G_EXCEPTION_ERROR;
12571: END IF;
12572: END;
12573:
12574: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
12605: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_split_asset_tax.',
12606: 'Return Status' || x_return_status);
12607: END IF;
12608:
12609: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12610: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12611: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12612: RAISE OKL_API.G_EXCEPTION_ERROR;
12613: END IF;
12606: 'Return Status' || x_return_status);
12607: END IF;
12608:
12609: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12610: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12611: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12612: RAISE OKL_API.G_EXCEPTION_ERROR;
12613: END IF;
12614:
12607: END IF;
12608:
12609: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12610: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12611: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12612: RAISE OKL_API.G_EXCEPTION_ERROR;
12613: END IF;
12614:
12615: -- Get the total tax amount corresponding to 'Reverse' transaction from
12608:
12609: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12610: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12611: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12612: RAISE OKL_API.G_EXCEPTION_ERROR;
12613: END IF;
12614:
12615: -- Get the total tax amount corresponding to 'Reverse' transaction from
12616: -- zx_lines and update total_tax on okl_tax_sources
12631: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_split_asset_tax.',
12632: 'Return Status' || x_return_status);
12633: END IF;
12634:
12635: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12636: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12637: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12638: RAISE OKL_API.G_EXCEPTION_ERROR;
12639: END IF;
12632: 'Return Status' || x_return_status);
12633: END IF;
12634:
12635: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12636: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12637: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12638: RAISE OKL_API.G_EXCEPTION_ERROR;
12639: END IF;
12640:
12633: END IF;
12634:
12635: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12636: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12637: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12638: RAISE OKL_API.G_EXCEPTION_ERROR;
12639: END IF;
12640:
12641: END IF;
12634:
12635: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12636: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12637: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12638: RAISE OKL_API.G_EXCEPTION_ERROR;
12639: END IF;
12640:
12641: END IF;
12642:
12648: OKC_API.set_message( p_app_name => 'OKC',
12649: p_msg_name => G_REQUIRED_VALUE,
12650: p_token1 => G_COL_NAME_TOKEN,
12651: p_token1_value => 'CUST_TRX_TYPE_ID');
12652: RAISE OKL_API.G_EXCEPTION_ERROR;
12653: END IF;
12654: CLOSE l_racusttrxtypes_csr;
12655:
12656: OPEN l_fndcurrency_csr(l_trx_currency_code);
12661: OKC_API.set_message( p_app_name => 'OKC',
12662: p_msg_name => G_INVALID_VALUE,
12663: p_token1 => G_COL_NAME_TOKEN,
12664: p_token1_value => 'CURRENCY_CODE');
12665: RAISE OKL_API.G_EXCEPTION_ERROR;
12666: END IF;
12667: CLOSE l_fndcurrency_csr;
12668:
12669: IF k > 1 THEN -- if there are any existing ACTIVE upfront tax lines
12873: EXCEPTION
12874: WHEN OTHERS THEN
12875: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
12876: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
12877: OKL_API.set_message(p_app_name => 'OKL',
12878: p_msg_name => 'OKL_TX_TRX_INS_ERR',
12879: p_token1 => 'TABLE_NAME',
12880: p_token1_value => 'OKL_TAX_SOURCES',
12881: p_token2 => 'ERROR_CODE',
12882: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
12883: p_token3 => 'ITERATION',
12884: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
12885: END LOOP;
12886: RAISE OKL_API.G_EXCEPTION_ERROR;
12887: END IF;
12888: END;
12889:
12890: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
12921: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_split_asset_tax.',
12922: 'After tax engine call '||x_return_status);
12923: END IF;
12924:
12925: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12926: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12927: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12928: RAISE OKL_API.G_EXCEPTION_ERROR;
12929: END IF;
12922: 'After tax engine call '||x_return_status);
12923: END IF;
12924:
12925: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12926: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12927: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12928: RAISE OKL_API.G_EXCEPTION_ERROR;
12929: END IF;
12930: END IF;
12923: END IF;
12924:
12925: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12926: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12927: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12928: RAISE OKL_API.G_EXCEPTION_ERROR;
12929: END IF;
12930: END IF;
12931:
12924:
12925: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12926: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12927: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12928: RAISE OKL_API.G_EXCEPTION_ERROR;
12929: END IF;
12930: END IF;
12931:
12932: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
12945: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_split_asset_tax.',
12946: 'Return Status' || x_return_status);
12947: END IF;
12948:
12949: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12950: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12951: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12952: RAISE OKL_API.G_EXCEPTION_ERROR;
12953: END IF;
12946: 'Return Status' || x_return_status);
12947: END IF;
12948:
12949: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12950: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12951: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12952: RAISE OKL_API.G_EXCEPTION_ERROR;
12953: END IF;
12954:
12947: END IF;
12948:
12949: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12950: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12951: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12952: RAISE OKL_API.G_EXCEPTION_ERROR;
12953: END IF;
12954:
12955: -- Populate Serialized Asset total tax, if the ALC happened on the asset
12948:
12949: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12950: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12951: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12952: RAISE OKL_API.G_EXCEPTION_ERROR;
12953: END IF;
12954:
12955: -- Populate Serialized Asset total tax, if the ALC happened on the asset
12956: -- before the Split process
12963: x_msg_data => x_msg_data,
12964: p_asset_id => l_txdassets_rec.target_kle_id,
12965: p_serialized_asset => l_asset_ser_alc);
12966:
12967: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12968: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12969: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12970: RAISE OKL_API.G_EXCEPTION_ERROR;
12971: END IF;
12964: p_asset_id => l_txdassets_rec.target_kle_id,
12965: p_serialized_asset => l_asset_ser_alc);
12966:
12967: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12968: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12969: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12970: RAISE OKL_API.G_EXCEPTION_ERROR;
12971: END IF;
12972: END LOOP;
12965: p_serialized_asset => l_asset_ser_alc);
12966:
12967: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12968: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12969: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12970: RAISE OKL_API.G_EXCEPTION_ERROR;
12971: END IF;
12972: END LOOP;
12973: END IF;
12966:
12967: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12968: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12969: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12970: RAISE OKL_API.G_EXCEPTION_ERROR;
12971: END IF;
12972: END LOOP;
12973: END IF;
12974:
12978: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.process_split_asset_tax ','End(-)');
12979: END IF;
12980:
12981: EXCEPTION
12982: WHEN OKL_API.G_EXCEPTION_ERROR THEN
12983: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
12984: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_split_asset_tax ',
12985: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
12986: END IF;
12981: EXCEPTION
12982: WHEN OKL_API.G_EXCEPTION_ERROR THEN
12983: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
12984: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_split_asset_tax ',
12985: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
12986: END IF;
12987:
12988: IF l_trxassets_csr%ISOPEN THEN
12989: CLOSE l_trxassets_csr;
13016: IF l_fndcurrency_csr%ISOPEN THEN
13017: CLOSE l_fndcurrency_csr;
13018: END IF;
13019:
13020: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
13021: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
13022: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_split_asset_tax ',
13023: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
13024: END IF;
13019:
13020: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
13021: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
13022: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_split_asset_tax ',
13023: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
13024: END IF;
13025:
13026: IF l_trxassets_csr%ISOPEN THEN
13027: CLOSE l_trxassets_csr;
13054: IF l_fndcurrency_csr%ISOPEN THEN
13055: CLOSE l_fndcurrency_csr;
13056: END IF;
13057:
13058: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
13059:
13060: WHEN OTHERS THEN
13061: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
13062: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_split_asset_tax ',
13094: IF l_fndcurrency_csr%ISOPEN THEN
13095: CLOSE l_fndcurrency_csr;
13096: END IF;
13097:
13098: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
13099: -- unexpected error
13100: OKL_API.set_message(p_app_name => g_app_name,
13101: p_msg_name => g_unexpected_error,
13102: p_token1 => g_sqlcode_token,
13096: END IF;
13097:
13098: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
13099: -- unexpected error
13100: OKL_API.set_message(p_app_name => g_app_name,
13101: p_msg_name => g_unexpected_error,
13102: p_token1 => g_sqlcode_token,
13103: p_token1_value => sqlcode,
13104: p_token2 => g_sqlerrm_token,
13158: --p_source_trx_name ---> 'Booking'
13159: --p_source_table ---> 'OKL_TRX_CONTRACTS'
13160: --p_tax_call_type ---> 'ESTIMATED'/'ACTUAL'
13161: --------------------------------------------------
13162: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
13163:
13164: -- validate source trx id (Booking)
13165: CURSOR l_trxcontracts_csr(cp_trx_id IN NUMBER, cp_trx_type_name IN VARCHAR2) IS
13166: SELECT a.try_id, a.khr_id, a.legal_entity_id
13395: 'p_source_table :'||p_source_table);
13396:
13397: END IF;
13398:
13399: x_return_status := OKL_API.G_RET_STS_SUCCESS;
13400:
13401: IF (p_source_trx_name = 'Booking') THEN
13402: -- validate the source trx id
13403: OPEN l_trxcontracts_csr(p_source_trx_id, p_source_trx_name);
13408: OKC_API.set_message( p_app_name => 'OKC',
13409: p_msg_name => G_INVALID_VALUE,
13410: p_token1 => G_COL_NAME_TOKEN,
13411: p_token1_value => 'SOURCE_TRX_ID');
13412: RAISE OKL_API.G_EXCEPTION_ERROR;
13413: END IF;
13414: CLOSE l_trxcontracts_csr;
13415: ELSIF (p_source_trx_name = 'Rebook') THEN
13416: -- validate the source trx id
13422: OKC_API.set_message( p_app_name => 'OKC',
13423: p_msg_name => G_INVALID_VALUE,
13424: p_token1 => G_COL_NAME_TOKEN,
13425: p_token1_value => 'SOURCE_TRX_ID');
13426: RAISE OKL_API.G_EXCEPTION_ERROR;
13427: END IF;
13428: CLOSE l_trxcontracts_rbk_csr;
13429:
13430: OPEN l_bookingtrxtypeid_csr;
13440: OKC_API.set_message( p_app_name => 'OKC',
13441: p_msg_name => G_INVALID_VALUE,
13442: p_token1 => G_COL_NAME_TOKEN,
13443: p_token1_value => 'TAX_CALL_TYPE');
13444: RAISE OKL_API.G_EXCEPTION_ERROR;
13445: END IF;
13446:
13447: IF (l_tax_call_type = G_ESTIMATED_CALL_TYPE) THEN
13448:
13471: EXCEPTION
13472: WHEN OTHERS THEN
13473: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
13474: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
13475: OKL_API.set_message(p_app_name => 'OKL',
13476: p_msg_name => 'OKL_TX_TRX_DEL_ERR',
13477: p_token1 => 'TABLE_NAME',
13478: p_token1_value => 'OKL_TAX_SOURCES',
13479: p_token2 => 'ERROR_CODE',
13480: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
13481: p_token3 => 'ITERATION',
13482: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
13483: END LOOP;
13484: RAISE OKL_API.G_EXCEPTION_ERROR;
13485: END IF;
13486: END;
13487: END IF;
13488: EXIT WHEN l_prev_taxsources_csr%NOTFOUND;
13517: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax.',
13518: 'Return Status' || x_return_status);
13519: END IF;
13520:
13521: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13522: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13523: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13524: RAISE OKL_API.G_EXCEPTION_ERROR;
13525: END IF;
13518: 'Return Status' || x_return_status);
13519: END IF;
13520:
13521: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13522: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13523: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13524: RAISE OKL_API.G_EXCEPTION_ERROR;
13525: END IF;
13526: END IF;
13519: END IF;
13520:
13521: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13522: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13523: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13524: RAISE OKL_API.G_EXCEPTION_ERROR;
13525: END IF;
13526: END IF;
13527: -- delete booking tax lines from zx_lines -- end
13520:
13521: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13522: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13523: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13524: RAISE OKL_API.G_EXCEPTION_ERROR;
13525: END IF;
13526: END IF;
13527: -- delete booking tax lines from zx_lines -- end
13528:
13534: l_taxation_country := get_default_taxation_country(x_return_status => x_return_status,
13535: x_msg_count => x_msg_count,
13536: x_msg_data => x_msg_data,
13537: p_legal_entity_id => l_legal_entity_id);
13538: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13539: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13540: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13541: RAISE OKL_API.G_EXCEPTION_ERROR;
13542: END IF;
13535: x_msg_count => x_msg_count,
13536: x_msg_data => x_msg_data,
13537: p_legal_entity_id => l_legal_entity_id);
13538: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13539: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13540: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13541: RAISE OKL_API.G_EXCEPTION_ERROR;
13542: END IF;
13543:
13536: x_msg_data => x_msg_data,
13537: p_legal_entity_id => l_legal_entity_id);
13538: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13539: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13540: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13541: RAISE OKL_API.G_EXCEPTION_ERROR;
13542: END IF;
13543:
13544: -- Check if taxable basis override applies to Estimated Booking / Booking transaction
13537: p_legal_entity_id => l_legal_entity_id);
13538: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13539: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13540: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13541: RAISE OKL_API.G_EXCEPTION_ERROR;
13542: END IF;
13543:
13544: -- Check if taxable basis override applies to Estimated Booking / Booking transaction
13545: OPEN l_txbasisoverride_csr(l_bk_trx_type_id_det);
13553: OKC_API.set_message( p_app_name => 'OKC',
13554: p_msg_name => G_INVALID_VALUE,
13555: p_token1 => G_COL_NAME_TOKEN,
13556: p_token1_value => 'FMA_ID');
13557: RAISE OKL_API.G_EXCEPTION_ERROR;
13558: END IF;
13559: CLOSE l_formulae_csr;
13560:
13561: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
13596: x_currency_conversion_rate => lx_currency_conversion_rate,
13597: x_currency_conversion_date => lx_currency_conversion_date,
13598: x_contract_start_date => lx_contract_start_date);
13599:
13600: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13601: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13602: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13603: RAISE OKL_API.G_EXCEPTION_ERROR;
13604: END IF;
13597: x_currency_conversion_date => lx_currency_conversion_date,
13598: x_contract_start_date => lx_contract_start_date);
13599:
13600: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13601: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13602: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13603: RAISE OKL_API.G_EXCEPTION_ERROR;
13604: END IF;
13605:
13598: x_contract_start_date => lx_contract_start_date);
13599:
13600: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13601: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13602: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13603: RAISE OKL_API.G_EXCEPTION_ERROR;
13604: END IF;
13605:
13606: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
13599:
13600: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13601: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13602: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13603: RAISE OKL_API.G_EXCEPTION_ERROR;
13604: END IF;
13605:
13606: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
13607: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax.',
13692: x_usage_of_equipment => l_pb_usage_of_equipment,
13693: x_age_of_equipment => l_pb_age_of_equipment,
13694: x_vendor_site_id => l_pb_vendor_site_id);
13695:
13696: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13697: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13698: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13699: RAISE OKL_API.G_EXCEPTION_ERROR;
13700: END IF;
13693: x_age_of_equipment => l_pb_age_of_equipment,
13694: x_vendor_site_id => l_pb_vendor_site_id);
13695:
13696: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13697: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13698: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13699: RAISE OKL_API.G_EXCEPTION_ERROR;
13700: END IF;
13701:
13694: x_vendor_site_id => l_pb_vendor_site_id);
13695:
13696: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13697: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13698: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13699: RAISE OKL_API.G_EXCEPTION_ERROR;
13700: END IF;
13701:
13702: -- Equipment Type(inventory item id)
13695:
13696: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13697: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13698: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13699: RAISE OKL_API.G_EXCEPTION_ERROR;
13700: END IF;
13701:
13702: -- Equipment Type(inventory item id)
13703: -- get the inventory item id
13703: -- get the inventory item id
13704: OPEN l_invitem_csr(l_finassets_tbl(k).fin_asset_id);
13705: FETCH l_invitem_csr INTO l_inv_item_id, l_inv_item_org_id;
13706: IF l_invitem_csr%NOTFOUND THEN
13707: OKL_API.set_message(
13708: p_app_name => 'OKL',
13709: p_msg_name => 'OKL_TX_INV_ITEM_ERR',
13710: p_token1 => 'ASSET_NUMBER',
13711: p_token1_value => l_finassets_tbl(k).asset_number);
13709: p_msg_name => 'OKL_TX_INV_ITEM_ERR',
13710: p_token1 => 'ASSET_NUMBER',
13711: p_token1_value => l_finassets_tbl(k).asset_number);
13712:
13713: RAISE OKL_API.G_EXCEPTION_ERROR;
13714: END IF;
13715: CLOSE l_invitem_csr;
13716:
13717: -- get the Location Party ID's
13732: x_ship_to_location_id => lx_ship_to_location_id,
13733: x_ship_to_party_id => lx_ship_to_party_id,
13734: x_ship_to_site_use_id => lx_ship_to_siteuseid);
13735:
13736: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13737: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13738: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13739: RAISE OKL_API.G_EXCEPTION_ERROR;
13740: END IF;
13733: x_ship_to_party_id => lx_ship_to_party_id,
13734: x_ship_to_site_use_id => lx_ship_to_siteuseid);
13735:
13736: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13737: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13738: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13739: RAISE OKL_API.G_EXCEPTION_ERROR;
13740: END IF;
13741:
13734: x_ship_to_site_use_id => lx_ship_to_siteuseid);
13735:
13736: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13737: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13738: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13739: RAISE OKL_API.G_EXCEPTION_ERROR;
13740: END IF;
13741:
13742: l_pb_asset_level_det_tbl(i).fin_asset_id := l_finassets_tbl(k).fin_asset_id;
13735:
13736: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13737: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13738: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13739: RAISE OKL_API.G_EXCEPTION_ERROR;
13740: END IF;
13741:
13742: l_pb_asset_level_det_tbl(i).fin_asset_id := l_finassets_tbl(k).fin_asset_id;
13743: l_pb_asset_level_det_tbl(i).asset_number := l_finassets_tbl(k).asset_number;
13923: p_term_quote_reason_code => null,
13924: px_tax_sources_tbl => lx_tax_sources_tbl,
13925: px_line_params_tbl => lx_line_params_tbl );
13926:
13927: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13928: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13929: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13930: RAISE OKL_API.G_EXCEPTION_ERROR;
13931: END IF;
13924: px_tax_sources_tbl => lx_tax_sources_tbl,
13925: px_line_params_tbl => lx_line_params_tbl );
13926:
13927: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13928: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13929: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13930: RAISE OKL_API.G_EXCEPTION_ERROR;
13931: END IF;
13932:
13925: px_line_params_tbl => lx_line_params_tbl );
13926:
13927: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13928: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13929: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13930: RAISE OKL_API.G_EXCEPTION_ERROR;
13931: END IF;
13932:
13933: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
13926:
13927: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13928: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13929: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13930: RAISE OKL_API.G_EXCEPTION_ERROR;
13931: END IF;
13932:
13933: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
13934: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax.',
14034: p_term_quote_reason_code => null,
14035: px_tax_sources_tbl => lx_tax_sources_tbl,
14036: px_line_params_tbl => lx_line_params_tbl );
14037:
14038: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14039: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14040: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14041: RAISE OKL_API.G_EXCEPTION_ERROR;
14042: END IF;
14035: px_tax_sources_tbl => lx_tax_sources_tbl,
14036: px_line_params_tbl => lx_line_params_tbl );
14037:
14038: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14039: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14040: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14041: RAISE OKL_API.G_EXCEPTION_ERROR;
14042: END IF;
14043: -- asset level call end
14036: px_line_params_tbl => lx_line_params_tbl );
14037:
14038: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14039: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14040: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14041: RAISE OKL_API.G_EXCEPTION_ERROR;
14042: END IF;
14043: -- asset level call end
14044:
14037:
14038: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14039: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14040: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14041: RAISE OKL_API.G_EXCEPTION_ERROR;
14042: END IF;
14043: -- asset level call end
14044:
14045: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14159: p_term_quote_reason_code => null,
14160: px_tax_sources_tbl => lx_tax_sources_tbl,
14161: px_line_params_tbl => lx_line_params_tbl );
14162:
14163: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14164: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14165: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14166: RAISE OKL_API.G_EXCEPTION_ERROR;
14167: END IF;
14160: px_tax_sources_tbl => lx_tax_sources_tbl,
14161: px_line_params_tbl => lx_line_params_tbl );
14162:
14163: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14164: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14165: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14166: RAISE OKL_API.G_EXCEPTION_ERROR;
14167: END IF;
14168:
14161: px_line_params_tbl => lx_line_params_tbl );
14162:
14163: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14164: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14165: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14166: RAISE OKL_API.G_EXCEPTION_ERROR;
14167: END IF;
14168:
14169: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14162:
14163: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14164: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14165: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14166: RAISE OKL_API.G_EXCEPTION_ERROR;
14167: END IF;
14168:
14169: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14170: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax.',
14274: p_term_quote_reason_code => null,
14275: px_tax_sources_tbl => lx_tax_sources_tbl,
14276: px_line_params_tbl => lx_line_params_tbl );
14277:
14278: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14279: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14280: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14281: RAISE OKL_API.G_EXCEPTION_ERROR;
14282: END IF;
14275: px_tax_sources_tbl => lx_tax_sources_tbl,
14276: px_line_params_tbl => lx_line_params_tbl );
14277:
14278: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14279: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14280: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14281: RAISE OKL_API.G_EXCEPTION_ERROR;
14282: END IF;
14283:
14276: px_line_params_tbl => lx_line_params_tbl );
14277:
14278: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14279: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14280: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14281: RAISE OKL_API.G_EXCEPTION_ERROR;
14282: END IF;
14283:
14284: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14277:
14278: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14279: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14280: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14281: RAISE OKL_API.G_EXCEPTION_ERROR;
14282: END IF;
14283:
14284: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14285: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax.',
14407: p_term_quote_reason_code => null,
14408: px_tax_sources_tbl => lx_tax_sources_tbl,
14409: px_line_params_tbl => lx_line_params_tbl );
14410:
14411: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14412: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14413: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14414: RAISE OKL_API.G_EXCEPTION_ERROR;
14415: END IF;
14408: px_tax_sources_tbl => lx_tax_sources_tbl,
14409: px_line_params_tbl => lx_line_params_tbl );
14410:
14411: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14412: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14413: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14414: RAISE OKL_API.G_EXCEPTION_ERROR;
14415: END IF;
14416:
14409: px_line_params_tbl => lx_line_params_tbl );
14410:
14411: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14412: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14413: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14414: RAISE OKL_API.G_EXCEPTION_ERROR;
14415: END IF;
14416:
14417: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14410:
14411: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14412: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14413: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14414: RAISE OKL_API.G_EXCEPTION_ERROR;
14415: END IF;
14416:
14417: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14418: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax.',
14516: p_term_quote_reason_code => null,
14517: px_tax_sources_tbl => lx_tax_sources_tbl,
14518: px_line_params_tbl => lx_line_params_tbl );
14519:
14520: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14521: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14522: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14523: RAISE OKL_API.G_EXCEPTION_ERROR;
14524: END IF;
14517: px_tax_sources_tbl => lx_tax_sources_tbl,
14518: px_line_params_tbl => lx_line_params_tbl );
14519:
14520: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14521: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14522: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14523: RAISE OKL_API.G_EXCEPTION_ERROR;
14524: END IF;
14525: -- asset level call end
14518: px_line_params_tbl => lx_line_params_tbl );
14519:
14520: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14521: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14522: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14523: RAISE OKL_API.G_EXCEPTION_ERROR;
14524: END IF;
14525: -- asset level call end
14526: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14519:
14520: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14521: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14522: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14523: RAISE OKL_API.G_EXCEPTION_ERROR;
14524: END IF;
14525: -- asset level call end
14526: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14527: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax.',
14548: EXCEPTION
14549: WHEN OTHERS THEN
14550: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
14551: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
14552: OKL_API.set_message(
14553: p_app_name => 'OKL',
14554: p_msg_name => 'OKL_TX_TRX_INS_ERR',
14555: p_token1 => 'TABLE_NAME',
14556: p_token1_value => 'OKL_TAX_SOURCES',
14558: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
14559: p_token3 => 'ITERATION',
14560: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
14561: END LOOP;
14562: RAISE OKL_API.G_EXCEPTION_ERROR;
14563: END IF;
14564: END;
14565: -- Insert into okl_tax_sources end --
14566:
14596: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax.',
14597: 'After tax engine call '||x_return_status);
14598: END IF;
14599:
14600: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14601: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14602: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14603: RAISE OKL_API.G_EXCEPTION_ERROR;
14604: END IF;
14597: 'After tax engine call '||x_return_status);
14598: END IF;
14599:
14600: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14601: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14602: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14603: RAISE OKL_API.G_EXCEPTION_ERROR;
14604: END IF;
14605: END IF;
14598: END IF;
14599:
14600: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14601: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14602: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14603: RAISE OKL_API.G_EXCEPTION_ERROR;
14604: END IF;
14605: END IF;
14606:
14599:
14600: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14601: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14602: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14603: RAISE OKL_API.G_EXCEPTION_ERROR;
14604: END IF;
14605: END IF;
14606:
14607: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14620: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax.',
14621: 'Return Status' || x_return_status);
14622: END IF;
14623:
14624: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14625: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14626: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14627: RAISE OKL_API.G_EXCEPTION_ERROR;
14628: END IF;
14621: 'Return Status' || x_return_status);
14622: END IF;
14623:
14624: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14625: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14626: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14627: RAISE OKL_API.G_EXCEPTION_ERROR;
14628: END IF;
14629:
14622: END IF;
14623:
14624: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14625: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14626: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14627: RAISE OKL_API.G_EXCEPTION_ERROR;
14628: END IF;
14629:
14630: ELSIF (l_tax_call_type = G_ACTUAL_CALL_TYPE) THEN
14623:
14624: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14625: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14626: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14627: RAISE OKL_API.G_EXCEPTION_ERROR;
14628: END IF;
14629:
14630: ELSIF (l_tax_call_type = G_ACTUAL_CALL_TYPE) THEN
14631:
14649: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax.',
14650: 'Return Status' || x_return_status);
14651: END IF;
14652:
14653: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14654: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14655: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14656: RAISE OKL_API.G_EXCEPTION_ERROR;
14657: END IF;
14650: 'Return Status' || x_return_status);
14651: END IF;
14652:
14653: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14654: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14655: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14656: RAISE OKL_API.G_EXCEPTION_ERROR;
14657: END IF;
14658:
14651: END IF;
14652:
14653: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14654: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14655: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14656: RAISE OKL_API.G_EXCEPTION_ERROR;
14657: END IF;
14658:
14659: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14652:
14653: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14654: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14655: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14656: RAISE OKL_API.G_EXCEPTION_ERROR;
14657: END IF;
14658:
14659: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14660: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax.',
14672: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax.',
14673: 'Return Status' || x_return_status);
14674: END IF;
14675:
14676: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14677: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14678: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14679: RAISE OKL_API.G_EXCEPTION_ERROR;
14680: END IF;
14673: 'Return Status' || x_return_status);
14674: END IF;
14675:
14676: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14677: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14678: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14679: RAISE OKL_API.G_EXCEPTION_ERROR;
14680: END IF;
14681:
14674: END IF;
14675:
14676: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14677: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14678: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14679: RAISE OKL_API.G_EXCEPTION_ERROR;
14680: END IF;
14681:
14682: END IF;
14675:
14676: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14677: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14678: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14679: RAISE OKL_API.G_EXCEPTION_ERROR;
14680: END IF;
14681:
14682: END IF;
14683:
14684: IF (G_DEBUG_LEVEL_PROCEDURE >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14685: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax ','End(-)');
14686: END IF;
14687: EXCEPTION
14688: WHEN OKL_API.G_EXCEPTION_ERROR THEN
14689: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14690: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax ',
14691: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
14692: END IF;
14687: EXCEPTION
14688: WHEN OKL_API.G_EXCEPTION_ERROR THEN
14689: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14690: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax ',
14691: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
14692: END IF;
14693:
14694: IF l_trxcontracts_csr%ISOPEN THEN
14695: CLOSE l_trxcontracts_csr;
14722: IF l_formulae_csr%ISOPEN THEN
14723: CLOSE l_formulae_csr;
14724: END IF;
14725:
14726: x_return_status := OKL_API.G_RET_STS_ERROR;
14727: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
14728: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14729: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax ',
14730: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
14723: CLOSE l_formulae_csr;
14724: END IF;
14725:
14726: x_return_status := OKL_API.G_RET_STS_ERROR;
14727: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
14728: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14729: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax ',
14730: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
14731: END IF;
14726: x_return_status := OKL_API.G_RET_STS_ERROR;
14727: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
14728: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14729: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax ',
14730: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
14731: END IF;
14732:
14733: IF l_trxcontracts_csr%ISOPEN THEN
14734: CLOSE l_trxcontracts_csr;
14761: IF l_formulae_csr%ISOPEN THEN
14762: CLOSE l_formulae_csr;
14763: END IF;
14764:
14765: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
14766:
14767: WHEN OTHERS THEN
14768: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14769: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax ',
14801: IF l_formulae_csr%ISOPEN THEN
14802: CLOSE l_formulae_csr;
14803: END IF;
14804:
14805: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
14806: -- unexpected error
14807: OKL_API.set_message(p_app_name => g_app_name,
14808: p_msg_name => g_unexpected_error,
14809: p_token1 => g_sqlcode_token,
14803: END IF;
14804:
14805: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
14806: -- unexpected error
14807: OKL_API.set_message(p_app_name => g_app_name,
14808: p_msg_name => g_unexpected_error,
14809: p_token1 => g_sqlcode_token,
14810: p_token1_value => sqlcode,
14811: p_token2 => g_sqlerrm_token,
14880: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_pre_rbk_upfront_tax.',
14881: 'p_tax_call_type :'||p_tax_call_type);
14882: END IF;
14883:
14884: x_return_status := OKL_API.G_RET_STS_SUCCESS;
14885:
14886: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14887: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_pre_rbk_upfront_tax.',
14888: 'Calling process_booking_upfront_tax');
14902: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_pre_rbk_upfront_tax.',
14903: 'Finished process_booking_upfront_tax '|| x_return_status);
14904: END IF;
14905:
14906: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14907: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14908: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14909: RAISE OKL_API.G_EXCEPTION_ERROR;
14910: END IF;
14903: 'Finished process_booking_upfront_tax '|| x_return_status);
14904: END IF;
14905:
14906: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14907: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14908: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14909: RAISE OKL_API.G_EXCEPTION_ERROR;
14910: END IF;
14911:
14904: END IF;
14905:
14906: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14907: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14908: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14909: RAISE OKL_API.G_EXCEPTION_ERROR;
14910: END IF;
14911:
14912: IF (G_DEBUG_LEVEL_PROCEDURE >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14905:
14906: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14907: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14908: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14909: RAISE OKL_API.G_EXCEPTION_ERROR;
14910: END IF;
14911:
14912: IF (G_DEBUG_LEVEL_PROCEDURE >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14913: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.process_pre_rbk_upfront_tax ','End(-)');
14913: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.process_pre_rbk_upfront_tax ','End(-)');
14914: END IF;
14915:
14916: EXCEPTION
14917: WHEN OKL_API.G_EXCEPTION_ERROR THEN
14918: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14919: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_pre_rbk_upfront_tax ',
14920: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
14921: END IF;
14916: EXCEPTION
14917: WHEN OKL_API.G_EXCEPTION_ERROR THEN
14918: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14919: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_pre_rbk_upfront_tax ',
14920: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
14921: END IF;
14922:
14923: x_return_status := OKL_API.G_RET_STS_ERROR;
14924:
14919: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_pre_rbk_upfront_tax ',
14920: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
14921: END IF;
14922:
14923: x_return_status := OKL_API.G_RET_STS_ERROR;
14924:
14925: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
14926: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14927: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_pre_rbk_upfront_tax ',
14921: END IF;
14922:
14923: x_return_status := OKL_API.G_RET_STS_ERROR;
14924:
14925: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
14926: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14927: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_pre_rbk_upfront_tax ',
14928: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
14929: END IF;
14924:
14925: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
14926: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14927: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_pre_rbk_upfront_tax ',
14928: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
14929: END IF;
14930:
14931: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
14932:
14927: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_pre_rbk_upfront_tax ',
14928: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
14929: END IF;
14930:
14931: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
14932:
14933: WHEN OTHERS THEN
14934: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14935: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_pre_rbk_upfront_tax ',
14935: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_pre_rbk_upfront_tax ',
14936: 'EXCEPTION :'||sqlerrm);
14937: END IF;
14938:
14939: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
14940: -- unexpected error
14941: OKL_API.set_message(p_app_name => g_app_name,
14942: p_msg_name => g_unexpected_error,
14943: p_token1 => g_sqlcode_token,
14937: END IF;
14938:
14939: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
14940: -- unexpected error
14941: OKL_API.set_message(p_app_name => g_app_name,
14942: p_msg_name => g_unexpected_error,
14943: p_token1 => g_sqlcode_token,
14944: p_token1_value => sqlcode,
14945: p_token2 => g_sqlerrm_token,
14995: --p_source_trx_name ---> 'Rebook'
14996: --p_source_table ---> 'OKL_TRX_CONTRACTS'
14997: --------------------------------------------------
14998:
14999: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
15000:
15001: -- validate source trx id
15002: -- okl_trx_contracts.khr_id has original contract id
15003: -- okl_trx_contracts.khr_id_new has rebook copy contract id
15097: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_rebook_upfront_tax.',
15098: 'p_source_table :'||p_source_table);
15099: END IF;
15100:
15101: x_return_status := OKL_API.G_RET_STS_SUCCESS;
15102:
15103: -- Validate the source trx id
15104: OPEN l_trxcontracts_csr(p_source_trx_id, p_source_trx_name);
15105: FETCH l_trxcontracts_csr INTO l_rbk_trx_type_id_det, l_khr_id, l_rbk_khr_id, l_trx_date; -- l_khr_id has original contract id
15109: OKC_API.set_message( p_app_name => 'OKC',
15110: p_msg_name => G_INVALID_VALUE,
15111: p_token1 => G_COL_NAME_TOKEN,
15112: p_token1_value => 'SOURCE_TRX_ID');
15113: RAISE OKL_API.G_EXCEPTION_ERROR;
15114: END IF;
15115: CLOSE l_trxcontracts_csr;
15116:
15117: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
15272: EXCEPTION
15273: WHEN OTHERS THEN
15274: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
15275: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
15276: OKL_API.set_message(
15277: p_app_name => 'OKL',
15278: p_msg_name => 'OKL_TX_TRX_UPD_ERR',
15279: p_token1 => 'TABLE_NAME',
15280: p_token1_value => 'OKL_TAX_SOURCES',
15282: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
15283: p_token3 => 'ITERATION',
15284: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
15285: END LOOP;
15286: RAISE OKL_API.G_EXCEPTION_ERROR;
15287: END IF;
15288: END;
15289:
15290: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
15306: EXCEPTION
15307: WHEN OTHERS THEN
15308: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
15309: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
15310: OKL_API.set_message(p_app_name => 'OKL',
15311: p_msg_name => 'OKL_TX_TRX_INS_ERR',
15312: p_token1 => 'TABLE_NAME',
15313: p_token1_value => 'OKL_TAX_SOURCES',
15314: p_token2 => 'ERROR_CODE',
15315: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
15316: p_token3 => 'ITERATION',
15317: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
15318: END LOOP;
15319: RAISE OKL_API.G_EXCEPTION_ERROR;
15320: END IF;
15321: END;
15322: -- bulk insert into okl_tax_sources -- end
15323:
15349: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_rebook_upfront_tax.',
15350: 'Return Status' || x_return_status);
15351: END IF;
15352:
15353: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15354: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15355: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15356: RAISE OKL_API.G_EXCEPTION_ERROR;
15357: END IF;
15350: 'Return Status' || x_return_status);
15351: END IF;
15352:
15353: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15354: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15355: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15356: RAISE OKL_API.G_EXCEPTION_ERROR;
15357: END IF;
15358:
15351: END IF;
15352:
15353: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15354: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15355: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15356: RAISE OKL_API.G_EXCEPTION_ERROR;
15357: END IF;
15358:
15359: -- Get the total tax amount corresponding to 'Reverse' transaction initiated
15352:
15353: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15354: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15355: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15356: RAISE OKL_API.G_EXCEPTION_ERROR;
15357: END IF;
15358:
15359: -- Get the total tax amount corresponding to 'Reverse' transaction initiated
15360: -- for the 'Rebook' transaction and update total_tax in okl_tax_sources
15375: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_rebook_upfront_tax.',
15376: 'Return Status' || x_return_status);
15377: END IF;
15378:
15379: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15380: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15381: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15382: RAISE OKL_API.G_EXCEPTION_ERROR;
15383: END IF;
15376: 'Return Status' || x_return_status);
15377: END IF;
15378:
15379: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15380: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15381: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15382: RAISE OKL_API.G_EXCEPTION_ERROR;
15383: END IF;
15384:
15377: END IF;
15378:
15379: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15380: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15381: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15382: RAISE OKL_API.G_EXCEPTION_ERROR;
15383: END IF;
15384:
15385: END IF; -- Perform reversal only if the booking tax exists
15378:
15379: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15380: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15381: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15382: RAISE OKL_API.G_EXCEPTION_ERROR;
15383: END IF;
15384:
15385: END IF; -- Perform reversal only if the booking tax exists
15386:
15406: OKC_API.set_message( p_app_name => 'OKC',
15407: p_msg_name => G_INVALID_VALUE,
15408: p_token1 => G_COL_NAME_TOKEN,
15409: p_token1_value => 'SOURCE_TRX_ID');
15410: RAISE OKL_API.G_EXCEPTION_ERROR;
15411: END IF;
15412: CLOSE l_orig_kle_id;
15413:
15414: IF (l_sync_kle_id IS NOT NULL) THEN
15423: OKC_API.set_message( p_app_name => 'OKC',
15424: p_msg_name => G_INVALID_VALUE,
15425: p_token1 => G_COL_NAME_TOKEN,
15426: p_token1_value => 'SOURCE_TRX_ID');
15427: RAISE OKL_API.G_EXCEPTION_ERROR;
15428: END IF;
15429: CLOSE l_new_line_id;
15430:
15431: l_txsv_tbl(i).kle_id := l_sync_kle_id;
15456: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_rebook_upfront_tax',
15457: 'Return Status' || x_return_status);
15458: END IF;
15459:
15460: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15461: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15462: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15463: RAISE OKL_API.G_EXCEPTION_ERROR;
15464: END IF;
15457: 'Return Status' || x_return_status);
15458: END IF;
15459:
15460: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15461: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15462: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15463: RAISE OKL_API.G_EXCEPTION_ERROR;
15464: END IF;
15465: END IF;
15458: END IF;
15459:
15460: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15461: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15462: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15463: RAISE OKL_API.G_EXCEPTION_ERROR;
15464: END IF;
15465: END IF;
15466: -- End Sync rebook tax sources with original contract info
15459:
15460: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15461: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15462: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15463: RAISE OKL_API.G_EXCEPTION_ERROR;
15464: END IF;
15465: END IF;
15466: -- End Sync rebook tax sources with original contract info
15467:
15487: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_rebook_upfront_tax.',
15488: 'Return Status' || x_return_status);
15489: END IF;
15490:
15491: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15492: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15493: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15494: RAISE OKL_API.G_EXCEPTION_ERROR;
15495: END IF;
15488: 'Return Status' || x_return_status);
15489: END IF;
15490:
15491: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15492: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15493: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15494: RAISE OKL_API.G_EXCEPTION_ERROR;
15495: END IF;
15496:
15489: END IF;
15490:
15491: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15492: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15493: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15494: RAISE OKL_API.G_EXCEPTION_ERROR;
15495: END IF;
15496:
15497: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
15490:
15491: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15492: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15493: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15494: RAISE OKL_API.G_EXCEPTION_ERROR;
15495: END IF;
15496:
15497: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
15498: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_rebook_upfront_tax.',
15510: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_rebook_upfront_tax.',
15511: 'Return Status' || x_return_status);
15512: END IF;
15513:
15514: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15515: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15516: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15517: RAISE OKL_API.G_EXCEPTION_ERROR;
15518: END IF;
15511: 'Return Status' || x_return_status);
15512: END IF;
15513:
15514: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15515: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15516: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15517: RAISE OKL_API.G_EXCEPTION_ERROR;
15518: END IF;
15519:
15512: END IF;
15513:
15514: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15515: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15516: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15517: RAISE OKL_API.G_EXCEPTION_ERROR;
15518: END IF;
15519:
15520: IF (G_DEBUG_LEVEL_PROCEDURE >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
15513:
15514: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15515: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15516: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15517: RAISE OKL_API.G_EXCEPTION_ERROR;
15518: END IF;
15519:
15520: IF (G_DEBUG_LEVEL_PROCEDURE >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
15521: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.process_rebook_upfront_tax ','End(-)');
15521: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.process_rebook_upfront_tax ','End(-)');
15522: END IF;
15523:
15524: EXCEPTION
15525: WHEN OKL_API.G_EXCEPTION_ERROR THEN
15526: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
15527: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_rebook_upfront_tax ',
15528: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
15529: END IF;
15524: EXCEPTION
15525: WHEN OKL_API.G_EXCEPTION_ERROR THEN
15526: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
15527: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_rebook_upfront_tax ',
15528: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
15529: END IF;
15530:
15531: IF l_trxcontracts_csr%ISOPEN THEN
15532: CLOSE l_trxcontracts_csr;
15547: IF l_new_line_id%ISOPEN THEN
15548: CLOSE l_new_line_id;
15549: END IF;
15550:
15551: x_return_status := OKL_API.G_RET_STS_ERROR;
15552:
15553: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
15554: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
15555: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_rebook_upfront_tax ',
15549: END IF;
15550:
15551: x_return_status := OKL_API.G_RET_STS_ERROR;
15552:
15553: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
15554: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
15555: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_rebook_upfront_tax ',
15556: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
15557: END IF;
15552:
15553: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
15554: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
15555: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_rebook_upfront_tax ',
15556: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
15557: END IF;
15558:
15559: IF l_trxcontracts_csr%ISOPEN THEN
15560: CLOSE l_trxcontracts_csr;
15575: IF l_new_line_id%ISOPEN THEN
15576: CLOSE l_new_line_id;
15577: END IF;
15578:
15579: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
15580:
15581: WHEN OTHERS THEN
15582: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
15583: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_rebook_upfront_tax ',
15603: IF l_new_line_id%ISOPEN THEN
15604: CLOSE l_new_line_id;
15605: END IF;
15606:
15607: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
15608: -- unexpected error
15609: OKL_API.set_message(p_app_name => g_app_name,
15610: p_msg_name => g_unexpected_error,
15611: p_token1 => g_sqlcode_token,
15605: END IF;
15606:
15607: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
15608: -- unexpected error
15609: OKL_API.set_message(p_app_name => g_app_name,
15610: p_msg_name => g_unexpected_error,
15611: p_token1 => g_sqlcode_token,
15612: p_token1_value => sqlcode,
15613: p_token2 => g_sqlerrm_token,
15665: -- 'Sales Quote' is not going to store/add try_id in okl_lease_quotes_b,
15666: -- as it will be the same for all the rows
15667: ----------------------------------------------------------------------
15668:
15669: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
15670:
15671: -- Validate source trx id
15672: CURSOR l_leasequotes_csr(cp_trx_id IN NUMBER) IS
15673: SELECT expected_start_date, product_id, interest_disclosed,
15954: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax.',
15955: 'p_source_table :'||p_source_table);
15956: END IF;
15957:
15958: x_return_status := OKL_API.G_RET_STS_SUCCESS;
15959:
15960: -- Validate the source trx id
15961: OPEN l_leasequotes_csr(p_source_trx_id);
15962: FETCH l_leasequotes_csr INTO l_k_start_date, l_sq_fin_prod_id, l_sq_int_disclosed,
15968: OKC_API.set_message( p_app_name => 'OKC',
15969: p_msg_name => G_INVALID_VALUE,
15970: p_token1 => G_COL_NAME_TOKEN,
15971: p_token1_value => 'SOURCE_TRX_ID');
15972: RAISE OKL_API.G_EXCEPTION_ERROR;
15973: END IF;
15974: CLOSE l_leasequotes_csr;
15975:
15976: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
16024: EXCEPTION
16025: WHEN OTHERS THEN
16026: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
16027: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
16028: OKL_API.set_message( p_app_name => 'OKL',
16029: p_msg_name => 'OKL_TX_TRX_DEL_ERR',
16030: p_token1 => 'TABLE_NAME',
16031: p_token1_value => 'OKL_TAX_TRX_DETAILS',
16032: p_token2 => 'ERROR_CODE',
16033: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
16034: p_token3 => 'ITERATION',
16035: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
16036: END LOOP;
16037: RAISE OKL_API.G_EXCEPTION_ERROR;
16038: END IF;
16039: END;
16040:
16041: BEGIN
16044: EXCEPTION
16045: WHEN OTHERS THEN
16046: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
16047: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
16048: OKL_API.set_message( p_app_name => 'OKL',
16049: p_msg_name => 'OKL_TX_TRX_DEL_ERR',
16050: p_token1 => 'TABLE_NAME',
16051: p_token1_value => 'OKL_TAX_SOURCES',
16052: p_token2 => 'ERROR_CODE',
16053: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
16054: p_token3 => 'ITERATION',
16055: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
16056: END LOOP;
16057: RAISE OKL_API.G_EXCEPTION_ERROR;
16058: END IF;
16059: END;
16060:
16061: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
16076: l_taxation_country := get_default_taxation_country(x_return_status => x_return_status,
16077: x_msg_count => x_msg_count,
16078: x_msg_data => x_msg_data,
16079: p_legal_entity_id => l_legal_entity_id);
16080: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16081: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16082: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16083: RAISE OKL_API.G_EXCEPTION_ERROR;
16084: END IF;
16077: x_msg_count => x_msg_count,
16078: x_msg_data => x_msg_data,
16079: p_legal_entity_id => l_legal_entity_id);
16080: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16081: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16082: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16083: RAISE OKL_API.G_EXCEPTION_ERROR;
16084: END IF;
16085:
16078: x_msg_data => x_msg_data,
16079: p_legal_entity_id => l_legal_entity_id);
16080: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16081: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16082: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16083: RAISE OKL_API.G_EXCEPTION_ERROR;
16084: END IF;
16085:
16086: -- Fetch 'Sales Quote' Trx type ID
16079: p_legal_entity_id => l_legal_entity_id);
16080: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16081: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16082: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16083: RAISE OKL_API.G_EXCEPTION_ERROR;
16084: END IF;
16085:
16086: -- Fetch 'Sales Quote' Trx type ID
16087: OPEN l_trxtypes_csr;
16107: OKC_API.set_message( p_app_name => 'OKC',
16108: p_msg_name => G_INVALID_VALUE,
16109: p_token1 => G_COL_NAME_TOKEN,
16110: p_token1_value => 'FMA_ID');
16111: RAISE OKL_API.G_EXCEPTION_ERROR;
16112: END IF;
16113: CLOSE l_formulae_csr;
16114:
16115: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
16126: OKC_API.set_message( p_app_name => 'OKC',
16127: p_msg_name => G_REQUIRED_VALUE,
16128: p_token1 => G_COL_NAME_TOKEN,
16129: p_token1_value => 'CUST_TRX_TYPE_ID');
16130: RAISE OKL_API.G_EXCEPTION_ERROR;
16131: END IF;
16132: CLOSE l_racusttrxtypes_csr;
16133:
16134: -- Fetch parent object values
16142: OKC_API.set_message( p_app_name => 'OKC',
16143: p_msg_name => G_REQUIRED_VALUE,
16144: p_token1 => G_COL_NAME_TOKEN,
16145: p_token1_value => 'CURRENCY_CODE');
16146: RAISE OKL_API.G_EXCEPTION_ERROR;
16147: END IF;
16148: CLOSE l_leaseopp_csr;
16149: ELSIF l_parent_object_code ='LEASEAPP' THEN
16150: OPEN l_leaseapp_csr(p_source_trx_id);
16156: OKC_API.set_message( p_app_name => 'OKC',
16157: p_msg_name => G_REQUIRED_VALUE,
16158: p_token1 => G_COL_NAME_TOKEN,
16159: p_token1_value => 'CURRENCY_CODE');
16160: RAISE OKL_API.G_EXCEPTION_ERROR;
16161: END IF;
16162: CLOSE l_leaseapp_csr;
16163: END IF;
16164:
16181: l_bill_to_party_id, l_bill_to_location_id;
16182: IF l_billtosite_csr%NOTFOUND THEN
16183: OKC_API.set_message( p_app_name => 'OKL',
16184: p_msg_name => 'OKL_TX_NO_SQ_BILL_TO');
16185: RAISE OKL_API.G_EXCEPTION_ERROR;
16186: END IF;
16187: CLOSE l_billtosite_csr ;
16188:
16189: -- Fetch precision, minimum accountable unit
16194: OKC_API.set_message( p_app_name => 'OKC',
16195: p_msg_name => G_INVALID_VALUE,
16196: p_token1 => G_COL_NAME_TOKEN,
16197: p_token1_value => 'CURRENCY_CODE');
16198: RAISE OKL_API.G_EXCEPTION_ERROR;
16199: END IF;
16200: CLOSE l_fndcurrency_csr;
16201:
16202: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
16239: CLOSE l_get_location_id;
16240:
16241: IF l_loc_id IS NULL THEN
16242: -- Install Location id is required
16243: OKL_API.set_message( p_app_name => 'OKC',
16244: p_msg_name => G_REQUIRED_VALUE,
16245: p_token1 => G_COL_NAME_TOKEN,
16246: p_token1_value => 'INSTALL_LOCATION_ID');
16247: RAISE OKL_API.G_EXCEPTION_ERROR;
16243: OKL_API.set_message( p_app_name => 'OKC',
16244: p_msg_name => G_REQUIRED_VALUE,
16245: p_token1 => G_COL_NAME_TOKEN,
16246: p_token1_value => 'INSTALL_LOCATION_ID');
16247: RAISE OKL_API.G_EXCEPTION_ERROR;
16248: END IF;
16249:
16250: IF l_cust_acct_id IS NOT NULL THEN
16251: -- Get the ship to site use id of the asset
16404: p_term_quote_reason_code => null,
16405: px_tax_sources_tbl => lx_tax_sources_tbl,
16406: px_line_params_tbl => lx_line_params_tbl );
16407:
16408: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16409: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16410: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16411: RAISE OKL_API.G_EXCEPTION_ERROR;
16412: END IF;
16405: px_tax_sources_tbl => lx_tax_sources_tbl,
16406: px_line_params_tbl => lx_line_params_tbl );
16407:
16408: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16409: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16410: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16411: RAISE OKL_API.G_EXCEPTION_ERROR;
16412: END IF;
16413:
16406: px_line_params_tbl => lx_line_params_tbl );
16407:
16408: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16409: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16410: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16411: RAISE OKL_API.G_EXCEPTION_ERROR;
16412: END IF;
16413:
16414: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
16407:
16408: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16409: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16410: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16411: RAISE OKL_API.G_EXCEPTION_ERROR;
16412: END IF;
16413:
16414: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
16415: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax.',
16515: p_term_quote_reason_code => null,
16516: px_tax_sources_tbl => lx_tax_sources_tbl,
16517: px_line_params_tbl => lx_line_params_tbl );
16518:
16519: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16520: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16521: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16522: RAISE OKL_API.G_EXCEPTION_ERROR;
16523: END IF;
16516: px_tax_sources_tbl => lx_tax_sources_tbl,
16517: px_line_params_tbl => lx_line_params_tbl );
16518:
16519: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16520: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16521: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16522: RAISE OKL_API.G_EXCEPTION_ERROR;
16523: END IF;
16524: -- asset level call end
16517: px_line_params_tbl => lx_line_params_tbl );
16518:
16519: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16520: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16521: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16522: RAISE OKL_API.G_EXCEPTION_ERROR;
16523: END IF;
16524: -- asset level call end
16525:
16518:
16519: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16520: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16521: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16522: RAISE OKL_API.G_EXCEPTION_ERROR;
16523: END IF;
16524: -- asset level call end
16525:
16526: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
16641: p_term_quote_reason_code => null,
16642: px_tax_sources_tbl => lx_tax_sources_tbl,
16643: px_line_params_tbl => lx_line_params_tbl );
16644:
16645: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16646: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16647: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16648: RAISE OKL_API.G_EXCEPTION_ERROR;
16649: END IF;
16642: px_tax_sources_tbl => lx_tax_sources_tbl,
16643: px_line_params_tbl => lx_line_params_tbl );
16644:
16645: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16646: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16647: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16648: RAISE OKL_API.G_EXCEPTION_ERROR;
16649: END IF;
16650:
16643: px_line_params_tbl => lx_line_params_tbl );
16644:
16645: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16646: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16647: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16648: RAISE OKL_API.G_EXCEPTION_ERROR;
16649: END IF;
16650:
16651: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
16644:
16645: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16646: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16647: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16648: RAISE OKL_API.G_EXCEPTION_ERROR;
16649: END IF;
16650:
16651: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
16652: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax.',
16754: p_term_quote_reason_code => null,
16755: px_tax_sources_tbl => lx_tax_sources_tbl,
16756: px_line_params_tbl => lx_line_params_tbl );
16757:
16758: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16759: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16760: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16761: RAISE OKL_API.G_EXCEPTION_ERROR;
16762: END IF;
16755: px_tax_sources_tbl => lx_tax_sources_tbl,
16756: px_line_params_tbl => lx_line_params_tbl );
16757:
16758: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16759: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16760: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16761: RAISE OKL_API.G_EXCEPTION_ERROR;
16762: END IF;
16763:
16756: px_line_params_tbl => lx_line_params_tbl );
16757:
16758: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16759: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16760: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16761: RAISE OKL_API.G_EXCEPTION_ERROR;
16762: END IF;
16763:
16764: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
16757:
16758: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16759: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16760: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16761: RAISE OKL_API.G_EXCEPTION_ERROR;
16762: END IF;
16763:
16764: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
16765: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax.',
16886: p_term_quote_reason_code => null,
16887: px_tax_sources_tbl => lx_tax_sources_tbl,
16888: px_line_params_tbl => lx_line_params_tbl );
16889:
16890: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16891: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16892: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16893: RAISE OKL_API.G_EXCEPTION_ERROR;
16894: END IF;
16887: px_tax_sources_tbl => lx_tax_sources_tbl,
16888: px_line_params_tbl => lx_line_params_tbl );
16889:
16890: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16891: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16892: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16893: RAISE OKL_API.G_EXCEPTION_ERROR;
16894: END IF;
16895:
16888: px_line_params_tbl => lx_line_params_tbl );
16889:
16890: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16891: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16892: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16893: RAISE OKL_API.G_EXCEPTION_ERROR;
16894: END IF;
16895:
16896: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
16889:
16890: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16891: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16892: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16893: RAISE OKL_API.G_EXCEPTION_ERROR;
16894: END IF;
16895:
16896: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
16897: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax.',
16997: p_term_quote_reason_code => null,
16998: px_tax_sources_tbl => lx_tax_sources_tbl,
16999: px_line_params_tbl => lx_line_params_tbl );
17000:
17001: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17002: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17003: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17004: RAISE OKL_API.G_EXCEPTION_ERROR;
17005: END IF;
16998: px_tax_sources_tbl => lx_tax_sources_tbl,
16999: px_line_params_tbl => lx_line_params_tbl );
17000:
17001: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17002: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17003: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17004: RAISE OKL_API.G_EXCEPTION_ERROR;
17005: END IF;
17006: -- asset level call end
16999: px_line_params_tbl => lx_line_params_tbl );
17000:
17001: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17002: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17003: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17004: RAISE OKL_API.G_EXCEPTION_ERROR;
17005: END IF;
17006: -- asset level call end
17007:
17000:
17001: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17002: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17003: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17004: RAISE OKL_API.G_EXCEPTION_ERROR;
17005: END IF;
17006: -- asset level call end
17007:
17008: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
17033: EXCEPTION
17034: WHEN OTHERS THEN
17035: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
17036: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
17037: OKL_API.set_message( p_app_name => 'OKL',
17038: p_msg_name => 'OKL_TX_TRX_INS_ERR',
17039: p_token1 => 'TABLE_NAME',
17040: p_token1_value => 'OKL_TAX_SOURCES',
17041: p_token2 => 'ERROR_CODE',
17042: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
17043: p_token3 => 'ITERATION',
17044: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
17045: END LOOP;
17046: RAISE OKL_API.G_EXCEPTION_ERROR;
17047: END IF;
17048: END;
17049:
17050: ---- Insert into okl_tax_sources end -----
17080: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax.',
17081: 'After tax engine call '||x_return_status);
17082: END IF;
17083:
17084: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17085: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17086: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17087: RAISE OKL_API.G_EXCEPTION_ERROR;
17088: END IF;
17081: 'After tax engine call '||x_return_status);
17082: END IF;
17083:
17084: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17085: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17086: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17087: RAISE OKL_API.G_EXCEPTION_ERROR;
17088: END IF;
17089: END IF;
17082: END IF;
17083:
17084: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17085: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17086: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17087: RAISE OKL_API.G_EXCEPTION_ERROR;
17088: END IF;
17089: END IF;
17090:
17083:
17084: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17085: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17086: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17087: RAISE OKL_API.G_EXCEPTION_ERROR;
17088: END IF;
17089: END IF;
17090:
17091: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
17105: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax.',
17106: 'Return Status' || x_return_status);
17107: END IF;
17108:
17109: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17110: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17111: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17112: RAISE OKL_API.G_EXCEPTION_ERROR;
17113: END IF;
17106: 'Return Status' || x_return_status);
17107: END IF;
17108:
17109: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17110: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17111: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17112: RAISE OKL_API.G_EXCEPTION_ERROR;
17113: END IF;
17114:
17107: END IF;
17108:
17109: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17110: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17111: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17112: RAISE OKL_API.G_EXCEPTION_ERROR;
17113: END IF;
17114:
17115: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
17108:
17109: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17110: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17111: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17112: RAISE OKL_API.G_EXCEPTION_ERROR;
17113: END IF;
17114:
17115: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
17116: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax.',
17132: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax.',
17133: 'Return Status' || x_return_status);
17134: END IF;
17135:
17136: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17137: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17138: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17139: RAISE OKL_API.G_EXCEPTION_ERROR;
17140: END IF;
17133: 'Return Status' || x_return_status);
17134: END IF;
17135:
17136: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17137: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17138: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17139: RAISE OKL_API.G_EXCEPTION_ERROR;
17140: END IF;
17141:
17134: END IF;
17135:
17136: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17137: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17138: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17139: RAISE OKL_API.G_EXCEPTION_ERROR;
17140: END IF;
17141:
17142: IF (G_DEBUG_LEVEL_PROCEDURE >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
17135:
17136: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17137: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17138: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17139: RAISE OKL_API.G_EXCEPTION_ERROR;
17140: END IF;
17141:
17142: IF (G_DEBUG_LEVEL_PROCEDURE >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
17143: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax ','End(-)');
17143: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax ','End(-)');
17144: END IF;
17145:
17146: EXCEPTION
17147: WHEN OKL_API.G_EXCEPTION_ERROR THEN
17148: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
17149: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax ',
17150: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
17151: END IF;
17146: EXCEPTION
17147: WHEN OKL_API.G_EXCEPTION_ERROR THEN
17148: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
17149: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax ',
17150: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
17151: END IF;
17152:
17153: IF l_leasequotes_csr%ISOPEN THEN
17154: CLOSE l_leasequotes_csr;
17221: IF l_get_shiptositeid%ISOPEN THEN
17222: CLOSE l_get_shiptositeid;
17223: END IF;
17224:
17225: x_return_status := OKL_API.G_RET_STS_ERROR;
17226:
17227: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
17228: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
17229: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax ',
17223: END IF;
17224:
17225: x_return_status := OKL_API.G_RET_STS_ERROR;
17226:
17227: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
17228: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
17229: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax ',
17230: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
17231: END IF;
17226:
17227: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
17228: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
17229: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax ',
17230: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
17231: END IF;
17232:
17233: IF l_leasequotes_csr%ISOPEN THEN
17234: CLOSE l_leasequotes_csr;
17301: IF l_get_shiptositeid%ISOPEN THEN
17302: CLOSE l_get_shiptositeid;
17303: END IF;
17304:
17305: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
17306:
17307: WHEN OTHERS THEN
17308: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
17309: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax ',
17381: IF l_get_shiptositeid%ISOPEN THEN
17382: CLOSE l_get_shiptositeid;
17383: END IF;
17384:
17385: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
17386: -- unexpected error
17387: OKL_API.set_message(p_app_name => g_app_name,
17388: p_msg_name => g_unexpected_error,
17389: p_token1 => g_sqlcode_token,
17383: END IF;
17384:
17385: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
17386: -- unexpected error
17387: OKL_API.set_message(p_app_name => g_app_name,
17388: p_msg_name => g_unexpected_error,
17389: p_token1 => g_sqlcode_token,
17390: p_token1_value => sqlcode,
17391: p_token2 => g_sqlerrm_token,
17508: | Local Variable Declarations and initializations |
17509: +-----------------------------------------------------------------------*/
17510: l_api_version CONSTANT NUMBER := 1;
17511: l_api_name CONSTANT VARCHAR2(30) := 'calculate_sales_tax';
17512: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
17513:
17514: l_ou_tax_upfront_yn VARCHAR2(1);
17515: l_ou_tax_invoice_yn VARCHAR2(1);
17516: l_k_tax_schedule_yn VARCHAR2(1);
17546: 'p_request_id :'||p_request_id);
17547: END IF;
17548:
17549: --Check API version, initialize message list and create savepoint.
17550: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
17551: G_PKG_NAME,
17552: p_init_msg_list,
17553: l_api_version,
17554: p_api_version,
17553: l_api_version,
17554: p_api_version,
17555: '_PVT',
17556: x_return_status);
17557: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17558: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17559: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
17560: RAISE OKL_API.G_EXCEPTION_ERROR;
17561: END IF;
17554: p_api_version,
17555: '_PVT',
17556: x_return_status);
17557: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17558: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17559: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
17560: RAISE OKL_API.G_EXCEPTION_ERROR;
17561: END IF;
17562:
17555: '_PVT',
17556: x_return_status);
17557: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17558: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17559: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
17560: RAISE OKL_API.G_EXCEPTION_ERROR;
17561: END IF;
17562:
17563: l_source_table := upper(p_source_table);
17556: x_return_status);
17557: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17558: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17559: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
17560: RAISE OKL_API.G_EXCEPTION_ERROR;
17561: END IF;
17562:
17563: l_source_table := upper(p_source_table);
17564: l_org_id := mo_global.get_current_org_id;
17567: OPEN l_systemparams_csr(cp_org_id => l_org_id);
17568: FETCH l_systemparams_csr INTO l_ou_tax_upfront_yn, l_ou_tax_invoice_yn;
17569: IF l_systemparams_csr%NOTFOUND THEN
17570: -- Tax options are not setup for this operating unit.
17571: OKL_API.set_message( p_app_name => 'OKL',
17572: p_msg_name => 'OKL_TX_NO_TAX_SETUP');
17573: RAISE OKL_API.G_EXCEPTION_ERROR;
17574: END IF;
17575: CLOSE l_systemparams_csr;
17569: IF l_systemparams_csr%NOTFOUND THEN
17570: -- Tax options are not setup for this operating unit.
17571: OKL_API.set_message( p_app_name => 'OKL',
17572: p_msg_name => 'OKL_TX_NO_TAX_SETUP');
17573: RAISE OKL_API.G_EXCEPTION_ERROR;
17574: END IF;
17575: CLOSE l_systemparams_csr;
17576:
17577: IF p_source_trx_name = 'Tax Schedule' THEN
17582:
17583: IF l_k_tax_schedule_yn = 'Y' THEN -- OU allows Tax schedule type of call
17584: process_tax_schedule_tax(
17585: p_api_version => p_api_version,
17586: p_init_msg_list => OKL_API.G_FALSE,
17587: x_return_status => x_return_status,
17588: x_msg_count => x_msg_count,
17589: x_msg_data => x_msg_data,
17590: p_source_trx_id => p_source_trx_id,
17590: p_source_trx_id => p_source_trx_id,
17591: p_source_trx_name => p_source_trx_name,
17592: p_source_table => l_source_table);
17593:
17594: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17595: OKL_API.set_message( p_app_name => 'OKL',
17596: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17597: p_token1 => 'TRX_TYPE',
17598: p_token1_value => p_source_trx_name);
17591: p_source_trx_name => p_source_trx_name,
17592: p_source_table => l_source_table);
17593:
17594: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17595: OKL_API.set_message( p_app_name => 'OKL',
17596: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17597: p_token1 => 'TRX_TYPE',
17598: p_token1_value => p_source_trx_name);
17599:
17596: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17597: p_token1 => 'TRX_TYPE',
17598: p_token1_value => p_source_trx_name);
17599:
17600: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17601: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17602: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17603: RAISE OKL_API.G_EXCEPTION_ERROR;
17604: END IF;
17597: p_token1 => 'TRX_TYPE',
17598: p_token1_value => p_source_trx_name);
17599:
17600: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17601: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17602: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17603: RAISE OKL_API.G_EXCEPTION_ERROR;
17604: END IF;
17605: END IF;
17598: p_token1_value => p_source_trx_name);
17599:
17600: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17601: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17602: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17603: RAISE OKL_API.G_EXCEPTION_ERROR;
17604: END IF;
17605: END IF;
17606: ELSE -- SECHAWLA 12-DEC-05 4690074 : added else section
17599:
17600: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17601: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17602: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17603: RAISE OKL_API.G_EXCEPTION_ERROR;
17604: END IF;
17605: END IF;
17606: ELSE -- SECHAWLA 12-DEC-05 4690074 : added else section
17607: OKL_API.set_message( p_app_name => 'OKL',
17603: RAISE OKL_API.G_EXCEPTION_ERROR;
17604: END IF;
17605: END IF;
17606: ELSE -- SECHAWLA 12-DEC-05 4690074 : added else section
17607: OKL_API.set_message( p_app_name => 'OKL',
17608: p_msg_name => 'OKL_TAX_SCH_FLAG_NOT_SET');
17609: END IF;
17610:
17611: ELSIF p_source_trx_name = 'Estimated Billing' AND l_source_table = 'OKL_TRX_QUOTES_B' THEN -- AM Quote creation
17609: END IF;
17610:
17611: ELSIF p_source_trx_name = 'Estimated Billing' AND l_source_table = 'OKL_TRX_QUOTES_B' THEN -- AM Quote creation
17612: process_quote_tax( p_api_version => p_api_version,
17613: p_init_msg_list => OKL_API.G_FALSE,
17614: x_return_status => x_return_status,
17615: x_msg_count => x_msg_count,
17616: x_msg_data => x_msg_data,
17617: p_source_trx_id => p_source_trx_id,
17617: p_source_trx_id => p_source_trx_id,
17618: p_source_trx_name => p_source_trx_name,
17619: p_source_table => l_source_table);
17620:
17621: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17622: OKL_API.set_message( p_app_name => 'OKL',
17623: p_msg_name => 'OKL_TX_QUOTE_TAX_ERR');
17624: END IF;
17625:
17618: p_source_trx_name => p_source_trx_name,
17619: p_source_table => l_source_table);
17620:
17621: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17622: OKL_API.set_message( p_app_name => 'OKL',
17623: p_msg_name => 'OKL_TX_QUOTE_TAX_ERR');
17624: END IF;
17625:
17626: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17622: OKL_API.set_message( p_app_name => 'OKL',
17623: p_msg_name => 'OKL_TX_QUOTE_TAX_ERR');
17624: END IF;
17625:
17626: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17627: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17628: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17629: RAISE OKL_API.G_EXCEPTION_ERROR;
17630: END IF;
17623: p_msg_name => 'OKL_TX_QUOTE_TAX_ERR');
17624: END IF;
17625:
17626: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17627: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17628: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17629: RAISE OKL_API.G_EXCEPTION_ERROR;
17630: END IF;
17631:
17624: END IF;
17625:
17626: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17627: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17628: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17629: RAISE OKL_API.G_EXCEPTION_ERROR;
17630: END IF;
17631:
17632: ELSIF (p_source_trx_name = 'Asset Relocation') THEN
17625:
17626: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17627: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17628: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17629: RAISE OKL_API.G_EXCEPTION_ERROR;
17630: END IF;
17631:
17632: ELSIF (p_source_trx_name = 'Asset Relocation') THEN
17633: IF l_ou_tax_upfront_yn = 'Y' THEN -- OU allows upfront type of call
17635: OKC_API.set_message( p_app_name => 'OKC',
17636: p_msg_name => G_REQUIRED_VALUE,
17637: p_token1 => G_COL_NAME_TOKEN,
17638: p_token1_value => 'Tax Call Type');
17639: RAISE OKL_API.G_EXCEPTION_ERROR;
17640: ELSE
17641: l_tax_call_type := upper(p_tax_call_type);
17642: IF l_tax_call_type NOT IN (G_ESTIMATED_CALL_TYPE, G_ACTUAL_CALL_TYPE) THEN
17643: OKC_API.set_message( p_app_name => 'OKC',
17643: OKC_API.set_message( p_app_name => 'OKC',
17644: p_msg_name => G_INVALID_VALUE,
17645: p_token1 => G_COL_NAME_TOKEN,
17646: p_token1_value => 'Tax Call Type');
17647: RAISE OKL_API.G_EXCEPTION_ERROR;
17648: END IF;
17649: END IF;
17650:
17651: process_asset_loc_tax(p_api_version => p_api_version,
17648: END IF;
17649: END IF;
17650:
17651: process_asset_loc_tax(p_api_version => p_api_version,
17652: p_init_msg_list => OKL_API.G_FALSE,
17653: x_return_status => x_return_status,
17654: x_msg_count => x_msg_count,
17655: x_msg_data => x_msg_data,
17656: p_source_trx_id => p_source_trx_id,
17660: p_serialized_asset => p_serialized_asset,
17661: p_request_id => p_request_id,
17662: p_alc_final_call => p_alc_final_call);
17663:
17664: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17665: OKL_API.set_message( p_app_name => 'OKL',
17666: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17667: p_token1 => 'TRX_TYPE',
17668: p_token1_value => p_source_trx_name);
17661: p_request_id => p_request_id,
17662: p_alc_final_call => p_alc_final_call);
17663:
17664: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17665: OKL_API.set_message( p_app_name => 'OKL',
17666: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17667: p_token1 => 'TRX_TYPE',
17668: p_token1_value => p_source_trx_name);
17669:
17666: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17667: p_token1 => 'TRX_TYPE',
17668: p_token1_value => p_source_trx_name);
17669:
17670: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17671: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17672: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17673: RAISE OKL_API.G_EXCEPTION_ERROR;
17674: END IF;
17667: p_token1 => 'TRX_TYPE',
17668: p_token1_value => p_source_trx_name);
17669:
17670: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17671: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17672: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17673: RAISE OKL_API.G_EXCEPTION_ERROR;
17674: END IF;
17675: END IF;
17668: p_token1_value => p_source_trx_name);
17669:
17670: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17671: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17672: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17673: RAISE OKL_API.G_EXCEPTION_ERROR;
17674: END IF;
17675: END IF;
17676:
17669:
17670: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17671: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17672: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17673: RAISE OKL_API.G_EXCEPTION_ERROR;
17674: END IF;
17675: END IF;
17676:
17677: ELSE -- SECHAWLA 12-DEC-05 4690074 : added else section
17674: END IF;
17675: END IF;
17676:
17677: ELSE -- SECHAWLA 12-DEC-05 4690074 : added else section
17678: OKL_API.set_message( p_app_name => 'OKL',
17679: p_msg_name => 'OKL_TX_OU_NO_TAX',
17680: p_token1 => 'TAX_CALL_TYPE',
17681: p_token1_value => 'Upfront Tax');
17682: END IF;
17681: p_token1_value => 'Upfront Tax');
17682: END IF;
17683: ELSIF p_source_trx_name = 'Split Asset' THEN
17684: process_split_asset_tax(p_api_version => p_api_version,
17685: p_init_msg_list => OKL_API.G_FALSE,
17686: x_return_status => x_return_status,
17687: x_msg_count => x_msg_count,
17688: x_msg_data => x_msg_data,
17689: p_source_trx_id => p_source_trx_id,
17689: p_source_trx_id => p_source_trx_id,
17690: p_source_trx_name => p_source_trx_name,
17691: p_source_table => l_source_table);
17692:
17693: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17694: OKL_API.set_message( p_app_name => 'OKL',
17695: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17696: p_token1 => 'TRX_TYPE',
17697: p_token1_value => p_source_trx_name);
17690: p_source_trx_name => p_source_trx_name,
17691: p_source_table => l_source_table);
17692:
17693: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17694: OKL_API.set_message( p_app_name => 'OKL',
17695: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17696: p_token1 => 'TRX_TYPE',
17697: p_token1_value => p_source_trx_name);
17698:
17695: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17696: p_token1 => 'TRX_TYPE',
17697: p_token1_value => p_source_trx_name);
17698:
17699: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17700: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17701: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17702: RAISE OKL_API.G_EXCEPTION_ERROR;
17703: END IF;
17696: p_token1 => 'TRX_TYPE',
17697: p_token1_value => p_source_trx_name);
17698:
17699: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17700: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17701: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17702: RAISE OKL_API.G_EXCEPTION_ERROR;
17703: END IF;
17704: END IF;
17697: p_token1_value => p_source_trx_name);
17698:
17699: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17700: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17701: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17702: RAISE OKL_API.G_EXCEPTION_ERROR;
17703: END IF;
17704: END IF;
17705:
17698:
17699: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17700: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17701: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17702: RAISE OKL_API.G_EXCEPTION_ERROR;
17703: END IF;
17704: END IF;
17705:
17706: ELSIF ( p_source_trx_name = 'Booking') THEN
17709: OKC_API.set_message( p_app_name => 'OKC',
17710: p_msg_name => G_REQUIRED_VALUE,
17711: p_token1 => G_COL_NAME_TOKEN,
17712: p_token1_value => 'Tax Call Type');
17713: RAISE OKL_API.G_EXCEPTION_ERROR;
17714: ELSE
17715: l_tax_call_type := upper(p_tax_call_type);
17716: IF l_tax_call_type NOT IN (G_ESTIMATED_CALL_TYPE, G_ACTUAL_CALL_TYPE) THEN
17717: OKC_API.set_message( p_app_name => 'OKC',
17717: OKC_API.set_message( p_app_name => 'OKC',
17718: p_msg_name => G_INVALID_VALUE,
17719: p_token1 => G_COL_NAME_TOKEN,
17720: p_token1_value => 'Tax Call Type');
17721: RAISE OKL_API.G_EXCEPTION_ERROR;
17722: END IF;
17723: END IF;
17724:
17725: process_booking_upfront_tax(
17723: END IF;
17724:
17725: process_booking_upfront_tax(
17726: p_api_version => p_api_version,
17727: p_init_msg_list => OKL_API.G_FALSE,
17728: x_return_status => x_return_status,
17729: x_msg_count => x_msg_count,
17730: x_msg_data => x_msg_data,
17731: p_source_trx_id => p_source_trx_id,
17732: p_source_trx_name => p_source_trx_name,
17733: p_source_table => l_source_table,
17734: p_tax_call_type => p_tax_call_type);
17735:
17736: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17737: OKL_API.set_message(p_app_name => 'OKL',
17738: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17739: p_token1 => 'TRX_TYPE',
17740: p_token1_value => p_source_trx_name);
17733: p_source_table => l_source_table,
17734: p_tax_call_type => p_tax_call_type);
17735:
17736: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17737: OKL_API.set_message(p_app_name => 'OKL',
17738: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17739: p_token1 => 'TRX_TYPE',
17740: p_token1_value => p_source_trx_name);
17741:
17738: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17739: p_token1 => 'TRX_TYPE',
17740: p_token1_value => p_source_trx_name);
17741:
17742: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17743: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17744: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17745: RAISE OKL_API.G_EXCEPTION_ERROR;
17746: END IF;
17739: p_token1 => 'TRX_TYPE',
17740: p_token1_value => p_source_trx_name);
17741:
17742: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17743: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17744: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17745: RAISE OKL_API.G_EXCEPTION_ERROR;
17746: END IF;
17747: END IF;
17740: p_token1_value => p_source_trx_name);
17741:
17742: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17743: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17744: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17745: RAISE OKL_API.G_EXCEPTION_ERROR;
17746: END IF;
17747: END IF;
17748:
17741:
17742: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17743: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17744: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17745: RAISE OKL_API.G_EXCEPTION_ERROR;
17746: END IF;
17747: END IF;
17748:
17749: ELSE -- SECHAWLA 12-DEC-05 4690074 : added else section
17746: END IF;
17747: END IF;
17748:
17749: ELSE -- SECHAWLA 12-DEC-05 4690074 : added else section
17750: OKL_API.set_message( p_app_name => 'OKL',
17751: p_msg_name => 'OKL_TX_OU_NO_TAX',
17752: p_token1 => 'TAX_CALL_TYPE',
17753: p_token1_value => 'Upfront Tax');
17754: END IF;
17758: ELSIF p_source_trx_name = 'Rebook' AND p_tax_call_type = G_ESTIMATED_CALL_TYPE THEN
17759: IF l_ou_tax_upfront_yn = 'Y' THEN -- OU allows upfront type of call
17760: process_pre_rbk_upfront_tax(
17761: p_api_version => p_api_version,
17762: p_init_msg_list => OKL_API.G_FALSE,
17763: x_return_status => x_return_status,
17764: x_msg_count => x_msg_count,
17765: x_msg_data => x_msg_data,
17766: p_source_trx_id => p_source_trx_id,
17767: p_source_trx_name => p_source_trx_name,
17768: p_source_table => l_source_table,
17769: p_tax_call_type => p_tax_call_type);
17770:
17771: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17772: OKL_API.set_message( p_app_name => 'OKL',
17773: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17774: p_token1 => 'TRX_TYPE',
17775: p_token1_value => p_source_trx_name);
17768: p_source_table => l_source_table,
17769: p_tax_call_type => p_tax_call_type);
17770:
17771: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17772: OKL_API.set_message( p_app_name => 'OKL',
17773: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17774: p_token1 => 'TRX_TYPE',
17775: p_token1_value => p_source_trx_name);
17776:
17773: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17774: p_token1 => 'TRX_TYPE',
17775: p_token1_value => p_source_trx_name);
17776:
17777: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17778: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17779: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17780: RAISE OKL_API.G_EXCEPTION_ERROR;
17781: END IF;
17774: p_token1 => 'TRX_TYPE',
17775: p_token1_value => p_source_trx_name);
17776:
17777: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17778: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17779: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17780: RAISE OKL_API.G_EXCEPTION_ERROR;
17781: END IF;
17782: END IF;
17775: p_token1_value => p_source_trx_name);
17776:
17777: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17778: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17779: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17780: RAISE OKL_API.G_EXCEPTION_ERROR;
17781: END IF;
17782: END IF;
17783: ELSE -- SECHAWLA 12-DEC-05 4690074 : added else section
17776:
17777: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17778: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17779: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17780: RAISE OKL_API.G_EXCEPTION_ERROR;
17781: END IF;
17782: END IF;
17783: ELSE -- SECHAWLA 12-DEC-05 4690074 : added else section
17784: OKL_API.set_message( p_app_name => 'OKL',
17780: RAISE OKL_API.G_EXCEPTION_ERROR;
17781: END IF;
17782: END IF;
17783: ELSE -- SECHAWLA 12-DEC-05 4690074 : added else section
17784: OKL_API.set_message( p_app_name => 'OKL',
17785: p_msg_name => 'OKL_TX_OU_NO_TAX',
17786: p_token1 => 'TAX_CALL_TYPE',
17787: p_token1_value => 'Upfront Tax');
17788: END IF;
17790: ELSIF p_source_trx_name = 'Rebook' AND p_tax_call_type = G_ACTUAL_CALL_TYPE THEN
17791: IF l_ou_tax_upfront_yn = 'Y' THEN -- OU allows upfront type of call
17792: process_rebook_upfront_tax(
17793: p_api_version => p_api_version,
17794: p_init_msg_list => OKL_API.G_FALSE,
17795: x_return_status => x_return_status,
17796: x_msg_count => x_msg_count,
17797: x_msg_data => x_msg_data,
17798: p_source_trx_id => p_source_trx_id,
17798: p_source_trx_id => p_source_trx_id,
17799: p_source_trx_name => p_source_trx_name,
17800: p_source_table => l_source_table);
17801:
17802: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17803: OKL_API.set_message( p_app_name => 'OKL',
17804: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17805: p_token1 => 'TRX_TYPE',
17806: p_token1_value => p_source_trx_name);
17799: p_source_trx_name => p_source_trx_name,
17800: p_source_table => l_source_table);
17801:
17802: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17803: OKL_API.set_message( p_app_name => 'OKL',
17804: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17805: p_token1 => 'TRX_TYPE',
17806: p_token1_value => p_source_trx_name);
17807:
17804: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17805: p_token1 => 'TRX_TYPE',
17806: p_token1_value => p_source_trx_name);
17807:
17808: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17809: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17810: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17811: RAISE OKL_API.G_EXCEPTION_ERROR;
17812: END IF;
17805: p_token1 => 'TRX_TYPE',
17806: p_token1_value => p_source_trx_name);
17807:
17808: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17809: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17810: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17811: RAISE OKL_API.G_EXCEPTION_ERROR;
17812: END IF;
17813: END IF;
17806: p_token1_value => p_source_trx_name);
17807:
17808: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17809: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17810: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17811: RAISE OKL_API.G_EXCEPTION_ERROR;
17812: END IF;
17813: END IF;
17814:
17807:
17808: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17809: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17810: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17811: RAISE OKL_API.G_EXCEPTION_ERROR;
17812: END IF;
17813: END IF;
17814:
17815: ELSE -- SECHAWLA 12-DEC-05 4690074 : added else section
17812: END IF;
17813: END IF;
17814:
17815: ELSE -- SECHAWLA 12-DEC-05 4690074 : added else section
17816: OKL_API.set_message( p_app_name => 'OKL',
17817: p_msg_name => 'OKL_TX_OU_NO_TAX',
17818: p_token1 => 'TAX_CALL_TYPE',
17819: p_token1_value => 'Upfront Tax');
17820: END IF;
17822: ELSIF p_source_trx_name = 'Reverse' THEN
17823: -- No need to check "tax_upfront_yn" flag in case of contract reversal
17824: process_contract_reversal_tax(
17825: p_api_version => p_api_version,
17826: p_init_msg_list => OKL_API.G_FALSE,
17827: x_return_status => x_return_status,
17828: x_msg_count => x_msg_count,
17829: x_msg_data => x_msg_data,
17830: p_source_trx_id => p_source_trx_id,
17830: p_source_trx_id => p_source_trx_id,
17831: p_source_trx_name => p_source_trx_name,
17832: p_source_table => l_source_table);
17833:
17834: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17835: OKL_API.set_message( p_app_name => 'OKL',
17836: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17837: p_token1 => 'TRX_TYPE',
17838: p_token1_value => p_source_trx_name);
17831: p_source_trx_name => p_source_trx_name,
17832: p_source_table => l_source_table);
17833:
17834: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17835: OKL_API.set_message( p_app_name => 'OKL',
17836: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17837: p_token1 => 'TRX_TYPE',
17838: p_token1_value => p_source_trx_name);
17839:
17836: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17837: p_token1 => 'TRX_TYPE',
17838: p_token1_value => p_source_trx_name);
17839:
17840: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17841: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17842: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17843: RAISE OKL_API.G_EXCEPTION_ERROR;
17844: END IF;
17837: p_token1 => 'TRX_TYPE',
17838: p_token1_value => p_source_trx_name);
17839:
17840: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17841: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17842: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17843: RAISE OKL_API.G_EXCEPTION_ERROR;
17844: END IF;
17845: END IF;
17838: p_token1_value => p_source_trx_name);
17839:
17840: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17841: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17842: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17843: RAISE OKL_API.G_EXCEPTION_ERROR;
17844: END IF;
17845: END IF;
17846:
17839:
17840: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17841: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17842: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17843: RAISE OKL_API.G_EXCEPTION_ERROR;
17844: END IF;
17845: END IF;
17846:
17847: ELSIF p_source_trx_name = 'Sales Quote' THEN
17847: ELSIF p_source_trx_name = 'Sales Quote' THEN
17848: IF l_ou_tax_upfront_yn = 'Y' THEN -- OU allows upfront type of call
17849: process_quoting_upfront_tax(
17850: p_api_version => p_api_version,
17851: p_init_msg_list => OKL_API.G_FALSE,
17852: x_return_status => x_return_status,
17853: x_msg_count => x_msg_count,
17854: x_msg_data => x_msg_data,
17855: p_source_trx_id => p_source_trx_id,
17855: p_source_trx_id => p_source_trx_id,
17856: p_source_trx_name => p_source_trx_name,
17857: p_source_table => l_source_table);
17858:
17859: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17860: OKL_API.set_message( p_app_name => 'OKL',
17861: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17862: p_token1 => 'TRX_TYPE',
17863: p_token1_value => p_source_trx_name);
17856: p_source_trx_name => p_source_trx_name,
17857: p_source_table => l_source_table);
17858:
17859: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17860: OKL_API.set_message( p_app_name => 'OKL',
17861: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17862: p_token1 => 'TRX_TYPE',
17863: p_token1_value => p_source_trx_name);
17864:
17861: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17862: p_token1 => 'TRX_TYPE',
17863: p_token1_value => p_source_trx_name);
17864:
17865: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17866: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17867: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17868: RAISE OKL_API.G_EXCEPTION_ERROR;
17869: END IF;
17862: p_token1 => 'TRX_TYPE',
17863: p_token1_value => p_source_trx_name);
17864:
17865: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17866: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17867: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17868: RAISE OKL_API.G_EXCEPTION_ERROR;
17869: END IF;
17870: END IF;
17863: p_token1_value => p_source_trx_name);
17864:
17865: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17866: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17867: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17868: RAISE OKL_API.G_EXCEPTION_ERROR;
17869: END IF;
17870: END IF;
17871: ELSE -- SECHAWLA 12-DEC-05 4690074 : added else section
17864:
17865: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17866: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17867: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17868: RAISE OKL_API.G_EXCEPTION_ERROR;
17869: END IF;
17870: END IF;
17871: ELSE -- SECHAWLA 12-DEC-05 4690074 : added else section
17872: OKL_API.set_message( p_app_name => 'OKL',
17868: RAISE OKL_API.G_EXCEPTION_ERROR;
17869: END IF;
17870: END IF;
17871: ELSE -- SECHAWLA 12-DEC-05 4690074 : added else section
17872: OKL_API.set_message( p_app_name => 'OKL',
17873: p_msg_name => 'OKL_TX_OU_NO_TAX',
17874: p_token1 => 'TAX_CALL_TYPE',
17875: p_token1_value => 'Upfront Tax');
17876: END IF;
17879: OKC_API.set_message( p_app_name => 'OKC',
17880: p_msg_name => G_INVALID_VALUE,
17881: p_token1 => G_COL_NAME_TOKEN,
17882: p_token1_value => 'Transaction Type');
17883: RAISE OKL_API.G_EXCEPTION_ERROR;
17884: END IF;
17885:
17886: x_return_status := l_return_status; -- added for 12.0 since the above code that sets
17887: -- x_return_status is commented
17889: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.calculate_sales_tax ','End(-)');
17890: END IF;
17891:
17892: -- End the transaction
17893: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
17894:
17895: EXCEPTION
17896: WHEN OKL_API.G_EXCEPTION_ERROR THEN
17897:
17892: -- End the transaction
17893: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
17894:
17895: EXCEPTION
17896: WHEN OKL_API.G_EXCEPTION_ERROR THEN
17897:
17898: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
17899: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.calculate_sales_tax ',
17900: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
17896: WHEN OKL_API.G_EXCEPTION_ERROR THEN
17897:
17898: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
17899: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.calculate_sales_tax ',
17900: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
17901: END IF;
17902:
17903: IF l_systemparams_csr%ISOPEN THEN
17904: CLOSE l_systemparams_csr;
17907: IF l_tax_schedule_csr%ISOPEN THEN
17908: CLOSE l_tax_schedule_csr;
17909: END IF;
17910:
17911: x_return_status := OKL_API.HANDLE_EXCEPTIONS
17912: (
17913: l_api_name,
17914: G_PKG_NAME,
17915: 'OKL_API.G_RET_STS_ERROR',
17911: x_return_status := OKL_API.HANDLE_EXCEPTIONS
17912: (
17913: l_api_name,
17914: G_PKG_NAME,
17915: 'OKL_API.G_RET_STS_ERROR',
17916: x_msg_count,
17917: x_msg_data,
17918: '_PVT'
17919: );
17916: x_msg_count,
17917: x_msg_data,
17918: '_PVT'
17919: );
17920: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
17921: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
17922: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.calculate_sales_tax ',
17923: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
17924: END IF;
17919: );
17920: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
17921: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
17922: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.calculate_sales_tax ',
17923: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
17924: END IF;
17925:
17926: IF l_systemparams_csr%ISOPEN THEN
17927: CLOSE l_systemparams_csr;
17930: IF l_tax_schedule_csr%ISOPEN THEN
17931: CLOSE l_tax_schedule_csr;
17932: END IF;
17933:
17934: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
17935: (
17936: l_api_name,
17937: G_PKG_NAME,
17938: 'OKL_API.G_RET_STS_UNEXP_ERROR',
17934: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
17935: (
17936: l_api_name,
17937: G_PKG_NAME,
17938: 'OKL_API.G_RET_STS_UNEXP_ERROR',
17939: x_msg_count,
17940: x_msg_data,
17941: '_PVT'
17942: );
17954: IF l_tax_schedule_csr%ISOPEN THEN
17955: CLOSE l_tax_schedule_csr;
17956: END IF;
17957:
17958: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
17959: (
17960: l_api_name,
17961: G_PKG_NAME,
17962: 'OTHERS',
17970: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.calculate_sales_tax ','End(-)');
17971: END IF;
17972:
17973: -- end the transaction
17974: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
17975:
17976: END calculate_sales_tax;
17977:
17978: /*========================================================================
18004: | 24-JAN-07 RRAVIKIR Created
18005: *=======================================================================*/
18006: PROCEDURE set_tax_security_context(
18007: p_api_version IN NUMBER,
18008: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
18009: x_return_status OUT NOCOPY VARCHAR2,
18010: x_msg_count OUT NOCOPY NUMBER,
18011: x_msg_data OUT NOCOPY VARCHAR2,
18012: p_internal_org_id IN NUMBER,
18014: p_transaction_date IN DATE) IS
18015:
18016: l_api_version CONSTANT NUMBER := 1;
18017: l_api_name CONSTANT VARCHAR2(30) := 'set_tax_security_context';
18018: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
18019:
18020: x_effective_date DATE;
18021:
18022: BEGIN
18037: 'p_transaction_date :'||p_transaction_date);
18038: END IF;
18039:
18040: --Check API version, initialize message list and create savepoint.
18041: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
18042: G_PKG_NAME,
18043: p_init_msg_list,
18044: l_api_version,
18045: p_api_version,
18045: p_api_version,
18046: '_PVT',
18047: x_return_status);
18048:
18049: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18050: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18051: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18052: RAISE OKL_API.G_EXCEPTION_ERROR;
18053: END IF;
18046: '_PVT',
18047: x_return_status);
18048:
18049: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18050: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18051: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18052: RAISE OKL_API.G_EXCEPTION_ERROR;
18053: END IF;
18054:
18047: x_return_status);
18048:
18049: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18050: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18051: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18052: RAISE OKL_API.G_EXCEPTION_ERROR;
18053: END IF;
18054:
18055: -- Required Values
18048:
18049: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18050: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18051: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18052: RAISE OKL_API.G_EXCEPTION_ERROR;
18053: END IF;
18054:
18055: -- Required Values
18056: IF p_internal_org_id IS NULL THEN
18053: END IF;
18054:
18055: -- Required Values
18056: IF p_internal_org_id IS NULL THEN
18057: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18058: p_token1 => G_COL_NAME_TOKEN,
18059: p_token1_value => 'INTERNAL_ORG_ID');
18060: RAISE OKL_API.G_EXCEPTION_ERROR;
18061: END IF;
18056: IF p_internal_org_id IS NULL THEN
18057: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18058: p_token1 => G_COL_NAME_TOKEN,
18059: p_token1_value => 'INTERNAL_ORG_ID');
18060: RAISE OKL_API.G_EXCEPTION_ERROR;
18061: END IF;
18062:
18063: IF p_legal_entity_id IS NULL THEN
18064: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18060: RAISE OKL_API.G_EXCEPTION_ERROR;
18061: END IF;
18062:
18063: IF p_legal_entity_id IS NULL THEN
18064: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18065: p_token1 => G_COL_NAME_TOKEN,
18066: p_token1_value => 'LEGAL_ENTITY_ID');
18067: RAISE OKL_API.G_EXCEPTION_ERROR;
18068: END IF;
18063: IF p_legal_entity_id IS NULL THEN
18064: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18065: p_token1 => G_COL_NAME_TOKEN,
18066: p_token1_value => 'LEGAL_ENTITY_ID');
18067: RAISE OKL_API.G_EXCEPTION_ERROR;
18068: END IF;
18069:
18070: IF p_transaction_date IS NULL THEN
18071: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18067: RAISE OKL_API.G_EXCEPTION_ERROR;
18068: END IF;
18069:
18070: IF p_transaction_date IS NULL THEN
18071: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18072: p_token1 => G_COL_NAME_TOKEN,
18073: p_token1_value => 'TRANSACTION_DATE');
18074: RAISE OKL_API.G_EXCEPTION_ERROR;
18075: END IF;
18070: IF p_transaction_date IS NULL THEN
18071: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18072: p_token1 => G_COL_NAME_TOKEN,
18073: p_token1_value => 'TRANSACTION_DATE');
18074: RAISE OKL_API.G_EXCEPTION_ERROR;
18075: END IF;
18076:
18077: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
18078: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.set_tax_security_context.',
18093: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.set_tax_security_context.',
18094: 'Return Status' || l_return_status);
18095: END IF;
18096:
18097: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18098: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18099: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18100: RAISE OKL_API.G_EXCEPTION_ERROR;
18101: END IF;
18094: 'Return Status' || l_return_status);
18095: END IF;
18096:
18097: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18098: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18099: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18100: RAISE OKL_API.G_EXCEPTION_ERROR;
18101: END IF;
18102:
18095: END IF;
18096:
18097: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18098: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18099: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18100: RAISE OKL_API.G_EXCEPTION_ERROR;
18101: END IF;
18102:
18103: x_return_status := l_return_status;
18096:
18097: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18098: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18099: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18100: RAISE OKL_API.G_EXCEPTION_ERROR;
18101: END IF;
18102:
18103: x_return_status := l_return_status;
18104:
18106: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.set_tax_security_context ','End(-)');
18107: END IF;
18108:
18109: -- end the transaction
18110: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
18111:
18112:
18113: EXCEPTION
18114: WHEN OKL_API.G_EXCEPTION_ERROR THEN
18110: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
18111:
18112:
18113: EXCEPTION
18114: WHEN OKL_API.G_EXCEPTION_ERROR THEN
18115:
18116: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
18117: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.set_tax_security_context ',
18118: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
18114: WHEN OKL_API.G_EXCEPTION_ERROR THEN
18115:
18116: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
18117: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.set_tax_security_context ',
18118: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
18119: END IF;
18120:
18121: x_return_status := OKL_API.HANDLE_EXCEPTIONS
18122: (
18117: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.set_tax_security_context ',
18118: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
18119: END IF;
18120:
18121: x_return_status := OKL_API.HANDLE_EXCEPTIONS
18122: (
18123: l_api_name,
18124: G_PKG_NAME,
18125: 'OKL_API.G_RET_STS_ERROR',
18121: x_return_status := OKL_API.HANDLE_EXCEPTIONS
18122: (
18123: l_api_name,
18124: G_PKG_NAME,
18125: 'OKL_API.G_RET_STS_ERROR',
18126: x_msg_count,
18127: x_msg_data,
18128: '_PVT'
18129: );
18126: x_msg_count,
18127: x_msg_data,
18128: '_PVT'
18129: );
18130: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
18131: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
18132: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.set_tax_security_context ',
18133: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
18134: END IF;
18129: );
18130: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
18131: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
18132: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.set_tax_security_context ',
18133: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
18134: END IF;
18135:
18136: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
18137: (
18132: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.set_tax_security_context ',
18133: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
18134: END IF;
18135:
18136: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
18137: (
18138: l_api_name,
18139: G_PKG_NAME,
18140: 'OKL_API.G_RET_STS_UNEXP_ERROR',
18136: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
18137: (
18138: l_api_name,
18139: G_PKG_NAME,
18140: 'OKL_API.G_RET_STS_UNEXP_ERROR',
18141: x_msg_count,
18142: x_msg_data,
18143: '_PVT'
18144: );
18148: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.set_tax_security_context ',
18149: 'EXCEPTION :'||sqlerrm);
18150: END IF;
18151:
18152: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
18153: (
18154: l_api_name,
18155: G_PKG_NAME,
18156: 'OTHERS',
18195: |
18196: *=======================================================================*/
18197: PROCEDURE process_tax_determ_override(
18198: p_api_version IN NUMBER,
18199: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
18200: x_return_status OUT NOCOPY VARCHAR2,
18201: x_msg_count OUT NOCOPY NUMBER,
18202: x_msg_data OUT NOCOPY VARCHAR2,
18203: p_trx_id IN NUMBER,
18211:
18212: -- Local variables
18213: l_api_version CONSTANT NUMBER := 1;
18214: l_api_name CONSTANT VARCHAR2(30) := 'process_tax_determ';
18215: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
18216: lx_doc_level_recalc_flag VARCHAR2(1);
18217: l_total_tax_amount NUMBER;
18218:
18219: -- Local data structure
18272: 'p_line_intended_use :'||p_line_intended_use);
18273: END IF;
18274:
18275: --Check API version, initialize message list and create savepoint.
18276: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
18277: G_PKG_NAME,
18278: p_init_msg_list,
18279: l_api_version,
18280: p_api_version,
18280: p_api_version,
18281: '_PVT',
18282: x_return_status);
18283:
18284: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18285: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18286: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18287: RAISE OKL_API.G_EXCEPTION_ERROR;
18288: END IF;
18281: '_PVT',
18282: x_return_status);
18283:
18284: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18285: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18286: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18287: RAISE OKL_API.G_EXCEPTION_ERROR;
18288: END IF;
18289:
18282: x_return_status);
18283:
18284: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18285: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18286: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18287: RAISE OKL_API.G_EXCEPTION_ERROR;
18288: END IF;
18289:
18290: -- Required Values
18283:
18284: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18285: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18286: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18287: RAISE OKL_API.G_EXCEPTION_ERROR;
18288: END IF;
18289:
18290: -- Required Values
18291: IF p_tax_sources_id IS NULL THEN
18288: END IF;
18289:
18290: -- Required Values
18291: IF p_tax_sources_id IS NULL THEN
18292: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18293: p_token1 => G_COL_NAME_TOKEN,
18294: p_token1_value => 'TAX_SOURCES_ID');
18295: RAISE OKL_API.G_EXCEPTION_ERROR;
18296: END IF;
18291: IF p_tax_sources_id IS NULL THEN
18292: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18293: p_token1 => G_COL_NAME_TOKEN,
18294: p_token1_value => 'TAX_SOURCES_ID');
18295: RAISE OKL_API.G_EXCEPTION_ERROR;
18296: END IF;
18297:
18298: IF p_trx_business_category IS NULL THEN
18299: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18295: RAISE OKL_API.G_EXCEPTION_ERROR;
18296: END IF;
18297:
18298: IF p_trx_business_category IS NULL THEN
18299: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18300: p_token1 => G_COL_NAME_TOKEN,
18301: p_token1_value => 'TRX_BUSINESS_CATEGORY');
18302: RAISE OKL_API.G_EXCEPTION_ERROR;
18303: END IF;
18298: IF p_trx_business_category IS NULL THEN
18299: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18300: p_token1 => G_COL_NAME_TOKEN,
18301: p_token1_value => 'TRX_BUSINESS_CATEGORY');
18302: RAISE OKL_API.G_EXCEPTION_ERROR;
18303: END IF;
18304:
18305: IF p_trx_id IS NULL THEN
18306: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18302: RAISE OKL_API.G_EXCEPTION_ERROR;
18303: END IF;
18304:
18305: IF p_trx_id IS NULL THEN
18306: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18307: p_token1 => G_COL_NAME_TOKEN,
18308: p_token1_value => 'TRX_ID');
18309: RAISE OKL_API.G_EXCEPTION_ERROR;
18310: END IF;
18305: IF p_trx_id IS NULL THEN
18306: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18307: p_token1 => G_COL_NAME_TOKEN,
18308: p_token1_value => 'TRX_ID');
18309: RAISE OKL_API.G_EXCEPTION_ERROR;
18310: END IF;
18311: -- End required values
18312:
18313: -- Fetch Tax Sources details
18349: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_tax_determ_override.',
18350: 'Return Status' || l_return_status);
18351: END IF;
18352:
18353: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18354: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18355: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18356: RAISE OKL_API.G_EXCEPTION_ERROR;
18357: END IF;
18350: 'Return Status' || l_return_status);
18351: END IF;
18352:
18353: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18354: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18355: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18356: RAISE OKL_API.G_EXCEPTION_ERROR;
18357: END IF;
18358: -- End tax determinants update
18351: END IF;
18352:
18353: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18354: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18355: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18356: RAISE OKL_API.G_EXCEPTION_ERROR;
18357: END IF;
18358: -- End tax determinants update
18359:
18352:
18353: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18354: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18355: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18356: RAISE OKL_API.G_EXCEPTION_ERROR;
18357: END IF;
18358: -- End tax determinants update
18359:
18360: -- Recalculate Tax based on modified determinants
18396: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_tax_determ_override.',
18397: 'Return Status' || l_return_status);
18398: END IF;
18399:
18400: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18401: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18402: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18403: RAISE OKL_API.G_EXCEPTION_ERROR;
18404: END IF;
18397: 'Return Status' || l_return_status);
18398: END IF;
18399:
18400: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18401: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18402: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18403: RAISE OKL_API.G_EXCEPTION_ERROR;
18404: END IF;
18405:
18398: END IF;
18399:
18400: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18401: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18402: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18403: RAISE OKL_API.G_EXCEPTION_ERROR;
18404: END IF;
18405:
18406: -- Action based on return status
18399:
18400: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18401: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18402: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18403: RAISE OKL_API.G_EXCEPTION_ERROR;
18404: END IF;
18405:
18406: -- Action based on return status
18407: IF (lx_doc_level_recalc_flag = 'Y') THEN
18422: x_msg_data => x_msg_data,
18423: p_source_trx_id => p_trx_id,
18424: p_source_trx_name => 'Asset Relocation');
18425:
18426: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18427: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18428: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18429: RAISE OKL_API.G_EXCEPTION_ERROR;
18430: END IF;
18423: p_source_trx_id => p_trx_id,
18424: p_source_trx_name => 'Asset Relocation');
18425:
18426: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18427: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18428: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18429: RAISE OKL_API.G_EXCEPTION_ERROR;
18430: END IF;
18431:
18424: p_source_trx_name => 'Asset Relocation');
18425:
18426: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18427: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18428: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18429: RAISE OKL_API.G_EXCEPTION_ERROR;
18430: END IF;
18431:
18432: ELSE
18425:
18426: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18427: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18428: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18429: RAISE OKL_API.G_EXCEPTION_ERROR;
18430: END IF;
18431:
18432: ELSE
18433: update_tax_sources_total(p_api_version => p_api_version,
18435: x_return_status => l_return_status,
18436: x_msg_count => x_msg_count,
18437: x_msg_data => x_msg_data,
18438: p_source_trx_id => p_trx_id);
18439: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18440: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18441: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18442: RAISE OKL_API.G_EXCEPTION_ERROR;
18443: END IF;
18436: x_msg_count => x_msg_count,
18437: x_msg_data => x_msg_data,
18438: p_source_trx_id => p_trx_id);
18439: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18440: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18441: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18442: RAISE OKL_API.G_EXCEPTION_ERROR;
18443: END IF;
18444:
18437: x_msg_data => x_msg_data,
18438: p_source_trx_id => p_trx_id);
18439: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18440: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18441: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18442: RAISE OKL_API.G_EXCEPTION_ERROR;
18443: END IF;
18444:
18445: END IF;
18438: p_source_trx_id => p_trx_id);
18439: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18440: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18441: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18442: RAISE OKL_API.G_EXCEPTION_ERROR;
18443: END IF;
18444:
18445: END IF;
18446:
18448: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_tax_determ_override.',
18449: 'Return Status' || l_return_status);
18450: END IF;
18451:
18452: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18453: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18454: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18455: RAISE OKL_API.G_EXCEPTION_ERROR;
18456: END IF;
18449: 'Return Status' || l_return_status);
18450: END IF;
18451:
18452: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18453: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18454: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18455: RAISE OKL_API.G_EXCEPTION_ERROR;
18456: END IF;
18457:
18450: END IF;
18451:
18452: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18453: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18454: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18455: RAISE OKL_API.G_EXCEPTION_ERROR;
18456: END IF;
18457:
18458: ELSIF (lx_doc_level_recalc_flag = 'N') THEN
18451:
18452: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18453: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18454: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18455: RAISE OKL_API.G_EXCEPTION_ERROR;
18456: END IF;
18457:
18458: ELSIF (lx_doc_level_recalc_flag = 'N') THEN
18459:
18494: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_tax_determ_override.',
18495: 'Return Status' || l_return_status);
18496: END IF;
18497:
18498: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18499: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18500: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18501: RAISE OKL_API.G_EXCEPTION_ERROR;
18502: END IF;
18495: 'Return Status' || l_return_status);
18496: END IF;
18497:
18498: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18499: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18500: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18501: RAISE OKL_API.G_EXCEPTION_ERROR;
18502: END IF;
18503: END IF;
18496: END IF;
18497:
18498: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18499: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18500: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18501: RAISE OKL_API.G_EXCEPTION_ERROR;
18502: END IF;
18503: END IF;
18504: -- End actions based on return status
18497:
18498: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18499: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18500: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18501: RAISE OKL_API.G_EXCEPTION_ERROR;
18502: END IF;
18503: END IF;
18504: -- End actions based on return status
18505: -- End Recalculate tax
18513: x_msg_data => x_msg_data,
18514: p_asset_id => p_asset_id,
18515: p_request_id => p_request_id);
18516:
18517: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18518: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18519: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18520: RAISE OKL_API.G_EXCEPTION_ERROR;
18521: END IF;
18514: p_asset_id => p_asset_id,
18515: p_request_id => p_request_id);
18516:
18517: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18518: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18519: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18520: RAISE OKL_API.G_EXCEPTION_ERROR;
18521: END IF;
18522: END IF;
18515: p_request_id => p_request_id);
18516:
18517: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18518: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18519: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18520: RAISE OKL_API.G_EXCEPTION_ERROR;
18521: END IF;
18522: END IF;
18523:
18516:
18517: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18518: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18519: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18520: RAISE OKL_API.G_EXCEPTION_ERROR;
18521: END IF;
18522: END IF;
18523:
18524: -- Call Authoring package to sync tax values for 'BOOKING' and 'REBOOK' transactions
18531: p_transaction_id => p_trx_id,
18532: x_return_status => l_return_status,
18533: x_msg_count => x_msg_count,
18534: x_msg_data => x_msg_data );
18535: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18536: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18537: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18538: RAISE OKL_API.G_EXCEPTION_ERROR;
18539: END IF;
18532: x_return_status => l_return_status,
18533: x_msg_count => x_msg_count,
18534: x_msg_data => x_msg_data );
18535: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18536: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18537: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18538: RAISE OKL_API.G_EXCEPTION_ERROR;
18539: END IF;
18540: END IF;
18533: x_msg_count => x_msg_count,
18534: x_msg_data => x_msg_data );
18535: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18536: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18537: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18538: RAISE OKL_API.G_EXCEPTION_ERROR;
18539: END IF;
18540: END IF;
18541: -- End call to Authoring package
18534: x_msg_data => x_msg_data );
18535: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18536: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18537: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18538: RAISE OKL_API.G_EXCEPTION_ERROR;
18539: END IF;
18540: END IF;
18541: -- End call to Authoring package
18542:
18548: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.process_tax_determ_override ','End(-)');
18549: END IF;
18550:
18551: -- end the transaction
18552: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
18553:
18554: EXCEPTION
18555:
18556: WHEN OKL_API.G_EXCEPTION_ERROR THEN
18552: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
18553:
18554: EXCEPTION
18555:
18556: WHEN OKL_API.G_EXCEPTION_ERROR THEN
18557:
18558: IF (l_zxlinestotaltax_csr%ISOPEN) THEN
18559: CLOSE l_zxlinestotaltax_csr;
18560: END IF;
18560: END IF;
18561:
18562: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
18563: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_determ_override ',
18564: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
18565: END IF;
18566:
18567: x_return_status := OKL_API.HANDLE_EXCEPTIONS
18568: (
18563: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_determ_override ',
18564: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
18565: END IF;
18566:
18567: x_return_status := OKL_API.HANDLE_EXCEPTIONS
18568: (
18569: l_api_name,
18570: G_PKG_NAME,
18571: 'OKL_API.G_RET_STS_ERROR',
18567: x_return_status := OKL_API.HANDLE_EXCEPTIONS
18568: (
18569: l_api_name,
18570: G_PKG_NAME,
18571: 'OKL_API.G_RET_STS_ERROR',
18572: x_msg_count,
18573: x_msg_data,
18574: '_PVT'
18575: );
18572: x_msg_count,
18573: x_msg_data,
18574: '_PVT'
18575: );
18576: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
18577:
18578: IF (l_zxlinestotaltax_csr%ISOPEN) THEN
18579: CLOSE l_zxlinestotaltax_csr;
18580: END IF;
18580: END IF;
18581:
18582: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
18583: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_determ_override ',
18584: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
18585: END IF;
18586:
18587: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
18588: (
18583: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_determ_override ',
18584: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
18585: END IF;
18586:
18587: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
18588: (
18589: l_api_name,
18590: G_PKG_NAME,
18591: 'OKL_API.G_RET_STS_UNEXP_ERROR',
18587: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
18588: (
18589: l_api_name,
18590: G_PKG_NAME,
18591: 'OKL_API.G_RET_STS_UNEXP_ERROR',
18592: x_msg_count,
18593: x_msg_data,
18594: '_PVT'
18595: );
18603: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_determ_override ',
18604: 'EXCEPTION :'||sqlerrm);
18605: END IF;
18606:
18607: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
18608: (
18609: l_api_name,
18610: G_PKG_NAME,
18611: 'OTHERS',
18651: |
18652: *=======================================================================*/
18653: PROCEDURE process_tax_details_override(
18654: p_api_version IN NUMBER,
18655: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
18656: x_return_status OUT NOCOPY VARCHAR2,
18657: x_msg_count OUT NOCOPY NUMBER,
18658: x_msg_data OUT NOCOPY VARCHAR2,
18659: p_event_id IN NUMBER,
18665:
18666: -- Local variables
18667: l_api_version CONSTANT NUMBER := 1;
18668: l_api_name CONSTANT VARCHAR2(30) := 'process_tax_details';
18669: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
18670: l_total_tax_amount NUMBER;
18671:
18672: -- Local data structure
18673: l_txsv_rec txsv_rec_type;
18699: 'p_event_class_code :'||p_event_class_code);
18700: END IF;
18701:
18702: --Check API version, initialize message list and create savepoint.
18703: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
18704: G_PKG_NAME,
18705: p_init_msg_list,
18706: l_api_version,
18707: p_api_version,
18707: p_api_version,
18708: '_PVT',
18709: x_return_status);
18710:
18711: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18712: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18713: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18714: RAISE OKL_API.G_EXCEPTION_ERROR;
18715: END IF;
18708: '_PVT',
18709: x_return_status);
18710:
18711: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18712: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18713: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18714: RAISE OKL_API.G_EXCEPTION_ERROR;
18715: END IF;
18716:
18709: x_return_status);
18710:
18711: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18712: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18713: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18714: RAISE OKL_API.G_EXCEPTION_ERROR;
18715: END IF;
18716:
18717: -- Required Values
18710:
18711: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18712: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18713: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18714: RAISE OKL_API.G_EXCEPTION_ERROR;
18715: END IF;
18716:
18717: -- Required Values
18718: IF p_application_id IS NULL THEN
18715: END IF;
18716:
18717: -- Required Values
18718: IF p_application_id IS NULL THEN
18719: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18720: p_token1 => G_COL_NAME_TOKEN,
18721: p_token1_value => 'APPLICATION_ID');
18722: RAISE OKL_API.G_EXCEPTION_ERROR;
18723: END IF;
18718: IF p_application_id IS NULL THEN
18719: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18720: p_token1 => G_COL_NAME_TOKEN,
18721: p_token1_value => 'APPLICATION_ID');
18722: RAISE OKL_API.G_EXCEPTION_ERROR;
18723: END IF;
18724:
18725: IF p_entity_code IS NULL THEN
18726: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18722: RAISE OKL_API.G_EXCEPTION_ERROR;
18723: END IF;
18724:
18725: IF p_entity_code IS NULL THEN
18726: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18727: p_token1 => G_COL_NAME_TOKEN,
18728: p_token1_value => 'ENTITY_CODE');
18729: RAISE OKL_API.G_EXCEPTION_ERROR;
18730: END IF;
18725: IF p_entity_code IS NULL THEN
18726: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18727: p_token1 => G_COL_NAME_TOKEN,
18728: p_token1_value => 'ENTITY_CODE');
18729: RAISE OKL_API.G_EXCEPTION_ERROR;
18730: END IF;
18731:
18732: IF p_event_class_code IS NULL THEN
18733: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18729: RAISE OKL_API.G_EXCEPTION_ERROR;
18730: END IF;
18731:
18732: IF p_event_class_code IS NULL THEN
18733: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18734: p_token1 => G_COL_NAME_TOKEN,
18735: p_token1_value => 'EVENT_CLASS_CODE');
18736: RAISE OKL_API.G_EXCEPTION_ERROR;
18737: END IF;
18732: IF p_event_class_code IS NULL THEN
18733: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18734: p_token1 => G_COL_NAME_TOKEN,
18735: p_token1_value => 'EVENT_CLASS_CODE');
18736: RAISE OKL_API.G_EXCEPTION_ERROR;
18737: END IF;
18738:
18739: IF p_internal_organization_id IS NULL THEN
18740: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18736: RAISE OKL_API.G_EXCEPTION_ERROR;
18737: END IF;
18738:
18739: IF p_internal_organization_id IS NULL THEN
18740: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18741: p_token1 => G_COL_NAME_TOKEN,
18742: p_token1_value => 'INTERNAL_ORGANIZATION_ID');
18743: RAISE OKL_API.G_EXCEPTION_ERROR;
18744: END IF;
18739: IF p_internal_organization_id IS NULL THEN
18740: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18741: p_token1 => G_COL_NAME_TOKEN,
18742: p_token1_value => 'INTERNAL_ORGANIZATION_ID');
18743: RAISE OKL_API.G_EXCEPTION_ERROR;
18744: END IF;
18745:
18746: IF p_trx_id IS NULL THEN
18747: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18743: RAISE OKL_API.G_EXCEPTION_ERROR;
18744: END IF;
18745:
18746: IF p_trx_id IS NULL THEN
18747: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18748: p_token1 => G_COL_NAME_TOKEN,
18749: p_token1_value => 'TRX_ID');
18750: RAISE OKL_API.G_EXCEPTION_ERROR;
18751: END IF;
18746: IF p_trx_id IS NULL THEN
18747: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18748: p_token1 => G_COL_NAME_TOKEN,
18749: p_token1_value => 'TRX_ID');
18750: RAISE OKL_API.G_EXCEPTION_ERROR;
18751: END IF;
18752: -- End required values
18753:
18754: -- Populate Transaction record
18785: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_tax_details_override.',
18786: 'Return Status' || l_return_status);
18787: END IF;
18788:
18789: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18790: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18791: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18792: RAISE OKL_API.G_EXCEPTION_ERROR;
18793: END IF;
18786: 'Return Status' || l_return_status);
18787: END IF;
18788:
18789: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18790: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18791: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18792: RAISE OKL_API.G_EXCEPTION_ERROR;
18793: END IF;
18794:
18787: END IF;
18788:
18789: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18790: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18791: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18792: RAISE OKL_API.G_EXCEPTION_ERROR;
18793: END IF;
18794:
18795: -- Overriding a tax line can impact the tax lines of other transaction lines
18788:
18789: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18790: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18791: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18792: RAISE OKL_API.G_EXCEPTION_ERROR;
18793: END IF;
18794:
18795: -- Overriding a tax line can impact the tax lines of other transaction lines
18796: -- Get the modified tax lines from zx_lines, sum up the total tax amount
18812: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_tax_details_override.',
18813: 'Return Status' || l_return_status);
18814: END IF;
18815:
18816: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18817: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18818: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18819: RAISE OKL_API.G_EXCEPTION_ERROR;
18820: END IF;
18813: 'Return Status' || l_return_status);
18814: END IF;
18815:
18816: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18817: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18818: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18819: RAISE OKL_API.G_EXCEPTION_ERROR;
18820: END IF;
18821:
18814: END IF;
18815:
18816: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18817: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18818: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18819: RAISE OKL_API.G_EXCEPTION_ERROR;
18820: END IF;
18821:
18822: x_return_status := l_return_status;
18815:
18816: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18817: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18818: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18819: RAISE OKL_API.G_EXCEPTION_ERROR;
18820: END IF;
18821:
18822: x_return_status := l_return_status;
18823:
18825: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.process_tax_details_override ','End(-)');
18826: END IF;
18827:
18828: -- end the transaction
18829: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
18830:
18831: EXCEPTION
18832: WHEN OKL_API.G_EXCEPTION_ERROR THEN
18833:
18828: -- end the transaction
18829: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
18830:
18831: EXCEPTION
18832: WHEN OKL_API.G_EXCEPTION_ERROR THEN
18833:
18834: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
18835: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_details_override ',
18836: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
18832: WHEN OKL_API.G_EXCEPTION_ERROR THEN
18833:
18834: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
18835: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_details_override ',
18836: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
18837: END IF;
18838:
18839: x_return_status := OKL_API.HANDLE_EXCEPTIONS
18840: (
18835: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_details_override ',
18836: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
18837: END IF;
18838:
18839: x_return_status := OKL_API.HANDLE_EXCEPTIONS
18840: (
18841: l_api_name,
18842: G_PKG_NAME,
18843: 'OKL_API.G_RET_STS_ERROR',
18839: x_return_status := OKL_API.HANDLE_EXCEPTIONS
18840: (
18841: l_api_name,
18842: G_PKG_NAME,
18843: 'OKL_API.G_RET_STS_ERROR',
18844: x_msg_count,
18845: x_msg_data,
18846: '_PVT'
18847: );
18844: x_msg_count,
18845: x_msg_data,
18846: '_PVT'
18847: );
18848: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
18849: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
18850: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_details_override ',
18851: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
18852: END IF;
18847: );
18848: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
18849: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
18850: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_details_override ',
18851: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
18852: END IF;
18853:
18854: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
18855: (
18850: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_details_override ',
18851: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
18852: END IF;
18853:
18854: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
18855: (
18856: l_api_name,
18857: G_PKG_NAME,
18858: 'OKL_API.G_RET_STS_UNEXP_ERROR',
18854: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
18855: (
18856: l_api_name,
18857: G_PKG_NAME,
18858: 'OKL_API.G_RET_STS_UNEXP_ERROR',
18859: x_msg_count,
18860: x_msg_data,
18861: '_PVT'
18862: );
18866: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_details_override ',
18867: 'EXCEPTION :'||sqlerrm);
18868: END IF;
18869:
18870: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
18871: (
18872: l_api_name,
18873: G_PKG_NAME,
18874: 'OTHERS',
18918: |
18919: *=======================================================================*/
18920: PROCEDURE get_tax_determinants(
18921: p_api_version IN NUMBER,
18922: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
18923: x_return_status OUT NOCOPY VARCHAR2,
18924: x_msg_count OUT NOCOPY NUMBER,
18925: x_msg_data OUT NOCOPY VARCHAR2,
18926: p_source_trx_id IN NUMBER,
19108: 'p_source_table :'||p_source_table);
19109: END IF;
19110:
19111: --Check API version, initialize message list and create savepoint.
19112: x_return_status := OKL_API.START_ACTIVITY(l_api_name,
19113: G_PKG_NAME,
19114: p_init_msg_list,
19115: l_api_version,
19116: p_api_version,
19115: l_api_version,
19116: p_api_version,
19117: '_PVT',
19118: x_return_status);
19119: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19120: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19121: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19122: RAISE OKL_API.G_EXCEPTION_ERROR;
19123: END IF;
19116: p_api_version,
19117: '_PVT',
19118: x_return_status);
19119: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19120: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19121: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19122: RAISE OKL_API.G_EXCEPTION_ERROR;
19123: END IF;
19124:
19117: '_PVT',
19118: x_return_status);
19119: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19120: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19121: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19122: RAISE OKL_API.G_EXCEPTION_ERROR;
19123: END IF;
19124:
19125: IF p_source_trx_name IN ('Billing', 'Credit Memo', 'Rollover Billing',
19118: x_return_status);
19119: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19120: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19121: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19122: RAISE OKL_API.G_EXCEPTION_ERROR;
19123: END IF;
19124:
19125: IF p_source_trx_name IN ('Billing', 'Credit Memo', 'Rollover Billing',
19126: 'Rollover Credit Memo', 'Release Billing',
19139: OKC_API.set_message( p_app_name => 'OKC',
19140: p_msg_name => G_INVALID_VALUE,
19141: p_token1 => G_COL_NAME_TOKEN,
19142: p_token1_value => 'SOURCE_TRX_ID');
19143: RAISE OKL_API.G_EXCEPTION_ERROR;
19144: END IF;
19145: CLOSE l_billingdtls_csr;
19146:
19147: IF l_billingdtls_rec.qte_id IS NOT NULL THEN -- Invoice created for a quote
19160: l_def_tax_country := get_default_taxation_country(x_return_status => x_return_status,
19161: x_msg_count => x_msg_count,
19162: x_msg_data => x_msg_data,
19163: p_legal_entity_id => l_billingdtls_rec.legal_entity_id);
19164: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19165: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19166: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19167: RAISE OKL_API.G_EXCEPTION_ERROR;
19168: END IF;
19161: x_msg_count => x_msg_count,
19162: x_msg_data => x_msg_data,
19163: p_legal_entity_id => l_billingdtls_rec.legal_entity_id);
19164: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19165: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19166: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19167: RAISE OKL_API.G_EXCEPTION_ERROR;
19168: END IF;
19169:
19162: x_msg_data => x_msg_data,
19163: p_legal_entity_id => l_billingdtls_rec.legal_entity_id);
19164: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19165: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19166: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19167: RAISE OKL_API.G_EXCEPTION_ERROR;
19168: END IF;
19169:
19170: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
19163: p_legal_entity_id => l_billingdtls_rec.legal_entity_id);
19164: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19165: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19166: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19167: RAISE OKL_API.G_EXCEPTION_ERROR;
19168: END IF;
19169:
19170: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
19171: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants.',
19213: x_currency_conversion_type => lx_currency_conversion_type,
19214: x_currency_conversion_rate => lx_currency_conversion_rate,
19215: x_currency_conversion_date => lx_currency_conversion_date,
19216: x_contract_start_date => lx_contract_start_date);
19217: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19218: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19219: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19220: RAISE OKL_API.G_EXCEPTION_ERROR;
19221: END IF;
19214: x_currency_conversion_rate => lx_currency_conversion_rate,
19215: x_currency_conversion_date => lx_currency_conversion_date,
19216: x_contract_start_date => lx_contract_start_date);
19217: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19218: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19219: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19220: RAISE OKL_API.G_EXCEPTION_ERROR;
19221: END IF;
19222:
19215: x_currency_conversion_date => lx_currency_conversion_date,
19216: x_contract_start_date => lx_contract_start_date);
19217: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19218: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19219: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19220: RAISE OKL_API.G_EXCEPTION_ERROR;
19221: END IF;
19222:
19223: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
19216: x_contract_start_date => lx_contract_start_date);
19217: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19218: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19219: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19220: RAISE OKL_API.G_EXCEPTION_ERROR;
19221: END IF;
19222:
19223: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
19224: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants.',
19310: x_purchase_of_lease => lx_purchase_of_lease,
19311: x_usage_of_equipment => lx_usage_of_equipment,
19312: x_age_of_equipment => lx_age_of_equipment,
19313: x_vendor_site_id => lx_vendor_site_id);
19314: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19315: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19316: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19317: RAISE OKL_API.G_EXCEPTION_ERROR;
19318: END IF;
19311: x_usage_of_equipment => lx_usage_of_equipment,
19312: x_age_of_equipment => lx_age_of_equipment,
19313: x_vendor_site_id => lx_vendor_site_id);
19314: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19315: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19316: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19317: RAISE OKL_API.G_EXCEPTION_ERROR;
19318: END IF;
19319:
19312: x_age_of_equipment => lx_age_of_equipment,
19313: x_vendor_site_id => lx_vendor_site_id);
19314: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19315: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19316: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19317: RAISE OKL_API.G_EXCEPTION_ERROR;
19318: END IF;
19319:
19320: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
19313: x_vendor_site_id => lx_vendor_site_id);
19314: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19315: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19316: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19317: RAISE OKL_API.G_EXCEPTION_ERROR;
19318: END IF;
19319:
19320: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
19321: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants.',
19354: OKC_API.set_message( p_app_name => 'OKC',
19355: p_msg_name => G_INVALID_VALUE,
19356: p_token1 => G_COL_NAME_TOKEN,
19357: p_token1_value => 'ISL_ID');
19358: RAISE OKL_API.G_EXCEPTION_ERROR;
19359: END IF;
19360: CLOSE l_oeorderlines_csr;
19361:
19362: ELSIF l_purpose_code = 'CURE' THEN -- vendor cure billing
19372: ELSE
19373: OPEN l_invitem_csr(l_fin_asset_id);
19374: FETCH l_invitem_csr INTO l_inv_item_id, l_inv_item_org_id;
19375: IF l_invitem_csr%NOTFOUND THEN
19376: OKL_API.set_message(
19377: p_app_name => 'OKL',
19378: p_msg_name => 'OKL_TX_INV_ITEM_ERR',
19379: p_token1 => 'ASSET_NUMBER',
19380: p_token1_value => l_name);
19378: p_msg_name => 'OKL_TX_INV_ITEM_ERR',
19379: p_token1 => 'ASSET_NUMBER',
19380: p_token1_value => l_name);
19381:
19382: RAISE OKL_API.G_EXCEPTION_ERROR;
19383: END IF;
19384: CLOSE l_invitem_csr;
19385: END IF;
19386:
19393: -- cure billing and asset repair billing
19394: lx_ship_to_siteuseid := NULL;
19395: IF l_qtp_code LIKE 'REP%' OR l_purpose_code = 'CURE' THEN
19396: IF l_billingdtls_rec.ibt_id IS NULL THEN
19397: OKL_API.set_message( p_app_name => 'OKL',
19398: p_msg_name => 'OKL_TX_NO_INV_BILL_TO');
19399:
19400: RAISE OKL_API.G_EXCEPTION_ERROR;
19401:
19396: IF l_billingdtls_rec.ibt_id IS NULL THEN
19397: OKL_API.set_message( p_app_name => 'OKL',
19398: p_msg_name => 'OKL_TX_NO_INV_BILL_TO');
19399:
19400: RAISE OKL_API.G_EXCEPTION_ERROR;
19401:
19402: ELSE
19403: lx_bill_to_siteuseid := l_billingdtls_rec.ibt_id;
19404: END IF;
19411: END IF;
19412:
19413: ELSIF l_purpose_code = 'AMBSPR' THEN -- Remarketing billing
19414: IF l_billingdtls_rec.ibt_id IS NULL THEN
19415: OKL_API.set_message( p_app_name => 'OKL',
19416: p_msg_name => 'OKL_TX_NO_INV_BILL_TO');
19417:
19418: RAISE OKL_API.G_EXCEPTION_ERROR;
19419: ELSE
19414: IF l_billingdtls_rec.ibt_id IS NULL THEN
19415: OKL_API.set_message( p_app_name => 'OKL',
19416: p_msg_name => 'OKL_TX_NO_INV_BILL_TO');
19417:
19418: RAISE OKL_API.G_EXCEPTION_ERROR;
19419: ELSE
19420: lx_bill_to_siteuseid := l_billingdtls_rec.ibt_id;
19421: END IF;
19422: --ship to (lx_ship_to_siteuseid) is already derived above for Remarketing billing
19441: x_ship_to_location_id => lx_ship_to_location_id,
19442: x_ship_to_party_id => lx_ship_to_party_id,
19443: x_ship_to_site_use_id => lx_ship_to_siteuseid);
19444:
19445: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19446: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19447: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19448: RAISE OKL_API.G_EXCEPTION_ERROR;
19449: END IF;
19442: x_ship_to_party_id => lx_ship_to_party_id,
19443: x_ship_to_site_use_id => lx_ship_to_siteuseid);
19444:
19445: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19446: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19447: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19448: RAISE OKL_API.G_EXCEPTION_ERROR;
19449: END IF;
19450:
19443: x_ship_to_site_use_id => lx_ship_to_siteuseid);
19444:
19445: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19446: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19447: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19448: RAISE OKL_API.G_EXCEPTION_ERROR;
19449: END IF;
19450:
19451: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
19444:
19445: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19446: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19447: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19448: RAISE OKL_API.G_EXCEPTION_ERROR;
19449: END IF;
19450:
19451: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
19452: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants.',
19500: p_book_class_code => lx_book_class_code,
19501: p_tax_country_code => l_def_tax_country,
19502: x_tbc_code => lx_tbc_code);
19503:
19504: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19505: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19506: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19507: RAISE OKL_API.G_EXCEPTION_ERROR;
19508: END IF;
19501: p_tax_country_code => l_def_tax_country,
19502: x_tbc_code => lx_tbc_code);
19503:
19504: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19505: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19506: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19507: RAISE OKL_API.G_EXCEPTION_ERROR;
19508: END IF;
19509:
19502: x_tbc_code => lx_tbc_code);
19503:
19504: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19505: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19506: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19507: RAISE OKL_API.G_EXCEPTION_ERROR;
19508: END IF;
19509:
19510: -- Validate TBC Code
19503:
19504: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19505: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19506: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19507: RAISE OKL_API.G_EXCEPTION_ERROR;
19508: END IF;
19509:
19510: -- Validate TBC Code
19511: IF lx_tbc_code IS NOT NULL THEN
19518: p_trx_date => l_billingdtls_rec.date_invoiced,
19519: p_tbc_code => lx_tbc_code,
19520: x_valid_code => lx_tax_valid_code); -- 'S' --> Success, 'F' --> Failure
19521:
19522: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19523: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19524: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19525: RAISE OKL_API.G_EXCEPTION_ERROR;
19526: END IF;
19519: p_tbc_code => lx_tbc_code,
19520: x_valid_code => lx_tax_valid_code); -- 'S' --> Success, 'F' --> Failure
19521:
19522: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19523: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19524: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19525: RAISE OKL_API.G_EXCEPTION_ERROR;
19526: END IF;
19527: END IF;
19520: x_valid_code => lx_tax_valid_code); -- 'S' --> Success, 'F' --> Failure
19521:
19522: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19523: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19524: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19525: RAISE OKL_API.G_EXCEPTION_ERROR;
19526: END IF;
19527: END IF;
19528:
19521:
19522: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19523: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19524: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19525: RAISE OKL_API.G_EXCEPTION_ERROR;
19526: END IF;
19527: END IF;
19528:
19529: IF (lx_tbc_code IS NULL OR lx_tax_valid_code = 'F') THEN
19548: p_sale_lease_back_code => lx_sale_lease_back,
19549: p_lease_purchased_code => lx_purchase_of_lease,
19550: p_tax_country_code => l_def_tax_country,
19551: x_pc_code => lx_pc_code);
19552: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19553: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19554: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19555: RAISE OKL_API.G_EXCEPTION_ERROR;
19556: END IF;
19549: p_lease_purchased_code => lx_purchase_of_lease,
19550: p_tax_country_code => l_def_tax_country,
19551: x_pc_code => lx_pc_code);
19552: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19553: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19554: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19555: RAISE OKL_API.G_EXCEPTION_ERROR;
19556: END IF;
19557:
19550: p_tax_country_code => l_def_tax_country,
19551: x_pc_code => lx_pc_code);
19552: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19553: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19554: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19555: RAISE OKL_API.G_EXCEPTION_ERROR;
19556: END IF;
19557:
19558: -- Validate PC Code
19551: x_pc_code => lx_pc_code);
19552: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19553: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19554: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19555: RAISE OKL_API.G_EXCEPTION_ERROR;
19556: END IF;
19557:
19558: -- Validate PC Code
19559: IF lx_pc_code IS NOT NULL THEN
19570: IF (lx_tax_valid_code = 'F') THEN
19571: lx_pc_code := null;
19572: END IF;
19573:
19574: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19575: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19576: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19577: RAISE OKL_API.G_EXCEPTION_ERROR;
19578: END IF;
19571: lx_pc_code := null;
19572: END IF;
19573:
19574: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19575: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19576: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19577: RAISE OKL_API.G_EXCEPTION_ERROR;
19578: END IF;
19579: END IF;
19572: END IF;
19573:
19574: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19575: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19576: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19577: RAISE OKL_API.G_EXCEPTION_ERROR;
19578: END IF;
19579: END IF;
19580:
19573:
19574: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19575: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19576: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19577: RAISE OKL_API.G_EXCEPTION_ERROR;
19578: END IF;
19579: END IF;
19580:
19581: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
19603: p_term_quote_type_code => null,
19604: p_term_quote_reason_code => null,
19605: p_tax_country_code => l_def_tax_country,
19606: x_ufc_code => lx_ufc_code);
19607: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19608: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19609: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19610: RAISE OKL_API.G_EXCEPTION_ERROR;
19611: END IF;
19604: p_term_quote_reason_code => null,
19605: p_tax_country_code => l_def_tax_country,
19606: x_ufc_code => lx_ufc_code);
19607: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19608: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19609: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19610: RAISE OKL_API.G_EXCEPTION_ERROR;
19611: END IF;
19612:
19605: p_tax_country_code => l_def_tax_country,
19606: x_ufc_code => lx_ufc_code);
19607: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19608: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19609: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19610: RAISE OKL_API.G_EXCEPTION_ERROR;
19611: END IF;
19612:
19613: -- Validate UFC Code
19606: x_ufc_code => lx_ufc_code);
19607: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19608: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19609: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19610: RAISE OKL_API.G_EXCEPTION_ERROR;
19611: END IF;
19612:
19613: -- Validate UFC Code
19614: IF lx_ufc_code IS NOT NULL THEN
19625: IF (lx_tax_valid_code = 'F') THEN
19626: lx_ufc_code := null;
19627: END IF;
19628:
19629: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19630: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19631: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19632: RAISE OKL_API.G_EXCEPTION_ERROR;
19633: END IF;
19626: lx_ufc_code := null;
19627: END IF;
19628:
19629: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19630: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19631: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19632: RAISE OKL_API.G_EXCEPTION_ERROR;
19633: END IF;
19634: END IF;
19627: END IF;
19628:
19629: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19630: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19631: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19632: RAISE OKL_API.G_EXCEPTION_ERROR;
19633: END IF;
19634: END IF;
19635:
19628:
19629: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19630: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19631: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19632: RAISE OKL_API.G_EXCEPTION_ERROR;
19633: END IF;
19634: END IF;
19635:
19636: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
19693: OKC_API.set_message( p_app_name => 'OKC',
19694: p_msg_name => G_INVALID_VALUE,
19695: p_token1 => G_COL_NAME_TOKEN,
19696: p_token1_value => 'FMA_ID');
19697: RAISE OKL_API.G_EXCEPTION_ERROR;
19698: END IF;
19699: CLOSE l_formulae_csr;
19700:
19701: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
19785: p_additional_parameters => l_add_params,
19786: x_formula_value => lx_assessable_value,
19787: x_return_status => x_return_status);
19788:
19789: IF (x_return_status IN (OKL_API.G_RET_STS_UNEXP_ERROR, OKL_API.G_RET_STS_ERROR)) THEN
19790: OKL_API.init_msg_list('T');
19791: OKL_API.set_message(p_app_name => 'OKL',
19792: p_msg_name => 'OKL_TX_FRM_TXN_ERR',
19793: p_token1 => 'FMA_NAME',
19786: x_formula_value => lx_assessable_value,
19787: x_return_status => x_return_status);
19788:
19789: IF (x_return_status IN (OKL_API.G_RET_STS_UNEXP_ERROR, OKL_API.G_RET_STS_ERROR)) THEN
19790: OKL_API.init_msg_list('T');
19791: OKL_API.set_message(p_app_name => 'OKL',
19792: p_msg_name => 'OKL_TX_FRM_TXN_ERR',
19793: p_token1 => 'FMA_NAME',
19794: p_token1_value => l_formula_name,
19787: x_return_status => x_return_status);
19788:
19789: IF (x_return_status IN (OKL_API.G_RET_STS_UNEXP_ERROR, OKL_API.G_RET_STS_ERROR)) THEN
19790: OKL_API.init_msg_list('T');
19791: OKL_API.set_message(p_app_name => 'OKL',
19792: p_msg_name => 'OKL_TX_FRM_TXN_ERR',
19793: p_token1 => 'FMA_NAME',
19794: p_token1_value => l_formula_name,
19795: p_token2 => 'TRX_NAME ',
19793: p_token1 => 'FMA_NAME',
19794: p_token1_value => l_formula_name,
19795: p_token2 => 'TRX_NAME ',
19796: p_token2_value => p_source_trx_name);
19797: RAISE OKL_API.G_EXCEPTION_ERROR;
19798: END IF;
19799:
19800: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
19801: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants.',
19830: OKC_API.set_message( p_app_name => 'OKC',
19831: p_msg_name => G_INVALID_VALUE,
19832: p_token1 => G_COL_NAME_TOKEN,
19833: p_token1_value => 'SOURCE_TRX_ID');
19834: RAISE OKL_API.G_EXCEPTION_ERROR;
19835: END IF;
19836: CLOSE l_disbdtls_csr;
19837:
19838: IF (l_disbdtls_rec.ipvs_id IS NOT NULL) THEN
19857: l_def_tax_country := get_default_taxation_country(x_return_status => x_return_status,
19858: x_msg_count => x_msg_count,
19859: x_msg_data => x_msg_data,
19860: p_legal_entity_id => l_disbdtls_rec.legal_entity_id);
19861: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19862: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19863: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19864: RAISE OKL_API.G_EXCEPTION_ERROR;
19865: END IF;
19858: x_msg_count => x_msg_count,
19859: x_msg_data => x_msg_data,
19860: p_legal_entity_id => l_disbdtls_rec.legal_entity_id);
19861: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19862: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19863: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19864: RAISE OKL_API.G_EXCEPTION_ERROR;
19865: END IF;
19866:
19859: x_msg_data => x_msg_data,
19860: p_legal_entity_id => l_disbdtls_rec.legal_entity_id);
19861: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19862: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19863: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19864: RAISE OKL_API.G_EXCEPTION_ERROR;
19865: END IF;
19866:
19867: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
19860: p_legal_entity_id => l_disbdtls_rec.legal_entity_id);
19861: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19862: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19863: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19864: RAISE OKL_API.G_EXCEPTION_ERROR;
19865: END IF;
19866:
19867: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
19868: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants.',
19903: x_currency_conversion_type => lx_currency_conversion_type,
19904: x_currency_conversion_rate => lx_currency_conversion_rate,
19905: x_currency_conversion_date => lx_currency_conversion_date,
19906: x_contract_start_date => lx_contract_start_date);
19907: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19908: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19909: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19910: RAISE OKL_API.G_EXCEPTION_ERROR;
19911: END IF;
19904: x_currency_conversion_rate => lx_currency_conversion_rate,
19905: x_currency_conversion_date => lx_currency_conversion_date,
19906: x_contract_start_date => lx_contract_start_date);
19907: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19908: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19909: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19910: RAISE OKL_API.G_EXCEPTION_ERROR;
19911: END IF;
19912:
19905: x_currency_conversion_date => lx_currency_conversion_date,
19906: x_contract_start_date => lx_contract_start_date);
19907: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19908: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19909: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19910: RAISE OKL_API.G_EXCEPTION_ERROR;
19911: END IF;
19912:
19913: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
19906: x_contract_start_date => lx_contract_start_date);
19907: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19908: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19909: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19910: RAISE OKL_API.G_EXCEPTION_ERROR;
19911: END IF;
19912:
19913: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
19914: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants.',
20000: x_purchase_of_lease => lx_purchase_of_lease,
20001: x_usage_of_equipment => lx_usage_of_equipment,
20002: x_age_of_equipment => lx_age_of_equipment,
20003: x_vendor_site_id => lx_vendor_site_id);
20004: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20005: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20006: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
20007: RAISE OKL_API.G_EXCEPTION_ERROR;
20008: END IF;
20001: x_usage_of_equipment => lx_usage_of_equipment,
20002: x_age_of_equipment => lx_age_of_equipment,
20003: x_vendor_site_id => lx_vendor_site_id);
20004: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20005: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20006: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
20007: RAISE OKL_API.G_EXCEPTION_ERROR;
20008: END IF;
20009:
20002: x_age_of_equipment => lx_age_of_equipment,
20003: x_vendor_site_id => lx_vendor_site_id);
20004: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20005: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20006: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
20007: RAISE OKL_API.G_EXCEPTION_ERROR;
20008: END IF;
20009:
20010: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20003: x_vendor_site_id => lx_vendor_site_id);
20004: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20005: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20006: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
20007: RAISE OKL_API.G_EXCEPTION_ERROR;
20008: END IF;
20009:
20010: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20011: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants.',
20029: -- Get the inventory item id
20030: OPEN l_invitem_csr(l_fin_asset_id);
20031: FETCH l_invitem_csr INTO l_inv_item_id, l_inv_item_org_id;
20032: IF l_invitem_csr%NOTFOUND THEN
20033: OKL_API.set_message(
20034: p_app_name => 'OKL',
20035: p_msg_name => 'OKL_TX_INV_ITEM_ERR',
20036: p_token1 => 'ASSET_NUMBER',
20037: p_token1_value => l_name);
20035: p_msg_name => 'OKL_TX_INV_ITEM_ERR',
20036: p_token1 => 'ASSET_NUMBER',
20037: p_token1_value => l_name);
20038:
20039: RAISE OKL_API.G_EXCEPTION_ERROR;
20040: END IF;
20041: CLOSE l_invitem_csr;
20042:
20043: END IF;
20071: p_book_class_code => lx_book_class_code,
20072: p_tax_country_code => l_def_tax_country,
20073: x_tbc_code => lx_tbc_code);
20074:
20075: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20076: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20077: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
20078: RAISE OKL_API.G_EXCEPTION_ERROR;
20079: END IF;
20072: p_tax_country_code => l_def_tax_country,
20073: x_tbc_code => lx_tbc_code);
20074:
20075: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20076: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20077: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
20078: RAISE OKL_API.G_EXCEPTION_ERROR;
20079: END IF;
20080:
20073: x_tbc_code => lx_tbc_code);
20074:
20075: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20076: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20077: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
20078: RAISE OKL_API.G_EXCEPTION_ERROR;
20079: END IF;
20080:
20081: -- Validate TBC Code
20074:
20075: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20076: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20077: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
20078: RAISE OKL_API.G_EXCEPTION_ERROR;
20079: END IF;
20080:
20081: -- Validate TBC Code
20082: IF lx_tbc_code IS NOT NULL THEN
20089: p_trx_date => l_disbdtls_rec.date_invoiced,
20090: p_tbc_code => lx_tbc_code,
20091: x_valid_code => lx_tax_valid_code); -- 'S' --> Success, 'F' --> Failure
20092:
20093: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20094: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20095: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
20096: RAISE OKL_API.G_EXCEPTION_ERROR;
20097: END IF;
20090: p_tbc_code => lx_tbc_code,
20091: x_valid_code => lx_tax_valid_code); -- 'S' --> Success, 'F' --> Failure
20092:
20093: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20094: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20095: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
20096: RAISE OKL_API.G_EXCEPTION_ERROR;
20097: END IF;
20098: END IF;
20091: x_valid_code => lx_tax_valid_code); -- 'S' --> Success, 'F' --> Failure
20092:
20093: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20094: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20095: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
20096: RAISE OKL_API.G_EXCEPTION_ERROR;
20097: END IF;
20098: END IF;
20099:
20092:
20093: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20094: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20095: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
20096: RAISE OKL_API.G_EXCEPTION_ERROR;
20097: END IF;
20098: END IF;
20099:
20100: IF (lx_tbc_code IS NULL OR lx_tax_valid_code = 'F') THEN
20151: OKC_API.set_message( p_app_name => 'OKC',
20152: p_msg_name => G_INVALID_VALUE,
20153: p_token1 => G_COL_NAME_TOKEN,
20154: p_token1_value => 'FMA_ID');
20155: RAISE OKL_API.G_EXCEPTION_ERROR;
20156: END IF;
20157: CLOSE l_formulae_csr;
20158:
20159: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20245: p_additional_parameters => l_add_params,
20246: x_formula_value => lx_assessable_value,
20247: x_return_status => x_return_status);
20248:
20249: IF (x_return_status IN (OKL_API.G_RET_STS_UNEXP_ERROR, OKL_API.G_RET_STS_ERROR)) THEN
20250: OKL_API.init_msg_list('T');
20251: OKL_API.set_message(p_app_name => 'OKL',
20252: p_msg_name => 'OKL_TX_FRM_TXN_ERR',
20253: p_token1 => 'FMA_NAME',
20246: x_formula_value => lx_assessable_value,
20247: x_return_status => x_return_status);
20248:
20249: IF (x_return_status IN (OKL_API.G_RET_STS_UNEXP_ERROR, OKL_API.G_RET_STS_ERROR)) THEN
20250: OKL_API.init_msg_list('T');
20251: OKL_API.set_message(p_app_name => 'OKL',
20252: p_msg_name => 'OKL_TX_FRM_TXN_ERR',
20253: p_token1 => 'FMA_NAME',
20254: p_token1_value => l_formula_name,
20247: x_return_status => x_return_status);
20248:
20249: IF (x_return_status IN (OKL_API.G_RET_STS_UNEXP_ERROR, OKL_API.G_RET_STS_ERROR)) THEN
20250: OKL_API.init_msg_list('T');
20251: OKL_API.set_message(p_app_name => 'OKL',
20252: p_msg_name => 'OKL_TX_FRM_TXN_ERR',
20253: p_token1 => 'FMA_NAME',
20254: p_token1_value => l_formula_name,
20255: p_token2 => 'TRX_NAME ',
20253: p_token1 => 'FMA_NAME',
20254: p_token1_value => l_formula_name,
20255: p_token2 => 'TRX_NAME ',
20256: p_token2_value => p_source_trx_name);
20257: RAISE OKL_API.G_EXCEPTION_ERROR;
20258: END IF;
20259:
20260: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20261: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants.',
20280: OKC_API.set_message( p_app_name => 'OKC',
20281: p_msg_name => G_INVALID_VALUE,
20282: p_token1 => G_COL_NAME_TOKEN,
20283: p_token1_value => 'SOURCE_TRX_NAME');
20284: RAISE OKL_API.G_EXCEPTION_ERROR;
20285: END IF;
20286:
20287: IF (G_DEBUG_LEVEL_PROCEDURE >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20288: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants ','End(-)');
20288: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants ','End(-)');
20289: END IF;
20290:
20291: -- End the transaction
20292: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
20293:
20294: EXCEPTION
20295: WHEN OKL_API.G_EXCEPTION_ERROR THEN
20296:
20291: -- End the transaction
20292: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
20293:
20294: EXCEPTION
20295: WHEN OKL_API.G_EXCEPTION_ERROR THEN
20296:
20297: IF (l_billingdtls_csr%ISOPEN) THEN
20298: CLOSE l_billingdtls_csr;
20299: END IF;
20339: END IF;
20340:
20341: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20342: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants ',
20343: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
20344: END IF;
20345:
20346: x_return_status := OKL_API.HANDLE_EXCEPTIONS
20347: (
20342: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants ',
20343: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
20344: END IF;
20345:
20346: x_return_status := OKL_API.HANDLE_EXCEPTIONS
20347: (
20348: l_api_name,
20349: G_PKG_NAME,
20350: 'OKL_API.G_RET_STS_ERROR',
20346: x_return_status := OKL_API.HANDLE_EXCEPTIONS
20347: (
20348: l_api_name,
20349: G_PKG_NAME,
20350: 'OKL_API.G_RET_STS_ERROR',
20351: x_msg_count,
20352: x_msg_data,
20353: '_PVT');
20354:
20351: x_msg_count,
20352: x_msg_data,
20353: '_PVT');
20354:
20355: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
20356:
20357: IF (l_billingdtls_csr%ISOPEN) THEN
20358: CLOSE l_billingdtls_csr;
20359: END IF;
20399: END IF;
20400:
20401: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20402: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants ',
20403: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
20404: END IF;
20405:
20406: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
20407: (
20402: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants ',
20403: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
20404: END IF;
20405:
20406: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
20407: (
20408: l_api_name,
20409: G_PKG_NAME,
20410: 'OKL_API.G_RET_STS_UNEXP_ERROR',
20406: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
20407: (
20408: l_api_name,
20409: G_PKG_NAME,
20410: 'OKL_API.G_RET_STS_UNEXP_ERROR',
20411: x_msg_count,
20412: x_msg_data,
20413: '_PVT');
20414:
20462: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants ',
20463: 'EXCEPTION :'||sqlerrm);
20464: END IF;
20465:
20466: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
20467: (
20468: l_api_name,
20469: G_PKG_NAME,
20470: 'OTHERS',
20472: x_msg_data,
20473: '_PVT');
20474:
20475: -- End the transaction
20476: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
20477:
20478: END get_tax_determinants;
20479:
20480: /*========================================================================
20510: RETURN VARCHAR2 IS
20511:
20512: -- Local variables
20513: l_api_name CONSTANT VARCHAR2(30) := 'get_default_taxation_country';
20514: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
20515:
20516: -- Local data structure
20517: lx_legal_entity_rec legal_entity_rec_type;
20518:
20532: x_msg_data => x_msg_data,
20533: p_party_id => null,
20534: p_legalentity_id => p_legal_entity_id,
20535: x_legalentity_info => lx_legal_entity_rec);
20536: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20537: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20538: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
20539: RAISE OKL_API.G_EXCEPTION_ERROR;
20540: END IF;
20533: p_party_id => null,
20534: p_legalentity_id => p_legal_entity_id,
20535: x_legalentity_info => lx_legal_entity_rec);
20536: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20537: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20538: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
20539: RAISE OKL_API.G_EXCEPTION_ERROR;
20540: END IF;
20541:
20534: p_legalentity_id => p_legal_entity_id,
20535: x_legalentity_info => lx_legal_entity_rec);
20536: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20537: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20538: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
20539: RAISE OKL_API.G_EXCEPTION_ERROR;
20540: END IF;
20541:
20542: x_return_status := l_return_status;
20535: x_legalentity_info => lx_legal_entity_rec);
20536: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20537: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20538: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
20539: RAISE OKL_API.G_EXCEPTION_ERROR;
20540: END IF;
20541:
20542: x_return_status := l_return_status;
20543:
20547:
20548: RETURN lx_legal_entity_rec.country;
20549:
20550: EXCEPTION
20551: WHEN OKL_API.G_EXCEPTION_ERROR THEN
20552:
20553: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20554: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_default_taxation_country ',
20555: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
20551: WHEN OKL_API.G_EXCEPTION_ERROR THEN
20552:
20553: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20554: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_default_taxation_country ',
20555: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
20556: END IF;
20557:
20558: x_return_status := OKL_API.G_RET_STS_ERROR;
20559:
20554: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_default_taxation_country ',
20555: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
20556: END IF;
20557:
20558: x_return_status := OKL_API.G_RET_STS_ERROR;
20559:
20560: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
20561: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20562: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_default_taxation_country ',
20556: END IF;
20557:
20558: x_return_status := OKL_API.G_RET_STS_ERROR;
20559:
20560: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
20561: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20562: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_default_taxation_country ',
20563: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
20564: END IF;
20559:
20560: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
20561: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20562: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_default_taxation_country ',
20563: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
20564: END IF;
20565:
20566: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
20567:
20562: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_default_taxation_country ',
20563: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
20564: END IF;
20565:
20566: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
20567:
20568: WHEN OTHERS THEN
20569:
20570: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20571: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_default_taxation_country ',
20572: 'EXCEPTION :'||sqlerrm);
20573: END IF;
20574:
20575: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
20576: -- unexpected error
20577: OKL_API.set_message(p_app_name => g_app_name,
20578: p_msg_name => g_unexpected_error,
20579: p_token1 => g_sqlcode_token,
20573: END IF;
20574:
20575: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
20576: -- unexpected error
20577: OKL_API.set_message(p_app_name => g_app_name,
20578: p_msg_name => g_unexpected_error,
20579: p_token1 => g_sqlcode_token,
20580: p_token1_value => sqlcode,
20581: p_token2 => g_sqlerrm_token,
20640:
20641: RETURN l_intend_use_name;
20642:
20643: EXCEPTION
20644: WHEN OKL_API.G_EXCEPTION_ERROR THEN
20645:
20646: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20647: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_line_intended_use_name ',
20648: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
20644: WHEN OKL_API.G_EXCEPTION_ERROR THEN
20645:
20646: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20647: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_line_intended_use_name ',
20648: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
20649: END IF;
20650:
20651: IF (l_get_intend_use_name_csr%ISOPEN) THEN
20652: CLOSE l_get_intend_use_name_csr;
20651: IF (l_get_intend_use_name_csr%ISOPEN) THEN
20652: CLOSE l_get_intend_use_name_csr;
20653: END IF;
20654:
20655: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
20656: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20657: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_line_intended_use_name ',
20658: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
20659: END IF;
20654:
20655: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
20656: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20657: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_line_intended_use_name ',
20658: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
20659: END IF;
20660:
20661: IF (l_get_intend_use_name_csr%ISOPEN) THEN
20662: CLOSE l_get_intend_use_name_csr;
20704: |
20705: *=======================================================================*/
20706: PROCEDURE cancel_document_tax (
20707: p_api_version IN NUMBER,
20708: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
20709: x_return_status OUT NOCOPY VARCHAR2,
20710: x_msg_count OUT NOCOPY NUMBER,
20711: x_msg_data OUT NOCOPY VARCHAR2,
20712: p_source_trx_id IN NUMBER,
20715:
20716: -- Local variables
20717: l_api_version CONSTANT NUMBER := 1;
20718: l_api_name CONSTANT VARCHAR2(30) := 'cancel_document_tax';
20719: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
20720:
20721: l_internal_org_id NUMBER;
20722: l_application_id NUMBER;
20723: l_entity_code VARCHAR2(30);
20781: 'p_source_table :'||p_source_table);
20782: END IF;
20783:
20784: --Check API version, initialize message list and create savepoint.
20785: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
20786: G_PKG_NAME,
20787: p_init_msg_list,
20788: l_api_version,
20789: p_api_version,
20789: p_api_version,
20790: '_PVT',
20791: x_return_status);
20792:
20793: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20794: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20795: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
20796: RAISE OKL_API.G_EXCEPTION_ERROR;
20797: END IF;
20790: '_PVT',
20791: x_return_status);
20792:
20793: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20794: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20795: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
20796: RAISE OKL_API.G_EXCEPTION_ERROR;
20797: END IF;
20798:
20791: x_return_status);
20792:
20793: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20794: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20795: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
20796: RAISE OKL_API.G_EXCEPTION_ERROR;
20797: END IF;
20798:
20799: -- Required Values
20792:
20793: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20794: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20795: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
20796: RAISE OKL_API.G_EXCEPTION_ERROR;
20797: END IF;
20798:
20799: -- Required Values
20800: IF p_source_trx_id IS NULL THEN
20797: END IF;
20798:
20799: -- Required Values
20800: IF p_source_trx_id IS NULL THEN
20801: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
20802: p_token1 => G_COL_NAME_TOKEN,
20803: p_token1_value => 'SOURCE_TRX_ID');
20804: RAISE OKL_API.G_EXCEPTION_ERROR;
20805: END IF;
20800: IF p_source_trx_id IS NULL THEN
20801: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
20802: p_token1 => G_COL_NAME_TOKEN,
20803: p_token1_value => 'SOURCE_TRX_ID');
20804: RAISE OKL_API.G_EXCEPTION_ERROR;
20805: END IF;
20806:
20807: -- validate the source trx id
20808: IF (p_source_trx_name = 'Pre-Rebook') THEN
20812: OKC_API.set_message( p_app_name => 'OKC',
20813: p_msg_name => G_INVALID_VALUE,
20814: p_token1 => G_COL_NAME_TOKEN,
20815: p_token1_value => 'SOURCE_TRX_ID');
20816: RAISE OKL_API.G_EXCEPTION_ERROR;
20817: END IF;
20818: CLOSE l_trxcontracts_base_csr;
20819: ELSIF (p_source_trx_name = 'Rebook') THEN
20820: OPEN l_trxcontracts_csr(p_source_trx_id, p_source_trx_name);
20823: OKC_API.set_message( p_app_name => 'OKC',
20824: p_msg_name => G_INVALID_VALUE,
20825: p_token1 => G_COL_NAME_TOKEN,
20826: p_token1_value => 'SOURCE_TRX_ID');
20827: RAISE OKL_API.G_EXCEPTION_ERROR;
20828: END IF;
20829: CLOSE l_trxcontracts_csr;
20830: END IF;
20831:
20887: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.cancel_document_tax.',
20888: 'Return Status' || l_return_status);
20889: END IF;
20890:
20891: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20892: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20893: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
20894: RAISE OKL_API.G_EXCEPTION_ERROR;
20895: END IF;
20888: 'Return Status' || l_return_status);
20889: END IF;
20890:
20891: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20892: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20893: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
20894: RAISE OKL_API.G_EXCEPTION_ERROR;
20895: END IF;
20896:
20889: END IF;
20890:
20891: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20892: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20893: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
20894: RAISE OKL_API.G_EXCEPTION_ERROR;
20895: END IF;
20896:
20897: -- 'Rebook' specific condition to cancel tax lines in ebTax schema
20890:
20891: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20892: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20893: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
20894: RAISE OKL_API.G_EXCEPTION_ERROR;
20895: END IF;
20896:
20897: -- 'Rebook' specific condition to cancel tax lines in ebTax schema
20898: l_transaction_rec.internal_organization_id := l_internal_org_id;
20918: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.cancel_document_tax.',
20919: 'Return Status' || l_return_status);
20920: END IF;
20921:
20922: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20923: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20924: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
20925: RAISE OKL_API.G_EXCEPTION_ERROR;
20926: END IF;
20919: 'Return Status' || l_return_status);
20920: END IF;
20921:
20922: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20923: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20924: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
20925: RAISE OKL_API.G_EXCEPTION_ERROR;
20926: END IF;
20927:
20920: END IF;
20921:
20922: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20923: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20924: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
20925: RAISE OKL_API.G_EXCEPTION_ERROR;
20926: END IF;
20927:
20928: END IF; -- Update Tax Sources
20921:
20922: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20923: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20924: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
20925: RAISE OKL_API.G_EXCEPTION_ERROR;
20926: END IF;
20927:
20928: END IF; -- Update Tax Sources
20929:
20935: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.cancel_document_tax ','End(-)');
20936: END IF;
20937:
20938: -- end the transaction
20939: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
20940: EXCEPTION
20941: WHEN OKL_API.G_EXCEPTION_ERROR THEN
20942:
20943: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20937:
20938: -- end the transaction
20939: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
20940: EXCEPTION
20941: WHEN OKL_API.G_EXCEPTION_ERROR THEN
20942:
20943: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20944: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.cancel_document_tax ',
20945: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
20941: WHEN OKL_API.G_EXCEPTION_ERROR THEN
20942:
20943: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20944: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.cancel_document_tax ',
20945: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
20946: END IF;
20947:
20948: IF (l_taxsources_csr%ISOPEN) THEN
20949: CLOSE l_taxsources_csr;
20960: IF (l_taxsources_prbk_csr%ISOPEN) THEN
20961: CLOSE l_taxsources_prbk_csr;
20962: END IF;
20963:
20964: x_return_status := OKL_API.HANDLE_EXCEPTIONS
20965: ( l_api_name,
20966: G_PKG_NAME,
20967: 'OKL_API.G_RET_STS_ERROR',
20968: x_msg_count,
20963:
20964: x_return_status := OKL_API.HANDLE_EXCEPTIONS
20965: ( l_api_name,
20966: G_PKG_NAME,
20967: 'OKL_API.G_RET_STS_ERROR',
20968: x_msg_count,
20969: x_msg_data,
20970: '_PVT');
20971: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
20967: 'OKL_API.G_RET_STS_ERROR',
20968: x_msg_count,
20969: x_msg_data,
20970: '_PVT');
20971: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
20972:
20973: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20974: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.cancel_document_tax ',
20975: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
20971: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
20972:
20973: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20974: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.cancel_document_tax ',
20975: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
20976: END IF;
20977:
20978: IF (l_taxsources_csr%ISOPEN) THEN
20979: CLOSE l_taxsources_csr;
20990: IF (l_taxsources_prbk_csr%ISOPEN) THEN
20991: CLOSE l_taxsources_prbk_csr;
20992: END IF;
20993:
20994: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
20995: ( l_api_name,
20996: G_PKG_NAME,
20997: 'OKL_API.G_RET_STS_UNEXP_ERROR',
20998: x_msg_count,
20993:
20994: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
20995: ( l_api_name,
20996: G_PKG_NAME,
20997: 'OKL_API.G_RET_STS_UNEXP_ERROR',
20998: x_msg_count,
20999: x_msg_data,
21000: '_PVT');
21001: WHEN OTHERS THEN
21020: IF (l_taxsources_prbk_csr%ISOPEN) THEN
21021: CLOSE l_taxsources_prbk_csr;
21022: END IF;
21023:
21024: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
21025: ( l_api_name,
21026: G_PKG_NAME,
21027: 'OTHERS',
21028: x_msg_count,
21063: |
21064: *=======================================================================*/
21065: PROCEDURE copy_global_tax_data (
21066: p_api_version IN NUMBER,
21067: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
21068: x_return_status OUT NOCOPY VARCHAR2,
21069: x_msg_count OUT NOCOPY NUMBER,
21070: x_msg_data OUT NOCOPY VARCHAR2,
21071: p_trx_id IN NUMBER,
21077:
21078: -- Local variables
21079: l_api_version CONSTANT NUMBER := 1;
21080: l_api_name CONSTANT VARCHAR2(30) := 'copy_global_tax_data';
21081: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
21082:
21083: BEGIN
21084: IF (G_DEBUG_LEVEL_PROCEDURE >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
21085: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.copy_global_tax_data','Begin(+)');
21103: 'p_event_class_code :'||p_event_class_code);
21104: END IF;
21105:
21106: --Check API version, initialize message list and create savepoint.
21107: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
21108: G_PKG_NAME,
21109: p_init_msg_list,
21110: l_api_version,
21111: p_api_version,
21111: p_api_version,
21112: '_PVT',
21113: x_return_status);
21114:
21115: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
21116: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
21117: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
21118: RAISE OKL_API.G_EXCEPTION_ERROR;
21119: END IF;
21112: '_PVT',
21113: x_return_status);
21114:
21115: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
21116: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
21117: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
21118: RAISE OKL_API.G_EXCEPTION_ERROR;
21119: END IF;
21120:
21113: x_return_status);
21114:
21115: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
21116: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
21117: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
21118: RAISE OKL_API.G_EXCEPTION_ERROR;
21119: END IF;
21120:
21121: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
21114:
21115: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
21116: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
21117: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
21118: RAISE OKL_API.G_EXCEPTION_ERROR;
21119: END IF;
21120:
21121: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
21122: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.copy_global_tax_data.',
21139: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.copy_global_tax_data.',
21140: 'After calling OKL_TAX_INTERFACE_PVT.copy_global_tax_data - Return Status ' || l_return_status);
21141: END IF;
21142:
21143: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
21144: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
21145: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
21146: RAISE OKL_API.G_EXCEPTION_ERROR;
21147: END IF;
21140: 'After calling OKL_TAX_INTERFACE_PVT.copy_global_tax_data - Return Status ' || l_return_status);
21141: END IF;
21142:
21143: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
21144: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
21145: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
21146: RAISE OKL_API.G_EXCEPTION_ERROR;
21147: END IF;
21148:
21141: END IF;
21142:
21143: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
21144: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
21145: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
21146: RAISE OKL_API.G_EXCEPTION_ERROR;
21147: END IF;
21148:
21149: x_return_status := l_return_status;
21142:
21143: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
21144: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
21145: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
21146: RAISE OKL_API.G_EXCEPTION_ERROR;
21147: END IF;
21148:
21149: x_return_status := l_return_status;
21150:
21152: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.copy_global_tax_data ','End(-)');
21153: END IF;
21154:
21155: -- end the transaction
21156: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
21157: EXCEPTION
21158: WHEN OKL_API.G_EXCEPTION_ERROR THEN
21159:
21160: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
21154:
21155: -- end the transaction
21156: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
21157: EXCEPTION
21158: WHEN OKL_API.G_EXCEPTION_ERROR THEN
21159:
21160: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
21161: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.copy_global_tax_data ',
21162: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
21158: WHEN OKL_API.G_EXCEPTION_ERROR THEN
21159:
21160: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
21161: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.copy_global_tax_data ',
21162: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
21163: END IF;
21164:
21165: x_return_status := OKL_API.HANDLE_EXCEPTIONS
21166: (
21161: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.copy_global_tax_data ',
21162: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
21163: END IF;
21164:
21165: x_return_status := OKL_API.HANDLE_EXCEPTIONS
21166: (
21167: l_api_name,
21168: G_PKG_NAME,
21169: 'OKL_API.G_RET_STS_ERROR',
21165: x_return_status := OKL_API.HANDLE_EXCEPTIONS
21166: (
21167: l_api_name,
21168: G_PKG_NAME,
21169: 'OKL_API.G_RET_STS_ERROR',
21170: x_msg_count,
21171: x_msg_data,
21172: '_PVT'
21173: );
21170: x_msg_count,
21171: x_msg_data,
21172: '_PVT'
21173: );
21174: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
21175: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
21176: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.copy_global_tax_data ',
21177: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
21178: END IF;
21173: );
21174: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
21175: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
21176: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.copy_global_tax_data ',
21177: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
21178: END IF;
21179:
21180: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
21181: (
21176: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.copy_global_tax_data ',
21177: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
21178: END IF;
21179:
21180: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
21181: (
21182: l_api_name,
21183: G_PKG_NAME,
21184: 'OKL_API.G_RET_STS_UNEXP_ERROR',
21180: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
21181: (
21182: l_api_name,
21183: G_PKG_NAME,
21184: 'OKL_API.G_RET_STS_UNEXP_ERROR',
21185: x_msg_count,
21186: x_msg_data,
21187: '_PVT'
21188: );
21192: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.copy_global_tax_data ',
21193: 'EXCEPTION :'||sqlerrm);
21194: END IF;
21195:
21196: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
21197: (
21198: l_api_name,
21199: G_PKG_NAME,
21200: 'OTHERS',