5: | Global Data Types |
6: * ======================================================================*/
7:
8: G_PKG_NAME CONSTANT VARCHAR2(30) := 'ZX_TAXWARE_USER_PKG';
9: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
10: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
11: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
12: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
13: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
6: * ======================================================================*/
7:
8: G_PKG_NAME CONSTANT VARCHAR2(30) := 'ZX_TAXWARE_USER_PKG';
9: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
10: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
11: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
12: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
13: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
14: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
7:
8: G_PKG_NAME CONSTANT VARCHAR2(30) := 'ZX_TAXWARE_USER_PKG';
9: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
10: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
11: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
12: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
13: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
14: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
15: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
8: G_PKG_NAME CONSTANT VARCHAR2(30) := 'ZX_TAXWARE_USER_PKG';
9: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
10: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
11: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
12: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
13: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
14: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
15: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
16: G_MODULE_NAME CONSTANT VARCHAR2(30) := 'ZX.PLSQL.ZX_TAXWARE_USER_PKG.';
9: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
10: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
11: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
12: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
13: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
14: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
15: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
16: G_MODULE_NAME CONSTANT VARCHAR2(30) := 'ZX.PLSQL.ZX_TAXWARE_USER_PKG.';
17:
10: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
11: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
12: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
13: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
14: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
15: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
16: G_MODULE_NAME CONSTANT VARCHAR2(30) := 'ZX.PLSQL.ZX_TAXWARE_USER_PKG.';
17:
18: g_usenexpro VARCHAR2(100);
11: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
12: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
13: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
14: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
15: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
16: G_MODULE_NAME CONSTANT VARCHAR2(30) := 'ZX.PLSQL.ZX_TAXWARE_USER_PKG.';
17:
18: g_usenexpro VARCHAR2(100);
19: g_taxselparam NUMBER;
132:
133: BEGIN
134:
135: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
136: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
137: END IF;
138:
139: /*Set the return status to Success */
140: x_error_status := FND_API.G_RET_STS_SUCCESS;
169: AND ZX_DET_FACT.TRX_ID = ZX_PRE_REC_OPT.TRX_ID
170: AND ROWNUM = 1;
171: EXCEPTION WHEN OTHERS THEN
172: IF ( G_LEVEL_EXCEPTION >= G_CURRENT_RUNTIME_LEVEL) THEN
173: FND_LOG.STRING(G_LEVEL_EXCEPTION,G_MODULE_NAME||l_api_name,SQLERRM);
174: END IF;
175: x_error_status := FND_API.G_RET_STS_UNEXP_ERROR;
176: g_string :='No Header information present';
177: error_exception_handle(g_string);
179: return;
180: END;
181:
182: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
183: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
184: ' Event Class code = ' || l_event_class_code);
185: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
186: ' Application Id = ' || to_char(l_application_id));
187: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
181:
182: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
183: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
184: ' Event Class code = ' || l_event_class_code);
185: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
186: ' Application Id = ' || to_char(l_application_id));
187: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
188: ' Entity code = ' || l_entity_code);
189: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
183: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
184: ' Event Class code = ' || l_event_class_code);
185: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
186: ' Application Id = ' || to_char(l_application_id));
187: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
188: ' Entity code = ' || l_entity_code);
189: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
190: ' l_trx_id = ' || to_char(l_trx_id));
191: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
185: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
186: ' Application Id = ' || to_char(l_application_id));
187: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
188: ' Entity code = ' || l_entity_code);
189: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
190: ' l_trx_id = ' || to_char(l_trx_id));
191: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
192: ' l_tax_provider_id = ' || to_char(l_tax_provider_id));
193: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
187: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
188: ' Entity code = ' || l_entity_code);
189: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
190: ' l_trx_id = ' || to_char(l_trx_id));
191: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
192: ' l_tax_provider_id = ' || to_char(l_tax_provider_id));
193: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
194: ' Tax Regime code = ' || l_tax_regime_code);
195: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
189: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
190: ' l_trx_id = ' || to_char(l_trx_id));
191: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
192: ' l_tax_provider_id = ' || to_char(l_tax_provider_id));
193: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
194: ' Tax Regime code = ' || l_tax_regime_code);
195: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
196: ' g_trx_date = ' || to_char(g_trx_date));
197: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
191: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
192: ' l_tax_provider_id = ' || to_char(l_tax_provider_id));
193: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
194: ' Tax Regime code = ' || l_tax_regime_code);
195: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
196: ' g_trx_date = ' || to_char(g_trx_date));
197: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
198: ' g_trx_type_id = ' || to_char(g_trx_type_id));
199: END IF;
193: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
194: ' Tax Regime code = ' || l_tax_regime_code);
195: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
196: ' g_trx_date = ' || to_char(g_trx_date));
197: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
198: ' g_trx_type_id = ' || to_char(g_trx_type_id));
199: END IF;
200:
201: l_exists_in_hdrs_gt := 0;
248: fnd_global.conc_login_id);
249: EXCEPTION
250: WHEN OTHERS THEN
251: IF ( G_LEVEL_EXCEPTION >= G_CURRENT_RUNTIME_LEVEL) THEN
252: FND_LOG.STRING(G_LEVEL_EXCEPTION,G_MODULE_NAME||l_api_name,SQLERRM);
253: END IF;
254: x_error_status := FND_API.G_RET_STS_UNEXP_ERROR;
255: g_string :='Not able to insert in to ZX_PRVDR_HDR_EXTNS_GT table ';
256: x_messages_tbl:=g_messages_tbl;
259: END;
260: END IF;
261:
262: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
263: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
264: ' RETURN_STATUS = ' || x_error_status);
265: END IF;
266: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
267: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END',G_PKG_NAME ||':'||l_api_name||'()-');
263: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
264: ' RETURN_STATUS = ' || x_error_status);
265: END IF;
266: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
267: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END',G_PKG_NAME ||':'||l_api_name||'()-');
268: END IF;
269:
270: EXCEPTION
271: WHEN OTHERS THEN
269:
270: EXCEPTION
271: WHEN OTHERS THEN
272: IF ( G_LEVEL_EXCEPTION >= G_CURRENT_RUNTIME_LEVEL) THEN
273: FND_LOG.STRING(G_LEVEL_EXCEPTION,G_MODULE_NAME||':'||l_api_name,SQLERRM);
274: END IF;
275: x_error_status := FND_API.G_RET_STS_UNEXP_ERROR;
276: g_string :='Failed in DERIVE_HDR_EXT_ATTR procedure';
277: error_exception_handle(g_string);
449:
450: l_api_name CONSTANT VARCHAR2(30) := 'DERIVE_LINE_EXT_ATTR';
451: BEGIN
452: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
453: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
454: END IF;
455:
456: /*Set the return status to Success */
457: x_error_status := FND_API.G_RET_STS_SUCCESS;
559: bill_third_pty_site_tab;
560:
561: row_count:=PROC_LINE_CSR%rowcount;
562: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
563: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
564: ' row_count := '||row_count);
565: END IF;
566:
567: CLOSE PROC_LINE_CSR;
638: END IF;
639:
640: IF x_ret_status <> FND_API.G_RET_STS_SUCCESS THEN
641: IF (g_level_exception >= g_current_runtime_level ) THEN
642: FND_LOG.STRING(G_LEVEL_EXCEPTION,G_MODULE_NAME||l_api_name,SQLERRM);
643: END IF;
644: x_error_status := FND_API.G_RET_STS_UNEXP_ERROR;
645: g_string :='Failed with error in procedure POPULATE_EXEMPTION_DETAILS';
646: error_exception_handle(g_string);
800:
801: EXCEPTION
802: WHEN OTHERS THEN
803: IF ( G_LEVEL_EXCEPTION >= G_CURRENT_RUNTIME_LEVEL) THEN
804: FND_LOG.STRING(G_LEVEL_EXCEPTION,G_MODULE_NAME||l_api_name,SQLERRM);
805: END IF;
806: x_error_status := FND_API.G_RET_STS_UNEXP_ERROR ;
807: g_string :='Not able to insert in to ZX_PRVDR_LINE_EXTNS_GT ';
808: error_exception_handle(g_string);
812:
813: END IF;
814:
815: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
816: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
817: ' RETURN_STATUS = ' || x_error_status);
818: END IF;
819:
820: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
817: ' RETURN_STATUS = ' || x_error_status);
818: END IF;
819:
820: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
821: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END',G_PKG_NAME ||l_api_name||'()-');
822: END IF;
823:
824: END Derive_Line_Ext_Attr;
825:
859: IS
860: l_api_name CONSTANT VARCHAR2(30) := 'DERIVE_VIEW_NAME';
861: BEGIN
862: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
863: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
864: END IF;
865:
866: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
867: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' p_api_name = ' || p_api_name);
863: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
864: END IF;
865:
866: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
867: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' p_api_name = ' || p_api_name);
868: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' p_line_level_action = ' || p_line_level_action);
869: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' p_adjusted_doc_trx_id = ' || p_adjusted_doc_trx_id);
870: END IF;
871:
864: END IF;
865:
866: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
867: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' p_api_name = ' || p_api_name);
868: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' p_line_level_action = ' || p_line_level_action);
869: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' p_adjusted_doc_trx_id = ' || p_adjusted_doc_trx_id);
870: END IF;
871:
872: /*The next portion of the code deals with the view name derivation based on
865:
866: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
867: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' p_api_name = ' || p_api_name);
868: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' p_line_level_action = ' || p_line_level_action);
869: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' p_adjusted_doc_trx_id = ' || p_adjusted_doc_trx_id);
870: END IF;
871:
872: /*The next portion of the code deals with the view name derivation based on
873: application_id , event_class_code and api name and adjusted doc trx id*/
921: x_view_name := 'ASO_TAX_LINES_SUMMARY_V_A'; ---Default View Name Assignment
922: END IF;
923:
924: IF ( g_level_statement >= g_current_runtime_level) THEN
925: FND_LOG.STRING(g_level_statement,'ZX_TAXWARE_USER_PKG.DERIVE_VIEW_NAME',
926: 'x_view_name == '||x_view_name);
927: End if;
928:
929:
927: End if;
928:
929:
930: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
931: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
932: END IF;
933: END DERIVE_VIEW_NAME;
934:
935:
996:
997: BEGIN
998:
999: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1000: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'(+)');
1001: END IF;
1002:
1003: /*Set the return status to Success */
1004: x_ret_status := FND_API.G_RET_STS_SUCCESS;
1021: IF event_class_code_tab(p_position) = 'CREDIT_MEMO'
1022: AND adjusted_doc_trx_id_tab(p_position) IS NOT NULL THEN
1023: l_tax_account_source_tax := NULL;
1024: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1025: FND_LOG.STRING(G_LEVEL_STATEMENT,'Tax Account Source Tax Inside Credit: ',l_tax_account_source_tax);
1026: END IF;
1027: ELSE
1028: BEGIN
1029: SELECT NVL(TAX_EXMPT_SOURCE_TAX, TAX_ACCOUNT_SOURCE_TAX) --Bug 8724051
1035: (g_trx_date <= effective_to OR effective_to IS NULL));
1036: EXCEPTION
1037: WHEN OTHERS THEN
1038: IF (G_LEVEL_EXCEPTION >= G_CURRENT_RUNTIME_LEVEL ) THEN
1039: FND_LOG.STRING(G_LEVEL_EXCEPTION,G_MODULE_NAME||L_API_NAME,SQLERRM);
1040: END IF;
1041: NULL;
1042: END;
1043: END IF;
1055: END IF;
1056: l_certificate_number := cert_num_tab(p_position);
1057:
1058: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1059: FND_LOG.STRING(G_LEVEL_STATEMENT,'Percent: ',to_char(l_exempt_percent));
1060: FND_LOG.STRING(G_LEVEL_STATEMENT,'Reason: ',to_char(l_exempt_reason));
1061: FND_LOG.STRING(G_LEVEL_STATEMENT,'Certificate: ',to_char(l_certificate_number));
1062: END IF;
1063:
1056: l_certificate_number := cert_num_tab(p_position);
1057:
1058: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1059: FND_LOG.STRING(G_LEVEL_STATEMENT,'Percent: ',to_char(l_exempt_percent));
1060: FND_LOG.STRING(G_LEVEL_STATEMENT,'Reason: ',to_char(l_exempt_reason));
1061: FND_LOG.STRING(G_LEVEL_STATEMENT,'Certificate: ',to_char(l_certificate_number));
1062: END IF;
1063:
1064: IF tax_identifier_tab(i) = 'STATE' THEN
1057:
1058: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1059: FND_LOG.STRING(G_LEVEL_STATEMENT,'Percent: ',to_char(l_exempt_percent));
1060: FND_LOG.STRING(G_LEVEL_STATEMENT,'Reason: ',to_char(l_exempt_reason));
1061: FND_LOG.STRING(G_LEVEL_STATEMENT,'Certificate: ',to_char(l_certificate_number));
1062: END IF;
1063:
1064: IF tax_identifier_tab(i) = 'STATE' THEN
1065: arp_state_exempt_percent_tab(p_position) := l_exempt_percent;
1080: l_tax_account_source_tax || '$' ||
1081: p_tax_regime_code || '$' ||
1082: to_char(tax_provider_id_tab(p_position));
1083: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1084: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' l_ptnr_exemption_indx = ' || l_ptnr_exemption_indx );
1085: END IF;
1086: IF ZX_GLOBAL_STRUCTURES_PKG.ptnr_exemption_tbl.EXISTS(l_ptnr_exemption_indx)
1087: AND ZX_GLOBAL_STRUCTURES_PKG.ptnr_exemption_tbl(l_ptnr_exemption_indx).trx_id
1088: = trx_id_tab(p_position)
1095: AND ZX_GLOBAL_STRUCTURES_PKG.ptnr_exemption_tbl(l_ptnr_exemption_indx).tax_provider_id
1096: = tax_provider_id_tab(p_position)
1097: THEN
1098: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1099: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' exemption info found in cache.' );
1100: END IF;
1101: IF tax_identifier_tab(i) = 'COUNTY' THEN
1102: ZX_GLOBAL_STRUCTURES_PKG.ptnr_exemption_tbl(l_ptnr_exemption_indx).co_exempt_reason_code :=
1103: arp_county_exempt_reason_tab(p_position);
1112: END IF;
1113:
1114: ELSE /* There is No Source Tax */
1115: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1116: FND_LOG.STRING(G_LEVEL_STATEMENT,'Inside Else','No Source Tax');
1117: END IF;
1118: IF event_class_code_tab(p_position) = 'CREDIT_MEMO'
1119: AND adjusted_doc_trx_id_tab(p_position) IS NOT NULL THEN
1120:
1177: FROM ZX_EXEMPTIONS EXMP
1178: WHERE tax_exemption_id = x_exempt_record.exemption_id;
1179: EXCEPTION WHEN NO_DATA_FOUND THEN
1180: IF (g_level_exception >= g_current_runtime_level ) THEN
1181: FND_LOG.STRING(G_LEVEL_EXCEPTION,G_MODULE_NAME||l_api_name,SQLERRM);
1182: END IF;
1183: x_ret_status := FND_API.G_RET_STS_UNEXP_ERROR;
1184: g_string :='No Data found from ZX_EXEMPTIONS for provided id';
1185: error_exception_handle(g_string);
1200: l_location_type := NULL;
1201: END IF;
1202:
1203: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1204: FND_LOG.STRING(G_LEVEL_STATEMENT,'Location Type: ',l_location_type);
1205: FND_LOG.STRING(G_LEVEL_STATEMENT,'Location ID: ',to_char(p_bill_to_location_id));
1206: END IF;
1207:
1208: IF p_bill_to_location_id IS NOT NULL THEN
1201: END IF;
1202:
1203: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1204: FND_LOG.STRING(G_LEVEL_STATEMENT,'Location Type: ',l_location_type);
1205: FND_LOG.STRING(G_LEVEL_STATEMENT,'Location ID: ',to_char(p_bill_to_location_id));
1206: END IF;
1207:
1208: IF p_bill_to_location_id IS NOT NULL THEN
1209: ZX_TCM_GEO_JUR_PKG.get_tax_jurisdictions (
1217: x_return_status => x_ret_status);
1218: END IF;
1219:
1220: IF (x_ret_status <> FND_API.G_RET_STS_SUCCESS) THEN
1221: /*FND_LOG.STRING(g_level_statement,
1222: 'In Populate Exemption Details',
1223: 'After calling get_tax_jurisdictions, x_return_status = '|| x_ret_status);*/
1224: RETURN;
1225: ELSE
1224: RETURN;
1225: ELSE
1226: IF l_jurisdiction_rec.tax_jurisdiction_id IS NOT NULL THEN
1227: l_multiple_jurisdictions_flag := 'N';
1228: /*FND_LOG.STRING(g_level_statement,
1229: 'Jurisdiction ID: ',
1230: l_jurisdiction_rec.tax_jurisdiction_id);*/
1231: ELSE
1232: IF l_jurisdictions_found = 'Y' THEN
1266:
1267: END IF;
1268:
1269: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1270: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' tax_identifier_tab(i) = ' || tax_identifier_tab(i));
1271: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' x_exempt_record.exemption_id = ' || x_exempt_record.exemption_id);
1272: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' x_exempt_record.exempt_certificate_number = ' || x_exempt_record.exempt_certificate_number);
1273: END IF;
1274:
1267: END IF;
1268:
1269: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1270: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' tax_identifier_tab(i) = ' || tax_identifier_tab(i));
1271: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' x_exempt_record.exemption_id = ' || x_exempt_record.exemption_id);
1272: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' x_exempt_record.exempt_certificate_number = ' || x_exempt_record.exempt_certificate_number);
1273: END IF;
1274:
1275: IF x_exempt_record.exemption_id is NULL THEN
1268:
1269: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1270: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' tax_identifier_tab(i) = ' || tax_identifier_tab(i));
1271: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' x_exempt_record.exemption_id = ' || x_exempt_record.exemption_id);
1272: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' x_exempt_record.exempt_certificate_number = ' || x_exempt_record.exempt_certificate_number);
1273: END IF;
1274:
1275: IF x_exempt_record.exemption_id is NULL THEN
1276: use_step_tab(p_position) := 'Y';
1277: step_proc_flag_tab(p_position) := '1';
1278: crit_flag_tab(p_position) := 'R';
1279:
1280: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1281: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' use_step_tab(p_position) = ' || use_step_tab(p_position));
1282: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' step_proc_flag_tab(p_position) = ' || step_proc_flag_tab(p_position));
1283: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' crit_flag_tab(p_position) = ' || crit_flag_tab(p_position));
1284: END IF;
1285: ELSIF x_exempt_record.exemption_id is NOT NULL OR
1278: crit_flag_tab(p_position) := 'R';
1279:
1280: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1281: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' use_step_tab(p_position) = ' || use_step_tab(p_position));
1282: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' step_proc_flag_tab(p_position) = ' || step_proc_flag_tab(p_position));
1283: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' crit_flag_tab(p_position) = ' || crit_flag_tab(p_position));
1284: END IF;
1285: ELSIF x_exempt_record.exemption_id is NOT NULL OR
1286: (x_exempt_record.percent_exempt IS NOT NULL
1279:
1280: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1281: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' use_step_tab(p_position) = ' || use_step_tab(p_position));
1282: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' step_proc_flag_tab(p_position) = ' || step_proc_flag_tab(p_position));
1283: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' crit_flag_tab(p_position) = ' || crit_flag_tab(p_position));
1284: END IF;
1285: ELSIF x_exempt_record.exemption_id is NOT NULL OR
1286: (x_exempt_record.percent_exempt IS NOT NULL
1287: AND event_class_code_tab(p_position) = 'CREDIT_MEMO') THEN
1405: tax_identifier_tab(i) || '$' ||
1406: p_tax_regime_code || '$' ||
1407: to_char(tax_provider_id_tab(p_position));
1408: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1409: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' l_ptnr_exemption_indx = ' || l_ptnr_exemption_indx );
1410: END IF;
1411: IF ZX_GLOBAL_STRUCTURES_PKG.ptnr_exemption_tbl.EXISTS(l_ptnr_exemption_indx)
1412: AND ZX_GLOBAL_STRUCTURES_PKG.ptnr_exemption_tbl(l_ptnr_exemption_indx).trx_id
1413: = trx_id_tab(p_position)
1420: AND ZX_GLOBAL_STRUCTURES_PKG.ptnr_exemption_tbl(l_ptnr_exemption_indx).tax_provider_id
1421: = tax_provider_id_tab(p_position)
1422: THEN
1423: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1424: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' exemption info found in cache.' );
1425: END IF;
1426: --NULL;
1427: ELSE
1428: ZX_GLOBAL_STRUCTURES_PKG.ptnr_exemption_tbl(l_ptnr_exemption_indx).trx_id := trx_id_tab(p_position);
1460:
1461: END LOOP;
1462:
1463: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1464: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' arp_state_exempt_percent_tab(p_position) = ' || arp_state_exempt_percent_tab(p_position));
1465: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' arp_county_exempt_pct_tab(p_position) = ' || arp_county_exempt_pct_tab(p_position));
1466: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' arp_city_exempt_pct_tab(p_position) = ' || arp_city_exempt_pct_tab(p_position));
1467: -- FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' arp_district_exempt_pct_tab(p_position) = ' || arp_district_exempt_pct_tab(p_position));
1468: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' p_cert_num = ' || p_cert_num);
1461: END LOOP;
1462:
1463: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1464: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' arp_state_exempt_percent_tab(p_position) = ' || arp_state_exempt_percent_tab(p_position));
1465: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' arp_county_exempt_pct_tab(p_position) = ' || arp_county_exempt_pct_tab(p_position));
1466: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' arp_city_exempt_pct_tab(p_position) = ' || arp_city_exempt_pct_tab(p_position));
1467: -- FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' arp_district_exempt_pct_tab(p_position) = ' || arp_district_exempt_pct_tab(p_position));
1468: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' p_cert_num = ' || p_cert_num);
1469: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' cert_num_tab(p_position) = ' || cert_num_tab(p_position));
1462:
1463: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1464: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' arp_state_exempt_percent_tab(p_position) = ' || arp_state_exempt_percent_tab(p_position));
1465: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' arp_county_exempt_pct_tab(p_position) = ' || arp_county_exempt_pct_tab(p_position));
1466: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' arp_city_exempt_pct_tab(p_position) = ' || arp_city_exempt_pct_tab(p_position));
1467: -- FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' arp_district_exempt_pct_tab(p_position) = ' || arp_district_exempt_pct_tab(p_position));
1468: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' p_cert_num = ' || p_cert_num);
1469: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' cert_num_tab(p_position) = ' || cert_num_tab(p_position));
1470: END IF;
1463: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1464: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' arp_state_exempt_percent_tab(p_position) = ' || arp_state_exempt_percent_tab(p_position));
1465: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' arp_county_exempt_pct_tab(p_position) = ' || arp_county_exempt_pct_tab(p_position));
1466: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' arp_city_exempt_pct_tab(p_position) = ' || arp_city_exempt_pct_tab(p_position));
1467: -- FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' arp_district_exempt_pct_tab(p_position) = ' || arp_district_exempt_pct_tab(p_position));
1468: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' p_cert_num = ' || p_cert_num);
1469: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' cert_num_tab(p_position) = ' || cert_num_tab(p_position));
1470: END IF;
1471:
1464: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' arp_state_exempt_percent_tab(p_position) = ' || arp_state_exempt_percent_tab(p_position));
1465: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' arp_county_exempt_pct_tab(p_position) = ' || arp_county_exempt_pct_tab(p_position));
1466: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' arp_city_exempt_pct_tab(p_position) = ' || arp_city_exempt_pct_tab(p_position));
1467: -- FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' arp_district_exempt_pct_tab(p_position) = ' || arp_district_exempt_pct_tab(p_position));
1468: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' p_cert_num = ' || p_cert_num);
1469: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' cert_num_tab(p_position) = ' || cert_num_tab(p_position));
1470: END IF;
1471:
1472: p_error_status := x_ret_status;
1465: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' arp_county_exempt_pct_tab(p_position) = ' || arp_county_exempt_pct_tab(p_position));
1466: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' arp_city_exempt_pct_tab(p_position) = ' || arp_city_exempt_pct_tab(p_position));
1467: -- FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' arp_district_exempt_pct_tab(p_position) = ' || arp_district_exempt_pct_tab(p_position));
1468: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' p_cert_num = ' || p_cert_num);
1469: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, ' cert_num_tab(p_position) = ' || cert_num_tab(p_position));
1470: END IF;
1471:
1472: p_error_status := x_ret_status;
1473:
1471:
1472: p_error_status := x_ret_status;
1473:
1474: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1475: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
1476: ' RETURN_STATUS = ' || p_error_status);
1477: END IF;
1478:
1479: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1476: ' RETURN_STATUS = ' || p_error_status);
1477: END IF;
1478:
1479: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1480: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END',G_PKG_NAME||': '||l_api_name||'(-)');
1481: END IF;
1482:
1483: EXCEPTION
1484: WHEN OTHERS THEN
1482:
1483: EXCEPTION
1484: WHEN OTHERS THEN
1485: IF ( G_LEVEL_EXCEPTION >= G_CURRENT_RUNTIME_LEVEL) THEN
1486: FND_LOG.STRING(G_LEVEL_EXCEPTION,G_MODULE_NAME||l_api_name,SQLERRM);
1487: END IF;
1488: p_error_status := FND_API.G_RET_STS_UNEXP_ERROR;
1489:
1490: END POPULATE_EXEMPTION_DETAILS;
1517: IS
1518: l_api_name CONSTANT VARCHAR2(80) := 'INITIALIZE_NESTED_TABLES';
1519: BEGIN
1520: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1521: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
1522: END IF;
1523:
1524: internal_org_id_tab.DELETE;
1525: application_id_tab.DELETE;
1592: ship_third_pty_site_tab.DELETE;
1593: bill_third_pty_site_tab.DELETE;
1594:
1595: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1596: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END',G_PKG_NAME ||l_api_name||'()-');
1597: END IF;
1598:
1599: EXCEPTION WHEN COLLECTION_IS_NULL THEN
1600: NULL;
1605:
1606: l_api_name CONSTANT VARCHAR2(80) := 'INITIALIZE_EXEMPTION_TABLES';
1607: BEGIN
1608: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1609: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
1610: END IF;
1611:
1612: FOR i in 1..nvl(internal_org_id_tab.last,0) --Loop 1
1613: LOOP
1629: sec_city_exempt_pct_tab(i):= NULL;
1630:
1631: END LOOP;
1632: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1633: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END',G_PKG_NAME ||l_api_name||'()-');
1634: END IF;
1635:
1636:
1637: END Initialize_Exemption_Tables;
1657: IS
1658: l_api_name CONSTANT VARCHAR2(80) := 'CHECK_GEOCODE';
1659: BEGIN
1660: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1661: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
1662: END IF;
1663: if substrb(p_geocode, 1, 2) between 'AA' and 'ZZ' and
1664: substrb(p_geocode, 3, 5) between '00000' and '99999' and
1665: substrb(p_geocode, 8, 2) between '00' and '99' then
1666: return TRUE;
1667: end if;
1668:
1669: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1670: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END',G_PKG_NAME ||l_api_name||'()-');
1671: END IF;
1672:
1673: return FALSE;
1674: END CHECK_GEOCODE;
1679: l_api_name CONSTANT VARCHAR2(30) := 'DERIVE_TRX_LEVEL_ATTR';
1680:
1681: BEGIN
1682: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1683: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'(+)');
1684: END IF;
1685:
1686: g_org_id := NULL;
1687: g_sales_repid := NULL;
1732: END IF;
1733: END IF;
1734:
1735: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1736: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END',G_PKG_NAME||': '||l_api_name||'(-)');
1737: END IF;
1738:
1739: END DERIVE_TRX_LEVEL_ATTR;
1740:
1744: l_api_name CONSTANT VARCHAR2(30) := 'DERIVE_AUDIT_FLAG';
1745:
1746: BEGIN
1747: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1748: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'(+)');
1749: END IF;
1750:
1751: IF l_view_name = 'TAX_ADJUSTMENTS_V_A' THEN
1752: BEGIN
1776: arp_audit_flag_tab(i) := 'Y';
1777: END IF;
1778:
1779: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1780: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,
1781: 'Quote Flag from ZX_GLOBAL_STRUCTURE'||ZX_GLOBAL_STRUCTURES_PKG.g_event_class_rec.quote_flag);
1782: END IF;
1783:
1784: IF ZX_GLOBAL_STRUCTURES_PKG.g_event_class_rec.quote_flag = 'Y' THEN
1784: IF ZX_GLOBAL_STRUCTURES_PKG.g_event_class_rec.quote_flag = 'Y' THEN
1785: arp_audit_flag_tab(i) := 'N';
1786: END IF;
1787: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1788: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'Audit Flag :'||arp_audit_flag_tab(i));
1789: END IF;
1790:
1791: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1792: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END',G_PKG_NAME||': '||l_api_name||'(-)');
1788: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'Audit Flag :'||arp_audit_flag_tab(i));
1789: END IF;
1790:
1791: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1792: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END',G_PKG_NAME||': '||l_api_name||'(-)');
1793: END IF;
1794:
1795: END DERIVE_AUDIT_FLAG;
1796:
1804: l_api_name CONSTANT VARCHAR2(30) := 'DERIVE_PRODUCT_CODE';
1805:
1806: BEGIN
1807: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1808: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'(+)');
1809: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||' ',G_PKG_NAME||': '
1810: ||l_api_name||'l_view_name :'||l_view_name);
1811: END IF;
1812:
1805:
1806: BEGIN
1807: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1808: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'(+)');
1809: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||' ',G_PKG_NAME||': '
1810: ||l_api_name||'l_view_name :'||l_view_name);
1811: END IF;
1812:
1813: /* The product code function is not attached only to this view hence the if condition reads like this*/
1868: arp_product_code_tab(i) := NULL;
1869: END IF;
1870:
1871: IF (g_level_statement >= g_current_runtime_level ) THEN
1872: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
1873: ' arp_product_code_tab(i) = ' || arp_product_code_tab(i));
1874: END IF;
1875:
1876: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1873: ' arp_product_code_tab(i) = ' || arp_product_code_tab(i));
1874: END IF;
1875:
1876: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1877: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END',G_PKG_NAME||': '||l_api_name||'(-)');
1878: END IF;
1879:
1880: END DERIVE_PRODUCT_CODE;
1881:
1891: l_api_name CONSTANT VARCHAR2(30) := 'DERIVE_SHIP_TO_ADDRESS_CODE';
1892:
1893: BEGIN
1894: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1895: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'(+)');
1896: END IF;
1897:
1898: ship_to_address_id_tab(i) := NULL;
1899: IF ship_to_site_use_tab(i) is NOT NULL THEN
1944: EXCEPTION WHEN OTHERS THEN
1945: arp_ship_to_add_tab(i) := NULL;
1946: END;
1947: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1948: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME,'GeoCode Override: '||arp_ship_to_add_tab(i));
1949: END IF;
1950:
1951: IF NOT check_geocode(substrb(nvl(arp_ship_to_add_tab(i),'XXXXXXXXXX'),2,9)) THEN
1952: ZX_TCM_GEO_JUR_PKG.get_tax_jurisdictions(
1979: WHERE location_id = NVL(ship_to_loc_id_tab(i), bill_to_location_id_tab(i));
1980: EXCEPTION
1981: WHEN OTHERS THEN
1982: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1983: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,
1984: 'No data found for this location_id : '||NVL(ship_to_loc_id_tab(i), bill_to_location_id_tab(i)));
1985: END IF;
1986: END;
1987: arp_ship_to_add_tab(i) := '1' || NVL(l_state_code,'CA') || l_postal_code || '00';
1990: END IF;
1991: END IF;
1992:
1993: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1994: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END',G_PKG_NAME||': '||l_api_name||'(-)');
1995: END IF;
1996:
1997: END DERIVE_SHIP_TO_ADDRESS_CODE;
1998:
2009: l_api_name CONSTANT VARCHAR2(30) := 'DERIVE_SHIP_FROM_ADDRESS_CODE';
2010:
2011: BEGIN
2012: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2013: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'(+)');
2014: END IF;
2015:
2016: BEGIN
2017: SELECT SHIP_FROM_LOCATION_ID
2024: AND TRX_LINE_ID = trx_line_id_tab(i);
2025: EXCEPTION
2026: WHEN OTHERS THEN
2027: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2028: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'Error : ' || SQLERRM);
2029: END IF;
2030: l_ship_from_location_id := NULL;
2031: END;
2032:
2084: END;
2085: END IF;
2086:
2087: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2088: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END',G_PKG_NAME||': '||l_api_name||'(-)');
2089: END IF;
2090:
2091: END DERIVE_SHIP_FROM_ADDRESS_CODE;
2092:
2098: l_api_name CONSTANT VARCHAR2(30) := 'DERIVE_POA_ADDRESS_CODE';
2099:
2100: BEGIN
2101: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2102: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'(+)');
2103: END IF;
2104:
2105: BEGIN
2106: arp_poa_add_code_tab(i) := ARP_TAX_VIEW_TAXWARE.POA_ADDRESS_CODE
2138: END;
2139: END IF;
2140:
2141: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2142: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
2143: ' arp_poa_add_code_tab(i) = ' || arp_poa_add_code_tab(i));
2144: END IF;
2145:
2146: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2143: ' arp_poa_add_code_tab(i) = ' || arp_poa_add_code_tab(i));
2144: END IF;
2145:
2146: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2147: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END',G_PKG_NAME||': '||l_api_name||'(-)');
2148: END IF;
2149:
2150: END DERIVE_POA_ADDRESS_CODE;
2151:
2157: l_api_name CONSTANT VARCHAR2(30) := 'DERIVE_POO_ADDRESS_CODE';
2158:
2159: BEGIN
2160: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2161: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'(+)');
2162: END IF;
2163:
2164: BEGIN
2165: arp_poo_add_code_tab(i) := ARP_TAX_VIEW_TAXWARE.POO_ADDRESS_CODE
2192: END IF;
2193:
2194:
2195: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2196: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
2197: ' arp_poo_add_code_tab(i) = ' || arp_poo_add_code_tab(i));
2198: END IF;
2199:
2200: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2197: ' arp_poo_add_code_tab(i) = ' || arp_poo_add_code_tab(i));
2198: END IF;
2199:
2200: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2201: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END',G_PKG_NAME||': '||l_api_name||'(-)');
2202: END IF;
2203:
2204: END DERIVE_POO_ADDRESS_CODE;
2205:
2209: l_api_name CONSTANT VARCHAR2(30) := 'DERIVE_CUSTOMER_CODE';
2210:
2211: BEGIN
2212: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2213: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'(+)');
2214: END IF;
2215:
2216: arp_customer_code_tab(i) := ARP_TAX_VIEW_TAXWARE.CUSTOMER_CODE
2217: (l_view_name,
2285: END IF;
2286: END IF;
2287: END IF;
2288: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2289: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END',G_PKG_NAME||': '||l_api_name||'(-)');
2290: END IF;
2291:
2292: EXCEPTION WHEN OTHERS THEN
2293: arp_customer_code_tab(i):= NULL;
2301: l_api_name CONSTANT VARCHAR2(30) := 'DERIVE_CUSTOMER_NAME';
2302:
2303: BEGIN
2304: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2305: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'(+)');
2306: END IF;
2307:
2308:
2309: BEGIN
2361: arp_customer_name_tab(i):= NULL;
2362: END;
2363:
2364: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2365: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END',G_PKG_NAME||': '||l_api_name||'(-)');
2366: END IF;
2367:
2368: END DERIVE_CUSTOMER_NAME;
2369:
2373: l_api_name CONSTANT VARCHAR2(30) := 'DERIVE_DIVISION_CODE';
2374:
2375: BEGIN
2376: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2377: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'(+)');
2378: END IF;
2379:
2380: arp_division_code_tab(i) := ARP_TAX_VIEW_TAXWARE.DIVISION_CODE
2381: (l_view_name,
2385: arp_division_code_tab(i):='01';
2386: end if;
2387:
2388: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2389: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END',G_PKG_NAME||': '||l_api_name||'(-)');
2390: END IF;
2391:
2392: END DERIVE_DIVISION_CODE;
2393:
2397: l_api_name CONSTANT VARCHAR2(30) := 'DERIVE_TRANSACTION_DATE';
2398:
2399: BEGIN
2400: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2401: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'(+)');
2402: END IF;
2403:
2404: arp_transaction_date_tab(i) := ARP_TAX_VIEW_TAXWARE.TRANSACTION_DATE
2405: (l_view_name,
2422: END;
2423: END IF;
2424:
2425: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2426: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END',G_PKG_NAME||': '||l_api_name||'(-)');
2427: END IF;
2428:
2429: EXCEPTION WHEN OTHERS THEN
2430: arp_transaction_date_tab(i) := NULL;
2436: l_api_name CONSTANT VARCHAR2(30) := 'DERIVE_COMPANY_CODE';
2437:
2438: BEGIN
2439: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2440: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'(+)');
2441: END IF;
2442:
2443: arp_company_code_tab(i) := ARP_TAX_VIEW_TAXWARE.COMPANY_CODE
2444: (l_view_name,
2448: arp_company_code_tab(i) := '01';
2449: END IF;
2450:
2451: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2452: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END',G_PKG_NAME||': '||l_api_name||'(-)');
2453: END IF;
2454:
2455: END DERIVE_COMPANY_CODE;
2456:
2460: l_api_name CONSTANT VARCHAR2(30) := 'DERIVE_VND_CTRL_EXMPT';
2461:
2462: BEGIN
2463: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2464: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'(+)');
2465: END IF;
2466:
2467: arp_vnd_ctrl_exmpt_tab(i):= ARP_TAX_VIEW_TAXWARE.VENDOR_CONTROL_EXEMPTIONS
2468: (l_view_name,
2485: END;
2486: End if;
2487:
2488: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2489: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END',G_PKG_NAME||': '||l_api_name||'(-)');
2490: END IF;
2491:
2492: END DERIVE_VND_CTRL_EXMPT;
2493:
2497: l_api_name CONSTANT VARCHAR2(30) := 'DERIVE_USE_NEXPRO';
2498:
2499: BEGIN
2500: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2501: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'(+)');
2502: END IF;
2503:
2504: arp_use_nexpro_tab(i) := ARP_TAX_VIEW_TAXWARE.USE_NEXPRO
2505: (l_view_name,
2509: arp_use_nexpro_tab(i) := g_usenexpro;
2510: end if;
2511:
2512: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2513: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END',G_PKG_NAME||': '||l_api_name||'(-)');
2514: END IF;
2515:
2516: END DERIVE_USE_NEXPRO;
2517:
2521: l_api_name CONSTANT VARCHAR2(30) := 'DERIVE_SERVICE_IND';
2522:
2523: BEGIN
2524: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2525: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'(+)');
2526: END IF;
2527:
2528: arp_service_ind_tab(i) := ARP_TAX_VIEW_TAXWARE.SERVICE_INDICATOR
2529: (l_view_name,
2533: arp_service_ind_tab(i) := g_serviceind;
2534: end if;
2535:
2536: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2537: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END',G_PKG_NAME||': '||l_api_name||'(-)');
2538: END IF;
2539:
2540: END DERIVE_SERVICE_IND;
2541:
2545: l_api_name CONSTANT VARCHAR2(30) := 'DERIVE_TAX_SEL_PARAM';
2546:
2547: BEGIN
2548: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2549: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'(+)');
2550: END IF;
2551:
2552: arp_tax_sel_param_tab(i) := ARP_TAX_VIEW_TAXWARE.TAX_SEL_PARM
2553: (l_view_name,
2557: arp_tax_sel_param_tab(i) := g_taxselparam;
2558: end if;
2559:
2560: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2561: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END',G_PKG_NAME||': '||l_api_name||'(-)');
2562: END IF;
2563:
2564: END DERIVE_TAX_SEL_PARAM;
2565:
2569: l_api_name CONSTANT VARCHAR2(30) := 'DERIVE_CALCULATION_FLAG';
2570:
2571: BEGIN
2572: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2573: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'(+)');
2574: END IF;
2575:
2576: calculation_flag_tab(i) := ARP_TAX_VIEW_TAXWARE.Calculation_Flag
2577: (l_view_name,
2581: calculation_flag_tab(i) := '00000';
2582: end if;
2583:
2584: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2585: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END',G_PKG_NAME||': '||l_api_name||'(-)');
2586: END IF;
2587:
2588: END DERIVE_CALCULATION_FLAG;
2589:
2618:
2619: PROCEDURE INITIALIZE IS
2620: BEGIN
2621: IF (g_level_procedure >= g_current_runtime_level ) THEN
2622: FND_LOG.STRING(g_level_procedure, 'ZX.PARTNER.ARP_TAX_VIEW_TAXWARE.INITIALIZE',
2623: 'ZX.PARTNER.ARP_TAX_VIEW_TAXWARE.INITIALIZE(+)');
2624: END IF;
2625:
2626: g_usenexpro := fnd_profile.value('ZX_TAXVDR_USENEXPRO');
2627: g_taxselparam := TO_NUMBER(fnd_profile.value('ZX_TAXVDR_TAXSELPARAM'));
2628: -- g_taxtype := TO_NUMBER(fnd_profile.value('ZX_TAXVDR_TAXTYPE'));
2629: g_serviceind := TO_NUMBER(fnd_profile.value('ZX_TAXVDR_SERVICEIND'));
2630: IF (g_level_procedure >= g_current_runtime_level ) THEN
2631: FND_LOG.STRING(g_level_procedure, 'ZX.PARTNER.ARP_TAX_VIEW_TAXWARE.INITIALIZE',
2632: 'ZX.PARTNER.ARP_TAX_VIEW_TAXWARE.INITIALIZE(-)');
2633: END IF;
2634:
2635: END INITIALIZE;