[Home] [Help]
14: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
15: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
16: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
17: G_MODULE_NAME CONSTANT VARCHAR2(80) := 'ZX.PLSQL.ZX_VALID_INIT_PARAMS_PKG.';
18: NULL_EVENT_CLASS_REC ZX_API_PUB.event_class_rec_type;
19:
20: /*----------------------------------------------------------------------------*
21: | PRIVATE FUNCTIONS/PROCEDURES |
22: *----------------------------------------------------------------------------*/
49: -- CALLED BY
50: -- Private procedure get_loc_id_and_ptp_ids
51: -----------------------------------------------------------------------
52: PROCEDURE get_locations
53: ( p_event_class_rec IN zx_api_pub.event_class_rec_type,
54: p_trx_line_index IN NUMBER,
55: x_ship_from_location_id OUT NOCOPY NUMBER,
56: x_bill_from_location_id OUT NOCOPY NUMBER,
57: x_ship_to_location_id OUT NOCOPY NUMBER,
68: END IF;
69:
70: x_return_status := FND_API.G_RET_STS_SUCCESS;
71:
72: IF ZX_API_PUB.G_DATA_TRANSFER_MODE IN ('TAB','WIN') THEN
73:
74: l_index := p_trx_line_index;
75:
76: ELSIF ZX_API_PUB.G_DATA_TRANSFER_MODE = 'PLS' THEN
72: IF ZX_API_PUB.G_DATA_TRANSFER_MODE IN ('TAB','WIN') THEN
73:
74: l_index := p_trx_line_index;
75:
76: ELSIF ZX_API_PUB.G_DATA_TRANSFER_MODE = 'PLS' THEN
77:
78: l_index := nvl(ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.internal_organization_id.first,0);
79:
80: END IF;
124: -- import_document_with_tax
125: -- insupd_line_det_factors
126: -----------------------------------------------------------------------
127: PROCEDURE get_loc_id_and_ptp_ids(
128: p_event_class_rec IN OUT NOCOPY ZX_API_PUB.event_class_rec_type,
129: p_trx_line_index IN NUMBER,
130: x_return_status OUT NOCOPY VARCHAR2
131: ) IS
132: l_api_name CONSTANT VARCHAR2(30) := 'GET_LOC_ID_AND_PTP_IDS';
134: l_ship_from_location_id NUMBER;
135: l_ship_to_location_id NUMBER;
136: l_bill_from_location_id NUMBER;
137: l_bill_to_location_id NUMBER;
138: l_context_info_rec ZX_API_PUB.context_info_rec_type;
139:
140: BEGIN
141: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
142: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
175: l_context_info_rec.APPLICATION_ID := p_event_class_rec.APPLICATION_ID;
176: l_context_info_rec.ENTITY_CODE := p_event_class_rec.ENTITY_CODE;
177: l_context_info_rec.EVENT_CLASS_CODE := p_event_class_rec.EVENT_CLASS_CODE;
178: l_context_info_rec.TRX_ID := p_event_class_rec.TRX_ID;
179: ZX_API_PUB.add_msg(p_context_info_rec => l_context_info_rec);
180: END IF;
181: x_return_status := l_return_status;
182: RETURN;
183: END IF;
201: l_context_info_rec.APPLICATION_ID := p_event_class_rec.APPLICATION_ID;
202: l_context_info_rec.ENTITY_CODE := p_event_class_rec.ENTITY_CODE;
203: l_context_info_rec.EVENT_CLASS_CODE := p_event_class_rec.EVENT_CLASS_CODE;
204: l_context_info_rec.TRX_ID := p_event_class_rec.TRX_ID;
205: ZX_API_PUB.add_msg(p_context_info_rec => l_context_info_rec);
206: END IF;
207: x_return_status := l_return_status;
208: RETURN;
209: END IF;
227: l_context_info_rec.APPLICATION_ID := p_event_class_rec.APPLICATION_ID;
228: l_context_info_rec.ENTITY_CODE := p_event_class_rec.ENTITY_CODE;
229: l_context_info_rec.EVENT_CLASS_CODE := p_event_class_rec.EVENT_CLASS_CODE;
230: l_context_info_rec.TRX_ID := p_event_class_rec.TRX_ID;
231: ZX_API_PUB.add_msg(p_context_info_rec => l_context_info_rec);
232: END IF;
233: x_return_status := l_return_status;
234: RETURN;
235: END IF;
252: l_context_info_rec.APPLICATION_ID := p_event_class_rec.APPLICATION_ID;
253: l_context_info_rec.ENTITY_CODE := p_event_class_rec.ENTITY_CODE;
254: l_context_info_rec.EVENT_CLASS_CODE := p_event_class_rec.EVENT_CLASS_CODE;
255: l_context_info_rec.TRX_ID := p_event_class_rec.TRX_ID;
256: ZX_API_PUB.add_msg(p_context_info_rec => l_context_info_rec);
257: END IF;
258: x_return_status := l_return_status;
259: RETURN;
260: END IF;
281: l_context_info_rec.APPLICATION_ID := p_event_class_rec.APPLICATION_ID;
282: l_context_info_rec.ENTITY_CODE := p_event_class_rec.ENTITY_CODE;
283: l_context_info_rec.EVENT_CLASS_CODE := p_event_class_rec.EVENT_CLASS_CODE;
284: l_context_info_rec.TRX_ID := p_event_class_rec.TRX_ID;
285: ZX_API_PUB.add_msg(p_context_info_rec => l_context_info_rec);
286: END IF;
287: x_return_status := l_return_status;
288: RETURN;
289: END IF;
313: l_context_info_rec.APPLICATION_ID := p_event_class_rec.APPLICATION_ID;
314: l_context_info_rec.ENTITY_CODE := p_event_class_rec.ENTITY_CODE;
315: l_context_info_rec.EVENT_CLASS_CODE := p_event_class_rec.EVENT_CLASS_CODE;
316: l_context_info_rec.TRX_ID := p_event_class_rec.TRX_ID;
317: ZX_API_PUB.add_msg(p_context_info_rec => l_context_info_rec);
318: END IF;
319: x_return_status := l_return_status;
320: RETURN;
321: END IF;
345: l_context_info_rec.APPLICATION_ID := p_event_class_rec.APPLICATION_ID;
346: l_context_info_rec.ENTITY_CODE := p_event_class_rec.ENTITY_CODE;
347: l_context_info_rec.EVENT_CLASS_CODE := p_event_class_rec.EVENT_CLASS_CODE;
348: l_context_info_rec.TRX_ID := p_event_class_rec.TRX_ID;
349: ZX_API_PUB.add_msg(p_context_info_rec => l_context_info_rec);
350: END IF;
351: x_return_status := l_return_status;
352: RETURN;
353: END IF;
377: l_context_info_rec.APPLICATION_ID := p_event_class_rec.APPLICATION_ID;
378: l_context_info_rec.ENTITY_CODE := p_event_class_rec.ENTITY_CODE;
379: l_context_info_rec.EVENT_CLASS_CODE := p_event_class_rec.EVENT_CLASS_CODE;
380: l_context_info_rec.TRX_ID := p_event_class_rec.TRX_ID;
381: ZX_API_PUB.add_msg(p_context_info_rec => l_context_info_rec);
382: END IF;
383: x_return_status := l_return_status;
384: RETURN;
385: END IF;
454: -- validate_document_for_tax
455: -- insupd_line_det_factors
456: -----------------------------------------------------------------------
457: PROCEDURE determine_effective_date
458: ( p_event_class_rec IN ZX_API_PUB.event_class_rec_type,
459: x_effective_date OUT NOCOPY DATE,
460: x_return_status OUT NOCOPY VARCHAR2
461: )IS
462: l_api_name CONSTANT VARCHAR2(30):= 'DETERMINE_EFFECTIVE_DATE';
469: END IF;
470:
471: x_return_status := FND_API.G_RET_STS_SUCCESS;
472:
473: IF ZX_API_PUB.G_PUB_SRVC in ('CALCULATE_TAX','IMPORT_DOCUMENT_WITH_TAX','OVERRIDE_TAX',
474: 'GET_DEFAULT_TAX_DET_ATTRS','VALIDATE_DOCUMENT_FOR_TAX') THEN
475: IF ZX_API_PUB.G_DATA_TRANSFER_MODE = 'TAB' THEN
476: SELECT /*+ INDEX (ZX_TRANSACTION_LINES_GT ZX_TRANSACTION_LINES_GT_U1)*/
477: adjusted_doc_date,
471: x_return_status := FND_API.G_RET_STS_SUCCESS;
472:
473: IF ZX_API_PUB.G_PUB_SRVC in ('CALCULATE_TAX','IMPORT_DOCUMENT_WITH_TAX','OVERRIDE_TAX',
474: 'GET_DEFAULT_TAX_DET_ATTRS','VALIDATE_DOCUMENT_FOR_TAX') THEN
475: IF ZX_API_PUB.G_DATA_TRANSFER_MODE = 'TAB' THEN
476: SELECT /*+ INDEX (ZX_TRANSACTION_LINES_GT ZX_TRANSACTION_LINES_GT_U1)*/
477: adjusted_doc_date,
478: trx_line_date --Bug 13547362
479: INTO l_adj_doc_date,
483: AND entity_code = p_event_class_rec.entity_code
484: AND event_class_code = p_event_class_rec.event_class_code
485: AND trx_id = p_event_class_rec.trx_id
486: AND rownum = 1;
487: ELSIF ZX_API_PUB.G_DATA_TRANSFER_MODE = 'WIN' OR
488: ZX_API_PUB.G_PUB_SRVC in ('VALIDATE_DOCUMENT_FOR_TAX','OVERRIDE_TAX') THEN
489: SELECT adjusted_doc_date,
490: trx_line_date --Bug 13547362
491: INTO l_adj_doc_date,
484: AND event_class_code = p_event_class_rec.event_class_code
485: AND trx_id = p_event_class_rec.trx_id
486: AND rownum = 1;
487: ELSIF ZX_API_PUB.G_DATA_TRANSFER_MODE = 'WIN' OR
488: ZX_API_PUB.G_PUB_SRVC in ('VALIDATE_DOCUMENT_FOR_TAX','OVERRIDE_TAX') THEN
489: SELECT adjusted_doc_date,
490: trx_line_date --Bug 13547362
491: INTO l_adj_doc_date,
492: l_trx_line_date
495: AND entity_code = p_event_class_rec.entity_code
496: AND event_class_code = p_event_class_rec.event_class_code
497: AND trx_id = p_event_class_rec.trx_id
498: AND rownum = 1;
499: ELSIF ZX_API_PUB.G_DATA_TRANSFER_MODE = 'PLS' THEN
500: l_adj_doc_date := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.adjusted_doc_date(1);
501: l_trx_line_date := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.trx_line_date(1);
502: END IF;
503: ELSE --for calls from products via global structures eg. update_line_det_factors/insert_line_det_factors
551: -----------------------------------------------------------------------
552: PROCEDURE populate_event_class_options
553: ( x_return_status OUT NOCOPY VARCHAR2,
554: p_trx_date IN DATE,
555: p_event_class_rec IN OUT NOCOPY ZX_API_PUB.event_class_rec_type
556: )IS
557: l_api_name CONSTANT VARCHAR2(30) := 'POPULATE_EVENT_CLASS_OPTIONS';
558:
559: BEGIN
689: --Bugfix 4765758 - Populate the process_for_applicability_flag in case the
690: --source_event_class_code in ('TRADE_MGT_PAYABLES','TRADE_MGT_RECEIVABLES')
691: --If 'N' then tax processing will not be done for such docs.
692: BEGIN
693: IF (ZX_API_PUB.G_DATA_TRANSFER_MODE = 'WIN' AND ZX_API_PUB.G_PUB_SRVC ='CALCULATE_TAX')
694: OR (ZX_API_PUB.G_PUB_SRVC ='DETERMINE_RECOVERY') THEN
695: SELECT opt.process_for_applicability_flag
696: INTO p_event_class_rec.source_process_for_appl_flag
697: FROM zx_evnt_cls_options opt,
690: --source_event_class_code in ('TRADE_MGT_PAYABLES','TRADE_MGT_RECEIVABLES')
691: --If 'N' then tax processing will not be done for such docs.
692: BEGIN
693: IF (ZX_API_PUB.G_DATA_TRANSFER_MODE = 'WIN' AND ZX_API_PUB.G_PUB_SRVC ='CALCULATE_TAX')
694: OR (ZX_API_PUB.G_PUB_SRVC ='DETERMINE_RECOVERY') THEN
695: SELECT opt.process_for_applicability_flag
696: INTO p_event_class_rec.source_process_for_appl_flag
697: FROM zx_evnt_cls_options opt,
698: zx_lines_det_factors det
707: AND det.entity_code = p_event_class_rec.entity_code
708: AND det.event_class_code = p_event_class_rec.event_class_code
709: AND det.source_event_class_code in ('TRADE_MGT_PAYABLES','TRADE_MGT_RECEIVABLES')
710: AND rownum=1;
711: ELSIF ZX_API_PUB.G_DATA_TRANSFER_MODE = 'PLS' AND ZX_API_PUB.G_PUB_SRVC ='CALCULATE_TAX' THEN
712: IF zx_global_structures_pkg.trx_line_dist_tbl.SOURCE_EVENT_CLASS_CODE(1) = 'TRADE_MGT_PAYABLES' OR
713: zx_global_structures_pkg.trx_line_dist_tbl.SOURCE_EVENT_CLASS_CODE(1) = 'TRADE_MGT_RECEIVABLES' THEN
714: SELECT opt.process_for_applicability_flag
715: INTO p_event_class_rec.source_process_for_appl_flag
720: AND opt.first_pty_org_id = p_event_class_rec.first_pty_org_id
721: AND p_trx_date >= opt.EFFECTIVE_FROM and p_trx_date <= nvl(opt.EFFECTIVE_TO,p_trx_date)
722: AND opt.enabled_flag = 'Y';
723: END IF;
724: ELSIF ZX_API_PUB.G_DATA_TRANSFER_MODE = 'TAB' THEN --import/calculate_tax
725: SELECT /*+ FIRST_ROWS(1) leading (LINES) INDEX(LINES ZX_TRANSACTION_LINES_GT_U1)*/
726: opt.process_for_applicability_flag
727: INTO p_event_class_rec.source_process_for_appl_flag
728: FROM zx_evnt_cls_options opt,
777: -- get_default_tax_det_attrs
778: -----------------------------------------------------------------------
779: PROCEDURE populate_appl_product_options
780: ( x_return_status OUT NOCOPY VARCHAR2,
781: p_event_class_rec IN OUT NOCOPY ZX_API_PUB.event_class_rec_type
782: )IS
783: l_api_name CONSTANT VARCHAR2(30):= 'POPULATE_APPL_PRODUCT_OPTIONS';
784: l_zx_product_options_rec ZX_GLOBAL_STRUCTURES_PKG.zx_product_options_rec_type;
785: l_application_id NUMBER;
985: -- insupd_line_det_factors
986: -----------------------------------------------------------------------
987: PROCEDURE get_tax_event_class
988: ( x_return_status OUT NOCOPY VARCHAR2,
989: p_event_class_rec IN OUT NOCOPY ZX_API_PUB.event_class_rec_type
990: )IS
991: l_api_name CONSTANT VARCHAR2(30):= 'GET_TAX_EVENT_CLASS';
992: l_index BINARY_INTEGER;
993:
1475: END IF; -- p_event_class_rec.event_class_code = 'SALES_TRANSACTION_TAX_QUOTE
1476:
1477: --Bug 4670938:populate the source_event_class_mapping_id for rules engine processing
1478: BEGIN
1479: IF (ZX_API_PUB.G_DATA_TRANSFER_MODE = 'WIN' AND ZX_API_PUB.G_PUB_SRVC ='CALCULATE_TAX')
1480: -- for recovery determination this logic is not needed
1481: -- OR (ZX_API_PUB.G_PUB_SRVC ='DETERMINE_RECOVERY')
1482: THEN
1483: SELECT mapp.event_class_mapping_id,
1477: --Bug 4670938:populate the source_event_class_mapping_id for rules engine processing
1478: BEGIN
1479: IF (ZX_API_PUB.G_DATA_TRANSFER_MODE = 'WIN' AND ZX_API_PUB.G_PUB_SRVC ='CALCULATE_TAX')
1480: -- for recovery determination this logic is not needed
1481: -- OR (ZX_API_PUB.G_PUB_SRVC ='DETERMINE_RECOVERY')
1482: THEN
1483: SELECT mapp.event_class_mapping_id,
1484: mapp.tax_event_class_code,
1485: mapp.process_for_applicability_flag
1495: AND det.application_id = p_event_class_rec.application_id
1496: AND det.entity_code = p_event_class_rec.entity_code
1497: AND det.event_class_code = p_event_class_rec.event_class_code
1498: AND rownum=1;
1499: ELSIF ZX_API_PUB.G_DATA_TRANSFER_MODE = 'PLS' AND ZX_API_PUB.G_PUB_SRVC ='CALCULATE_TAX' THEN
1500: SELECT mapp.event_class_mapping_id,
1501: mapp.tax_event_class_code,
1502: mapp.process_for_applicability_flag
1503: INTO p_event_class_rec.source_event_class_mapping_id,
1652: -- inspud_line_det_factors
1653: -- get_default_tax_det_attribs(GTT version)
1654: -----------------------------------------------------------------------
1655: PROCEDURE get_tax_subscriber
1656: ( p_event_class_rec IN OUT NOCOPY ZX_API_PUB.event_class_rec_type,
1657: p_effective_date IN DATE,
1658: x_return_status OUT NOCOPY VARCHAR2
1659: )IS
1660: l_api_name CONSTANT VARCHAR2(30):= 'GET_TAX_SUBSCRIBER';
1658: x_return_status OUT NOCOPY VARCHAR2
1659: )IS
1660: l_api_name CONSTANT VARCHAR2(30):= 'GET_TAX_SUBSCRIBER';
1661: l_return_status VARCHAR2(30);
1662: l_context_info_rec ZX_API_PUB.context_info_rec_type;
1663: l_first_pty_org_id NUMBER;
1664:
1665: BEGIN
1666: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1682: l_context_info_rec.APPLICATION_ID := p_event_class_rec.APPLICATION_ID;
1683: l_context_info_rec.ENTITY_CODE := p_event_class_rec.ENTITY_CODE;
1684: l_context_info_rec.EVENT_CLASS_CODE := p_event_class_rec.EVENT_CLASS_CODE;
1685: l_context_info_rec.TRX_ID := p_event_class_rec.TRX_ID;
1686: ZX_API_PUB.add_msg(p_context_info_rec => l_context_info_rec);
1687: END IF;
1688: RETURN;
1689: END IF;
1690:
1727: -- freeze_distribution_lines
1728: -- validate_document_for_tax
1729: -----------------------------------------------------------------------
1730: PROCEDURE get_tax_subscriber
1731: ( p_event_class_rec IN OUT NOCOPY ZX_API_PUB.event_class_rec_type,
1732: x_return_status OUT NOCOPY VARCHAR2
1733: )IS
1734: l_api_name CONSTANT VARCHAR2(30) := 'GET_TAX_SUBSCRIBER';
1735: l_effective_date DATE;
1739: l_trx_line_date DATE;
1740: l_prov_tax_det_date DATE;
1741: l_return_status VARCHAR2(30);
1742: l_upg_trx_info_rec ZX_ON_FLY_TRX_UPGRADE_PKG.zx_upg_trx_info_rec_type;
1743: l_context_info_rec ZX_API_PUB.context_info_rec_type;
1744:
1745: BEGIN
1746: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1747: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
1848: l_context_info_rec.APPLICATION_ID := p_event_class_rec.APPLICATION_ID;
1849: l_context_info_rec.ENTITY_CODE := p_event_class_rec.ENTITY_CODE;
1850: l_context_info_rec.EVENT_CLASS_CODE := p_event_class_rec.EVENT_CLASS_CODE;
1851: l_context_info_rec.TRX_ID := p_event_class_rec.TRX_ID;
1852: ZX_API_PUB.add_msg(p_context_info_rec => l_context_info_rec);
1853: END IF;
1854: RETURN;
1855: END IF;
1856:
1897: l_adjusted_doc_date DATE;
1898: l_first_pty_org_id NUMBER;
1899: l_return_status VARCHAR2(30);
1900: l_upg_trx_info_rec ZX_ON_FLY_TRX_UPGRADE_PKG.zx_upg_trx_info_rec_type;
1901: l_context_info_rec ZX_API_PUB.context_info_rec_type;
1902:
1903: BEGIN
1904: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1905: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
1985: l_context_info_rec.APPLICATION_ID := p_application_id;
1986: l_context_info_rec.ENTITY_CODE := p_entity_code;
1987: l_context_info_rec.EVENT_CLASS_CODE := p_event_class_code;
1988: l_context_info_rec.TRX_ID := p_trx_id;
1989: ZX_API_PUB.add_msg(p_context_info_rec => l_context_info_rec);
1990: END IF;
1991: RETURN;
1992: END IF;
1993:
2018: -- reverse_document
2019: -----------------------------------------------------------------------
2020: PROCEDURE set_security_context
2021: ( x_return_status OUT NOCOPY VARCHAR2,
2022: p_event_class_rec IN ZX_API_PUB.event_class_rec_type
2023: )IS
2024: l_api_name CONSTANT VARCHAR2(30):= 'SET_SECURITY_CONTEXT';
2025: l_effective_date DATE;
2026: l_related_doc_date DATE;
2034: l_event_class_code VARCHAR2(30);
2035: l_trx_id NUMBER;
2036: l_return_status VARCHAR2(1);
2037: l_upg_trx_info_rec ZX_ON_FLY_TRX_UPGRADE_PKG.zx_upg_trx_info_rec_type;
2038: l_context_info_rec ZX_API_PUB.context_info_rec_type;
2039:
2040: BEGIN
2041: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2042: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
2169: l_context_info_rec.APPLICATION_ID := p_event_class_rec.APPLICATION_ID;
2170: l_context_info_rec.ENTITY_CODE := p_event_class_rec.ENTITY_CODE;
2171: l_context_info_rec.EVENT_CLASS_CODE := p_event_class_rec.EVENT_CLASS_CODE;
2172: l_context_info_rec.TRX_ID := p_event_class_rec.TRX_ID;
2173: ZX_API_PUB.add_msg(p_context_info_rec => l_context_info_rec);
2174: END IF;
2175: RETURN;
2176: END IF;
2177:
2262: -- DESCRIPTION
2263: -- Validates and initializes parameters for calculate_tax published service
2264: --
2265: -- CALLED BY
2266: -- ZX_API_PUB.calculate_tax
2267: -----------------------------------------------------------------------
2268: PROCEDURE Calculate_Tax
2269: ( x_return_status OUT NOCOPY VARCHAR2,
2270: p_event_class_rec IN OUT NOCOPY ZX_API_PUB.event_class_rec_type
2266: -- ZX_API_PUB.calculate_tax
2267: -----------------------------------------------------------------------
2268: PROCEDURE Calculate_Tax
2269: ( x_return_status OUT NOCOPY VARCHAR2,
2270: p_event_class_rec IN OUT NOCOPY ZX_API_PUB.event_class_rec_type
2271: )IS
2272: l_api_name CONSTANT VARCHAR2(30):= 'CALCULATE_TAX';
2273: l_return_status VARCHAR2(30);
2274: l_effective_date DATE;
2303: x_return_status := l_return_status;
2304: RETURN;
2305: END IF;
2306:
2307: IF ZX_API_PUB.G_DATA_TRANSFER_MODE <> 'TAB' THEN
2308:
2309: /* ----------------------------------------------------------------------+
2310: | Determine effective date |
2311: + ----------------------------------------------------------------------*/
2362: x_return_status := l_return_status;
2363: RETURN;
2364: END IF;
2365:
2366: END IF; -- ZX_API_PUB.g_data_tranfer_mode <> 'TAB'
2367:
2368: /* ----------------------------------------------------------------------+
2369: | Populate Application Product Options |
2370: +----------------------------------------------------------------------*/
2388:
2389: /* ----------------------------------------------------------------------+
2390: | Get the locations for parties and their ptp ids |
2391: + ----------------------------------------------------------------------*/
2392: IF ZX_API_PUB.G_DATA_TRANSFER_MODE = 'PLS' THEN
2393: get_loc_id_and_ptp_ids( p_event_class_rec => p_event_class_rec,
2394: p_trx_line_index => NULL,
2395: x_return_status => l_return_status
2396: );
2402: END IF;
2403: /* ----------------------------------------------------------------------+
2404: | Check Required parameters - Header and Line level |
2405: + ----------------------------------------------------------------------*/
2406: IF ZX_API_PUB.G_DATA_TRANSFER_MODE = 'TAB' THEN
2407: ZX_CHECK_REQUIRED_PARAMS_PKG.check_trx_headers_tbl(l_return_status,
2408: p_event_class_rec
2409: );
2410:
2419: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2420: x_return_status := l_return_status;
2421: RETURN;
2422: END IF;
2423: ELSIF ZX_API_PUB.G_DATA_TRANSFER_MODE = 'PLS' THEN
2424: ZX_CHECK_REQUIRED_PARAMS_PKG.check_trx_lines(l_return_status,
2425: p_event_class_rec
2426: );
2427:
2535: -- DESCRIPTION
2536: -- Validates and initializes parameters for import_document_with_tax published service
2537: --
2538: -- CALLED BY
2539: -- ZX_API_PUB.import_document_with_tax
2540: -----------------------------------------------------------------------
2541: PROCEDURE import_document_with_tax
2542: ( x_return_status OUT NOCOPY VARCHAR2,
2543: p_event_class_rec IN OUT NOCOPY ZX_API_PUB.event_class_rec_type
2539: -- ZX_API_PUB.import_document_with_tax
2540: -----------------------------------------------------------------------
2541: PROCEDURE import_document_with_tax
2542: ( x_return_status OUT NOCOPY VARCHAR2,
2543: p_event_class_rec IN OUT NOCOPY ZX_API_PUB.event_class_rec_type
2544: )IS
2545: l_api_name CONSTANT VARCHAR2(30) := 'IMPORT_DOCUMENT_WITH_TAX';
2546: l_return_status VARCHAR2(30);
2547: l_effective_date DATE;
2667: -- DESCRIPTION
2668: -- Validates and initializes parameters for Override_Tax published service
2669: --
2670: -- CALLED BY
2671: -- ZX_API_PUB.Override_Tax
2672: -----------------------------------------------------------------------
2673: PROCEDURE Override_Tax
2674: ( x_return_status OUT NOCOPY VARCHAR2,
2675: p_override IN VARCHAR2,
2672: -----------------------------------------------------------------------
2673: PROCEDURE Override_Tax
2674: ( x_return_status OUT NOCOPY VARCHAR2,
2675: p_override IN VARCHAR2,
2676: p_event_class_rec IN OUT NOCOPY ZX_API_PUB.event_class_rec_type,
2677: p_trx_rec IN ZX_API_PUB.transaction_rec_type
2678: ) IS
2679: l_api_name CONSTANT VARCHAR2(30):= 'OVERRIDE_TAX';
2680: l_return_status VARCHAR2(30);
2673: PROCEDURE Override_Tax
2674: ( x_return_status OUT NOCOPY VARCHAR2,
2675: p_override IN VARCHAR2,
2676: p_event_class_rec IN OUT NOCOPY ZX_API_PUB.event_class_rec_type,
2677: p_trx_rec IN ZX_API_PUB.transaction_rec_type
2678: ) IS
2679: l_api_name CONSTANT VARCHAR2(30):= 'OVERRIDE_TAX';
2680: l_return_status VARCHAR2(30);
2681: l_effective_date DATE;
2881: -- DESCRIPTION
2882: -- Validates and initializes parameters for global_document_update published service
2883: --
2884: -- CALLED BY
2885: -- ZX_API_PUB.global_document_update
2886: -----------------------------------------------------------------------
2887: PROCEDURE Global_Document_Update
2888: ( x_return_status OUT NOCOPY VARCHAR2,
2889: p_event_class_rec OUT NOCOPY ZX_API_PUB.event_class_rec_type,
2885: -- ZX_API_PUB.global_document_update
2886: -----------------------------------------------------------------------
2887: PROCEDURE Global_Document_Update
2888: ( x_return_status OUT NOCOPY VARCHAR2,
2889: p_event_class_rec OUT NOCOPY ZX_API_PUB.event_class_rec_type,
2890: p_trx_rec IN ZX_API_PUB.transaction_rec_type
2891: )IS
2892: l_api_name CONSTANT VARCHAR2(30):= 'GLOBAL_DOCUMENT_UPDATE';
2893: l_return_status VARCHAR2(30);
2886: -----------------------------------------------------------------------
2887: PROCEDURE Global_Document_Update
2888: ( x_return_status OUT NOCOPY VARCHAR2,
2889: p_event_class_rec OUT NOCOPY ZX_API_PUB.event_class_rec_type,
2890: p_trx_rec IN ZX_API_PUB.transaction_rec_type
2891: )IS
2892: l_api_name CONSTANT VARCHAR2(30):= 'GLOBAL_DOCUMENT_UPDATE';
2893: l_return_status VARCHAR2(30);
2894: l_ref_appln_id NUMBER;
3005: | service |
3006: * ======================================================================*/
3007: PROCEDURE mark_tax_lines_deleted
3008: ( x_return_status OUT NOCOPY VARCHAR2,
3009: p_transaction_line_rec IN ZX_API_PUB.transaction_line_rec_type
3010: ) IS
3011: l_api_name CONSTANT VARCHAR2(30):= 'MARK_TAX_LINES_DELETED';
3012: l_return_status VARCHAR2(30);
3013:
3071: -- DESCRIPTION
3072: -- Validates and initializes parameters for reverse_document published service
3073: --
3074: -- CALLED BY
3075: -- ZX_API_PUB.reverse_document
3076: -----------------------------------------------------------------------
3077: PROCEDURE reverse_document
3078: ( x_return_status OUT NOCOPY VARCHAR2 ,
3079: p_event_class_rec OUT NOCOPY ZX_API_PUB.event_class_rec_type
3075: -- ZX_API_PUB.reverse_document
3076: -----------------------------------------------------------------------
3077: PROCEDURE reverse_document
3078: ( x_return_status OUT NOCOPY VARCHAR2 ,
3079: p_event_class_rec OUT NOCOPY ZX_API_PUB.event_class_rec_type
3080: ) IS
3081: l_api_name CONSTANT VARCHAR2(30):= 'REVERSE_DOCUMENT';
3082: l_return_status VARCHAR2(30);
3083: l_appln_id NUMBER;
3167: -- DESCRIPTION
3168: -- Validates and initializes parameters for reverse_distributions published service
3169: --
3170: -- CALLED BY
3171: -- ZX_API_PUB.reverse_distributions
3172: -----------------------------------------------------------------------
3173: PROCEDURE reverse_distributions
3174: ( x_return_status OUT NOCOPY VARCHAR2
3175: )
3267: -- DESCRIPTION
3268: -- Validates and initializes parameters for determine_recovery published service
3269: --
3270: -- CALLED BY
3271: -- ZX_API_PUB.determine_recovery
3272: -----------------------------------------------------------------------
3273: PROCEDURE determine_recovery
3274: ( x_return_status OUT NOCOPY VARCHAR2,
3275: p_event_class_rec IN OUT NOCOPY ZX_API_PUB.event_class_rec_type
3271: -- ZX_API_PUB.determine_recovery
3272: -----------------------------------------------------------------------
3273: PROCEDURE determine_recovery
3274: ( x_return_status OUT NOCOPY VARCHAR2,
3275: p_event_class_rec IN OUT NOCOPY ZX_API_PUB.event_class_rec_type
3276: )IS
3277: l_api_name CONSTANT VARCHAR2(30):= 'DETERMINE_RECOVERY';
3278: l_return_status VARCHAR2(30);
3279:
3328: -- DESCRIPTION
3329: -- Validates and initializes parameters for override_recovery published service
3330: --
3331: -- CALLED BY
3332: -- ZX_API_PUB.override_recovery
3333: -----------------------------------------------------------------------
3334: PROCEDURE override_recovery
3335: ( x_return_status OUT NOCOPY VARCHAR2,
3336: p_event_class_rec IN OUT NOCOPY ZX_API_PUB.event_class_rec_type,
3332: -- ZX_API_PUB.override_recovery
3333: -----------------------------------------------------------------------
3334: PROCEDURE override_recovery
3335: ( x_return_status OUT NOCOPY VARCHAR2,
3336: p_event_class_rec IN OUT NOCOPY ZX_API_PUB.event_class_rec_type,
3337: p_trx_rec IN OUT NOCOPY ZX_API_PUB.transaction_rec_type
3338: )IS
3339: l_api_name CONSTANT VARCHAR2(30) := 'OVERRIDE_RECOVERY';
3340: l_return_status VARCHAR2(30);
3333: -----------------------------------------------------------------------
3334: PROCEDURE override_recovery
3335: ( x_return_status OUT NOCOPY VARCHAR2,
3336: p_event_class_rec IN OUT NOCOPY ZX_API_PUB.event_class_rec_type,
3337: p_trx_rec IN OUT NOCOPY ZX_API_PUB.transaction_rec_type
3338: )IS
3339: l_api_name CONSTANT VARCHAR2(30) := 'OVERRIDE_RECOVERY';
3340: l_return_status VARCHAR2(30);
3341:
3464: -- DESCRIPTION
3465: -- Validates and initializes parameters for freeze_distribution_lines published service
3466: --
3467: -- CALLED BY
3468: -- ZX_API_PUB.freeze_distribution_lines
3469: -----------------------------------------------------------------------
3470: PROCEDURE freeze_distribution_lines
3471: ( x_return_status OUT NOCOPY VARCHAR2,
3472: p_event_class_rec OUT NOCOPY ZX_API_PUB.event_class_rec_type,
3468: -- ZX_API_PUB.freeze_distribution_lines
3469: -----------------------------------------------------------------------
3470: PROCEDURE freeze_distribution_lines
3471: ( x_return_status OUT NOCOPY VARCHAR2,
3472: p_event_class_rec OUT NOCOPY ZX_API_PUB.event_class_rec_type,
3473: p_trx_rec IN OUT NOCOPY ZX_API_PUB.transaction_rec_type
3474: ) IS
3475: l_api_name CONSTANT VARCHAR2(30):= 'FREEZE_DISTRIBUTION_LINES';
3476: l_return_status VARCHAR2(30);
3469: -----------------------------------------------------------------------
3470: PROCEDURE freeze_distribution_lines
3471: ( x_return_status OUT NOCOPY VARCHAR2,
3472: p_event_class_rec OUT NOCOPY ZX_API_PUB.event_class_rec_type,
3473: p_trx_rec IN OUT NOCOPY ZX_API_PUB.transaction_rec_type
3474: ) IS
3475: l_api_name CONSTANT VARCHAR2(30):= 'FREEZE_DISTRIBUTION_LINES';
3476: l_return_status VARCHAR2(30);
3477: l_ref_appln_id NUMBER;
3577: -- DESCRIPTION
3578: -- Validates and initializes parameters for validate_document_for_tax published service
3579: --
3580: -- CALLED BY
3581: -- ZX_API_PUB.validate_document_for_tax
3582: -----------------------------------------------------------------------
3583: PROCEDURE validate_document_for_tax
3584: ( x_return_status OUT NOCOPY VARCHAR2,
3585: p_event_class_rec OUT NOCOPY ZX_API_PUB.event_class_rec_type,
3581: -- ZX_API_PUB.validate_document_for_tax
3582: -----------------------------------------------------------------------
3583: PROCEDURE validate_document_for_tax
3584: ( x_return_status OUT NOCOPY VARCHAR2,
3585: p_event_class_rec OUT NOCOPY ZX_API_PUB.event_class_rec_type,
3586: p_trx_rec IN OUT NOCOPY ZX_API_PUB.transaction_rec_type
3587: )IS
3588: l_api_name CONSTANT VARCHAR2(30):= 'VALIDATE_DOCUMENT_FOR_TAX';
3589: l_return_status VARCHAR2(30);
3582: -----------------------------------------------------------------------
3583: PROCEDURE validate_document_for_tax
3584: ( x_return_status OUT NOCOPY VARCHAR2,
3585: p_event_class_rec OUT NOCOPY ZX_API_PUB.event_class_rec_type,
3586: p_trx_rec IN OUT NOCOPY ZX_API_PUB.transaction_rec_type
3587: )IS
3588: l_api_name CONSTANT VARCHAR2(30):= 'VALIDATE_DOCUMENT_FOR_TAX';
3589: l_return_status VARCHAR2(30);
3590: l_ref_appln_id NUMBER;
3828: -- DESCRIPTION
3829: -- Validates and initializes parameters for discard_tax_only_lines published service
3830: --
3831: -- CALLED BY
3832: -- ZX_API_PUB.discard_tax_only_lines
3833: -----------------------------------------------------------------------
3834: PROCEDURE discard_tax_only_lines
3835: ( x_return_status OUT NOCOPY VARCHAR2,
3836: p_trx_rec IN ZX_API_PUB.transaction_rec_type
3832: -- ZX_API_PUB.discard_tax_only_lines
3833: -----------------------------------------------------------------------
3834: PROCEDURE discard_tax_only_lines
3835: ( x_return_status OUT NOCOPY VARCHAR2,
3836: p_trx_rec IN ZX_API_PUB.transaction_rec_type
3837: ) IS
3838: l_api_name CONSTANT VARCHAR2(30):= 'DISCARD_TAX_ONLY_LINES';
3839: l_return_status VARCHAR2(30);
3840:
3895: -- DESCRIPTION
3896: -- Validates and initializes parameters for the insert/update published service
3897: --
3898: -- CALLED BY
3899: -- ZX_API_PUB.insert_line_det_factors
3900: -- ZX_API_PUB.update_line_det_factos
3901: -- ZX_API_PUB.update_det_factors_hdr
3902: -- ZX_API_PUB.copy_insert_line_det_factors
3903: -----------------------------------------------------------------------
3896: -- Validates and initializes parameters for the insert/update published service
3897: --
3898: -- CALLED BY
3899: -- ZX_API_PUB.insert_line_det_factors
3900: -- ZX_API_PUB.update_line_det_factos
3901: -- ZX_API_PUB.update_det_factors_hdr
3902: -- ZX_API_PUB.copy_insert_line_det_factors
3903: -----------------------------------------------------------------------
3904: PROCEDURE insupd_line_det_factors
3897: --
3898: -- CALLED BY
3899: -- ZX_API_PUB.insert_line_det_factors
3900: -- ZX_API_PUB.update_line_det_factos
3901: -- ZX_API_PUB.update_det_factors_hdr
3902: -- ZX_API_PUB.copy_insert_line_det_factors
3903: -----------------------------------------------------------------------
3904: PROCEDURE insupd_line_det_factors
3905: ( x_return_status OUT NOCOPY VARCHAR2,
3898: -- CALLED BY
3899: -- ZX_API_PUB.insert_line_det_factors
3900: -- ZX_API_PUB.update_line_det_factos
3901: -- ZX_API_PUB.update_det_factors_hdr
3902: -- ZX_API_PUB.copy_insert_line_det_factors
3903: -----------------------------------------------------------------------
3904: PROCEDURE insupd_line_det_factors
3905: ( x_return_status OUT NOCOPY VARCHAR2,
3906: p_event_class_rec IN OUT NOCOPY ZX_API_PUB.event_class_rec_type,
3902: -- ZX_API_PUB.copy_insert_line_det_factors
3903: -----------------------------------------------------------------------
3904: PROCEDURE insupd_line_det_factors
3905: ( x_return_status OUT NOCOPY VARCHAR2,
3906: p_event_class_rec IN OUT NOCOPY ZX_API_PUB.event_class_rec_type,
3907: p_trx_line_index IN NUMBER
3908: )IS
3909: l_api_name CONSTANT VARCHAR2(30):= 'INSUPD_LINE_DET_FACTORS';
3910: l_return_status VARCHAR2(30);
3982:
3983: /* ----------------------------------------------------------------------+
3984: | Get the locations for parties |
3985: + ----------------------------------------------------------------------*/
3986: IF ZX_API_PUB.G_PUB_SRVC <> 'UPDATE_DET_FACTORS_HDR' THEN
3987:
3988: get_loc_id_and_ptp_ids(p_event_class_rec => p_event_class_rec,
3989: p_trx_line_index => p_trx_line_index,
3990: x_return_status => l_return_status
3998: /* ----------------------------------------------------------------------+
3999: | Check Required parameters |
4000: + ----------------------------------------------------------------------*/
4001: --Skip validation if published service is copy_insert_line_det_factors
4002: IF ZX_API_PUB.G_PUB_SRVC <> 'COPY_INSERT_LINE_DET_FACTORS' THEN
4003: ZX_CHECK_REQUIRED_PARAMS_PKG.check_trx_headers_tbl(l_return_status,
4004: p_event_class_rec
4005: );
4006:
4156: -- DESCRIPTION
4157: -- Validates and initializes parameters for get_default_tax_det_attrs published service
4158: --
4159: -- CALLED BY
4160: -- ZX_API_PUB.get_default_tax_det_attrs
4161: -----------------------------------------------------------------------
4162: PROCEDURE get_default_tax_det_attrs(
4163: x_return_status OUT NOCOPY VARCHAR2,
4164: p_event_class_rec IN OUT NOCOPY ZX_API_PUB.event_class_rec_type
4160: -- ZX_API_PUB.get_default_tax_det_attrs
4161: -----------------------------------------------------------------------
4162: PROCEDURE get_default_tax_det_attrs(
4163: x_return_status OUT NOCOPY VARCHAR2,
4164: p_event_class_rec IN OUT NOCOPY ZX_API_PUB.event_class_rec_type
4165: )IS
4166: l_api_name CONSTANT VARCHAR2(30):= 'GET_DEFAULT_TAX_DET_ATTRS';
4167: l_return_status VARCHAR2(30);
4168: l_effective_date DATE;