1: PACKAGE BODY zx_api_pub AS
2: /* $Header: zxifpubsrvcspubb.pls 120.337.12020000.5 2013/03/15 10:15:07 ssohal ship $ */
3:
4: /* ======================================================================*
5: | Global Data Types |
4: /* ======================================================================*
5: | Global Data Types |
6: * ======================================================================*/
7:
8: G_PKG_NAME CONSTANT VARCHAR2(30) := 'ZX_API_PUB';
9: G_MSG_UERROR CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR;
10: G_MSG_ERROR CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_ERROR;
11: G_MSG_SUCCESS CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_SUCCESS;
12: G_MSG_HIGH CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH;
20: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
21: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
22: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
23: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
24: G_MODULE_NAME CONSTANT VARCHAR2(30) := 'ZX.PLSQL.ZX_API_PUB.';
25:
26: TYPE evnt_cls_rec_type is RECORD
27: ( event_class_code VARCHAR2_30_tbl_type,
28: application_id NUMBER_tbl_type,
63: ) RETURN DATE IS
64:
65: BEGIN
66: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
67: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||'determine_effective_date.BEGIN','ZX_API_PUB: DETERMINE_EFFECTIVE_DATE()+');
68: END IF;
69:
70: IF p_related_doc_date IS NOT NULL THEN
71: return(p_related_doc_date);
79: return(SYSDATE);
80: END IF;
81:
82: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
83: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||'determine_effective_date.END','ZX_API_PUB: DETERMINE_EFFECTIVE_DATE()-');
84: END IF;
85:
86: END determine_effective_date;
87:
99: l_count BINARY_INTEGER := 0;
100: l_api_name CONSTANT VARCHAR2(30) := 'update_total_inc_tax_amt';
101: BEGIN
102: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
103: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: update_total_inc_tax_amt(+)');
104: END IF;
105:
106: x_return_status := FND_API.G_RET_STS_SUCCESS;
107:
139: END IF;
140:
141: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
142: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END',
143: 'ZX_API_PUB: update_total_inc_tax_amt(-)'||' RETURN_STATUS = ' || x_return_status);
144: END IF;
145:
146: EXCEPTION
147: WHEN OTHERS THEN
430: l_error_buffer VARCHAR2(1000);
431:
432: BEGIN
433: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
434: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||p_api_name||'.BEGIN','ZX_API_PUB: calculate_tax_pvt()+');
435: END IF;
436: /*------------------------------------------------------+
437: | Copy to Event Class Record |
438: +------------------------------------------------------*/
628: RETURN;
629: END IF;
630:
631: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
632: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||p_api_name||'.END','ZX_API_PUB: '||'calculate_tax_pvt'||'()-');
633: END IF;
634: END calculate_tax_pvt;
635:
636:
655: /*------------------------------------------------------+
656: | Copy to Event Class Record |
657: +------------------------------------------------------*/
658: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
659: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||p_api_name||'.BEGIN','ZX_API_PUB: import_tax_pvt()+');
660: END IF;
661:
662: l_event_class_rec.EVENT_ID := p_event_id;
663: l_event_class_rec.INTERNAL_ORGANIZATION_ID := p_evnt_cls.INTERNAL_ORGANIZATION_ID(p_index);
722: RETURN;
723: END IF;
724:
725: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
726: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||p_api_name||'.END','ZX_API_PUB: '||'import_tax_pvt'||'()-');
727: END IF;
728:
729: END import_tax_pvt;
730:
807:
808: BEGIN
809: l_start_time := SYSDATE ;
810: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
811: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: CALCULATE_TAX()+');
812: END IF;
813:
814: /*--------------------------------------------------+
815: | Standard start of API savepoint |
1347:
1348:
1349: -- If there exists error messages in Error Table
1350: -- call DUMP_MSG to insert them into ZX_ERRORS_GT
1351: IF ZX_API_PUB.errors_tbl.trx_id.COUNT > 0 THEN
1352: DUMP_MSG;
1353: END IF;
1354:
1355: --Reset the icx_session_id at end of API
1358: --dbms_session.set_context('my_ctx','SESSIONID',to_char(ZX_SECURITY.G_ICX_SESSION_ID));
1359:
1360:
1361: --Reset G_PUB_CALLING_SRVC at end of API
1362: ZX_API_PUB.G_PUB_CALLING_SRVC := null;
1363:
1364: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1365: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: CALCULATE_TAX()-');
1366: END IF;
1361: --Reset G_PUB_CALLING_SRVC at end of API
1362: ZX_API_PUB.G_PUB_CALLING_SRVC := null;
1363:
1364: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1365: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: CALCULATE_TAX()-');
1366: END IF;
1367:
1368: l_end_time:=SYSDATE;
1369: l_total_time := floor((l_end_time-l_start_time)*24)|| ':' ||
1384: IF fnd_global.conc_request_id <> -1 AND l_dummy_number > 1 THEN
1385: FND_FILE.put_line(which => FND_FILE.LOG
1386: ,buff => 'Transfer_Mode: '||G_DATA_TRANSFER_MODE);
1387: FND_FILE.put_line(which => FND_FILE.LOG
1388: ,buff => 'ZX_API_PUB.Calculate.Statistics Start Time:'||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
1389: FND_FILE.put_line(which => FND_FILE.LOG
1390: ,buff => 'ZX_API_PUB.Calculate.Statistics End Time:'||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
1391: FND_FILE.put_line(which => FND_FILE.LOG
1392: ,buff => 'ZX_API_PUB.Calculate.Statistics Total Time:'||l_total_time);
1386: ,buff => 'Transfer_Mode: '||G_DATA_TRANSFER_MODE);
1387: FND_FILE.put_line(which => FND_FILE.LOG
1388: ,buff => 'ZX_API_PUB.Calculate.Statistics Start Time:'||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
1389: FND_FILE.put_line(which => FND_FILE.LOG
1390: ,buff => 'ZX_API_PUB.Calculate.Statistics End Time:'||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
1391: FND_FILE.put_line(which => FND_FILE.LOG
1392: ,buff => 'ZX_API_PUB.Calculate.Statistics Total Time:'||l_total_time);
1393: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
1394: FND_FILE.put_line(which => FND_FILE.LOG
1388: ,buff => 'ZX_API_PUB.Calculate.Statistics Start Time:'||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
1389: FND_FILE.put_line(which => FND_FILE.LOG
1390: ,buff => 'ZX_API_PUB.Calculate.Statistics End Time:'||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
1391: FND_FILE.put_line(which => FND_FILE.LOG
1392: ,buff => 'ZX_API_PUB.Calculate.Statistics Total Time:'||l_total_time);
1393: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
1394: FND_FILE.put_line(which => FND_FILE.LOG
1395: ,buff => 'ZX_API_PUB.Calculate.Statistics: Number of Records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
1396: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
1391: FND_FILE.put_line(which => FND_FILE.LOG
1392: ,buff => 'ZX_API_PUB.Calculate.Statistics Total Time:'||l_total_time);
1393: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
1394: FND_FILE.put_line(which => FND_FILE.LOG
1395: ,buff => 'ZX_API_PUB.Calculate.Statistics: Number of Records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
1396: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
1397: FND_FILE.put_line(which => FND_FILE.LOG
1398: ,buff => 'ZX_API_PUB.Calculate.Statistics: Number of Records in ZX_TRANSACTION_LINES_GT :'||l_dummy_number);
1399: END IF;
1394: FND_FILE.put_line(which => FND_FILE.LOG
1395: ,buff => 'ZX_API_PUB.Calculate.Statistics: Number of Records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
1396: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
1397: FND_FILE.put_line(which => FND_FILE.LOG
1398: ,buff => 'ZX_API_PUB.Calculate.Statistics: Number of Records in ZX_TRANSACTION_LINES_GT :'||l_dummy_number);
1399: END IF;
1400:
1401: EXCEPTION
1402: WHEN FND_API.G_EXC_ERROR THEN
1427: IF fnd_global.conc_request_id <> -1 AND l_dummy_number > 1 THEN
1428: FND_FILE.put_line(which => FND_FILE.LOG
1429: ,buff => 'Exception FND_API.G_EXC_ERROR : Transfer_Mode: '||G_DATA_TRANSFER_MODE);
1430: FND_FILE.put_line(which => FND_FILE.LOG
1431: ,buff => 'ZX_API_PUB.Calculate.Statistics Start Time:'||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
1432: FND_FILE.put_line(which => FND_FILE.LOG
1433: ,buff => 'ZX_API_PUB.Calculate.Statistics End Time:'||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
1434: FND_FILE.put_line(which => FND_FILE.LOG
1435: ,buff => 'ZX_API_PUB.Calculate.Statistics Total Time:'||l_total_time);
1429: ,buff => 'Exception FND_API.G_EXC_ERROR : Transfer_Mode: '||G_DATA_TRANSFER_MODE);
1430: FND_FILE.put_line(which => FND_FILE.LOG
1431: ,buff => 'ZX_API_PUB.Calculate.Statistics Start Time:'||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
1432: FND_FILE.put_line(which => FND_FILE.LOG
1433: ,buff => 'ZX_API_PUB.Calculate.Statistics End Time:'||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
1434: FND_FILE.put_line(which => FND_FILE.LOG
1435: ,buff => 'ZX_API_PUB.Calculate.Statistics Total Time:'||l_total_time);
1436: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
1437: FND_FILE.put_line(which => FND_FILE.LOG
1431: ,buff => 'ZX_API_PUB.Calculate.Statistics Start Time:'||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
1432: FND_FILE.put_line(which => FND_FILE.LOG
1433: ,buff => 'ZX_API_PUB.Calculate.Statistics End Time:'||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
1434: FND_FILE.put_line(which => FND_FILE.LOG
1435: ,buff => 'ZX_API_PUB.Calculate.Statistics Total Time:'||l_total_time);
1436: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
1437: FND_FILE.put_line(which => FND_FILE.LOG
1438: ,buff => 'ZX_API_PUB.Calculate.Statistics: Number of Records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
1439: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
1434: FND_FILE.put_line(which => FND_FILE.LOG
1435: ,buff => 'ZX_API_PUB.Calculate.Statistics Total Time:'||l_total_time);
1436: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
1437: FND_FILE.put_line(which => FND_FILE.LOG
1438: ,buff => 'ZX_API_PUB.Calculate.Statistics: Number of Records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
1439: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
1440: FND_FILE.put_line(which => FND_FILE.LOG
1441: ,buff => 'ZX_API_PUB.Calculate.Statistics: Number of Records in ZX_TRANSACTION_LINES_GT :'||l_dummy_number);
1442: END IF;
1437: FND_FILE.put_line(which => FND_FILE.LOG
1438: ,buff => 'ZX_API_PUB.Calculate.Statistics: Number of Records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
1439: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
1440: FND_FILE.put_line(which => FND_FILE.LOG
1441: ,buff => 'ZX_API_PUB.Calculate.Statistics: Number of Records in ZX_TRANSACTION_LINES_GT :'||l_dummy_number);
1442: END IF;
1443:
1444: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1445: ROLLBACK TO Calculate_tax_PVT;
1474: IF fnd_global.conc_request_id <> -1 AND l_dummy_number > 1 THEN
1475: FND_FILE.put_line(which => FND_FILE.LOG
1476: ,buff => 'Exception FND_API.G_EXC_UNEXPECTED_ERROR : Transfer_Mode: '||G_DATA_TRANSFER_MODE);
1477: FND_FILE.put_line(which => FND_FILE.LOG
1478: ,buff => 'ZX_API_PUB.Calculate.Statistics Start Time:'||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
1479: FND_FILE.put_line(which => FND_FILE.LOG
1480: ,buff => 'ZX_API_PUB.Calculate.Statistics End Time:'||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
1481: FND_FILE.put_line(which => FND_FILE.LOG
1482: ,buff => 'ZX_API_PUB.Calculate.Statistics Total Time:'||l_total_time);
1476: ,buff => 'Exception FND_API.G_EXC_UNEXPECTED_ERROR : Transfer_Mode: '||G_DATA_TRANSFER_MODE);
1477: FND_FILE.put_line(which => FND_FILE.LOG
1478: ,buff => 'ZX_API_PUB.Calculate.Statistics Start Time:'||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
1479: FND_FILE.put_line(which => FND_FILE.LOG
1480: ,buff => 'ZX_API_PUB.Calculate.Statistics End Time:'||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
1481: FND_FILE.put_line(which => FND_FILE.LOG
1482: ,buff => 'ZX_API_PUB.Calculate.Statistics Total Time:'||l_total_time);
1483: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
1484: FND_FILE.put_line(which => FND_FILE.LOG
1478: ,buff => 'ZX_API_PUB.Calculate.Statistics Start Time:'||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
1479: FND_FILE.put_line(which => FND_FILE.LOG
1480: ,buff => 'ZX_API_PUB.Calculate.Statistics End Time:'||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
1481: FND_FILE.put_line(which => FND_FILE.LOG
1482: ,buff => 'ZX_API_PUB.Calculate.Statistics Total Time:'||l_total_time);
1483: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
1484: FND_FILE.put_line(which => FND_FILE.LOG
1485: ,buff => 'ZX_API_PUB.Calculate.Statistics: Number of Records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
1486: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
1481: FND_FILE.put_line(which => FND_FILE.LOG
1482: ,buff => 'ZX_API_PUB.Calculate.Statistics Total Time:'||l_total_time);
1483: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
1484: FND_FILE.put_line(which => FND_FILE.LOG
1485: ,buff => 'ZX_API_PUB.Calculate.Statistics: Number of Records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
1486: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
1487: FND_FILE.put_line(which => FND_FILE.LOG
1488: ,buff => 'ZX_API_PUB.Calculate.Statistics: Number of Records in ZX_TRANSACTION_LINES_GT :'||l_dummy_number);
1489: END IF;
1484: FND_FILE.put_line(which => FND_FILE.LOG
1485: ,buff => 'ZX_API_PUB.Calculate.Statistics: Number of Records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
1486: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
1487: FND_FILE.put_line(which => FND_FILE.LOG
1488: ,buff => 'ZX_API_PUB.Calculate.Statistics: Number of Records in ZX_TRANSACTION_LINES_GT :'||l_dummy_number);
1489: END IF;
1490:
1491: WHEN OTHERS THEN
1492: ROLLBACK TO Calculate_tax_PVT;
1515: IF fnd_global.conc_request_id <> -1 AND l_dummy_number > 1 THEN
1516: FND_FILE.put_line(which => FND_FILE.LOG
1517: ,buff => 'Exception OTHERS : Transfer_Mode: '||G_DATA_TRANSFER_MODE);
1518: FND_FILE.put_line(which => FND_FILE.LOG
1519: ,buff => 'ZX_API_PUB.Calculate.Statistics Start Time:'||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
1520: FND_FILE.put_line(which => FND_FILE.LOG
1521: ,buff => 'ZX_API_PUB.Calculate.Statistics End Time:'||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
1522: FND_FILE.put_line(which => FND_FILE.LOG
1523: ,buff => 'ZX_API_PUB.Calculate.Statistics Total Time:'||l_total_time);
1517: ,buff => 'Exception OTHERS : Transfer_Mode: '||G_DATA_TRANSFER_MODE);
1518: FND_FILE.put_line(which => FND_FILE.LOG
1519: ,buff => 'ZX_API_PUB.Calculate.Statistics Start Time:'||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
1520: FND_FILE.put_line(which => FND_FILE.LOG
1521: ,buff => 'ZX_API_PUB.Calculate.Statistics End Time:'||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
1522: FND_FILE.put_line(which => FND_FILE.LOG
1523: ,buff => 'ZX_API_PUB.Calculate.Statistics Total Time:'||l_total_time);
1524: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
1525: FND_FILE.put_line(which => FND_FILE.LOG
1519: ,buff => 'ZX_API_PUB.Calculate.Statistics Start Time:'||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
1520: FND_FILE.put_line(which => FND_FILE.LOG
1521: ,buff => 'ZX_API_PUB.Calculate.Statistics End Time:'||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
1522: FND_FILE.put_line(which => FND_FILE.LOG
1523: ,buff => 'ZX_API_PUB.Calculate.Statistics Total Time:'||l_total_time);
1524: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
1525: FND_FILE.put_line(which => FND_FILE.LOG
1526: ,buff => 'ZX_API_PUB.Calculate.Statistics: Number of Records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
1527: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
1522: FND_FILE.put_line(which => FND_FILE.LOG
1523: ,buff => 'ZX_API_PUB.Calculate.Statistics Total Time:'||l_total_time);
1524: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
1525: FND_FILE.put_line(which => FND_FILE.LOG
1526: ,buff => 'ZX_API_PUB.Calculate.Statistics: Number of Records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
1527: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
1528: FND_FILE.put_line(which => FND_FILE.LOG
1529: ,buff => 'ZX_API_PUB.Calculate.Statistics: Number of Records in ZX_TRANSACTION_LINES_GT :'||l_dummy_number);
1530: END IF;
1525: FND_FILE.put_line(which => FND_FILE.LOG
1526: ,buff => 'ZX_API_PUB.Calculate.Statistics: Number of Records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
1527: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
1528: FND_FILE.put_line(which => FND_FILE.LOG
1529: ,buff => 'ZX_API_PUB.Calculate.Statistics: Number of Records in ZX_TRANSACTION_LINES_GT :'||l_dummy_number);
1530: END IF;
1531:
1532:
1533: END calculate_tax; --gtt version
1571: l_total_time VARCHAR2(15);
1572: BEGIN
1573: l_start_time := SYSDATE ;
1574: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1575: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: CALCULATE_TAX()+');
1576: END IF;
1577:
1578: /*--------------------------------------------------+
1579: | Standard start of API savepoint |
2203: ZX_GLOBAL_STRUCTURES_PKG.LOCATION_HASH_TBL.DELETE;
2204:
2205: -- If there exists error messages in Error Table
2206: -- call DUMP_MSG to insert them into ZX_ERRORS_GT
2207: IF ZX_API_PUB.errors_tbl.trx_id.COUNT > 0 THEN
2208: DUMP_MSG;
2209: END IF;
2210:
2211: --Reset the icx_session_id at end of API
2213: ZX_SECURITY.name_value('SESSIONID',to_char(ZX_SECURITY.G_ICX_SESSION_ID));
2214: -- dbms_session.set_context('my_ctx','SESSIONID',to_char(ZX_SECURITY.G_ICX_SESSION_ID));
2215:
2216: --Reset the calling API info at end of API
2217: ZX_API_PUB.G_PUB_CALLING_SRVC := null;
2218:
2219: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2220: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: CALCULATE_TAX()-');
2221: END IF;
2216: --Reset the calling API info at end of API
2217: ZX_API_PUB.G_PUB_CALLING_SRVC := null;
2218:
2219: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2220: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: CALCULATE_TAX()-');
2221: END IF;
2222:
2223: l_end_time:=SYSDATE;
2224: l_total_time:= floor((l_end_time-l_start_time)*24)|| ':' ||
2234: IF fnd_global.conc_request_id <> -1 THEN
2235: FND_FILE.put_line(which => FND_FILE.LOG
2236: ,buff => 'Transfer_Mode: '||G_DATA_TRANSFER_MODE);
2237: FND_FILE.put_line(which => FND_FILE.LOG
2238: ,buff => 'ZX_API_PUB.CALCULATE.Statistics Start Time:'
2239: ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
2240: FND_FILE.put_line(which => FND_FILE.LOG
2241: ,buff => 'ZX_API_PUB.CALCULATE.Statistics End Time:'
2242: ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
2237: FND_FILE.put_line(which => FND_FILE.LOG
2238: ,buff => 'ZX_API_PUB.CALCULATE.Statistics Start Time:'
2239: ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
2240: FND_FILE.put_line(which => FND_FILE.LOG
2241: ,buff => 'ZX_API_PUB.CALCULATE.Statistics End Time:'
2242: ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
2243: FND_FILE.put_line(which => FND_FILE.LOG
2244: ,buff => 'ZX_API_PUB.CALCULATE.Statistics Total Time:'
2245: ||l_total_time);
2240: FND_FILE.put_line(which => FND_FILE.LOG
2241: ,buff => 'ZX_API_PUB.CALCULATE.Statistics End Time:'
2242: ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
2243: FND_FILE.put_line(which => FND_FILE.LOG
2244: ,buff => 'ZX_API_PUB.CALCULATE.Statistics Total Time:'
2245: ||l_total_time);
2246: END IF;
2247:
2248:
2276: END IF;
2277:
2278: IF fnd_global.conc_request_id <> -1 THEN
2279: FND_FILE.put_line(which => FND_FILE.LOG
2280: ,buff => 'ZX_API_PUB.CALCULATE.Exception FND_API.G_EXC_ERROR Transfer_Mode: '||G_DATA_TRANSFER_MODE);
2281: FND_FILE.put_line(which => FND_FILE.LOG
2282: ,buff => 'ZX_API_PUB.CALCULATE.Statistics Start Time:'
2283: ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
2284: FND_FILE.put_line(which => FND_FILE.LOG
2278: IF fnd_global.conc_request_id <> -1 THEN
2279: FND_FILE.put_line(which => FND_FILE.LOG
2280: ,buff => 'ZX_API_PUB.CALCULATE.Exception FND_API.G_EXC_ERROR Transfer_Mode: '||G_DATA_TRANSFER_MODE);
2281: FND_FILE.put_line(which => FND_FILE.LOG
2282: ,buff => 'ZX_API_PUB.CALCULATE.Statistics Start Time:'
2283: ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
2284: FND_FILE.put_line(which => FND_FILE.LOG
2285: ,buff => 'ZX_API_PUB.CALCULATE.Statistics End Time:'
2286: ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
2281: FND_FILE.put_line(which => FND_FILE.LOG
2282: ,buff => 'ZX_API_PUB.CALCULATE.Statistics Start Time:'
2283: ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
2284: FND_FILE.put_line(which => FND_FILE.LOG
2285: ,buff => 'ZX_API_PUB.CALCULATE.Statistics End Time:'
2286: ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
2287: FND_FILE.put_line(which => FND_FILE.LOG
2288: ,buff => 'ZX_API_PUB.CALCULATE.Statistics Total Time:'
2289: ||l_total_time);
2284: FND_FILE.put_line(which => FND_FILE.LOG
2285: ,buff => 'ZX_API_PUB.CALCULATE.Statistics End Time:'
2286: ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
2287: FND_FILE.put_line(which => FND_FILE.LOG
2288: ,buff => 'ZX_API_PUB.CALCULATE.Statistics Total Time:'
2289: ||l_total_time);
2290: END IF;
2291:
2292: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2319: END IF;
2320:
2321: IF fnd_global.conc_request_id <> -1 THEN
2322: FND_FILE.put_line(which => FND_FILE.LOG
2323: ,buff => 'ZX_API_PUB.CALCULATE.Exception FND_API.G_EXC_UNEXPECTED_ERROR Transfer_Mode: '||G_DATA_TRANSFER_MODE);
2324: FND_FILE.put_line(which => FND_FILE.LOG
2325: ,buff => 'ZX_API_PUB.CALCULATE.Statistics Start Time:'
2326: ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
2327: FND_FILE.put_line(which => FND_FILE.LOG
2321: IF fnd_global.conc_request_id <> -1 THEN
2322: FND_FILE.put_line(which => FND_FILE.LOG
2323: ,buff => 'ZX_API_PUB.CALCULATE.Exception FND_API.G_EXC_UNEXPECTED_ERROR Transfer_Mode: '||G_DATA_TRANSFER_MODE);
2324: FND_FILE.put_line(which => FND_FILE.LOG
2325: ,buff => 'ZX_API_PUB.CALCULATE.Statistics Start Time:'
2326: ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
2327: FND_FILE.put_line(which => FND_FILE.LOG
2328: ,buff => 'ZX_API_PUB.CALCULATE.Statistics End Time:'
2329: ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
2324: FND_FILE.put_line(which => FND_FILE.LOG
2325: ,buff => 'ZX_API_PUB.CALCULATE.Statistics Start Time:'
2326: ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
2327: FND_FILE.put_line(which => FND_FILE.LOG
2328: ,buff => 'ZX_API_PUB.CALCULATE.Statistics End Time:'
2329: ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
2330: FND_FILE.put_line(which => FND_FILE.LOG
2331: ,buff => 'ZX_API_PUB.CALCULATE.Statistics Total Time:'
2332: ||l_total_time);
2327: FND_FILE.put_line(which => FND_FILE.LOG
2328: ,buff => 'ZX_API_PUB.CALCULATE.Statistics End Time:'
2329: ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
2330: FND_FILE.put_line(which => FND_FILE.LOG
2331: ,buff => 'ZX_API_PUB.CALCULATE.Statistics Total Time:'
2332: ||l_total_time);
2333: END IF;
2334:
2335: WHEN OTHERS THEN
2359: END IF;
2360:
2361: IF fnd_global.conc_request_id <> -1 THEN
2362: FND_FILE.put_line(which => FND_FILE.LOG
2363: ,buff => 'ZX_API_PUB.CALCULATE.Exception OTHERS Transfer_Mode: '||G_DATA_TRANSFER_MODE);
2364: FND_FILE.put_line(which => FND_FILE.LOG
2365: ,buff => 'ZX_API_PUB.CALCULATE.Statistics Start Time:'
2366: ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
2367: FND_FILE.put_line(which => FND_FILE.LOG
2361: IF fnd_global.conc_request_id <> -1 THEN
2362: FND_FILE.put_line(which => FND_FILE.LOG
2363: ,buff => 'ZX_API_PUB.CALCULATE.Exception OTHERS Transfer_Mode: '||G_DATA_TRANSFER_MODE);
2364: FND_FILE.put_line(which => FND_FILE.LOG
2365: ,buff => 'ZX_API_PUB.CALCULATE.Statistics Start Time:'
2366: ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
2367: FND_FILE.put_line(which => FND_FILE.LOG
2368: ,buff => 'ZX_API_PUB.CALCULATE.Statistics End Time:'
2369: ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
2364: FND_FILE.put_line(which => FND_FILE.LOG
2365: ,buff => 'ZX_API_PUB.CALCULATE.Statistics Start Time:'
2366: ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
2367: FND_FILE.put_line(which => FND_FILE.LOG
2368: ,buff => 'ZX_API_PUB.CALCULATE.Statistics End Time:'
2369: ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
2370: FND_FILE.put_line(which => FND_FILE.LOG
2371: ,buff => 'ZX_API_PUB.CALCULATE.Statistics Total Time:'
2372: ||l_total_time);
2367: FND_FILE.put_line(which => FND_FILE.LOG
2368: ,buff => 'ZX_API_PUB.CALCULATE.Statistics End Time:'
2369: ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
2370: FND_FILE.put_line(which => FND_FILE.LOG
2371: ,buff => 'ZX_API_PUB.CALCULATE.Statistics Total Time:'
2372: ||l_total_time);
2373: END IF;
2374:
2375:
2438: BEGIN
2439: l_start_time := SYSDATE ;
2440:
2441: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2442: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
2443: END IF;
2444:
2445: /*--------------------------------------------------+
2446: | Standard start of API savepoint |
2745: END LOOP;--event_classes cursor
2746:
2747: -- If there exists error messages in Error Table
2748: -- call DUMP_MSG to insert them into ZX_ERRORS_GT
2749: IF ZX_API_PUB.errors_tbl.trx_id.COUNT > 0 THEN
2750: DUMP_MSG;
2751: END IF;
2752:
2753: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2750: DUMP_MSG;
2751: END IF;
2752:
2753: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2754: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
2755: END IF;
2756:
2757: l_end_time:=SYSDATE;
2758: l_total_time:=floor((l_end_time-l_start_time)*24)|| ':' ||
2775:
2776: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
2777: IF fnd_global.conc_request_id <> -1 AND l_dummy_number > 1 THEN
2778: FND_FILE.put_line(which => FND_FILE.LOG
2779: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics Start Time:' ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
2780: FND_FILE.put_line(which => FND_FILE.LOG
2781: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics End Time:' ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
2782: FND_FILE.put_line(which => FND_FILE.LOG
2783: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics Total Time:' ||l_total_time);
2777: IF fnd_global.conc_request_id <> -1 AND l_dummy_number > 1 THEN
2778: FND_FILE.put_line(which => FND_FILE.LOG
2779: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics Start Time:' ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
2780: FND_FILE.put_line(which => FND_FILE.LOG
2781: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics End Time:' ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
2782: FND_FILE.put_line(which => FND_FILE.LOG
2783: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics Total Time:' ||l_total_time);
2784: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
2785: FND_FILE.put_line(which => FND_FILE.LOG
2779: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics Start Time:' ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
2780: FND_FILE.put_line(which => FND_FILE.LOG
2781: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics End Time:' ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
2782: FND_FILE.put_line(which => FND_FILE.LOG
2783: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics Total Time:' ||l_total_time);
2784: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
2785: FND_FILE.put_line(which => FND_FILE.LOG
2786: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
2787: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
2782: FND_FILE.put_line(which => FND_FILE.LOG
2783: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics Total Time:' ||l_total_time);
2784: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
2785: FND_FILE.put_line(which => FND_FILE.LOG
2786: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
2787: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
2788: FND_FILE.put_line(which => FND_FILE.LOG
2789: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRANSACTION_LINES_GT :'||l_dummy_number);
2790: SELECT COUNT(*) INTO l_dummy_number FROM ZX_IMPORT_TAX_LINES_GT;
2785: FND_FILE.put_line(which => FND_FILE.LOG
2786: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
2787: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
2788: FND_FILE.put_line(which => FND_FILE.LOG
2789: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRANSACTION_LINES_GT :'||l_dummy_number);
2790: SELECT COUNT(*) INTO l_dummy_number FROM ZX_IMPORT_TAX_LINES_GT;
2791: FND_FILE.put_line(which => FND_FILE.Log
2792: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_IMPORT_TAX_LINES_GT :'||l_dummy_number);
2793: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_TAX_LINK_GT;
2788: FND_FILE.put_line(which => FND_FILE.LOG
2789: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRANSACTION_LINES_GT :'||l_dummy_number);
2790: SELECT COUNT(*) INTO l_dummy_number FROM ZX_IMPORT_TAX_LINES_GT;
2791: FND_FILE.put_line(which => FND_FILE.Log
2792: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_IMPORT_TAX_LINES_GT :'||l_dummy_number);
2793: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_TAX_LINK_GT;
2794: FND_FILE.put_line(which => FND_FILE.LOG
2795: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRX_TAX_LINK_GT :'||l_dummy_number);
2796: END IF;
2791: FND_FILE.put_line(which => FND_FILE.Log
2792: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_IMPORT_TAX_LINES_GT :'||l_dummy_number);
2793: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_TAX_LINK_GT;
2794: FND_FILE.put_line(which => FND_FILE.LOG
2795: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRX_TAX_LINK_GT :'||l_dummy_number);
2796: END IF;
2797:
2798:
2799:
2827:
2828: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
2829: IF fnd_global.conc_request_id <> -1 AND l_dummy_number > 1 THEN
2830: FND_FILE.put_line(which => FND_FILE.LOG
2831: ,buff => 'ZX_API_PUB.import_document_with_tax.Exception FND_API.G_EXC_ERROR');
2832: FND_FILE.put_line(which => FND_FILE.LOG
2833: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics Start Time:' ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
2834: FND_FILE.put_line(which => FND_FILE.LOG
2835: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics End Time:' ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
2829: IF fnd_global.conc_request_id <> -1 AND l_dummy_number > 1 THEN
2830: FND_FILE.put_line(which => FND_FILE.LOG
2831: ,buff => 'ZX_API_PUB.import_document_with_tax.Exception FND_API.G_EXC_ERROR');
2832: FND_FILE.put_line(which => FND_FILE.LOG
2833: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics Start Time:' ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
2834: FND_FILE.put_line(which => FND_FILE.LOG
2835: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics End Time:' ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
2836: FND_FILE.put_line(which => FND_FILE.LOG
2837: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics Total Time:' ||l_total_time);
2831: ,buff => 'ZX_API_PUB.import_document_with_tax.Exception FND_API.G_EXC_ERROR');
2832: FND_FILE.put_line(which => FND_FILE.LOG
2833: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics Start Time:' ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
2834: FND_FILE.put_line(which => FND_FILE.LOG
2835: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics End Time:' ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
2836: FND_FILE.put_line(which => FND_FILE.LOG
2837: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics Total Time:' ||l_total_time);
2838: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
2839: FND_FILE.put_line(which => FND_FILE.LOG
2833: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics Start Time:' ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
2834: FND_FILE.put_line(which => FND_FILE.LOG
2835: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics End Time:' ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
2836: FND_FILE.put_line(which => FND_FILE.LOG
2837: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics Total Time:' ||l_total_time);
2838: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
2839: FND_FILE.put_line(which => FND_FILE.LOG
2840: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
2841: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
2836: FND_FILE.put_line(which => FND_FILE.LOG
2837: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics Total Time:' ||l_total_time);
2838: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
2839: FND_FILE.put_line(which => FND_FILE.LOG
2840: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
2841: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
2842: FND_FILE.put_line(which => FND_FILE.LOG
2843: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRANSACTION_LINES_GT :'||l_dummy_number);
2844: SELECT COUNT(*) INTO l_dummy_number FROM ZX_IMPORT_TAX_LINES_GT;
2839: FND_FILE.put_line(which => FND_FILE.LOG
2840: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
2841: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
2842: FND_FILE.put_line(which => FND_FILE.LOG
2843: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRANSACTION_LINES_GT :'||l_dummy_number);
2844: SELECT COUNT(*) INTO l_dummy_number FROM ZX_IMPORT_TAX_LINES_GT;
2845: FND_FILE.put_line(which => FND_FILE.Log
2846: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_IMPORT_TAX_LINES_GT :'||l_dummy_number);
2847: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_TAX_LINK_GT;
2842: FND_FILE.put_line(which => FND_FILE.LOG
2843: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRANSACTION_LINES_GT :'||l_dummy_number);
2844: SELECT COUNT(*) INTO l_dummy_number FROM ZX_IMPORT_TAX_LINES_GT;
2845: FND_FILE.put_line(which => FND_FILE.Log
2846: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_IMPORT_TAX_LINES_GT :'||l_dummy_number);
2847: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_TAX_LINK_GT;
2848: FND_FILE.put_line(which => FND_FILE.LOG
2849: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRX_TAX_LINK_GT :'||l_dummy_number);
2850: END IF;
2845: FND_FILE.put_line(which => FND_FILE.Log
2846: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_IMPORT_TAX_LINES_GT :'||l_dummy_number);
2847: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_TAX_LINK_GT;
2848: FND_FILE.put_line(which => FND_FILE.LOG
2849: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRX_TAX_LINK_GT :'||l_dummy_number);
2850: END IF;
2851:
2852:
2853: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2891:
2892: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
2893: IF fnd_global.conc_request_id <> -1 AND l_dummy_number > 1 THEN
2894: FND_FILE.put_line(which => FND_FILE.LOG
2895: ,buff => 'ZX_API_PUB.import_document_with_tax.Exception FND_API.G_EXC_UNEXPECTED_ERROR');
2896: FND_FILE.put_line(which => FND_FILE.LOG
2897: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics Start Time:' ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
2898: FND_FILE.put_line(which => FND_FILE.LOG
2899: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics End Time:' ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
2893: IF fnd_global.conc_request_id <> -1 AND l_dummy_number > 1 THEN
2894: FND_FILE.put_line(which => FND_FILE.LOG
2895: ,buff => 'ZX_API_PUB.import_document_with_tax.Exception FND_API.G_EXC_UNEXPECTED_ERROR');
2896: FND_FILE.put_line(which => FND_FILE.LOG
2897: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics Start Time:' ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
2898: FND_FILE.put_line(which => FND_FILE.LOG
2899: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics End Time:' ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
2900: FND_FILE.put_line(which => FND_FILE.LOG
2901: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics Total Time:' ||l_total_time);
2895: ,buff => 'ZX_API_PUB.import_document_with_tax.Exception FND_API.G_EXC_UNEXPECTED_ERROR');
2896: FND_FILE.put_line(which => FND_FILE.LOG
2897: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics Start Time:' ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
2898: FND_FILE.put_line(which => FND_FILE.LOG
2899: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics End Time:' ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
2900: FND_FILE.put_line(which => FND_FILE.LOG
2901: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics Total Time:' ||l_total_time);
2902: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
2903: FND_FILE.put_line(which => FND_FILE.LOG
2897: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics Start Time:' ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
2898: FND_FILE.put_line(which => FND_FILE.LOG
2899: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics End Time:' ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
2900: FND_FILE.put_line(which => FND_FILE.LOG
2901: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics Total Time:' ||l_total_time);
2902: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
2903: FND_FILE.put_line(which => FND_FILE.LOG
2904: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
2905: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
2900: FND_FILE.put_line(which => FND_FILE.LOG
2901: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics Total Time:' ||l_total_time);
2902: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
2903: FND_FILE.put_line(which => FND_FILE.LOG
2904: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
2905: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
2906: FND_FILE.put_line(which => FND_FILE.LOG
2907: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRANSACTION_LINES_GT :'||l_dummy_number);
2908: SELECT COUNT(*) INTO l_dummy_number FROM ZX_IMPORT_TAX_LINES_GT;
2903: FND_FILE.put_line(which => FND_FILE.LOG
2904: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
2905: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
2906: FND_FILE.put_line(which => FND_FILE.LOG
2907: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRANSACTION_LINES_GT :'||l_dummy_number);
2908: SELECT COUNT(*) INTO l_dummy_number FROM ZX_IMPORT_TAX_LINES_GT;
2909: FND_FILE.put_line(which => FND_FILE.Log
2910: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_IMPORT_TAX_LINES_GT :'||l_dummy_number);
2911: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_TAX_LINK_GT;
2906: FND_FILE.put_line(which => FND_FILE.LOG
2907: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRANSACTION_LINES_GT :'||l_dummy_number);
2908: SELECT COUNT(*) INTO l_dummy_number FROM ZX_IMPORT_TAX_LINES_GT;
2909: FND_FILE.put_line(which => FND_FILE.Log
2910: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_IMPORT_TAX_LINES_GT :'||l_dummy_number);
2911: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_TAX_LINK_GT;
2912: FND_FILE.put_line(which => FND_FILE.LOG
2913: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRX_TAX_LINK_GT :'||l_dummy_number);
2914: END IF;
2909: FND_FILE.put_line(which => FND_FILE.Log
2910: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_IMPORT_TAX_LINES_GT :'||l_dummy_number);
2911: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_TAX_LINK_GT;
2912: FND_FILE.put_line(which => FND_FILE.LOG
2913: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRX_TAX_LINK_GT :'||l_dummy_number);
2914: END IF;
2915:
2916: WHEN OTHERS THEN
2917: ROLLBACK TO Import_Document_PVT;
2950:
2951: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
2952: IF fnd_global.conc_request_id <> -1 AND l_dummy_number > 1 THEN
2953: FND_FILE.put_line(which => FND_FILE.LOG
2954: ,buff => 'ZX_API_PUB.import_document_with_tax.Exception OTHERS');
2955: FND_FILE.put_line(which => FND_FILE.LOG
2956: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics Start Time:' ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
2957: FND_FILE.put_line(which => FND_FILE.LOG
2958: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics End Time:' ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
2952: IF fnd_global.conc_request_id <> -1 AND l_dummy_number > 1 THEN
2953: FND_FILE.put_line(which => FND_FILE.LOG
2954: ,buff => 'ZX_API_PUB.import_document_with_tax.Exception OTHERS');
2955: FND_FILE.put_line(which => FND_FILE.LOG
2956: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics Start Time:' ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
2957: FND_FILE.put_line(which => FND_FILE.LOG
2958: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics End Time:' ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
2959: FND_FILE.put_line(which => FND_FILE.LOG
2960: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics Total Time:' ||l_total_time);
2954: ,buff => 'ZX_API_PUB.import_document_with_tax.Exception OTHERS');
2955: FND_FILE.put_line(which => FND_FILE.LOG
2956: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics Start Time:' ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
2957: FND_FILE.put_line(which => FND_FILE.LOG
2958: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics End Time:' ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
2959: FND_FILE.put_line(which => FND_FILE.LOG
2960: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics Total Time:' ||l_total_time);
2961: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
2962: FND_FILE.put_line(which => FND_FILE.LOG
2956: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics Start Time:' ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
2957: FND_FILE.put_line(which => FND_FILE.LOG
2958: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics End Time:' ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
2959: FND_FILE.put_line(which => FND_FILE.LOG
2960: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics Total Time:' ||l_total_time);
2961: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
2962: FND_FILE.put_line(which => FND_FILE.LOG
2963: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
2964: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
2959: FND_FILE.put_line(which => FND_FILE.LOG
2960: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics Total Time:' ||l_total_time);
2961: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
2962: FND_FILE.put_line(which => FND_FILE.LOG
2963: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
2964: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
2965: FND_FILE.put_line(which => FND_FILE.LOG
2966: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRANSACTION_LINES_GT :'||l_dummy_number);
2967: SELECT COUNT(*) INTO l_dummy_number FROM ZX_IMPORT_TAX_LINES_GT;
2962: FND_FILE.put_line(which => FND_FILE.LOG
2963: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
2964: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
2965: FND_FILE.put_line(which => FND_FILE.LOG
2966: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRANSACTION_LINES_GT :'||l_dummy_number);
2967: SELECT COUNT(*) INTO l_dummy_number FROM ZX_IMPORT_TAX_LINES_GT;
2968: FND_FILE.put_line(which => FND_FILE.Log
2969: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_IMPORT_TAX_LINES_GT :'||l_dummy_number);
2970: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_TAX_LINK_GT;
2965: FND_FILE.put_line(which => FND_FILE.LOG
2966: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRANSACTION_LINES_GT :'||l_dummy_number);
2967: SELECT COUNT(*) INTO l_dummy_number FROM ZX_IMPORT_TAX_LINES_GT;
2968: FND_FILE.put_line(which => FND_FILE.Log
2969: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_IMPORT_TAX_LINES_GT :'||l_dummy_number);
2970: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_TAX_LINK_GT;
2971: FND_FILE.put_line(which => FND_FILE.LOG
2972: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRX_TAX_LINK_GT :'||l_dummy_number);
2973: END IF;
2968: FND_FILE.put_line(which => FND_FILE.Log
2969: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_IMPORT_TAX_LINES_GT :'||l_dummy_number);
2970: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_TAX_LINK_GT;
2971: FND_FILE.put_line(which => FND_FILE.LOG
2972: ,buff => 'ZX_API_PUB.import_document_with_tax.Statistics: Number of records in ZX_TRX_TAX_LINK_GT :'||l_dummy_number);
2973: END IF;
2974:
2975: END import_document_with_tax;
2976:
3004: BEGIN
3005: l_start_time:=SYSDATE;
3006:
3007: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
3008: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
3009: END IF;
3010:
3011:
3012: /*--------------------------------------------------+
3337:
3338: /********Partner Code End *************************/
3339:
3340: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
3341: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()-');
3342: END IF;
3343:
3344: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
3345: l_end_time:=SYSDATE;
3483:
3484: BEGIN
3485: l_start_time:= SYSDATE;
3486: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
3487: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
3488: END IF;
3489:
3490:
3491: /*--------------------------------------------------+
3711: --records sitting there
3712: ZX_GLOBAL_STRUCTURES_PKG.delete_trx_line_dist_tbl;
3713:
3714: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
3715: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
3716: END IF;
3717:
3718:
3719: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
3828: ) IS
3829: l_api_name CONSTANT VARCHAR2(30) := 'GLOBAL_DOCUMENT_UPDATE';
3830: l_api_version CONSTANT NUMBER := 1.0;
3831: l_return_status VARCHAR2(30);
3832: l_validation_status ZX_API_PUB.validation_status_tbl_type;
3833: l_init_msg_list VARCHAR2(1);
3834:
3835: BEGIN
3836: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
3833: l_init_msg_list VARCHAR2(1);
3834:
3835: BEGIN
3836: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
3837: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
3838: END IF;
3839:
3840: /*--------------------------------------------------+
3841: | Standard start of API savepoint |
3884: | Calling Global Document Update with |
3885: | with validation status |
3886: +-----------------------------------------------*/
3887:
3888: ZX_API_PUB.global_document_update(p_api_version,
3889: l_init_msg_list,
3890: p_commit,
3891: p_validation_level,
3892: l_return_status,
3897: );
3898:
3899: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3900: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3901: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,G_PKG_NAME||': '||l_api_name||':ZX_API_PUB.global_document_update returned errors');
3902: END IF;
3903: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3904: RAISE FND_API.G_EXC_ERROR;
3905: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3907: END IF;
3908: END IF;
3909:
3910: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
3911: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
3912: END IF;
3913:
3914: EXCEPTION
3915: WHEN FND_API.G_EXC_ERROR THEN
3980: x_return_status OUT NOCOPY VARCHAR2,
3981: x_msg_count OUT NOCOPY NUMBER,
3982: x_msg_data OUT NOCOPY VARCHAR2,
3983: p_transaction_rec IN OUT NOCOPY transaction_rec_type,
3984: p_validation_status IN ZX_API_PUB.validation_status_tbl_type
3985: ) IS
3986: l_api_name CONSTANT VARCHAR2(30) := 'GLOBAL_DOCUMENT_UPDATE';
3987: l_api_version CONSTANT NUMBER := 1.0;
3988: l_event_class_rec event_class_rec_type;
3996: lb_jai_exists BOOLEAN := FALSE;
3997:
3998: BEGIN
3999: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4000: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
4001: END IF;
4002:
4003: /*--------------------------------------------------+
4004: | Standard start of API savepoint |
4157: l_context_info_rec.APPLICATION_ID := p_transaction_rec.APPLICATION_ID;
4158: l_context_info_rec.ENTITY_CODE := p_transaction_rec.ENTITY_CODE;
4159: l_context_info_rec.EVENT_CLASS_CODE := p_transaction_rec.EVENT_CLASS_CODE;
4160: l_context_info_rec.TRX_ID := p_transaction_rec.TRX_ID;
4161: ZX_API_PUB.add_msg( p_context_info_rec => l_context_info_rec );
4162: RAISE FND_API.G_EXC_ERROR;
4163: ELSE
4164: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4165: END IF;
4240: END IF;
4241:
4242:
4243: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4244: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
4245: END IF;
4246:
4247: EXCEPTION
4248: WHEN FND_API.G_EXC_ERROR THEN
4322: l_init_msg_list VARCHAR2(1);
4323: l_event_type_code VARCHAR2(30);
4324: BEGIN
4325: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4326: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
4327: END IF;
4328:
4329: /*--------------------------------------------------+
4330: | Standard start of API savepoint |
4443: END;
4444:
4445:
4446: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4447: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
4448: END IF;
4449:
4450: /* Bug 3704651 - No need to uptake error handling as it is a PLS API*/
4451: EXCEPTION
4530: l_init_msg_list VARCHAR2(1);
4531:
4532: BEGIN
4533: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4534: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
4535: END IF;
4536:
4537: /*--------------------------------------------------+
4538: | Standard start of API savepoint |
4630: --records sitting there
4631: ZX_GLOBAL_STRUCTURES_PKG.delete_trx_line_dist_tbl;
4632:
4633: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4634: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
4635: END IF;
4636:
4637: EXCEPTION
4638: WHEN FND_API.G_EXC_ERROR THEN
4705: l_init_msg_list VARCHAR2(1);
4706:
4707: BEGIN
4708: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4709: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
4710: END IF;
4711:
4712: /*--------------------------------------------------+
4713: | Standard start of API savepoint |
4789: END IF;
4790: END IF;
4791:
4792: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4793: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
4794: END IF;
4795:
4796: EXCEPTION
4797: WHEN FND_API.G_EXC_ERROR THEN
4862: l_init_msg_list VARCHAR2(1);
4863:
4864: BEGIN
4865: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4866: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
4867: END IF;
4868:
4869: /*--------------------------------------------------+
4870: | Standard start of API savepoint |
4988: END IF;
4989: END IF;
4990:
4991: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4992: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
4993: END IF;
4994:
4995: EXCEPTION
4996: WHEN FND_API.G_EXC_ERROR THEN
5200: BEGIN
5201: l_start_time := SYSDATE ;
5202:
5203: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
5204: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
5205: END IF;
5206:
5207: /*--------------------------------------------------+
5208: | Standard start of API savepoint |
5441: l_context_info_rec.APPLICATION_ID := invalid_rec.APPLICATION_ID;
5442: l_context_info_rec.ENTITY_CODE := invalid_rec.ENTITY_CODE;
5443: l_context_info_rec.EVENT_CLASS_CODE := invalid_rec.EVENT_CLASS_CODE;
5444: l_context_info_rec.TRX_ID := invalid_rec.TRX_ID;
5445: ZX_API_PUB.add_msg( p_context_info_rec =>l_context_info_rec );
5446: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
5447: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Transaction line distribution quantity is required');
5448: END IF;
5449: END LOOP;
5458: l_context_info_rec.APPLICATION_ID := invalid_rec.APPLICATION_ID;
5459: l_context_info_rec.ENTITY_CODE := invalid_rec.ENTITY_CODE;
5460: l_context_info_rec.EVENT_CLASS_CODE := invalid_rec.EVENT_CLASS_CODE;
5461: l_context_info_rec.TRX_ID := invalid_rec.TRX_ID;
5462: ZX_API_PUB.add_msg( p_context_info_rec =>l_context_info_rec );
5463: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
5464: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Transaction line distribution unit price is required');
5465: END IF;
5466: END LOOP;
5733: 'After calling calc_variance_factors ' ||
5734: ' return_status = ' || x_return_status);
5735: FND_LOG.STRING(g_level_statement,
5736: G_MODULE_NAME||l_api_name,
5737: 'ZX_API_PUB.DETERMINE_RECOVERY(-)');
5738: END IF;
5739: --DUMP_MSG;
5740: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
5741: RAISE FND_API.G_EXC_ERROR;
5865: -- dbms_session.set_context('my_ctx','SESSIONID',to_char(ZX_SECURITY.G_ICX_SESSION_ID));
5866:
5867:
5868: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
5869: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
5870: END IF;
5871:
5872: l_end_time:=SYSDATE;
5873: l_total_time:=floor((l_end_time-l_start_time)*24)|| ':' ||
5886:
5887: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
5888: IF fnd_global.conc_request_id <> -1 AND l_dummy_number > 1 THEN
5889: FND_FILE.put_line(which => FND_FILE.LOG
5890: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics Start Time:'
5891: ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
5892: FND_FILE.put_line(which => FND_FILE.LOG
5893: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics End Time:'
5894: ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
5889: FND_FILE.put_line(which => FND_FILE.LOG
5890: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics Start Time:'
5891: ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
5892: FND_FILE.put_line(which => FND_FILE.LOG
5893: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics End Time:'
5894: ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
5895: FND_FILE.put_line(which => FND_FILE.LOG
5896: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics Total Time:'
5897: ||l_total_time);
5892: FND_FILE.put_line(which => FND_FILE.LOG
5893: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics End Time:'
5894: ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
5895: FND_FILE.put_line(which => FND_FILE.LOG
5896: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics Total Time:'
5897: ||l_total_time);
5898: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
5899: FND_FILE.put_line(which => FND_FILE.LOG
5900: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics: Number of Records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
5896: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics Total Time:'
5897: ||l_total_time);
5898: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
5899: FND_FILE.put_line(which => FND_FILE.LOG
5900: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics: Number of Records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
5901: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
5902: FND_FILE.put_line(which => FND_FILE.LOG
5903: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics: Number of Records in ZX_TRANSACTION_LINES_GT :'||l_dummy_number);
5904: END IF;
5899: FND_FILE.put_line(which => FND_FILE.LOG
5900: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics: Number of Records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
5901: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
5902: FND_FILE.put_line(which => FND_FILE.LOG
5903: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics: Number of Records in ZX_TRANSACTION_LINES_GT :'||l_dummy_number);
5904: END IF;
5905:
5906: EXCEPTION
5907: WHEN FND_API.G_EXC_ERROR THEN
5931:
5932: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
5933: IF fnd_global.conc_request_id <> -1 AND l_dummy_number > 1 THEN
5934: FND_FILE.put_line(which => FND_FILE.LOG
5935: ,buff => 'ZX_API_PUB.Determine_recovery.Exception FND_API.G_EXC_ERROR');
5936:
5937: FND_FILE.put_line(which => FND_FILE.LOG
5938: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics Start Time:'
5939: ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
5934: FND_FILE.put_line(which => FND_FILE.LOG
5935: ,buff => 'ZX_API_PUB.Determine_recovery.Exception FND_API.G_EXC_ERROR');
5936:
5937: FND_FILE.put_line(which => FND_FILE.LOG
5938: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics Start Time:'
5939: ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
5940: FND_FILE.put_line(which => FND_FILE.LOG
5941: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics End Time:'
5942: ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
5937: FND_FILE.put_line(which => FND_FILE.LOG
5938: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics Start Time:'
5939: ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
5940: FND_FILE.put_line(which => FND_FILE.LOG
5941: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics End Time:'
5942: ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
5943: FND_FILE.put_line(which => FND_FILE.LOG
5944: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics Total Time:'
5945: ||l_total_time);
5940: FND_FILE.put_line(which => FND_FILE.LOG
5941: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics End Time:'
5942: ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
5943: FND_FILE.put_line(which => FND_FILE.LOG
5944: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics Total Time:'
5945: ||l_total_time);
5946: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
5947: FND_FILE.put_line(which => FND_FILE.LOG
5948: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics: Number of Records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
5944: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics Total Time:'
5945: ||l_total_time);
5946: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
5947: FND_FILE.put_line(which => FND_FILE.LOG
5948: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics: Number of Records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
5949: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
5950: FND_FILE.put_line(which => FND_FILE.LOG
5951: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics: Number of Records in ZX_TRANSACTION_LINES_GT :'||l_dummy_number);
5952: END IF;
5947: FND_FILE.put_line(which => FND_FILE.LOG
5948: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics: Number of Records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
5949: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
5950: FND_FILE.put_line(which => FND_FILE.LOG
5951: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics: Number of Records in ZX_TRANSACTION_LINES_GT :'||l_dummy_number);
5952: END IF;
5953:
5954:
5955: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5990:
5991: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
5992: IF fnd_global.conc_request_id <> -1 AND l_dummy_number > 1 THEN
5993: FND_FILE.put_line(which => FND_FILE.LOG
5994: ,buff => 'ZX_API_PUB.Determine_recovery.Exception FND_API.G_EXC_ERROR');
5995: FND_FILE.put_line(which => FND_FILE.LOG
5996: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics Start Time:'
5997: ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
5998: FND_FILE.put_line(which => FND_FILE.LOG
5992: IF fnd_global.conc_request_id <> -1 AND l_dummy_number > 1 THEN
5993: FND_FILE.put_line(which => FND_FILE.LOG
5994: ,buff => 'ZX_API_PUB.Determine_recovery.Exception FND_API.G_EXC_ERROR');
5995: FND_FILE.put_line(which => FND_FILE.LOG
5996: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics Start Time:'
5997: ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
5998: FND_FILE.put_line(which => FND_FILE.LOG
5999: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics End Time:'
6000: ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
5995: FND_FILE.put_line(which => FND_FILE.LOG
5996: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics Start Time:'
5997: ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
5998: FND_FILE.put_line(which => FND_FILE.LOG
5999: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics End Time:'
6000: ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
6001: FND_FILE.put_line(which => FND_FILE.LOG
6002: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics Total Time:'
6003: ||l_total_time);
5998: FND_FILE.put_line(which => FND_FILE.LOG
5999: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics End Time:'
6000: ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
6001: FND_FILE.put_line(which => FND_FILE.LOG
6002: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics Total Time:'
6003: ||l_total_time);
6004: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
6005: FND_FILE.put_line(which => FND_FILE.LOG
6006: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics: Number of Records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
6002: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics Total Time:'
6003: ||l_total_time);
6004: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
6005: FND_FILE.put_line(which => FND_FILE.LOG
6006: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics: Number of Records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
6007: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
6008: FND_FILE.put_line(which => FND_FILE.LOG
6009: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics: Number of Records in ZX_TRANSACTION_LINES_GT :'||l_dummy_number);
6010: END IF;
6005: FND_FILE.put_line(which => FND_FILE.LOG
6006: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics: Number of Records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
6007: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
6008: FND_FILE.put_line(which => FND_FILE.LOG
6009: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics: Number of Records in ZX_TRANSACTION_LINES_GT :'||l_dummy_number);
6010: END IF;
6011:
6012:
6013: WHEN OTHERS THEN
6043:
6044: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
6045: IF fnd_global.conc_request_id <> -1 AND l_dummy_number > 1 THEN
6046: FND_FILE.put_line(which => FND_FILE.LOG
6047: ,buff => 'ZX_API_PUB.Determine_recovery.Exception OTHERS');
6048: FND_FILE.put_line(which => FND_FILE.LOG
6049: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics Start Time:'
6050: ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
6051: FND_FILE.put_line(which => FND_FILE.LOG
6045: IF fnd_global.conc_request_id <> -1 AND l_dummy_number > 1 THEN
6046: FND_FILE.put_line(which => FND_FILE.LOG
6047: ,buff => 'ZX_API_PUB.Determine_recovery.Exception OTHERS');
6048: FND_FILE.put_line(which => FND_FILE.LOG
6049: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics Start Time:'
6050: ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
6051: FND_FILE.put_line(which => FND_FILE.LOG
6052: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics End Time:'
6053: ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
6048: FND_FILE.put_line(which => FND_FILE.LOG
6049: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics Start Time:'
6050: ||to_char(l_start_time,'DD-MM-YYYY HH24:MI:SS'));
6051: FND_FILE.put_line(which => FND_FILE.LOG
6052: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics End Time:'
6053: ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
6054: FND_FILE.put_line(which => FND_FILE.LOG
6055: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics Total Time:'
6056: ||l_total_time);
6051: FND_FILE.put_line(which => FND_FILE.LOG
6052: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics End Time:'
6053: ||to_char(l_end_time,'DD-MM-YYYY HH24:MI:SS'));
6054: FND_FILE.put_line(which => FND_FILE.LOG
6055: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics Total Time:'
6056: ||l_total_time);
6057: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
6058: FND_FILE.put_line(which => FND_FILE.LOG
6059: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics: Number of Records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
6055: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics Total Time:'
6056: ||l_total_time);
6057: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRX_HEADERS_GT;
6058: FND_FILE.put_line(which => FND_FILE.LOG
6059: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics: Number of Records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
6060: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
6061: FND_FILE.put_line(which => FND_FILE.LOG
6062: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics: Number of Records in ZX_TRANSACTION_LINES_GT :'||l_dummy_number);
6063: END IF;
6058: FND_FILE.put_line(which => FND_FILE.LOG
6059: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics: Number of Records in ZX_TRX_HEADERS_GT :'||l_dummy_number);
6060: SELECT COUNT(*) INTO l_dummy_number FROM ZX_TRANSACTION_LINES_GT;
6061: FND_FILE.put_line(which => FND_FILE.LOG
6062: ,buff => 'ZX_API_PUB.Determine_recovery.Statistics: Number of Records in ZX_TRANSACTION_LINES_GT :'||l_dummy_number);
6063: END IF;
6064:
6065: END determine_recovery;
6066:
6087: l_record_dist_lines VARCHAR2(1);
6088:
6089: BEGIN
6090: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
6091: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
6092: END IF;
6093:
6094: /*--------------------------------------------------+
6095: | Standard start of API savepoint |
6203: END IF;
6204: END IF;
6205:
6206: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
6207: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
6208: END IF;
6209:
6210: /* Bug 3704651 - No need to uptake error handling as it is a PLS API*/
6211: EXCEPTION
6317:
6318: BEGIN
6319:
6320: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
6321: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
6322: END IF;
6323:
6324: /*--------------------------------------------------+
6325: | Standard start of API savepoint |
6461: END IF;
6462:
6463:
6464: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
6465: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
6466: END IF;
6467:
6468: EXCEPTION
6469: WHEN FND_API.G_EXC_ERROR THEN
6546: l_init_msg_list VARCHAR2(1);
6547:
6548: BEGIN
6549: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
6550: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
6551: END IF;
6552:
6553: /*--------------------------------------------------+
6554: | Standard start of API savepoint |
6768: END IF;
6769: END IF;
6770:
6771: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
6772: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
6773: END IF;
6774:
6775: /* Bug 3704651 - No need to uptake error handling as it is a PLS API*/
6776: EXCEPTION
6857: l_init_msg_list VARCHAR2(1);
6858:
6859: BEGIN
6860: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
6861: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
6862: END IF;
6863:
6864: /*--------------------------------------------------+
6865: | Standard start of API savepoint |
6922: END IF;
6923: END IF;
6924:
6925: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
6926: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()+');
6927: END IF;
6928:
6929: EXCEPTION
6930: WHEN FND_API.G_EXC_ERROR THEN
7009:
7010: BEGIN
7011:
7012: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
7013: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
7014: END IF;
7015:
7016: /*--------------------------------------------------+
7017: | Standard start of API savepoint |
7196: AND EVENT_CLASS_CODE = p_transaction_rec.EVENT_CLASS_CODE
7197: AND TRX_ID = p_transaction_rec.TRX_ID;
7198:
7199: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
7200: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()+');
7201: END IF;
7202:
7203: EXCEPTION
7204: WHEN FND_API.G_EXC_ERROR THEN
7288: AND event_class_code = p_transaction_rec.event_class_code;
7289:
7290: BEGIN
7291: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
7292: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
7293: END IF;
7294:
7295:
7296: /*--------------------------------------------------+
7410: END IF;
7411: END IF;
7412:
7413: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
7414: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
7415: END IF;
7416:
7417: EXCEPTION
7418: WHEN FND_API.G_EXC_ERROR THEN
7484: x_msg_count OUT NOCOPY NUMBER ,
7485: x_msg_data OUT NOCOPY VARCHAR2,
7486: p_transaction_rec IN OUT NOCOPY transaction_rec_type,
7487: x_validation_status OUT NOCOPY VARCHAR2,
7488: x_hold_codes_tbl OUT NOCOPY ZX_API_PUB.hold_codes_tbl_type
7489: ) IS
7490: l_api_name CONSTANT VARCHAR2(30) := 'VALIDATE_DOCUMENT_FOR_TAX';
7491: l_api_version CONSTANT NUMBER := 1.0;
7492: l_return_status VARCHAR2(30);
7497: lb_jai_exists BOOLEAN := FALSE;
7498:
7499: BEGIN
7500: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
7501: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
7502: END IF;
7503:
7504:
7505: /*--------------------------------------------------+
7640: AND EVENT_CLASS_CODE = p_transaction_rec.EVENT_CLASS_CODE
7641: AND TRX_ID = p_transaction_rec.TRX_ID;
7642:
7643: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
7644: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
7645: END IF;
7646:
7647: EXCEPTION
7648: WHEN FND_API.G_EXC_ERROR THEN
7758:
7759:
7760: BEGIN
7761: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
7762: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'(+)');
7763: END IF;
7764:
7765:
7766: /*--------------------------------------------------+
7922: l_init_msg_list VARCHAR2(1);
7923:
7924: BEGIN
7925: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
7926: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
7927: END IF;
7928:
7929:
7930: /*--------------------------------------------------+
7992: END IF;
7993:
7994:
7995: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
7996: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()+');
7997: END IF;
7998:
7999: EXCEPTION
8000: WHEN FND_API.G_EXC_ERROR THEN
8164: AND ptp.party_type_code = 'OU';
8165:
8166: BEGIN
8167: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
8168: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
8169: END IF;
8170:
8171: /*--------------------------------------------------+
8172: | Standard start of API savepoint |
8456: END IF;
8457: END IF; --tax method condition
8458:
8459: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
8460: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()+');
8461: END IF;
8462:
8463: EXCEPTION
8464: WHEN FND_API.G_EXC_ERROR THEN
8557: l_redef_tax_class_code_rec def_tax_cls_code_info_rec_type;
8558:
8559: BEGIN
8560: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
8561: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
8562: END IF;
8563:
8564: /*--------------------------------------------------+
8565: | Standard start of API savepoint |
8755: END IF;
8756: END IF;
8757:
8758: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
8759: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()+');
8760: END IF;
8761:
8762: EXCEPTION
8763: WHEN FND_API.G_EXC_ERROR THEN
8844: l_effective_date DATE;
8845:
8846: BEGIN
8847: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
8848: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
8849: END IF;
8850:
8851: /*--------------------------------------------------+
8852: | Standard start of API savepoint |
8919: p_data => x_msg_data
8920: );
8921:
8922: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
8923: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
8924: END IF;
8925:
8926: EXCEPTION
8927: WHEN FND_API.G_EXC_ERROR THEN
9009: l_init_msg_list VARCHAR2(1);
9010:
9011: BEGIN
9012: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
9013: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
9014: END IF;
9015:
9016: /*--------------------------------------------------+
9017: | Standard start of API savepoint |
9083: p_data => x_msg_data
9084: );
9085:
9086: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
9087: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
9088: END IF;
9089:
9090: EXCEPTION
9091: WHEN FND_API.G_EXC_ERROR THEN
9172: l_zx_product_options_rec ZX_GLOBAL_STRUCTURES_PKG.zx_product_options_rec_type;
9173:
9174: BEGIN
9175: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
9176: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
9177: END IF;
9178:
9179: /*--------------------------------------------------+
9180: | Standard start of API savepoint |
9359: l_api_version CONSTANT NUMBER := 1.0;
9360:
9361: BEGIN
9362: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
9363: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
9364: END IF;
9365:
9366: END rollback_for_tax;
9367:
9383: l_api_version CONSTANT NUMBER := 1.0;
9384:
9385: BEGIN
9386: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
9387: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
9388: END IF;
9389:
9390: END commit_for_tax;
9391:
9401: l_mesg VARCHAR2(2000);
9402: l_api_name CONSTANT VARCHAR2(30) := 'ADD_MSG';
9403: BEGIN
9404: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
9405: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
9406: END IF;
9407: --Add unexpected errors to fnd_stack
9408: IF p_context_info_rec.application_id is null THEN
9409: FND_MSG_PUB.Add();
9454: l_count:=errors_tbl.application_id.COUNT;
9455: END IF; --G_DATA_TRANSFER_MODE
9456:
9457: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
9458: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
9459: END IF;
9460: END add_msg;
9461:
9462: /* ============================================================================*
9466: IS
9467: l_api_name CONSTANT VARCHAR2(30) := 'DUMP_MSG';
9468: BEGIN
9469: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
9470: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
9471: END IF;
9472: FORALL i IN 1 .. nvl(errors_tbl.application_id.LAST,-99)
9473: INSERT INTO ZX_ERRORS_GT (application_id,
9474: entity_code,
9506: errors_tbl.tax_line_id.delete;
9507: errors_tbl.trx_line_dist_id.delete;
9508: errors_tbl.message_text.delete;
9509: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
9510: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()-');
9511: END IF;
9512: END dump_msg;
9513:
9514: /* =======================================================================*
9522: ) RETURN DATE IS
9523:
9524: BEGIN
9525: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
9526: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||'DETERMINE_EFFECTIVE_DATE.BEGIN','ZX_API_PUB: DETERMINE_EFFECTIVE_DATE()+');
9527: END IF;
9528:
9529: IF p_related_doc_date IS NOT NULL THEN
9530: return(p_related_doc_date);
9536: return(SYSDATE);
9537: END IF;
9538:
9539: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
9540: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||'DETERMINE_EFFECTIVE_DATE.END','ZX_API_PUB: DETERMINE_EFFECTIVE_DATE()-');
9541: END IF;
9542:
9543: END determine_effective_date;
9544:
9567: l_context_info_rec context_info_rec_type;
9568: l_init_msg_list VARCHAR2(1);
9569: BEGIN
9570: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
9571: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
9572: END IF;
9573:
9574: /*--------------------------------------------------+
9575: | Standard start of API savepoint |
9642: END IF;
9643:
9644:
9645: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
9646: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
9647: END IF;
9648:
9649: EXCEPTION
9650: WHEN FND_API.G_EXC_ERROR THEN
9734: l_do_defaulting BOOLEAN;
9735: l_upg_trx_info_rec ZX_ON_FLY_TRX_UPGRADE_PKG.zx_upg_trx_info_rec_type;
9736: BEGIN
9737: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
9738: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'1()+');
9739: END IF;
9740:
9741: /*--------------------------------------------------+
9742: | Standard start of API savepoint |
10010: --records sitting there
10011: ZX_GLOBAL_STRUCTURES_PKG.delete_trx_line_dist_tbl;
10012:
10013: --Reset G_PUB_CALLING_SRVC at end of API
10014: ZX_API_PUB.G_PUB_CALLING_SRVC := null;
10015:
10016: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
10017: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
10018: END IF;
10013: --Reset G_PUB_CALLING_SRVC at end of API
10014: ZX_API_PUB.G_PUB_CALLING_SRVC := null;
10015:
10016: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
10017: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
10018: END IF;
10019:
10020: EXCEPTION
10021: WHEN FND_API.G_EXC_ERROR THEN
10106: l_upg_trx_info_rec ZX_ON_FLY_TRX_UPGRADE_PKG.zx_upg_trx_info_rec_type;
10107:
10108: BEGIN
10109: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
10110: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'2()+');
10111: END IF;
10112:
10113: /*--------------------------------------------------+
10114: | Standard start of API savepoint |
10304: --records sitting there
10305: ZX_GLOBAL_STRUCTURES_PKG.delete_trx_line_dist_tbl;
10306:
10307: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
10308: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
10309: END IF;
10310:
10311: EXCEPTION
10312: WHEN FND_API.G_EXC_ERROR THEN
10430: l_incomplete_scenario number;
10431:
10432: BEGIN
10433: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
10434: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
10435: END IF;
10436:
10437: /*--------------------------------------------------+
10438: | Standard start of API savepoint |
12055: END IF;
12056: --Bugfix 4486946 - on-the-fly upgrade end
12057:
12058: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
12059: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
12060: END IF;
12061:
12062: EXCEPTION
12063: WHEN FND_API.G_EXC_ERROR THEN
12143: l_event_class_rec event_class_rec_type;
12144:
12145: BEGIN
12146: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
12147: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
12148: END IF;
12149:
12150: /*--------------------------------------------------+
12151: | Standard start of API savepoint |
12384: --records sitting there
12385: ZX_GLOBAL_STRUCTURES_PKG.delete_trx_line_dist_tbl;
12386:
12387: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
12388: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
12389: END IF;
12390:
12391: EXCEPTION
12392: WHEN FND_API.G_EXC_ERROR THEN
12483: l_init_msg_list VARCHAR2(1);
12484: l_tax_classification_code VARCHAR2(50);
12485: BEGIN
12486: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
12487: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
12488: END IF;
12489:
12490: /*--------------------------------------------------+
12491: | Standard start of API savepoint |
12700: --records sitting there
12701: ZX_GLOBAL_STRUCTURES_PKG.delete_trx_line_dist_tbl;
12702:
12703: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
12704: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
12705: END IF;
12706:
12707: EXCEPTION
12708: WHEN FND_API.G_EXC_ERROR THEN
12794: l_init_msg_list VARCHAR2(1);
12795:
12796: BEGIN
12797: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
12798: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
12799: END IF;
12800:
12801: /*--------------------------------------------------+
12802: | Standard start of API savepoint |
12861: END IF;
12862: END IF;
12863:
12864: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
12865: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
12866: END IF;
12867:
12868: EXCEPTION
12869: WHEN FND_API.G_EXC_ERROR THEN
12944: l_init_msg_list VARCHAR2(1);
12945:
12946: --Added for Bug#16483600 JAI ZX Integration
12947: lb_jai_exists BOOLEAN := FALSE;
12948: l_transaction_rec ZX_API_PUB.transaction_rec_type;
12949:
12950: BEGIN
12951: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
12952: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
12948: l_transaction_rec ZX_API_PUB.transaction_rec_type;
12949:
12950: BEGIN
12951: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
12952: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
12953: END IF;
12954:
12955: /*--------------------------------------------------+
12956: | Standard start of API savepoint |
13077: END IF;
13078: END IF;
13079:
13080: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
13081: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
13082: END IF;
13083:
13084: EXCEPTION
13085: WHEN FND_API.G_EXC_ERROR THEN
13160: l_init_msg_list VARCHAR2(1);
13161:
13162: BEGIN
13163: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
13164: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
13165: END IF;
13166:
13167: /*--------------------------------------------------+
13168: | Standard start of API savepoint |
13234: END IF;
13235: END IF;
13236:
13237: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
13238: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
13239: END IF;
13240:
13241: EXCEPTION
13242: WHEN FND_API.G_EXC_ERROR THEN
13385: FROM ZX_TRX_HEADERS_GT;
13386:
13387: BEGIN
13388: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
13389: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
13390: END IF;
13391:
13392: /*--------------------------------------------------+
13393: | Standard start of API savepoint |
13582: END LOOP;
13583: CLOSE headers_doc;
13584:
13585: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
13586: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
13587: END IF;
13588:
13589: EXCEPTION
13590: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
13652: l_init_msg_list VARCHAR2(1);
13653:
13654: BEGIN
13655: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
13656: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
13657: END IF;
13658:
13659: /*--------------------------------------------------+
13660: | Standard start of API savepoint |
13736: END IF;
13737: END IF;
13738:
13739: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
13740: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
13741: END IF;
13742:
13743: EXCEPTION
13744: WHEN FND_API.G_EXC_ERROR THEN
13823: l_init_msg_list VARCHAR2(1);
13824:
13825: BEGIN
13826: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
13827: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
13828: END IF;
13829:
13830: /*--------------------------------------------------+
13831: | Standard start of API savepoint |
13906: END IF;
13907: END IF;
13908:
13909: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
13910: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
13911: END IF;
13912:
13913: EXCEPTION
13914: WHEN FND_API.G_EXC_ERROR THEN
13998: l_init_msg_list VARCHAR2(1);
13999:
14000: BEGIN
14001: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
14002: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
14003: END IF;
14004:
14005: /*--------------------------------------------------+
14006: | Standard start of API savepoint |
14088: END IF;
14089: END IF;
14090:
14091: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
14092: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
14093: END IF;
14094:
14095: EXCEPTION
14096: WHEN FND_API.G_EXC_ERROR THEN
14174: l_init_msg_list VARCHAR2(1);
14175:
14176: BEGIN
14177: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
14178: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
14179: END IF;
14180:
14181: /*--------------------------------------------------+
14182: | Standard start of API savepoint |
14259: END IF;
14260: END IF;
14261:
14262: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
14263: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
14264: END IF;
14265:
14266: EXCEPTION
14267: WHEN FND_API.G_EXC_ERROR THEN
14338: l_error_buffer VARCHAR2(1000);
14339:
14340: BEGIN
14341: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
14342: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
14343: END IF;
14344:
14345: /*--------------------------------------------------+
14346: | Standard start of API savepoint |
14454: END IF;
14455: END IF;
14456:
14457: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
14458: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
14459: END IF;
14460:
14461: EXCEPTION
14462: WHEN FND_API.G_EXC_ERROR THEN
14540: l_event_class_code VARCHAR2(30);
14541:
14542: BEGIN
14543: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
14544: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
14545: END IF;
14546:
14547: /*--------------------------------------------------+
14548: | Standard start of API savepoint |
14711: END IF; --tax reporting flag is N
14712:
14713:
14714: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
14715: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
14716: END IF;
14717:
14718: EXCEPTION
14719: WHEN FND_API.G_EXC_ERROR THEN
14786: l_return_status VARCHAR2(1);
14787:
14788: BEGIN
14789: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
14790: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
14791: END IF;
14792:
14793: /*--------------------------------------------------+
14794: | Standard start of API savepoint |
14868: RETURN l_legal_entity_id;
14869: END IF;
14870:
14871: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
14872: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
14873: END IF;
14874: EXCEPTION
14875: WHEN FND_API.G_EXC_ERROR THEN
14876: ROLLBACK TO GET_LE_FROM_TAX_REGISTRATN_PVT;
14947: l_init_msg_list VARCHAR2(1);
14948:
14949: BEGIN
14950: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
14951: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
14952: END IF;
14953:
14954: /*--------------------------------------------------+
14955: | Standard start of API savepoint |
15014: END IF;
15015: END IF;
15016:
15017: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
15018: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END','ZX_API_PUB: '||l_api_name||'()-');
15019: END IF;
15020:
15021: EXCEPTION
15022: WHEN FND_API.G_EXC_ERROR THEN
15092: l_api_version CONSTANT NUMBER := 1.0;
15093: l_init_msg_list VARCHAR2(1);
15094: BEGIN
15095: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
15096: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()+');
15097: END IF;
15098:
15099: /*--------------------------------------------------+
15100: | Standard start of API savepoint |
15173:
15174: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
15175: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,
15176: 'Number of Rows updated in zx_lines_det_factors: '||SQL%ROWCOUNT);
15177: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN','ZX_API_PUB: '||l_api_name||'()-');
15178: END IF;
15179: EXCEPTION
15180: WHEN FND_API.G_EXC_ERROR THEN
15181: ROLLBACK TO unapply_applied_cm_PVT;
15206: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
15207: END IF;
15208: END unapply_applied_cm;
15209:
15210: END ZX_API_PUB;