1: package body ZX_AP_TAX_CLASSIFICATN_DEF_PKG as
2: /* $Header: zxaptxclsdefpkgb.pls 120.23.12020000.2 2012/08/27 09:46:33 ssanka ship $ */
3:
4: -- Declare Public Procedure
5: -- Initialize
67: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
68:
69: IF (g_level_statement >= g_current_runtime_level ) THEN
70: FND_LOG.STRING(g_level_statement,
71: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Initialize.BEGIN',
72: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: initialize(+)' );
73: END IF;
74:
75: open c_financial_params;
68:
69: IF (g_level_statement >= g_current_runtime_level ) THEN
70: FND_LOG.STRING(g_level_statement,
71: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Initialize.BEGIN',
72: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: initialize(+)' );
73: END IF;
74:
75: open c_financial_params;
76: -- Bug#4090842- no need to fetch org_id
79: close c_financial_params;
80:
81: IF (g_level_statement >= g_current_runtime_level ) THEN
82: FND_LOG.STRING(g_level_statement,
83: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.initialize',
84: 'set_of_books_id =='||to_char(l_set_of_books_id));
85:
86: FND_LOG.STRING(g_level_statement,
87: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.initialize',
83: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.initialize',
84: 'set_of_books_id =='||to_char(l_set_of_books_id));
85:
86: FND_LOG.STRING(g_level_statement,
87: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.initialize',
88: 'chart_of_accounts_id =='||to_char(l_chart_of_accounts_id));
89: END IF;
90:
91: sysinfo.set_of_books_id := l_set_of_books_id;
99: sysinfo.cc_info.org_id := NULL; -- Bug 6510307
100:
101: IF (g_level_statement >= g_current_runtime_level ) THEN
102: FND_LOG.STRING(g_level_statement,
103: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Initialize.END',
104: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: initialize(-)' );
105: END IF;
106:
107: EXCEPTION
100:
101: IF (g_level_statement >= g_current_runtime_level ) THEN
102: FND_LOG.STRING(g_level_statement,
103: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Initialize.END',
104: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: initialize(-)' );
105: END IF;
106:
107: EXCEPTION
108: WHEN OTHERS THEN
115: FND_MSG_PUB.Add;
116:
117: IF (g_level_unexpected >= g_current_runtime_level ) THEN
118: FND_LOG.STRING(g_level_unexpected,
119: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.initialize',
120: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
121: END IF;
122: END Initialize;
123:
254: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
255:
256: IF (g_level_statement >= g_current_runtime_level ) THEN
257: FND_LOG.STRING(g_level_statement,
258: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification.BEGIN',
259:
260: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: get_default_tax_classification (+)');
261: END IF;
262:
256: IF (g_level_statement >= g_current_runtime_level ) THEN
257: FND_LOG.STRING(g_level_statement,
258: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification.BEGIN',
259:
260: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: get_default_tax_classification (+)');
261: END IF;
262:
263: --
264: -- set default value
264: -- set default value
265: --
266: Initialize; --Bug 5712279
267:
268: ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification(
269: -- p_line_location_id,
270: p_ref_doc_application_id,
271: p_ref_doc_entity_code,
272: p_ref_doc_event_class_code,
295: p_application_id,
296: p_internal_organization_id);
297: IF (g_level_statement >= g_current_runtime_level ) THEN
298: FND_LOG.STRING(g_level_statement,
299: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification.END',
300:
301: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: get_default_tax_classification (-)');
302: END IF;
303:
297: IF (g_level_statement >= g_current_runtime_level ) THEN
298: FND_LOG.STRING(g_level_statement,
299: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification.END',
300:
301: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: get_default_tax_classification (-)');
302: END IF;
303:
304: END get_default_tax_classification;
305:
339: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
340:
341: IF (g_level_statement >= g_current_runtime_level ) THEN
342: FND_LOG.STRING(g_level_statement,
343: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification.BEGIN',
344:
345: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: get_default_tax_classification (+)');
346: FND_LOG.STRING(g_level_statement,
347: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
341: IF (g_level_statement >= g_current_runtime_level ) THEN
342: FND_LOG.STRING(g_level_statement,
343: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification.BEGIN',
344:
345: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: get_default_tax_classification (+)');
346: FND_LOG.STRING(g_level_statement,
347: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
348:
349: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: overloaded version 1');
343: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification.BEGIN',
344:
345: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: get_default_tax_classification (+)');
346: FND_LOG.STRING(g_level_statement,
347: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
348:
349: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: overloaded version 1');
350:
351: END IF;
345: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: get_default_tax_classification (+)');
346: FND_LOG.STRING(g_level_statement,
347: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
348:
349: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: overloaded version 1');
350:
351: END IF;
352:
353: --
355: --
356:
357: Initialize; --Bug 5712279
358:
359: ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification(
360: p_ref_doc_application_id,
361: p_ref_doc_entity_code,
362: p_ref_doc_event_class_code,
363: p_ref_doc_trx_id,
385: p_application_id,
386: p_internal_organization_id);
387: IF (g_level_statement >= g_current_runtime_level ) THEN
388: FND_LOG.STRING(g_level_statement,
389: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification.END',
390:
391: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: get_default_tax_classification (-)');
392: END IF;
393:
387: IF (g_level_statement >= g_current_runtime_level ) THEN
388: FND_LOG.STRING(g_level_statement,
389: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification.END',
390:
391: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: get_default_tax_classification (-)');
392: END IF;
393:
394: END get_default_tax_classification;
395:
471: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
472:
473: IF (g_level_statement >= g_current_runtime_level ) THEN
474: FND_LOG.STRING(g_level_statement,
475: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification.BEGIN',
476: 'Get_Default_Tax_Classification(+) ');
477: -- FND_LOG.STRING(g_level_statement,
478: -- 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
479: -- 'p_line_location_id == >'||to_char(p_line_location_id ));
474: FND_LOG.STRING(g_level_statement,
475: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification.BEGIN',
476: 'Get_Default_Tax_Classification(+) ');
477: -- FND_LOG.STRING(g_level_statement,
478: -- 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
479: -- 'p_line_location_id == >'||to_char(p_line_location_id ));
480: FND_LOG.STRING(g_level_statement,
481: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
482: 'p_ref_doc_application_id == >'||TO_CHAR(p_ref_doc_application_id));
477: -- FND_LOG.STRING(g_level_statement,
478: -- 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
479: -- 'p_line_location_id == >'||to_char(p_line_location_id ));
480: FND_LOG.STRING(g_level_statement,
481: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
482: 'p_ref_doc_application_id == >'||TO_CHAR(p_ref_doc_application_id));
483: FND_LOG.STRING(g_level_statement,
484: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
485: 'p_ref_doc_entity_code == >'||p_ref_doc_entity_code);
480: FND_LOG.STRING(g_level_statement,
481: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
482: 'p_ref_doc_application_id == >'||TO_CHAR(p_ref_doc_application_id));
483: FND_LOG.STRING(g_level_statement,
484: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
485: 'p_ref_doc_entity_code == >'||p_ref_doc_entity_code);
486: FND_LOG.STRING(g_level_statement,
487: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
488: 'p_ref_doc_event_class_code == >'||p_ref_doc_event_class_code);
483: FND_LOG.STRING(g_level_statement,
484: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
485: 'p_ref_doc_entity_code == >'||p_ref_doc_entity_code);
486: FND_LOG.STRING(g_level_statement,
487: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
488: 'p_ref_doc_event_class_code == >'||p_ref_doc_event_class_code);
489: FND_LOG.STRING(g_level_statement,
490: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
491: 'p_ref_doc_trx_id == >'||TO_CHAR(p_ref_doc_trx_id));
486: FND_LOG.STRING(g_level_statement,
487: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
488: 'p_ref_doc_event_class_code == >'||p_ref_doc_event_class_code);
489: FND_LOG.STRING(g_level_statement,
490: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
491: 'p_ref_doc_trx_id == >'||TO_CHAR(p_ref_doc_trx_id));
492: FND_LOG.STRING(g_level_statement,
493: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
494: 'p_ref_doc_line_id == >'||TO_CHAR(p_ref_doc_line_id));
489: FND_LOG.STRING(g_level_statement,
490: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
491: 'p_ref_doc_trx_id == >'||TO_CHAR(p_ref_doc_trx_id));
492: FND_LOG.STRING(g_level_statement,
493: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
494: 'p_ref_doc_line_id == >'||TO_CHAR(p_ref_doc_line_id));
495: FND_LOG.STRING(g_level_statement,
496: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
497: 'p_ref_doc_trx_level_type == >'||p_ref_doc_trx_level_type);
492: FND_LOG.STRING(g_level_statement,
493: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
494: 'p_ref_doc_line_id == >'||TO_CHAR(p_ref_doc_line_id));
495: FND_LOG.STRING(g_level_statement,
496: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
497: 'p_ref_doc_trx_level_type == >'||p_ref_doc_trx_level_type);
498: FND_LOG.STRING(g_level_statement,
499: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
500: 'p_vendor_id == >' ||to_char(p_vendor_id ));
495: FND_LOG.STRING(g_level_statement,
496: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
497: 'p_ref_doc_trx_level_type == >'||p_ref_doc_trx_level_type);
498: FND_LOG.STRING(g_level_statement,
499: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
500: 'p_vendor_id == >' ||to_char(p_vendor_id ));
501: FND_LOG.STRING(g_level_statement,
502: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
503: 'p_vendor_site_id == >' ||to_char(p_vendor_site_id ));
498: FND_LOG.STRING(g_level_statement,
499: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
500: 'p_vendor_id == >' ||to_char(p_vendor_id ));
501: FND_LOG.STRING(g_level_statement,
502: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
503: 'p_vendor_site_id == >' ||to_char(p_vendor_site_id ));
504: FND_LOG.STRING(g_level_statement,
505: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
506: 'p_code_combination_id = >'||to_char(p_code_combination_id) );
501: FND_LOG.STRING(g_level_statement,
502: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
503: 'p_vendor_site_id == >' ||to_char(p_vendor_site_id ));
504: FND_LOG.STRING(g_level_statement,
505: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
506: 'p_code_combination_id = >'||to_char(p_code_combination_id) );
507: FND_LOG.STRING(g_level_statement,
508: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
509: 'p_concatenated_segments== >'||p_concatenated_segments );
504: FND_LOG.STRING(g_level_statement,
505: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
506: 'p_code_combination_id = >'||to_char(p_code_combination_id) );
507: FND_LOG.STRING(g_level_statement,
508: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
509: 'p_concatenated_segments== >'||p_concatenated_segments );
510: FND_LOG.STRING(g_level_statement,
511: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
512: 'p_templ_tax_classification_cd == >'||
507: FND_LOG.STRING(g_level_statement,
508: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
509: 'p_concatenated_segments== >'||p_concatenated_segments );
510: FND_LOG.STRING(g_level_statement,
511: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
512: 'p_templ_tax_classification_cd == >'||
513: p_templ_tax_classification_cd);
514: FND_LOG.STRING(g_level_statement,
515: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
511: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
512: 'p_templ_tax_classification_cd == >'||
513: p_templ_tax_classification_cd);
514: FND_LOG.STRING(g_level_statement,
515: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
516: 'p_ship_to_location_id == >'||to_char(p_ship_to_location_id) );
517: FND_LOG.STRING(g_level_statement,
518: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
519: 'p_ship_to_loc_org_id == >'||to_char(p_ship_to_loc_org_id) );
514: FND_LOG.STRING(g_level_statement,
515: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
516: 'p_ship_to_location_id == >'||to_char(p_ship_to_location_id) );
517: FND_LOG.STRING(g_level_statement,
518: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
519: 'p_ship_to_loc_org_id == >'||to_char(p_ship_to_loc_org_id) );
520: FND_LOG.STRING(g_level_statement,
521: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
522: 'p_inventory_item_id == >'||to_char(p_inventory_item_id) );
517: FND_LOG.STRING(g_level_statement,
518: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
519: 'p_ship_to_loc_org_id == >'||to_char(p_ship_to_loc_org_id) );
520: FND_LOG.STRING(g_level_statement,
521: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
522: 'p_inventory_item_id == >'||to_char(p_inventory_item_id) );
523: FND_LOG.STRING(g_level_statement,
524: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
525: 'p_item_org_id == >' ||to_char( p_item_org_id));
520: FND_LOG.STRING(g_level_statement,
521: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
522: 'p_inventory_item_id == >'||to_char(p_inventory_item_id) );
523: FND_LOG.STRING(g_level_statement,
524: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
525: 'p_item_org_id == >' ||to_char( p_item_org_id));
526: FND_LOG.STRING(g_level_statement,
527: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
528: 'p_tax_classification_code == >' ||p_tax_classification_code);
523: FND_LOG.STRING(g_level_statement,
524: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
525: 'p_item_org_id == >' ||to_char( p_item_org_id));
526: FND_LOG.STRING(g_level_statement,
527: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
528: 'p_tax_classification_code == >' ||p_tax_classification_code);
529: FND_LOG.STRING(g_level_statement,
530: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
531: 'p_allow_tax_code_override_flag ==>'|| p_allow_tax_code_override_flag);
526: FND_LOG.STRING(g_level_statement,
527: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
528: 'p_tax_classification_code == >' ||p_tax_classification_code);
529: FND_LOG.STRING(g_level_statement,
530: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
531: 'p_allow_tax_code_override_flag ==>'|| p_allow_tax_code_override_flag);
532: FND_LOG.STRING(g_level_statement,
533: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
534: 'p_tax_user_override_flag ==>'||p_tax_user_override_flag);
529: FND_LOG.STRING(g_level_statement,
530: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
531: 'p_allow_tax_code_override_flag ==>'|| p_allow_tax_code_override_flag);
532: FND_LOG.STRING(g_level_statement,
533: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
534: 'p_tax_user_override_flag ==>'||p_tax_user_override_flag);
535: FND_LOG.STRING(g_level_statement,
536: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
537: 'p_user_tax_name ==>'||p_user_tax_name);
532: FND_LOG.STRING(g_level_statement,
533: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
534: 'p_tax_user_override_flag ==>'||p_tax_user_override_flag);
535: FND_LOG.STRING(g_level_statement,
536: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
537: 'p_user_tax_name ==>'||p_user_tax_name);
538: FND_LOG.STRING(g_level_statement,
539: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
540: 'p_legal_entity_id ==>'||TO_CHAR(p_legal_entity_id));
535: FND_LOG.STRING(g_level_statement,
536: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
537: 'p_user_tax_name ==>'||p_user_tax_name);
538: FND_LOG.STRING(g_level_statement,
539: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
540: 'p_legal_entity_id ==>'||TO_CHAR(p_legal_entity_id));
541:
542: FND_LOG.STRING(g_level_statement,
543: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
539: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
540: 'p_legal_entity_id ==>'||TO_CHAR(p_legal_entity_id));
541:
542: FND_LOG.STRING(g_level_statement,
543: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
544: 'APPL_SHORT_NAME == >'||APPL_SHORT_NAME );
545: FND_LOG.STRING(g_level_statement,
546: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
547: 'FUNC_SHORT_NAME == >'||FUNC_SHORT_NAME );
542: FND_LOG.STRING(g_level_statement,
543: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
544: 'APPL_SHORT_NAME == >'||APPL_SHORT_NAME );
545: FND_LOG.STRING(g_level_statement,
546: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
547: 'FUNC_SHORT_NAME == >'||FUNC_SHORT_NAME );
548: FND_LOG.STRING(g_level_statement,
549: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
550: 'p_calling_sequence == >'||p_calling_sequence );
545: FND_LOG.STRING(g_level_statement,
546: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
547: 'FUNC_SHORT_NAME == >'||FUNC_SHORT_NAME );
548: FND_LOG.STRING(g_level_statement,
549: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
550: 'p_calling_sequence == >'||p_calling_sequence );
551: FND_LOG.STRING(g_level_statement,
552: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
553: 'p_event_class_code == >'||p_event_class_code );
548: FND_LOG.STRING(g_level_statement,
549: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
550: 'p_calling_sequence == >'||p_calling_sequence );
551: FND_LOG.STRING(g_level_statement,
552: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
553: 'p_event_class_code == >'||p_event_class_code );
554: FND_LOG.STRING(g_level_statement,
555: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
556: 'p_entity_code == >'||p_entity_code );
551: FND_LOG.STRING(g_level_statement,
552: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
553: 'p_event_class_code == >'||p_event_class_code );
554: FND_LOG.STRING(g_level_statement,
555: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
556: 'p_entity_code == >'||p_entity_code );
557: FND_LOG.STRING(g_level_statement,
558: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
559: 'p_application_id == >'||TO_CHAR(p_application_id));
554: FND_LOG.STRING(g_level_statement,
555: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
556: 'p_entity_code == >'||p_entity_code );
557: FND_LOG.STRING(g_level_statement,
558: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
559: 'p_application_id == >'||TO_CHAR(p_application_id));
560: FND_LOG.STRING(g_level_statement,
561: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
562: 'p_internal_organization_id == >'||TO_CHAR(p_internal_organization_id));
557: FND_LOG.STRING(g_level_statement,
558: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
559: 'p_application_id == >'||TO_CHAR(p_application_id));
560: FND_LOG.STRING(g_level_statement,
561: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
562: 'p_internal_organization_id == >'||TO_CHAR(p_internal_organization_id));
563:
564: END IF;
565:
609: l_tax_classification_found := FALSE;
610:
611: debug_loc := 'Get_Default_Tax_Classification';
612:
613: l_curr_calling_sequence := 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG.'||debug_loc||'<-'||p_calling_sequence;
614:
615: --
616: -- Get Payables/Purchasing default tax code.
617: -- Hierarchy for PO: Ship-to Location, Item, Vendor, Vendor Site and System.
681: END IF;
682:
683: IF (g_level_statement >= g_current_runtime_level ) THEN
684: FND_LOG.STRING(g_level_statement,
685: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
686: 'l_tax_classification_code is found =='||l_tax_classification_code);
687: END IF;
688:
689: IF (l_tax_classification_found = FALSE) THEN
691: IF (search_ap_def_hier = TRUE) THEN
692:
693: IF (g_level_statement >= g_current_runtime_level ) THEN
694: FND_LOG.STRING(g_level_statement,
695: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
696: 'Getting Event Class Options');
697: END IF;
698:
699: -- open c_evnt_cls_options (to_number(substrb(userenv('CLIENT_INFO'),1,10)),
707: close c_evnt_cls_options;
708:
709: IF (g_level_statement >= g_current_runtime_level ) THEN
710: FND_LOG.STRING(g_level_statement,
711: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
712: 'Entity Code:' || p_entity_code);
713: FND_LOG.STRING(g_level_statement,
714: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
715: 'Event Class Code:' || p_event_class_code);
710: FND_LOG.STRING(g_level_statement,
711: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
712: 'Entity Code:' || p_entity_code);
713: FND_LOG.STRING(g_level_statement,
714: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
715: 'Event Class Code:' || p_event_class_code);
716: FND_LOG.STRING(g_level_statement,
717: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
718: 'Enforce Tax From Account =='
713: FND_LOG.STRING(g_level_statement,
714: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
715: 'Event Class Code:' || p_event_class_code);
716: FND_LOG.STRING(g_level_statement,
717: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
718: 'Enforce Tax From Account =='
719: || l_enforce_tax_from_acct_flag);
720:
721: FND_LOG.STRING(g_level_statement,
718: 'Enforce Tax From Account =='
719: || l_enforce_tax_from_acct_flag);
720:
721: FND_LOG.STRING(g_level_statement,
722: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
723: 'Getting tax code for AP ');
724: END IF;
725:
726: IF (l_enforce_tax_from_refdoc_flag = 'Y') THEN
730: -- precedence over the rest of the hierarchy.
731:
732: IF (g_level_statement >= g_current_runtime_level ) THEN
733: FND_LOG.STRING(g_level_statement,
734: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
735: 'Matching is enforced');
736: END IF;
737:
738: /*
747: where line_location_id = p_line_location_id ;
748:
749: IF (g_level_statement >= g_current_runtime_level ) THEN
750: FND_LOG.STRING(g_level_statement,
751: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
752: ' l_shipment_taxable_flag is ' || l_shipment_taxable_flag );
753: END IF;
754: If (l_shipment_taxable_flag = 'Y' ) then
755: IF (g_level_statement >= g_current_runtime_level ) THEN
753: END IF;
754: If (l_shipment_taxable_flag = 'Y' ) then
755: IF (g_level_statement >= g_current_runtime_level ) THEN
756: FND_LOG.STRING(g_level_statement,
757: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
758: 'Calling get_po_shipment tax ' );
759: END IF;
760: l_tax_classification_code := get_input_tax_classif_code (p_line_location_id,
761: l_curr_calling_sequence);
786: -- Tax found on PO shipment, do not search further
787: l_enforced_tax_found := TRUE;
788: IF (g_level_statement >= g_current_runtime_level ) THEN
789: FND_LOG.STRING(g_level_statement,
790: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
791: 'l_tax_classification_code =='||l_tax_classification_code );
792: END IF;
793: END IF;
794: ELSIF (l_enforce_tax_from_acct_flag = 'Y') THEN
800: -- This includes both Input and Non-taxable accounts.
801:
802: IF (g_level_statement >= g_current_runtime_level ) THEN
803: FND_LOG.STRING(g_level_statement,
804: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
805: 'Tax from account is enforced');
806: FND_LOG.STRING(g_level_statement,
807: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
808: ' Calling get_account_tax ');
803: FND_LOG.STRING(g_level_statement,
804: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
805: 'Tax from account is enforced');
806: FND_LOG.STRING(g_level_statement,
807: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
808: ' Calling get_account_tax ');
809: END IF;
810: get_account_tax (p_code_combination_id,
811: p_concatenated_segments,
815: l_curr_calling_sequence);
816: l_tax_classification_code := p_tax_classification_code;
817: IF (g_level_statement >= g_current_runtime_level ) THEN
818: FND_LOG.STRING(g_level_statement,
819: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
820: 'l_tax_classification_code =='||l_tax_classification_code);
821: END IF;
822: IF (p_allow_tax_code_override_flag = 'N') THEN
823: -- Override is not allowed, do not search further
847:
848: IF (aptaxtab (i) = 'REFERENCE_DOCUMENT') THEN
849: IF (g_level_statement >= g_current_runtime_level ) THEN
850: FND_LOG.STRING(g_level_statement,
851: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
852: 'Getting tax code from shipment');
853: FND_LOG.STRING(g_level_statement,
854: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
855: 'Calling get_input_tax_classif_code ');
850: FND_LOG.STRING(g_level_statement,
851: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
852: 'Getting tax code from shipment');
853: FND_LOG.STRING(g_level_statement,
854: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
855: 'Calling get_input_tax_classif_code ');
856: END IF;
857: l_tax_classification_code := get_input_tax_classif_code (
858: p_ref_doc_application_id,
866: IF (l_tax_classification_code is not NULL) THEN
867: l_tax_classification_found := TRUE;
868: IF (g_level_statement >= g_current_runtime_level ) THEN
869: FND_LOG.STRING(g_level_statement,
870: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
871: 'l_tax_classification_code =='
872: ||l_tax_classification_code);
873: END IF;
874: exit Ap_Tax_Loop;
877:
878: IF (aptaxtab (i) = 'SHIP_FROM_PARTY_SITE') THEN
879: IF (g_level_statement >= g_current_runtime_level ) THEN
880: FND_LOG.STRING(g_level_statement,
881: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
882: 'Getting tax code from supplier site');
883: END IF;
884: l_tax_classification_code := get_site_tax (
885: p_vendor_site_id,
887: IF (l_tax_classification_code is not NULL) THEN
888: l_tax_classification_found := TRUE;
889: IF (g_level_statement >= g_current_runtime_level ) THEN
890: FND_LOG.STRING(g_level_statement,
891: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
892: 'l_tax_classification_code =='
893: ||l_tax_classification_code);
894: END IF;
895: exit Ap_Tax_Loop;
898:
899: IF (aptaxtab (i) = 'SHIP_FROM_PARTY') THEN
900: IF (g_level_statement >= g_current_runtime_level ) THEN
901: FND_LOG.STRING(g_level_statement,
902: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
903: 'Getting tax code from supplier');
904: END IF;
905: l_tax_classification_code := get_vendor_tax (
906: p_vendor_id,
908: IF (l_tax_classification_code is not NULL) THEN
909: l_tax_classification_found := TRUE;
910: IF (g_level_statement >= g_current_runtime_level ) THEN
911: FND_LOG.STRING(g_level_statement,
912: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
913: 'l_tax_classification_code =='
914: ||l_tax_classification_code);
915: END IF;
916: exit Ap_Tax_Loop;
919:
920: IF (aptaxtab (i) = 'NATURAL_ACCOUNT') THEN
921: IF (g_level_statement >= g_current_runtime_level ) THEN
922: FND_LOG.STRING(g_level_statement,
923: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
924: 'Getting tax code from account');
925: END IF;
926: get_account_tax (p_code_combination_id,
927: p_concatenated_segments,
931: l_curr_calling_sequence);
932: l_tax_classification_code := p_tax_classification_code;
933: IF (g_level_statement >= g_current_runtime_level ) THEN
934: FND_LOG.STRING(g_level_statement,
935: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
936: 'l_tax_classification_code =='
937: ||l_tax_classification_code);
938: END IF;
939: IF (l_tax_classification_found = TRUE) THEN
938: END IF;
939: IF (l_tax_classification_found = TRUE) THEN
940: IF (g_level_statement >= g_current_runtime_level ) THEN
941: FND_LOG.STRING(g_level_statement,
942: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
943: 'l_tax_classification_code is Found =='
944: ||l_tax_classification_code);
945: END IF;
946: exit Ap_Tax_Loop;
949:
950: IF (aptaxtab (i) = 'FINANCIAL_OPTIONS') THEN
951: IF (g_level_statement >= g_current_runtime_level ) THEN
952: FND_LOG.STRING(g_level_statement,
953: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
954: 'Getting tax code from financial system parameters');
955: FND_LOG.STRING(g_level_statement,
956: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
957: 'sysinfo.vat_code =='
952: FND_LOG.STRING(g_level_statement,
953: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
954: 'Getting tax code from financial system parameters');
955: FND_LOG.STRING(g_level_statement,
956: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
957: 'sysinfo.vat_code =='
958: ||sysinfo.ap_info.tax_classification_code );
959: END IF;
960: l_tax_classification_code := sysinfo.ap_info.tax_classification_code;
961: IF (l_tax_classification_code is not NULL) THEN
962: l_tax_classification_found := TRUE;
963: IF (g_level_statement >= g_current_runtime_level ) THEN
964: FND_LOG.STRING(g_level_statement,
965: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
966: 'l_tax_classification_code =='
967: ||l_tax_classification_code);
968: END IF;
969: exit Ap_Tax_Loop;
972:
973: IF (aptaxtab (i) = 'TEMPLATE') THEN
974: IF (g_level_statement >= g_current_runtime_level ) THEN
975: FND_LOG.STRING(g_level_statement,
976: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
977: 'Getting tax code from template');
978: END IF;
979: -- If the API has been called from a form or process
980: -- where a template is being used, then we should always
995: l_tax_classification_code := p_templ_tax_classification_cd;
996: l_tax_classification_found := TRUE;
997: IF (g_level_statement >= g_current_runtime_level ) THEN
998: FND_LOG.STRING(g_level_statement,
999: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1000: 'l_tax_classification_code =='
1001: ||l_tax_classification_code);
1002: END IF;
1003: exit Ap_Tax_Loop;
1012: IF (search_po_def_hier = TRUE) THEN
1013:
1014: IF (g_level_statement >= g_current_runtime_level ) THEN
1015: FND_LOG.STRING(g_level_statement,
1016: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1017: 'Getting tax code for PO');
1018: END IF;
1019:
1020: l_count := potaxtab.COUNT;
1033: -- potaxtab (i) is not NULL
1034: IF (potaxtab (i) = 'SHIP_TO_LOCATION') THEN
1035: IF (g_level_statement >= g_current_runtime_level ) THEN
1036: FND_LOG.STRING(g_level_statement,
1037: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1038: ' Calling get_ship_to_location_tax ');
1039: END IF;
1040:
1041: l_tax_classification_code :=
1046: IF (l_tax_classification_code is not NULL) THEN
1047: l_tax_classification_found := TRUE;
1048: IF (g_level_statement >= g_current_runtime_level ) THEN
1049: FND_LOG.STRING(g_level_statement,
1050: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1051: 'l_tax_classification_code =='
1052: ||l_tax_classification_code);
1053: END IF;
1054: exit Po_Tax_Loop;
1057:
1058: IF (potaxtab (i) = 'ITEM') THEN
1059: IF (g_level_statement >= g_current_runtime_level ) THEN
1060: FND_LOG.STRING(g_level_statement,
1061: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1062: 'Getting tax code from item');
1063: FND_LOG.STRING(g_level_statement,
1064: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1065: 'Calling get_item_tax ');
1060: FND_LOG.STRING(g_level_statement,
1061: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1062: 'Getting tax code from item');
1063: FND_LOG.STRING(g_level_statement,
1064: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1065: 'Calling get_item_tax ');
1066: END IF;
1067: l_tax_classification_code := get_item_tax (p_inventory_item_id,
1068: p_ship_to_loc_org_id,
1081: --the tax code defaulting PKG should not look further to the next hierarchy
1082: --even a null tax code is returned.
1083: IF (g_level_statement >= g_current_runtime_level ) THEN
1084: FND_LOG.STRING(g_level_statement,
1085: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1086: 'l_item_taxable_flag = ' || l_item_taxable_flag );
1087: END IF;
1088:
1089: IF (l_item_taxable_flag = 'N' or l_tax_classification_code is not null) THEN
1089: IF (l_item_taxable_flag = 'N' or l_tax_classification_code is not null) THEN
1090: l_tax_classification_found := TRUE;
1091: IF (g_level_statement >= g_current_runtime_level ) THEN
1092: FND_LOG.STRING(g_level_statement,
1093: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1094: 'l_tax_classification_code =='||l_tax_classification_code);
1095: END IF;
1096: exit Po_Tax_Loop;
1097: END IF;
1099:
1100: IF (potaxtab (i) = 'SHIP_FROM_PARTY_SITE') THEN
1101: IF (g_level_statement >= g_current_runtime_level ) THEN
1102: FND_LOG.STRING(g_level_statement,
1103: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1104: 'Getting tax code from supplier site');
1105: FND_LOG.STRING(g_level_statement,
1106: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1107: 'Calling get_site_tax ');
1102: FND_LOG.STRING(g_level_statement,
1103: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1104: 'Getting tax code from supplier site');
1105: FND_LOG.STRING(g_level_statement,
1106: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1107: 'Calling get_site_tax ');
1108: END IF;
1109: l_tax_classification_code := get_site_tax (
1110: p_vendor_site_id,
1112: IF (l_tax_classification_code is not NULL) THEN
1113: l_tax_classification_found := TRUE;
1114: IF (g_level_statement >= g_current_runtime_level ) THEN
1115: FND_LOG.STRING(g_level_statement,
1116: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1117: 'l_tax_classification_code =='||l_tax_classification_code);
1118: END IF;
1119: exit Po_Tax_Loop;
1120: END IF;
1122:
1123: IF (potaxtab (i) = 'SHIP_FROM_PARTY') THEN
1124: IF (g_level_statement >= g_current_runtime_level ) THEN
1125: FND_LOG.STRING(g_level_statement,
1126: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1127: 'Getting tax code from supplier');
1128: FND_LOG.STRING(g_level_statement,
1129: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1130: 'Calling get_vendor_tax ');
1125: FND_LOG.STRING(g_level_statement,
1126: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1127: 'Getting tax code from supplier');
1128: FND_LOG.STRING(g_level_statement,
1129: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1130: 'Calling get_vendor_tax ');
1131: END IF;
1132: l_tax_classification_code := get_vendor_tax (
1133: p_vendor_id,
1135: IF (l_tax_classification_code is not NULL) THEN
1136: l_tax_classification_found := TRUE;
1137: IF (g_level_statement >= g_current_runtime_level ) THEN
1138: FND_LOG.STRING(g_level_statement,
1139: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1140: 'l_tax_classification_code =='||l_tax_classification_code);
1141: END IF;
1142: exit Po_Tax_Loop;
1143: END IF;
1145:
1146: IF (potaxtab (i) = 'FINANCIAL_OPTIONS') THEN
1147: IF (g_level_statement >= g_current_runtime_level ) THEN
1148: FND_LOG.STRING(g_level_statement,
1149: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1150: 'Getting tax code from financial system parameters');
1151: FND_LOG.STRING(g_level_statement,
1152: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1153: 'sysinfo.po_info.tax_classification_code =='
1148: FND_LOG.STRING(g_level_statement,
1149: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1150: 'Getting tax code from financial system parameters');
1151: FND_LOG.STRING(g_level_statement,
1152: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1153: 'sysinfo.po_info.tax_classification_code =='
1154: ||sysinfo.po_info.tax_classification_code);
1155: END IF;
1156: l_tax_classification_code := sysinfo.po_info.tax_classification_code;
1157: IF (l_tax_classification_code is not NULL) THEN
1158: l_tax_classification_found := TRUE;
1159: IF (g_level_statement >= g_current_runtime_level ) THEN
1160: FND_LOG.STRING(g_level_statement,
1161: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1162: 'l_tax_classification_code =='||l_tax_classification_code);
1163: END IF;
1164: exit Po_Tax_Loop;
1165: END IF;
1173: IF (search_cc_def_hier = TRUE) THEN
1174:
1175: IF (g_level_statement >= g_current_runtime_level ) THEN
1176: FND_LOG.STRING(g_level_statement,
1177: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1178: 'Getting tax code for CC');
1179: END IF;
1180:
1181: l_count := cctaxtab.COUNT;
1194: -- cctaxtab (i) is not NULL
1195: IF (cctaxtab (i) = 'SHIP_FROM_PARTY_SITE') THEN
1196: IF (g_level_statement >= g_current_runtime_level ) THEN
1197: FND_LOG.STRING(g_level_statement,
1198: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1199: 'Getting tax code from supplier site');
1200: END IF;
1201: l_tax_classification_code := get_site_tax (
1202: p_vendor_site_id,
1204: IF (l_tax_classification_code is not NULL) THEN
1205: l_tax_classification_found := TRUE;
1206: IF (g_level_statement >= g_current_runtime_level ) THEN
1207: FND_LOG.STRING(g_level_statement,
1208: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1209: 'l_tax_classification_code =='
1210: ||l_tax_classification_code);
1211: END IF;
1212: exit Cc_Tax_Loop;
1215:
1216: IF (cctaxtab (i) = 'SHIP_FROM_PARTY') THEN
1217: IF (g_level_statement >= g_current_runtime_level ) THEN
1218: FND_LOG.STRING(g_level_statement,
1219: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1220: 'Getting tax code from supplier');
1221: END IF;
1222: l_tax_classification_code := get_vendor_tax (
1223: p_vendor_id,
1225: IF (l_tax_classification_code is not NULL) THEN
1226: l_tax_classification_found := TRUE;
1227: IF (g_level_statement >= g_current_runtime_level ) THEN
1228: FND_LOG.STRING(g_level_statement,
1229: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1230: 'l_tax_classification_code =='
1231: ||l_tax_classification_code);
1232: END IF;
1233: exit Cc_Tax_Loop;
1236:
1237: IF (cctaxtab (i) = 'FINANCIAL_OPTIONS') THEN
1238: IF (g_level_statement >= g_current_runtime_level ) THEN
1239: FND_LOG.STRING(g_level_statement,
1240: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1241: 'Getting tax code from financial system parameters');
1242: FND_LOG.STRING(g_level_statement,
1243: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1244: 'sysinfo.vat_code =='
1239: FND_LOG.STRING(g_level_statement,
1240: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1241: 'Getting tax code from financial system parameters');
1242: FND_LOG.STRING(g_level_statement,
1243: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1244: 'sysinfo.vat_code =='
1245: ||sysinfo.cc_info.tax_classification_code );
1246: END IF;
1247: l_tax_classification_code := sysinfo.cc_info.tax_classification_code;
1248: IF (l_tax_classification_code is not NULL) THEN
1249: l_tax_classification_found := TRUE;
1250: IF (g_level_statement >= g_current_runtime_level ) THEN
1251: FND_LOG.STRING(g_level_statement,
1252: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1253: 'l_tax_classification_code =='
1254: ||l_tax_classification_code);
1255: END IF;
1256: exit Cc_Tax_Loop;
1264: END IF; -- tax_code_found
1265:
1266: IF (g_level_statement >= g_current_runtime_level ) THEN
1267: FND_LOG.STRING(g_level_statement,
1268: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1269: 'After Po_Tax_Loop ,l_tax_classification_code =='
1270: ||l_tax_classification_code);
1271: END IF;
1272:
1272:
1273: IF (nvl (p_tax_user_override_flag, 'N') <> 'Y') THEN
1274: IF (g_level_statement >= g_current_runtime_level ) THEN
1275: FND_LOG.STRING(g_level_statement,
1276: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1277: 'p_tax_user_override_flag =='||p_tax_user_override_flag);
1278: FND_LOG.STRING(g_level_statement,
1279: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1280: 'l_tax_classification_code =='||l_tax_classification_code);
1275: FND_LOG.STRING(g_level_statement,
1276: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1277: 'p_tax_user_override_flag =='||p_tax_user_override_flag);
1278: FND_LOG.STRING(g_level_statement,
1279: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1280: 'l_tax_classification_code =='||l_tax_classification_code);
1281: END IF;
1282: IF (l_tax_classification_code is not null) THEN
1283: p_tax_classification_code := l_tax_classification_code;
1284: END IF;
1285: END IF;
1286: IF (g_level_statement >= g_current_runtime_level ) THEN
1287: FND_LOG.STRING(g_level_statement,
1288: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1289: 'p_tax_classification_code =='||p_tax_classification_code);
1290: FND_LOG.STRING(g_level_statement,
1291: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification.END',
1292: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: get_default_tax_classification (-)');
1287: FND_LOG.STRING(g_level_statement,
1288: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1289: 'p_tax_classification_code =='||p_tax_classification_code);
1290: FND_LOG.STRING(g_level_statement,
1291: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification.END',
1292: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: get_default_tax_classification (-)');
1293: END IF;
1294:
1295: EXCEPTION
1288: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1289: 'p_tax_classification_code =='||p_tax_classification_code);
1290: FND_LOG.STRING(g_level_statement,
1291: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification.END',
1292: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: get_default_tax_classification (-)');
1293: END IF;
1294:
1295: EXCEPTION
1296: WHEN NO_DATA_FOUND THEN
1295: EXCEPTION
1296: WHEN NO_DATA_FOUND THEN
1297: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1298: FND_LOG.STRING(g_level_unexpected,
1299: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1300: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80) );
1301: END IF;
1302: IF (l_tax_classification_found = FALSE ) THEN
1303: RAISE NO_DATA_FOUND;
1305: WHEN OTHERS THEN
1306: IF (SQLCODE <> -20001) THEN
1307: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1308: FND_LOG.STRING(g_level_unexpected,
1309: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1310: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80) );
1311: END IF;
1312: IF (appl_short_name = 'SQLAP') THEN
1313: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
1415: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1416:
1417: IF (g_level_statement >= g_current_runtime_level ) THEN
1418: FND_LOG.STRING(g_level_statement,
1419: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification.BEGIN',
1420:
1421: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: get_default_tax_classification (+)');
1422: FND_LOG.STRING(g_level_statement,
1423: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1417: IF (g_level_statement >= g_current_runtime_level ) THEN
1418: FND_LOG.STRING(g_level_statement,
1419: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification.BEGIN',
1420:
1421: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: get_default_tax_classification (+)');
1422: FND_LOG.STRING(g_level_statement,
1423: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1424:
1425: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: overloaded version 2');
1419: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification.BEGIN',
1420:
1421: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: get_default_tax_classification (+)');
1422: FND_LOG.STRING(g_level_statement,
1423: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1424:
1425: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: overloaded version 2');
1426:
1427: END IF;
1421: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: get_default_tax_classification (+)');
1422: FND_LOG.STRING(g_level_statement,
1423: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification',
1424:
1425: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: overloaded version 2');
1426:
1427: END IF;
1428: Initialize; --Bug 5712279
1429: --
1429: --
1430: -- set default value
1431: --
1432:
1433: ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification(
1434: p_ref_doc_application_id,
1435: p_ref_doc_entity_code,
1436: p_ref_doc_event_class_code,
1437: p_ref_doc_trx_id,
1459: p_application_id,
1460: p_internal_organization_id);
1461: IF (g_level_statement >= g_current_runtime_level ) THEN
1462: FND_LOG.STRING(g_level_statement,
1463: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification.END',
1464:
1465: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: get_default_tax_classification (-)');
1466: END IF;
1467:
1461: IF (g_level_statement >= g_current_runtime_level ) THEN
1462: FND_LOG.STRING(g_level_statement,
1463: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_default_tax_classification.END',
1464:
1465: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: get_default_tax_classification (-)');
1466: END IF;
1467:
1468: END get_default_tax_classification;
1469:
1545: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1546:
1547: IF (g_level_statement >= g_current_runtime_level ) THEN
1548: FND_LOG.STRING(g_level_statement,
1549: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_input_tax_classif_code.BEGIN',
1550: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: get_input_tax_classif_code (+)');
1551: FND_LOG.STRING(g_level_statement,
1552: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_input_tax_classif_code',
1553:
1546:
1547: IF (g_level_statement >= g_current_runtime_level ) THEN
1548: FND_LOG.STRING(g_level_statement,
1549: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_input_tax_classif_code.BEGIN',
1550: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: get_input_tax_classif_code (+)');
1551: FND_LOG.STRING(g_level_statement,
1552: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_input_tax_classif_code',
1553:
1554: 'p_calling_sequence == >'||p_calling_sequence);
1548: FND_LOG.STRING(g_level_statement,
1549: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_input_tax_classif_code.BEGIN',
1550: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: get_input_tax_classif_code (+)');
1551: FND_LOG.STRING(g_level_statement,
1552: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_input_tax_classif_code',
1553:
1554: 'p_calling_sequence == >'||p_calling_sequence);
1555: END IF;
1556:
1554: 'p_calling_sequence == >'||p_calling_sequence);
1555: END IF;
1556:
1557: debug_loc := 'get_input_tax_classif_code';
1558: l_curr_calling_sequence := 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG.'||debug_loc||'<-'||p_calling_sequence;
1559:
1560: l_tax_classification_code := NULL;
1561:
1562: OPEN sel_input_tax_cls_cd
1570: CLOSE sel_input_tax_cls_cd;
1571:
1572: IF (g_level_statement >= g_current_runtime_level ) THEN
1573: FND_LOG.STRING(g_level_statement,
1574: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_input_tax_classif_code',
1575:
1576: 'l_tax_classification_code =='||l_tax_classification_code);
1577: FND_LOG.STRING(g_level_statement,
1578: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_input_tax_classif_code.END',
1574: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_input_tax_classif_code',
1575:
1576: 'l_tax_classification_code =='||l_tax_classification_code);
1577: FND_LOG.STRING(g_level_statement,
1578: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_input_tax_classif_code.END',
1579: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: get_input_tax_classif_code (-)');
1580: END IF;
1581:
1582: RETURN (l_tax_classification_code);
1575:
1576: 'l_tax_classification_code =='||l_tax_classification_code);
1577: FND_LOG.STRING(g_level_statement,
1578: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_input_tax_classif_code.END',
1579: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: get_input_tax_classif_code (-)');
1580: END IF;
1581:
1582: RETURN (l_tax_classification_code);
1583:
1588: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
1589: FND_MSG_PUB.Add;
1590: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1591: FND_LOG.STRING(g_level_unexpected,
1592: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_input_tax_classif_code',
1593: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
1594: END IF;
1595: IF (sel_input_tax_cls_cd%ISOPEN ) THEN
1596: CLOSE sel_input_tax_cls_cd;
1660: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1661:
1662: IF (g_level_statement >= g_current_runtime_level ) THEN
1663: FND_LOG.STRING(g_level_statement,
1664: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_site_tax.BEGIN',
1665: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_site_tax (+)');
1666: FND_LOG.STRING(g_level_statement,
1667: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_site_tax',
1668: 'p_vendor_site_id == >'||to_char(p_vendor_site_id));
1661:
1662: IF (g_level_statement >= g_current_runtime_level ) THEN
1663: FND_LOG.STRING(g_level_statement,
1664: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_site_tax.BEGIN',
1665: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_site_tax (+)');
1666: FND_LOG.STRING(g_level_statement,
1667: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_site_tax',
1668: 'p_vendor_site_id == >'||to_char(p_vendor_site_id));
1669: FND_LOG.STRING(g_level_statement,
1663: FND_LOG.STRING(g_level_statement,
1664: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_site_tax.BEGIN',
1665: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_site_tax (+)');
1666: FND_LOG.STRING(g_level_statement,
1667: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_site_tax',
1668: 'p_vendor_site_id == >'||to_char(p_vendor_site_id));
1669: FND_LOG.STRING(g_level_statement,
1670: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_site_tax',
1671: 'p_calling_sequence == >'||p_calling_sequence);
1666: FND_LOG.STRING(g_level_statement,
1667: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_site_tax',
1668: 'p_vendor_site_id == >'||to_char(p_vendor_site_id));
1669: FND_LOG.STRING(g_level_statement,
1670: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_site_tax',
1671: 'p_calling_sequence == >'||p_calling_sequence);
1672: END IF;
1673: debug_loc := 'Get_Site_Tax';
1674: l_curr_calling_sequence := 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG.'||debug_loc||'<-'||p_calling_sequence;
1670: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_site_tax',
1671: 'p_calling_sequence == >'||p_calling_sequence);
1672: END IF;
1673: debug_loc := 'Get_Site_Tax';
1674: l_curr_calling_sequence := 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG.'||debug_loc||'<-'||p_calling_sequence;
1675: IF (g_level_statement >= g_current_runtime_level ) THEN
1676: FND_LOG.STRING(g_level_statement,
1677: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_site_tax',
1678: 'p_calling_sequence =='||p_calling_sequence);
1673: debug_loc := 'Get_Site_Tax';
1674: l_curr_calling_sequence := 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG.'||debug_loc||'<-'||p_calling_sequence;
1675: IF (g_level_statement >= g_current_runtime_level ) THEN
1676: FND_LOG.STRING(g_level_statement,
1677: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_site_tax',
1678: 'p_calling_sequence =='||p_calling_sequence);
1679: END IF;
1680:
1681: l_tax_classification_code := NULL;
1714: END IF;
1715:
1716: IF (g_level_statement >= g_current_runtime_level ) THEN
1717: FND_LOG.STRING(g_level_statement,
1718: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.G
1719: et_Vendor_Tax',
1720: 'l_party_site_id == >'||to_char(l_party_site_id));
1721: FND_LOG.STRING(g_level_statement,
1722: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_site_tax',
1718: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.G
1719: et_Vendor_Tax',
1720: 'l_party_site_id == >'||to_char(l_party_site_id));
1721: FND_LOG.STRING(g_level_statement,
1722: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_site_tax',
1723: 'l_tax_classification_code =='||l_tax_classification_code);
1724: FND_LOG.STRING(g_level_statement,
1725: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_site_tax.END',
1726: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_site_tax (-)');
1721: FND_LOG.STRING(g_level_statement,
1722: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_site_tax',
1723: 'l_tax_classification_code =='||l_tax_classification_code);
1724: FND_LOG.STRING(g_level_statement,
1725: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_site_tax.END',
1726: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_site_tax (-)');
1727: END IF;
1728:
1729: RETURN (l_tax_classification_code);
1722: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_site_tax',
1723: 'l_tax_classification_code =='||l_tax_classification_code);
1724: FND_LOG.STRING(g_level_statement,
1725: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_site_tax.END',
1726: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_site_tax (-)');
1727: END IF;
1728:
1729: RETURN (l_tax_classification_code);
1730:
1735: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
1736: FND_MSG_PUB.Add;
1737: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1738: FND_LOG.STRING(g_level_unexpected,
1739: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_site_tax',
1740: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
1741: END IF;
1742: IF (sel_site_tax_sup_site%ISOPEN ) THEN
1743: CLOSE sel_site_tax_sup_site;
1810: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1811:
1812: IF (g_level_statement >= g_current_runtime_level ) THEN
1813: FND_LOG.STRING(g_level_statement,
1814: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_vendor_tax.BEGIN',
1815: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Vendor_Tax (+)');
1816: FND_LOG.STRING(g_level_statement,
1817: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Vendor_Tax',
1818: 'p_vendor_id == >'||to_char(p_vendor_id));
1811:
1812: IF (g_level_statement >= g_current_runtime_level ) THEN
1813: FND_LOG.STRING(g_level_statement,
1814: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_vendor_tax.BEGIN',
1815: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Vendor_Tax (+)');
1816: FND_LOG.STRING(g_level_statement,
1817: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Vendor_Tax',
1818: 'p_vendor_id == >'||to_char(p_vendor_id));
1819: FND_LOG.STRING(g_level_statement,
1813: FND_LOG.STRING(g_level_statement,
1814: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_vendor_tax.BEGIN',
1815: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Vendor_Tax (+)');
1816: FND_LOG.STRING(g_level_statement,
1817: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Vendor_Tax',
1818: 'p_vendor_id == >'||to_char(p_vendor_id));
1819: FND_LOG.STRING(g_level_statement,
1820: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Vendor_Tax',
1821: 'p_calling_sequence == >'||p_calling_sequence);
1816: FND_LOG.STRING(g_level_statement,
1817: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Vendor_Tax',
1818: 'p_vendor_id == >'||to_char(p_vendor_id));
1819: FND_LOG.STRING(g_level_statement,
1820: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Vendor_Tax',
1821: 'p_calling_sequence == >'||p_calling_sequence);
1822: END IF;
1823: debug_loc := 'Get_Vendor_Tax';
1824: l_curr_calling_sequence := 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG.'||debug_loc||'<-'||p_calling_sequence;
1820: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Vendor_Tax',
1821: 'p_calling_sequence == >'||p_calling_sequence);
1822: END IF;
1823: debug_loc := 'Get_Vendor_Tax';
1824: l_curr_calling_sequence := 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG.'||debug_loc||'<-'||p_calling_sequence;
1825: IF (g_level_statement >= g_current_runtime_level ) THEN
1826: FND_LOG.STRING(g_level_statement,
1827: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Vendor_Tax',
1828: 'l_curr_calling_sequence =='||l_curr_calling_sequence );
1823: debug_loc := 'Get_Vendor_Tax';
1824: l_curr_calling_sequence := 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG.'||debug_loc||'<-'||p_calling_sequence;
1825: IF (g_level_statement >= g_current_runtime_level ) THEN
1826: FND_LOG.STRING(g_level_statement,
1827: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Vendor_Tax',
1828: 'l_curr_calling_sequence =='||l_curr_calling_sequence );
1829: END IF;
1830:
1831: l_tax_classification_code := NULL;
1864: END IF;
1865:
1866: IF (g_level_statement >= g_current_runtime_level ) THEN
1867: FND_LOG.STRING(g_level_statement,
1868: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Vendor_Tax',
1869: 'l_party_id == >'||to_char(l_party_id));
1870: FND_LOG.STRING(g_level_statement,
1871: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Vendor_Tax',
1872: 'From get_vendor_tax ,l_tax_classification_code =='
1867: FND_LOG.STRING(g_level_statement,
1868: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Vendor_Tax',
1869: 'l_party_id == >'||to_char(l_party_id));
1870: FND_LOG.STRING(g_level_statement,
1871: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Vendor_Tax',
1872: 'From get_vendor_tax ,l_tax_classification_code =='
1873: ||l_tax_classification_code);
1874: FND_LOG.STRING(g_level_statement,
1875: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Vendor_Tax.END',
1871: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Vendor_Tax',
1872: 'From get_vendor_tax ,l_tax_classification_code =='
1873: ||l_tax_classification_code);
1874: FND_LOG.STRING(g_level_statement,
1875: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Vendor_Tax.END',
1876: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Vendor_Tax (-)');
1877: END IF;
1878:
1879: RETURN (l_tax_classification_code);
1872: 'From get_vendor_tax ,l_tax_classification_code =='
1873: ||l_tax_classification_code);
1874: FND_LOG.STRING(g_level_statement,
1875: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Vendor_Tax.END',
1876: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Vendor_Tax (-)');
1877: END IF;
1878:
1879: RETURN (l_tax_classification_code);
1880:
1885: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
1886: FND_MSG_PUB.Add;
1887: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1888: FND_LOG.STRING(g_level_unexpected,
1889: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Vendor_Tax',
1890: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
1891: END IF;
1892: IF (sel_vendor_tax_sup%ISOPEN) THEN
1893: CLOSE sel_vendor_tax_sup;
1976: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1977:
1978: IF (g_level_statement >= g_current_runtime_level ) THEN
1979: FND_LOG.STRING(g_level_statement,
1980: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax.BEGIN',
1981: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Ship_To_Location_Tax (+)');
1982: END IF;
1983: debug_loc := 'Get_Ship_To_Location_Tax';
1984: l_curr_calling_sequence := 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG.'||debug_loc||'<-'||p_calling_sequence;
1977:
1978: IF (g_level_statement >= g_current_runtime_level ) THEN
1979: FND_LOG.STRING(g_level_statement,
1980: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax.BEGIN',
1981: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Ship_To_Location_Tax (+)');
1982: END IF;
1983: debug_loc := 'Get_Ship_To_Location_Tax';
1984: l_curr_calling_sequence := 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG.'||debug_loc||'<-'||p_calling_sequence;
1985: IF (g_level_statement >= g_current_runtime_level ) THEN
1980: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax.BEGIN',
1981: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Ship_To_Location_Tax (+)');
1982: END IF;
1983: debug_loc := 'Get_Ship_To_Location_Tax';
1984: l_curr_calling_sequence := 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG.'||debug_loc||'<-'||p_calling_sequence;
1985: IF (g_level_statement >= g_current_runtime_level ) THEN
1986: FND_LOG.STRING(g_level_statement,
1987: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax',
1988: 'Getting tax classification code from ship-to location');
1983: debug_loc := 'Get_Ship_To_Location_Tax';
1984: l_curr_calling_sequence := 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG.'||debug_loc||'<-'||p_calling_sequence;
1985: IF (g_level_statement >= g_current_runtime_level ) THEN
1986: FND_LOG.STRING(g_level_statement,
1987: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax',
1988: 'Getting tax classification code from ship-to location');
1989: FND_LOG.STRING(g_level_statement,
1990: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax',
1991: 'p_ship_to_loc_id == > '||to_char(p_ship_to_loc_id ));
1986: FND_LOG.STRING(g_level_statement,
1987: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax',
1988: 'Getting tax classification code from ship-to location');
1989: FND_LOG.STRING(g_level_statement,
1990: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax',
1991: 'p_ship_to_loc_id == > '||to_char(p_ship_to_loc_id ));
1992: FND_LOG.STRING(g_level_statement,
1993: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax',
1994: 'p_ship_to_loc_org_id == >'||to_char(p_ship_to_loc_org_id ));
1989: FND_LOG.STRING(g_level_statement,
1990: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax',
1991: 'p_ship_to_loc_id == > '||to_char(p_ship_to_loc_id ));
1992: FND_LOG.STRING(g_level_statement,
1993: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax',
1994: 'p_ship_to_loc_org_id == >'||to_char(p_ship_to_loc_org_id ));
1995: FND_LOG.STRING(g_level_statement,
1996: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax',
1997: 'p_calling_sequence == > '|| p_calling_sequence );
1992: FND_LOG.STRING(g_level_statement,
1993: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax',
1994: 'p_ship_to_loc_org_id == >'||to_char(p_ship_to_loc_org_id ));
1995: FND_LOG.STRING(g_level_statement,
1996: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax',
1997: 'p_calling_sequence == > '|| p_calling_sequence );
1998: END IF;
1999:
2000: l_tax_classification_code := NULL;
2015: p_return_status => l_return_status);
2016:
2017: IF (g_level_statement >= g_current_runtime_level ) THEN
2018: FND_LOG.STRING(g_level_statement,
2019: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax',
2020: 'l_ptp_id = ' || TO_CHAR(l_ptp_id));
2021: FND_LOG.STRING(g_level_statement,
2022: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax',
2023: 'l_return_status = ' || l_return_status);
2018: FND_LOG.STRING(g_level_statement,
2019: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax',
2020: 'l_ptp_id = ' || TO_CHAR(l_ptp_id));
2021: FND_LOG.STRING(g_level_statement,
2022: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax',
2023: 'l_return_status = ' || l_return_status);
2024: END IF;
2025:
2026: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS )THEN
2039: END IF;
2040:
2041: IF (g_level_statement >= g_current_runtime_level ) THEN
2042: FND_LOG.STRING(g_level_statement,
2043: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax',
2044: 'l_tax_classification_code =='||l_tax_classification_code );
2045: FND_LOG.STRING(g_level_statement,
2046: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax.END',
2047: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Ship_To_Location_Tax (-)');
2042: FND_LOG.STRING(g_level_statement,
2043: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax',
2044: 'l_tax_classification_code =='||l_tax_classification_code );
2045: FND_LOG.STRING(g_level_statement,
2046: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax.END',
2047: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Ship_To_Location_Tax (-)');
2048: END IF;
2049:
2050: RETURN (l_tax_classification_code);
2043: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax',
2044: 'l_tax_classification_code =='||l_tax_classification_code );
2045: FND_LOG.STRING(g_level_statement,
2046: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax.END',
2047: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Ship_To_Location_Tax (-)');
2048: END IF;
2049:
2050: RETURN (l_tax_classification_code);
2051:
2056: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2057: FND_MSG_PUB.Add;
2058: IF (g_level_unexpected >= g_current_runtime_level ) THEN
2059: FND_LOG.STRING(g_level_unexpected,
2060: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_ship_to_location_tax',
2061: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2062: END IF;
2063: IF (sel_ship_to_loc_tax%ISOPEN) THEN
2064: CLOSE sel_ship_to_loc_tax;
2086: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2087:
2088: IF (g_level_statement >= g_current_runtime_level ) THEN
2089: FND_LOG.STRING(g_level_statement,
2090: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax.BEGIN',
2091: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Ship_To_Location_Tax (+)');
2092: FND_LOG.STRING(g_level_statement,
2093: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax',
2094: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Ship_To_Location_Tax overloaded version');
2087:
2088: IF (g_level_statement >= g_current_runtime_level ) THEN
2089: FND_LOG.STRING(g_level_statement,
2090: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax.BEGIN',
2091: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Ship_To_Location_Tax (+)');
2092: FND_LOG.STRING(g_level_statement,
2093: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax',
2094: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Ship_To_Location_Tax overloaded version');
2095:
2089: FND_LOG.STRING(g_level_statement,
2090: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax.BEGIN',
2091: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Ship_To_Location_Tax (+)');
2092: FND_LOG.STRING(g_level_statement,
2093: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax',
2094: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Ship_To_Location_Tax overloaded version');
2095:
2096: END IF;
2097:
2090: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax.BEGIN',
2091: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Ship_To_Location_Tax (+)');
2092: FND_LOG.STRING(g_level_statement,
2093: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax',
2094: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Ship_To_Location_Tax overloaded version');
2095:
2096: END IF;
2097:
2098: l_tax_classification_code := NULL;
2105:
2106:
2107: IF (g_level_statement >= g_current_runtime_level ) THEN
2108: FND_LOG.STRING(g_level_statement,
2109: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax.END',
2110: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Ship_To_Location_Tax (-)');
2111: END IF;
2112:
2113: RETURN (l_tax_classification_code);
2106:
2107: IF (g_level_statement >= g_current_runtime_level ) THEN
2108: FND_LOG.STRING(g_level_statement,
2109: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Ship_To_Location_Tax.END',
2110: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Ship_To_Location_Tax (-)');
2111: END IF;
2112:
2113: RETURN (l_tax_classification_code);
2114:
2194: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2195:
2196: IF (g_level_statement >= g_current_runtime_level ) THEN
2197: FND_LOG.STRING(g_level_statement,
2198: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc.BEGIN',
2199: 'get_def_tax_classif_from_acc(+) ');
2200: FND_LOG.STRING(g_level_statement,
2201: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2202: 'p_ref_doc_application_id == >'||TO_CHAR(p_ref_doc_application_id));
2197: FND_LOG.STRING(g_level_statement,
2198: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc.BEGIN',
2199: 'get_def_tax_classif_from_acc(+) ');
2200: FND_LOG.STRING(g_level_statement,
2201: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2202: 'p_ref_doc_application_id == >'||TO_CHAR(p_ref_doc_application_id));
2203: FND_LOG.STRING(g_level_statement,
2204: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2205: 'p_ref_doc_entity_code == >'||p_ref_doc_entity_code);
2200: FND_LOG.STRING(g_level_statement,
2201: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2202: 'p_ref_doc_application_id == >'||TO_CHAR(p_ref_doc_application_id));
2203: FND_LOG.STRING(g_level_statement,
2204: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2205: 'p_ref_doc_entity_code == >'||p_ref_doc_entity_code);
2206: FND_LOG.STRING(g_level_statement,
2207: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2208: 'p_ref_doc_event_class_code == >'||p_ref_doc_event_class_code);
2203: FND_LOG.STRING(g_level_statement,
2204: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2205: 'p_ref_doc_entity_code == >'||p_ref_doc_entity_code);
2206: FND_LOG.STRING(g_level_statement,
2207: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2208: 'p_ref_doc_event_class_code == >'||p_ref_doc_event_class_code);
2209: FND_LOG.STRING(g_level_statement,
2210: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2211: 'p_ref_doc_trx_id == >'||TO_CHAR(p_ref_doc_trx_id));
2206: FND_LOG.STRING(g_level_statement,
2207: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2208: 'p_ref_doc_event_class_code == >'||p_ref_doc_event_class_code);
2209: FND_LOG.STRING(g_level_statement,
2210: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2211: 'p_ref_doc_trx_id == >'||TO_CHAR(p_ref_doc_trx_id));
2212: FND_LOG.STRING(g_level_statement,
2213: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2214: 'p_ref_doc_line_id == >'||TO_CHAR(p_ref_doc_line_id));
2209: FND_LOG.STRING(g_level_statement,
2210: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2211: 'p_ref_doc_trx_id == >'||TO_CHAR(p_ref_doc_trx_id));
2212: FND_LOG.STRING(g_level_statement,
2213: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2214: 'p_ref_doc_line_id == >'||TO_CHAR(p_ref_doc_line_id));
2215: FND_LOG.STRING(g_level_statement,
2216: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2217: 'p_ref_doc_trx_level_type == >'||p_ref_doc_trx_level_type);
2212: FND_LOG.STRING(g_level_statement,
2213: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2214: 'p_ref_doc_line_id == >'||TO_CHAR(p_ref_doc_line_id));
2215: FND_LOG.STRING(g_level_statement,
2216: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2217: 'p_ref_doc_trx_level_type == >'||p_ref_doc_trx_level_type);
2218: FND_LOG.STRING(g_level_statement,
2219: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2220: 'p_vendor_id == >' ||to_char(p_vendor_id ));
2215: FND_LOG.STRING(g_level_statement,
2216: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2217: 'p_ref_doc_trx_level_type == >'||p_ref_doc_trx_level_type);
2218: FND_LOG.STRING(g_level_statement,
2219: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2220: 'p_vendor_id == >' ||to_char(p_vendor_id ));
2221: FND_LOG.STRING(g_level_statement,
2222: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2223: 'p_vendor_site_id == >' ||to_char(p_vendor_site_id ));
2218: FND_LOG.STRING(g_level_statement,
2219: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2220: 'p_vendor_id == >' ||to_char(p_vendor_id ));
2221: FND_LOG.STRING(g_level_statement,
2222: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2223: 'p_vendor_site_id == >' ||to_char(p_vendor_site_id ));
2224: FND_LOG.STRING(g_level_statement,
2225: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2226: 'p_code_combination_id = >'||to_char(p_code_combination_id) );
2221: FND_LOG.STRING(g_level_statement,
2222: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2223: 'p_vendor_site_id == >' ||to_char(p_vendor_site_id ));
2224: FND_LOG.STRING(g_level_statement,
2225: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2226: 'p_code_combination_id = >'||to_char(p_code_combination_id) );
2227: FND_LOG.STRING(g_level_statement,
2228: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2229: 'p_concatenated_segments== >'||p_concatenated_segments );
2224: FND_LOG.STRING(g_level_statement,
2225: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2226: 'p_code_combination_id = >'||to_char(p_code_combination_id) );
2227: FND_LOG.STRING(g_level_statement,
2228: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2229: 'p_concatenated_segments== >'||p_concatenated_segments );
2230: FND_LOG.STRING(g_level_statement,
2231: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2232: 'p_templ_tax_classification_cd == >'||p_templ_tax_classification_cd);
2227: FND_LOG.STRING(g_level_statement,
2228: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2229: 'p_concatenated_segments== >'||p_concatenated_segments );
2230: FND_LOG.STRING(g_level_statement,
2231: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2232: 'p_templ_tax_classification_cd == >'||p_templ_tax_classification_cd);
2233: FND_LOG.STRING(g_level_statement,
2234: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2235: 'p_ship_to_location_id == >'||to_char(p_ship_to_location_id) );
2230: FND_LOG.STRING(g_level_statement,
2231: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2232: 'p_templ_tax_classification_cd == >'||p_templ_tax_classification_cd);
2233: FND_LOG.STRING(g_level_statement,
2234: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2235: 'p_ship_to_location_id == >'||to_char(p_ship_to_location_id) );
2236: FND_LOG.STRING(g_level_statement,
2237: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2238: 'p_ship_to_loc_org_id == >'||to_char(p_ship_to_loc_org_id) );
2233: FND_LOG.STRING(g_level_statement,
2234: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2235: 'p_ship_to_location_id == >'||to_char(p_ship_to_location_id) );
2236: FND_LOG.STRING(g_level_statement,
2237: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2238: 'p_ship_to_loc_org_id == >'||to_char(p_ship_to_loc_org_id) );
2239: FND_LOG.STRING(g_level_statement,
2240: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2241: 'p_inventory_item_id == >'||to_char(p_inventory_item_id) );
2236: FND_LOG.STRING(g_level_statement,
2237: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2238: 'p_ship_to_loc_org_id == >'||to_char(p_ship_to_loc_org_id) );
2239: FND_LOG.STRING(g_level_statement,
2240: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2241: 'p_inventory_item_id == >'||to_char(p_inventory_item_id) );
2242: FND_LOG.STRING(g_level_statement,
2243: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2244: 'p_item_org_id == >' ||to_char( p_item_org_id));
2239: FND_LOG.STRING(g_level_statement,
2240: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2241: 'p_inventory_item_id == >'||to_char(p_inventory_item_id) );
2242: FND_LOG.STRING(g_level_statement,
2243: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2244: 'p_item_org_id == >' ||to_char( p_item_org_id));
2245: FND_LOG.STRING(g_level_statement,
2246: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2247: 'p_tax_classification_code == >' ||p_tax_classification_code);
2242: FND_LOG.STRING(g_level_statement,
2243: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2244: 'p_item_org_id == >' ||to_char( p_item_org_id));
2245: FND_LOG.STRING(g_level_statement,
2246: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2247: 'p_tax_classification_code == >' ||p_tax_classification_code);
2248: FND_LOG.STRING(g_level_statement,
2249: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2250: 'p_allow_tax_code_override_flag ==>'|| p_allow_tax_code_override_flag);
2245: FND_LOG.STRING(g_level_statement,
2246: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2247: 'p_tax_classification_code == >' ||p_tax_classification_code);
2248: FND_LOG.STRING(g_level_statement,
2249: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2250: 'p_allow_tax_code_override_flag ==>'|| p_allow_tax_code_override_flag);
2251: FND_LOG.STRING(g_level_statement,
2252: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2253: 'p_tax_user_override_flag ==>'||p_tax_user_override_flag);
2248: FND_LOG.STRING(g_level_statement,
2249: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2250: 'p_allow_tax_code_override_flag ==>'|| p_allow_tax_code_override_flag);
2251: FND_LOG.STRING(g_level_statement,
2252: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2253: 'p_tax_user_override_flag ==>'||p_tax_user_override_flag);
2254: FND_LOG.STRING(g_level_statement,
2255: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2256: 'p_user_tax_name ==>'||p_user_tax_name);
2251: FND_LOG.STRING(g_level_statement,
2252: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2253: 'p_tax_user_override_flag ==>'||p_tax_user_override_flag);
2254: FND_LOG.STRING(g_level_statement,
2255: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2256: 'p_user_tax_name ==>'||p_user_tax_name);
2257: FND_LOG.STRING(g_level_statement,
2258: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2259: 'p_legal_entity_id ==>'||TO_CHAR(p_legal_entity_id));
2254: FND_LOG.STRING(g_level_statement,
2255: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2256: 'p_user_tax_name ==>'||p_user_tax_name);
2257: FND_LOG.STRING(g_level_statement,
2258: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2259: 'p_legal_entity_id ==>'||TO_CHAR(p_legal_entity_id));
2260: FND_LOG.STRING(g_level_statement,
2261: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2262: 'APPL_SHORT_NAME == >'||APPL_SHORT_NAME );
2257: FND_LOG.STRING(g_level_statement,
2258: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2259: 'p_legal_entity_id ==>'||TO_CHAR(p_legal_entity_id));
2260: FND_LOG.STRING(g_level_statement,
2261: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2262: 'APPL_SHORT_NAME == >'||APPL_SHORT_NAME );
2263: FND_LOG.STRING(g_level_statement,
2264: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2265: 'FUNC_SHORT_NAME == >'||FUNC_SHORT_NAME );
2260: FND_LOG.STRING(g_level_statement,
2261: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2262: 'APPL_SHORT_NAME == >'||APPL_SHORT_NAME );
2263: FND_LOG.STRING(g_level_statement,
2264: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2265: 'FUNC_SHORT_NAME == >'||FUNC_SHORT_NAME );
2266: FND_LOG.STRING(g_level_statement,
2267: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2268: 'p_calling_sequence == >'||p_calling_sequence );
2263: FND_LOG.STRING(g_level_statement,
2264: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2265: 'FUNC_SHORT_NAME == >'||FUNC_SHORT_NAME );
2266: FND_LOG.STRING(g_level_statement,
2267: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2268: 'p_calling_sequence == >'||p_calling_sequence );
2269: FND_LOG.STRING(g_level_statement,
2270: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2271: 'p_event_class_code == >'||p_event_class_code );
2266: FND_LOG.STRING(g_level_statement,
2267: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2268: 'p_calling_sequence == >'||p_calling_sequence );
2269: FND_LOG.STRING(g_level_statement,
2270: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2271: 'p_event_class_code == >'||p_event_class_code );
2272: FND_LOG.STRING(g_level_statement,
2273: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2274: 'p_entity_code == >'||p_entity_code );
2269: FND_LOG.STRING(g_level_statement,
2270: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2271: 'p_event_class_code == >'||p_event_class_code );
2272: FND_LOG.STRING(g_level_statement,
2273: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2274: 'p_entity_code == >'||p_entity_code );
2275: FND_LOG.STRING(g_level_statement,
2276: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2277: 'p_application_id == >'||TO_CHAR(p_application_id));
2272: FND_LOG.STRING(g_level_statement,
2273: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2274: 'p_entity_code == >'||p_entity_code );
2275: FND_LOG.STRING(g_level_statement,
2276: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2277: 'p_application_id == >'||TO_CHAR(p_application_id));
2278: FND_LOG.STRING(g_level_statement,
2279: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2280: 'p_internal_organization_id == >'||TO_CHAR(p_internal_organization_id));
2275: FND_LOG.STRING(g_level_statement,
2276: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2277: 'p_application_id == >'||TO_CHAR(p_application_id));
2278: FND_LOG.STRING(g_level_statement,
2279: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2280: 'p_internal_organization_id == >'||TO_CHAR(p_internal_organization_id));
2281:
2282: END IF;
2283:
2305: l_tax_classification_found := FALSE;
2306:
2307: debug_loc := 'get_def_tax_classif_from_acc';
2308:
2309: l_curr_calling_sequence := 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG.'||debug_loc||'<-'||p_calling_sequence;
2310:
2311: --
2312: -- Get Payables/Purchasing default tax code.
2313: -- Hierarchy for PO: Ship-to Location, Item, Vendor, Vendor Site and System.
2340: END IF;
2341:
2342: IF (g_level_statement >= g_current_runtime_level ) THEN
2343: FND_LOG.STRING(g_level_statement,
2344: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2345: 'l_tax_classification_code is found =='||l_tax_classification_code);
2346: END IF;
2347:
2348: IF (l_tax_classification_found = FALSE) THEN
2349: IF (APPL_SHORT_NAME = 'SQLAP') THEN
2350: IF (search_ap_def_hier = TRUE) THEN
2351: IF (g_level_statement >= g_current_runtime_level ) THEN
2352: FND_LOG.STRING(g_level_statement,
2353: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2354: 'Getting Event Class Options');
2355: END IF;
2356: open c_evnt_cls_options (p_internal_organization_id,
2357: 200,
2362: close c_evnt_cls_options;
2363:
2364: IF (g_level_statement >= g_current_runtime_level ) THEN
2365: FND_LOG.STRING(g_level_statement,
2366: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2367: 'Entity Code:' || p_entity_code);
2368: FND_LOG.STRING(g_level_statement,
2369: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2370: 'Event Class Code:' || p_event_class_code);
2365: FND_LOG.STRING(g_level_statement,
2366: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2367: 'Entity Code:' || p_entity_code);
2368: FND_LOG.STRING(g_level_statement,
2369: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2370: 'Event Class Code:' || p_event_class_code);
2371: FND_LOG.STRING(g_level_statement,
2372: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2373: 'Enforce Tax From Account ==' || l_enforce_tax_from_acct_flag);
2368: FND_LOG.STRING(g_level_statement,
2369: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2370: 'Event Class Code:' || p_event_class_code);
2371: FND_LOG.STRING(g_level_statement,
2372: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2373: 'Enforce Tax From Account ==' || l_enforce_tax_from_acct_flag);
2374: FND_LOG.STRING(g_level_statement,
2375: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2376: 'Getting tax code for AP ');
2371: FND_LOG.STRING(g_level_statement,
2372: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2373: 'Enforce Tax From Account ==' || l_enforce_tax_from_acct_flag);
2374: FND_LOG.STRING(g_level_statement,
2375: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2376: 'Getting tax code for AP ');
2377: END IF;
2378:
2379: IF (l_enforce_tax_from_refdoc_flag = 'Y') THEN
2396: l_enforced_tax_found := TRUE;
2397: p_default_hierarchy := FALSE;
2398: IF (g_level_statement >= g_current_runtime_level ) THEN
2399: FND_LOG.STRING(g_level_statement,
2400: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2401: 'l_tax_classification_code =='||l_tax_classification_code );
2402: END IF;
2403: END IF;
2404: ELSIF (l_enforce_tax_from_acct_flag = 'Y') THEN
2410: -- This includes both Input and Non-taxable accounts.
2411:
2412: IF (g_level_statement >= g_current_runtime_level ) THEN
2413: FND_LOG.STRING(g_level_statement,
2414: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2415: 'Tax from account is enforced');
2416: FND_LOG.STRING(g_level_statement,
2417: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2418: ' Calling get_account_tax ');
2413: FND_LOG.STRING(g_level_statement,
2414: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2415: 'Tax from account is enforced');
2416: FND_LOG.STRING(g_level_statement,
2417: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2418: ' Calling get_account_tax ');
2419: END IF;
2420: get_account_tax (p_code_combination_id,
2421: p_concatenated_segments,
2425: l_curr_calling_sequence);
2426: l_tax_classification_code := p_tax_classification_code;
2427: IF (g_level_statement >= g_current_runtime_level ) THEN
2428: FND_LOG.STRING(g_level_statement,
2429: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2430: 'l_tax_classification_code =='||l_tax_classification_code);
2431: END IF;
2432: IF (p_allow_tax_code_override_flag = 'N') THEN
2433: -- Override is not allowed, do not search further
2472:
2473: IF (aptaxtab (i) = 'REFERENCE_DOCUMENT') THEN
2474: IF (g_level_statement >= g_current_runtime_level ) THEN
2475: FND_LOG.STRING(g_level_statement,
2476: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2477: 'Getting tax code from shipment');
2478: FND_LOG.STRING(g_level_statement,
2479: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2480: 'Calling get_input_tax_classif_code ');
2475: FND_LOG.STRING(g_level_statement,
2476: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2477: 'Getting tax code from shipment');
2478: FND_LOG.STRING(g_level_statement,
2479: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2480: 'Calling get_input_tax_classif_code ');
2481: END IF;
2482: l_tax_classification_code := get_input_tax_classif_code (
2483: p_ref_doc_application_id,
2492: l_tax_classification_found := TRUE;
2493: p_default_hierarchy := FALSE;
2494: IF (g_level_statement >= g_current_runtime_level ) THEN
2495: FND_LOG.STRING(g_level_statement,
2496: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2497: 'l_tax_classification_code ==' ||l_tax_classification_code);
2498: END IF;
2499: exit Ap_Tax_Loop;
2500: END IF;
2502:
2503: IF (aptaxtab (i) = 'SHIP_FROM_PARTY_SITE') THEN
2504: IF (g_level_statement >= g_current_runtime_level ) THEN
2505: FND_LOG.STRING(g_level_statement,
2506: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2507: 'Getting tax code from supplier site');
2508: END IF;
2509: l_tax_classification_code := get_site_tax (
2510: p_vendor_site_id,
2513: l_tax_classification_found := TRUE;
2514: p_default_hierarchy := FALSE;
2515: IF (g_level_statement >= g_current_runtime_level ) THEN
2516: FND_LOG.STRING(g_level_statement,
2517: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2518: 'l_tax_classification_code ==' ||l_tax_classification_code);
2519: END IF;
2520: exit Ap_Tax_Loop;
2521: END IF;
2523:
2524: IF (aptaxtab (i) = 'SHIP_FROM_PARTY') THEN
2525: IF (g_level_statement >= g_current_runtime_level ) THEN
2526: FND_LOG.STRING(g_level_statement,
2527: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2528: 'Getting tax code from supplier');
2529: END IF;
2530: l_tax_classification_code := get_vendor_tax (
2531: p_vendor_id,
2534: l_tax_classification_found := TRUE;
2535: p_default_hierarchy := FALSE;
2536: IF (g_level_statement >= g_current_runtime_level ) THEN
2537: FND_LOG.STRING(g_level_statement,
2538: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2539: 'l_tax_classification_code ==' ||l_tax_classification_code);
2540: END IF;
2541: exit Ap_Tax_Loop;
2542: END IF;
2544:
2545: IF (aptaxtab (i) = 'NATURAL_ACCOUNT') THEN
2546: IF (g_level_statement >= g_current_runtime_level ) THEN
2547: FND_LOG.STRING(g_level_statement,
2548: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2549: 'Getting tax code from account');
2550: END IF;
2551: get_account_tax (p_code_combination_id,
2552: p_concatenated_segments,
2556: l_curr_calling_sequence);
2557: l_tax_classification_code := p_tax_classification_code;
2558: IF (g_level_statement >= g_current_runtime_level ) THEN
2559: FND_LOG.STRING(g_level_statement,
2560: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2561: 'l_tax_classification_code ==' ||l_tax_classification_code);
2562: END IF;
2563: IF (l_tax_classification_found = TRUE) THEN
2564: p_default_hierarchy := TRUE;
2563: IF (l_tax_classification_found = TRUE) THEN
2564: p_default_hierarchy := TRUE;
2565: IF (g_level_statement >= g_current_runtime_level ) THEN
2566: FND_LOG.STRING(g_level_statement,
2567: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2568: 'l_tax_classification_code is Found ==' ||l_tax_classification_code);
2569: END IF;
2570: exit Ap_Tax_Loop;
2571: END IF;
2573:
2574: IF (aptaxtab (i) = 'FINANCIAL_OPTIONS') THEN
2575: IF (g_level_statement >= g_current_runtime_level ) THEN
2576: FND_LOG.STRING(g_level_statement,
2577: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2578: 'Getting tax code from financial system parameters');
2579: FND_LOG.STRING(g_level_statement,
2580: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2581: 'sysinfo.vat_code ==' ||sysinfo.ap_info.tax_classification_code );
2576: FND_LOG.STRING(g_level_statement,
2577: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2578: 'Getting tax code from financial system parameters');
2579: FND_LOG.STRING(g_level_statement,
2580: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2581: 'sysinfo.vat_code ==' ||sysinfo.ap_info.tax_classification_code );
2582: END IF;
2583: l_tax_classification_code := sysinfo.ap_info.tax_classification_code;
2584: IF (l_tax_classification_code IS NOT NULL) THEN
2585: l_tax_classification_found := TRUE;
2586: p_default_hierarchy := FALSE;
2587: IF (g_level_statement >= g_current_runtime_level ) THEN
2588: FND_LOG.STRING(g_level_statement,
2589: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2590: 'l_tax_classification_code ==' ||l_tax_classification_code);
2591: END IF;
2592: exit Ap_Tax_Loop;
2593: END IF;
2595:
2596: IF (aptaxtab (i) = 'TEMPLATE') THEN
2597: IF (g_level_statement >= g_current_runtime_level ) THEN
2598: FND_LOG.STRING(g_level_statement,
2599: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2600: 'Getting tax code from template');
2601: END IF;
2602: -- If the API has been called from a form or process
2603: -- where a template is being used, then we should always
2618: l_tax_classification_found := TRUE;
2619: p_default_hierarchy := FALSE;
2620: IF (g_level_statement >= g_current_runtime_level ) THEN
2621: FND_LOG.STRING(g_level_statement,
2622: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2623: 'l_tax_classification_code ==' ||l_tax_classification_code);
2624: END IF;
2625: exit Ap_Tax_Loop;
2626: END IF;
2634:
2635: IF (nvl (p_tax_user_override_flag, 'N') <> 'Y') THEN
2636: IF (g_level_statement >= g_current_runtime_level ) THEN
2637: FND_LOG.STRING(g_level_statement,
2638: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2639: 'p_tax_user_override_flag =='||p_tax_user_override_flag);
2640: FND_LOG.STRING(g_level_statement,
2641: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2642: 'l_tax_classification_code =='||l_tax_classification_code);
2637: FND_LOG.STRING(g_level_statement,
2638: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2639: 'p_tax_user_override_flag =='||p_tax_user_override_flag);
2640: FND_LOG.STRING(g_level_statement,
2641: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2642: 'l_tax_classification_code =='||l_tax_classification_code);
2643: END IF;
2644: END IF;
2645: IF (g_level_statement >= g_current_runtime_level ) THEN
2643: END IF;
2644: END IF;
2645: IF (g_level_statement >= g_current_runtime_level ) THEN
2646: FND_LOG.STRING(g_level_statement,
2647: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2648: 'p_tax_classification_code =='||p_tax_classification_code);
2649: FND_LOG.STRING(g_level_statement,
2650: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc.END',
2651: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: get_def_tax_classif_from_acc (-)');
2646: FND_LOG.STRING(g_level_statement,
2647: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2648: 'p_tax_classification_code =='||p_tax_classification_code);
2649: FND_LOG.STRING(g_level_statement,
2650: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc.END',
2651: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: get_def_tax_classif_from_acc (-)');
2652: END IF;
2653:
2654: EXCEPTION
2647: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2648: 'p_tax_classification_code =='||p_tax_classification_code);
2649: FND_LOG.STRING(g_level_statement,
2650: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc.END',
2651: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: get_def_tax_classif_from_acc (-)');
2652: END IF;
2653:
2654: EXCEPTION
2655: WHEN NO_DATA_FOUND THEN
2654: EXCEPTION
2655: WHEN NO_DATA_FOUND THEN
2656: IF (g_level_unexpected >= g_current_runtime_level ) THEN
2657: FND_LOG.STRING(g_level_unexpected,
2658: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2659: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80) );
2660: END IF;
2661: IF (l_tax_classification_found = FALSE ) THEN
2662: RAISE NO_DATA_FOUND;
2664: WHEN OTHERS THEN
2665: IF (SQLCODE <> -20001) THEN
2666: IF (g_level_unexpected >= g_current_runtime_level ) THEN
2667: FND_LOG.STRING(g_level_unexpected,
2668: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_def_tax_classif_from_acc',
2669: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80) );
2670: END IF;
2671: IF (appl_short_name = 'SQLAP') THEN
2672: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
2747: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2748:
2749: IF (g_level_statement >= g_current_runtime_level ) THEN
2750: FND_LOG.STRING(g_level_statement,
2751: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Item_Tax.BEGIN',
2752: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Item_Tax (+)');
2753: FND_LOG.STRING(g_level_statement,
2754: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Item_Tax',
2755: 'p_item_id == > '||to_char(p_item_id ));
2748:
2749: IF (g_level_statement >= g_current_runtime_level ) THEN
2750: FND_LOG.STRING(g_level_statement,
2751: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Item_Tax.BEGIN',
2752: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Item_Tax (+)');
2753: FND_LOG.STRING(g_level_statement,
2754: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Item_Tax',
2755: 'p_item_id == > '||to_char(p_item_id ));
2756: FND_LOG.STRING(g_level_statement,
2750: FND_LOG.STRING(g_level_statement,
2751: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Item_Tax.BEGIN',
2752: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Item_Tax (+)');
2753: FND_LOG.STRING(g_level_statement,
2754: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Item_Tax',
2755: 'p_item_id == > '||to_char(p_item_id ));
2756: FND_LOG.STRING(g_level_statement,
2757: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Item_Tax',
2758: 'p_ship_to_loc_org_id == > '||to_char(p_ship_to_loc_org_id ));
2753: FND_LOG.STRING(g_level_statement,
2754: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Item_Tax',
2755: 'p_item_id == > '||to_char(p_item_id ));
2756: FND_LOG.STRING(g_level_statement,
2757: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Item_Tax',
2758: 'p_ship_to_loc_org_id == > '||to_char(p_ship_to_loc_org_id ));
2759: FND_LOG.STRING(g_level_statement,
2760: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Item_Tax',
2761: 'p_item_org_id == > '||to_char(p_item_org_id ));
2756: FND_LOG.STRING(g_level_statement,
2757: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Item_Tax',
2758: 'p_ship_to_loc_org_id == > '||to_char(p_ship_to_loc_org_id ));
2759: FND_LOG.STRING(g_level_statement,
2760: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Item_Tax',
2761: 'p_item_org_id == > '||to_char(p_item_org_id ));
2762: FND_LOG.STRING(g_level_statement,
2763: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Item_Tax',
2764: 'p_calling_sequence == >'||p_calling_sequence);
2759: FND_LOG.STRING(g_level_statement,
2760: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Item_Tax',
2761: 'p_item_org_id == > '||to_char(p_item_org_id ));
2762: FND_LOG.STRING(g_level_statement,
2763: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Item_Tax',
2764: 'p_calling_sequence == >'||p_calling_sequence);
2765: END IF;
2766: debug_loc := 'Get_Item_Tax';
2767: l_curr_calling_sequence := 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG.'||debug_loc||'<-'||p_calling_sequence;
2763: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Item_Tax',
2764: 'p_calling_sequence == >'||p_calling_sequence);
2765: END IF;
2766: debug_loc := 'Get_Item_Tax';
2767: l_curr_calling_sequence := 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG.'||debug_loc||'<-'||p_calling_sequence;
2768:
2769: OPEN sel_item_tax;
2770: FETCH sel_item_tax INTO l_tax_classification_code;
2771: CLOSE sel_item_tax;
2771: CLOSE sel_item_tax;
2772:
2773: IF (g_level_statement >= g_current_runtime_level ) THEN
2774: FND_LOG.STRING(g_level_statement,
2775: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Item_Tax',
2776: 'l_tax_classification_code =='||l_tax_classification_code);
2777: FND_LOG.STRING(g_level_statement,
2778: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Item_Tax.END',
2779: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Item_Tax (-)');
2774: FND_LOG.STRING(g_level_statement,
2775: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Item_Tax',
2776: 'l_tax_classification_code =='||l_tax_classification_code);
2777: FND_LOG.STRING(g_level_statement,
2778: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Item_Tax.END',
2779: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Item_Tax (-)');
2780: END IF;
2781:
2782: RETURN (l_tax_classification_code);
2775: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Item_Tax',
2776: 'l_tax_classification_code =='||l_tax_classification_code);
2777: FND_LOG.STRING(g_level_statement,
2778: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Item_Tax.END',
2779: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Item_Tax (-)');
2780: END IF;
2781:
2782: RETURN (l_tax_classification_code);
2783:
2789: FND_MSG_PUB.Add;
2790:
2791: IF (g_level_unexpected >= g_current_runtime_level ) THEN
2792: FND_LOG.STRING(g_level_unexpected,
2793: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Item_Tax',
2794: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2795: END IF;
2796: IF (sel_item_tax%ISOPEN) THEN
2797: CLOSE sel_item_tax;
2881: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2882:
2883: IF (g_level_statement >= g_current_runtime_level ) THEN
2884: FND_LOG.STRING(g_level_statement,
2885: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax.BEGIN',
2886: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Account_Tax (+)');
2887: FND_LOG.STRING(g_level_statement,
2888: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
2889: 'p_code_combination_id ==>'||to_char(p_code_combination_id));
2882:
2883: IF (g_level_statement >= g_current_runtime_level ) THEN
2884: FND_LOG.STRING(g_level_statement,
2885: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax.BEGIN',
2886: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Account_Tax (+)');
2887: FND_LOG.STRING(g_level_statement,
2888: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
2889: 'p_code_combination_id ==>'||to_char(p_code_combination_id));
2890: FND_LOG.STRING(g_level_statement,
2884: FND_LOG.STRING(g_level_statement,
2885: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax.BEGIN',
2886: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Account_Tax (+)');
2887: FND_LOG.STRING(g_level_statement,
2888: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
2889: 'p_code_combination_id ==>'||to_char(p_code_combination_id));
2890: FND_LOG.STRING(g_level_statement,
2891: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
2892: 'p_concatenated_segments ==>'||p_concatenated_segments);
2887: FND_LOG.STRING(g_level_statement,
2888: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
2889: 'p_code_combination_id ==>'||to_char(p_code_combination_id));
2890: FND_LOG.STRING(g_level_statement,
2891: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
2892: 'p_concatenated_segments ==>'||p_concatenated_segments);
2893: FND_LOG.STRING(g_level_statement,
2894: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
2895: 'p_tax_classification_code ==>'|| p_tax_classification_code );
2890: FND_LOG.STRING(g_level_statement,
2891: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
2892: 'p_concatenated_segments ==>'||p_concatenated_segments);
2893: FND_LOG.STRING(g_level_statement,
2894: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
2895: 'p_tax_classification_code ==>'|| p_tax_classification_code );
2896: FND_LOG.STRING(g_level_statement,
2897: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
2898: 'p_allow_tax_code_override_flag ==>'||p_allow_tax_code_override_flag);
2893: FND_LOG.STRING(g_level_statement,
2894: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
2895: 'p_tax_classification_code ==>'|| p_tax_classification_code );
2896: FND_LOG.STRING(g_level_statement,
2897: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
2898: 'p_allow_tax_code_override_flag ==>'||p_allow_tax_code_override_flag);
2899:
2900: FND_LOG.STRING(g_level_statement,
2901: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
2897: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
2898: 'p_allow_tax_code_override_flag ==>'||p_allow_tax_code_override_flag);
2899:
2900: FND_LOG.STRING(g_level_statement,
2901: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
2902: 'p_calling_sequence ==>'||p_calling_sequence );
2903: END IF;
2904:
2905: debug_loc := 'Get_Account_Tax';
2902: 'p_calling_sequence ==>'||p_calling_sequence );
2903: END IF;
2904:
2905: debug_loc := 'Get_Account_Tax';
2906: l_curr_calling_sequence := 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG.'||debug_loc||'<-'||p_calling_sequence;
2907:
2908: IF (p_code_combination_id is not NULL and p_code_combination_id <> -1) THEN
2909: -- Get the column name that holds the account segment in GL_CODE_COMBINATIONS
2910: IF (g_level_statement >= g_current_runtime_level ) THEN
2908: IF (p_code_combination_id is not NULL and p_code_combination_id <> -1) THEN
2909: -- Get the column name that holds the account segment in GL_CODE_COMBINATIONS
2910: IF (g_level_statement >= g_current_runtime_level ) THEN
2911: FND_LOG.STRING(g_level_statement,
2912: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
2913: 'Getting tax code using code combination ID');
2914: FND_LOG.STRING(g_level_statement,
2915: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
2916: 'p_code_combination_id is not Null =='||to_char(p_code_combination_id));
2911: FND_LOG.STRING(g_level_statement,
2912: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
2913: 'Getting tax code using code combination ID');
2914: FND_LOG.STRING(g_level_statement,
2915: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
2916: 'p_code_combination_id is not Null =='||to_char(p_code_combination_id));
2917: END IF;
2918:
2919: result := fnd_flex_apis.get_segment_column (101,
2928:
2929: execute immediate statement into l_account_seg_value ;
2930: IF (g_level_statement >= g_current_runtime_level ) THEN
2931: FND_LOG.STRING(g_level_statement,
2932: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
2933: 'l_account_seg_value =='||l_account_seg_value);
2934: END IF;
2935: ELSE
2936: IF (p_concatenated_segments is not NULL) THEN
2935: ELSE
2936: IF (p_concatenated_segments is not NULL) THEN
2937: IF (g_level_statement >= g_current_runtime_level ) THEN
2938: FND_LOG.STRING(g_level_statement,
2939: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
2940: 'p_concatenated_segments is not Null =='||p_concatenated_segments);
2941: END IF;
2942: -- Get account segment from the concatenated string
2943: IF (g_level_statement >= g_current_runtime_level ) THEN
2941: END IF;
2942: -- Get account segment from the concatenated string
2943: IF (g_level_statement >= g_current_runtime_level ) THEN
2944: FND_LOG.STRING(g_level_statement,
2945: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
2946: 'Getting tax code using concatenated segments');
2947: END IF;
2948: l_delimiter := fnd_flex_ext.get_delimiter ('SQLGL',
2949: 'GL#',
2959: l_account_seg_value := l_flexsegtab(l_account_seg_num);
2960:
2961: IF (g_level_statement >= g_current_runtime_level ) THEN
2962: FND_LOG.STRING(g_level_statement,
2963: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
2964: 'l_account_seg_value =='|| l_account_seg_value);
2965: FND_LOG.STRING(g_level_statement,
2966: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
2967: 'l_delimiter =='||l_delimiter );
2962: FND_LOG.STRING(g_level_statement,
2963: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
2964: 'l_account_seg_value =='|| l_account_seg_value);
2965: FND_LOG.STRING(g_level_statement,
2966: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
2967: 'l_delimiter =='||l_delimiter );
2968: FND_LOG.STRING(g_level_statement,
2969: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
2970: 'l_result =='||to_char(l_result));
2965: FND_LOG.STRING(g_level_statement,
2966: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
2967: 'l_delimiter =='||l_delimiter );
2968: FND_LOG.STRING(g_level_statement,
2969: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
2970: 'l_result =='||to_char(l_result));
2971: END IF;
2972: END IF;
2973: END IF;
2974:
2975: IF (l_account_seg_value is not NULL) THEN
2976: IF (g_level_statement >= g_current_runtime_level ) THEN
2977: FND_LOG.STRING(g_level_statement,
2978: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
2979: 'l_account_seg_value is not null =='||l_account_seg_value);
2980: END IF;
2981: BEGIN
2982: --1064036
3004: 'AND ( toa.org_id = :l_bind_org_id or toa.org_id = -1 )' ||
3005: 'AND toa.tax_class = ''N'' ';
3006: IF (g_level_statement >= g_current_runtime_level ) THEN
3007: FND_LOG.STRING(g_level_statement,
3008: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
3009: 'statement='||statement);
3010: FND_LOG.STRING(g_level_statement,
3011: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
3012: 'Executing Dynamic SQL statement ');
3007: FND_LOG.STRING(g_level_statement,
3008: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
3009: 'statement='||statement);
3010: FND_LOG.STRING(g_level_statement,
3011: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
3012: 'Executing Dynamic SQL statement ');
3013: END IF;
3014: execute immediate statement into p_allow_tax_code_override_flag,
3015: p_tax_classification_code,
3021: l_account_seg_value,
3022: sysinfo.org_id;
3023: IF (g_level_statement >= g_current_runtime_level ) THEN
3024: FND_LOG.STRING(g_level_statement,
3025: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
3026: 'statement =='||substr(statement,1,700));
3027: FND_LOG.STRING(g_level_statement,
3028: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
3029: 'sysinfo.org_id =='||to_char(sysinfo.org_id));
3024: FND_LOG.STRING(g_level_statement,
3025: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
3026: 'statement =='||substr(statement,1,700));
3027: FND_LOG.STRING(g_level_statement,
3028: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
3029: 'sysinfo.org_id =='||to_char(sysinfo.org_id));
3030: FND_LOG.STRING(g_level_statement,
3031: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
3032: 'p_allow_tax_code_override_flag =='||p_allow_tax_code_override_flag );
3027: FND_LOG.STRING(g_level_statement,
3028: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
3029: 'sysinfo.org_id =='||to_char(sysinfo.org_id));
3030: FND_LOG.STRING(g_level_statement,
3031: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
3032: 'p_allow_tax_code_override_flag =='||p_allow_tax_code_override_flag );
3033: FND_LOG.STRING(g_level_statement,
3034: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
3035: ' p_tax_classification_code =='|| p_tax_classification_code );
3030: FND_LOG.STRING(g_level_statement,
3031: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
3032: 'p_allow_tax_code_override_flag =='||p_allow_tax_code_override_flag );
3033: FND_LOG.STRING(g_level_statement,
3034: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
3035: ' p_tax_classification_code =='|| p_tax_classification_code );
3036: FND_LOG.STRING(g_level_statement,
3037: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
3038: 'l_tax_type_code =='||l_tax_type_code );
3033: FND_LOG.STRING(g_level_statement,
3034: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
3035: ' p_tax_classification_code =='|| p_tax_classification_code );
3036: FND_LOG.STRING(g_level_statement,
3037: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
3038: 'l_tax_type_code =='||l_tax_type_code );
3039: FND_LOG.STRING(g_level_statement,
3040: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
3041: 'l_account_seg_value =='||l_account_seg_value );
3036: FND_LOG.STRING(g_level_statement,
3037: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
3038: 'l_tax_type_code =='||l_tax_type_code );
3039: FND_LOG.STRING(g_level_statement,
3040: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
3041: 'l_account_seg_value =='||l_account_seg_value );
3042:
3043: FND_LOG.STRING(g_level_statement,
3044: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax.END',
3040: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
3041: 'l_account_seg_value =='||l_account_seg_value );
3042:
3043: FND_LOG.STRING(g_level_statement,
3044: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax.END',
3045: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Account_Tax (-)');
3046: END IF;
3047:
3048: EXCEPTION
3041: 'l_account_seg_value =='||l_account_seg_value );
3042:
3043: FND_LOG.STRING(g_level_statement,
3044: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax.END',
3045: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: Get_Account_Tax (-)');
3046: END IF;
3047:
3048: EXCEPTION
3049: WHEN no_data_found THEN
3048: EXCEPTION
3049: WHEN no_data_found THEN
3050: IF (g_level_unexpected >= g_current_runtime_level ) THEN
3051: FND_LOG.STRING(g_level_unexpected,
3052: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.Get_Account_Tax',
3053: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3054: END IF;
3055:
3056: WHEN others THEN
3060: FND_MSG_PUB.Add;
3061:
3062: IF (g_level_unexpected >= g_current_runtime_level ) THEN
3063: FND_LOG.STRING(g_level_unexpected,
3064: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.get_account_tax',
3065: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3066: END IF;
3067: RAISE;
3068: END;
3144: BEGIN
3145:
3146: IF (g_level_statement >= g_current_runtime_level ) THEN
3147: FND_LOG.STRING(g_level_statement,
3148: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier.BEGIN',
3149: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: pop_ap_def_option_hier(+)' );
3150: FND_LOG.STRING(g_level_statement,
3151: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier',
3152: 'p_event_class_code : ' || p_event_class_code);
3145:
3146: IF (g_level_statement >= g_current_runtime_level ) THEN
3147: FND_LOG.STRING(g_level_statement,
3148: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier.BEGIN',
3149: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: pop_ap_def_option_hier(+)' );
3150: FND_LOG.STRING(g_level_statement,
3151: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier',
3152: 'p_event_class_code : ' || p_event_class_code);
3153: FND_LOG.STRING(g_level_statement,
3147: FND_LOG.STRING(g_level_statement,
3148: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier.BEGIN',
3149: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: pop_ap_def_option_hier(+)' );
3150: FND_LOG.STRING(g_level_statement,
3151: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier',
3152: 'p_event_class_code : ' || p_event_class_code);
3153: FND_LOG.STRING(g_level_statement,
3154: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier',
3155: 'Getting default options ');
3150: FND_LOG.STRING(g_level_statement,
3151: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier',
3152: 'p_event_class_code : ' || p_event_class_code);
3153: FND_LOG.STRING(g_level_statement,
3154: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier',
3155: 'Getting default options ');
3156: END IF;
3157:
3158: -- init return status
3179: IF l_event_class_mapping_id IS NULL THEN
3180: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3181: IF (g_level_statement >= g_current_runtime_level ) THEN
3182: FND_LOG.STRING(g_level_statement,
3183: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier',
3184: 'event_class_mapping_id not found for Internet expense');
3185: END IF;
3186: RETURN;
3187: END IF;
3224: END IF;
3225:
3226: IF (g_level_statement >= g_current_runtime_level ) THEN
3227: FND_LOG.STRING(g_level_statement,
3228: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier',
3229: 'Use Tax Classification: '|| NVL(ap_info.use_tax_classification_flag,'N'));
3230: FND_LOG.STRING(g_level_statement,
3231: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier',
3232: 'Hierarchy Level 1: ' ||ap_info.def_option_hier_1_code );
3227: FND_LOG.STRING(g_level_statement,
3228: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier',
3229: 'Use Tax Classification: '|| NVL(ap_info.use_tax_classification_flag,'N'));
3230: FND_LOG.STRING(g_level_statement,
3231: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier',
3232: 'Hierarchy Level 1: ' ||ap_info.def_option_hier_1_code );
3233: FND_LOG.STRING(g_level_statement,
3234: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier',
3235: 'Hierarchy Level 2: ' ||ap_info.def_option_hier_2_code );
3230: FND_LOG.STRING(g_level_statement,
3231: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier',
3232: 'Hierarchy Level 1: ' ||ap_info.def_option_hier_1_code );
3233: FND_LOG.STRING(g_level_statement,
3234: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier',
3235: 'Hierarchy Level 2: ' ||ap_info.def_option_hier_2_code );
3236: FND_LOG.STRING(g_level_statement,
3237: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier',
3238: 'Hierarchy Level 3: ' ||ap_info.def_option_hier_3_code );
3233: FND_LOG.STRING(g_level_statement,
3234: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier',
3235: 'Hierarchy Level 2: ' ||ap_info.def_option_hier_2_code );
3236: FND_LOG.STRING(g_level_statement,
3237: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier',
3238: 'Hierarchy Level 3: ' ||ap_info.def_option_hier_3_code );
3239: FND_LOG.STRING(g_level_statement,
3240: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier',
3241: 'Hierarchy Level 4: ' ||ap_info.def_option_hier_4_code );
3236: FND_LOG.STRING(g_level_statement,
3237: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier',
3238: 'Hierarchy Level 3: ' ||ap_info.def_option_hier_3_code );
3239: FND_LOG.STRING(g_level_statement,
3240: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier',
3241: 'Hierarchy Level 4: ' ||ap_info.def_option_hier_4_code );
3242: FND_LOG.STRING(g_level_statement,
3243: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier',
3244: 'Hierarchy Level 5: ' ||ap_info.def_option_hier_5_code );
3239: FND_LOG.STRING(g_level_statement,
3240: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier',
3241: 'Hierarchy Level 4: ' ||ap_info.def_option_hier_4_code );
3242: FND_LOG.STRING(g_level_statement,
3243: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier',
3244: 'Hierarchy Level 5: ' ||ap_info.def_option_hier_5_code );
3245: FND_LOG.STRING(g_level_statement,
3246: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier',
3247: 'Hierarchy Level 6: ' ||ap_info.def_option_hier_6_code );
3242: FND_LOG.STRING(g_level_statement,
3243: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier',
3244: 'Hierarchy Level 5: ' ||ap_info.def_option_hier_5_code );
3245: FND_LOG.STRING(g_level_statement,
3246: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier',
3247: 'Hierarchy Level 6: ' ||ap_info.def_option_hier_6_code );
3248: FND_LOG.STRING(g_level_statement,
3249: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier',
3250: 'Hierarchy Level 7: ' ||ap_info.def_option_hier_7_code );
3245: FND_LOG.STRING(g_level_statement,
3246: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier',
3247: 'Hierarchy Level 6: ' ||ap_info.def_option_hier_6_code );
3248: FND_LOG.STRING(g_level_statement,
3249: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier',
3250: 'Hierarchy Level 7: ' ||ap_info.def_option_hier_7_code );
3251:
3252: END IF;
3253:
3264: OR sysinfo.ap_info.def_option_hier_7_code IS NOT NULL) THEN
3265:
3266: IF (g_level_statement >= g_current_runtime_level ) THEN
3267: FND_LOG.STRING(g_level_statement,
3268: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier',
3269: 'Initializing AP defaulting information');
3270: END IF;
3271:
3272: aptaxtab(1) := sysinfo.ap_info.def_option_hier_1_code;
3283: END IF;
3284:
3285: IF (g_level_statement >= g_current_runtime_level ) THEN
3286: FND_LOG.STRING(g_level_statement,
3287: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier.END',
3288: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: pop_ap_def_option_hier(-)' );
3289: END IF;
3290:
3291: EXCEPTION
3284:
3285: IF (g_level_statement >= g_current_runtime_level ) THEN
3286: FND_LOG.STRING(g_level_statement,
3287: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier.END',
3288: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: pop_ap_def_option_hier(-)' );
3289: END IF;
3290:
3291: EXCEPTION
3292: WHEN OTHERS THEN
3303: FND_MSG_PUB.Add;
3304:
3305: IF (g_level_unexpected >= g_current_runtime_level ) THEN
3306: FND_LOG.STRING(g_level_unexpected,
3307: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_ap_def_option_hier',
3308: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3309: END IF;
3310:
3311: END pop_ap_def_option_hier;
3352: BEGIN
3353:
3354: IF (g_level_statement >= g_current_runtime_level ) THEN
3355: FND_LOG.STRING(g_level_statement,
3356: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_po_def_option_hier.BEGIN',
3357: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: pop_po_def_option_hier(+)' );
3358: END IF;
3359:
3360: -- init return status
3353:
3354: IF (g_level_statement >= g_current_runtime_level ) THEN
3355: FND_LOG.STRING(g_level_statement,
3356: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_po_def_option_hier.BEGIN',
3357: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: pop_po_def_option_hier(+)' );
3358: END IF;
3359:
3360: -- init return status
3361: p_return_status := FND_API.G_RET_STS_SUCCESS;
3374:
3375: IF nvl(status_flag,'N') in ('I','S') THEN
3376: IF (g_level_statement >= g_current_runtime_level ) THEN
3377: FND_LOG.STRING(g_level_statement,
3378: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_po_def_option_hier',
3379: 'Getting PO default options');
3380: END IF;
3381:
3382: -- Bug#4090842- use org_id passed in
3401: END IF;
3402:
3403: IF (g_level_statement >= g_current_runtime_level ) THEN
3404: FND_LOG.STRING(g_level_statement,
3405: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_po_def_option_hier',
3406: 'PO Use Tax Classification: '|| NVL(po_info.use_tax_classification_flag,'N'));
3407: FND_LOG.STRING(g_level_statement,
3408: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_po_def_option_hier',
3409: 'PO Hierarchy Level 1: ' ||po_info.def_option_hier_1_code );
3404: FND_LOG.STRING(g_level_statement,
3405: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_po_def_option_hier',
3406: 'PO Use Tax Classification: '|| NVL(po_info.use_tax_classification_flag,'N'));
3407: FND_LOG.STRING(g_level_statement,
3408: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_po_def_option_hier',
3409: 'PO Hierarchy Level 1: ' ||po_info.def_option_hier_1_code );
3410: FND_LOG.STRING(g_level_statement,
3411: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_po_def_option_hier',
3412: 'PO Hierarchy Level 2: ' ||po_info.def_option_hier_2_code );
3407: FND_LOG.STRING(g_level_statement,
3408: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_po_def_option_hier',
3409: 'PO Hierarchy Level 1: ' ||po_info.def_option_hier_1_code );
3410: FND_LOG.STRING(g_level_statement,
3411: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_po_def_option_hier',
3412: 'PO Hierarchy Level 2: ' ||po_info.def_option_hier_2_code );
3413: FND_LOG.STRING(g_level_statement,
3414: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_po_def_option_hier',
3415: 'PO Hierarchy Level 3: ' ||po_info.def_option_hier_3_code );
3410: FND_LOG.STRING(g_level_statement,
3411: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_po_def_option_hier',
3412: 'PO Hierarchy Level 2: ' ||po_info.def_option_hier_2_code );
3413: FND_LOG.STRING(g_level_statement,
3414: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_po_def_option_hier',
3415: 'PO Hierarchy Level 3: ' ||po_info.def_option_hier_3_code );
3416: FND_LOG.STRING(g_level_statement,
3417: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_po_def_option_hier',
3418: 'PO Hierarchy Level 4: ' ||po_info.def_option_hier_4_code );
3413: FND_LOG.STRING(g_level_statement,
3414: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_po_def_option_hier',
3415: 'PO Hierarchy Level 3: ' ||po_info.def_option_hier_3_code );
3416: FND_LOG.STRING(g_level_statement,
3417: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_po_def_option_hier',
3418: 'PO Hierarchy Level 4: ' ||po_info.def_option_hier_4_code );
3419: FND_LOG.STRING(g_level_statement,
3420: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_po_def_option_hier',
3421: 'PO Hierarchy Level 5: ' ||po_info.def_option_hier_5_code );
3416: FND_LOG.STRING(g_level_statement,
3417: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_po_def_option_hier',
3418: 'PO Hierarchy Level 4: ' ||po_info.def_option_hier_4_code );
3419: FND_LOG.STRING(g_level_statement,
3420: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_po_def_option_hier',
3421: 'PO Hierarchy Level 5: ' ||po_info.def_option_hier_5_code );
3422: FND_LOG.STRING(g_level_statement,
3423: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_po_def_option_hier',
3424: 'PO Hierarchy Level 6: ' ||po_info.def_option_hier_6_code );
3419: FND_LOG.STRING(g_level_statement,
3420: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_po_def_option_hier',
3421: 'PO Hierarchy Level 5: ' ||po_info.def_option_hier_5_code );
3422: FND_LOG.STRING(g_level_statement,
3423: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_po_def_option_hier',
3424: 'PO Hierarchy Level 6: ' ||po_info.def_option_hier_6_code );
3425: FND_LOG.STRING(g_level_statement,
3426: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_po_def_option_hier',
3427: 'PO Hierarchy Level 7: ' ||po_info.def_option_hier_7_code );
3422: FND_LOG.STRING(g_level_statement,
3423: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_po_def_option_hier',
3424: 'PO Hierarchy Level 6: ' ||po_info.def_option_hier_6_code );
3425: FND_LOG.STRING(g_level_statement,
3426: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_po_def_option_hier',
3427: 'PO Hierarchy Level 7: ' ||po_info.def_option_hier_7_code );
3428: END IF;
3429:
3430: sysinfo.po_info := po_info;
3440: OR sysinfo.po_info.def_option_hier_7_code IS NOT NULL) THEN
3441:
3442: IF (g_level_statement >= g_current_runtime_level ) THEN
3443: FND_LOG.STRING(g_level_statement,
3444: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_po_def_option_hier',
3445: 'Initializing PO information');
3446: END IF;
3447:
3448: potaxtab(1) := sysinfo.po_info.def_option_hier_1_code;
3460: END IF;
3461:
3462: IF (g_level_statement >= g_current_runtime_level ) THEN
3463: FND_LOG.STRING(g_level_statement,
3464: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_po_def_option_hier.END',
3465: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: pop_po_def_option_hier(-)' );
3466: END IF;
3467:
3468: EXCEPTION
3461:
3462: IF (g_level_statement >= g_current_runtime_level ) THEN
3463: FND_LOG.STRING(g_level_statement,
3464: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_po_def_option_hier.END',
3465: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: pop_po_def_option_hier(-)' );
3466: END IF;
3467:
3468: EXCEPTION
3469: WHEN OTHERS THEN
3477: FND_MSG_PUB.Add;
3478:
3479: IF (g_level_unexpected >= g_current_runtime_level ) THEN
3480: FND_LOG.STRING(g_level_unexpected,
3481: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_po_def_option_hier',
3482: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3483: END IF;
3484: END pop_po_def_option_hier;
3485:
3519: BEGIN
3520:
3521: IF (g_level_statement >= g_current_runtime_level ) THEN
3522: FND_LOG.STRING(g_level_statement,
3523: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_cc_def_option_hier.BEGIN',
3524: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: pop_cc_def_option_hier(+)' );
3525: END IF;
3526:
3527: -- init return status
3520:
3521: IF (g_level_statement >= g_current_runtime_level ) THEN
3522: FND_LOG.STRING(g_level_statement,
3523: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_cc_def_option_hier.BEGIN',
3524: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: pop_cc_def_option_hier(+)' );
3525: END IF;
3526:
3527: -- init return status
3528: p_return_status := FND_API.G_RET_STS_SUCCESS;
3532: search_cc_def_hier := FALSE;
3533:
3534: IF (g_level_statement >= g_current_runtime_level ) THEN
3535: FND_LOG.STRING(g_level_statement,
3536: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_cc_def_option_hier',
3537: 'Getting CC default options');
3538: END IF;
3539:
3540: OPEN c_cc_default_options(p_org_id, 8407);
3556: END IF;
3557:
3558: IF (g_level_statement >= g_current_runtime_level ) THEN
3559: FND_LOG.STRING(g_level_statement,
3560: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_cc_def_option_hier',
3561: 'CC Use Tax Classification: '|| NVL(cc_info.use_tax_classification_flag,'N'));
3562: FND_LOG.STRING(g_level_statement,
3563: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_cc_def_option_hier',
3564: 'CC Hierarchy Level 1: ' ||cc_info.def_option_hier_1_code );
3559: FND_LOG.STRING(g_level_statement,
3560: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_cc_def_option_hier',
3561: 'CC Use Tax Classification: '|| NVL(cc_info.use_tax_classification_flag,'N'));
3562: FND_LOG.STRING(g_level_statement,
3563: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_cc_def_option_hier',
3564: 'CC Hierarchy Level 1: ' ||cc_info.def_option_hier_1_code );
3565: FND_LOG.STRING(g_level_statement,
3566: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_cc_def_option_hier',
3567: 'CC Hierarchy Level 2: ' ||cc_info.def_option_hier_2_code );
3562: FND_LOG.STRING(g_level_statement,
3563: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_cc_def_option_hier',
3564: 'CC Hierarchy Level 1: ' ||cc_info.def_option_hier_1_code );
3565: FND_LOG.STRING(g_level_statement,
3566: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_cc_def_option_hier',
3567: 'CC Hierarchy Level 2: ' ||cc_info.def_option_hier_2_code );
3568: FND_LOG.STRING(g_level_statement,
3569: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_cc_def_option_hier',
3570: 'CC Hierarchy Level 3: ' ||cc_info.def_option_hier_3_code );
3565: FND_LOG.STRING(g_level_statement,
3566: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_cc_def_option_hier',
3567: 'CC Hierarchy Level 2: ' ||cc_info.def_option_hier_2_code );
3568: FND_LOG.STRING(g_level_statement,
3569: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_cc_def_option_hier',
3570: 'CC Hierarchy Level 3: ' ||cc_info.def_option_hier_3_code );
3571: FND_LOG.STRING(g_level_statement,
3572: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_cc_def_option_hier',
3573: 'CC Hierarchy Level 4: ' ||cc_info.def_option_hier_4_code );
3568: FND_LOG.STRING(g_level_statement,
3569: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_cc_def_option_hier',
3570: 'CC Hierarchy Level 3: ' ||cc_info.def_option_hier_3_code );
3571: FND_LOG.STRING(g_level_statement,
3572: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_cc_def_option_hier',
3573: 'CC Hierarchy Level 4: ' ||cc_info.def_option_hier_4_code );
3574: FND_LOG.STRING(g_level_statement,
3575: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_cc_def_option_hier',
3576: 'CC Hierarchy Level 5: ' ||cc_info.def_option_hier_5_code );
3571: FND_LOG.STRING(g_level_statement,
3572: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_cc_def_option_hier',
3573: 'CC Hierarchy Level 4: ' ||cc_info.def_option_hier_4_code );
3574: FND_LOG.STRING(g_level_statement,
3575: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_cc_def_option_hier',
3576: 'CC Hierarchy Level 5: ' ||cc_info.def_option_hier_5_code );
3577: FND_LOG.STRING(g_level_statement,
3578: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_cc_def_option_hier',
3579: 'CC Hierarchy Level 6: ' ||cc_info.def_option_hier_6_code );
3574: FND_LOG.STRING(g_level_statement,
3575: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_cc_def_option_hier',
3576: 'CC Hierarchy Level 5: ' ||cc_info.def_option_hier_5_code );
3577: FND_LOG.STRING(g_level_statement,
3578: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_cc_def_option_hier',
3579: 'CC Hierarchy Level 6: ' ||cc_info.def_option_hier_6_code );
3580: FND_LOG.STRING(g_level_statement,
3581: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_cc_def_option_hier',
3582: 'CC Hierarchy Level 7: ' ||cc_info.def_option_hier_7_code );
3577: FND_LOG.STRING(g_level_statement,
3578: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_cc_def_option_hier',
3579: 'CC Hierarchy Level 6: ' ||cc_info.def_option_hier_6_code );
3580: FND_LOG.STRING(g_level_statement,
3581: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_cc_def_option_hier',
3582: 'CC Hierarchy Level 7: ' ||cc_info.def_option_hier_7_code );
3583: END IF;
3584:
3585: sysinfo.cc_info := cc_info;
3595: OR sysinfo.cc_info.def_option_hier_7_code IS NOT NULL) THEN
3596:
3597: IF (g_level_statement >= g_current_runtime_level ) THEN
3598: FND_LOG.STRING(g_level_statement,
3599: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_cc_def_option_hier',
3600: 'Initializing CC information');
3601: END IF;
3602:
3603: cctaxtab(1) := sysinfo.cc_info.def_option_hier_1_code;
3613: END IF;
3614:
3615: IF (g_level_statement >= g_current_runtime_level ) THEN
3616: FND_LOG.STRING(g_level_statement,
3617: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_cc_def_option_hier.END',
3618: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: pop_cc_def_option_hier(-)' );
3619: END IF;
3620:
3621: EXCEPTION
3614:
3615: IF (g_level_statement >= g_current_runtime_level ) THEN
3616: FND_LOG.STRING(g_level_statement,
3617: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_cc_def_option_hier.END',
3618: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: pop_cc_def_option_hier(-)' );
3619: END IF;
3620:
3621: EXCEPTION
3622: WHEN OTHERS THEN
3630: FND_MSG_PUB.Add;
3631:
3632: IF (g_level_unexpected >= g_current_runtime_level ) THEN
3633: FND_LOG.STRING(g_level_unexpected,
3634: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.pop_cc_def_option_hier',
3635: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3636: END IF;
3637: END pop_cc_def_option_hier;
3638:
3664: BEGIN
3665:
3666: IF (g_level_statement >= g_current_runtime_level ) THEN
3667: FND_LOG.STRING(g_level_statement,
3668: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.validate_tax_classif_code.BEGIN',
3669: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: validate_tax_classif_code(+)');
3670:
3671: FND_LOG.STRING(g_level_statement,
3672: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.validate_tax_classif_code',
3665:
3666: IF (g_level_statement >= g_current_runtime_level ) THEN
3667: FND_LOG.STRING(g_level_statement,
3668: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.validate_tax_classif_code.BEGIN',
3669: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: validate_tax_classif_code(+)');
3670:
3671: FND_LOG.STRING(g_level_statement,
3672: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.validate_tax_classif_code',
3673: 'p_tax_classification_code =='
3668: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.validate_tax_classif_code.BEGIN',
3669: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: validate_tax_classif_code(+)');
3670:
3671: FND_LOG.STRING(g_level_statement,
3672: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.validate_tax_classif_code',
3673: 'p_tax_classification_code =='
3674: ||p_tax_classification_code);
3675:
3676: END IF;
3680: CLOSE chk_tax_classification_code;
3681:
3682: IF (g_level_statement >= g_current_runtime_level ) THEN
3683: FND_LOG.STRING(g_level_statement,
3684: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.validate_tax_classif_code',
3685: 'p_count == >'||to_char(p_count));
3686: FND_LOG.STRING(g_level_statement,
3687: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.validate_tax_classif_code.END',
3688: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: validate_tax_classif_code(-)');
3683: FND_LOG.STRING(g_level_statement,
3684: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.validate_tax_classif_code',
3685: 'p_count == >'||to_char(p_count));
3686: FND_LOG.STRING(g_level_statement,
3687: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.validate_tax_classif_code.END',
3688: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: validate_tax_classif_code(-)');
3689: END IF;
3690:
3691: END validate_tax_classif_code;
3684: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.validate_tax_classif_code',
3685: 'p_count == >'||to_char(p_count));
3686: FND_LOG.STRING(g_level_statement,
3687: 'ZX.PLSQL.ZX_AP_TAX_CLASSIFICATN_DEF_PKG.validate_tax_classif_code.END',
3688: 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG: validate_tax_classif_code(-)');
3689: END IF;
3690:
3691: END validate_tax_classif_code;
3692:
3697: -------------------------------------------------------------------------------
3698:
3699: BEGIN
3700:
3701: curr_calling_sequence := 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG.';
3702: Initialize;
3703:
3704: END ZX_AP_TAX_CLASSIFICATN_DEF_PKG;
3700:
3701: curr_calling_sequence := 'ZX_AP_TAX_CLASSIFICATN_DEF_PKG.';
3702: Initialize;
3703:
3704: END ZX_AP_TAX_CLASSIFICATN_DEF_PKG;