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,
3752: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.get_tbc_code.',
3753: 'l_tbc_code '||l_tbc_code);
3754: END IF;
3755:
3756: x_return_status := OKL_API.G_RET_STS_SUCCESS;
3757:
3758: -- TBC can be NULL
3759: x_tbc_code := l_tbc_code;
3760:
3758: -- TBC can be NULL
3759: x_tbc_code := l_tbc_code;
3760:
3761: EXCEPTION
3762: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3763:
3764: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
3765: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_tbc_code ',
3766: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
3762: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3763:
3764: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
3765: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_tbc_code ',
3766: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
3767: END IF;
3768:
3769: IF l_tbcdef_csr%ISOPEN THEN
3770: CLOSE l_tbcdef_csr;
3769: IF l_tbcdef_csr%ISOPEN THEN
3770: CLOSE l_tbcdef_csr;
3771: END IF;
3772:
3773: x_return_status := OKL_API.G_RET_STS_ERROR;
3774: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3775:
3776: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
3777: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_tbc_code ',
3770: CLOSE l_tbcdef_csr;
3771: END IF;
3772:
3773: x_return_status := OKL_API.G_RET_STS_ERROR;
3774: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3775:
3776: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
3777: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_tbc_code ',
3778: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
3774: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3775:
3776: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
3777: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_tbc_code ',
3778: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
3779: END IF;
3780:
3781: IF l_tbcdef_csr%ISOPEN THEN
3782: CLOSE l_tbcdef_csr;
3781: IF l_tbcdef_csr%ISOPEN THEN
3782: CLOSE l_tbcdef_csr;
3783: END IF;
3784:
3785: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
3786:
3787: WHEN OTHERS THEN
3788: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
3789: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_tbc_code ',
3793: IF l_tbcdef_csr%ISOPEN THEN
3794: CLOSE l_tbcdef_csr;
3795: END IF;
3796:
3797: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
3798: -- unexpected error
3799: OKL_API.set_message(p_app_name => g_app_name,
3800: p_msg_name => g_unexpected_error,
3801: p_token1 => g_sqlcode_token,
3795: END IF;
3796:
3797: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
3798: -- unexpected error
3799: OKL_API.set_message(p_app_name => g_app_name,
3800: p_msg_name => g_unexpected_error,
3801: p_token1 => g_sqlcode_token,
3802: p_token1_value => sqlcode,
3803: p_token2 => g_sqlerrm_token,
4373: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.get_pc_code.',
4374: 'l_pc_code '||l_pc_code);
4375: END IF;
4376:
4377: x_return_status := OKL_API.G_RET_STS_SUCCESS;
4378:
4379: -- PC can be null
4380: x_pc_code := l_pc_code;
4381:
4379: -- PC can be null
4380: x_pc_code := l_pc_code;
4381:
4382: EXCEPTION
4383: WHEN OKL_API.G_EXCEPTION_ERROR THEN
4384:
4385: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
4386: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_pc_code ',
4387: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
4383: WHEN OKL_API.G_EXCEPTION_ERROR THEN
4384:
4385: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
4386: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_pc_code ',
4387: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
4388: END IF;
4389:
4390: IF l_pcdef_csr%ISOPEN THEN
4391: CLOSE l_pcdef_csr;
4390: IF l_pcdef_csr%ISOPEN THEN
4391: CLOSE l_pcdef_csr;
4392: END IF;
4393:
4394: x_return_status := OKL_API.G_RET_STS_ERROR;
4395: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4396:
4397: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
4398: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_pc_code ',
4391: CLOSE l_pcdef_csr;
4392: END IF;
4393:
4394: x_return_status := OKL_API.G_RET_STS_ERROR;
4395: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4396:
4397: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
4398: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_pc_code ',
4399: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
4395: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4396:
4397: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
4398: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_pc_code ',
4399: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
4400: END IF;
4401:
4402: IF l_pcdef_csr%ISOPEN THEN
4403: CLOSE l_pcdef_csr;
4402: IF l_pcdef_csr%ISOPEN THEN
4403: CLOSE l_pcdef_csr;
4404: END IF;
4405:
4406: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
4407:
4408: WHEN OTHERS THEN
4409: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
4410: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_pc_code ',
4414: IF l_pcdef_csr%ISOPEN THEN
4415: CLOSE l_pcdef_csr;
4416: END IF;
4417:
4418: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
4419: -- unexpected error
4420: OKL_API.set_message(p_app_name => g_app_name,
4421: p_msg_name => g_unexpected_error,
4422: p_token1 => g_sqlcode_token,
4416: END IF;
4417:
4418: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
4419: -- unexpected error
4420: OKL_API.set_message(p_app_name => g_app_name,
4421: p_msg_name => g_unexpected_error,
4422: p_token1 => g_sqlcode_token,
4423: p_token1_value => sqlcode,
4424: p_token2 => g_sqlerrm_token,
4491: p_term_quote_reason_code IN VARCHAR2 DEFAULT NULL,
4492: p_tax_country_code IN VARCHAR2,
4493: x_ufc_code OUT NOCOPY VARCHAR2) IS
4494:
4495: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
4496:
4497: -- Get all the UFC definitions applicable to a transaction type
4498: CURSOR l_ufcdef_csr(cp_try_id IN NUMBER) IS
4499: SELECT result_code ufc_code,
4574: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.get_ufc_code.',
4575: 'p_tax_country_code :'|| p_tax_country_code);
4576: END IF;
4577:
4578: x_return_status := OKL_API.G_RET_STS_SUCCESS;
4579:
4580: OPEN l_ufcdef_csr(p_try_id);
4581: FETCH l_ufcdef_csr BULK COLLECT INTO l_ufcdefs_tbl;
4582: CLOSE l_ufcdef_csr;
5458: -- UFC can be NULL
5459: x_ufc_code := l_ufc_code;
5460:
5461: EXCEPTION
5462: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5463:
5464: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
5465: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_ufc_code ',
5466: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
5462: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5463:
5464: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
5465: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_ufc_code ',
5466: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
5467: END IF;
5468:
5469: IF l_ufcdef_csr%ISOPEN THEN
5470: CLOSE l_ufcdef_csr;
5469: IF l_ufcdef_csr%ISOPEN THEN
5470: CLOSE l_ufcdef_csr;
5471: END IF;
5472:
5473: x_return_status := OKL_API.G_RET_STS_ERROR;
5474: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5475:
5476: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
5477: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_ufc_code ',
5470: CLOSE l_ufcdef_csr;
5471: END IF;
5472:
5473: x_return_status := OKL_API.G_RET_STS_ERROR;
5474: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5475:
5476: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
5477: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_ufc_code ',
5478: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
5474: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5475:
5476: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
5477: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_ufc_code ',
5478: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
5479: END IF;
5480:
5481: IF l_ufcdef_csr%ISOPEN THEN
5482: CLOSE l_ufcdef_csr;
5481: IF l_ufcdef_csr%ISOPEN THEN
5482: CLOSE l_ufcdef_csr;
5483: END IF;
5484:
5485: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
5486:
5487: WHEN OTHERS THEN
5488: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
5489: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_ufc_code ',
5494: CLOSE l_ufcdef_csr;
5495: END IF;
5496:
5497:
5498: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
5499: -- unexpected error
5500: OKL_API.set_message(p_app_name => g_app_name,
5501: p_msg_name => g_unexpected_error,
5502: p_token1 => g_sqlcode_token,
5496:
5497:
5498: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
5499: -- unexpected error
5500: OKL_API.set_message(p_app_name => g_app_name,
5501: p_msg_name => g_unexpected_error,
5502: p_token1 => g_sqlcode_token,
5503: p_token1_value => sqlcode,
5504: p_token2 => g_sqlerrm_token,
5724: p_book_class_code => p_book_class_code,
5725: p_tax_country_code => p_tax_src_params_rec.default_taxation_country,
5726: x_tbc_code => lx_tbc_code);
5727:
5728: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5729: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5730: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5731: RAISE OKL_API.G_EXCEPTION_ERROR;
5732: END IF;
5725: p_tax_country_code => p_tax_src_params_rec.default_taxation_country,
5726: x_tbc_code => lx_tbc_code);
5727:
5728: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5729: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5730: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5731: RAISE OKL_API.G_EXCEPTION_ERROR;
5732: END IF;
5733:
5726: x_tbc_code => lx_tbc_code);
5727:
5728: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5729: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5730: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5731: RAISE OKL_API.G_EXCEPTION_ERROR;
5732: END IF;
5733:
5734: -- Validate TBC Code
5727:
5728: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5729: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5730: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5731: RAISE OKL_API.G_EXCEPTION_ERROR;
5732: END IF;
5733:
5734: -- Validate TBC Code
5735: IF lx_tbc_code IS NOT NULL THEN
5742: p_trx_date => p_tax_src_params_rec.trx_date,
5743: p_tbc_code => lx_tbc_code,
5744: x_valid_code => lx_tax_valid_code); -- 'S' --> Success, 'F' --> Failure
5745:
5746: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5747: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5748: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5749: RAISE OKL_API.G_EXCEPTION_ERROR;
5750: END IF;
5743: p_tbc_code => lx_tbc_code,
5744: x_valid_code => lx_tax_valid_code); -- 'S' --> Success, 'F' --> Failure
5745:
5746: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5747: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5748: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5749: RAISE OKL_API.G_EXCEPTION_ERROR;
5750: END IF;
5751: END IF;
5744: x_valid_code => lx_tax_valid_code); -- 'S' --> Success, 'F' --> Failure
5745:
5746: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5747: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5748: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5749: RAISE OKL_API.G_EXCEPTION_ERROR;
5750: END IF;
5751: END IF;
5752:
5745:
5746: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5747: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5748: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5749: RAISE OKL_API.G_EXCEPTION_ERROR;
5750: END IF;
5751: END IF;
5752:
5753: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
5784: p_lease_purchased_code => p_lease_purchased_code,
5785: p_tax_country_code => p_tax_src_params_rec.default_taxation_country,
5786: x_pc_code => lx_pc_code);
5787:
5788: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5789: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5790: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5791: RAISE OKL_API.G_EXCEPTION_ERROR;
5792: END IF;
5785: p_tax_country_code => p_tax_src_params_rec.default_taxation_country,
5786: x_pc_code => lx_pc_code);
5787:
5788: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5789: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5790: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5791: RAISE OKL_API.G_EXCEPTION_ERROR;
5792: END IF;
5793:
5786: x_pc_code => lx_pc_code);
5787:
5788: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5789: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5790: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5791: RAISE OKL_API.G_EXCEPTION_ERROR;
5792: END IF;
5793:
5794: -- Validate PC Code
5787:
5788: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5789: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5790: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5791: RAISE OKL_API.G_EXCEPTION_ERROR;
5792: END IF;
5793:
5794: -- Validate PC Code
5795: IF lx_pc_code IS NOT NULL THEN
5806: IF (lx_tax_valid_code = 'F') THEN
5807: lx_pc_code := null;
5808: END IF;
5809:
5810: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5811: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5812: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5813: RAISE OKL_API.G_EXCEPTION_ERROR;
5814: END IF;
5807: lx_pc_code := null;
5808: END IF;
5809:
5810: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5811: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5812: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5813: RAISE OKL_API.G_EXCEPTION_ERROR;
5814: END IF;
5815: END IF;
5808: END IF;
5809:
5810: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5811: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5812: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5813: RAISE OKL_API.G_EXCEPTION_ERROR;
5814: END IF;
5815: END IF;
5816:
5809:
5810: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5811: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5812: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5813: RAISE OKL_API.G_EXCEPTION_ERROR;
5814: END IF;
5815: END IF;
5816:
5817: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
5847: p_term_quote_reason_code => p_term_quote_reason_code,
5848: p_tax_country_code => p_tax_src_params_rec.default_taxation_country,
5849: x_ufc_code => lx_ufc_code);
5850:
5851: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5852: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5853: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5854: RAISE OKL_API.G_EXCEPTION_ERROR;
5855: END IF;
5848: p_tax_country_code => p_tax_src_params_rec.default_taxation_country,
5849: x_ufc_code => lx_ufc_code);
5850:
5851: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5852: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5853: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5854: RAISE OKL_API.G_EXCEPTION_ERROR;
5855: END IF;
5856:
5849: x_ufc_code => lx_ufc_code);
5850:
5851: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5852: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5853: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5854: RAISE OKL_API.G_EXCEPTION_ERROR;
5855: END IF;
5856:
5857: -- Validate UFC Code
5850:
5851: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5852: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5853: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5854: RAISE OKL_API.G_EXCEPTION_ERROR;
5855: END IF;
5856:
5857: -- Validate UFC Code
5858: IF lx_ufc_code IS NOT NULL THEN
5869: IF (lx_tax_valid_code = 'F') THEN
5870: lx_ufc_code := null;
5871: END IF;
5872:
5873: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5874: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5875: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5876: RAISE OKL_API.G_EXCEPTION_ERROR;
5877: END IF;
5870: lx_ufc_code := null;
5871: END IF;
5872:
5873: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5874: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5875: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5876: RAISE OKL_API.G_EXCEPTION_ERROR;
5877: END IF;
5878: END IF;
5871: END IF;
5872:
5873: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5874: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5875: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5876: RAISE OKL_API.G_EXCEPTION_ERROR;
5877: END IF;
5878: END IF;
5879:
5872:
5873: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5874: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5875: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5876: RAISE OKL_API.G_EXCEPTION_ERROR;
5877: END IF;
5878: END IF;
5879:
5880: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
5994: p_additional_parameters => l_add_params,
5995: x_formula_value => l_assessable_value, --OVERRIDEN TAXABLE BASIS
5996: x_return_status => x_return_status);
5997:
5998: IF (x_return_status IN (OKL_API.G_RET_STS_UNEXP_ERROR, OKL_API.G_RET_STS_ERROR)) THEN
5999: OKL_API.init_msg_list('T');
6000: OKL_API.set_message(p_app_name => 'OKL',
6001: p_msg_name => 'OKL_TX_FRM_TXN_ERR',
6002: p_token1 => 'FMA_NAME',
5995: x_formula_value => l_assessable_value, --OVERRIDEN TAXABLE BASIS
5996: x_return_status => x_return_status);
5997:
5998: IF (x_return_status IN (OKL_API.G_RET_STS_UNEXP_ERROR, OKL_API.G_RET_STS_ERROR)) THEN
5999: OKL_API.init_msg_list('T');
6000: OKL_API.set_message(p_app_name => 'OKL',
6001: p_msg_name => 'OKL_TX_FRM_TXN_ERR',
6002: p_token1 => 'FMA_NAME',
6003: p_token1_value => p_formula_name,
5996: x_return_status => x_return_status);
5997:
5998: IF (x_return_status IN (OKL_API.G_RET_STS_UNEXP_ERROR, OKL_API.G_RET_STS_ERROR)) THEN
5999: OKL_API.init_msg_list('T');
6000: OKL_API.set_message(p_app_name => 'OKL',
6001: p_msg_name => 'OKL_TX_FRM_TXN_ERR',
6002: p_token1 => 'FMA_NAME',
6003: p_token1_value => p_formula_name,
6004: p_token2 => 'TRX_NAME ',
6002: p_token1 => 'FMA_NAME',
6003: p_token1_value => p_formula_name,
6004: p_token2 => 'TRX_NAME ',
6005: p_token2_value => p_source_trx_name);
6006: RAISE OKL_API.G_EXCEPTION_ERROR;
6007: END IF;
6008:
6009: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6010: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_info.',
6053: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_info.',
6054: 'lx_tax_classification_code = '|| lx_tax_classification_code);
6055: END IF;
6056:
6057: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6058: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6059: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6060: RAISE OKL_API.G_EXCEPTION_ERROR;
6061: END IF;
6054: 'lx_tax_classification_code = '|| lx_tax_classification_code);
6055: END IF;
6056:
6057: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6058: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6059: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6060: RAISE OKL_API.G_EXCEPTION_ERROR;
6061: END IF;
6062:
6055: END IF;
6056:
6057: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6058: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6059: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6060: RAISE OKL_API.G_EXCEPTION_ERROR;
6061: END IF;
6062:
6063: IF (p_source_trx_name = 'Asset Relocation' AND
6056:
6057: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6058: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6059: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6060: RAISE OKL_API.G_EXCEPTION_ERROR;
6061: END IF;
6062:
6063: IF (p_source_trx_name = 'Asset Relocation' AND
6064: p_tax_src_params_rec.alc_serialized_yn = 'Y' AND
6316: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_info ','End(-)');
6317: END IF;
6318:
6319: EXCEPTION
6320: WHEN OKL_API.G_EXCEPTION_ERROR THEN
6321: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6322: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_info ',
6323: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
6324: END IF;
6319: EXCEPTION
6320: WHEN OKL_API.G_EXCEPTION_ERROR THEN
6321: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6322: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_info ',
6323: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
6324: END IF;
6325:
6326: IF (c_get_set_of_books_id%ISOPEN) THEN
6327: CLOSE c_get_set_of_books_id;
6326: IF (c_get_set_of_books_id%ISOPEN) THEN
6327: CLOSE c_get_set_of_books_id;
6328: END IF;
6329:
6330: x_return_status := OKL_API.G_RET_STS_ERROR;
6331: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
6332: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6333: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_info ',
6334: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
6327: CLOSE c_get_set_of_books_id;
6328: END IF;
6329:
6330: x_return_status := OKL_API.G_RET_STS_ERROR;
6331: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
6332: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6333: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_info ',
6334: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
6335: END IF;
6330: x_return_status := OKL_API.G_RET_STS_ERROR;
6331: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
6332: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6333: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_info ',
6334: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
6335: END IF;
6336:
6337: IF (c_get_set_of_books_id%ISOPEN) THEN
6338: CLOSE c_get_set_of_books_id;
6337: IF (c_get_set_of_books_id%ISOPEN) THEN
6338: CLOSE c_get_set_of_books_id;
6339: END IF;
6340:
6341: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
6342:
6343: WHEN OTHERS THEN
6344: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6345: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_info ',
6349: IF (c_get_set_of_books_id%ISOPEN) THEN
6350: CLOSE c_get_set_of_books_id;
6351: END IF;
6352:
6353: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
6354: -- unexpected error
6355: OKL_API.set_message(p_app_name => g_app_name,
6356: p_msg_name => g_unexpected_error,
6357: p_token1 => g_sqlcode_token,
6351: END IF;
6352:
6353: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
6354: -- unexpected error
6355: OKL_API.set_message(p_app_name => g_app_name,
6356: p_msg_name => g_unexpected_error,
6357: p_token1 => g_sqlcode_token,
6358: p_token1_value => sqlcode,
6359: p_token2 => g_sqlerrm_token,
6476: p_book_class_code => p_book_class_code,
6477: p_tax_country_code => p_tax_country_code,
6478: x_tbc_code => lx_tbc_code);
6479:
6480: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6481: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6482: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6483: RAISE OKL_API.G_EXCEPTION_ERROR;
6484: END IF;
6477: p_tax_country_code => p_tax_country_code,
6478: x_tbc_code => lx_tbc_code);
6479:
6480: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6481: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6482: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6483: RAISE OKL_API.G_EXCEPTION_ERROR;
6484: END IF;
6485:
6478: x_tbc_code => lx_tbc_code);
6479:
6480: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6481: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6482: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6483: RAISE OKL_API.G_EXCEPTION_ERROR;
6484: END IF;
6485:
6486: -- Validate TBC Code
6479:
6480: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6481: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6482: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6483: RAISE OKL_API.G_EXCEPTION_ERROR;
6484: END IF;
6485:
6486: -- Validate TBC Code
6487: IF lx_tbc_code IS NOT NULL THEN
6494: p_trx_date => p_trx_date,
6495: p_tbc_code => lx_tbc_code,
6496: x_valid_code => lx_tax_valid_code); -- 'S' --> Success, 'F' --> Failure
6497:
6498: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6499: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6500: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6501: RAISE OKL_API.G_EXCEPTION_ERROR;
6502: END IF;
6495: p_tbc_code => lx_tbc_code,
6496: x_valid_code => lx_tax_valid_code); -- 'S' --> Success, 'F' --> Failure
6497:
6498: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6499: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6500: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6501: RAISE OKL_API.G_EXCEPTION_ERROR;
6502: END IF;
6503: END IF;
6496: x_valid_code => lx_tax_valid_code); -- 'S' --> Success, 'F' --> Failure
6497:
6498: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6499: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6500: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6501: RAISE OKL_API.G_EXCEPTION_ERROR;
6502: END IF;
6503: END IF;
6504:
6497:
6498: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6499: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6500: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6501: RAISE OKL_API.G_EXCEPTION_ERROR;
6502: END IF;
6503: END IF;
6504:
6505: -- Get the first level determinant for TBC basing on transaction, if the value is null
6526: p_lease_purchased_code => p_lease_purchased_code,
6527: p_tax_country_code => p_tax_country_code,
6528: x_pc_code => lx_pc_code);
6529:
6530: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6531: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6532: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6533: RAISE OKL_API.G_EXCEPTION_ERROR;
6534: END IF;
6527: p_tax_country_code => p_tax_country_code,
6528: x_pc_code => lx_pc_code);
6529:
6530: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6531: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6532: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6533: RAISE OKL_API.G_EXCEPTION_ERROR;
6534: END IF;
6535:
6528: x_pc_code => lx_pc_code);
6529:
6530: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6531: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6532: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6533: RAISE OKL_API.G_EXCEPTION_ERROR;
6534: END IF;
6535:
6536: -- Validate PC Code
6529:
6530: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6531: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6532: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6533: RAISE OKL_API.G_EXCEPTION_ERROR;
6534: END IF;
6535:
6536: -- Validate PC Code
6537: IF lx_pc_code IS NOT NULL THEN
6548: IF (lx_tax_valid_code = 'F') THEN
6549: lx_pc_code := null;
6550: END IF;
6551:
6552: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6553: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6554: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6555: RAISE OKL_API.G_EXCEPTION_ERROR;
6556: END IF;
6549: lx_pc_code := null;
6550: END IF;
6551:
6552: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6553: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6554: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6555: RAISE OKL_API.G_EXCEPTION_ERROR;
6556: END IF;
6557: END IF;
6550: END IF;
6551:
6552: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6553: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6554: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6555: RAISE OKL_API.G_EXCEPTION_ERROR;
6556: END IF;
6557: END IF;
6558:
6551:
6552: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6553: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6554: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6555: RAISE OKL_API.G_EXCEPTION_ERROR;
6556: END IF;
6557: END IF;
6558:
6559: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6582: p_term_quote_reason_code => null,
6583: p_tax_country_code => p_tax_country_code,
6584: x_ufc_code => lx_ufc_code);
6585:
6586: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6587: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6588: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6589: RAISE OKL_API.G_EXCEPTION_ERROR;
6590: END IF;
6583: p_tax_country_code => p_tax_country_code,
6584: x_ufc_code => lx_ufc_code);
6585:
6586: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6587: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6588: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6589: RAISE OKL_API.G_EXCEPTION_ERROR;
6590: END IF;
6591:
6584: x_ufc_code => lx_ufc_code);
6585:
6586: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6587: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6588: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6589: RAISE OKL_API.G_EXCEPTION_ERROR;
6590: END IF;
6591:
6592: -- Validate UFC Code
6585:
6586: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6587: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6588: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6589: RAISE OKL_API.G_EXCEPTION_ERROR;
6590: END IF;
6591:
6592: -- Validate UFC Code
6593: IF lx_ufc_code IS NOT NULL THEN
6604: IF (lx_tax_valid_code = 'F') THEN
6605: lx_ufc_code := null;
6606: END IF;
6607:
6608: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6609: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6610: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6611: RAISE OKL_API.G_EXCEPTION_ERROR;
6612: END IF;
6605: lx_ufc_code := null;
6606: END IF;
6607:
6608: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6609: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6610: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6611: RAISE OKL_API.G_EXCEPTION_ERROR;
6612: END IF;
6613: END IF;
6606: END IF;
6607:
6608: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6609: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6610: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6611: RAISE OKL_API.G_EXCEPTION_ERROR;
6612: END IF;
6613: END IF;
6614:
6607:
6608: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6609: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6610: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6611: RAISE OKL_API.G_EXCEPTION_ERROR;
6612: END IF;
6613: END IF;
6614:
6615: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6649: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_codes.',
6650: 'lx_tax_classification_code = '|| lx_tax_classification_code);
6651: END IF;
6652:
6653: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6654: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6655: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6656: RAISE OKL_API.G_EXCEPTION_ERROR;
6657: END IF;
6650: 'lx_tax_classification_code = '|| lx_tax_classification_code);
6651: END IF;
6652:
6653: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6654: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6655: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6656: RAISE OKL_API.G_EXCEPTION_ERROR;
6657: END IF;
6658:
6651: END IF;
6652:
6653: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6654: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6655: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6656: RAISE OKL_API.G_EXCEPTION_ERROR;
6657: END IF;
6658:
6659: px_tax_codes_tbl(p_tax_code_cnt).khr_id := p_khr_id;
6652:
6653: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
6654: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
6655: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
6656: RAISE OKL_API.G_EXCEPTION_ERROR;
6657: END IF;
6658:
6659: px_tax_codes_tbl(p_tax_code_cnt).khr_id := p_khr_id;
6660: px_tax_codes_tbl(p_tax_code_cnt).kle_id := p_kle_id;
6668: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_codes ','End(-)');
6669: END IF;
6670:
6671: EXCEPTION
6672: WHEN OKL_API.G_EXCEPTION_ERROR THEN
6673: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6674: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_codes ',
6675: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
6676: END IF;
6671: EXCEPTION
6672: WHEN OKL_API.G_EXCEPTION_ERROR THEN
6673: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6674: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_codes ',
6675: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
6676: END IF;
6677:
6678: IF (c_get_set_of_books_id%ISOPEN) THEN
6679: CLOSE c_get_set_of_books_id;
6678: IF (c_get_set_of_books_id%ISOPEN) THEN
6679: CLOSE c_get_set_of_books_id;
6680: END IF;
6681:
6682: x_return_status := OKL_API.G_RET_STS_ERROR;
6683:
6684: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
6685: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6686: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_codes ',
6680: END IF;
6681:
6682: x_return_status := OKL_API.G_RET_STS_ERROR;
6683:
6684: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
6685: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6686: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_codes ',
6687: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
6688: END IF;
6683:
6684: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
6685: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6686: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.populate_tax_codes ',
6687: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
6688: END IF;
6689:
6690: IF (c_get_set_of_books_id%ISOPEN) THEN
6691: CLOSE c_get_set_of_books_id;
6690: IF (c_get_set_of_books_id%ISOPEN) THEN
6691: CLOSE c_get_set_of_books_id;
6692: END IF;
6693:
6694: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
6695:
6696: WHEN OTHERS THEN
6697:
6698: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6703: IF (c_get_set_of_books_id%ISOPEN) THEN
6704: CLOSE c_get_set_of_books_id;
6705: END IF;
6706:
6707: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
6708:
6709: OKL_API.set_message(p_app_name => g_app_name,
6710: p_msg_name => g_unexpected_error,
6711: p_token1 => g_sqlcode_token,
6705: END IF;
6706:
6707: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
6708:
6709: OKL_API.set_message(p_app_name => g_app_name,
6710: p_msg_name => g_unexpected_error,
6711: p_token1 => g_sqlcode_token,
6712: p_token1_value => sqlcode,
6713: p_token2 => g_sqlerrm_token,
6816: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.get_billing_stream_types.',
6817: 'p_sty_code :'||p_sty_code);
6818: END IF;
6819:
6820: x_return_status := OKL_API.G_RET_STS_SUCCESS;
6821:
6822: -- Check if any stream generation template set exists for this OU
6823: OPEN l_stgentmptsets_csr(p_org_id);
6824: FETCH l_stgentmptsets_csr INTO l_id;
6928: END IF;
6929:
6930:
6931: EXCEPTION
6932: WHEN OKL_API.G_EXCEPTION_ERROR THEN
6933: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6934: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_billing_stream_types ',
6935: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
6936: END IF;
6931: EXCEPTION
6932: WHEN OKL_API.G_EXCEPTION_ERROR THEN
6933: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6934: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_billing_stream_types ',
6935: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
6936: END IF;
6937:
6938:
6939: IF l_strmtype_csr%ISOPEN THEN
6951: IF l_stgentmptlns_csr%ISOPEN THEN
6952: CLOSE l_stgentmptlns_csr;
6953: END IF;
6954:
6955: x_return_status := OKL_API.G_RET_STS_ERROR;
6956: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
6957: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6958: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_billing_stream_types ',
6959: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
6952: CLOSE l_stgentmptlns_csr;
6953: END IF;
6954:
6955: x_return_status := OKL_API.G_RET_STS_ERROR;
6956: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
6957: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6958: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_billing_stream_types ',
6959: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
6960: END IF;
6955: x_return_status := OKL_API.G_RET_STS_ERROR;
6956: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
6957: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6958: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_billing_stream_types ',
6959: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
6960: END IF;
6961:
6962: IF l_strmtype_csr%ISOPEN THEN
6963: CLOSE l_strmtype_csr;
6974: IF l_stgentmptlns_csr%ISOPEN THEN
6975: CLOSE l_stgentmptlns_csr;
6976: END IF;
6977:
6978: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
6979:
6980: WHEN OTHERS THEN
6981: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
6982: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_billing_stream_types ',
6998: IF l_stgentmptlns_csr%ISOPEN THEN
6999: CLOSE l_stgentmptlns_csr;
7000: END IF;
7001:
7002: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
7003: -- unexpected error
7004: OKL_API.set_message(p_app_name => g_app_name,
7005: p_msg_name => g_unexpected_error,
7006: p_token1 => g_sqlcode_token,
7000: END IF;
7001:
7002: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
7003: -- unexpected error
7004: OKL_API.set_message(p_app_name => g_app_name,
7005: p_msg_name => g_unexpected_error,
7006: p_token1 => g_sqlcode_token,
7007: p_token1_value => sqlcode,
7008: p_token2 => g_sqlerrm_token,
7115: WHERE id = cp_khr_id;
7116:
7117: l_cust_trx_type_id NUMBER;
7118:
7119: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
7120: l_precision NUMBER;
7121: l_minimum_accountable_unit NUMBER;
7122:
7123: l_rulv_rec okl_rule_pub.rulv_rec_type;
7171: OKC_API.set_message( p_app_name => 'OKC',
7172: p_msg_name => G_INVALID_VALUE,
7173: p_token1 => G_COL_NAME_TOKEN,
7174: p_token1_value => 'KHR_ID');
7175: RAISE OKL_API.G_EXCEPTION_ERROR;
7176: END IF;
7177: CLOSE c_get_contractinfo_csr;
7178:
7179: IF l_get_contractinfo_rec.currency_code IS NULL THEN
7181: p_msg_name => G_REQUIRED_VALUE,
7182: p_token1 => G_COL_NAME_TOKEN,
7183: p_token1_value => 'CURRENCY_CODE');
7184:
7185: RAISE OKL_API.G_EXCEPTION_ERROR;
7186: END IF;
7187:
7188: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
7189: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.get_k_hdr_tax_params.',
7207: p_msg_name => G_INVALID_VALUE,
7208: p_token1 => G_COL_NAME_TOKEN,
7209: p_token1_value => 'CURRENCY_CODE');
7210:
7211: RAISE OKL_API.G_EXCEPTION_ERROR;
7212: END IF;
7213: CLOSE l_fndcurrency_csr;
7214:
7215: -- get the AR cust trx type ID
7221: p_msg_name => G_REQUIRED_VALUE,
7222: p_token1 => G_COL_NAME_TOKEN,
7223: p_token1_value => 'CUST_TRX_TYPE_ID');
7224:
7225: RAISE OKL_API.G_EXCEPTION_ERROR;
7226: END IF;
7227: CLOSE l_racusttrxtypes_csr;
7228:
7229:
7251: OKC_API.set_message( p_app_name => 'OKC',
7252: p_msg_name => G_REQUIRED_VALUE,
7253: p_token1 => G_COL_NAME_TOKEN,
7254: p_token1_value => 'Financial Product');
7255: RAISE OKL_API.G_EXCEPTION_ERROR;
7256: END IF;
7257:
7258: IF p_source_trx_name = 'Estimated Billing' AND p_source_table = 'OKL_TRX_QUOTES_B' THEN -- Termination/Repurchase quote creation/updation
7259: IF p_qtp_code LIKE 'TER%' THEN
7271: ,x_return_status => x_return_status
7272: ,x_msg_count => x_msg_count
7273: ,x_msg_data => x_msg_data);
7274:
7275: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7276: -- Rule instance is found
7277: IF (l_rulv_rec.rule_information11 IS NOT NULL) AND (l_rulv_rec.rule_information11 <> OKL_API.G_MISS_CHAR) THEN
7278:
7279: l_prch_opt_det := l_rulv_rec.rule_information11; -- It can have a value 'NONE' which is OK
7273: ,x_msg_data => x_msg_data);
7274:
7275: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7276: -- Rule instance is found
7277: IF (l_rulv_rec.rule_information11 IS NOT NULL) AND (l_rulv_rec.rule_information11 <> OKL_API.G_MISS_CHAR) THEN
7278:
7279: l_prch_opt_det := l_rulv_rec.rule_information11; -- It can have a value 'NONE' which is OK
7280:
7281: END IF;
7295: ,x_return_status => x_return_status
7296: ,x_msg_count => x_msg_count
7297: ,x_msg_data => x_msg_data);
7298:
7299: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7300: -- Rule instance is found
7301: IF (l_rulv_rec.rule_information11 IS NOT NULL) AND (l_rulv_rec.rule_information11 <> OKL_API.G_MISS_CHAR) THEN
7302:
7303: l_prch_opt_det := l_rulv_rec.rule_information11; -- It can have a value 'NONE' which is OK
7297: ,x_msg_data => x_msg_data);
7298:
7299: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7300: -- Rule instance is found
7301: IF (l_rulv_rec.rule_information11 IS NOT NULL) AND (l_rulv_rec.rule_information11 <> OKL_API.G_MISS_CHAR) THEN
7302:
7303: l_prch_opt_det := l_rulv_rec.rule_information11; -- It can have a value 'NONE' which is OK
7304:
7305: END IF;
7320: ,x_return_status => x_return_status
7321: ,x_msg_count => x_msg_count
7322: ,x_msg_data => x_msg_data);
7323:
7324: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7325: -- Rule instance is found
7326: IF (l_rulv_rec.rule_information2 IS NOT NULL) AND (l_rulv_rec.rule_information2 <> OKL_API.G_MISS_CHAR) THEN
7327:
7328: l_int_disclosed_det := l_rulv_rec.rule_information2;
7322: ,x_msg_data => x_msg_data);
7323:
7324: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7325: -- Rule instance is found
7326: IF (l_rulv_rec.rule_information2 IS NOT NULL) AND (l_rulv_rec.rule_information2 <> OKL_API.G_MISS_CHAR) THEN
7327:
7328: l_int_disclosed_det := l_rulv_rec.rule_information2;
7329: ELSE -- interest diclosed is optional on the contract
7330:
7333:
7334: ELSE -- interest diclosed is optional on the contract
7335:
7336: l_int_disclosed_det := 'N';
7337: x_return_status := OKL_API.G_RET_STS_SUCCESS;
7338: END IF;
7339: ----
7340:
7341: ELSE -- repurchase quote creation / updation
7360: ,x_return_status => x_return_status
7361: ,x_msg_count => x_msg_count
7362: ,x_msg_data => x_msg_data);
7363:
7364: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7365: -- Rule instance is found
7366: IF (l_rulv_rec.rule_information11 IS NOT NULL) AND (l_rulv_rec.rule_information11 <> OKL_API.G_MISS_CHAR) THEN
7367:
7368: l_prch_opt_det := l_rulv_rec.rule_information11; -- It can have a value 'NONE' which is OK
7362: ,x_msg_data => x_msg_data);
7363:
7364: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7365: -- Rule instance is found
7366: IF (l_rulv_rec.rule_information11 IS NOT NULL) AND (l_rulv_rec.rule_information11 <> OKL_API.G_MISS_CHAR) THEN
7367:
7368: l_prch_opt_det := l_rulv_rec.rule_information11; -- It can have a value 'NONE' which is OK
7369:
7370: END IF;
7384: ,x_return_status => x_return_status
7385: ,x_msg_count => x_msg_count
7386: ,x_msg_data => x_msg_data);
7387:
7388: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7389: -- Rule instance is found
7390: IF (l_rulv_rec.rule_information11 IS NOT NULL) AND (l_rulv_rec.rule_information11 <> OKL_API.G_MISS_CHAR) THEN
7391:
7392: l_prch_opt_det := l_rulv_rec.rule_information11; -- It can have a value 'NONE' which is OK
7386: ,x_msg_data => x_msg_data);
7387:
7388: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7389: -- Rule instance is found
7390: IF (l_rulv_rec.rule_information11 IS NOT NULL) AND (l_rulv_rec.rule_information11 <> OKL_API.G_MISS_CHAR) THEN
7391:
7392: l_prch_opt_det := l_rulv_rec.rule_information11; -- It can have a value 'NONE' which is OK
7393:
7394: END IF;
7408: ,x_return_status => x_return_status
7409: ,x_msg_count => x_msg_count
7410: ,x_msg_data => x_msg_data);
7411:
7412: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7413: -- Rule instance is found
7414: IF (l_rulv_rec.rule_information2 IS NOT NULL) AND (l_rulv_rec.rule_information2 <> OKL_API.G_MISS_CHAR) THEN
7415:
7416: l_int_disclosed_det := l_rulv_rec.rule_information2;
7410: ,x_msg_data => x_msg_data);
7411:
7412: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7413: -- Rule instance is found
7414: IF (l_rulv_rec.rule_information2 IS NOT NULL) AND (l_rulv_rec.rule_information2 <> OKL_API.G_MISS_CHAR) THEN
7415:
7416: l_int_disclosed_det := l_rulv_rec.rule_information2;
7417: ELSE -- interest diclosed is optional on the contract
7418:
7421:
7422: ELSE -- interest diclosed is optional on the contract
7423:
7424: l_int_disclosed_det := 'N';
7425: x_return_status := OKL_API.G_RET_STS_SUCCESS;
7426: END IF;
7427: ----
7428: ELSIF p_qtp_code LIKE 'REP%' OR p_purpose_code IN ('AMBSPR','CURE','REPAIR_CHARGE') THEN
7429: -- Repurchase quote billing OR Remk,asset repair or vendor cure billing
7445: ,x_return_status => x_return_status
7446: ,x_msg_count => x_msg_count
7447: ,x_msg_data => x_msg_data);
7448:
7449: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7450: -- Rule instance is found
7451: IF (l_rulv_rec.rule_information11 IS NOT NULL) AND (l_rulv_rec.rule_information11 <> OKL_API.G_MISS_CHAR) THEN
7452:
7453: l_prch_opt_det := l_rulv_rec.rule_information11; -- It can have a value 'NONE' which is OK
7447: ,x_msg_data => x_msg_data);
7448:
7449: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7450: -- Rule instance is found
7451: IF (l_rulv_rec.rule_information11 IS NOT NULL) AND (l_rulv_rec.rule_information11 <> OKL_API.G_MISS_CHAR) THEN
7452:
7453: l_prch_opt_det := l_rulv_rec.rule_information11; -- It can have a value 'NONE' which is OK
7454:
7455: END IF;
7467: ,x_return_status => x_return_status
7468: ,x_msg_count => x_msg_count
7469: ,x_msg_data => x_msg_data);
7470:
7471: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7472: -- Rule instance is found
7473: IF (l_rulv_rec.rule_information2 IS NOT NULL) AND (l_rulv_rec.rule_information2 <> OKL_API.G_MISS_CHAR) THEN
7474:
7475: l_int_disclosed_det := l_rulv_rec.rule_information2;
7469: ,x_msg_data => x_msg_data);
7470:
7471: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7472: -- Rule instance is found
7473: IF (l_rulv_rec.rule_information2 IS NOT NULL) AND (l_rulv_rec.rule_information2 <> OKL_API.G_MISS_CHAR) THEN
7474:
7475: l_int_disclosed_det := l_rulv_rec.rule_information2;
7476: ELSE -- interest diclosed is optional on the contract
7477:
7480:
7481: ELSE -- interest diclosed is optional on the contract
7482:
7483: l_int_disclosed_det := 'N';
7484: x_return_status := OKL_API.G_RET_STS_SUCCESS;
7485: END IF;
7486: -- SECHAWLA 23-NOV-05 4742539 : end
7487:
7488: END IF;
7501: ,x_return_status => x_return_status
7502: ,x_msg_count => x_msg_count
7503: ,x_msg_data => x_msg_data);
7504:
7505: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7506: -- Rule instance is found
7507: IF (l_rulv_rec.rule_information11 IS NOT NULL) AND (l_rulv_rec.rule_information11 <> OKL_API.G_MISS_CHAR) THEN
7508:
7509: l_prch_opt_det := l_rulv_rec.rule_information11; -- It can have a value 'NONE' which is OK
7503: ,x_msg_data => x_msg_data);
7504:
7505: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7506: -- Rule instance is found
7507: IF (l_rulv_rec.rule_information11 IS NOT NULL) AND (l_rulv_rec.rule_information11 <> OKL_API.G_MISS_CHAR) THEN
7508:
7509: l_prch_opt_det := l_rulv_rec.rule_information11; -- It can have a value 'NONE' which is OK
7510:
7511: END IF;
7523: ,x_return_status => x_return_status
7524: ,x_msg_count => x_msg_count
7525: ,x_msg_data => x_msg_data);
7526:
7527: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7528: -- Rule instance is found
7529: IF (l_rulv_rec.rule_information2 IS NOT NULL) AND (l_rulv_rec.rule_information2 <> OKL_API.G_MISS_CHAR) THEN
7530:
7531: l_int_disclosed_det := l_rulv_rec.rule_information2;
7525: ,x_msg_data => x_msg_data);
7526:
7527: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7528: -- Rule instance is found
7529: IF (l_rulv_rec.rule_information2 IS NOT NULL) AND (l_rulv_rec.rule_information2 <> OKL_API.G_MISS_CHAR) THEN
7530:
7531: l_int_disclosed_det := l_rulv_rec.rule_information2;
7532: ELSE -- interest diclosed is optional on the contract
7533:
7536:
7537: ELSE -- interest diclosed is optional on the contract
7538:
7539: l_int_disclosed_det := 'N';
7540: x_return_status := OKL_API.G_RET_STS_SUCCESS;
7541: END IF;
7542: END IF;
7543:
7544:
7572: x_ship_to_party_id => lx_ship_to_party_id,
7573: x_ship_to_site_use_id => lx_ship_to_siteuseid);
7574: END IF;
7575:
7576: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
7577: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
7578: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
7579: RAISE OKL_API.G_EXCEPTION_ERROR;
7580: END IF;
7573: x_ship_to_site_use_id => lx_ship_to_siteuseid);
7574: END IF;
7575:
7576: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
7577: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
7578: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
7579: RAISE OKL_API.G_EXCEPTION_ERROR;
7580: END IF;
7581:
7574: END IF;
7575:
7576: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
7577: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
7578: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
7579: RAISE OKL_API.G_EXCEPTION_ERROR;
7580: END IF;
7581:
7582: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
7575:
7576: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
7577: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
7578: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
7579: RAISE OKL_API.G_EXCEPTION_ERROR;
7580: END IF;
7581:
7582: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
7583: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.get_k_hdr_tax_params.',
7621: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.get_k_hdr_tax_params ','End(-)');
7622: END IF;
7623:
7624: EXCEPTION
7625: WHEN OKL_API.G_EXCEPTION_ERROR THEN
7626: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
7627: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_k_hdr_tax_params ',
7628: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
7629: END IF;
7624: EXCEPTION
7625: WHEN OKL_API.G_EXCEPTION_ERROR THEN
7626: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
7627: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_k_hdr_tax_params ',
7628: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
7629: END IF;
7630:
7631: IF c_get_contractinfo_csr%ISOPEN THEN
7632: CLOSE c_get_contractinfo_csr;
7643: IF l_oklkheaders_csr%ISOPEN THEN
7644: CLOSE l_oklkheaders_csr;
7645: END IF;
7646:
7647: x_return_status := OKL_API.G_RET_STS_ERROR;
7648: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
7649: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
7650: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_k_hdr_tax_params ',
7651: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
7644: CLOSE l_oklkheaders_csr;
7645: END IF;
7646:
7647: x_return_status := OKL_API.G_RET_STS_ERROR;
7648: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
7649: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
7650: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_k_hdr_tax_params ',
7651: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
7652: END IF;
7647: x_return_status := OKL_API.G_RET_STS_ERROR;
7648: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
7649: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
7650: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_k_hdr_tax_params ',
7651: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
7652: END IF;
7653:
7654: IF c_get_contractinfo_csr%ISOPEN THEN
7655: CLOSE c_get_contractinfo_csr;
7666: IF l_oklkheaders_csr%ISOPEN THEN
7667: CLOSE l_oklkheaders_csr;
7668: END IF;
7669:
7670: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
7671:
7672: WHEN OTHERS THEN
7673: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
7674: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_k_hdr_tax_params ',
7690: IF l_oklkheaders_csr%ISOPEN THEN
7691: CLOSE l_oklkheaders_csr;
7692: END IF;
7693:
7694: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
7695: -- unexpected error
7696: OKL_API.set_message(p_app_name => g_app_name,
7697: p_msg_name => g_unexpected_error,
7698: p_token1 => g_sqlcode_token,
7692: END IF;
7693:
7694: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
7695: -- unexpected error
7696: OKL_API.set_message(p_app_name => g_app_name,
7697: p_msg_name => g_unexpected_error,
7698: p_token1 => g_sqlcode_token,
7699: p_token1_value => sqlcode,
7700: p_token2 => g_sqlerrm_token,
7790: WHERE vendor_id = cp_vendor_id
7791: AND primary_pay_site_flag = 'Y';
7792:
7793:
7794: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
7795:
7796: l_rulv_rec okl_rule_pub.rulv_rec_type;
7797: l_rulv_empty_rec okl_rule_pub.rulv_rec_type;
7798: l_name VARCHAR2(150);
7861: ,x_return_status => x_return_status
7862: ,x_msg_count => x_msg_count
7863: ,x_msg_data => x_msg_data);
7864:
7865: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7866: -- Rule instance is found
7867: IF (l_rulv_rec.rule_information6 IS NOT NULL) AND (l_rulv_rec.rule_information6 <> OKL_API.G_MISS_CHAR) THEN
7868:
7869: l_transfer_of_title := l_rulv_rec.rule_information6;
7863: ,x_msg_data => x_msg_data);
7864:
7865: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7866: -- Rule instance is found
7867: IF (l_rulv_rec.rule_information6 IS NOT NULL) AND (l_rulv_rec.rule_information6 <> OKL_API.G_MISS_CHAR) THEN
7868:
7869: l_transfer_of_title := l_rulv_rec.rule_information6;
7870: ELSE -- transfer of title is optional on the contract
7871:
7873: END IF;
7874: ELSE -- transfer of title is optional on the contract
7875:
7876: l_transfer_of_title := 'N';
7877: x_return_status := OKL_API.G_RET_STS_SUCCESS;
7878: END IF;
7879: -- get transfer of title : end
7880:
7881: -- get sale_lease_back -- financial Asset level
7889: ,x_return_status => x_return_status
7890: ,x_msg_count => x_msg_count
7891: ,x_msg_data => x_msg_data);
7892:
7893: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7894: -- Rule instance is found
7895: IF (l_rulv_rec.rule_information7 IS NOT NULL) AND (l_rulv_rec.rule_information7 <> OKL_API.G_MISS_CHAR) THEN
7896:
7897: l_sale_lease_back := l_rulv_rec.rule_information7;
7891: ,x_msg_data => x_msg_data);
7892:
7893: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7894: -- Rule instance is found
7895: IF (l_rulv_rec.rule_information7 IS NOT NULL) AND (l_rulv_rec.rule_information7 <> OKL_API.G_MISS_CHAR) THEN
7896:
7897: l_sale_lease_back := l_rulv_rec.rule_information7;
7898: ELSE -- sale and lease back is optional on the contract
7899:
7901: END IF;
7902: ELSE -- sale and lease back is optional on the contract
7903:
7904: l_sale_lease_back := 'N';
7905: x_return_status := OKL_API.G_RET_STS_SUCCESS;
7906: END IF;
7907: -- get sale_lease_back : end
7908:
7909:
7918: ,x_return_status => x_return_status
7919: ,x_msg_count => x_msg_count
7920: ,x_msg_data => x_msg_data);
7921:
7922: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7923: -- Rule instance is found
7924: IF (l_rulv_rec.rule_information8 IS NOT NULL) AND (l_rulv_rec.rule_information8 <> OKL_API.G_MISS_CHAR) THEN
7925:
7926: l_purchase_of_lease := l_rulv_rec.rule_information8;
7920: ,x_msg_data => x_msg_data);
7921:
7922: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7923: -- Rule instance is found
7924: IF (l_rulv_rec.rule_information8 IS NOT NULL) AND (l_rulv_rec.rule_information8 <> OKL_API.G_MISS_CHAR) THEN
7925:
7926: l_purchase_of_lease := l_rulv_rec.rule_information8;
7927: ELSE -- purchase of lease is optional on the contract
7928:
7930: END IF;
7931: ELSE -- purchase of lease is optional on the contract
7932:
7933: l_purchase_of_lease := 'N';
7934: x_return_status := OKL_API.G_RET_STS_SUCCESS;
7935: END IF;
7936: -- get purchase_of_lease : end
7937:
7938:
7947: ,x_return_status => x_return_status
7948: ,x_msg_count => x_msg_count
7949: ,x_msg_data => x_msg_data);
7950:
7951: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7952: -- Rule instance is found
7953: IF (l_rulv_rec.rule_information9 IS NOT NULL) AND (l_rulv_rec.rule_information9 <> OKL_API.G_MISS_CHAR) THEN
7954:
7955: l_usage_of_equipment := l_rulv_rec.rule_information9;
7949: ,x_msg_data => x_msg_data);
7950:
7951: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7952: -- Rule instance is found
7953: IF (l_rulv_rec.rule_information9 IS NOT NULL) AND (l_rulv_rec.rule_information9 <> OKL_API.G_MISS_CHAR) THEN
7954:
7955: l_usage_of_equipment := l_rulv_rec.rule_information9;
7956:
7957: END IF;
7955: l_usage_of_equipment := l_rulv_rec.rule_information9;
7956:
7957: END IF;
7958: ELSE
7959: x_return_status := OKL_API.G_RET_STS_SUCCESS;
7960: END IF;
7961: -- get usage_of_equipment : end
7962:
7963:
7972: ,x_return_status => x_return_status
7973: ,x_msg_count => x_msg_count
7974: ,x_msg_data => x_msg_data);
7975:
7976: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7977: -- Rule instance is found
7978: IF (l_rulv_rec.rule_information10 IS NOT NULL) AND (l_rulv_rec.rule_information10 <> OKL_API.G_MISS_CHAR) THEN
7979:
7980: l_age_of_equipment := to_number(l_rulv_rec.rule_information10);
7974: ,x_msg_data => x_msg_data);
7975:
7976: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
7977: -- Rule instance is found
7978: IF (l_rulv_rec.rule_information10 IS NOT NULL) AND (l_rulv_rec.rule_information10 <> OKL_API.G_MISS_CHAR) THEN
7979:
7980: l_age_of_equipment := to_number(l_rulv_rec.rule_information10);
7981:
7982: END IF;
7980: l_age_of_equipment := to_number(l_rulv_rec.rule_information10);
7981:
7982: END IF;
7983: ELSE
7984: x_return_status := OKL_API.G_RET_STS_SUCCESS;
7985: END IF;
7986: -- get age_of_equipment : end
7987:
7988:
8039: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.get_asset_tax_params ','End(-)');
8040: END IF;
8041:
8042: EXCEPTION
8043: WHEN OKL_API.G_EXCEPTION_ERROR THEN
8044:
8045: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
8046: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_asset_tax_params ',
8047: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
8043: WHEN OKL_API.G_EXCEPTION_ERROR THEN
8044:
8045: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
8046: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_asset_tax_params ',
8047: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
8048: END IF;
8049:
8050: IF l_okclines_csr%ISOPEN THEN
8051: CLOSE l_okclines_csr;
8062: IF l_povendorsites_csr%ISOPEN THEN
8063: CLOSE l_povendorsites_csr;
8064: END IF;
8065:
8066: x_return_status := OKL_API.G_RET_STS_ERROR;
8067: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
8068: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
8069: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_asset_tax_params ',
8070: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
8063: CLOSE l_povendorsites_csr;
8064: END IF;
8065:
8066: x_return_status := OKL_API.G_RET_STS_ERROR;
8067: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
8068: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
8069: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_asset_tax_params ',
8070: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
8071: END IF;
8066: x_return_status := OKL_API.G_RET_STS_ERROR;
8067: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
8068: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
8069: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_asset_tax_params ',
8070: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
8071: END IF;
8072:
8073: IF l_okclines_csr%ISOPEN THEN
8074: CLOSE l_okclines_csr;
8086: CLOSE l_povendorsites_csr;
8087: END IF;
8088:
8089:
8090: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
8091:
8092: WHEN OTHERS THEN
8093: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
8094: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_asset_tax_params ',
8111: CLOSE l_povendorsites_csr;
8112: END IF;
8113:
8114:
8115: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
8116: -- unexpected error
8117: OKL_API.set_message(p_app_name => g_app_name,
8118: p_msg_name => g_unexpected_error,
8119: p_token1 => g_sqlcode_token,
8113:
8114:
8115: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
8116: -- unexpected error
8117: OKL_API.set_message(p_app_name => g_app_name,
8118: p_msg_name => g_unexpected_error,
8119: p_token1 => g_sqlcode_token,
8120: p_token1_value => sqlcode,
8121: p_token2 => g_sqlerrm_token,
8169: p_source_trx_id IN NUMBER,
8170: p_source_trx_name IN VARCHAR2,
8171: p_source_table IN VARCHAR2) IS
8172:
8173: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
8174: i NUMBER;
8175:
8176: -- get the tax schedule request details
8177: CURSOR l_trxrequests_csr(cp_trx_id IN NUMBER, cp_trx_type_name IN VARCHAR2) IS
8659: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_tax_schedule_tax.',
8660: 'p_source_table :'||p_source_table);
8661: END IF;
8662:
8663: x_return_status := OKL_API.G_RET_STS_SUCCESS;
8664:
8665: OPEN l_trxrequests_csr(p_source_trx_id, p_source_trx_name);
8666: FETCH l_trxrequests_csr INTO l_ts_khr_id, l_ts_start_date, l_ts_end_date,
8667: l_ts_trx_type_id_det, l_legal_entity_id, l_org_id;
8670: OKC_API.set_message( p_app_name => 'OKC',
8671: p_msg_name => G_INVALID_VALUE,
8672: p_token1 => G_COL_NAME_TOKEN,
8673: p_token1_value => 'SOURCE_TRX_ID');
8674: RAISE OKL_API.G_EXCEPTION_ERROR;
8675: END IF;
8676: CLOSE l_trxrequests_csr;
8677:
8678: -- Fetch the Ledger info
8712: x_currency_conversion_rate => lx_currency_conversion_rate,
8713: x_currency_conversion_date => lx_currency_conversion_date,
8714: x_contract_start_date => lx_contract_start_date);
8715:
8716: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
8717: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
8718: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
8719: RAISE OKL_API.G_EXCEPTION_ERROR;
8720: END IF;
8713: x_currency_conversion_date => lx_currency_conversion_date,
8714: x_contract_start_date => lx_contract_start_date);
8715:
8716: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
8717: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
8718: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
8719: RAISE OKL_API.G_EXCEPTION_ERROR;
8720: END IF;
8721:
8714: x_contract_start_date => lx_contract_start_date);
8715:
8716: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
8717: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
8718: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
8719: RAISE OKL_API.G_EXCEPTION_ERROR;
8720: END IF;
8721:
8722: --------------- Process Billed Stream elements - Start -------------------
8715:
8716: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
8717: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
8718: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
8719: RAISE OKL_API.G_EXCEPTION_ERROR;
8720: END IF;
8721:
8722: --------------- Process Billed Stream elements - Start -------------------
8723:
8755: IF l_get_zx_taxable_line_info%NOTFOUND THEN -- data should exist in the billing tables
8756: --SECHAWLA 22-APR-08 6975983 : begin
8757: --SECHAWLA 22-APR-08 6975983 : shouldn't fail if no tax calculated in eBTax for AR Invoice
8758: /*
8759: OKL_API.set_message( p_app_name => 'OKL',
8760: p_msg_name => 'OKL_TX_NO_BILLING_INFO');
8761: RAISE OKL_API.G_EXCEPTION_ERROR;
8762: */
8763: -- In scenario where there is no tax in eBTax for billed AR invoices (stream elements),
8757: --SECHAWLA 22-APR-08 6975983 : shouldn't fail if no tax calculated in eBTax for AR Invoice
8758: /*
8759: OKL_API.set_message( p_app_name => 'OKL',
8760: p_msg_name => 'OKL_TX_NO_BILLING_INFO');
8761: RAISE OKL_API.G_EXCEPTION_ERROR;
8762: */
8763: -- In scenario where there is no tax in eBTax for billed AR invoices (stream elements),
8764: -- Tax determinants can not be derived. Tax determinants are passed to AR through Ar Interface
8765: -- But these are not stored in actual AR tables. When AR makes tax call to eBTax, these determinants
9001: EXCEPTION
9002: WHEN OTHERS THEN
9003: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
9004: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
9005: OKL_API.set_message(p_app_name => 'OKL',
9006: p_msg_name => 'OKL_TX_TRX_INS_ERR',
9007: p_token1 => 'TABLE_NAME',
9008: p_token1_value => 'OKL_TAX_SOURCES',
9009: p_token2 => 'ERROR_CODE',
9010: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
9011: p_token3 => 'ITERATION',
9012: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
9013: END LOOP;
9014: RAISE OKL_API.G_EXCEPTION_ERROR;
9015: END IF;
9016: END;
9017: ---- Insert into okl_tax_sources end -----
9018:
9031: EXCEPTION
9032: WHEN OTHERS THEN
9033: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
9034: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
9035: OKL_API.set_message(p_app_name => 'OKL',
9036: p_msg_name => 'OKL_TX_TRX_INS_ERR',
9037: p_token1 => 'TABLE_NAME',
9038: p_token1_value => 'OKL_TAX_TRX_DETAILS',
9039: p_token2 => 'ERROR_CODE',
9040: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
9041: p_token3 => 'ITERATION',
9042: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
9043: END LOOP;
9044: RAISE OKL_API.G_EXCEPTION_ERROR;
9045: END IF;
9046: END;
9047:
9048: ---- Insert into okl_tax_trx_details end -----
9097: x_usage_of_equipment => l_ts_usage_of_equipment,
9098: x_age_of_equipment => l_ts_age_of_equipment,
9099: x_vendor_site_id => l_ts_vendor_site_id);
9100:
9101: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9102: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9103: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9104: RAISE OKL_API.G_EXCEPTION_ERROR;
9105: END IF;
9098: x_age_of_equipment => l_ts_age_of_equipment,
9099: x_vendor_site_id => l_ts_vendor_site_id);
9100:
9101: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9102: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9103: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9104: RAISE OKL_API.G_EXCEPTION_ERROR;
9105: END IF;
9106:
9099: x_vendor_site_id => l_ts_vendor_site_id);
9100:
9101: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9102: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9103: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9104: RAISE OKL_API.G_EXCEPTION_ERROR;
9105: END IF;
9106:
9107: l_ts_asset_level_det_tbl(i).fin_asset_id := l_finassets_tbl(k).fin_asset_id;
9100:
9101: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9102: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9103: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9104: RAISE OKL_API.G_EXCEPTION_ERROR;
9105: END IF;
9106:
9107: l_ts_asset_level_det_tbl(i).fin_asset_id := l_finassets_tbl(k).fin_asset_id;
9108: l_ts_asset_level_det_tbl(i).transfer_of_title := l_ts_transfer_of_title;
9203: p_org_id => l_org_id,
9204: p_trx_date => l_ts_start_date,
9205: px_tax_codes_tbl => lx_tax_codes_tbl);
9206:
9207: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9208: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9209: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9210: RAISE OKL_API.G_EXCEPTION_ERROR;
9211: END IF;
9204: p_trx_date => l_ts_start_date,
9205: px_tax_codes_tbl => lx_tax_codes_tbl);
9206:
9207: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9208: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9209: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9210: RAISE OKL_API.G_EXCEPTION_ERROR;
9211: END IF;
9212:
9205: px_tax_codes_tbl => lx_tax_codes_tbl);
9206:
9207: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9208: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9209: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9210: RAISE OKL_API.G_EXCEPTION_ERROR;
9211: END IF;
9212:
9213: l_tax_code_count := l_tax_code_count + 1;
9206:
9207: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9208: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9209: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9210: RAISE OKL_API.G_EXCEPTION_ERROR;
9211: END IF;
9212:
9213: l_tax_code_count := l_tax_code_count + 1;
9214:
9239: -- get the inventory item id
9240: OPEN l_invitem_csr(l_fin_asset_id);
9241: FETCH l_invitem_csr INTO l_inv_item_id, l_inv_org_id;
9242: IF l_invitem_csr%NOTFOUND THEN
9243: OKL_API.set_message(
9244: p_app_name => 'OKL',
9245: p_msg_name => 'OKL_TX_INV_ITEM_ERR',
9246: p_token1 => 'ASSET_NUMBER',
9247: p_token1_value => 'FIN_ASSET_ID');
9245: p_msg_name => 'OKL_TX_INV_ITEM_ERR',
9246: p_token1 => 'ASSET_NUMBER',
9247: p_token1_value => 'FIN_ASSET_ID');
9248:
9249: RAISE OKL_API.G_EXCEPTION_ERROR;
9250: END IF;
9251: CLOSE l_invitem_csr;
9252:
9253: -- get the Location Party ID's
9268: x_ship_to_location_id => lx_ship_to_location_id,
9269: x_ship_to_party_id => lx_ship_to_party_id,
9270: x_ship_to_site_use_id => lx_ship_to_siteuseid);
9271:
9272: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9273: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9274: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9275: RAISE OKL_API.G_EXCEPTION_ERROR;
9276: END IF;
9269: x_ship_to_party_id => lx_ship_to_party_id,
9270: x_ship_to_site_use_id => lx_ship_to_siteuseid);
9271:
9272: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9273: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9274: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9275: RAISE OKL_API.G_EXCEPTION_ERROR;
9276: END IF;
9277:
9270: x_ship_to_site_use_id => lx_ship_to_siteuseid);
9271:
9272: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9273: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9274: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9275: RAISE OKL_API.G_EXCEPTION_ERROR;
9276: END IF;
9277:
9278: populate_tax_codes( p_api_version => p_api_version,
9271:
9272: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9273: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9274: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9275: RAISE OKL_API.G_EXCEPTION_ERROR;
9276: END IF;
9277:
9278: populate_tax_codes( p_api_version => p_api_version,
9279: p_init_msg_list => OKC_API.G_FALSE,
9309: p_org_id => l_org_id,
9310: p_trx_date => l_ts_start_date,
9311: px_tax_codes_tbl => lx_tax_codes_tbl);
9312:
9313: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9314: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9315: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9316: RAISE OKL_API.G_EXCEPTION_ERROR;
9317: END IF;
9310: p_trx_date => l_ts_start_date,
9311: px_tax_codes_tbl => lx_tax_codes_tbl);
9312:
9313: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9314: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9315: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9316: RAISE OKL_API.G_EXCEPTION_ERROR;
9317: END IF;
9318:
9311: px_tax_codes_tbl => lx_tax_codes_tbl);
9312:
9313: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9314: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9315: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9316: RAISE OKL_API.G_EXCEPTION_ERROR;
9317: END IF;
9318:
9319: l_tax_code_count := l_tax_code_count + 1;
9312:
9313: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9314: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9315: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9316: RAISE OKL_API.G_EXCEPTION_ERROR;
9317: END IF;
9318:
9319: l_tax_code_count := l_tax_code_count + 1;
9320:
9395: x_ship_to_location_id => lx_ship_to_location_id,
9396: x_ship_to_party_id => lx_ship_to_party_id,
9397: x_ship_to_site_use_id => lx_ship_to_siteuseid);
9398:
9399: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9400: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9401: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9402: RAISE OKL_API.G_EXCEPTION_ERROR;
9403: END IF;
9396: x_ship_to_party_id => lx_ship_to_party_id,
9397: x_ship_to_site_use_id => lx_ship_to_siteuseid);
9398:
9399: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9400: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9401: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9402: RAISE OKL_API.G_EXCEPTION_ERROR;
9403: END IF;
9404:
9397: x_ship_to_site_use_id => lx_ship_to_siteuseid);
9398:
9399: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9400: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9401: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9402: RAISE OKL_API.G_EXCEPTION_ERROR;
9403: END IF;
9404:
9405: l_contract_streams_tbl(k).ship_to_siteuseid := lx_ship_to_siteuseid;
9398:
9399: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9400: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9401: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9402: RAISE OKL_API.G_EXCEPTION_ERROR;
9403: END IF;
9404:
9405: l_contract_streams_tbl(k).ship_to_siteuseid := lx_ship_to_siteuseid;
9406:
9407: -- get the inventory item id
9408: OPEN l_invitem_csr(l_asset_line_id);
9409: FETCH l_invitem_csr INTO l_inv_item_id, l_inv_item_org_id;
9410: IF l_invitem_csr%NOTFOUND THEN
9411: OKL_API.set_message(p_app_name => 'OKL',
9412: p_msg_name => 'OKL_TX_INV_ITEM_ERR',
9413: p_token1 => 'ASSET_NUMBER',
9414: p_token1_value => l_asset_number);
9415: RAISE OKL_API.G_EXCEPTION_ERROR;
9411: OKL_API.set_message(p_app_name => 'OKL',
9412: p_msg_name => 'OKL_TX_INV_ITEM_ERR',
9413: p_token1 => 'ASSET_NUMBER',
9414: p_token1_value => l_asset_number);
9415: RAISE OKL_API.G_EXCEPTION_ERROR;
9416: END IF;
9417: CLOSE l_invitem_csr;
9418:
9419: l_contract_streams_tbl(k).inventory_item_id := l_inv_item_id;
9609: EXCEPTION
9610: WHEN OTHERS THEN
9611: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
9612: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
9613: OKL_API.set_message(p_app_name => 'OKL',
9614: p_msg_name => 'OKL_TX_TRX_INS_ERR',
9615: p_token1 => 'TABLE_NAME',
9616: p_token1_value => 'OKL_TAX_SOURCES',
9617: p_token2 => 'ERROR_CODE',
9618: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
9619: p_token3 => 'ITERATION',
9620: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
9621: END LOOP;
9622: RAISE OKL_API.G_EXCEPTION_ERROR;
9623: END IF;
9624: END;
9625: ---- Insert into okl_tax_sources end -----
9626:
9656: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_tax_schedule_tax.',
9657: 'After tax engine call '||x_return_status);
9658: END IF;
9659:
9660: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9661: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9662: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9663: RAISE OKL_API.G_EXCEPTION_ERROR;
9664: END IF;
9657: 'After tax engine call '||x_return_status);
9658: END IF;
9659:
9660: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9661: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9662: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9663: RAISE OKL_API.G_EXCEPTION_ERROR;
9664: END IF;
9665: END IF;
9658: END IF;
9659:
9660: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9661: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9662: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9663: RAISE OKL_API.G_EXCEPTION_ERROR;
9664: END IF;
9665: END IF;
9666:
9659:
9660: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9661: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9662: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9663: RAISE OKL_API.G_EXCEPTION_ERROR;
9664: END IF;
9665: END IF;
9666:
9667: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
9681: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_tax_schedule_tax.',
9682: 'Return Status' || x_return_status);
9683: END IF;
9684:
9685: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9686: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9687: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9688: RAISE OKL_API.G_EXCEPTION_ERROR;
9689: END IF;
9682: 'Return Status' || x_return_status);
9683: END IF;
9684:
9685: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9686: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9687: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9688: RAISE OKL_API.G_EXCEPTION_ERROR;
9689: END IF;
9690:
9683: END IF;
9684:
9685: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9686: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9687: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9688: RAISE OKL_API.G_EXCEPTION_ERROR;
9689: END IF;
9690:
9691: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
9684:
9685: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9686: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9687: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9688: RAISE OKL_API.G_EXCEPTION_ERROR;
9689: END IF;
9690:
9691: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
9692: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_tax_schedule_tax.',
9708: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_tax_schedule_tax.',
9709: 'Return Status' || x_return_status);
9710: END IF;
9711:
9712: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9713: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9714: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9715: RAISE OKL_API.G_EXCEPTION_ERROR;
9716: END IF;
9709: 'Return Status' || x_return_status);
9710: END IF;
9711:
9712: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9713: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9714: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9715: RAISE OKL_API.G_EXCEPTION_ERROR;
9716: END IF;
9717:
9710: END IF;
9711:
9712: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9713: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9714: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9715: RAISE OKL_API.G_EXCEPTION_ERROR;
9716: END IF;
9717:
9718: END IF; -- Processing for Unbilled streams - End
9711:
9712: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
9713: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
9714: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
9715: RAISE OKL_API.G_EXCEPTION_ERROR;
9716: END IF;
9717:
9718: END IF; -- Processing for Unbilled streams - End
9719:
9723: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.process_tax_schedule_tax ','End(-)');
9724: END IF;
9725:
9726: EXCEPTION
9727: WHEN OKL_API.G_EXCEPTION_ERROR THEN
9728: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
9729: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_schedule_tax ',
9730: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
9731: END IF;
9726: EXCEPTION
9727: WHEN OKL_API.G_EXCEPTION_ERROR THEN
9728: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
9729: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_schedule_tax ',
9730: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
9731: END IF;
9732:
9733: IF l_trxrequests_csr%ISOPEN THEN
9734: CLOSE l_trxrequests_csr;
9785: IF l_get_zx_tax_lines%ISOPEN THEN
9786: CLOSE l_get_zx_tax_lines;
9787: END IF;
9788:
9789: x_return_status := OKL_API.G_RET_STS_ERROR;
9790:
9791: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
9792: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
9793: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_schedule_tax ',
9787: END IF;
9788:
9789: x_return_status := OKL_API.G_RET_STS_ERROR;
9790:
9791: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
9792: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
9793: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_schedule_tax ',
9794: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
9795: END IF;
9790:
9791: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
9792: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
9793: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_schedule_tax ',
9794: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
9795: END IF;
9796:
9797: IF l_trxrequests_csr%ISOPEN THEN
9798: CLOSE l_trxrequests_csr;
9849: IF l_get_zx_tax_lines%ISOPEN THEN
9850: CLOSE l_get_zx_tax_lines;
9851: END IF;
9852:
9853: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
9854:
9855: WHEN OTHERS THEN
9856: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
9857: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_schedule_tax ',
9913: IF l_get_zx_tax_lines%ISOPEN THEN
9914: CLOSE l_get_zx_tax_lines;
9915: END IF;
9916:
9917: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
9918: -- unexpected error
9919: OKL_API.set_message(p_app_name => g_app_name,
9920: p_msg_name => g_unexpected_error,
9921: p_token1 => g_sqlcode_token,
9915: END IF;
9916:
9917: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
9918: -- unexpected error
9919: OKL_API.set_message(p_app_name => g_app_name,
9920: p_msg_name => g_unexpected_error,
9921: p_token1 => g_sqlcode_token,
9922: p_token1_value => sqlcode,
9923: p_token2 => g_sqlerrm_token,
9975: --p_source_trx_name ---> 'Estimated Billing'
9976: --p_source_table ---> 'OKL_TRX_QUOTES_B'
9977: --------------------------------------------------
9978:
9979: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
9980:
9981: -- Get quote details
9982: CURSOR l_trxquotes_csr(cp_qte_id IN NUMBER) IS
9983: SELECT khr_id, date_effective_from, early_termination_yn, qtp_code,
10143: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quote_tax.',
10144: 'p_source_table :'||p_source_table);
10145: END IF;
10146:
10147: x_return_status := OKL_API.G_RET_STS_SUCCESS;
10148:
10149: -- Validate soure trx id
10150: OPEN l_trxquotes_csr(p_source_trx_id);
10151: FETCH l_trxquotes_csr INTO l_qte_khr_id, l_qte_dt_eff_from,
10156: OKC_API.set_message( p_app_name => 'OKC',
10157: p_msg_name => G_INVALID_VALUE,
10158: p_token1 => G_COL_NAME_TOKEN,
10159: p_token1_value => 'SOURCE_TRX_ID');
10160: RAISE OKL_API.G_EXCEPTION_ERROR;
10161: END IF;
10162: CLOSE l_trxquotes_csr;
10163:
10164: --Check if tax source transactions already exist for this quote. If so, delete the previous tax transcations and
10193: EXCEPTION
10194: WHEN OTHERS THEN
10195: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
10196: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
10197: OKL_API.set_message(
10198: p_app_name => 'OKL',
10199: p_msg_name => 'OKL_TX_TRX_DEL_ERR',
10200: p_token1 => 'TABLE_NAME',
10201: p_token1_value => 'OKL_TAX_TRX_DETAILS',
10203: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
10204: p_token3 => 'ITERATION',
10205: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
10206: END LOOP;
10207: RAISE OKL_API.G_EXCEPTION_ERROR;
10208: END IF;
10209: END;
10210:
10211: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10219: EXCEPTION
10220: WHEN OTHERS THEN
10221: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
10222: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
10223: OKL_API.set_message(
10224: p_app_name => 'OKL',
10225: p_msg_name => 'OKL_TX_TRX_DEL_ERR',
10226: p_token1 => 'TABLE_NAME',
10227: p_token1_value => 'OKL_TAX_SOURCES',
10229: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
10230: p_token3 => 'ITERATION',
10231: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
10232: END LOOP;
10233: RAISE OKL_API.G_EXCEPTION_ERROR;
10234: END IF;
10235: END;
10236:
10237: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10274: x_currency_conversion_rate => lx_currency_conversion_rate,
10275: x_currency_conversion_date => lx_currency_conversion_date,
10276: x_contract_start_date => lx_contract_start_date);
10277:
10278: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10279: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10280: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10281: RAISE OKL_API.G_EXCEPTION_ERROR;
10282: END IF;
10275: x_currency_conversion_date => lx_currency_conversion_date,
10276: x_contract_start_date => lx_contract_start_date);
10277:
10278: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10279: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10280: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10281: RAISE OKL_API.G_EXCEPTION_ERROR;
10282: END IF;
10283:
10276: x_contract_start_date => lx_contract_start_date);
10277:
10278: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10279: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10280: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10281: RAISE OKL_API.G_EXCEPTION_ERROR;
10282: END IF;
10283:
10284: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10277:
10278: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10279: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10280: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10281: RAISE OKL_API.G_EXCEPTION_ERROR;
10282: END IF;
10283:
10284: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10285: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quote_tax.',
10327: l_taxation_country := get_default_taxation_country(x_return_status => x_return_status,
10328: x_msg_count => x_msg_count,
10329: x_msg_data => x_msg_data,
10330: p_legal_entity_id => l_legal_entity_id);
10331: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10332: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10333: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10334: RAISE OKL_API.G_EXCEPTION_ERROR;
10335: END IF;
10328: x_msg_count => x_msg_count,
10329: x_msg_data => x_msg_data,
10330: p_legal_entity_id => l_legal_entity_id);
10331: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10332: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10333: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10334: RAISE OKL_API.G_EXCEPTION_ERROR;
10335: END IF;
10336:
10329: x_msg_data => x_msg_data,
10330: p_legal_entity_id => l_legal_entity_id);
10331: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10332: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10333: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10334: RAISE OKL_API.G_EXCEPTION_ERROR;
10335: END IF;
10336:
10337: tax_call_cnt := 1;
10330: p_legal_entity_id => l_legal_entity_id);
10331: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10332: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10333: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10334: RAISE OKL_API.G_EXCEPTION_ERROR;
10335: END IF;
10336:
10337: tax_call_cnt := 1;
10338: OPEN l_txlquotelines_csr(p_source_trx_id);
10379: x_usage_of_equipment => l_qte_usage_of_equipment,
10380: x_age_of_equipment => l_qte_age_of_equipment,
10381: x_vendor_site_id => l_qte_vendor_site_id);
10382:
10383: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10384: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10385: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10386: RAISE OKL_API.G_EXCEPTION_ERROR;
10387: END IF;
10380: x_age_of_equipment => l_qte_age_of_equipment,
10381: x_vendor_site_id => l_qte_vendor_site_id);
10382:
10383: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10384: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10385: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10386: RAISE OKL_API.G_EXCEPTION_ERROR;
10387: END IF;
10388:
10381: x_vendor_site_id => l_qte_vendor_site_id);
10382:
10383: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10384: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10385: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10386: RAISE OKL_API.G_EXCEPTION_ERROR;
10387: END IF;
10388:
10389: -- Equipment Type(inventory item id)
10382:
10383: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10384: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10385: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10386: RAISE OKL_API.G_EXCEPTION_ERROR;
10387: END IF;
10388:
10389: -- Equipment Type(inventory item id)
10390: -- get the inventory item id
10390: -- get the inventory item id
10391: OPEN l_invitem_csr(l_txlquotelines_tbl(k).kle_id);
10392: FETCH l_invitem_csr INTO l_inv_item_id, l_inv_item_org_id;
10393: IF l_invitem_csr%NOTFOUND THEN
10394: OKL_API.set_message(
10395: p_app_name => 'OKL',
10396: p_msg_name => 'OKL_TX_INV_ITEM_ERR',
10397: p_token1 => 'ASSET_NUMBER',
10398: p_token1_value => l_name);
10396: p_msg_name => 'OKL_TX_INV_ITEM_ERR',
10397: p_token1 => 'ASSET_NUMBER',
10398: p_token1_value => l_name);
10399:
10400: RAISE OKL_API.G_EXCEPTION_ERROR;
10401: END IF;
10402: CLOSE l_invitem_csr;
10403:
10404: IF l_qtp_code LIKE 'TER%' THEN -- Ship to Location is not applicable for repurchase quote
10420: x_ship_to_location_id => lx_ship_to_location_id,
10421: x_ship_to_party_id => lx_ship_to_party_id,
10422: x_ship_to_site_use_id => lx_ship_to_siteuseid);
10423:
10424: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10425: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10426: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10427: RAISE OKL_API.G_EXCEPTION_ERROR;
10428: END IF;
10421: x_ship_to_party_id => lx_ship_to_party_id,
10422: x_ship_to_site_use_id => lx_ship_to_siteuseid);
10423:
10424: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10425: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10426: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10427: RAISE OKL_API.G_EXCEPTION_ERROR;
10428: END IF;
10429: END IF;
10422: x_ship_to_site_use_id => lx_ship_to_siteuseid);
10423:
10424: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10425: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10426: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10427: RAISE OKL_API.G_EXCEPTION_ERROR;
10428: END IF;
10429: END IF;
10430:
10423:
10424: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10425: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10426: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10427: RAISE OKL_API.G_EXCEPTION_ERROR;
10428: END IF;
10429: END IF;
10430:
10431: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10479: p_primary_sty_purpose => l_txlquotelines_tbl(k).qlt_code,
10480: x_return_status => x_return_status,
10481: x_primary_sty_id => lx_sty_id);
10482:
10483: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10484: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10485: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10486: RAISE OKL_API.G_EXCEPTION_ERROR;
10487: END IF;
10480: x_return_status => x_return_status,
10481: x_primary_sty_id => lx_sty_id);
10482:
10483: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10484: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10485: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10486: RAISE OKL_API.G_EXCEPTION_ERROR;
10487: END IF;
10488: END IF;
10481: x_primary_sty_id => lx_sty_id);
10482:
10483: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10484: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10485: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10486: RAISE OKL_API.G_EXCEPTION_ERROR;
10487: END IF;
10488: END IF;
10489:
10482:
10483: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10484: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10485: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10486: RAISE OKL_API.G_EXCEPTION_ERROR;
10487: END IF;
10488: END IF;
10489:
10490: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10505: OKC_API.set_message( p_app_name => 'OKC',
10506: p_msg_name => G_INVALID_VALUE,
10507: p_token1 => G_COL_NAME_TOKEN,
10508: p_token1_value => 'FMA_ID');
10509: RAISE OKL_API.G_EXCEPTION_ERROR;
10510: END IF;
10511: CLOSE l_formulae_csr;
10512:
10513: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10610: p_term_quote_reason_code => l_qrs_code,
10611: px_tax_sources_tbl => lx_tax_sources_tbl,
10612: px_line_params_tbl => lx_line_params_tbl );
10613:
10614: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10615: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10616: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10617: RAISE OKL_API.G_EXCEPTION_ERROR;
10618: END IF;
10611: px_tax_sources_tbl => lx_tax_sources_tbl,
10612: px_line_params_tbl => lx_line_params_tbl );
10613:
10614: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10615: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10616: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10617: RAISE OKL_API.G_EXCEPTION_ERROR;
10618: END IF;
10619:
10612: px_line_params_tbl => lx_line_params_tbl );
10613:
10614: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10615: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10616: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10617: RAISE OKL_API.G_EXCEPTION_ERROR;
10618: END IF;
10619:
10620: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10613:
10614: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10615: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10616: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10617: RAISE OKL_API.G_EXCEPTION_ERROR;
10618: END IF;
10619:
10620: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10621: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quote_tax.',
10645: EXCEPTION
10646: WHEN OTHERS THEN
10647: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
10648: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
10649: OKL_API.set_message( p_app_name => 'OKL',
10650: p_msg_name => 'OKL_TX_TRX_INS_ERR',
10651: p_token1 => 'TABLE_NAME',
10652: p_token1_value => 'OKL_TAX_SOURCES',
10653: p_token2 => 'ERROR_CODE',
10654: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
10655: p_token3 => 'ITERATION',
10656: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
10657: END LOOP;
10658: RAISE OKL_API.G_EXCEPTION_ERROR;
10659: END IF;
10660: END;
10661: -- Insert into okl_tax_sources end
10662:
10692: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quote_tax.',
10693: 'After tax engine call '||x_return_status);
10694: END IF;
10695:
10696: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10697: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10698: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10699: RAISE OKL_API.G_EXCEPTION_ERROR;
10700: END IF;
10693: 'After tax engine call '||x_return_status);
10694: END IF;
10695:
10696: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10697: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10698: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10699: RAISE OKL_API.G_EXCEPTION_ERROR;
10700: END IF;
10701: END IF;
10694: END IF;
10695:
10696: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10697: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10698: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10699: RAISE OKL_API.G_EXCEPTION_ERROR;
10700: END IF;
10701: END IF;
10702:
10695:
10696: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10697: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10698: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10699: RAISE OKL_API.G_EXCEPTION_ERROR;
10700: END IF;
10701: END IF;
10702:
10703: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10717: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quote_tax.',
10718: 'Return Status' || x_return_status);
10719: END IF;
10720:
10721: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10722: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10723: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10724: RAISE OKL_API.G_EXCEPTION_ERROR;
10725: END IF;
10718: 'Return Status' || x_return_status);
10719: END IF;
10720:
10721: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10722: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10723: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10724: RAISE OKL_API.G_EXCEPTION_ERROR;
10725: END IF;
10726:
10719: END IF;
10720:
10721: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10722: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10723: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10724: RAISE OKL_API.G_EXCEPTION_ERROR;
10725: END IF;
10726:
10727: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10720:
10721: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10722: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10723: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10724: RAISE OKL_API.G_EXCEPTION_ERROR;
10725: END IF;
10726:
10727: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10728: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quote_tax.',
10744: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quote_tax.',
10745: 'Return Status' || x_return_status);
10746: END IF;
10747:
10748: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10749: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10750: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10751: RAISE OKL_API.G_EXCEPTION_ERROR;
10752: END IF;
10745: 'Return Status' || x_return_status);
10746: END IF;
10747:
10748: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10749: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10750: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10751: RAISE OKL_API.G_EXCEPTION_ERROR;
10752: END IF;
10753:
10746: END IF;
10747:
10748: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10749: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10750: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10751: RAISE OKL_API.G_EXCEPTION_ERROR;
10752: END IF;
10753:
10754: IF (G_DEBUG_LEVEL_PROCEDURE >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10747:
10748: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
10749: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
10750: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
10751: RAISE OKL_API.G_EXCEPTION_ERROR;
10752: END IF;
10753:
10754: IF (G_DEBUG_LEVEL_PROCEDURE >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10755: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.process_quote_tax ','End(-)');
10755: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.process_quote_tax ','End(-)');
10756: END IF;
10757:
10758: EXCEPTION
10759: WHEN OKL_API.G_EXCEPTION_ERROR THEN
10760: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10761: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_quote_tax ',
10762: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
10763: END IF;
10758: EXCEPTION
10759: WHEN OKL_API.G_EXCEPTION_ERROR THEN
10760: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10761: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_quote_tax ',
10762: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
10763: END IF;
10764:
10765: IF l_trxquotes_csr%ISOPEN THEN
10766: CLOSE l_trxquotes_csr;
10793: IF l_formulae_csr%ISOPEN THEN
10794: CLOSE l_formulae_csr;
10795: END IF;
10796:
10797: x_return_status := OKL_API.G_RET_STS_ERROR;
10798: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
10799: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10800: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_quote_tax ',
10801: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
10794: CLOSE l_formulae_csr;
10795: END IF;
10796:
10797: x_return_status := OKL_API.G_RET_STS_ERROR;
10798: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
10799: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10800: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_quote_tax ',
10801: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
10802: END IF;
10797: x_return_status := OKL_API.G_RET_STS_ERROR;
10798: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
10799: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10800: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_quote_tax ',
10801: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
10802: END IF;
10803:
10804: IF l_trxquotes_csr%ISOPEN THEN
10805: CLOSE l_trxquotes_csr;
10832: IF l_formulae_csr%ISOPEN THEN
10833: CLOSE l_formulae_csr;
10834: END IF;
10835:
10836: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
10837:
10838: WHEN OTHERS THEN
10839: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
10840: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_quote_tax ',
10872: IF l_formulae_csr%ISOPEN THEN
10873: CLOSE l_formulae_csr;
10874: END IF;
10875:
10876: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
10877: -- unexpected error
10878: OKL_API.set_message(p_app_name => g_app_name,
10879: p_msg_name => g_unexpected_error,
10880: p_token1 => g_sqlcode_token,
10874: END IF;
10875:
10876: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
10877: -- unexpected error
10878: OKL_API.set_message(p_app_name => g_app_name,
10879: p_msg_name => g_unexpected_error,
10880: p_token1 => g_sqlcode_token,
10881: p_token1_value => sqlcode,
10882: p_token2 => g_sqlerrm_token,
10945: --p_tax_call_type ---> Tax call type
10946: --p_serialized_asset ---> Serialized Asset (Y/N)
10947: --p_request_id ---> Id of OKL_trx_Requests
10948: --------------------------------------------------
10949: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
10950:
10951: -- validate source trx id
10952: CURSOR l_trxassets_csr(cp_trx_id IN NUMBER, cp_trx_type_name IN VARCHAR2) IS
10953: SELECT a.try_id, a.date_trans_occurred, a.legal_entity_id
11204: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax.',
11205: 'p_alc_final_call :'||p_alc_final_call);
11206: END IF;
11207:
11208: x_return_status := OKL_API.G_RET_STS_SUCCESS;
11209:
11210: -- validate the source trx id
11211: OPEN l_trxassets_csr(p_source_trx_id, p_source_trx_name);
11212: FETCH l_trxassets_csr INTO l_alc_trx_type_id_det, l_trx_date, l_legal_entity_id;
11215: OKC_API.set_message( p_app_name => 'OKC',
11216: p_msg_name => G_INVALID_VALUE,
11217: p_token1 => G_COL_NAME_TOKEN,
11218: p_token1_value => 'SOURCE_TRX_ID');
11219: RAISE OKL_API.G_EXCEPTION_ERROR;
11220: END IF;
11221: CLOSE l_trxassets_csr;
11222:
11223: IF p_tax_call_type = G_ESTIMATED_CALL_TYPE THEN
11229: OKC_API.set_message( p_app_name => 'OKC',
11230: p_msg_name => G_REQUIRED_VALUE,
11231: p_token1 => G_COL_NAME_TOKEN,
11232: p_token1_value => 'PARTY_SITE_USES_ID1');
11233: RAISE OKL_API.G_EXCEPTION_ERROR;
11234: END IF;
11235:
11236: IF l_fin_asset_id IS NULL THEN
11237: OKC_API.set_message( p_app_name => 'OKC',
11237: OKC_API.set_message( p_app_name => 'OKC',
11238: p_msg_name => G_REQUIRED_VALUE,
11239: p_token1 => G_COL_NAME_TOKEN,
11240: p_token1_value => 'DNZ_CLE_ID');
11241: RAISE OKL_API.G_EXCEPTION_ERROR;
11242: END IF;
11243: CLOSE l_txlitminsts_csr;
11244:
11245: OPEN l_okcklines_csr(l_fin_asset_id);
11248: OKC_API.set_message( p_app_name => 'OKC',
11249: p_msg_name => G_INVALID_VALUE,
11250: p_token1 => G_COL_NAME_TOKEN,
11251: p_token1_value => 'DNZ_CLE_ID');
11252: RAISE OKL_API.G_EXCEPTION_ERROR;
11253: END IF;
11254: CLOSE l_okcklines_csr;
11255:
11256: -- get the new location id
11260: OKC_API.set_message( p_app_name => 'OKC',
11261: p_msg_name => G_REQUIRED_VALUE,
11262: p_token1 => G_COL_NAME_TOKEN,
11263: p_token1_value => 'LOCATION_ID');
11264: RAISE OKL_API.G_EXCEPTION_ERROR;
11265: END IF;
11266: CLOSE l_partysiteuses_csr;
11267:
11268: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11315: EXCEPTION
11316: WHEN OTHERS THEN
11317: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
11318: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
11319: OKL_API.set_message(
11320: p_app_name => 'OKL',
11321: p_msg_name => 'OKL_TX_TRX_UPD_ERR',
11322: p_token1 => 'TABLE_NAME',
11323: p_token1_value => 'OKL_TAX_SOURCES',
11325: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
11326: p_token3 => 'ITERATION',
11327: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
11328: END LOOP;
11329: RAISE OKL_API.G_EXCEPTION_ERROR;
11330: END IF;
11331: END;
11332:
11333: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11372: x_currency_conversion_rate => lx_currency_conversion_rate,
11373: x_currency_conversion_date => lx_currency_conversion_date,
11374: x_contract_start_date => lx_contract_start_date);
11375:
11376: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11377: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11378: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11379: RAISE OKL_API.G_EXCEPTION_ERROR;
11380: END IF;
11373: x_currency_conversion_date => lx_currency_conversion_date,
11374: x_contract_start_date => lx_contract_start_date);
11375:
11376: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11377: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11378: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11379: RAISE OKL_API.G_EXCEPTION_ERROR;
11380: END IF;
11381:
11374: x_contract_start_date => lx_contract_start_date);
11375:
11376: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11377: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11378: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11379: RAISE OKL_API.G_EXCEPTION_ERROR;
11380: END IF;
11381:
11382: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11375:
11376: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11377: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11378: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11379: RAISE OKL_API.G_EXCEPTION_ERROR;
11380: END IF;
11381:
11382: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11383: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax.',
11435: x_usage_of_equipment => lx_alc_usage_of_equipment,
11436: x_age_of_equipment => lx_alc_age_of_equipment,
11437: x_vendor_site_id => lx_alc_vendor_site_id);
11438:
11439: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11440: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11441: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11442: RAISE OKL_API.G_EXCEPTION_ERROR;
11443: END IF;
11436: x_age_of_equipment => lx_alc_age_of_equipment,
11437: x_vendor_site_id => lx_alc_vendor_site_id);
11438:
11439: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11440: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11441: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11442: RAISE OKL_API.G_EXCEPTION_ERROR;
11443: END IF;
11444:
11437: x_vendor_site_id => lx_alc_vendor_site_id);
11438:
11439: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11440: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11441: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11442: RAISE OKL_API.G_EXCEPTION_ERROR;
11443: END IF;
11444:
11445: -- Equipment Type(inventory item id)
11438:
11439: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11440: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11441: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11442: RAISE OKL_API.G_EXCEPTION_ERROR;
11443: END IF;
11444:
11445: -- Equipment Type(inventory item id)
11446: -- get the inventory item id
11446: -- get the inventory item id
11447: OPEN l_invitem_csr(l_fin_asset_id);
11448: FETCH l_invitem_csr INTO l_inv_item_id, l_inv_item_org_id;
11449: IF l_invitem_csr%NOTFOUND THEN
11450: OKL_API.set_message( p_app_name => 'OKL',
11451: p_msg_name => 'OKL_TX_INV_ITEM_ERR',
11452: p_token1 => 'ASSET_NUMBER',
11453: p_token1_value => l_name);
11454: RAISE OKL_API.G_EXCEPTION_ERROR;
11450: OKL_API.set_message( p_app_name => 'OKL',
11451: p_msg_name => 'OKL_TX_INV_ITEM_ERR',
11452: p_token1 => 'ASSET_NUMBER',
11453: p_token1_value => l_name);
11454: RAISE OKL_API.G_EXCEPTION_ERROR;
11455: END IF;
11456: CLOSE l_invitem_csr;
11457:
11458: -- get the Equipment Locationn (IB Loc)
11472: x_ship_to_location_id => lx_ship_to_location_id,
11473: x_ship_to_party_id => lx_ship_to_party_id,
11474: x_ship_to_site_use_id => lx_ship_to_siteuseid);
11475:
11476: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN -- will never be setting this to unexpecetd inside get_ufc_code ?
11477: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11478: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11479: RAISE OKL_API.G_EXCEPTION_ERROR;
11480: END IF;
11473: x_ship_to_party_id => lx_ship_to_party_id,
11474: x_ship_to_site_use_id => lx_ship_to_siteuseid);
11475:
11476: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN -- will never be setting this to unexpecetd inside get_ufc_code ?
11477: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11478: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11479: RAISE OKL_API.G_EXCEPTION_ERROR;
11480: END IF;
11481:
11474: x_ship_to_site_use_id => lx_ship_to_siteuseid);
11475:
11476: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN -- will never be setting this to unexpecetd inside get_ufc_code ?
11477: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11478: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11479: RAISE OKL_API.G_EXCEPTION_ERROR;
11480: END IF;
11481:
11482: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11475:
11476: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN -- will never be setting this to unexpecetd inside get_ufc_code ?
11477: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11478: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11479: RAISE OKL_API.G_EXCEPTION_ERROR;
11480: END IF;
11481:
11482: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11483: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax.',
11557: OKC_API.set_message( p_app_name => 'OKC',
11558: p_msg_name => G_INVALID_VALUE,
11559: p_token1 => G_COL_NAME_TOKEN,
11560: p_token1_value => 'FMA_ID');
11561: RAISE OKL_API.G_EXCEPTION_ERROR;
11562: END IF;
11563: CLOSE l_formulae_csr;
11564:
11565: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11575: l_taxation_country := get_default_taxation_country(x_return_status => x_return_status,
11576: x_msg_count => x_msg_count,
11577: x_msg_data => x_msg_data,
11578: p_legal_entity_id => l_legal_entity_id);
11579: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11580: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11581: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11582: RAISE OKL_API.G_EXCEPTION_ERROR;
11583: END IF;
11576: x_msg_count => x_msg_count,
11577: x_msg_data => x_msg_data,
11578: p_legal_entity_id => l_legal_entity_id);
11579: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11580: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11581: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11582: RAISE OKL_API.G_EXCEPTION_ERROR;
11583: END IF;
11584:
11577: x_msg_data => x_msg_data,
11578: p_legal_entity_id => l_legal_entity_id);
11579: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11580: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11581: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11582: RAISE OKL_API.G_EXCEPTION_ERROR;
11583: END IF;
11584:
11585: OPEN c_get_streams_count(l_chr_id, l_fin_asset_id);
11578: p_legal_entity_id => l_legal_entity_id);
11579: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11580: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11581: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11582: RAISE OKL_API.G_EXCEPTION_ERROR;
11583: END IF;
11584:
11585: OPEN c_get_streams_count(l_chr_id, l_fin_asset_id);
11586: FETCH c_get_streams_count INTO l_stream_count;
11742: p_alc_ser_def_code => l_alc_ser_def_code,
11743: px_tax_sources_tbl => lx_tax_sources_tbl,
11744: px_line_params_tbl => lx_line_params_tbl );
11745:
11746: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11747: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11748: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11749: RAISE OKL_API.G_EXCEPTION_ERROR;
11750: END IF;
11743: px_tax_sources_tbl => lx_tax_sources_tbl,
11744: px_line_params_tbl => lx_line_params_tbl );
11745:
11746: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11747: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11748: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11749: RAISE OKL_API.G_EXCEPTION_ERROR;
11750: END IF;
11751:
11744: px_line_params_tbl => lx_line_params_tbl );
11745:
11746: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11747: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11748: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11749: RAISE OKL_API.G_EXCEPTION_ERROR;
11750: END IF;
11751:
11752: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11745:
11746: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11747: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11748: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11749: RAISE OKL_API.G_EXCEPTION_ERROR;
11750: END IF;
11751:
11752: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11753: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax.',
11772: EXCEPTION
11773: WHEN OTHERS THEN
11774: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
11775: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
11776: OKL_API.set_message(
11777: p_app_name => 'OKL',
11778: p_msg_name => 'OKL_TX_TRX_INS_ERR',
11779: p_token1 => 'TABLE_NAME',
11780: p_token1_value => 'OKL_TAX_SOURCES',
11782: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
11783: p_token3 => 'ITERATION',
11784: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
11785: END LOOP;
11786: RAISE OKL_API.G_EXCEPTION_ERROR;
11787: END IF;
11788: END;
11789: -- Insert into okl_tax_sources end --
11790:
11836: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax.',
11837: 'After tax engine call '||x_return_status);
11838: END IF;
11839:
11840: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11841: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11842: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11843: RAISE OKL_API.G_EXCEPTION_ERROR;
11844: END IF;
11837: 'After tax engine call '||x_return_status);
11838: END IF;
11839:
11840: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11841: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11842: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11843: RAISE OKL_API.G_EXCEPTION_ERROR;
11844: END IF;
11845: END IF;
11838: END IF;
11839:
11840: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11841: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11842: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11843: RAISE OKL_API.G_EXCEPTION_ERROR;
11844: END IF;
11845: END IF;
11846:
11839:
11840: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11841: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11842: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11843: RAISE OKL_API.G_EXCEPTION_ERROR;
11844: END IF;
11845: END IF;
11846:
11847: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11862: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax.',
11863: 'Return Status' || x_return_status);
11864: END IF;
11865:
11866: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11867: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11868: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11869: RAISE OKL_API.G_EXCEPTION_ERROR;
11870: END IF;
11863: 'Return Status' || x_return_status);
11864: END IF;
11865:
11866: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11867: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11868: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11869: RAISE OKL_API.G_EXCEPTION_ERROR;
11870: END IF;
11871:
11864: END IF;
11865:
11866: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11867: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11868: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11869: RAISE OKL_API.G_EXCEPTION_ERROR;
11870: END IF;
11871:
11872: IF (p_serialized_asset = 'Y' AND p_alc_final_call = 'Y') THEN
11865:
11866: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11867: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11868: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11869: RAISE OKL_API.G_EXCEPTION_ERROR;
11870: END IF;
11871:
11872: IF (p_serialized_asset = 'Y' AND p_alc_final_call = 'Y') THEN
11873: G_UFC_CODE := null;
11883: p_asset_id => l_fin_asset_id,
11884: p_request_id => p_request_id,
11885: p_serialized_asset => p_serialized_asset);
11886:
11887: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11888: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11889: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
11890: RAISE OKL_API.G_EXCEPTION_ERROR;
11891: END IF;
11884: p_request_id => p_request_id,
11885: p_serialized_asset => p_serialized_asset);
11886:
11887: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11888: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11889: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
11890: RAISE OKL_API.G_EXCEPTION_ERROR;
11891: END IF;
11892: ELSE
11885: p_serialized_asset => p_serialized_asset);
11886:
11887: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11888: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11889: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
11890: RAISE OKL_API.G_EXCEPTION_ERROR;
11891: END IF;
11892: ELSE
11893: populate_alc_total_tax(p_api_version => p_api_version,
11886:
11887: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11888: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11889: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
11890: RAISE OKL_API.G_EXCEPTION_ERROR;
11891: END IF;
11892: ELSE
11893: populate_alc_total_tax(p_api_version => p_api_version,
11894: p_init_msg_list => p_init_msg_list,
11897: x_msg_data => x_msg_data,
11898: p_asset_id => l_fin_asset_id,
11899: p_request_id => p_request_id);
11900:
11901: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11902: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11903: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
11904: RAISE OKL_API.G_EXCEPTION_ERROR;
11905: END IF;
11898: p_asset_id => l_fin_asset_id,
11899: p_request_id => p_request_id);
11900:
11901: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11902: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11903: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
11904: RAISE OKL_API.G_EXCEPTION_ERROR;
11905: END IF;
11906: END IF;
11899: p_request_id => p_request_id);
11900:
11901: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11902: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11903: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
11904: RAISE OKL_API.G_EXCEPTION_ERROR;
11905: END IF;
11906: END IF;
11907:
11900:
11901: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11902: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11903: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
11904: RAISE OKL_API.G_EXCEPTION_ERROR;
11905: END IF;
11906: END IF;
11907:
11908: ELSIF p_tax_call_type = G_ACTUAL_CALL_TYPE THEN
11933: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax.',
11934: 'Return Status' || x_return_status);
11935: END IF;
11936:
11937: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11938: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11939: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11940: RAISE OKL_API.G_EXCEPTION_ERROR;
11941: END IF;
11934: 'Return Status' || x_return_status);
11935: END IF;
11936:
11937: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11938: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11939: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11940: RAISE OKL_API.G_EXCEPTION_ERROR;
11941: END IF;
11942:
11935: END IF;
11936:
11937: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11938: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11939: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11940: RAISE OKL_API.G_EXCEPTION_ERROR;
11941: END IF;
11942:
11943: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11936:
11937: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11938: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11939: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11940: RAISE OKL_API.G_EXCEPTION_ERROR;
11941: END IF;
11942:
11943: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11944: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax.',
11956: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax.',
11957: 'Return Status' || x_return_status);
11958: END IF;
11959:
11960: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11961: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11962: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11963: RAISE OKL_API.G_EXCEPTION_ERROR;
11964: END IF;
11957: 'Return Status' || x_return_status);
11958: END IF;
11959:
11960: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11961: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11962: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11963: RAISE OKL_API.G_EXCEPTION_ERROR;
11964: END IF;
11965:
11958: END IF;
11959:
11960: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11961: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11962: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11963: RAISE OKL_API.G_EXCEPTION_ERROR;
11964: END IF;
11965:
11966: END IF;
11959:
11960: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
11961: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
11962: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
11963: RAISE OKL_API.G_EXCEPTION_ERROR;
11964: END IF;
11965:
11966: END IF;
11967:
11970: IF (G_DEBUG_LEVEL_PROCEDURE >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11971: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax ','End(-)');
11972: END IF;
11973: EXCEPTION
11974: WHEN OKL_API.G_EXCEPTION_ERROR THEN
11975: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11976: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax ',
11977: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
11978: END IF;
11973: EXCEPTION
11974: WHEN OKL_API.G_EXCEPTION_ERROR THEN
11975: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
11976: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax ',
11977: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
11978: END IF;
11979:
11980: IF l_trxassets_csr%ISOPEN THEN
11981: CLOSE l_trxassets_csr;
12020: IF c_get_streams_count%ISOPEN THEN
12021: CLOSE c_get_streams_count;
12022: END IF;
12023:
12024: x_return_status := OKL_API.G_RET_STS_ERROR;
12025: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
12026: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
12027: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax ',
12028: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
12021: CLOSE c_get_streams_count;
12022: END IF;
12023:
12024: x_return_status := OKL_API.G_RET_STS_ERROR;
12025: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
12026: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
12027: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax ',
12028: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
12029: END IF;
12024: x_return_status := OKL_API.G_RET_STS_ERROR;
12025: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
12026: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
12027: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax ',
12028: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
12029: END IF;
12030:
12031: IF l_trxassets_csr%ISOPEN THEN
12032: CLOSE l_trxassets_csr;
12071: IF c_get_streams_count%ISOPEN THEN
12072: CLOSE c_get_streams_count;
12073: END IF;
12074:
12075: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
12076:
12077: WHEN OTHERS THEN
12078: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
12079: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_asset_loc_tax ',
12123: IF c_get_streams_count%ISOPEN THEN
12124: CLOSE c_get_streams_count;
12125: END IF;
12126:
12127: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
12128: -- unexpected error
12129: OKL_API.set_message(p_app_name => g_app_name,
12130: p_msg_name => g_unexpected_error,
12131: p_token1 => g_sqlcode_token,
12125: END IF;
12126:
12127: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
12128: -- unexpected error
12129: OKL_API.set_message(p_app_name => g_app_name,
12130: p_msg_name => g_unexpected_error,
12131: p_token1 => g_sqlcode_token,
12132: p_token1_value => sqlcode,
12133: p_token2 => g_sqlerrm_token,
12316: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_split_asset_tax.',
12317: 'p_source_table :'||p_source_table);
12318: END IF;
12319:
12320: x_return_status := OKL_API.G_RET_STS_SUCCESS;
12321:
12322: -- validate the source trx id
12323: OPEN l_trxassets_csr(p_source_trx_id, p_source_trx_name);
12324: FETCH l_trxassets_csr INTO l_spl_trx_type_id, l_trx_date;
12327: OKC_API.set_message( p_app_name => 'OKC',
12328: p_msg_name => G_INVALID_VALUE,
12329: p_token1 => G_COL_NAME_TOKEN,
12330: p_token1_value => 'SOURCE_TRX_ID');
12331: RAISE OKL_API.G_EXCEPTION_ERROR;
12332: END IF;
12333: CLOSE l_trxassets_csr;
12334:
12335: -- get trx line information
12340: OKC_API.set_message( p_app_name => 'OKC',
12341: p_msg_name => G_REQUIRED_VALUE,
12342: p_token1 => G_COL_NAME_TOKEN,
12343: p_token1_value => 'Financial Asset');
12344: RAISE OKL_API.G_EXCEPTION_ERROR;
12345: END IF;
12346:
12347: IF l_fin_asset_id IS NULL THEN
12348: OKC_API.set_message( p_app_name => 'OKC',
12348: OKC_API.set_message( p_app_name => 'OKC',
12349: p_msg_name => G_REQUIRED_VALUE,
12350: p_token1 => G_COL_NAME_TOKEN,
12351: p_token1_value => 'KLE_ID');
12352: RAISE OKL_API.G_EXCEPTION_ERROR;
12353: END IF;
12354:
12355: IF l_current_units IS NULL THEN
12356: OKC_API.set_message( p_app_name => 'OKC',
12356: OKC_API.set_message( p_app_name => 'OKC',
12357: p_msg_name => G_REQUIRED_VALUE,
12358: p_token1 => G_COL_NAME_TOKEN,
12359: p_token1_value => 'CURRENT_UNITS');
12360: RAISE OKL_API.G_EXCEPTION_ERROR;
12361: END IF;
12362:
12363: CLOSE l_txlassets_csr;
12364:
12369: OKC_API.set_message( p_app_name => 'OKC',
12370: p_msg_name => G_INVALID_VALUE,
12371: p_token1 => G_COL_NAME_TOKEN,
12372: p_token1_value => 'KLE_ID');
12373: RAISE OKL_API.G_EXCEPTION_ERROR;
12374: END IF;
12375: CLOSE l_okcklines_csr;
12376:
12377: IF l_dnz_khr_id IS NULL THEN
12384: OKC_API.set_message( p_app_name => 'OKC',
12385: p_msg_name => G_REQUIRED_VALUE,
12386: p_token1 => G_COL_NAME_TOKEN,
12387: p_token1_value => 'ASSET_NUMBER');
12388: RAISE OKL_API.G_EXCEPTION_ERROR;
12389: END IF;
12390: END IF;
12391: END IF;
12392:
12555: EXCEPTION
12556: WHEN OTHERS THEN
12557: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
12558: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
12559: OKL_API.set_message(
12560: p_app_name => 'OKL',
12561: p_msg_name => 'OKL_TX_TRX_UPD_ERR',
12562: p_token1 => 'TABLE_NAME',
12563: p_token1_value => 'OKL_TAX_SOURCES',
12565: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
12566: p_token3 => 'ITERATION',
12567: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
12568: END LOOP;
12569: RAISE OKL_API.G_EXCEPTION_ERROR;
12570: END IF;
12571: END;
12572: END IF;
12573:
12592: EXCEPTION
12593: WHEN OTHERS THEN
12594: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
12595: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
12596: OKL_API.set_message(p_app_name => 'OKL',
12597: p_msg_name => 'OKL_TX_TRX_INS_ERR',
12598: p_token1 => 'TABLE_NAME',
12599: p_token1_value => 'OKL_TAX_SOURCES',
12600: p_token2 => 'ERROR_CODE',
12601: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
12602: p_token3 => 'ITERATION',
12603: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
12604: END LOOP;
12605: RAISE OKL_API.G_EXCEPTION_ERROR;
12606: END IF;
12607: END;
12608:
12609: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
12640: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_split_asset_tax.',
12641: 'Return Status' || x_return_status);
12642: END IF;
12643:
12644: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12645: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12646: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12647: RAISE OKL_API.G_EXCEPTION_ERROR;
12648: END IF;
12641: 'Return Status' || x_return_status);
12642: END IF;
12643:
12644: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12645: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12646: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12647: RAISE OKL_API.G_EXCEPTION_ERROR;
12648: END IF;
12649:
12642: END IF;
12643:
12644: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12645: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12646: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12647: RAISE OKL_API.G_EXCEPTION_ERROR;
12648: END IF;
12649:
12650: -- Get the total tax amount corresponding to 'Reverse' transaction from
12643:
12644: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12645: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12646: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12647: RAISE OKL_API.G_EXCEPTION_ERROR;
12648: END IF;
12649:
12650: -- Get the total tax amount corresponding to 'Reverse' transaction from
12651: -- zx_lines and update total_tax on okl_tax_sources
12666: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_split_asset_tax.',
12667: 'Return Status' || x_return_status);
12668: END IF;
12669:
12670: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12671: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12672: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12673: RAISE OKL_API.G_EXCEPTION_ERROR;
12674: END IF;
12667: 'Return Status' || x_return_status);
12668: END IF;
12669:
12670: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12671: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12672: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12673: RAISE OKL_API.G_EXCEPTION_ERROR;
12674: END IF;
12675:
12668: END IF;
12669:
12670: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12671: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12672: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12673: RAISE OKL_API.G_EXCEPTION_ERROR;
12674: END IF;
12675:
12676: END IF;
12669:
12670: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12671: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12672: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12673: RAISE OKL_API.G_EXCEPTION_ERROR;
12674: END IF;
12675:
12676: END IF;
12677:
12683: OKC_API.set_message( p_app_name => 'OKC',
12684: p_msg_name => G_REQUIRED_VALUE,
12685: p_token1 => G_COL_NAME_TOKEN,
12686: p_token1_value => 'CUST_TRX_TYPE_ID');
12687: RAISE OKL_API.G_EXCEPTION_ERROR;
12688: END IF;
12689: CLOSE l_racusttrxtypes_csr;
12690:
12691: OPEN l_fndcurrency_csr(l_trx_currency_code);
12696: OKC_API.set_message( p_app_name => 'OKC',
12697: p_msg_name => G_INVALID_VALUE,
12698: p_token1 => G_COL_NAME_TOKEN,
12699: p_token1_value => 'CURRENCY_CODE');
12700: RAISE OKL_API.G_EXCEPTION_ERROR;
12701: END IF;
12702: CLOSE l_fndcurrency_csr;
12703:
12704: IF k > 1 THEN -- if there are any existing ACTIVE upfront tax lines
12908: EXCEPTION
12909: WHEN OTHERS THEN
12910: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
12911: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
12912: OKL_API.set_message(p_app_name => 'OKL',
12913: p_msg_name => 'OKL_TX_TRX_INS_ERR',
12914: p_token1 => 'TABLE_NAME',
12915: p_token1_value => 'OKL_TAX_SOURCES',
12916: p_token2 => 'ERROR_CODE',
12917: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
12918: p_token3 => 'ITERATION',
12919: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
12920: END LOOP;
12921: RAISE OKL_API.G_EXCEPTION_ERROR;
12922: END IF;
12923: END;
12924:
12925: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
12956: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_split_asset_tax.',
12957: 'After tax engine call '||x_return_status);
12958: END IF;
12959:
12960: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12961: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12962: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12963: RAISE OKL_API.G_EXCEPTION_ERROR;
12964: END IF;
12957: 'After tax engine call '||x_return_status);
12958: END IF;
12959:
12960: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12961: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12962: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12963: RAISE OKL_API.G_EXCEPTION_ERROR;
12964: END IF;
12965: END IF;
12958: END IF;
12959:
12960: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12961: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12962: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12963: RAISE OKL_API.G_EXCEPTION_ERROR;
12964: END IF;
12965: END IF;
12966:
12959:
12960: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12961: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12962: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12963: RAISE OKL_API.G_EXCEPTION_ERROR;
12964: END IF;
12965: END IF;
12966:
12967: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
12980: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_split_asset_tax.',
12981: 'Return Status' || x_return_status);
12982: END IF;
12983:
12984: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12985: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12986: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12987: RAISE OKL_API.G_EXCEPTION_ERROR;
12988: END IF;
12981: 'Return Status' || x_return_status);
12982: END IF;
12983:
12984: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12985: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12986: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12987: RAISE OKL_API.G_EXCEPTION_ERROR;
12988: END IF;
12989:
12982: END IF;
12983:
12984: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12985: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12986: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12987: RAISE OKL_API.G_EXCEPTION_ERROR;
12988: END IF;
12989:
12990: -- Populate Serialized Asset total tax, if the ALC happened on the asset
12983:
12984: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
12985: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
12986: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
12987: RAISE OKL_API.G_EXCEPTION_ERROR;
12988: END IF;
12989:
12990: -- Populate Serialized Asset total tax, if the ALC happened on the asset
12991: -- before the Split process
12998: x_msg_data => x_msg_data,
12999: p_asset_id => l_txdassets_rec.target_kle_id,
13000: p_serialized_asset => l_asset_ser_alc);
13001:
13002: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13003: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13004: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13005: RAISE OKL_API.G_EXCEPTION_ERROR;
13006: END IF;
12999: p_asset_id => l_txdassets_rec.target_kle_id,
13000: p_serialized_asset => l_asset_ser_alc);
13001:
13002: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13003: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13004: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13005: RAISE OKL_API.G_EXCEPTION_ERROR;
13006: END IF;
13007: END LOOP;
13000: p_serialized_asset => l_asset_ser_alc);
13001:
13002: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13003: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13004: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13005: RAISE OKL_API.G_EXCEPTION_ERROR;
13006: END IF;
13007: END LOOP;
13008: END IF;
13001:
13002: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13003: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13004: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13005: RAISE OKL_API.G_EXCEPTION_ERROR;
13006: END IF;
13007: END LOOP;
13008: END IF;
13009:
13013: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.process_split_asset_tax ','End(-)');
13014: END IF;
13015:
13016: EXCEPTION
13017: WHEN OKL_API.G_EXCEPTION_ERROR THEN
13018: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
13019: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_split_asset_tax ',
13020: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
13021: END IF;
13016: EXCEPTION
13017: WHEN OKL_API.G_EXCEPTION_ERROR THEN
13018: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
13019: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_split_asset_tax ',
13020: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
13021: END IF;
13022:
13023: IF l_trxassets_csr%ISOPEN THEN
13024: CLOSE l_trxassets_csr;
13051: IF l_fndcurrency_csr%ISOPEN THEN
13052: CLOSE l_fndcurrency_csr;
13053: END IF;
13054:
13055: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
13056: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
13057: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_split_asset_tax ',
13058: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
13059: END IF;
13054:
13055: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
13056: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
13057: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_split_asset_tax ',
13058: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
13059: END IF;
13060:
13061: IF l_trxassets_csr%ISOPEN THEN
13062: CLOSE l_trxassets_csr;
13089: IF l_fndcurrency_csr%ISOPEN THEN
13090: CLOSE l_fndcurrency_csr;
13091: END IF;
13092:
13093: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
13094:
13095: WHEN OTHERS THEN
13096: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
13097: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_split_asset_tax ',
13129: IF l_fndcurrency_csr%ISOPEN THEN
13130: CLOSE l_fndcurrency_csr;
13131: END IF;
13132:
13133: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
13134: -- unexpected error
13135: OKL_API.set_message(p_app_name => g_app_name,
13136: p_msg_name => g_unexpected_error,
13137: p_token1 => g_sqlcode_token,
13131: END IF;
13132:
13133: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
13134: -- unexpected error
13135: OKL_API.set_message(p_app_name => g_app_name,
13136: p_msg_name => g_unexpected_error,
13137: p_token1 => g_sqlcode_token,
13138: p_token1_value => sqlcode,
13139: p_token2 => g_sqlerrm_token,
13193: --p_source_trx_name ---> 'Booking'
13194: --p_source_table ---> 'OKL_TRX_CONTRACTS'
13195: --p_tax_call_type ---> 'ESTIMATED'/'ACTUAL'
13196: --------------------------------------------------
13197: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
13198:
13199: -- validate source trx id (Booking)
13200: CURSOR l_trxcontracts_csr(cp_trx_id IN NUMBER, cp_trx_type_name IN VARCHAR2) IS
13201: SELECT a.try_id, a.khr_id, a.legal_entity_id
13464: 'p_source_table :'||p_source_table);
13465:
13466: END IF;
13467:
13468: x_return_status := OKL_API.G_RET_STS_SUCCESS;
13469:
13470: IF (p_source_trx_name = 'Booking') THEN
13471: -- validate the source trx id
13472:
13478: OKC_API.set_message( p_app_name => 'OKC',
13479: p_msg_name => G_INVALID_VALUE,
13480: p_token1 => G_COL_NAME_TOKEN,
13481: p_token1_value => 'SOURCE_TRX_ID');
13482: RAISE OKL_API.G_EXCEPTION_ERROR;
13483: END IF;
13484: CLOSE l_trxcontracts_csr;
13485:
13486: ELSIF (p_source_trx_name = 'Rebook') THEN
13493: OKC_API.set_message( p_app_name => 'OKC',
13494: p_msg_name => G_INVALID_VALUE,
13495: p_token1 => G_COL_NAME_TOKEN,
13496: p_token1_value => 'SOURCE_TRX_ID');
13497: RAISE OKL_API.G_EXCEPTION_ERROR;
13498: END IF;
13499: CLOSE l_trxcontracts_rbk_csr;
13500:
13501: OPEN l_bookingtrxtypeid_csr;
13511: OKC_API.set_message( p_app_name => 'OKC',
13512: p_msg_name => G_INVALID_VALUE,
13513: p_token1 => G_COL_NAME_TOKEN,
13514: p_token1_value => 'TAX_CALL_TYPE');
13515: RAISE OKL_API.G_EXCEPTION_ERROR;
13516: END IF;
13517:
13518: IF (l_tax_call_type = G_ESTIMATED_CALL_TYPE) THEN
13519:
13542: EXCEPTION
13543: WHEN OTHERS THEN
13544: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
13545: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
13546: OKL_API.set_message(p_app_name => 'OKL',
13547: p_msg_name => 'OKL_TX_TRX_DEL_ERR',
13548: p_token1 => 'TABLE_NAME',
13549: p_token1_value => 'OKL_TAX_SOURCES',
13550: p_token2 => 'ERROR_CODE',
13551: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
13552: p_token3 => 'ITERATION',
13553: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
13554: END LOOP;
13555: RAISE OKL_API.G_EXCEPTION_ERROR;
13556: END IF;
13557: END;
13558: END IF;
13559: EXIT WHEN l_prev_taxsources_csr%NOTFOUND;
13588: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax.',
13589: 'Return Status' || x_return_status);
13590: END IF;
13591:
13592: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13593: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13594: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13595: RAISE OKL_API.G_EXCEPTION_ERROR;
13596: END IF;
13589: 'Return Status' || x_return_status);
13590: END IF;
13591:
13592: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13593: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13594: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13595: RAISE OKL_API.G_EXCEPTION_ERROR;
13596: END IF;
13597: END IF;
13590: END IF;
13591:
13592: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13593: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13594: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13595: RAISE OKL_API.G_EXCEPTION_ERROR;
13596: END IF;
13597: END IF;
13598: -- delete booking tax lines from zx_lines -- end
13591:
13592: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13593: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13594: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13595: RAISE OKL_API.G_EXCEPTION_ERROR;
13596: END IF;
13597: END IF;
13598: -- delete booking tax lines from zx_lines -- end
13599:
13605: l_taxation_country := get_default_taxation_country(x_return_status => x_return_status,
13606: x_msg_count => x_msg_count,
13607: x_msg_data => x_msg_data,
13608: p_legal_entity_id => l_legal_entity_id);
13609: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13610: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13611: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13612: RAISE OKL_API.G_EXCEPTION_ERROR;
13613: END IF;
13606: x_msg_count => x_msg_count,
13607: x_msg_data => x_msg_data,
13608: p_legal_entity_id => l_legal_entity_id);
13609: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13610: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13611: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13612: RAISE OKL_API.G_EXCEPTION_ERROR;
13613: END IF;
13614:
13607: x_msg_data => x_msg_data,
13608: p_legal_entity_id => l_legal_entity_id);
13609: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13610: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13611: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13612: RAISE OKL_API.G_EXCEPTION_ERROR;
13613: END IF;
13614:
13615: -- Check if taxable basis override applies to Estimated Booking / Booking transaction
13608: p_legal_entity_id => l_legal_entity_id);
13609: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13610: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13611: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13612: RAISE OKL_API.G_EXCEPTION_ERROR;
13613: END IF;
13614:
13615: -- Check if taxable basis override applies to Estimated Booking / Booking transaction
13616: OPEN l_txbasisoverride_csr(l_bk_trx_type_id_det);
13624: OKC_API.set_message( p_app_name => 'OKC',
13625: p_msg_name => G_INVALID_VALUE,
13626: p_token1 => G_COL_NAME_TOKEN,
13627: p_token1_value => 'FMA_ID');
13628: RAISE OKL_API.G_EXCEPTION_ERROR;
13629: END IF;
13630: CLOSE l_formulae_csr;
13631:
13632: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
13667: x_currency_conversion_rate => lx_currency_conversion_rate,
13668: x_currency_conversion_date => lx_currency_conversion_date,
13669: x_contract_start_date => lx_contract_start_date);
13670:
13671: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13672: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13673: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13674: RAISE OKL_API.G_EXCEPTION_ERROR;
13675: END IF;
13668: x_currency_conversion_date => lx_currency_conversion_date,
13669: x_contract_start_date => lx_contract_start_date);
13670:
13671: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13672: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13673: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13674: RAISE OKL_API.G_EXCEPTION_ERROR;
13675: END IF;
13676:
13669: x_contract_start_date => lx_contract_start_date);
13670:
13671: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13672: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13673: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13674: RAISE OKL_API.G_EXCEPTION_ERROR;
13675: END IF;
13676:
13677: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
13670:
13671: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13672: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13673: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13674: RAISE OKL_API.G_EXCEPTION_ERROR;
13675: END IF;
13676:
13677: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
13678: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax.',
13763: x_usage_of_equipment => l_pb_usage_of_equipment,
13764: x_age_of_equipment => l_pb_age_of_equipment,
13765: x_vendor_site_id => l_pb_vendor_site_id);
13766:
13767: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13768: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13769: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13770: RAISE OKL_API.G_EXCEPTION_ERROR;
13771: END IF;
13764: x_age_of_equipment => l_pb_age_of_equipment,
13765: x_vendor_site_id => l_pb_vendor_site_id);
13766:
13767: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13768: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13769: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13770: RAISE OKL_API.G_EXCEPTION_ERROR;
13771: END IF;
13772:
13765: x_vendor_site_id => l_pb_vendor_site_id);
13766:
13767: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13768: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13769: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13770: RAISE OKL_API.G_EXCEPTION_ERROR;
13771: END IF;
13772:
13773: -- Equipment Type(inventory item id)
13766:
13767: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13768: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13769: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13770: RAISE OKL_API.G_EXCEPTION_ERROR;
13771: END IF;
13772:
13773: -- Equipment Type(inventory item id)
13774: -- get the inventory item id
13774: -- get the inventory item id
13775: OPEN l_invitem_csr(l_finassets_tbl(k).fin_asset_id);
13776: FETCH l_invitem_csr INTO l_inv_item_id, l_inv_item_org_id;
13777: IF l_invitem_csr%NOTFOUND THEN
13778: OKL_API.set_message(
13779: p_app_name => 'OKL',
13780: p_msg_name => 'OKL_TX_INV_ITEM_ERR',
13781: p_token1 => 'ASSET_NUMBER',
13782: p_token1_value => l_finassets_tbl(k).asset_number);
13780: p_msg_name => 'OKL_TX_INV_ITEM_ERR',
13781: p_token1 => 'ASSET_NUMBER',
13782: p_token1_value => l_finassets_tbl(k).asset_number);
13783:
13784: RAISE OKL_API.G_EXCEPTION_ERROR;
13785: END IF;
13786: CLOSE l_invitem_csr;
13787:
13788: -- get the Location Party ID's
13803: x_ship_to_location_id => lx_ship_to_location_id,
13804: x_ship_to_party_id => lx_ship_to_party_id,
13805: x_ship_to_site_use_id => lx_ship_to_siteuseid);
13806:
13807: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13808: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13809: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13810: RAISE OKL_API.G_EXCEPTION_ERROR;
13811: END IF;
13804: x_ship_to_party_id => lx_ship_to_party_id,
13805: x_ship_to_site_use_id => lx_ship_to_siteuseid);
13806:
13807: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13808: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13809: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13810: RAISE OKL_API.G_EXCEPTION_ERROR;
13811: END IF;
13812:
13805: x_ship_to_site_use_id => lx_ship_to_siteuseid);
13806:
13807: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13808: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13809: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13810: RAISE OKL_API.G_EXCEPTION_ERROR;
13811: END IF;
13812:
13813: l_pb_asset_level_det_tbl(i).fin_asset_id := l_finassets_tbl(k).fin_asset_id;
13806:
13807: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13808: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
13809: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
13810: RAISE OKL_API.G_EXCEPTION_ERROR;
13811: END IF;
13812:
13813: l_pb_asset_level_det_tbl(i).fin_asset_id := l_finassets_tbl(k).fin_asset_id;
13814: l_pb_asset_level_det_tbl(i).asset_number := l_finassets_tbl(k).asset_number;
13994: p_term_quote_reason_code => null,
13995: px_tax_sources_tbl => lx_tax_sources_tbl,
13996: px_line_params_tbl => lx_line_params_tbl );
13997:
13998: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13999: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14000: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14001: RAISE OKL_API.G_EXCEPTION_ERROR;
14002: END IF;
13995: px_tax_sources_tbl => lx_tax_sources_tbl,
13996: px_line_params_tbl => lx_line_params_tbl );
13997:
13998: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13999: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14000: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14001: RAISE OKL_API.G_EXCEPTION_ERROR;
14002: END IF;
14003:
13996: px_line_params_tbl => lx_line_params_tbl );
13997:
13998: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13999: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14000: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14001: RAISE OKL_API.G_EXCEPTION_ERROR;
14002: END IF;
14003:
14004: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
13997:
13998: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
13999: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14000: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14001: RAISE OKL_API.G_EXCEPTION_ERROR;
14002: END IF;
14003:
14004: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14005: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax.',
14105: p_term_quote_reason_code => null,
14106: px_tax_sources_tbl => lx_tax_sources_tbl,
14107: px_line_params_tbl => lx_line_params_tbl );
14108:
14109: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14110: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14111: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14112: RAISE OKL_API.G_EXCEPTION_ERROR;
14113: END IF;
14106: px_tax_sources_tbl => lx_tax_sources_tbl,
14107: px_line_params_tbl => lx_line_params_tbl );
14108:
14109: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14110: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14111: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14112: RAISE OKL_API.G_EXCEPTION_ERROR;
14113: END IF;
14114: -- asset level call end
14107: px_line_params_tbl => lx_line_params_tbl );
14108:
14109: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14110: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14111: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14112: RAISE OKL_API.G_EXCEPTION_ERROR;
14113: END IF;
14114: -- asset level call end
14115:
14108:
14109: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14110: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14111: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14112: RAISE OKL_API.G_EXCEPTION_ERROR;
14113: END IF;
14114: -- asset level call end
14115:
14116: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14230: p_term_quote_reason_code => null,
14231: px_tax_sources_tbl => lx_tax_sources_tbl,
14232: px_line_params_tbl => lx_line_params_tbl );
14233:
14234: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14235: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14236: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14237: RAISE OKL_API.G_EXCEPTION_ERROR;
14238: END IF;
14231: px_tax_sources_tbl => lx_tax_sources_tbl,
14232: px_line_params_tbl => lx_line_params_tbl );
14233:
14234: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14235: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14236: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14237: RAISE OKL_API.G_EXCEPTION_ERROR;
14238: END IF;
14239:
14232: px_line_params_tbl => lx_line_params_tbl );
14233:
14234: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14235: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14236: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14237: RAISE OKL_API.G_EXCEPTION_ERROR;
14238: END IF;
14239:
14240: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14233:
14234: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14235: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14236: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14237: RAISE OKL_API.G_EXCEPTION_ERROR;
14238: END IF;
14239:
14240: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14241: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax.',
14345: p_term_quote_reason_code => null,
14346: px_tax_sources_tbl => lx_tax_sources_tbl,
14347: px_line_params_tbl => lx_line_params_tbl );
14348:
14349: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14350: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14351: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14352: RAISE OKL_API.G_EXCEPTION_ERROR;
14353: END IF;
14346: px_tax_sources_tbl => lx_tax_sources_tbl,
14347: px_line_params_tbl => lx_line_params_tbl );
14348:
14349: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14350: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14351: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14352: RAISE OKL_API.G_EXCEPTION_ERROR;
14353: END IF;
14354:
14347: px_line_params_tbl => lx_line_params_tbl );
14348:
14349: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14350: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14351: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14352: RAISE OKL_API.G_EXCEPTION_ERROR;
14353: END IF;
14354:
14355: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14348:
14349: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14350: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14351: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14352: RAISE OKL_API.G_EXCEPTION_ERROR;
14353: END IF;
14354:
14355: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14356: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax.',
14478: p_term_quote_reason_code => null,
14479: px_tax_sources_tbl => lx_tax_sources_tbl,
14480: px_line_params_tbl => lx_line_params_tbl );
14481:
14482: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14483: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14484: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14485: RAISE OKL_API.G_EXCEPTION_ERROR;
14486: END IF;
14479: px_tax_sources_tbl => lx_tax_sources_tbl,
14480: px_line_params_tbl => lx_line_params_tbl );
14481:
14482: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14483: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14484: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14485: RAISE OKL_API.G_EXCEPTION_ERROR;
14486: END IF;
14487:
14480: px_line_params_tbl => lx_line_params_tbl );
14481:
14482: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14483: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14484: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14485: RAISE OKL_API.G_EXCEPTION_ERROR;
14486: END IF;
14487:
14488: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14481:
14482: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14483: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14484: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14485: RAISE OKL_API.G_EXCEPTION_ERROR;
14486: END IF;
14487:
14488: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14489: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax.',
14587: p_term_quote_reason_code => null,
14588: px_tax_sources_tbl => lx_tax_sources_tbl,
14589: px_line_params_tbl => lx_line_params_tbl );
14590:
14591: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14592: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14593: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14594: RAISE OKL_API.G_EXCEPTION_ERROR;
14595: END IF;
14588: px_tax_sources_tbl => lx_tax_sources_tbl,
14589: px_line_params_tbl => lx_line_params_tbl );
14590:
14591: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14592: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14593: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14594: RAISE OKL_API.G_EXCEPTION_ERROR;
14595: END IF;
14596: -- asset level call end
14589: px_line_params_tbl => lx_line_params_tbl );
14590:
14591: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14592: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14593: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14594: RAISE OKL_API.G_EXCEPTION_ERROR;
14595: END IF;
14596: -- asset level call end
14597: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14590:
14591: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14592: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14593: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14594: RAISE OKL_API.G_EXCEPTION_ERROR;
14595: END IF;
14596: -- asset level call end
14597: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14598: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax.',
14619: EXCEPTION
14620: WHEN OTHERS THEN
14621: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
14622: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
14623: OKL_API.set_message(
14624: p_app_name => 'OKL',
14625: p_msg_name => 'OKL_TX_TRX_INS_ERR',
14626: p_token1 => 'TABLE_NAME',
14627: p_token1_value => 'OKL_TAX_SOURCES',
14629: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
14630: p_token3 => 'ITERATION',
14631: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
14632: END LOOP;
14633: RAISE OKL_API.G_EXCEPTION_ERROR;
14634: END IF;
14635: END;
14636: -- Insert into okl_tax_sources end --
14637:
14667: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax.',
14668: 'After tax engine call '||x_return_status);
14669: END IF;
14670:
14671: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14672: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14673: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14674: RAISE OKL_API.G_EXCEPTION_ERROR;
14675: END IF;
14668: 'After tax engine call '||x_return_status);
14669: END IF;
14670:
14671: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14672: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14673: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14674: RAISE OKL_API.G_EXCEPTION_ERROR;
14675: END IF;
14676: END IF;
14669: END IF;
14670:
14671: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14672: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14673: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14674: RAISE OKL_API.G_EXCEPTION_ERROR;
14675: END IF;
14676: END IF;
14677:
14670:
14671: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14672: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14673: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14674: RAISE OKL_API.G_EXCEPTION_ERROR;
14675: END IF;
14676: END IF;
14677:
14678: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14691: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax.',
14692: 'Return Status' || x_return_status);
14693: END IF;
14694:
14695: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14696: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14697: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14698: RAISE OKL_API.G_EXCEPTION_ERROR;
14699: END IF;
14692: 'Return Status' || x_return_status);
14693: END IF;
14694:
14695: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14696: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14697: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14698: RAISE OKL_API.G_EXCEPTION_ERROR;
14699: END IF;
14700:
14693: END IF;
14694:
14695: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14696: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14697: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14698: RAISE OKL_API.G_EXCEPTION_ERROR;
14699: END IF;
14700:
14701: ELSIF (l_tax_call_type = G_ACTUAL_CALL_TYPE) THEN
14694:
14695: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14696: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14697: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14698: RAISE OKL_API.G_EXCEPTION_ERROR;
14699: END IF;
14700:
14701: ELSIF (l_tax_call_type = G_ACTUAL_CALL_TYPE) THEN
14702:
14720: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax.',
14721: 'Return Status' || x_return_status);
14722: END IF;
14723:
14724: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14725: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14726: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14727: RAISE OKL_API.G_EXCEPTION_ERROR;
14728: END IF;
14721: 'Return Status' || x_return_status);
14722: END IF;
14723:
14724: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14725: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14726: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14727: RAISE OKL_API.G_EXCEPTION_ERROR;
14728: END IF;
14729:
14722: END IF;
14723:
14724: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14725: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14726: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14727: RAISE OKL_API.G_EXCEPTION_ERROR;
14728: END IF;
14729:
14730: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14723:
14724: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14725: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14726: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14727: RAISE OKL_API.G_EXCEPTION_ERROR;
14728: END IF;
14729:
14730: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14731: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax.',
14743: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax.',
14744: 'Return Status' || x_return_status);
14745: END IF;
14746:
14747: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14748: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14749: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14750: RAISE OKL_API.G_EXCEPTION_ERROR;
14751: END IF;
14744: 'Return Status' || x_return_status);
14745: END IF;
14746:
14747: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14748: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14749: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14750: RAISE OKL_API.G_EXCEPTION_ERROR;
14751: END IF;
14752:
14745: END IF;
14746:
14747: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14748: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14749: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14750: RAISE OKL_API.G_EXCEPTION_ERROR;
14751: END IF;
14752:
14753: END IF;
14746:
14747: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14748: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14749: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14750: RAISE OKL_API.G_EXCEPTION_ERROR;
14751: END IF;
14752:
14753: END IF;
14754:
14755: IF (G_DEBUG_LEVEL_PROCEDURE >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14756: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax ','End(-)');
14757: END IF;
14758: EXCEPTION
14759: WHEN OKL_API.G_EXCEPTION_ERROR THEN
14760: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14761: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax ',
14762: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
14763: END IF;
14758: EXCEPTION
14759: WHEN OKL_API.G_EXCEPTION_ERROR THEN
14760: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14761: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax ',
14762: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
14763: END IF;
14764:
14765: IF l_trxcontracts_csr%ISOPEN THEN
14766: CLOSE l_trxcontracts_csr;
14793: IF l_formulae_csr%ISOPEN THEN
14794: CLOSE l_formulae_csr;
14795: END IF;
14796:
14797: x_return_status := OKL_API.G_RET_STS_ERROR;
14798: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
14799: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14800: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax ',
14801: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
14794: CLOSE l_formulae_csr;
14795: END IF;
14796:
14797: x_return_status := OKL_API.G_RET_STS_ERROR;
14798: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
14799: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14800: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax ',
14801: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
14802: END IF;
14797: x_return_status := OKL_API.G_RET_STS_ERROR;
14798: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
14799: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14800: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax ',
14801: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
14802: END IF;
14803:
14804: IF l_trxcontracts_csr%ISOPEN THEN
14805: CLOSE l_trxcontracts_csr;
14832: IF l_formulae_csr%ISOPEN THEN
14833: CLOSE l_formulae_csr;
14834: END IF;
14835:
14836: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
14837:
14838: WHEN OTHERS THEN
14839: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14840: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_booking_upfront_tax ',
14872: IF l_formulae_csr%ISOPEN THEN
14873: CLOSE l_formulae_csr;
14874: END IF;
14875:
14876: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
14877: -- unexpected error
14878: OKL_API.set_message(p_app_name => g_app_name,
14879: p_msg_name => g_unexpected_error,
14880: p_token1 => g_sqlcode_token,
14874: END IF;
14875:
14876: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
14877: -- unexpected error
14878: OKL_API.set_message(p_app_name => g_app_name,
14879: p_msg_name => g_unexpected_error,
14880: p_token1 => g_sqlcode_token,
14881: p_token1_value => sqlcode,
14882: p_token2 => g_sqlerrm_token,
14951: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_pre_rbk_upfront_tax.',
14952: 'p_tax_call_type :'||p_tax_call_type);
14953: END IF;
14954:
14955: x_return_status := OKL_API.G_RET_STS_SUCCESS;
14956:
14957: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14958: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_pre_rbk_upfront_tax.',
14959: 'Calling process_booking_upfront_tax');
14973: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_pre_rbk_upfront_tax.',
14974: 'Finished process_booking_upfront_tax '|| x_return_status);
14975: END IF;
14976:
14977: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14978: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14979: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14980: RAISE OKL_API.G_EXCEPTION_ERROR;
14981: END IF;
14974: 'Finished process_booking_upfront_tax '|| x_return_status);
14975: END IF;
14976:
14977: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14978: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14979: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14980: RAISE OKL_API.G_EXCEPTION_ERROR;
14981: END IF;
14982:
14975: END IF;
14976:
14977: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14978: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14979: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14980: RAISE OKL_API.G_EXCEPTION_ERROR;
14981: END IF;
14982:
14983: IF (G_DEBUG_LEVEL_PROCEDURE >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14976:
14977: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
14978: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
14979: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
14980: RAISE OKL_API.G_EXCEPTION_ERROR;
14981: END IF;
14982:
14983: IF (G_DEBUG_LEVEL_PROCEDURE >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14984: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.process_pre_rbk_upfront_tax ','End(-)');
14984: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.process_pre_rbk_upfront_tax ','End(-)');
14985: END IF;
14986:
14987: EXCEPTION
14988: WHEN OKL_API.G_EXCEPTION_ERROR THEN
14989: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14990: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_pre_rbk_upfront_tax ',
14991: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
14992: END IF;
14987: EXCEPTION
14988: WHEN OKL_API.G_EXCEPTION_ERROR THEN
14989: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14990: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_pre_rbk_upfront_tax ',
14991: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
14992: END IF;
14993:
14994: x_return_status := OKL_API.G_RET_STS_ERROR;
14995:
14990: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_pre_rbk_upfront_tax ',
14991: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
14992: END IF;
14993:
14994: x_return_status := OKL_API.G_RET_STS_ERROR;
14995:
14996: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
14997: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14998: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_pre_rbk_upfront_tax ',
14992: END IF;
14993:
14994: x_return_status := OKL_API.G_RET_STS_ERROR;
14995:
14996: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
14997: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14998: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_pre_rbk_upfront_tax ',
14999: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
15000: END IF;
14995:
14996: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
14997: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
14998: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_pre_rbk_upfront_tax ',
14999: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
15000: END IF;
15001:
15002: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
15003:
14998: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_pre_rbk_upfront_tax ',
14999: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
15000: END IF;
15001:
15002: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
15003:
15004: WHEN OTHERS THEN
15005: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
15006: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_pre_rbk_upfront_tax ',
15006: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_pre_rbk_upfront_tax ',
15007: 'EXCEPTION :'||sqlerrm);
15008: END IF;
15009:
15010: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
15011: -- unexpected error
15012: OKL_API.set_message(p_app_name => g_app_name,
15013: p_msg_name => g_unexpected_error,
15014: p_token1 => g_sqlcode_token,
15008: END IF;
15009:
15010: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
15011: -- unexpected error
15012: OKL_API.set_message(p_app_name => g_app_name,
15013: p_msg_name => g_unexpected_error,
15014: p_token1 => g_sqlcode_token,
15015: p_token1_value => sqlcode,
15016: p_token2 => g_sqlerrm_token,
15066: --p_source_trx_name ---> 'Rebook'
15067: --p_source_table ---> 'OKL_TRX_CONTRACTS'
15068: --------------------------------------------------
15069:
15070: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
15071:
15072: -- validate source trx id
15073: -- okl_trx_contracts.khr_id has original contract id
15074: -- okl_trx_contracts.khr_id_new has rebook copy contract id
15169: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_rebook_upfront_tax.',
15170: 'p_source_table :'||p_source_table);
15171: END IF;
15172:
15173: x_return_status := OKL_API.G_RET_STS_SUCCESS;
15174:
15175: -- Validate the source trx id
15176: OPEN l_trxcontracts_csr(p_source_trx_id, p_source_trx_name);
15177: 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
15181: OKC_API.set_message( p_app_name => 'OKC',
15182: p_msg_name => G_INVALID_VALUE,
15183: p_token1 => G_COL_NAME_TOKEN,
15184: p_token1_value => 'SOURCE_TRX_ID');
15185: RAISE OKL_API.G_EXCEPTION_ERROR;
15186: END IF;
15187: CLOSE l_trxcontracts_csr;
15188:
15189: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
15344: EXCEPTION
15345: WHEN OTHERS THEN
15346: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
15347: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
15348: OKL_API.set_message(
15349: p_app_name => 'OKL',
15350: p_msg_name => 'OKL_TX_TRX_UPD_ERR',
15351: p_token1 => 'TABLE_NAME',
15352: p_token1_value => 'OKL_TAX_SOURCES',
15354: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
15355: p_token3 => 'ITERATION',
15356: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
15357: END LOOP;
15358: RAISE OKL_API.G_EXCEPTION_ERROR;
15359: END IF;
15360: END;
15361:
15362: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
15378: EXCEPTION
15379: WHEN OTHERS THEN
15380: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
15381: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
15382: OKL_API.set_message(p_app_name => 'OKL',
15383: p_msg_name => 'OKL_TX_TRX_INS_ERR',
15384: p_token1 => 'TABLE_NAME',
15385: p_token1_value => 'OKL_TAX_SOURCES',
15386: p_token2 => 'ERROR_CODE',
15387: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
15388: p_token3 => 'ITERATION',
15389: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
15390: END LOOP;
15391: RAISE OKL_API.G_EXCEPTION_ERROR;
15392: END IF;
15393: END;
15394: -- bulk insert into okl_tax_sources -- end
15395:
15421: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_rebook_upfront_tax.',
15422: 'Return Status' || x_return_status);
15423: END IF;
15424:
15425: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15426: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15427: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15428: RAISE OKL_API.G_EXCEPTION_ERROR;
15429: END IF;
15422: 'Return Status' || x_return_status);
15423: END IF;
15424:
15425: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15426: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15427: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15428: RAISE OKL_API.G_EXCEPTION_ERROR;
15429: END IF;
15430:
15423: END IF;
15424:
15425: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15426: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15427: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15428: RAISE OKL_API.G_EXCEPTION_ERROR;
15429: END IF;
15430:
15431: -- Get the total tax amount corresponding to 'Reverse' transaction initiated
15424:
15425: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15426: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15427: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15428: RAISE OKL_API.G_EXCEPTION_ERROR;
15429: END IF;
15430:
15431: -- Get the total tax amount corresponding to 'Reverse' transaction initiated
15432: -- for the 'Rebook' transaction and update total_tax in okl_tax_sources
15447: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_rebook_upfront_tax.',
15448: 'Return Status' || x_return_status);
15449: END IF;
15450:
15451: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15452: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15453: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15454: RAISE OKL_API.G_EXCEPTION_ERROR;
15455: END IF;
15448: 'Return Status' || x_return_status);
15449: END IF;
15450:
15451: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15452: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15453: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15454: RAISE OKL_API.G_EXCEPTION_ERROR;
15455: END IF;
15456:
15449: END IF;
15450:
15451: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15452: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15453: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15454: RAISE OKL_API.G_EXCEPTION_ERROR;
15455: END IF;
15456:
15457: END IF; -- Perform reversal only if the booking tax exists
15450:
15451: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15452: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15453: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15454: RAISE OKL_API.G_EXCEPTION_ERROR;
15455: END IF;
15456:
15457: END IF; -- Perform reversal only if the booking tax exists
15458:
15478: OKC_API.set_message( p_app_name => 'OKC',
15479: p_msg_name => G_INVALID_VALUE,
15480: p_token1 => G_COL_NAME_TOKEN,
15481: p_token1_value => 'SOURCE_TRX_ID');
15482: RAISE OKL_API.G_EXCEPTION_ERROR;
15483: END IF;
15484: CLOSE l_orig_kle_id;
15485:
15486: IF (l_sync_kle_id IS NOT NULL) THEN
15495: OKC_API.set_message( p_app_name => 'OKC',
15496: p_msg_name => G_INVALID_VALUE,
15497: p_token1 => G_COL_NAME_TOKEN,
15498: p_token1_value => 'SOURCE_TRX_ID');
15499: RAISE OKL_API.G_EXCEPTION_ERROR;
15500: END IF;
15501: CLOSE l_new_line_id;
15502:
15503: l_txsv_tbl(i).kle_id := l_sync_kle_id;
15528: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_rebook_upfront_tax',
15529: 'Return Status' || x_return_status);
15530: END IF;
15531:
15532: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15533: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15534: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15535: RAISE OKL_API.G_EXCEPTION_ERROR;
15536: END IF;
15529: 'Return Status' || x_return_status);
15530: END IF;
15531:
15532: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15533: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15534: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15535: RAISE OKL_API.G_EXCEPTION_ERROR;
15536: END IF;
15537: END IF;
15530: END IF;
15531:
15532: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15533: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15534: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15535: RAISE OKL_API.G_EXCEPTION_ERROR;
15536: END IF;
15537: END IF;
15538: -- End Sync rebook tax sources with original contract info
15531:
15532: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15533: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15534: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15535: RAISE OKL_API.G_EXCEPTION_ERROR;
15536: END IF;
15537: END IF;
15538: -- End Sync rebook tax sources with original contract info
15539:
15559: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_rebook_upfront_tax.',
15560: 'Return Status' || x_return_status);
15561: END IF;
15562:
15563: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15564: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15565: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15566: RAISE OKL_API.G_EXCEPTION_ERROR;
15567: END IF;
15560: 'Return Status' || x_return_status);
15561: END IF;
15562:
15563: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15564: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15565: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15566: RAISE OKL_API.G_EXCEPTION_ERROR;
15567: END IF;
15568:
15561: END IF;
15562:
15563: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15564: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15565: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15566: RAISE OKL_API.G_EXCEPTION_ERROR;
15567: END IF;
15568:
15569: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
15562:
15563: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15564: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15565: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15566: RAISE OKL_API.G_EXCEPTION_ERROR;
15567: END IF;
15568:
15569: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
15570: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_rebook_upfront_tax.',
15582: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_rebook_upfront_tax.',
15583: 'Return Status' || x_return_status);
15584: END IF;
15585:
15586: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15587: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15588: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15589: RAISE OKL_API.G_EXCEPTION_ERROR;
15590: END IF;
15583: 'Return Status' || x_return_status);
15584: END IF;
15585:
15586: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15587: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15588: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15589: RAISE OKL_API.G_EXCEPTION_ERROR;
15590: END IF;
15591:
15584: END IF;
15585:
15586: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15587: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15588: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15589: RAISE OKL_API.G_EXCEPTION_ERROR;
15590: END IF;
15591:
15592: IF (G_DEBUG_LEVEL_PROCEDURE >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
15585:
15586: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
15587: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
15588: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
15589: RAISE OKL_API.G_EXCEPTION_ERROR;
15590: END IF;
15591:
15592: IF (G_DEBUG_LEVEL_PROCEDURE >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
15593: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.process_rebook_upfront_tax ','End(-)');
15593: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.process_rebook_upfront_tax ','End(-)');
15594: END IF;
15595:
15596: EXCEPTION
15597: WHEN OKL_API.G_EXCEPTION_ERROR THEN
15598: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
15599: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_rebook_upfront_tax ',
15600: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
15601: END IF;
15596: EXCEPTION
15597: WHEN OKL_API.G_EXCEPTION_ERROR THEN
15598: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
15599: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_rebook_upfront_tax ',
15600: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
15601: END IF;
15602:
15603: IF l_trxcontracts_csr%ISOPEN THEN
15604: CLOSE l_trxcontracts_csr;
15619: IF l_new_line_id%ISOPEN THEN
15620: CLOSE l_new_line_id;
15621: END IF;
15622:
15623: x_return_status := OKL_API.G_RET_STS_ERROR;
15624:
15625: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
15626: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
15627: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_rebook_upfront_tax ',
15621: END IF;
15622:
15623: x_return_status := OKL_API.G_RET_STS_ERROR;
15624:
15625: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
15626: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
15627: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_rebook_upfront_tax ',
15628: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
15629: END IF;
15624:
15625: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
15626: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
15627: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_rebook_upfront_tax ',
15628: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
15629: END IF;
15630:
15631: IF l_trxcontracts_csr%ISOPEN THEN
15632: CLOSE l_trxcontracts_csr;
15647: IF l_new_line_id%ISOPEN THEN
15648: CLOSE l_new_line_id;
15649: END IF;
15650:
15651: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
15652:
15653: WHEN OTHERS THEN
15654: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
15655: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_rebook_upfront_tax ',
15675: IF l_new_line_id%ISOPEN THEN
15676: CLOSE l_new_line_id;
15677: END IF;
15678:
15679: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
15680: -- unexpected error
15681: OKL_API.set_message(p_app_name => g_app_name,
15682: p_msg_name => g_unexpected_error,
15683: p_token1 => g_sqlcode_token,
15677: END IF;
15678:
15679: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
15680: -- unexpected error
15681: OKL_API.set_message(p_app_name => g_app_name,
15682: p_msg_name => g_unexpected_error,
15683: p_token1 => g_sqlcode_token,
15684: p_token1_value => sqlcode,
15685: p_token2 => g_sqlerrm_token,
15737: -- 'Sales Quote' is not going to store/add try_id in okl_lease_quotes_b,
15738: -- as it will be the same for all the rows
15739: ----------------------------------------------------------------------
15740:
15741: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
15742:
15743: -- Validate source trx id
15744: CURSOR l_leasequotes_csr(cp_trx_id IN NUMBER) IS
15745: SELECT expected_start_date, product_id, interest_disclosed,
16026: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax.',
16027: 'p_source_table :'||p_source_table);
16028: END IF;
16029:
16030: x_return_status := OKL_API.G_RET_STS_SUCCESS;
16031:
16032: -- Validate the source trx id
16033: OPEN l_leasequotes_csr(p_source_trx_id);
16034: FETCH l_leasequotes_csr INTO l_k_start_date, l_sq_fin_prod_id, l_sq_int_disclosed,
16040: OKC_API.set_message( p_app_name => 'OKC',
16041: p_msg_name => G_INVALID_VALUE,
16042: p_token1 => G_COL_NAME_TOKEN,
16043: p_token1_value => 'SOURCE_TRX_ID');
16044: RAISE OKL_API.G_EXCEPTION_ERROR;
16045: END IF;
16046: CLOSE l_leasequotes_csr;
16047:
16048: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
16096: EXCEPTION
16097: WHEN OTHERS THEN
16098: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
16099: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
16100: OKL_API.set_message( p_app_name => 'OKL',
16101: p_msg_name => 'OKL_TX_TRX_DEL_ERR',
16102: p_token1 => 'TABLE_NAME',
16103: p_token1_value => 'OKL_TAX_TRX_DETAILS',
16104: p_token2 => 'ERROR_CODE',
16105: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
16106: p_token3 => 'ITERATION',
16107: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
16108: END LOOP;
16109: RAISE OKL_API.G_EXCEPTION_ERROR;
16110: END IF;
16111: END;
16112:
16113: BEGIN
16116: EXCEPTION
16117: WHEN OTHERS THEN
16118: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
16119: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
16120: OKL_API.set_message( p_app_name => 'OKL',
16121: p_msg_name => 'OKL_TX_TRX_DEL_ERR',
16122: p_token1 => 'TABLE_NAME',
16123: p_token1_value => 'OKL_TAX_SOURCES',
16124: p_token2 => 'ERROR_CODE',
16125: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
16126: p_token3 => 'ITERATION',
16127: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
16128: END LOOP;
16129: RAISE OKL_API.G_EXCEPTION_ERROR;
16130: END IF;
16131: END;
16132:
16133: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
16148: l_taxation_country := get_default_taxation_country(x_return_status => x_return_status,
16149: x_msg_count => x_msg_count,
16150: x_msg_data => x_msg_data,
16151: p_legal_entity_id => l_legal_entity_id);
16152: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16153: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16154: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16155: RAISE OKL_API.G_EXCEPTION_ERROR;
16156: END IF;
16149: x_msg_count => x_msg_count,
16150: x_msg_data => x_msg_data,
16151: p_legal_entity_id => l_legal_entity_id);
16152: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16153: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16154: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16155: RAISE OKL_API.G_EXCEPTION_ERROR;
16156: END IF;
16157:
16150: x_msg_data => x_msg_data,
16151: p_legal_entity_id => l_legal_entity_id);
16152: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16153: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16154: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16155: RAISE OKL_API.G_EXCEPTION_ERROR;
16156: END IF;
16157:
16158: -- Fetch 'Sales Quote' Trx type ID
16151: p_legal_entity_id => l_legal_entity_id);
16152: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16153: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16154: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16155: RAISE OKL_API.G_EXCEPTION_ERROR;
16156: END IF;
16157:
16158: -- Fetch 'Sales Quote' Trx type ID
16159: OPEN l_trxtypes_csr;
16179: OKC_API.set_message( p_app_name => 'OKC',
16180: p_msg_name => G_INVALID_VALUE,
16181: p_token1 => G_COL_NAME_TOKEN,
16182: p_token1_value => 'FMA_ID');
16183: RAISE OKL_API.G_EXCEPTION_ERROR;
16184: END IF;
16185: CLOSE l_formulae_csr;
16186:
16187: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
16198: OKC_API.set_message( p_app_name => 'OKC',
16199: p_msg_name => G_REQUIRED_VALUE,
16200: p_token1 => G_COL_NAME_TOKEN,
16201: p_token1_value => 'CUST_TRX_TYPE_ID');
16202: RAISE OKL_API.G_EXCEPTION_ERROR;
16203: END IF;
16204: CLOSE l_racusttrxtypes_csr;
16205:
16206: -- Fetch parent object values
16214: OKC_API.set_message( p_app_name => 'OKC',
16215: p_msg_name => G_REQUIRED_VALUE,
16216: p_token1 => G_COL_NAME_TOKEN,
16217: p_token1_value => 'CURRENCY_CODE');
16218: RAISE OKL_API.G_EXCEPTION_ERROR;
16219: END IF;
16220: CLOSE l_leaseopp_csr;
16221: ELSIF l_parent_object_code ='LEASEAPP' THEN
16222: OPEN l_leaseapp_csr(p_source_trx_id);
16228: OKC_API.set_message( p_app_name => 'OKC',
16229: p_msg_name => G_REQUIRED_VALUE,
16230: p_token1 => G_COL_NAME_TOKEN,
16231: p_token1_value => 'CURRENCY_CODE');
16232: RAISE OKL_API.G_EXCEPTION_ERROR;
16233: END IF;
16234: CLOSE l_leaseapp_csr;
16235: END IF;
16236:
16253: l_bill_to_party_id, l_bill_to_location_id;
16254: IF l_billtosite_csr%NOTFOUND THEN
16255: OKC_API.set_message( p_app_name => 'OKL',
16256: p_msg_name => 'OKL_TX_NO_SQ_BILL_TO');
16257: RAISE OKL_API.G_EXCEPTION_ERROR;
16258: END IF;
16259: CLOSE l_billtosite_csr ;
16260:
16261: -- Fetch precision, minimum accountable unit
16266: OKC_API.set_message( p_app_name => 'OKC',
16267: p_msg_name => G_INVALID_VALUE,
16268: p_token1 => G_COL_NAME_TOKEN,
16269: p_token1_value => 'CURRENCY_CODE');
16270: RAISE OKL_API.G_EXCEPTION_ERROR;
16271: END IF;
16272: CLOSE l_fndcurrency_csr;
16273:
16274: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
16311: CLOSE l_get_location_id;
16312:
16313: IF l_loc_id IS NULL THEN
16314: -- Install Location id is required
16315: OKL_API.set_message( p_app_name => 'OKC',
16316: p_msg_name => G_REQUIRED_VALUE,
16317: p_token1 => G_COL_NAME_TOKEN,
16318: p_token1_value => 'INSTALL_LOCATION_ID');
16319: RAISE OKL_API.G_EXCEPTION_ERROR;
16315: OKL_API.set_message( p_app_name => 'OKC',
16316: p_msg_name => G_REQUIRED_VALUE,
16317: p_token1 => G_COL_NAME_TOKEN,
16318: p_token1_value => 'INSTALL_LOCATION_ID');
16319: RAISE OKL_API.G_EXCEPTION_ERROR;
16320: END IF;
16321:
16322: IF l_cust_acct_id IS NOT NULL THEN
16323: -- Get the ship to site use id of the asset
16476: p_term_quote_reason_code => null,
16477: px_tax_sources_tbl => lx_tax_sources_tbl,
16478: px_line_params_tbl => lx_line_params_tbl );
16479:
16480: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16481: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16482: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16483: RAISE OKL_API.G_EXCEPTION_ERROR;
16484: END IF;
16477: px_tax_sources_tbl => lx_tax_sources_tbl,
16478: px_line_params_tbl => lx_line_params_tbl );
16479:
16480: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16481: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16482: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16483: RAISE OKL_API.G_EXCEPTION_ERROR;
16484: END IF;
16485:
16478: px_line_params_tbl => lx_line_params_tbl );
16479:
16480: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16481: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16482: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16483: RAISE OKL_API.G_EXCEPTION_ERROR;
16484: END IF;
16485:
16486: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
16479:
16480: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16481: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16482: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16483: RAISE OKL_API.G_EXCEPTION_ERROR;
16484: END IF;
16485:
16486: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
16487: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax.',
16587: p_term_quote_reason_code => null,
16588: px_tax_sources_tbl => lx_tax_sources_tbl,
16589: px_line_params_tbl => lx_line_params_tbl );
16590:
16591: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16592: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16593: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16594: RAISE OKL_API.G_EXCEPTION_ERROR;
16595: END IF;
16588: px_tax_sources_tbl => lx_tax_sources_tbl,
16589: px_line_params_tbl => lx_line_params_tbl );
16590:
16591: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16592: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16593: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16594: RAISE OKL_API.G_EXCEPTION_ERROR;
16595: END IF;
16596: -- asset level call end
16589: px_line_params_tbl => lx_line_params_tbl );
16590:
16591: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16592: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16593: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16594: RAISE OKL_API.G_EXCEPTION_ERROR;
16595: END IF;
16596: -- asset level call end
16597:
16590:
16591: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16592: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16593: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16594: RAISE OKL_API.G_EXCEPTION_ERROR;
16595: END IF;
16596: -- asset level call end
16597:
16598: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
16713: p_term_quote_reason_code => null,
16714: px_tax_sources_tbl => lx_tax_sources_tbl,
16715: px_line_params_tbl => lx_line_params_tbl );
16716:
16717: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16718: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16719: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16720: RAISE OKL_API.G_EXCEPTION_ERROR;
16721: END IF;
16714: px_tax_sources_tbl => lx_tax_sources_tbl,
16715: px_line_params_tbl => lx_line_params_tbl );
16716:
16717: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16718: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16719: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16720: RAISE OKL_API.G_EXCEPTION_ERROR;
16721: END IF;
16722:
16715: px_line_params_tbl => lx_line_params_tbl );
16716:
16717: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16718: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16719: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16720: RAISE OKL_API.G_EXCEPTION_ERROR;
16721: END IF;
16722:
16723: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
16716:
16717: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16718: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16719: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16720: RAISE OKL_API.G_EXCEPTION_ERROR;
16721: END IF;
16722:
16723: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
16724: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax.',
16826: p_term_quote_reason_code => null,
16827: px_tax_sources_tbl => lx_tax_sources_tbl,
16828: px_line_params_tbl => lx_line_params_tbl );
16829:
16830: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16831: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16832: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16833: RAISE OKL_API.G_EXCEPTION_ERROR;
16834: END IF;
16827: px_tax_sources_tbl => lx_tax_sources_tbl,
16828: px_line_params_tbl => lx_line_params_tbl );
16829:
16830: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16831: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16832: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16833: RAISE OKL_API.G_EXCEPTION_ERROR;
16834: END IF;
16835:
16828: px_line_params_tbl => lx_line_params_tbl );
16829:
16830: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16831: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16832: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16833: RAISE OKL_API.G_EXCEPTION_ERROR;
16834: END IF;
16835:
16836: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
16829:
16830: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16831: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16832: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16833: RAISE OKL_API.G_EXCEPTION_ERROR;
16834: END IF;
16835:
16836: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
16837: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax.',
16958: p_term_quote_reason_code => null,
16959: px_tax_sources_tbl => lx_tax_sources_tbl,
16960: px_line_params_tbl => lx_line_params_tbl );
16961:
16962: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16963: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16964: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16965: RAISE OKL_API.G_EXCEPTION_ERROR;
16966: END IF;
16959: px_tax_sources_tbl => lx_tax_sources_tbl,
16960: px_line_params_tbl => lx_line_params_tbl );
16961:
16962: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16963: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16964: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16965: RAISE OKL_API.G_EXCEPTION_ERROR;
16966: END IF;
16967:
16960: px_line_params_tbl => lx_line_params_tbl );
16961:
16962: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16963: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16964: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16965: RAISE OKL_API.G_EXCEPTION_ERROR;
16966: END IF;
16967:
16968: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
16961:
16962: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
16963: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
16964: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
16965: RAISE OKL_API.G_EXCEPTION_ERROR;
16966: END IF;
16967:
16968: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
16969: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax.',
17069: p_term_quote_reason_code => null,
17070: px_tax_sources_tbl => lx_tax_sources_tbl,
17071: px_line_params_tbl => lx_line_params_tbl );
17072:
17073: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17074: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17075: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17076: RAISE OKL_API.G_EXCEPTION_ERROR;
17077: END IF;
17070: px_tax_sources_tbl => lx_tax_sources_tbl,
17071: px_line_params_tbl => lx_line_params_tbl );
17072:
17073: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17074: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17075: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17076: RAISE OKL_API.G_EXCEPTION_ERROR;
17077: END IF;
17078: -- asset level call end
17071: px_line_params_tbl => lx_line_params_tbl );
17072:
17073: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17074: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17075: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17076: RAISE OKL_API.G_EXCEPTION_ERROR;
17077: END IF;
17078: -- asset level call end
17079:
17072:
17073: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17074: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17075: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17076: RAISE OKL_API.G_EXCEPTION_ERROR;
17077: END IF;
17078: -- asset level call end
17079:
17080: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
17105: EXCEPTION
17106: WHEN OTHERS THEN
17107: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
17108: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
17109: OKL_API.set_message( p_app_name => 'OKL',
17110: p_msg_name => 'OKL_TX_TRX_INS_ERR',
17111: p_token1 => 'TABLE_NAME',
17112: p_token1_value => 'OKL_TAX_SOURCES',
17113: p_token2 => 'ERROR_CODE',
17114: p_token2_value => SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE),
17115: p_token3 => 'ITERATION',
17116: p_token3_value => SQL%BULK_EXCEPTIONS(i).ERROR_INDEX);
17117: END LOOP;
17118: RAISE OKL_API.G_EXCEPTION_ERROR;
17119: END IF;
17120: END;
17121:
17122: ---- Insert into okl_tax_sources end -----
17152: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax.',
17153: 'After tax engine call '||x_return_status);
17154: END IF;
17155:
17156: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17157: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17158: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17159: RAISE OKL_API.G_EXCEPTION_ERROR;
17160: END IF;
17153: 'After tax engine call '||x_return_status);
17154: END IF;
17155:
17156: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17157: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17158: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17159: RAISE OKL_API.G_EXCEPTION_ERROR;
17160: END IF;
17161: END IF;
17154: END IF;
17155:
17156: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17157: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17158: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17159: RAISE OKL_API.G_EXCEPTION_ERROR;
17160: END IF;
17161: END IF;
17162:
17155:
17156: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17157: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17158: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17159: RAISE OKL_API.G_EXCEPTION_ERROR;
17160: END IF;
17161: END IF;
17162:
17163: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
17177: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax.',
17178: 'Return Status' || x_return_status);
17179: END IF;
17180:
17181: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17182: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17183: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17184: RAISE OKL_API.G_EXCEPTION_ERROR;
17185: END IF;
17178: 'Return Status' || x_return_status);
17179: END IF;
17180:
17181: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17182: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17183: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17184: RAISE OKL_API.G_EXCEPTION_ERROR;
17185: END IF;
17186:
17179: END IF;
17180:
17181: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17182: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17183: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17184: RAISE OKL_API.G_EXCEPTION_ERROR;
17185: END IF;
17186:
17187: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
17180:
17181: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17182: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17183: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17184: RAISE OKL_API.G_EXCEPTION_ERROR;
17185: END IF;
17186:
17187: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
17188: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax.',
17204: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax.',
17205: 'Return Status' || x_return_status);
17206: END IF;
17207:
17208: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17209: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17210: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17211: RAISE OKL_API.G_EXCEPTION_ERROR;
17212: END IF;
17205: 'Return Status' || x_return_status);
17206: END IF;
17207:
17208: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17209: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17210: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17211: RAISE OKL_API.G_EXCEPTION_ERROR;
17212: END IF;
17213:
17206: END IF;
17207:
17208: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17209: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17210: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17211: RAISE OKL_API.G_EXCEPTION_ERROR;
17212: END IF;
17213:
17214: IF (G_DEBUG_LEVEL_PROCEDURE >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
17207:
17208: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17209: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17210: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17211: RAISE OKL_API.G_EXCEPTION_ERROR;
17212: END IF;
17213:
17214: IF (G_DEBUG_LEVEL_PROCEDURE >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
17215: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax ','End(-)');
17215: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax ','End(-)');
17216: END IF;
17217:
17218: EXCEPTION
17219: WHEN OKL_API.G_EXCEPTION_ERROR THEN
17220: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
17221: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax ',
17222: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
17223: END IF;
17218: EXCEPTION
17219: WHEN OKL_API.G_EXCEPTION_ERROR THEN
17220: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
17221: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax ',
17222: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
17223: END IF;
17224:
17225: IF l_leasequotes_csr%ISOPEN THEN
17226: CLOSE l_leasequotes_csr;
17293: IF l_get_shiptositeid%ISOPEN THEN
17294: CLOSE l_get_shiptositeid;
17295: END IF;
17296:
17297: x_return_status := OKL_API.G_RET_STS_ERROR;
17298:
17299: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
17300: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
17301: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax ',
17295: END IF;
17296:
17297: x_return_status := OKL_API.G_RET_STS_ERROR;
17298:
17299: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
17300: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
17301: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax ',
17302: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
17303: END IF;
17298:
17299: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
17300: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
17301: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax ',
17302: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
17303: END IF;
17304:
17305: IF l_leasequotes_csr%ISOPEN THEN
17306: CLOSE l_leasequotes_csr;
17373: IF l_get_shiptositeid%ISOPEN THEN
17374: CLOSE l_get_shiptositeid;
17375: END IF;
17376:
17377: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
17378:
17379: WHEN OTHERS THEN
17380: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
17381: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_quoting_upfront_tax ',
17453: IF l_get_shiptositeid%ISOPEN THEN
17454: CLOSE l_get_shiptositeid;
17455: END IF;
17456:
17457: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
17458: -- unexpected error
17459: OKL_API.set_message(p_app_name => g_app_name,
17460: p_msg_name => g_unexpected_error,
17461: p_token1 => g_sqlcode_token,
17455: END IF;
17456:
17457: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
17458: -- unexpected error
17459: OKL_API.set_message(p_app_name => g_app_name,
17460: p_msg_name => g_unexpected_error,
17461: p_token1 => g_sqlcode_token,
17462: p_token1_value => sqlcode,
17463: p_token2 => g_sqlerrm_token,
17607: | Local Variable Declarations and initializations |
17608: +-----------------------------------------------------------------------*/
17609: l_api_version CONSTANT NUMBER := 1;
17610: l_api_name CONSTANT VARCHAR2(30) := 'calculate_sales_tax';
17611: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
17612:
17613: l_ou_tax_upfront_yn VARCHAR2(1);
17614: l_ou_tax_invoice_yn VARCHAR2(1);
17615: l_k_tax_schedule_yn VARCHAR2(1);
17648: 'p_request_id :'||p_request_id);
17649: END IF;
17650:
17651: --Check API version, initialize message list and create savepoint.
17652: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
17653: G_PKG_NAME,
17654: p_init_msg_list,
17655: l_api_version,
17656: p_api_version,
17655: l_api_version,
17656: p_api_version,
17657: '_PVT',
17658: x_return_status);
17659: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17660: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17661: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
17662: RAISE OKL_API.G_EXCEPTION_ERROR;
17663: END IF;
17656: p_api_version,
17657: '_PVT',
17658: x_return_status);
17659: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17660: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17661: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
17662: RAISE OKL_API.G_EXCEPTION_ERROR;
17663: END IF;
17664:
17657: '_PVT',
17658: x_return_status);
17659: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17660: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17661: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
17662: RAISE OKL_API.G_EXCEPTION_ERROR;
17663: END IF;
17664:
17665: l_source_table := upper(p_source_table);
17658: x_return_status);
17659: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17660: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17661: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
17662: RAISE OKL_API.G_EXCEPTION_ERROR;
17663: END IF;
17664:
17665: l_source_table := upper(p_source_table);
17666: l_org_id := mo_global.get_current_org_id;
17669: OPEN l_systemparams_csr(cp_org_id => l_org_id);
17670: FETCH l_systemparams_csr INTO l_ou_tax_upfront_yn, l_ou_tax_invoice_yn;
17671: IF l_systemparams_csr%NOTFOUND THEN
17672: -- Tax options are not setup for this operating unit.
17673: OKL_API.set_message( p_app_name => 'OKL',
17674: p_msg_name => 'OKL_TX_NO_TAX_SETUP');
17675: RAISE OKL_API.G_EXCEPTION_ERROR;
17676: END IF;
17677: CLOSE l_systemparams_csr;
17671: IF l_systemparams_csr%NOTFOUND THEN
17672: -- Tax options are not setup for this operating unit.
17673: OKL_API.set_message( p_app_name => 'OKL',
17674: p_msg_name => 'OKL_TX_NO_TAX_SETUP');
17675: RAISE OKL_API.G_EXCEPTION_ERROR;
17676: END IF;
17677: CLOSE l_systemparams_csr;
17678:
17679: IF p_source_trx_name = 'Tax Schedule' THEN
17684:
17685: IF l_k_tax_schedule_yn = 'Y' THEN -- OU allows Tax schedule type of call
17686: process_tax_schedule_tax(
17687: p_api_version => p_api_version,
17688: p_init_msg_list => OKL_API.G_FALSE,
17689: x_return_status => x_return_status,
17690: x_msg_count => x_msg_count,
17691: x_msg_data => x_msg_data,
17692: p_source_trx_id => p_source_trx_id,
17692: p_source_trx_id => p_source_trx_id,
17693: p_source_trx_name => p_source_trx_name,
17694: p_source_table => l_source_table);
17695:
17696: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17697: OKL_API.set_message( p_app_name => 'OKL',
17698: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17699: p_token1 => 'TRX_TYPE',
17700: p_token1_value => p_source_trx_name);
17693: p_source_trx_name => p_source_trx_name,
17694: p_source_table => l_source_table);
17695:
17696: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17697: OKL_API.set_message( p_app_name => 'OKL',
17698: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17699: p_token1 => 'TRX_TYPE',
17700: p_token1_value => p_source_trx_name);
17701:
17698: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17699: p_token1 => 'TRX_TYPE',
17700: p_token1_value => p_source_trx_name);
17701:
17702: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17703: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17704: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17705: RAISE OKL_API.G_EXCEPTION_ERROR;
17706: END IF;
17699: p_token1 => 'TRX_TYPE',
17700: p_token1_value => p_source_trx_name);
17701:
17702: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17703: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17704: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17705: RAISE OKL_API.G_EXCEPTION_ERROR;
17706: END IF;
17707: END IF;
17700: p_token1_value => p_source_trx_name);
17701:
17702: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17703: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17704: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17705: RAISE OKL_API.G_EXCEPTION_ERROR;
17706: END IF;
17707: END IF;
17708: ELSE -- SECHAWLA 12-DEC-05 4690074 : added else section
17701:
17702: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17703: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17704: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17705: RAISE OKL_API.G_EXCEPTION_ERROR;
17706: END IF;
17707: END IF;
17708: ELSE -- SECHAWLA 12-DEC-05 4690074 : added else section
17709: OKL_API.set_message( p_app_name => 'OKL',
17705: RAISE OKL_API.G_EXCEPTION_ERROR;
17706: END IF;
17707: END IF;
17708: ELSE -- SECHAWLA 12-DEC-05 4690074 : added else section
17709: OKL_API.set_message( p_app_name => 'OKL',
17710: p_msg_name => 'OKL_TAX_SCH_FLAG_NOT_SET');
17711: END IF;
17712:
17713: ELSIF p_source_trx_name = 'Estimated Billing' AND l_source_table = 'OKL_TRX_QUOTES_B' THEN -- AM Quote creation
17711: END IF;
17712:
17713: ELSIF p_source_trx_name = 'Estimated Billing' AND l_source_table = 'OKL_TRX_QUOTES_B' THEN -- AM Quote creation
17714: process_quote_tax( p_api_version => p_api_version,
17715: p_init_msg_list => OKL_API.G_FALSE,
17716: x_return_status => x_return_status,
17717: x_msg_count => x_msg_count,
17718: x_msg_data => x_msg_data,
17719: p_source_trx_id => p_source_trx_id,
17719: p_source_trx_id => p_source_trx_id,
17720: p_source_trx_name => p_source_trx_name,
17721: p_source_table => l_source_table);
17722:
17723: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17724: OKL_API.set_message( p_app_name => 'OKL',
17725: p_msg_name => 'OKL_TX_QUOTE_TAX_ERR');
17726: END IF;
17727:
17720: p_source_trx_name => p_source_trx_name,
17721: p_source_table => l_source_table);
17722:
17723: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17724: OKL_API.set_message( p_app_name => 'OKL',
17725: p_msg_name => 'OKL_TX_QUOTE_TAX_ERR');
17726: END IF;
17727:
17728: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17724: OKL_API.set_message( p_app_name => 'OKL',
17725: p_msg_name => 'OKL_TX_QUOTE_TAX_ERR');
17726: END IF;
17727:
17728: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17729: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17730: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17731: RAISE OKL_API.G_EXCEPTION_ERROR;
17732: END IF;
17725: p_msg_name => 'OKL_TX_QUOTE_TAX_ERR');
17726: END IF;
17727:
17728: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17729: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17730: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17731: RAISE OKL_API.G_EXCEPTION_ERROR;
17732: END IF;
17733:
17726: END IF;
17727:
17728: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17729: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17730: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17731: RAISE OKL_API.G_EXCEPTION_ERROR;
17732: END IF;
17733:
17734: ELSIF (p_source_trx_name = 'Asset Relocation') THEN
17727:
17728: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17729: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17730: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17731: RAISE OKL_API.G_EXCEPTION_ERROR;
17732: END IF;
17733:
17734: ELSIF (p_source_trx_name = 'Asset Relocation') THEN
17735:
17747: OKC_API.set_message( p_app_name => 'OKC',
17748: p_msg_name => G_REQUIRED_VALUE,
17749: p_token1 => G_COL_NAME_TOKEN,
17750: p_token1_value => 'Tax Call Type');
17751: RAISE OKL_API.G_EXCEPTION_ERROR;
17752: ELSE
17753: l_tax_call_type := upper(p_tax_call_type);
17754: IF l_tax_call_type NOT IN (G_ESTIMATED_CALL_TYPE, G_ACTUAL_CALL_TYPE) THEN
17755: OKC_API.set_message( p_app_name => 'OKC',
17755: OKC_API.set_message( p_app_name => 'OKC',
17756: p_msg_name => G_INVALID_VALUE,
17757: p_token1 => G_COL_NAME_TOKEN,
17758: p_token1_value => 'Tax Call Type');
17759: RAISE OKL_API.G_EXCEPTION_ERROR;
17760: END IF;
17761: END IF;
17762:
17763: process_asset_loc_tax(p_api_version => p_api_version,
17760: END IF;
17761: END IF;
17762:
17763: process_asset_loc_tax(p_api_version => p_api_version,
17764: p_init_msg_list => OKL_API.G_FALSE,
17765: x_return_status => x_return_status,
17766: x_msg_count => x_msg_count,
17767: x_msg_data => x_msg_data,
17768: p_source_trx_id => p_source_trx_id,
17772: p_serialized_asset => p_serialized_asset,
17773: p_request_id => p_request_id,
17774: p_alc_final_call => p_alc_final_call);
17775:
17776: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17777: OKL_API.set_message( p_app_name => 'OKL',
17778: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17779: p_token1 => 'TRX_TYPE',
17780: p_token1_value => p_source_trx_name);
17773: p_request_id => p_request_id,
17774: p_alc_final_call => p_alc_final_call);
17775:
17776: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17777: OKL_API.set_message( p_app_name => 'OKL',
17778: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17779: p_token1 => 'TRX_TYPE',
17780: p_token1_value => p_source_trx_name);
17781:
17778: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17779: p_token1 => 'TRX_TYPE',
17780: p_token1_value => p_source_trx_name);
17781:
17782: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17783: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17784: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17785: RAISE OKL_API.G_EXCEPTION_ERROR;
17786: END IF;
17779: p_token1 => 'TRX_TYPE',
17780: p_token1_value => p_source_trx_name);
17781:
17782: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17783: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17784: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17785: RAISE OKL_API.G_EXCEPTION_ERROR;
17786: END IF;
17787: END IF;
17780: p_token1_value => p_source_trx_name);
17781:
17782: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17783: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17784: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17785: RAISE OKL_API.G_EXCEPTION_ERROR;
17786: END IF;
17787: END IF;
17788:
17781:
17782: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17783: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17784: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17785: RAISE OKL_API.G_EXCEPTION_ERROR;
17786: END IF;
17787: END IF;
17788:
17789: -- ER# 9327076
17787: END IF;
17788:
17789: -- ER# 9327076
17790: -- ELSE -- SECHAWLA 12-DEC-05 4690074 : added else section
17791: -- OKL_API.set_message( p_app_name => 'OKL',
17792: -- p_msg_name => 'OKL_TX_OU_NO_TAX',
17793: -- p_token1 => 'TAX_CALL_TYPE',
17794: -- p_token1_value => 'Upfront Tax');
17795: END IF;
17794: -- p_token1_value => 'Upfront Tax');
17795: END IF;
17796: ELSIF p_source_trx_name = 'Split Asset' THEN
17797: process_split_asset_tax(p_api_version => p_api_version,
17798: p_init_msg_list => OKL_API.G_FALSE,
17799: x_return_status => x_return_status,
17800: x_msg_count => x_msg_count,
17801: x_msg_data => x_msg_data,
17802: p_source_trx_id => p_source_trx_id,
17802: p_source_trx_id => p_source_trx_id,
17803: p_source_trx_name => p_source_trx_name,
17804: p_source_table => l_source_table);
17805:
17806: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17807: OKL_API.set_message( p_app_name => 'OKL',
17808: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17809: p_token1 => 'TRX_TYPE',
17810: p_token1_value => p_source_trx_name);
17803: p_source_trx_name => p_source_trx_name,
17804: p_source_table => l_source_table);
17805:
17806: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17807: OKL_API.set_message( p_app_name => 'OKL',
17808: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17809: p_token1 => 'TRX_TYPE',
17810: p_token1_value => p_source_trx_name);
17811:
17808: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17809: p_token1 => 'TRX_TYPE',
17810: p_token1_value => p_source_trx_name);
17811:
17812: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17813: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17814: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17815: RAISE OKL_API.G_EXCEPTION_ERROR;
17816: END IF;
17809: p_token1 => 'TRX_TYPE',
17810: p_token1_value => p_source_trx_name);
17811:
17812: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17813: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17814: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17815: RAISE OKL_API.G_EXCEPTION_ERROR;
17816: END IF;
17817: END IF;
17810: p_token1_value => p_source_trx_name);
17811:
17812: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17813: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17814: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17815: RAISE OKL_API.G_EXCEPTION_ERROR;
17816: END IF;
17817: END IF;
17818:
17811:
17812: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17813: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17814: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17815: RAISE OKL_API.G_EXCEPTION_ERROR;
17816: END IF;
17817: END IF;
17818:
17819: ELSIF ( p_source_trx_name = 'Booking') THEN
17822: OKC_API.set_message( p_app_name => 'OKC',
17823: p_msg_name => G_REQUIRED_VALUE,
17824: p_token1 => G_COL_NAME_TOKEN,
17825: p_token1_value => 'Tax Call Type');
17826: RAISE OKL_API.G_EXCEPTION_ERROR;
17827: ELSE
17828: l_tax_call_type := upper(p_tax_call_type);
17829: IF l_tax_call_type NOT IN (G_ESTIMATED_CALL_TYPE, G_ACTUAL_CALL_TYPE) THEN
17830: OKC_API.set_message( p_app_name => 'OKC',
17830: OKC_API.set_message( p_app_name => 'OKC',
17831: p_msg_name => G_INVALID_VALUE,
17832: p_token1 => G_COL_NAME_TOKEN,
17833: p_token1_value => 'Tax Call Type');
17834: RAISE OKL_API.G_EXCEPTION_ERROR;
17835: END IF;
17836: END IF;
17837:
17838: process_booking_upfront_tax(
17836: END IF;
17837:
17838: process_booking_upfront_tax(
17839: p_api_version => p_api_version,
17840: p_init_msg_list => OKL_API.G_FALSE,
17841: x_return_status => x_return_status,
17842: x_msg_count => x_msg_count,
17843: x_msg_data => x_msg_data,
17844: p_source_trx_id => p_source_trx_id,
17845: p_source_trx_name => p_source_trx_name,
17846: p_source_table => l_source_table,
17847: p_tax_call_type => p_tax_call_type);
17848:
17849: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17850: OKL_API.set_message(p_app_name => 'OKL',
17851: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17852: p_token1 => 'TRX_TYPE',
17853: p_token1_value => p_source_trx_name);
17846: p_source_table => l_source_table,
17847: p_tax_call_type => p_tax_call_type);
17848:
17849: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17850: OKL_API.set_message(p_app_name => 'OKL',
17851: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17852: p_token1 => 'TRX_TYPE',
17853: p_token1_value => p_source_trx_name);
17854:
17851: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17852: p_token1 => 'TRX_TYPE',
17853: p_token1_value => p_source_trx_name);
17854:
17855: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17856: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17857: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17858: RAISE OKL_API.G_EXCEPTION_ERROR;
17859: END IF;
17852: p_token1 => 'TRX_TYPE',
17853: p_token1_value => p_source_trx_name);
17854:
17855: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17856: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17857: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17858: RAISE OKL_API.G_EXCEPTION_ERROR;
17859: END IF;
17860: END IF;
17853: p_token1_value => p_source_trx_name);
17854:
17855: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17856: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17857: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17858: RAISE OKL_API.G_EXCEPTION_ERROR;
17859: END IF;
17860: END IF;
17861:
17854:
17855: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17856: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17857: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17858: RAISE OKL_API.G_EXCEPTION_ERROR;
17859: END IF;
17860: END IF;
17861:
17862: ELSE -- SECHAWLA 12-DEC-05 4690074 : added else section
17859: END IF;
17860: END IF;
17861:
17862: ELSE -- SECHAWLA 12-DEC-05 4690074 : added else section
17863: OKL_API.set_message( p_app_name => 'OKL',
17864: p_msg_name => 'OKL_TX_OU_NO_TAX',
17865: p_token1 => 'TAX_CALL_TYPE',
17866: p_token1_value => 'Upfront Tax');
17867: END IF;
17891:
17892:
17893: process_pre_rbk_upfront_tax(
17894: p_api_version => p_api_version,
17895: p_init_msg_list => OKL_API.G_FALSE,
17896: x_return_status => x_return_status,
17897: x_msg_count => x_msg_count,
17898: x_msg_data => x_msg_data,
17899: p_source_trx_id => p_source_trx_id,
17900: p_source_trx_name => p_source_trx_name,
17901: p_source_table => l_source_table,
17902: p_tax_call_type => p_tax_call_type);
17903:
17904: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17905: OKL_API.set_message( p_app_name => 'OKL',
17906: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17907: p_token1 => 'TRX_TYPE',
17908: p_token1_value => p_source_trx_name);
17901: p_source_table => l_source_table,
17902: p_tax_call_type => p_tax_call_type);
17903:
17904: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17905: OKL_API.set_message( p_app_name => 'OKL',
17906: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17907: p_token1 => 'TRX_TYPE',
17908: p_token1_value => p_source_trx_name);
17909:
17906: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17907: p_token1 => 'TRX_TYPE',
17908: p_token1_value => p_source_trx_name);
17909:
17910: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17911: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17912: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17913: RAISE OKL_API.G_EXCEPTION_ERROR;
17914: END IF;
17907: p_token1 => 'TRX_TYPE',
17908: p_token1_value => p_source_trx_name);
17909:
17910: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17911: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17912: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17913: RAISE OKL_API.G_EXCEPTION_ERROR;
17914: END IF;
17915: END IF;
17908: p_token1_value => p_source_trx_name);
17909:
17910: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17911: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17912: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17913: RAISE OKL_API.G_EXCEPTION_ERROR;
17914: END IF;
17915: END IF;
17916: --ELSE -- SECHAWLA 12-DEC-05 4690074 : added else section
17909:
17910: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17911: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17912: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17913: RAISE OKL_API.G_EXCEPTION_ERROR;
17914: END IF;
17915: END IF;
17916: --ELSE -- SECHAWLA 12-DEC-05 4690074 : added else section
17917: -- OKL_API.set_message( p_app_name => 'OKL',
17913: RAISE OKL_API.G_EXCEPTION_ERROR;
17914: END IF;
17915: END IF;
17916: --ELSE -- SECHAWLA 12-DEC-05 4690074 : added else section
17917: -- OKL_API.set_message( p_app_name => 'OKL',
17918: -- p_msg_name => 'OKL_TX_OU_NO_TAX',
17919: -- p_token1 => 'TAX_CALL_TYPE',
17920: -- p_token1_value => 'Upfront Tax');
17921: END IF;
17941: OR OKL_LA_SALES_TAX_PVT.check_prior_upfront_tax(l_rbk_chr_id)) THEN -- 16522428 15-03-13 - additional condition
17942:
17943: process_rebook_upfront_tax(
17944: p_api_version => p_api_version,
17945: p_init_msg_list => OKL_API.G_FALSE,
17946: x_return_status => x_return_status,
17947: x_msg_count => x_msg_count,
17948: x_msg_data => x_msg_data,
17949: p_source_trx_id => p_source_trx_id,
17949: p_source_trx_id => p_source_trx_id,
17950: p_source_trx_name => p_source_trx_name,
17951: p_source_table => l_source_table);
17952:
17953: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17954: OKL_API.set_message( p_app_name => 'OKL',
17955: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17956: p_token1 => 'TRX_TYPE',
17957: p_token1_value => p_source_trx_name);
17950: p_source_trx_name => p_source_trx_name,
17951: p_source_table => l_source_table);
17952:
17953: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17954: OKL_API.set_message( p_app_name => 'OKL',
17955: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17956: p_token1 => 'TRX_TYPE',
17957: p_token1_value => p_source_trx_name);
17958:
17955: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17956: p_token1 => 'TRX_TYPE',
17957: p_token1_value => p_source_trx_name);
17958:
17959: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17960: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17961: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17962: RAISE OKL_API.G_EXCEPTION_ERROR;
17963: END IF;
17956: p_token1 => 'TRX_TYPE',
17957: p_token1_value => p_source_trx_name);
17958:
17959: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17960: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17961: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17962: RAISE OKL_API.G_EXCEPTION_ERROR;
17963: END IF;
17964: END IF;
17957: p_token1_value => p_source_trx_name);
17958:
17959: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17960: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17961: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17962: RAISE OKL_API.G_EXCEPTION_ERROR;
17963: END IF;
17964: END IF;
17965:
17958:
17959: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17960: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17961: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17962: RAISE OKL_API.G_EXCEPTION_ERROR;
17963: END IF;
17964: END IF;
17965:
17966: --ELSE -- SECHAWLA 12-DEC-05 4690074 : added else section
17963: END IF;
17964: END IF;
17965:
17966: --ELSE -- SECHAWLA 12-DEC-05 4690074 : added else section
17967: -- OKL_API.set_message( p_app_name => 'OKL',
17968: -- p_msg_name => 'OKL_TX_OU_NO_TAX',
17969: -- p_token1 => 'TAX_CALL_TYPE',
17970: -- p_token1_value => 'Upfront Tax');
17971: END IF;
17973: ELSIF p_source_trx_name = 'Reverse' THEN
17974: -- No need to check "tax_upfront_yn" flag in case of contract reversal
17975: process_contract_reversal_tax(
17976: p_api_version => p_api_version,
17977: p_init_msg_list => OKL_API.G_FALSE,
17978: x_return_status => x_return_status,
17979: x_msg_count => x_msg_count,
17980: x_msg_data => x_msg_data,
17981: p_source_trx_id => p_source_trx_id,
17981: p_source_trx_id => p_source_trx_id,
17982: p_source_trx_name => p_source_trx_name,
17983: p_source_table => l_source_table);
17984:
17985: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17986: OKL_API.set_message( p_app_name => 'OKL',
17987: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17988: p_token1 => 'TRX_TYPE',
17989: p_token1_value => p_source_trx_name);
17982: p_source_trx_name => p_source_trx_name,
17983: p_source_table => l_source_table);
17984:
17985: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
17986: OKL_API.set_message( p_app_name => 'OKL',
17987: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17988: p_token1 => 'TRX_TYPE',
17989: p_token1_value => p_source_trx_name);
17990:
17987: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
17988: p_token1 => 'TRX_TYPE',
17989: p_token1_value => p_source_trx_name);
17990:
17991: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17992: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17993: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17994: RAISE OKL_API.G_EXCEPTION_ERROR;
17995: END IF;
17988: p_token1 => 'TRX_TYPE',
17989: p_token1_value => p_source_trx_name);
17990:
17991: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17992: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17993: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17994: RAISE OKL_API.G_EXCEPTION_ERROR;
17995: END IF;
17996: END IF;
17989: p_token1_value => p_source_trx_name);
17990:
17991: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17992: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17993: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17994: RAISE OKL_API.G_EXCEPTION_ERROR;
17995: END IF;
17996: END IF;
17997:
17990:
17991: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
17992: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
17993: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
17994: RAISE OKL_API.G_EXCEPTION_ERROR;
17995: END IF;
17996: END IF;
17997:
17998: ELSIF p_source_trx_name = 'Sales Quote' THEN
17998: ELSIF p_source_trx_name = 'Sales Quote' THEN
17999: IF l_ou_tax_upfront_yn = 'Y' THEN -- OU allows upfront type of call
18000: process_quoting_upfront_tax(
18001: p_api_version => p_api_version,
18002: p_init_msg_list => OKL_API.G_FALSE,
18003: x_return_status => x_return_status,
18004: x_msg_count => x_msg_count,
18005: x_msg_data => x_msg_data,
18006: p_source_trx_id => p_source_trx_id,
18006: p_source_trx_id => p_source_trx_id,
18007: p_source_trx_name => p_source_trx_name,
18008: p_source_table => l_source_table);
18009:
18010: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
18011: OKL_API.set_message( p_app_name => 'OKL',
18012: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
18013: p_token1 => 'TRX_TYPE',
18014: p_token1_value => p_source_trx_name);
18007: p_source_trx_name => p_source_trx_name,
18008: p_source_table => l_source_table);
18009:
18010: IF x_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
18011: OKL_API.set_message( p_app_name => 'OKL',
18012: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
18013: p_token1 => 'TRX_TYPE',
18014: p_token1_value => p_source_trx_name);
18015:
18012: p_msg_name => 'OKL_TX_INTERFACE_ERROR',
18013: p_token1 => 'TRX_TYPE',
18014: p_token1_value => p_source_trx_name);
18015:
18016: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18017: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18018: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
18019: RAISE OKL_API.G_EXCEPTION_ERROR;
18020: END IF;
18013: p_token1 => 'TRX_TYPE',
18014: p_token1_value => p_source_trx_name);
18015:
18016: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18017: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18018: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
18019: RAISE OKL_API.G_EXCEPTION_ERROR;
18020: END IF;
18021: END IF;
18014: p_token1_value => p_source_trx_name);
18015:
18016: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18017: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18018: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
18019: RAISE OKL_API.G_EXCEPTION_ERROR;
18020: END IF;
18021: END IF;
18022: ELSE -- SECHAWLA 12-DEC-05 4690074 : added else section
18015:
18016: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18017: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18018: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
18019: RAISE OKL_API.G_EXCEPTION_ERROR;
18020: END IF;
18021: END IF;
18022: ELSE -- SECHAWLA 12-DEC-05 4690074 : added else section
18023: OKL_API.set_message( p_app_name => 'OKL',
18019: RAISE OKL_API.G_EXCEPTION_ERROR;
18020: END IF;
18021: END IF;
18022: ELSE -- SECHAWLA 12-DEC-05 4690074 : added else section
18023: OKL_API.set_message( p_app_name => 'OKL',
18024: p_msg_name => 'OKL_TX_OU_NO_TAX',
18025: p_token1 => 'TAX_CALL_TYPE',
18026: p_token1_value => 'Upfront Tax');
18027: END IF;
18030: OKC_API.set_message( p_app_name => 'OKC',
18031: p_msg_name => G_INVALID_VALUE,
18032: p_token1 => G_COL_NAME_TOKEN,
18033: p_token1_value => 'Transaction Type');
18034: RAISE OKL_API.G_EXCEPTION_ERROR;
18035: END IF;
18036:
18037: x_return_status := l_return_status; -- added for 12.0 since the above code that sets
18038: -- x_return_status is commented
18040: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.calculate_sales_tax ','End(-)');
18041: END IF;
18042:
18043: -- End the transaction
18044: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
18045:
18046: EXCEPTION
18047: WHEN OKL_API.G_EXCEPTION_ERROR THEN
18048:
18043: -- End the transaction
18044: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
18045:
18046: EXCEPTION
18047: WHEN OKL_API.G_EXCEPTION_ERROR THEN
18048:
18049: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
18050: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.calculate_sales_tax ',
18051: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
18047: WHEN OKL_API.G_EXCEPTION_ERROR THEN
18048:
18049: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
18050: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.calculate_sales_tax ',
18051: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
18052: END IF;
18053:
18054: IF l_systemparams_csr%ISOPEN THEN
18055: CLOSE l_systemparams_csr;
18058: IF l_tax_schedule_csr%ISOPEN THEN
18059: CLOSE l_tax_schedule_csr;
18060: END IF;
18061:
18062: x_return_status := OKL_API.HANDLE_EXCEPTIONS
18063: (
18064: l_api_name,
18065: G_PKG_NAME,
18066: 'OKL_API.G_RET_STS_ERROR',
18062: x_return_status := OKL_API.HANDLE_EXCEPTIONS
18063: (
18064: l_api_name,
18065: G_PKG_NAME,
18066: 'OKL_API.G_RET_STS_ERROR',
18067: x_msg_count,
18068: x_msg_data,
18069: '_PVT'
18070: );
18067: x_msg_count,
18068: x_msg_data,
18069: '_PVT'
18070: );
18071: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
18072: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
18073: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.calculate_sales_tax ',
18074: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
18075: END IF;
18070: );
18071: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
18072: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
18073: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.calculate_sales_tax ',
18074: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
18075: END IF;
18076:
18077: IF l_systemparams_csr%ISOPEN THEN
18078: CLOSE l_systemparams_csr;
18081: IF l_tax_schedule_csr%ISOPEN THEN
18082: CLOSE l_tax_schedule_csr;
18083: END IF;
18084:
18085: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
18086: (
18087: l_api_name,
18088: G_PKG_NAME,
18089: 'OKL_API.G_RET_STS_UNEXP_ERROR',
18085: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
18086: (
18087: l_api_name,
18088: G_PKG_NAME,
18089: 'OKL_API.G_RET_STS_UNEXP_ERROR',
18090: x_msg_count,
18091: x_msg_data,
18092: '_PVT'
18093: );
18105: IF l_tax_schedule_csr%ISOPEN THEN
18106: CLOSE l_tax_schedule_csr;
18107: END IF;
18108:
18109: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
18110: (
18111: l_api_name,
18112: G_PKG_NAME,
18113: 'OTHERS',
18121: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.calculate_sales_tax ','End(-)');
18122: END IF;
18123:
18124: -- end the transaction
18125: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
18126:
18127: END calculate_sales_tax;
18128:
18129: /*========================================================================
18155: | 24-JAN-07 RRAVIKIR Created
18156: *=======================================================================*/
18157: PROCEDURE set_tax_security_context(
18158: p_api_version IN NUMBER,
18159: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
18160: x_return_status OUT NOCOPY VARCHAR2,
18161: x_msg_count OUT NOCOPY NUMBER,
18162: x_msg_data OUT NOCOPY VARCHAR2,
18163: p_internal_org_id IN NUMBER,
18165: p_transaction_date IN DATE) IS
18166:
18167: l_api_version CONSTANT NUMBER := 1;
18168: l_api_name CONSTANT VARCHAR2(30) := 'set_tax_security_context';
18169: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
18170:
18171: x_effective_date DATE;
18172:
18173: BEGIN
18188: 'p_transaction_date :'||p_transaction_date);
18189: END IF;
18190:
18191: --Check API version, initialize message list and create savepoint.
18192: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
18193: G_PKG_NAME,
18194: p_init_msg_list,
18195: l_api_version,
18196: p_api_version,
18196: p_api_version,
18197: '_PVT',
18198: x_return_status);
18199:
18200: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18201: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18202: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18203: RAISE OKL_API.G_EXCEPTION_ERROR;
18204: END IF;
18197: '_PVT',
18198: x_return_status);
18199:
18200: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18201: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18202: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18203: RAISE OKL_API.G_EXCEPTION_ERROR;
18204: END IF;
18205:
18198: x_return_status);
18199:
18200: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18201: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18202: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18203: RAISE OKL_API.G_EXCEPTION_ERROR;
18204: END IF;
18205:
18206: -- Required Values
18199:
18200: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18201: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18202: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18203: RAISE OKL_API.G_EXCEPTION_ERROR;
18204: END IF;
18205:
18206: -- Required Values
18207: IF p_internal_org_id IS NULL THEN
18204: END IF;
18205:
18206: -- Required Values
18207: IF p_internal_org_id IS NULL THEN
18208: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18209: p_token1 => G_COL_NAME_TOKEN,
18210: p_token1_value => 'INTERNAL_ORG_ID');
18211: RAISE OKL_API.G_EXCEPTION_ERROR;
18212: END IF;
18207: IF p_internal_org_id IS NULL THEN
18208: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18209: p_token1 => G_COL_NAME_TOKEN,
18210: p_token1_value => 'INTERNAL_ORG_ID');
18211: RAISE OKL_API.G_EXCEPTION_ERROR;
18212: END IF;
18213:
18214: IF p_legal_entity_id IS NULL THEN
18215: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18211: RAISE OKL_API.G_EXCEPTION_ERROR;
18212: END IF;
18213:
18214: IF p_legal_entity_id IS NULL THEN
18215: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18216: p_token1 => G_COL_NAME_TOKEN,
18217: p_token1_value => 'LEGAL_ENTITY_ID');
18218: RAISE OKL_API.G_EXCEPTION_ERROR;
18219: END IF;
18214: IF p_legal_entity_id IS NULL THEN
18215: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18216: p_token1 => G_COL_NAME_TOKEN,
18217: p_token1_value => 'LEGAL_ENTITY_ID');
18218: RAISE OKL_API.G_EXCEPTION_ERROR;
18219: END IF;
18220:
18221: IF p_transaction_date IS NULL THEN
18222: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18218: RAISE OKL_API.G_EXCEPTION_ERROR;
18219: END IF;
18220:
18221: IF p_transaction_date IS NULL THEN
18222: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18223: p_token1 => G_COL_NAME_TOKEN,
18224: p_token1_value => 'TRANSACTION_DATE');
18225: RAISE OKL_API.G_EXCEPTION_ERROR;
18226: END IF;
18221: IF p_transaction_date IS NULL THEN
18222: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18223: p_token1 => G_COL_NAME_TOKEN,
18224: p_token1_value => 'TRANSACTION_DATE');
18225: RAISE OKL_API.G_EXCEPTION_ERROR;
18226: END IF;
18227:
18228: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
18229: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.set_tax_security_context.',
18244: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.set_tax_security_context.',
18245: 'Return Status' || l_return_status);
18246: END IF;
18247:
18248: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18249: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18250: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18251: RAISE OKL_API.G_EXCEPTION_ERROR;
18252: END IF;
18245: 'Return Status' || l_return_status);
18246: END IF;
18247:
18248: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18249: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18250: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18251: RAISE OKL_API.G_EXCEPTION_ERROR;
18252: END IF;
18253:
18246: END IF;
18247:
18248: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18249: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18250: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18251: RAISE OKL_API.G_EXCEPTION_ERROR;
18252: END IF;
18253:
18254: x_return_status := l_return_status;
18247:
18248: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18249: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18250: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18251: RAISE OKL_API.G_EXCEPTION_ERROR;
18252: END IF;
18253:
18254: x_return_status := l_return_status;
18255:
18257: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.set_tax_security_context ','End(-)');
18258: END IF;
18259:
18260: -- end the transaction
18261: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
18262:
18263:
18264: EXCEPTION
18265: WHEN OKL_API.G_EXCEPTION_ERROR THEN
18261: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
18262:
18263:
18264: EXCEPTION
18265: WHEN OKL_API.G_EXCEPTION_ERROR THEN
18266:
18267: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
18268: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.set_tax_security_context ',
18269: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
18265: WHEN OKL_API.G_EXCEPTION_ERROR THEN
18266:
18267: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
18268: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.set_tax_security_context ',
18269: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
18270: END IF;
18271:
18272: x_return_status := OKL_API.HANDLE_EXCEPTIONS
18273: (
18268: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.set_tax_security_context ',
18269: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
18270: END IF;
18271:
18272: x_return_status := OKL_API.HANDLE_EXCEPTIONS
18273: (
18274: l_api_name,
18275: G_PKG_NAME,
18276: 'OKL_API.G_RET_STS_ERROR',
18272: x_return_status := OKL_API.HANDLE_EXCEPTIONS
18273: (
18274: l_api_name,
18275: G_PKG_NAME,
18276: 'OKL_API.G_RET_STS_ERROR',
18277: x_msg_count,
18278: x_msg_data,
18279: '_PVT'
18280: );
18277: x_msg_count,
18278: x_msg_data,
18279: '_PVT'
18280: );
18281: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
18282: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
18283: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.set_tax_security_context ',
18284: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
18285: END IF;
18280: );
18281: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
18282: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
18283: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.set_tax_security_context ',
18284: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
18285: END IF;
18286:
18287: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
18288: (
18283: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.set_tax_security_context ',
18284: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
18285: END IF;
18286:
18287: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
18288: (
18289: l_api_name,
18290: G_PKG_NAME,
18291: 'OKL_API.G_RET_STS_UNEXP_ERROR',
18287: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
18288: (
18289: l_api_name,
18290: G_PKG_NAME,
18291: 'OKL_API.G_RET_STS_UNEXP_ERROR',
18292: x_msg_count,
18293: x_msg_data,
18294: '_PVT'
18295: );
18299: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.set_tax_security_context ',
18300: 'EXCEPTION :'||sqlerrm);
18301: END IF;
18302:
18303: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
18304: (
18305: l_api_name,
18306: G_PKG_NAME,
18307: 'OTHERS',
18346: |
18347: *=======================================================================*/
18348: PROCEDURE process_tax_determ_override(
18349: p_api_version IN NUMBER,
18350: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
18351: x_return_status OUT NOCOPY VARCHAR2,
18352: x_msg_count OUT NOCOPY NUMBER,
18353: x_msg_data OUT NOCOPY VARCHAR2,
18354: p_trx_id IN NUMBER,
18362:
18363: -- Local variables
18364: l_api_version CONSTANT NUMBER := 1;
18365: l_api_name CONSTANT VARCHAR2(30) := 'process_tax_determ';
18366: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
18367: lx_doc_level_recalc_flag VARCHAR2(1);
18368: l_total_tax_amount NUMBER;
18369:
18370: -- Local data structure
18423: 'p_line_intended_use :'||p_line_intended_use);
18424: END IF;
18425:
18426: --Check API version, initialize message list and create savepoint.
18427: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
18428: G_PKG_NAME,
18429: p_init_msg_list,
18430: l_api_version,
18431: p_api_version,
18431: p_api_version,
18432: '_PVT',
18433: x_return_status);
18434:
18435: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18436: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18437: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18438: RAISE OKL_API.G_EXCEPTION_ERROR;
18439: END IF;
18432: '_PVT',
18433: x_return_status);
18434:
18435: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18436: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18437: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18438: RAISE OKL_API.G_EXCEPTION_ERROR;
18439: END IF;
18440:
18433: x_return_status);
18434:
18435: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18436: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18437: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18438: RAISE OKL_API.G_EXCEPTION_ERROR;
18439: END IF;
18440:
18441: -- Required Values
18434:
18435: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18436: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18437: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18438: RAISE OKL_API.G_EXCEPTION_ERROR;
18439: END IF;
18440:
18441: -- Required Values
18442: IF p_tax_sources_id IS NULL THEN
18439: END IF;
18440:
18441: -- Required Values
18442: IF p_tax_sources_id IS NULL THEN
18443: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18444: p_token1 => G_COL_NAME_TOKEN,
18445: p_token1_value => 'TAX_SOURCES_ID');
18446: RAISE OKL_API.G_EXCEPTION_ERROR;
18447: END IF;
18442: IF p_tax_sources_id IS NULL THEN
18443: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18444: p_token1 => G_COL_NAME_TOKEN,
18445: p_token1_value => 'TAX_SOURCES_ID');
18446: RAISE OKL_API.G_EXCEPTION_ERROR;
18447: END IF;
18448:
18449: IF p_trx_business_category IS NULL THEN
18450: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18446: RAISE OKL_API.G_EXCEPTION_ERROR;
18447: END IF;
18448:
18449: IF p_trx_business_category IS NULL THEN
18450: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18451: p_token1 => G_COL_NAME_TOKEN,
18452: p_token1_value => 'TRX_BUSINESS_CATEGORY');
18453: RAISE OKL_API.G_EXCEPTION_ERROR;
18454: END IF;
18449: IF p_trx_business_category IS NULL THEN
18450: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18451: p_token1 => G_COL_NAME_TOKEN,
18452: p_token1_value => 'TRX_BUSINESS_CATEGORY');
18453: RAISE OKL_API.G_EXCEPTION_ERROR;
18454: END IF;
18455:
18456: IF p_trx_id IS NULL THEN
18457: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18453: RAISE OKL_API.G_EXCEPTION_ERROR;
18454: END IF;
18455:
18456: IF p_trx_id IS NULL THEN
18457: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18458: p_token1 => G_COL_NAME_TOKEN,
18459: p_token1_value => 'TRX_ID');
18460: RAISE OKL_API.G_EXCEPTION_ERROR;
18461: END IF;
18456: IF p_trx_id IS NULL THEN
18457: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18458: p_token1 => G_COL_NAME_TOKEN,
18459: p_token1_value => 'TRX_ID');
18460: RAISE OKL_API.G_EXCEPTION_ERROR;
18461: END IF;
18462: -- End required values
18463:
18464: -- Fetch Tax Sources details
18500: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_tax_determ_override.',
18501: 'Return Status' || l_return_status);
18502: END IF;
18503:
18504: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18505: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18506: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18507: RAISE OKL_API.G_EXCEPTION_ERROR;
18508: END IF;
18501: 'Return Status' || l_return_status);
18502: END IF;
18503:
18504: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18505: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18506: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18507: RAISE OKL_API.G_EXCEPTION_ERROR;
18508: END IF;
18509: -- End tax determinants update
18502: END IF;
18503:
18504: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18505: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18506: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18507: RAISE OKL_API.G_EXCEPTION_ERROR;
18508: END IF;
18509: -- End tax determinants update
18510:
18503:
18504: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18505: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18506: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18507: RAISE OKL_API.G_EXCEPTION_ERROR;
18508: END IF;
18509: -- End tax determinants update
18510:
18511: -- Recalculate Tax based on modified determinants
18547: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_tax_determ_override.',
18548: 'Return Status' || l_return_status);
18549: END IF;
18550:
18551: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18552: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18553: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18554: RAISE OKL_API.G_EXCEPTION_ERROR;
18555: END IF;
18548: 'Return Status' || l_return_status);
18549: END IF;
18550:
18551: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18552: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18553: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18554: RAISE OKL_API.G_EXCEPTION_ERROR;
18555: END IF;
18556:
18549: END IF;
18550:
18551: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18552: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18553: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18554: RAISE OKL_API.G_EXCEPTION_ERROR;
18555: END IF;
18556:
18557: -- Action based on return status
18550:
18551: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18552: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18553: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18554: RAISE OKL_API.G_EXCEPTION_ERROR;
18555: END IF;
18556:
18557: -- Action based on return status
18558: IF (lx_doc_level_recalc_flag = 'Y') THEN
18573: x_msg_data => x_msg_data,
18574: p_source_trx_id => p_trx_id,
18575: p_source_trx_name => 'Asset Relocation');
18576:
18577: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18578: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18579: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18580: RAISE OKL_API.G_EXCEPTION_ERROR;
18581: END IF;
18574: p_source_trx_id => p_trx_id,
18575: p_source_trx_name => 'Asset Relocation');
18576:
18577: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18578: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18579: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18580: RAISE OKL_API.G_EXCEPTION_ERROR;
18581: END IF;
18582:
18575: p_source_trx_name => 'Asset Relocation');
18576:
18577: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18578: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18579: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18580: RAISE OKL_API.G_EXCEPTION_ERROR;
18581: END IF;
18582:
18583: ELSE
18576:
18577: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18578: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18579: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18580: RAISE OKL_API.G_EXCEPTION_ERROR;
18581: END IF;
18582:
18583: ELSE
18584: update_tax_sources_total(p_api_version => p_api_version,
18586: x_return_status => l_return_status,
18587: x_msg_count => x_msg_count,
18588: x_msg_data => x_msg_data,
18589: p_source_trx_id => p_trx_id);
18590: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18591: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18592: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18593: RAISE OKL_API.G_EXCEPTION_ERROR;
18594: END IF;
18587: x_msg_count => x_msg_count,
18588: x_msg_data => x_msg_data,
18589: p_source_trx_id => p_trx_id);
18590: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18591: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18592: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18593: RAISE OKL_API.G_EXCEPTION_ERROR;
18594: END IF;
18595:
18588: x_msg_data => x_msg_data,
18589: p_source_trx_id => p_trx_id);
18590: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18591: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18592: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18593: RAISE OKL_API.G_EXCEPTION_ERROR;
18594: END IF;
18595:
18596: END IF;
18589: p_source_trx_id => p_trx_id);
18590: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18591: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18592: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18593: RAISE OKL_API.G_EXCEPTION_ERROR;
18594: END IF;
18595:
18596: END IF;
18597:
18599: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_tax_determ_override.',
18600: 'Return Status' || l_return_status);
18601: END IF;
18602:
18603: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18604: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18605: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18606: RAISE OKL_API.G_EXCEPTION_ERROR;
18607: END IF;
18600: 'Return Status' || l_return_status);
18601: END IF;
18602:
18603: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18604: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18605: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18606: RAISE OKL_API.G_EXCEPTION_ERROR;
18607: END IF;
18608:
18601: END IF;
18602:
18603: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18604: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18605: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18606: RAISE OKL_API.G_EXCEPTION_ERROR;
18607: END IF;
18608:
18609: ELSIF (lx_doc_level_recalc_flag = 'N') THEN
18602:
18603: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18604: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18605: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18606: RAISE OKL_API.G_EXCEPTION_ERROR;
18607: END IF;
18608:
18609: ELSIF (lx_doc_level_recalc_flag = 'N') THEN
18610:
18645: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_tax_determ_override.',
18646: 'Return Status' || l_return_status);
18647: END IF;
18648:
18649: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18650: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18651: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18652: RAISE OKL_API.G_EXCEPTION_ERROR;
18653: END IF;
18646: 'Return Status' || l_return_status);
18647: END IF;
18648:
18649: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18650: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18651: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18652: RAISE OKL_API.G_EXCEPTION_ERROR;
18653: END IF;
18654: END IF;
18647: END IF;
18648:
18649: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18650: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18651: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18652: RAISE OKL_API.G_EXCEPTION_ERROR;
18653: END IF;
18654: END IF;
18655: -- End actions based on return status
18648:
18649: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18650: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18651: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18652: RAISE OKL_API.G_EXCEPTION_ERROR;
18653: END IF;
18654: END IF;
18655: -- End actions based on return status
18656: -- End Recalculate tax
18664: x_msg_data => x_msg_data,
18665: p_asset_id => p_asset_id,
18666: p_request_id => p_request_id);
18667:
18668: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18669: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18670: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18671: RAISE OKL_API.G_EXCEPTION_ERROR;
18672: END IF;
18665: p_asset_id => p_asset_id,
18666: p_request_id => p_request_id);
18667:
18668: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18669: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18670: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18671: RAISE OKL_API.G_EXCEPTION_ERROR;
18672: END IF;
18673: END IF;
18666: p_request_id => p_request_id);
18667:
18668: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18669: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18670: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18671: RAISE OKL_API.G_EXCEPTION_ERROR;
18672: END IF;
18673: END IF;
18674:
18667:
18668: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18669: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18670: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18671: RAISE OKL_API.G_EXCEPTION_ERROR;
18672: END IF;
18673: END IF;
18674:
18675: -- Call Authoring package to sync tax values for 'BOOKING' and 'REBOOK' transactions
18682: p_transaction_id => p_trx_id,
18683: x_return_status => l_return_status,
18684: x_msg_count => x_msg_count,
18685: x_msg_data => x_msg_data );
18686: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18687: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18688: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18689: RAISE OKL_API.G_EXCEPTION_ERROR;
18690: END IF;
18683: x_return_status => l_return_status,
18684: x_msg_count => x_msg_count,
18685: x_msg_data => x_msg_data );
18686: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18687: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18688: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18689: RAISE OKL_API.G_EXCEPTION_ERROR;
18690: END IF;
18691: END IF;
18684: x_msg_count => x_msg_count,
18685: x_msg_data => x_msg_data );
18686: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18687: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18688: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18689: RAISE OKL_API.G_EXCEPTION_ERROR;
18690: END IF;
18691: END IF;
18692: -- End call to Authoring package
18685: x_msg_data => x_msg_data );
18686: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18687: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18688: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18689: RAISE OKL_API.G_EXCEPTION_ERROR;
18690: END IF;
18691: END IF;
18692: -- End call to Authoring package
18693:
18699: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.process_tax_determ_override ','End(-)');
18700: END IF;
18701:
18702: -- end the transaction
18703: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
18704:
18705: EXCEPTION
18706:
18707: WHEN OKL_API.G_EXCEPTION_ERROR THEN
18703: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
18704:
18705: EXCEPTION
18706:
18707: WHEN OKL_API.G_EXCEPTION_ERROR THEN
18708:
18709: IF (l_zxlinestotaltax_csr%ISOPEN) THEN
18710: CLOSE l_zxlinestotaltax_csr;
18711: END IF;
18711: END IF;
18712:
18713: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
18714: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_determ_override ',
18715: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
18716: END IF;
18717:
18718: x_return_status := OKL_API.HANDLE_EXCEPTIONS
18719: (
18714: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_determ_override ',
18715: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
18716: END IF;
18717:
18718: x_return_status := OKL_API.HANDLE_EXCEPTIONS
18719: (
18720: l_api_name,
18721: G_PKG_NAME,
18722: 'OKL_API.G_RET_STS_ERROR',
18718: x_return_status := OKL_API.HANDLE_EXCEPTIONS
18719: (
18720: l_api_name,
18721: G_PKG_NAME,
18722: 'OKL_API.G_RET_STS_ERROR',
18723: x_msg_count,
18724: x_msg_data,
18725: '_PVT'
18726: );
18723: x_msg_count,
18724: x_msg_data,
18725: '_PVT'
18726: );
18727: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
18728:
18729: IF (l_zxlinestotaltax_csr%ISOPEN) THEN
18730: CLOSE l_zxlinestotaltax_csr;
18731: END IF;
18731: END IF;
18732:
18733: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
18734: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_determ_override ',
18735: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
18736: END IF;
18737:
18738: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
18739: (
18734: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_determ_override ',
18735: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
18736: END IF;
18737:
18738: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
18739: (
18740: l_api_name,
18741: G_PKG_NAME,
18742: 'OKL_API.G_RET_STS_UNEXP_ERROR',
18738: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
18739: (
18740: l_api_name,
18741: G_PKG_NAME,
18742: 'OKL_API.G_RET_STS_UNEXP_ERROR',
18743: x_msg_count,
18744: x_msg_data,
18745: '_PVT'
18746: );
18754: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_determ_override ',
18755: 'EXCEPTION :'||sqlerrm);
18756: END IF;
18757:
18758: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
18759: (
18760: l_api_name,
18761: G_PKG_NAME,
18762: 'OTHERS',
18802: |
18803: *=======================================================================*/
18804: PROCEDURE process_tax_details_override(
18805: p_api_version IN NUMBER,
18806: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
18807: x_return_status OUT NOCOPY VARCHAR2,
18808: x_msg_count OUT NOCOPY NUMBER,
18809: x_msg_data OUT NOCOPY VARCHAR2,
18810: p_event_id IN NUMBER,
18816:
18817: -- Local variables
18818: l_api_version CONSTANT NUMBER := 1;
18819: l_api_name CONSTANT VARCHAR2(30) := 'process_tax_details';
18820: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
18821: l_total_tax_amount NUMBER;
18822:
18823: -- Local data structure
18824: l_txsv_rec txsv_rec_type;
18850: 'p_event_class_code :'||p_event_class_code);
18851: END IF;
18852:
18853: --Check API version, initialize message list and create savepoint.
18854: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
18855: G_PKG_NAME,
18856: p_init_msg_list,
18857: l_api_version,
18858: p_api_version,
18858: p_api_version,
18859: '_PVT',
18860: x_return_status);
18861:
18862: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18863: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18864: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18865: RAISE OKL_API.G_EXCEPTION_ERROR;
18866: END IF;
18859: '_PVT',
18860: x_return_status);
18861:
18862: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18863: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18864: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18865: RAISE OKL_API.G_EXCEPTION_ERROR;
18866: END IF;
18867:
18860: x_return_status);
18861:
18862: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18863: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18864: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18865: RAISE OKL_API.G_EXCEPTION_ERROR;
18866: END IF;
18867:
18868: -- Required Values
18861:
18862: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18863: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18864: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18865: RAISE OKL_API.G_EXCEPTION_ERROR;
18866: END IF;
18867:
18868: -- Required Values
18869: IF p_application_id IS NULL THEN
18866: END IF;
18867:
18868: -- Required Values
18869: IF p_application_id IS NULL THEN
18870: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18871: p_token1 => G_COL_NAME_TOKEN,
18872: p_token1_value => 'APPLICATION_ID');
18873: RAISE OKL_API.G_EXCEPTION_ERROR;
18874: END IF;
18869: IF p_application_id IS NULL THEN
18870: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18871: p_token1 => G_COL_NAME_TOKEN,
18872: p_token1_value => 'APPLICATION_ID');
18873: RAISE OKL_API.G_EXCEPTION_ERROR;
18874: END IF;
18875:
18876: IF p_entity_code IS NULL THEN
18877: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18873: RAISE OKL_API.G_EXCEPTION_ERROR;
18874: END IF;
18875:
18876: IF p_entity_code IS NULL THEN
18877: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18878: p_token1 => G_COL_NAME_TOKEN,
18879: p_token1_value => 'ENTITY_CODE');
18880: RAISE OKL_API.G_EXCEPTION_ERROR;
18881: END IF;
18876: IF p_entity_code IS NULL THEN
18877: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18878: p_token1 => G_COL_NAME_TOKEN,
18879: p_token1_value => 'ENTITY_CODE');
18880: RAISE OKL_API.G_EXCEPTION_ERROR;
18881: END IF;
18882:
18883: IF p_event_class_code IS NULL THEN
18884: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18880: RAISE OKL_API.G_EXCEPTION_ERROR;
18881: END IF;
18882:
18883: IF p_event_class_code IS NULL THEN
18884: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18885: p_token1 => G_COL_NAME_TOKEN,
18886: p_token1_value => 'EVENT_CLASS_CODE');
18887: RAISE OKL_API.G_EXCEPTION_ERROR;
18888: END IF;
18883: IF p_event_class_code IS NULL THEN
18884: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18885: p_token1 => G_COL_NAME_TOKEN,
18886: p_token1_value => 'EVENT_CLASS_CODE');
18887: RAISE OKL_API.G_EXCEPTION_ERROR;
18888: END IF;
18889:
18890: IF p_internal_organization_id IS NULL THEN
18891: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18887: RAISE OKL_API.G_EXCEPTION_ERROR;
18888: END IF;
18889:
18890: IF p_internal_organization_id IS NULL THEN
18891: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18892: p_token1 => G_COL_NAME_TOKEN,
18893: p_token1_value => 'INTERNAL_ORGANIZATION_ID');
18894: RAISE OKL_API.G_EXCEPTION_ERROR;
18895: END IF;
18890: IF p_internal_organization_id IS NULL THEN
18891: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18892: p_token1 => G_COL_NAME_TOKEN,
18893: p_token1_value => 'INTERNAL_ORGANIZATION_ID');
18894: RAISE OKL_API.G_EXCEPTION_ERROR;
18895: END IF;
18896:
18897: IF p_trx_id IS NULL THEN
18898: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18894: RAISE OKL_API.G_EXCEPTION_ERROR;
18895: END IF;
18896:
18897: IF p_trx_id IS NULL THEN
18898: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18899: p_token1 => G_COL_NAME_TOKEN,
18900: p_token1_value => 'TRX_ID');
18901: RAISE OKL_API.G_EXCEPTION_ERROR;
18902: END IF;
18897: IF p_trx_id IS NULL THEN
18898: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
18899: p_token1 => G_COL_NAME_TOKEN,
18900: p_token1_value => 'TRX_ID');
18901: RAISE OKL_API.G_EXCEPTION_ERROR;
18902: END IF;
18903: -- End required values
18904:
18905: -- Populate Transaction record
18936: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_tax_details_override.',
18937: 'Return Status' || l_return_status);
18938: END IF;
18939:
18940: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18941: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18942: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18943: RAISE OKL_API.G_EXCEPTION_ERROR;
18944: END IF;
18937: 'Return Status' || l_return_status);
18938: END IF;
18939:
18940: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18941: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18942: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18943: RAISE OKL_API.G_EXCEPTION_ERROR;
18944: END IF;
18945:
18938: END IF;
18939:
18940: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18941: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18942: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18943: RAISE OKL_API.G_EXCEPTION_ERROR;
18944: END IF;
18945:
18946: -- Overriding a tax line can impact the tax lines of other transaction lines
18939:
18940: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18941: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18942: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18943: RAISE OKL_API.G_EXCEPTION_ERROR;
18944: END IF;
18945:
18946: -- Overriding a tax line can impact the tax lines of other transaction lines
18947: -- Get the modified tax lines from zx_lines, sum up the total tax amount
18963: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.process_tax_details_override.',
18964: 'Return Status' || l_return_status);
18965: END IF;
18966:
18967: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18968: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18969: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18970: RAISE OKL_API.G_EXCEPTION_ERROR;
18971: END IF;
18964: 'Return Status' || l_return_status);
18965: END IF;
18966:
18967: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18968: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18969: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18970: RAISE OKL_API.G_EXCEPTION_ERROR;
18971: END IF;
18972:
18965: END IF;
18966:
18967: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18968: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18969: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18970: RAISE OKL_API.G_EXCEPTION_ERROR;
18971: END IF;
18972:
18973: x_return_status := l_return_status;
18966:
18967: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
18968: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
18969: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
18970: RAISE OKL_API.G_EXCEPTION_ERROR;
18971: END IF;
18972:
18973: x_return_status := l_return_status;
18974:
18976: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.process_tax_details_override ','End(-)');
18977: END IF;
18978:
18979: -- end the transaction
18980: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
18981:
18982: EXCEPTION
18983: WHEN OKL_API.G_EXCEPTION_ERROR THEN
18984:
18979: -- end the transaction
18980: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
18981:
18982: EXCEPTION
18983: WHEN OKL_API.G_EXCEPTION_ERROR THEN
18984:
18985: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
18986: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_details_override ',
18987: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
18983: WHEN OKL_API.G_EXCEPTION_ERROR THEN
18984:
18985: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
18986: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_details_override ',
18987: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
18988: END IF;
18989:
18990: x_return_status := OKL_API.HANDLE_EXCEPTIONS
18991: (
18986: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_details_override ',
18987: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
18988: END IF;
18989:
18990: x_return_status := OKL_API.HANDLE_EXCEPTIONS
18991: (
18992: l_api_name,
18993: G_PKG_NAME,
18994: 'OKL_API.G_RET_STS_ERROR',
18990: x_return_status := OKL_API.HANDLE_EXCEPTIONS
18991: (
18992: l_api_name,
18993: G_PKG_NAME,
18994: 'OKL_API.G_RET_STS_ERROR',
18995: x_msg_count,
18996: x_msg_data,
18997: '_PVT'
18998: );
18995: x_msg_count,
18996: x_msg_data,
18997: '_PVT'
18998: );
18999: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
19000: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
19001: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_details_override ',
19002: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
19003: END IF;
18998: );
18999: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
19000: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
19001: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_details_override ',
19002: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
19003: END IF;
19004:
19005: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
19006: (
19001: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_details_override ',
19002: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
19003: END IF;
19004:
19005: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
19006: (
19007: l_api_name,
19008: G_PKG_NAME,
19009: 'OKL_API.G_RET_STS_UNEXP_ERROR',
19005: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
19006: (
19007: l_api_name,
19008: G_PKG_NAME,
19009: 'OKL_API.G_RET_STS_UNEXP_ERROR',
19010: x_msg_count,
19011: x_msg_data,
19012: '_PVT'
19013: );
19017: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.process_tax_details_override ',
19018: 'EXCEPTION :'||sqlerrm);
19019: END IF;
19020:
19021: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
19022: (
19023: l_api_name,
19024: G_PKG_NAME,
19025: 'OTHERS',
19069: |
19070: *=======================================================================*/
19071: PROCEDURE get_tax_determinants(
19072: p_api_version IN NUMBER,
19073: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
19074: x_return_status OUT NOCOPY VARCHAR2,
19075: x_msg_count OUT NOCOPY NUMBER,
19076: x_msg_data OUT NOCOPY VARCHAR2,
19077: p_source_trx_id IN NUMBER,
19275: 'p_source_table :'||p_source_table);
19276: END IF;
19277:
19278: --Check API version, initialize message list and create savepoint.
19279: x_return_status := OKL_API.START_ACTIVITY(l_api_name,
19280: G_PKG_NAME,
19281: p_init_msg_list,
19282: l_api_version,
19283: p_api_version,
19282: l_api_version,
19283: p_api_version,
19284: '_PVT',
19285: x_return_status);
19286: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19287: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19288: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19289: RAISE OKL_API.G_EXCEPTION_ERROR;
19290: END IF;
19283: p_api_version,
19284: '_PVT',
19285: x_return_status);
19286: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19287: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19288: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19289: RAISE OKL_API.G_EXCEPTION_ERROR;
19290: END IF;
19291:
19284: '_PVT',
19285: x_return_status);
19286: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19287: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19288: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19289: RAISE OKL_API.G_EXCEPTION_ERROR;
19290: END IF;
19291:
19292: IF p_source_trx_name IN ('Billing', 'Credit Memo', 'Rollover Billing',
19285: x_return_status);
19286: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19287: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19288: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19289: RAISE OKL_API.G_EXCEPTION_ERROR;
19290: END IF;
19291:
19292: IF p_source_trx_name IN ('Billing', 'Credit Memo', 'Rollover Billing',
19293: 'Rollover Credit Memo', 'Release Billing',
19306: OKC_API.set_message( p_app_name => 'OKC',
19307: p_msg_name => G_INVALID_VALUE,
19308: p_token1 => G_COL_NAME_TOKEN,
19309: p_token1_value => 'SOURCE_TRX_ID');
19310: RAISE OKL_API.G_EXCEPTION_ERROR;
19311: END IF;
19312: CLOSE l_billingdtls_csr;
19313:
19314: --13-Jun-11 sechawla 12653340 : begin
19343: l_def_tax_country := get_default_taxation_country(x_return_status => x_return_status,
19344: x_msg_count => x_msg_count,
19345: x_msg_data => x_msg_data,
19346: p_legal_entity_id => l_billingdtls_rec.legal_entity_id);
19347: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19348: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19349: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19350: RAISE OKL_API.G_EXCEPTION_ERROR;
19351: END IF;
19344: x_msg_count => x_msg_count,
19345: x_msg_data => x_msg_data,
19346: p_legal_entity_id => l_billingdtls_rec.legal_entity_id);
19347: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19348: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19349: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19350: RAISE OKL_API.G_EXCEPTION_ERROR;
19351: END IF;
19352:
19345: x_msg_data => x_msg_data,
19346: p_legal_entity_id => l_billingdtls_rec.legal_entity_id);
19347: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19348: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19349: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19350: RAISE OKL_API.G_EXCEPTION_ERROR;
19351: END IF;
19352:
19353: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
19346: p_legal_entity_id => l_billingdtls_rec.legal_entity_id);
19347: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19348: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19349: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19350: RAISE OKL_API.G_EXCEPTION_ERROR;
19351: END IF;
19352:
19353: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
19354: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants.',
19396: x_currency_conversion_type => lx_currency_conversion_type,
19397: x_currency_conversion_rate => lx_currency_conversion_rate,
19398: x_currency_conversion_date => lx_currency_conversion_date,
19399: x_contract_start_date => lx_contract_start_date);
19400: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19401: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19402: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19403: RAISE OKL_API.G_EXCEPTION_ERROR;
19404: END IF;
19397: x_currency_conversion_rate => lx_currency_conversion_rate,
19398: x_currency_conversion_date => lx_currency_conversion_date,
19399: x_contract_start_date => lx_contract_start_date);
19400: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19401: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19402: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19403: RAISE OKL_API.G_EXCEPTION_ERROR;
19404: END IF;
19405:
19398: x_currency_conversion_date => lx_currency_conversion_date,
19399: x_contract_start_date => lx_contract_start_date);
19400: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19401: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19402: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19403: RAISE OKL_API.G_EXCEPTION_ERROR;
19404: END IF;
19405:
19406: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
19399: x_contract_start_date => lx_contract_start_date);
19400: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19401: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19402: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19403: RAISE OKL_API.G_EXCEPTION_ERROR;
19404: END IF;
19405:
19406: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
19407: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants.',
19493: x_purchase_of_lease => lx_purchase_of_lease,
19494: x_usage_of_equipment => lx_usage_of_equipment,
19495: x_age_of_equipment => lx_age_of_equipment,
19496: x_vendor_site_id => lx_vendor_site_id);
19497: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19498: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19499: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19500: RAISE OKL_API.G_EXCEPTION_ERROR;
19501: END IF;
19494: x_usage_of_equipment => lx_usage_of_equipment,
19495: x_age_of_equipment => lx_age_of_equipment,
19496: x_vendor_site_id => lx_vendor_site_id);
19497: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19498: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19499: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19500: RAISE OKL_API.G_EXCEPTION_ERROR;
19501: END IF;
19502:
19495: x_age_of_equipment => lx_age_of_equipment,
19496: x_vendor_site_id => lx_vendor_site_id);
19497: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19498: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19499: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19500: RAISE OKL_API.G_EXCEPTION_ERROR;
19501: END IF;
19502:
19503: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
19496: x_vendor_site_id => lx_vendor_site_id);
19497: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19498: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19499: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19500: RAISE OKL_API.G_EXCEPTION_ERROR;
19501: END IF;
19502:
19503: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
19504: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants.',
19537: OKC_API.set_message( p_app_name => 'OKC',
19538: p_msg_name => G_INVALID_VALUE,
19539: p_token1 => G_COL_NAME_TOKEN,
19540: p_token1_value => 'ISL_ID');
19541: RAISE OKL_API.G_EXCEPTION_ERROR;
19542: END IF;
19543: CLOSE l_oeorderlines_csr;
19544:
19545: ELSIF l_purpose_code = 'CURE' THEN -- vendor cure billing
19555: ELSE
19556: OPEN l_invitem_csr(l_fin_asset_id);
19557: FETCH l_invitem_csr INTO l_inv_item_id, l_inv_item_org_id;
19558: IF l_invitem_csr%NOTFOUND THEN
19559: OKL_API.set_message(
19560: p_app_name => 'OKL',
19561: p_msg_name => 'OKL_TX_INV_ITEM_ERR',
19562: p_token1 => 'ASSET_NUMBER',
19563: p_token1_value => l_name);
19561: p_msg_name => 'OKL_TX_INV_ITEM_ERR',
19562: p_token1 => 'ASSET_NUMBER',
19563: p_token1_value => l_name);
19564:
19565: RAISE OKL_API.G_EXCEPTION_ERROR;
19566: END IF;
19567: CLOSE l_invitem_csr;
19568: END IF;
19569:
19576: -- cure billing and asset repair billing
19577: lx_ship_to_siteuseid := NULL;
19578: IF l_qtp_code LIKE 'REP%' OR l_purpose_code = 'CURE' THEN
19579: IF l_billingdtls_rec.ibt_id IS NULL THEN
19580: OKL_API.set_message( p_app_name => 'OKL',
19581: p_msg_name => 'OKL_TX_NO_INV_BILL_TO');
19582:
19583: RAISE OKL_API.G_EXCEPTION_ERROR;
19584:
19579: IF l_billingdtls_rec.ibt_id IS NULL THEN
19580: OKL_API.set_message( p_app_name => 'OKL',
19581: p_msg_name => 'OKL_TX_NO_INV_BILL_TO');
19582:
19583: RAISE OKL_API.G_EXCEPTION_ERROR;
19584:
19585: ELSE
19586: lx_bill_to_siteuseid := l_billingdtls_rec.ibt_id;
19587: END IF;
19594: END IF;
19595:
19596: ELSIF l_purpose_code = 'AMBSPR' THEN -- Remarketing billing
19597: IF l_billingdtls_rec.ibt_id IS NULL THEN
19598: OKL_API.set_message( p_app_name => 'OKL',
19599: p_msg_name => 'OKL_TX_NO_INV_BILL_TO');
19600:
19601: RAISE OKL_API.G_EXCEPTION_ERROR;
19602: ELSE
19597: IF l_billingdtls_rec.ibt_id IS NULL THEN
19598: OKL_API.set_message( p_app_name => 'OKL',
19599: p_msg_name => 'OKL_TX_NO_INV_BILL_TO');
19600:
19601: RAISE OKL_API.G_EXCEPTION_ERROR;
19602: ELSE
19603: lx_bill_to_siteuseid := l_billingdtls_rec.ibt_id;
19604: END IF;
19605: --ship to (lx_ship_to_siteuseid) is already derived above for Remarketing billing
19624: x_ship_to_location_id => lx_ship_to_location_id,
19625: x_ship_to_party_id => lx_ship_to_party_id,
19626: x_ship_to_site_use_id => lx_ship_to_siteuseid);
19627:
19628: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19629: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19630: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19631: RAISE OKL_API.G_EXCEPTION_ERROR;
19632: END IF;
19625: x_ship_to_party_id => lx_ship_to_party_id,
19626: x_ship_to_site_use_id => lx_ship_to_siteuseid);
19627:
19628: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19629: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19630: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19631: RAISE OKL_API.G_EXCEPTION_ERROR;
19632: END IF;
19633:
19626: x_ship_to_site_use_id => lx_ship_to_siteuseid);
19627:
19628: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19629: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19630: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19631: RAISE OKL_API.G_EXCEPTION_ERROR;
19632: END IF;
19633:
19634: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
19627:
19628: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19629: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19630: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19631: RAISE OKL_API.G_EXCEPTION_ERROR;
19632: END IF;
19633:
19634: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
19635: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants.',
19683: p_book_class_code => lx_book_class_code,
19684: p_tax_country_code => l_def_tax_country,
19685: x_tbc_code => lx_tbc_code);
19686:
19687: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19688: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19689: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19690: RAISE OKL_API.G_EXCEPTION_ERROR;
19691: END IF;
19684: p_tax_country_code => l_def_tax_country,
19685: x_tbc_code => lx_tbc_code);
19686:
19687: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19688: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19689: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19690: RAISE OKL_API.G_EXCEPTION_ERROR;
19691: END IF;
19692:
19685: x_tbc_code => lx_tbc_code);
19686:
19687: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19688: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19689: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19690: RAISE OKL_API.G_EXCEPTION_ERROR;
19691: END IF;
19692:
19693: -- Validate TBC Code
19686:
19687: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19688: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19689: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19690: RAISE OKL_API.G_EXCEPTION_ERROR;
19691: END IF;
19692:
19693: -- Validate TBC Code
19694: IF lx_tbc_code IS NOT NULL THEN
19701: p_trx_date => l_billingdtls_rec.date_invoiced,
19702: p_tbc_code => lx_tbc_code,
19703: x_valid_code => lx_tax_valid_code); -- 'S' --> Success, 'F' --> Failure
19704:
19705: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19706: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19707: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19708: RAISE OKL_API.G_EXCEPTION_ERROR;
19709: END IF;
19702: p_tbc_code => lx_tbc_code,
19703: x_valid_code => lx_tax_valid_code); -- 'S' --> Success, 'F' --> Failure
19704:
19705: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19706: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19707: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19708: RAISE OKL_API.G_EXCEPTION_ERROR;
19709: END IF;
19710: END IF;
19703: x_valid_code => lx_tax_valid_code); -- 'S' --> Success, 'F' --> Failure
19704:
19705: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19706: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19707: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19708: RAISE OKL_API.G_EXCEPTION_ERROR;
19709: END IF;
19710: END IF;
19711:
19704:
19705: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19706: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19707: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19708: RAISE OKL_API.G_EXCEPTION_ERROR;
19709: END IF;
19710: END IF;
19711:
19712: IF (lx_tbc_code IS NULL OR lx_tax_valid_code = 'F') THEN
19731: p_sale_lease_back_code => lx_sale_lease_back,
19732: p_lease_purchased_code => lx_purchase_of_lease,
19733: p_tax_country_code => l_def_tax_country,
19734: x_pc_code => lx_pc_code);
19735: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19736: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19737: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19738: RAISE OKL_API.G_EXCEPTION_ERROR;
19739: END IF;
19732: p_lease_purchased_code => lx_purchase_of_lease,
19733: p_tax_country_code => l_def_tax_country,
19734: x_pc_code => lx_pc_code);
19735: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19736: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19737: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19738: RAISE OKL_API.G_EXCEPTION_ERROR;
19739: END IF;
19740:
19733: p_tax_country_code => l_def_tax_country,
19734: x_pc_code => lx_pc_code);
19735: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19736: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19737: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19738: RAISE OKL_API.G_EXCEPTION_ERROR;
19739: END IF;
19740:
19741: -- Validate PC Code
19734: x_pc_code => lx_pc_code);
19735: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19736: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19737: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19738: RAISE OKL_API.G_EXCEPTION_ERROR;
19739: END IF;
19740:
19741: -- Validate PC Code
19742: IF lx_pc_code IS NOT NULL THEN
19753: IF (lx_tax_valid_code = 'F') THEN
19754: lx_pc_code := null;
19755: END IF;
19756:
19757: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19758: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19759: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19760: RAISE OKL_API.G_EXCEPTION_ERROR;
19761: END IF;
19754: lx_pc_code := null;
19755: END IF;
19756:
19757: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19758: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19759: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19760: RAISE OKL_API.G_EXCEPTION_ERROR;
19761: END IF;
19762: END IF;
19755: END IF;
19756:
19757: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19758: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19759: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19760: RAISE OKL_API.G_EXCEPTION_ERROR;
19761: END IF;
19762: END IF;
19763:
19756:
19757: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19758: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19759: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19760: RAISE OKL_API.G_EXCEPTION_ERROR;
19761: END IF;
19762: END IF;
19763:
19764: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
19786: p_term_quote_type_code => null,
19787: p_term_quote_reason_code => null,
19788: p_tax_country_code => l_def_tax_country,
19789: x_ufc_code => lx_ufc_code);
19790: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19791: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19792: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19793: RAISE OKL_API.G_EXCEPTION_ERROR;
19794: END IF;
19787: p_term_quote_reason_code => null,
19788: p_tax_country_code => l_def_tax_country,
19789: x_ufc_code => lx_ufc_code);
19790: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19791: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19792: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19793: RAISE OKL_API.G_EXCEPTION_ERROR;
19794: END IF;
19795:
19788: p_tax_country_code => l_def_tax_country,
19789: x_ufc_code => lx_ufc_code);
19790: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19791: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19792: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19793: RAISE OKL_API.G_EXCEPTION_ERROR;
19794: END IF;
19795:
19796: -- Validate UFC Code
19789: x_ufc_code => lx_ufc_code);
19790: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19791: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19792: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19793: RAISE OKL_API.G_EXCEPTION_ERROR;
19794: END IF;
19795:
19796: -- Validate UFC Code
19797: IF lx_ufc_code IS NOT NULL THEN
19808: IF (lx_tax_valid_code = 'F') THEN
19809: lx_ufc_code := null;
19810: END IF;
19811:
19812: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19813: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19814: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19815: RAISE OKL_API.G_EXCEPTION_ERROR;
19816: END IF;
19809: lx_ufc_code := null;
19810: END IF;
19811:
19812: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19813: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19814: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19815: RAISE OKL_API.G_EXCEPTION_ERROR;
19816: END IF;
19817: END IF;
19810: END IF;
19811:
19812: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19813: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19814: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19815: RAISE OKL_API.G_EXCEPTION_ERROR;
19816: END IF;
19817: END IF;
19818:
19811:
19812: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
19813: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
19814: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
19815: RAISE OKL_API.G_EXCEPTION_ERROR;
19816: END IF;
19817: END IF;
19818:
19819: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
19879: OKC_API.set_message( p_app_name => 'OKC',
19880: p_msg_name => G_INVALID_VALUE,
19881: p_token1 => G_COL_NAME_TOKEN,
19882: p_token1_value => 'FMA_ID');
19883: RAISE OKL_API.G_EXCEPTION_ERROR;
19884: END IF;
19885: CLOSE l_formulae_csr;
19886:
19887: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
19971: p_additional_parameters => l_add_params,
19972: x_formula_value => lx_assessable_value,
19973: x_return_status => x_return_status);
19974:
19975: IF (x_return_status IN (OKL_API.G_RET_STS_UNEXP_ERROR, OKL_API.G_RET_STS_ERROR)) THEN
19976: OKL_API.init_msg_list('T');
19977: OKL_API.set_message(p_app_name => 'OKL',
19978: p_msg_name => 'OKL_TX_FRM_TXN_ERR',
19979: p_token1 => 'FMA_NAME',
19972: x_formula_value => lx_assessable_value,
19973: x_return_status => x_return_status);
19974:
19975: IF (x_return_status IN (OKL_API.G_RET_STS_UNEXP_ERROR, OKL_API.G_RET_STS_ERROR)) THEN
19976: OKL_API.init_msg_list('T');
19977: OKL_API.set_message(p_app_name => 'OKL',
19978: p_msg_name => 'OKL_TX_FRM_TXN_ERR',
19979: p_token1 => 'FMA_NAME',
19980: p_token1_value => l_formula_name,
19973: x_return_status => x_return_status);
19974:
19975: IF (x_return_status IN (OKL_API.G_RET_STS_UNEXP_ERROR, OKL_API.G_RET_STS_ERROR)) THEN
19976: OKL_API.init_msg_list('T');
19977: OKL_API.set_message(p_app_name => 'OKL',
19978: p_msg_name => 'OKL_TX_FRM_TXN_ERR',
19979: p_token1 => 'FMA_NAME',
19980: p_token1_value => l_formula_name,
19981: p_token2 => 'TRX_NAME ',
19979: p_token1 => 'FMA_NAME',
19980: p_token1_value => l_formula_name,
19981: p_token2 => 'TRX_NAME ',
19982: p_token2_value => p_source_trx_name);
19983: RAISE OKL_API.G_EXCEPTION_ERROR;
19984: END IF;
19985:
19986: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
19987: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants.',
20016: OKC_API.set_message( p_app_name => 'OKC',
20017: p_msg_name => G_INVALID_VALUE,
20018: p_token1 => G_COL_NAME_TOKEN,
20019: p_token1_value => 'SOURCE_TRX_ID');
20020: RAISE OKL_API.G_EXCEPTION_ERROR;
20021: END IF;
20022: CLOSE l_disbdtls_csr;
20023:
20024: IF (l_disbdtls_rec.ipvs_id IS NOT NULL) THEN
20043: l_def_tax_country := get_default_taxation_country(x_return_status => x_return_status,
20044: x_msg_count => x_msg_count,
20045: x_msg_data => x_msg_data,
20046: p_legal_entity_id => l_disbdtls_rec.legal_entity_id);
20047: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20048: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20049: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
20050: RAISE OKL_API.G_EXCEPTION_ERROR;
20051: END IF;
20044: x_msg_count => x_msg_count,
20045: x_msg_data => x_msg_data,
20046: p_legal_entity_id => l_disbdtls_rec.legal_entity_id);
20047: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20048: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20049: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
20050: RAISE OKL_API.G_EXCEPTION_ERROR;
20051: END IF;
20052:
20045: x_msg_data => x_msg_data,
20046: p_legal_entity_id => l_disbdtls_rec.legal_entity_id);
20047: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20048: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20049: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
20050: RAISE OKL_API.G_EXCEPTION_ERROR;
20051: END IF;
20052:
20053: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20046: p_legal_entity_id => l_disbdtls_rec.legal_entity_id);
20047: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20048: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20049: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
20050: RAISE OKL_API.G_EXCEPTION_ERROR;
20051: END IF;
20052:
20053: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20054: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants.',
20089: x_currency_conversion_type => lx_currency_conversion_type,
20090: x_currency_conversion_rate => lx_currency_conversion_rate,
20091: x_currency_conversion_date => lx_currency_conversion_date,
20092: x_contract_start_date => lx_contract_start_date);
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: x_currency_conversion_rate => lx_currency_conversion_rate,
20091: x_currency_conversion_date => lx_currency_conversion_date,
20092: x_contract_start_date => lx_contract_start_date);
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:
20091: x_currency_conversion_date => lx_currency_conversion_date,
20092: x_contract_start_date => lx_contract_start_date);
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:
20099: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20092: x_contract_start_date => lx_contract_start_date);
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:
20099: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20100: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants.',
20186: x_purchase_of_lease => lx_purchase_of_lease,
20187: x_usage_of_equipment => lx_usage_of_equipment,
20188: x_age_of_equipment => lx_age_of_equipment,
20189: x_vendor_site_id => lx_vendor_site_id);
20190: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20191: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20192: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
20193: RAISE OKL_API.G_EXCEPTION_ERROR;
20194: END IF;
20187: x_usage_of_equipment => lx_usage_of_equipment,
20188: x_age_of_equipment => lx_age_of_equipment,
20189: x_vendor_site_id => lx_vendor_site_id);
20190: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20191: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20192: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
20193: RAISE OKL_API.G_EXCEPTION_ERROR;
20194: END IF;
20195:
20188: x_age_of_equipment => lx_age_of_equipment,
20189: x_vendor_site_id => lx_vendor_site_id);
20190: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20191: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20192: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
20193: RAISE OKL_API.G_EXCEPTION_ERROR;
20194: END IF;
20195:
20196: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20189: x_vendor_site_id => lx_vendor_site_id);
20190: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20191: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20192: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
20193: RAISE OKL_API.G_EXCEPTION_ERROR;
20194: END IF;
20195:
20196: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20197: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants.',
20215: -- Get the inventory item id
20216: OPEN l_invitem_csr(l_fin_asset_id);
20217: FETCH l_invitem_csr INTO l_inv_item_id, l_inv_item_org_id;
20218: IF l_invitem_csr%NOTFOUND THEN
20219: OKL_API.set_message(
20220: p_app_name => 'OKL',
20221: p_msg_name => 'OKL_TX_INV_ITEM_ERR',
20222: p_token1 => 'ASSET_NUMBER',
20223: p_token1_value => l_name);
20221: p_msg_name => 'OKL_TX_INV_ITEM_ERR',
20222: p_token1 => 'ASSET_NUMBER',
20223: p_token1_value => l_name);
20224:
20225: RAISE OKL_API.G_EXCEPTION_ERROR;
20226: END IF;
20227: CLOSE l_invitem_csr;
20228:
20229: END IF;
20257: p_book_class_code => lx_book_class_code,
20258: p_tax_country_code => l_def_tax_country,
20259: x_tbc_code => lx_tbc_code);
20260:
20261: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20262: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20263: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
20264: RAISE OKL_API.G_EXCEPTION_ERROR;
20265: END IF;
20258: p_tax_country_code => l_def_tax_country,
20259: x_tbc_code => lx_tbc_code);
20260:
20261: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20262: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20263: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
20264: RAISE OKL_API.G_EXCEPTION_ERROR;
20265: END IF;
20266:
20259: x_tbc_code => lx_tbc_code);
20260:
20261: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20262: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20263: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
20264: RAISE OKL_API.G_EXCEPTION_ERROR;
20265: END IF;
20266:
20267: -- Validate TBC Code
20260:
20261: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20262: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20263: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
20264: RAISE OKL_API.G_EXCEPTION_ERROR;
20265: END IF;
20266:
20267: -- Validate TBC Code
20268: IF lx_tbc_code IS NOT NULL THEN
20275: p_trx_date => l_disbdtls_rec.date_invoiced,
20276: p_tbc_code => lx_tbc_code,
20277: x_valid_code => lx_tax_valid_code); -- 'S' --> Success, 'F' --> Failure
20278:
20279: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20280: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20281: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
20282: RAISE OKL_API.G_EXCEPTION_ERROR;
20283: END IF;
20276: p_tbc_code => lx_tbc_code,
20277: x_valid_code => lx_tax_valid_code); -- 'S' --> Success, 'F' --> Failure
20278:
20279: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20280: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20281: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
20282: RAISE OKL_API.G_EXCEPTION_ERROR;
20283: END IF;
20284: END IF;
20277: x_valid_code => lx_tax_valid_code); -- 'S' --> Success, 'F' --> Failure
20278:
20279: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20280: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20281: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
20282: RAISE OKL_API.G_EXCEPTION_ERROR;
20283: END IF;
20284: END IF;
20285:
20278:
20279: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20280: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20281: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
20282: RAISE OKL_API.G_EXCEPTION_ERROR;
20283: END IF;
20284: END IF;
20285:
20286: IF (lx_tbc_code IS NULL OR lx_tax_valid_code = 'F') THEN
20339: OKC_API.set_message( p_app_name => 'OKC',
20340: p_msg_name => G_INVALID_VALUE,
20341: p_token1 => G_COL_NAME_TOKEN,
20342: p_token1_value => 'FMA_ID');
20343: RAISE OKL_API.G_EXCEPTION_ERROR;
20344: END IF;
20345: CLOSE l_formulae_csr;
20346:
20347: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20433: p_additional_parameters => l_add_params,
20434: x_formula_value => lx_assessable_value,
20435: x_return_status => x_return_status);
20436:
20437: IF (x_return_status IN (OKL_API.G_RET_STS_UNEXP_ERROR, OKL_API.G_RET_STS_ERROR)) THEN
20438: OKL_API.init_msg_list('T');
20439: OKL_API.set_message(p_app_name => 'OKL',
20440: p_msg_name => 'OKL_TX_FRM_TXN_ERR',
20441: p_token1 => 'FMA_NAME',
20434: x_formula_value => lx_assessable_value,
20435: x_return_status => x_return_status);
20436:
20437: IF (x_return_status IN (OKL_API.G_RET_STS_UNEXP_ERROR, OKL_API.G_RET_STS_ERROR)) THEN
20438: OKL_API.init_msg_list('T');
20439: OKL_API.set_message(p_app_name => 'OKL',
20440: p_msg_name => 'OKL_TX_FRM_TXN_ERR',
20441: p_token1 => 'FMA_NAME',
20442: p_token1_value => l_formula_name,
20435: x_return_status => x_return_status);
20436:
20437: IF (x_return_status IN (OKL_API.G_RET_STS_UNEXP_ERROR, OKL_API.G_RET_STS_ERROR)) THEN
20438: OKL_API.init_msg_list('T');
20439: OKL_API.set_message(p_app_name => 'OKL',
20440: p_msg_name => 'OKL_TX_FRM_TXN_ERR',
20441: p_token1 => 'FMA_NAME',
20442: p_token1_value => l_formula_name,
20443: p_token2 => 'TRX_NAME ',
20441: p_token1 => 'FMA_NAME',
20442: p_token1_value => l_formula_name,
20443: p_token2 => 'TRX_NAME ',
20444: p_token2_value => p_source_trx_name);
20445: RAISE OKL_API.G_EXCEPTION_ERROR;
20446: END IF;
20447:
20448: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20449: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants.',
20468: OKC_API.set_message( p_app_name => 'OKC',
20469: p_msg_name => G_INVALID_VALUE,
20470: p_token1 => G_COL_NAME_TOKEN,
20471: p_token1_value => 'SOURCE_TRX_NAME');
20472: RAISE OKL_API.G_EXCEPTION_ERROR;
20473: END IF;
20474:
20475: IF (G_DEBUG_LEVEL_PROCEDURE >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20476: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants ','End(-)');
20476: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants ','End(-)');
20477: END IF;
20478:
20479: -- End the transaction
20480: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
20481:
20482: EXCEPTION
20483: WHEN OKL_API.G_EXCEPTION_ERROR THEN
20484:
20479: -- End the transaction
20480: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
20481:
20482: EXCEPTION
20483: WHEN OKL_API.G_EXCEPTION_ERROR THEN
20484:
20485: IF (l_billingdtls_csr%ISOPEN) THEN
20486: CLOSE l_billingdtls_csr;
20487: END IF;
20527: END IF;
20528:
20529: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20530: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants ',
20531: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
20532: END IF;
20533:
20534: x_return_status := OKL_API.HANDLE_EXCEPTIONS
20535: (
20530: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants ',
20531: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
20532: END IF;
20533:
20534: x_return_status := OKL_API.HANDLE_EXCEPTIONS
20535: (
20536: l_api_name,
20537: G_PKG_NAME,
20538: 'OKL_API.G_RET_STS_ERROR',
20534: x_return_status := OKL_API.HANDLE_EXCEPTIONS
20535: (
20536: l_api_name,
20537: G_PKG_NAME,
20538: 'OKL_API.G_RET_STS_ERROR',
20539: x_msg_count,
20540: x_msg_data,
20541: '_PVT');
20542:
20539: x_msg_count,
20540: x_msg_data,
20541: '_PVT');
20542:
20543: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
20544:
20545: IF (l_billingdtls_csr%ISOPEN) THEN
20546: CLOSE l_billingdtls_csr;
20547: END IF;
20587: END IF;
20588:
20589: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20590: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants ',
20591: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
20592: END IF;
20593:
20594: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
20595: (
20590: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants ',
20591: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
20592: END IF;
20593:
20594: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
20595: (
20596: l_api_name,
20597: G_PKG_NAME,
20598: 'OKL_API.G_RET_STS_UNEXP_ERROR',
20594: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
20595: (
20596: l_api_name,
20597: G_PKG_NAME,
20598: 'OKL_API.G_RET_STS_UNEXP_ERROR',
20599: x_msg_count,
20600: x_msg_data,
20601: '_PVT');
20602:
20650: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_tax_determinants ',
20651: 'EXCEPTION :'||sqlerrm);
20652: END IF;
20653:
20654: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
20655: (
20656: l_api_name,
20657: G_PKG_NAME,
20658: 'OTHERS',
20660: x_msg_data,
20661: '_PVT');
20662:
20663: -- End the transaction
20664: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
20665:
20666: END get_tax_determinants;
20667:
20668: /*========================================================================
20698: RETURN VARCHAR2 IS
20699:
20700: -- Local variables
20701: l_api_name CONSTANT VARCHAR2(30) := 'get_default_taxation_country';
20702: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
20703:
20704: -- Local data structure
20705: lx_legal_entity_rec legal_entity_rec_type;
20706:
20720: x_msg_data => x_msg_data,
20721: p_party_id => null,
20722: p_legalentity_id => p_legal_entity_id,
20723: x_legalentity_info => lx_legal_entity_rec);
20724: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20725: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20726: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
20727: RAISE OKL_API.G_EXCEPTION_ERROR;
20728: END IF;
20721: p_party_id => null,
20722: p_legalentity_id => p_legal_entity_id,
20723: x_legalentity_info => lx_legal_entity_rec);
20724: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20725: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20726: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
20727: RAISE OKL_API.G_EXCEPTION_ERROR;
20728: END IF;
20729:
20722: p_legalentity_id => p_legal_entity_id,
20723: x_legalentity_info => lx_legal_entity_rec);
20724: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20725: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20726: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
20727: RAISE OKL_API.G_EXCEPTION_ERROR;
20728: END IF;
20729:
20730: x_return_status := l_return_status;
20723: x_legalentity_info => lx_legal_entity_rec);
20724: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20725: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20726: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
20727: RAISE OKL_API.G_EXCEPTION_ERROR;
20728: END IF;
20729:
20730: x_return_status := l_return_status;
20731:
20735:
20736: RETURN lx_legal_entity_rec.country;
20737:
20738: EXCEPTION
20739: WHEN OKL_API.G_EXCEPTION_ERROR THEN
20740:
20741: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20742: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_default_taxation_country ',
20743: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
20739: WHEN OKL_API.G_EXCEPTION_ERROR THEN
20740:
20741: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20742: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_default_taxation_country ',
20743: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
20744: END IF;
20745:
20746: x_return_status := OKL_API.G_RET_STS_ERROR;
20747:
20742: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_default_taxation_country ',
20743: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
20744: END IF;
20745:
20746: x_return_status := OKL_API.G_RET_STS_ERROR;
20747:
20748: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
20749: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20750: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_default_taxation_country ',
20744: END IF;
20745:
20746: x_return_status := OKL_API.G_RET_STS_ERROR;
20747:
20748: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
20749: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20750: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_default_taxation_country ',
20751: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
20752: END IF;
20747:
20748: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
20749: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20750: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_default_taxation_country ',
20751: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
20752: END IF;
20753:
20754: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
20755:
20750: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_default_taxation_country ',
20751: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
20752: END IF;
20753:
20754: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
20755:
20756: WHEN OTHERS THEN
20757:
20758: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20759: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_default_taxation_country ',
20760: 'EXCEPTION :'||sqlerrm);
20761: END IF;
20762:
20763: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
20764: -- unexpected error
20765: OKL_API.set_message(p_app_name => g_app_name,
20766: p_msg_name => g_unexpected_error,
20767: p_token1 => g_sqlcode_token,
20761: END IF;
20762:
20763: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
20764: -- unexpected error
20765: OKL_API.set_message(p_app_name => g_app_name,
20766: p_msg_name => g_unexpected_error,
20767: p_token1 => g_sqlcode_token,
20768: p_token1_value => sqlcode,
20769: p_token2 => g_sqlerrm_token,
20828:
20829: RETURN l_intend_use_name;
20830:
20831: EXCEPTION
20832: WHEN OKL_API.G_EXCEPTION_ERROR THEN
20833:
20834: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20835: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_line_intended_use_name ',
20836: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
20832: WHEN OKL_API.G_EXCEPTION_ERROR THEN
20833:
20834: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20835: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_line_intended_use_name ',
20836: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
20837: END IF;
20838:
20839: IF (l_get_intend_use_name_csr%ISOPEN) THEN
20840: CLOSE l_get_intend_use_name_csr;
20839: IF (l_get_intend_use_name_csr%ISOPEN) THEN
20840: CLOSE l_get_intend_use_name_csr;
20841: END IF;
20842:
20843: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
20844: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20845: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_line_intended_use_name ',
20846: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
20847: END IF;
20842:
20843: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
20844: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
20845: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.get_line_intended_use_name ',
20846: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
20847: END IF;
20848:
20849: IF (l_get_intend_use_name_csr%ISOPEN) THEN
20850: CLOSE l_get_intend_use_name_csr;
20892: |
20893: *=======================================================================*/
20894: PROCEDURE cancel_document_tax (
20895: p_api_version IN NUMBER,
20896: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
20897: x_return_status OUT NOCOPY VARCHAR2,
20898: x_msg_count OUT NOCOPY NUMBER,
20899: x_msg_data OUT NOCOPY VARCHAR2,
20900: p_source_trx_id IN NUMBER,
20903:
20904: -- Local variables
20905: l_api_version CONSTANT NUMBER := 1;
20906: l_api_name CONSTANT VARCHAR2(30) := 'cancel_document_tax';
20907: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
20908:
20909: l_internal_org_id NUMBER;
20910: l_application_id NUMBER;
20911: l_entity_code VARCHAR2(30);
20969: 'p_source_table :'||p_source_table);
20970: END IF;
20971:
20972: --Check API version, initialize message list and create savepoint.
20973: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
20974: G_PKG_NAME,
20975: p_init_msg_list,
20976: l_api_version,
20977: p_api_version,
20977: p_api_version,
20978: '_PVT',
20979: x_return_status);
20980:
20981: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20982: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20983: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
20984: RAISE OKL_API.G_EXCEPTION_ERROR;
20985: END IF;
20978: '_PVT',
20979: x_return_status);
20980:
20981: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20982: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20983: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
20984: RAISE OKL_API.G_EXCEPTION_ERROR;
20985: END IF;
20986:
20979: x_return_status);
20980:
20981: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20982: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20983: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
20984: RAISE OKL_API.G_EXCEPTION_ERROR;
20985: END IF;
20986:
20987: -- Required Values
20980:
20981: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
20982: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
20983: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
20984: RAISE OKL_API.G_EXCEPTION_ERROR;
20985: END IF;
20986:
20987: -- Required Values
20988: IF p_source_trx_id IS NULL THEN
20985: END IF;
20986:
20987: -- Required Values
20988: IF p_source_trx_id IS NULL THEN
20989: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
20990: p_token1 => G_COL_NAME_TOKEN,
20991: p_token1_value => 'SOURCE_TRX_ID');
20992: RAISE OKL_API.G_EXCEPTION_ERROR;
20993: END IF;
20988: IF p_source_trx_id IS NULL THEN
20989: OKL_API.set_message( p_msg_name => G_REQUIRED_VALUE,
20990: p_token1 => G_COL_NAME_TOKEN,
20991: p_token1_value => 'SOURCE_TRX_ID');
20992: RAISE OKL_API.G_EXCEPTION_ERROR;
20993: END IF;
20994:
20995: -- validate the source trx id
20996: IF (p_source_trx_name = 'Pre-Rebook') THEN
21000: OKC_API.set_message( p_app_name => 'OKC',
21001: p_msg_name => G_INVALID_VALUE,
21002: p_token1 => G_COL_NAME_TOKEN,
21003: p_token1_value => 'SOURCE_TRX_ID');
21004: RAISE OKL_API.G_EXCEPTION_ERROR;
21005: END IF;
21006: CLOSE l_trxcontracts_base_csr;
21007: ELSIF (p_source_trx_name = 'Rebook') THEN
21008: OPEN l_trxcontracts_csr(p_source_trx_id, p_source_trx_name);
21011: OKC_API.set_message( p_app_name => 'OKC',
21012: p_msg_name => G_INVALID_VALUE,
21013: p_token1 => G_COL_NAME_TOKEN,
21014: p_token1_value => 'SOURCE_TRX_ID');
21015: RAISE OKL_API.G_EXCEPTION_ERROR;
21016: END IF;
21017: CLOSE l_trxcontracts_csr;
21018: END IF;
21019:
21075: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.cancel_document_tax.',
21076: 'Return Status' || l_return_status);
21077: END IF;
21078:
21079: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
21080: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
21081: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
21082: RAISE OKL_API.G_EXCEPTION_ERROR;
21083: END IF;
21076: 'Return Status' || l_return_status);
21077: END IF;
21078:
21079: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
21080: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
21081: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
21082: RAISE OKL_API.G_EXCEPTION_ERROR;
21083: END IF;
21084:
21077: END IF;
21078:
21079: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
21080: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
21081: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
21082: RAISE OKL_API.G_EXCEPTION_ERROR;
21083: END IF;
21084:
21085: -- 'Rebook' specific condition to cancel tax lines in ebTax schema
21078:
21079: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
21080: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
21081: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
21082: RAISE OKL_API.G_EXCEPTION_ERROR;
21083: END IF;
21084:
21085: -- 'Rebook' specific condition to cancel tax lines in ebTax schema
21086: l_transaction_rec.internal_organization_id := l_internal_org_id;
21106: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.cancel_document_tax.',
21107: 'Return Status' || l_return_status);
21108: END IF;
21109:
21110: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
21111: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
21112: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
21113: RAISE OKL_API.G_EXCEPTION_ERROR;
21114: END IF;
21107: 'Return Status' || l_return_status);
21108: END IF;
21109:
21110: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
21111: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
21112: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
21113: RAISE OKL_API.G_EXCEPTION_ERROR;
21114: END IF;
21115:
21108: END IF;
21109:
21110: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
21111: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
21112: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
21113: RAISE OKL_API.G_EXCEPTION_ERROR;
21114: END IF;
21115:
21116: END IF; -- Update Tax Sources
21109:
21110: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
21111: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
21112: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
21113: RAISE OKL_API.G_EXCEPTION_ERROR;
21114: END IF;
21115:
21116: END IF; -- Update Tax Sources
21117:
21123: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.cancel_document_tax ','End(-)');
21124: END IF;
21125:
21126: -- end the transaction
21127: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
21128: EXCEPTION
21129: WHEN OKL_API.G_EXCEPTION_ERROR THEN
21130:
21131: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
21125:
21126: -- end the transaction
21127: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
21128: EXCEPTION
21129: WHEN OKL_API.G_EXCEPTION_ERROR THEN
21130:
21131: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
21132: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.cancel_document_tax ',
21133: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
21129: WHEN OKL_API.G_EXCEPTION_ERROR THEN
21130:
21131: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
21132: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.cancel_document_tax ',
21133: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
21134: END IF;
21135:
21136: IF (l_taxsources_csr%ISOPEN) THEN
21137: CLOSE l_taxsources_csr;
21148: IF (l_taxsources_prbk_csr%ISOPEN) THEN
21149: CLOSE l_taxsources_prbk_csr;
21150: END IF;
21151:
21152: x_return_status := OKL_API.HANDLE_EXCEPTIONS
21153: ( l_api_name,
21154: G_PKG_NAME,
21155: 'OKL_API.G_RET_STS_ERROR',
21156: x_msg_count,
21151:
21152: x_return_status := OKL_API.HANDLE_EXCEPTIONS
21153: ( l_api_name,
21154: G_PKG_NAME,
21155: 'OKL_API.G_RET_STS_ERROR',
21156: x_msg_count,
21157: x_msg_data,
21158: '_PVT');
21159: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
21155: 'OKL_API.G_RET_STS_ERROR',
21156: x_msg_count,
21157: x_msg_data,
21158: '_PVT');
21159: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
21160:
21161: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
21162: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.cancel_document_tax ',
21163: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
21159: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
21160:
21161: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
21162: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.cancel_document_tax ',
21163: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
21164: END IF;
21165:
21166: IF (l_taxsources_csr%ISOPEN) THEN
21167: CLOSE l_taxsources_csr;
21178: IF (l_taxsources_prbk_csr%ISOPEN) THEN
21179: CLOSE l_taxsources_prbk_csr;
21180: END IF;
21181:
21182: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
21183: ( l_api_name,
21184: G_PKG_NAME,
21185: 'OKL_API.G_RET_STS_UNEXP_ERROR',
21186: x_msg_count,
21181:
21182: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
21183: ( l_api_name,
21184: G_PKG_NAME,
21185: 'OKL_API.G_RET_STS_UNEXP_ERROR',
21186: x_msg_count,
21187: x_msg_data,
21188: '_PVT');
21189: WHEN OTHERS THEN
21208: IF (l_taxsources_prbk_csr%ISOPEN) THEN
21209: CLOSE l_taxsources_prbk_csr;
21210: END IF;
21211:
21212: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
21213: ( l_api_name,
21214: G_PKG_NAME,
21215: 'OTHERS',
21216: x_msg_count,
21251: |
21252: *=======================================================================*/
21253: PROCEDURE copy_global_tax_data (
21254: p_api_version IN NUMBER,
21255: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
21256: x_return_status OUT NOCOPY VARCHAR2,
21257: x_msg_count OUT NOCOPY NUMBER,
21258: x_msg_data OUT NOCOPY VARCHAR2,
21259: p_trx_id IN NUMBER,
21265:
21266: -- Local variables
21267: l_api_version CONSTANT NUMBER := 1;
21268: l_api_name CONSTANT VARCHAR2(30) := 'copy_global_tax_data';
21269: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
21270:
21271: BEGIN
21272: IF (G_DEBUG_LEVEL_PROCEDURE >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
21273: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.copy_global_tax_data','Begin(+)');
21291: 'p_event_class_code :'||p_event_class_code);
21292: END IF;
21293:
21294: --Check API version, initialize message list and create savepoint.
21295: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
21296: G_PKG_NAME,
21297: p_init_msg_list,
21298: l_api_version,
21299: p_api_version,
21299: p_api_version,
21300: '_PVT',
21301: x_return_status);
21302:
21303: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
21304: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
21305: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
21306: RAISE OKL_API.G_EXCEPTION_ERROR;
21307: END IF;
21300: '_PVT',
21301: x_return_status);
21302:
21303: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
21304: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
21305: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
21306: RAISE OKL_API.G_EXCEPTION_ERROR;
21307: END IF;
21308:
21301: x_return_status);
21302:
21303: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
21304: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
21305: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
21306: RAISE OKL_API.G_EXCEPTION_ERROR;
21307: END IF;
21308:
21309: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
21302:
21303: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
21304: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
21305: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
21306: RAISE OKL_API.G_EXCEPTION_ERROR;
21307: END IF;
21308:
21309: IF (G_DEBUG_LEVEL_STATEMENT >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
21310: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.copy_global_tax_data.',
21327: FND_LOG.STRING(G_DEBUG_LEVEL_STATEMENT,'OKL_PROCESS_SALES_TAX_PVT.copy_global_tax_data.',
21328: 'After calling OKL_TAX_INTERFACE_PVT.copy_global_tax_data - Return Status ' || l_return_status);
21329: END IF;
21330:
21331: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
21332: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
21333: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
21334: RAISE OKL_API.G_EXCEPTION_ERROR;
21335: END IF;
21328: 'After calling OKL_TAX_INTERFACE_PVT.copy_global_tax_data - Return Status ' || l_return_status);
21329: END IF;
21330:
21331: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
21332: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
21333: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
21334: RAISE OKL_API.G_EXCEPTION_ERROR;
21335: END IF;
21336:
21329: END IF;
21330:
21331: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
21332: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
21333: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
21334: RAISE OKL_API.G_EXCEPTION_ERROR;
21335: END IF;
21336:
21337: x_return_status := l_return_status;
21330:
21331: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
21332: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
21333: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
21334: RAISE OKL_API.G_EXCEPTION_ERROR;
21335: END IF;
21336:
21337: x_return_status := l_return_status;
21338:
21340: FND_LOG.STRING(G_DEBUG_LEVEL_PROCEDURE,'OKL_PROCESS_SALES_TAX_PVT.copy_global_tax_data ','End(-)');
21341: END IF;
21342:
21343: -- end the transaction
21344: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
21345: EXCEPTION
21346: WHEN OKL_API.G_EXCEPTION_ERROR THEN
21347:
21348: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
21342:
21343: -- end the transaction
21344: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
21345: EXCEPTION
21346: WHEN OKL_API.G_EXCEPTION_ERROR THEN
21347:
21348: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
21349: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.copy_global_tax_data ',
21350: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
21346: WHEN OKL_API.G_EXCEPTION_ERROR THEN
21347:
21348: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
21349: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.copy_global_tax_data ',
21350: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
21351: END IF;
21352:
21353: x_return_status := OKL_API.HANDLE_EXCEPTIONS
21354: (
21349: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.copy_global_tax_data ',
21350: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
21351: END IF;
21352:
21353: x_return_status := OKL_API.HANDLE_EXCEPTIONS
21354: (
21355: l_api_name,
21356: G_PKG_NAME,
21357: 'OKL_API.G_RET_STS_ERROR',
21353: x_return_status := OKL_API.HANDLE_EXCEPTIONS
21354: (
21355: l_api_name,
21356: G_PKG_NAME,
21357: 'OKL_API.G_RET_STS_ERROR',
21358: x_msg_count,
21359: x_msg_data,
21360: '_PVT'
21361: );
21358: x_msg_count,
21359: x_msg_data,
21360: '_PVT'
21361: );
21362: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
21363: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
21364: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.copy_global_tax_data ',
21365: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
21366: END IF;
21361: );
21362: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
21363: IF (G_DEBUG_LEVEL_EXCEPTION >= G_DEBUG_CURRENT_RUNTIME_LEVEL) THEN
21364: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.copy_global_tax_data ',
21365: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
21366: END IF;
21367:
21368: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
21369: (
21364: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.copy_global_tax_data ',
21365: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
21366: END IF;
21367:
21368: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
21369: (
21370: l_api_name,
21371: G_PKG_NAME,
21372: 'OKL_API.G_RET_STS_UNEXP_ERROR',
21368: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
21369: (
21370: l_api_name,
21371: G_PKG_NAME,
21372: 'OKL_API.G_RET_STS_UNEXP_ERROR',
21373: x_msg_count,
21374: x_msg_data,
21375: '_PVT'
21376: );
21380: FND_LOG.STRING(G_DEBUG_LEVEL_EXCEPTION,'OKL_PROCESS_SALES_TAX_PVT.copy_global_tax_data ',
21381: 'EXCEPTION :'||sqlerrm);
21382: END IF;
21383:
21384: x_return_status :=OKL_API.HANDLE_EXCEPTIONS
21385: (
21386: l_api_name,
21387: G_PKG_NAME,
21388: 'OTHERS',