1: PACKAGE BODY ZX_TDS_CALC_SERVICES_PUB_PKG AS
2: /* $Header: zxdwtxcalsrvpubb.pls 120.132.12010000.5 2009/02/05 14:38:29 tsen ship $ */
3:
4: /* Declare constants */
5:
2: /* $Header: zxdwtxcalsrvpubb.pls 120.132.12010000.5 2009/02/05 14:38:29 tsen ship $ */
3:
4: /* Declare constants */
5:
6: G_PKG_NAME CONSTANT VARCHAR2(30) := 'zx_tds_calc_services_pub_pkg';
7: G_MSG_UERROR CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR;
8: G_MSG_ERROR CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_ERROR;
9: G_MSG_SUCCESS CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_SUCCESS;
10:
88: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
89:
90: IF (g_level_procedure >= g_current_runtime_level ) THEN
91: FND_LOG.STRING(g_level_procedure,
92: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_tax_regimes.BEGIN',
93: 'ZX_TDS_CALC_SERVICES_PUB_PKG.get_tax_regimes(+)');
94: END IF;
95: x_return_status := FND_API.G_RET_STS_SUCCESS;
96:
89:
90: IF (g_level_procedure >= g_current_runtime_level ) THEN
91: FND_LOG.STRING(g_level_procedure,
92: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_tax_regimes.BEGIN',
93: 'ZX_TDS_CALC_SERVICES_PUB_PKG.get_tax_regimes(+)');
94: END IF;
95: x_return_status := FND_API.G_RET_STS_SUCCESS;
96:
97: -- Bug fix 3365220, 3426155, skip get_applicable_regimes for
153: END IF;
154:
155: IF (g_level_statement >= g_current_runtime_level ) THEN
156: FND_LOG.STRING(g_level_statement,
157: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_tax_regimes',
158: 'l_template_usage_code := '||l_template_usage_code);
159: END IF;
160:
161: -- Populate the event_class_rec with template_usage_code.This is to avoid
179:
180: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
181: IF (g_level_error >= g_current_runtime_level ) THEN
182: FND_LOG.STRING(g_level_error,
183: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_tax_regimes',
184: 'Incorrect return_status after calling ' ||
185: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_regimes()');
186: FND_LOG.STRING(g_level_error,
187: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_tax_regimes',
183: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_tax_regimes',
184: 'Incorrect return_status after calling ' ||
185: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_regimes()');
186: FND_LOG.STRING(g_level_error,
187: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_tax_regimes',
188: 'RETURN_STATUS = ' || x_return_status);
189: FND_LOG.STRING(g_level_error,
190: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_tax_regimes.END',
191: 'ZX_TDS_CALC_SERVICES_PUB_PKG.get_tax_regimes(-)');
186: FND_LOG.STRING(g_level_error,
187: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_tax_regimes',
188: 'RETURN_STATUS = ' || x_return_status);
189: FND_LOG.STRING(g_level_error,
190: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_tax_regimes.END',
191: 'ZX_TDS_CALC_SERVICES_PUB_PKG.get_tax_regimes(-)');
192: END IF;
193: RETURN;
194: END IF;
187: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_tax_regimes',
188: 'RETURN_STATUS = ' || x_return_status);
189: FND_LOG.STRING(g_level_error,
190: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_tax_regimes.END',
191: 'ZX_TDS_CALC_SERVICES_PUB_PKG.get_tax_regimes(-)');
192: END IF;
193: RETURN;
194: END IF;
195:
195:
196: IF (g_level_procedure >= g_current_runtime_level ) THEN
197:
198: FND_LOG.STRING(g_level_procedure,
199: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_tax_regimes.END',
200: 'ZX_TDS_CALC_SERVICES_PUB_PKG.get_tax_regimes(-)');
201: END IF;
202:
203: EXCEPTION
196: IF (g_level_procedure >= g_current_runtime_level ) THEN
197:
198: FND_LOG.STRING(g_level_procedure,
199: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_tax_regimes.END',
200: 'ZX_TDS_CALC_SERVICES_PUB_PKG.get_tax_regimes(-)');
201: END IF;
202:
203: EXCEPTION
204: WHEN OTHERS THEN
210: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
211:
212: IF (g_level_unexpected >= g_current_runtime_level ) THEN
213: FND_LOG.STRING(g_level_unexpected,
214: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_tax_regimes',
215: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
216: FND_LOG.STRING(g_level_unexpected,
217: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_tax_regimes.END',
218: 'ZX_TDS_CALC_SERVICES_PUB_PKG.get_tax_regimes(-)');
213: FND_LOG.STRING(g_level_unexpected,
214: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_tax_regimes',
215: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
216: FND_LOG.STRING(g_level_unexpected,
217: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_tax_regimes.END',
218: 'ZX_TDS_CALC_SERVICES_PUB_PKG.get_tax_regimes(-)');
219: END IF;
220:
221: END get_tax_regimes;
214: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_tax_regimes',
215: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
216: FND_LOG.STRING(g_level_unexpected,
217: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_tax_regimes.END',
218: 'ZX_TDS_CALC_SERVICES_PUB_PKG.get_tax_regimes(-)');
219: END IF;
220:
221: END get_tax_regimes;
222:
261: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
262:
263: IF (g_level_procedure >= g_current_runtime_level ) THEN
264: FND_LOG.STRING(g_level_procedure,
265: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.BEGIN',
266: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(+)');
267: END IF;
268:
269: x_return_status := FND_API.G_RET_STS_SUCCESS;
262:
263: IF (g_level_procedure >= g_current_runtime_level ) THEN
264: FND_LOG.STRING(g_level_procedure,
265: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.BEGIN',
266: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(+)');
267: END IF;
268:
269: x_return_status := FND_API.G_RET_STS_SUCCESS;
270:
279: THEN
280: IF (g_level_procedure >= g_current_runtime_level ) THEN
281:
282: FND_LOG.STRING(g_level_procedure,
283: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
284: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)'||'Skip processing for RECORD_WITH_NO_TAX');
285: END IF;
286: RETURN;
287: END IF;
280: IF (g_level_procedure >= g_current_runtime_level ) THEN
281:
282: FND_LOG.STRING(g_level_procedure,
283: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
284: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)'||'Skip processing for RECORD_WITH_NO_TAX');
285: END IF;
286: RETURN;
287: END IF;
288:
287: END IF;
288:
289: --comment out for bug fix 5532891, the assignment has been take cared whenever there is
290: --applicable tax
291: --l_begin_index := ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl.LAST+1;
292:
293: -- Bug 3971006
294: --
295: IF ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.tax_event_type_code(
297: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.line_level_action(
298: p_trx_line_index) ='COPY_AND_CREATE'
299: THEN
300:
301: ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_copy_and_create_flg := 'Y';
302:
303: END IF;
304:
305: -- bug fix 5417887
353:
354: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
355: IF (g_level_statement >= g_current_runtime_level ) THEN
356: FND_LOG.STRING(g_level_statement,
357: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
358: 'Incorrect return_status after calling ' ||
359: ' ZX_ON_FLY_TRX_UPGRADE_PKG.upgrade_trx_on_fly' ||
360: ' contine processing ...');
361: FND_LOG.STRING(g_level_statement,
358: 'Incorrect return_status after calling ' ||
359: ' ZX_ON_FLY_TRX_UPGRADE_PKG.upgrade_trx_on_fly' ||
360: ' contine processing ...');
361: FND_LOG.STRING(g_level_statement,
362: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
363: 'RETURN_STATUS = ' || x_return_status);
364: FND_LOG.STRING(g_level_statement,
365: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
366: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
361: FND_LOG.STRING(g_level_statement,
362: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
363: 'RETURN_STATUS = ' || x_return_status);
364: FND_LOG.STRING(g_level_statement,
365: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
366: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
367: END IF;
368: END IF;
369: END IF; -- NOT l_trx_migrated_b
362: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
363: 'RETURN_STATUS = ' || x_return_status);
364: FND_LOG.STRING(g_level_statement,
365: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
366: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
367: END IF;
368: END IF;
369: END IF; -- NOT l_trx_migrated_b
370: END IF; -- historical_flag = 'Y'
371:
372: IF ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.line_level_action(
373: p_trx_line_index) ='CANCEL' THEN
374:
375: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_cancel_exist_flg := 'Y';
376:
377: ELSIF ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.line_level_action(
378: p_trx_line_index) ='DISCARD' THEN
379:
376:
377: ELSIF ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.line_level_action(
378: p_trx_line_index) ='DISCARD' THEN
379:
380: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_discard_exist_flg:= 'Y';
381:
382: ELSIF ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.line_level_action(
383: p_trx_line_index) = 'UNAPPLY_FROM' THEN
384:
381:
382: ELSIF ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.line_level_action(
383: p_trx_line_index) = 'UNAPPLY_FROM' THEN
384:
385: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_discard_exist_flg:= 'Y';
386:
387: ELSIF ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.line_level_action(
388: p_trx_line_index) ='NO_CHANGE' THEN
389:
386:
387: ELSIF ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.line_level_action(
388: p_trx_line_index) ='NO_CHANGE' THEN
389:
390: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_nochange_exist_flg := 'Y';
391:
392: END IF;
393:
394: IF (g_level_procedure >= g_current_runtime_level ) THEN
393:
394: IF (g_level_procedure >= g_current_runtime_level ) THEN
395:
396: FND_LOG.STRING(g_level_procedure,
397: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
398: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)'||'Skip processing for cancel, synch, discard, no change');
399: END IF;
400: RETURN;
401: END IF;
394: IF (g_level_procedure >= g_current_runtime_level ) THEN
395:
396: FND_LOG.STRING(g_level_procedure,
397: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
398: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)'||'Skip processing for cancel, synch, discard, no change');
399: END IF;
400: RETURN;
401: END IF;
402:
420:
421: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
422: IF (g_level_error >= g_current_runtime_level ) THEN
423: FND_LOG.STRING(g_level_error,
424: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
425: 'Incorrect return_status after calling ' ||
426: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_date()');
427: FND_LOG.STRING(g_level_error,
428: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
424: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
425: 'Incorrect return_status after calling ' ||
426: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_date()');
427: FND_LOG.STRING(g_level_error,
428: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
429: 'RETURN_STATUS = ' || x_return_status);
430: FND_LOG.STRING(g_level_error,
431: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
432: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
427: FND_LOG.STRING(g_level_error,
428: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
429: 'RETURN_STATUS = ' || x_return_status);
430: FND_LOG.STRING(g_level_error,
431: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
432: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
433: END IF;
434: RETURN;
435: END IF;
428: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
429: 'RETURN_STATUS = ' || x_return_status);
430: FND_LOG.STRING(g_level_error,
431: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
432: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
433: END IF;
434: RETURN;
435: END IF;
436: END IF;
503: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
504:
505: IF (g_level_statement >= g_current_runtime_level ) THEN
506: FND_LOG.STRING(g_level_statement,
507: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
508: 'Incorrect return_status after calling ' ||
509: 'ZX_TDS_APPLICABILITY_DETM_PKG.');
510: FND_LOG.STRING(g_level_statement,
511: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
507: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
508: 'Incorrect return_status after calling ' ||
509: 'ZX_TDS_APPLICABILITY_DETM_PKG.');
510: FND_LOG.STRING(g_level_statement,
511: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
512: 'RETURN_STATUS = ' || x_return_status);
513: FND_LOG.STRING(g_level_statement,
514: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
515: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
510: FND_LOG.STRING(g_level_statement,
511: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
512: 'RETURN_STATUS = ' || x_return_status);
513: FND_LOG.STRING(g_level_statement,
514: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
515: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
516: END IF;
517: RETURN;
518: END IF;
511: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
512: 'RETURN_STATUS = ' || x_return_status);
513: FND_LOG.STRING(g_level_statement,
514: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
515: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
516: END IF;
517: RETURN;
518: END IF;
519:
552:
553: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
554: IF (g_level_statement >= g_current_runtime_level ) THEN
555: FND_LOG.STRING(g_level_statement,
556: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
557: 'Incorrect return_status after calling ' ||
558: ' ZX_ON_FLY_TRX_UPGRADE_PKG.upgrade_trx_on_fly');
559: FND_LOG.STRING(g_level_statement,
560: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
556: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
557: 'Incorrect return_status after calling ' ||
558: ' ZX_ON_FLY_TRX_UPGRADE_PKG.upgrade_trx_on_fly');
559: FND_LOG.STRING(g_level_statement,
560: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
561: 'RETURN_STATUS = ' || x_return_status);
562: FND_LOG.STRING(g_level_statement,
563: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
564: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
559: FND_LOG.STRING(g_level_statement,
560: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
561: 'RETURN_STATUS = ' || x_return_status);
562: FND_LOG.STRING(g_level_statement,
563: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
564: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
565: END IF;
566: RETURN;
567: END IF;
560: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
561: 'RETURN_STATUS = ' || x_return_status);
562: FND_LOG.STRING(g_level_statement,
563: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
564: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
565: END IF;
566: RETURN;
567: END IF;
568:
580: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
581:
582: IF (g_level_statement >= g_current_runtime_level ) THEN
583: FND_LOG.STRING(g_level_statement,
584: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
585: 'Incorrect return_status after calling ' ||
586: 'ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines');
587: FND_LOG.STRING(g_level_statement,
588: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
584: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
585: 'Incorrect return_status after calling ' ||
586: 'ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines');
587: FND_LOG.STRING(g_level_statement,
588: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
589: 'RETURN_STATUS = ' || x_return_status);
590: FND_LOG.STRING(g_level_statement,
591: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
592: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
587: FND_LOG.STRING(g_level_statement,
588: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
589: 'RETURN_STATUS = ' || x_return_status);
590: FND_LOG.STRING(g_level_statement,
591: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
592: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
593: END IF;
594: RETURN;
595: END IF;
588: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
589: 'RETURN_STATUS = ' || x_return_status);
590: FND_LOG.STRING(g_level_statement,
591: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
592: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
593: END IF;
594: RETURN;
595: END IF;
596:
612:
613: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
614: IF (g_level_statement >= g_current_runtime_level ) THEN
615: FND_LOG.STRING(g_level_statement,
616: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
617: 'Incorrect return_status after calling ' ||
618: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_adjust');
619: FND_LOG.STRING(g_level_statement,
620: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
616: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
617: 'Incorrect return_status after calling ' ||
618: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_adjust');
619: FND_LOG.STRING(g_level_statement,
620: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
621: 'RETURN_STATUS = ' || x_return_status);
622: FND_LOG.STRING(g_level_statement,
623: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
624: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
619: FND_LOG.STRING(g_level_statement,
620: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
621: 'RETURN_STATUS = ' || x_return_status);
622: FND_LOG.STRING(g_level_statement,
623: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
624: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
625: END IF;
626: RETURN;
627: END IF;
620: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
621: 'RETURN_STATUS = ' || x_return_status);
622: FND_LOG.STRING(g_level_statement,
623: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
624: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
625: END IF;
626: RETURN;
627: END IF;
628:
667:
668: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
669: IF (g_level_statement >= g_current_runtime_level ) THEN
670: FND_LOG.STRING(g_level_statement,
671: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
672: 'Incorrect return_status after calling ' ||
673: ' ZX_ON_FLY_TRX_UPGRADE_PKG.upgrade_trx_on_fly');
674: FND_LOG.STRING(g_level_statement,
675: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
671: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
672: 'Incorrect return_status after calling ' ||
673: ' ZX_ON_FLY_TRX_UPGRADE_PKG.upgrade_trx_on_fly');
674: FND_LOG.STRING(g_level_statement,
675: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
676: 'RETURN_STATUS = ' || x_return_status);
677: FND_LOG.STRING(g_level_statement,
678: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
679: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
674: FND_LOG.STRING(g_level_statement,
675: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
676: 'RETURN_STATUS = ' || x_return_status);
677: FND_LOG.STRING(g_level_statement,
678: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
679: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
680: END IF;
681: RETURN;
682: END IF;
675: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
676: 'RETURN_STATUS = ' || x_return_status);
677: FND_LOG.STRING(g_level_statement,
678: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
679: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
680: END IF;
681: RETURN;
682: END IF;
683:
695: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
696:
697: IF (g_level_statement >= g_current_runtime_level ) THEN
698: FND_LOG.STRING(g_level_statement,
699: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
700: 'Incorrect return_status after calling ' ||
701: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_adjust');
702: FND_LOG.STRING(g_level_statement,
703: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
699: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
700: 'Incorrect return_status after calling ' ||
701: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_adjust');
702: FND_LOG.STRING(g_level_statement,
703: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
704: 'RETURN_STATUS = ' || x_return_status);
705: FND_LOG.STRING(g_level_statement,
706: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
707: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
702: FND_LOG.STRING(g_level_statement,
703: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
704: 'RETURN_STATUS = ' || x_return_status);
705: FND_LOG.STRING(g_level_statement,
706: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
707: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
708: END IF;
709: RETURN;
710: END IF;
703: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
704: 'RETURN_STATUS = ' || x_return_status);
705: FND_LOG.STRING(g_level_statement,
706: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
707: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
708: END IF;
709: RETURN;
710: END IF;
711:
729: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
730:
731: IF (g_level_statement >= g_current_runtime_level ) THEN
732: FND_LOG.STRING(g_level_statement,
733: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
734: 'Incorrect return_status after calling ' ||
735: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_applied');
736: FND_LOG.STRING(g_level_statement,
737: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
733: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
734: 'Incorrect return_status after calling ' ||
735: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_applied');
736: FND_LOG.STRING(g_level_statement,
737: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
738: 'RETURN_STATUS = ' || x_return_status);
739: FND_LOG.STRING(g_level_statement,
740: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
741: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
736: FND_LOG.STRING(g_level_statement,
737: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
738: 'RETURN_STATUS = ' || x_return_status);
739: FND_LOG.STRING(g_level_statement,
740: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
741: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
742: END IF;
743: RETURN;
744: END IF;
737: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
738: 'RETURN_STATUS = ' || x_return_status);
739: FND_LOG.STRING(g_level_statement,
740: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
741: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
742: END IF;
743: RETURN;
744: END IF;
745:
784:
785: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
786: IF (g_level_statement >= g_current_runtime_level ) THEN
787: FND_LOG.STRING(g_level_statement,
788: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
789: 'Incorrect return_status after calling ' ||
790: ' ZX_ON_FLY_TRX_UPGRADE_PKG.upgrade_trx_on_fly');
791: FND_LOG.STRING(g_level_statement,
792: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
788: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
789: 'Incorrect return_status after calling ' ||
790: ' ZX_ON_FLY_TRX_UPGRADE_PKG.upgrade_trx_on_fly');
791: FND_LOG.STRING(g_level_statement,
792: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
793: 'RETURN_STATUS = ' || x_return_status);
794: FND_LOG.STRING(g_level_statement,
795: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
796: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
791: FND_LOG.STRING(g_level_statement,
792: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
793: 'RETURN_STATUS = ' || x_return_status);
794: FND_LOG.STRING(g_level_statement,
795: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
796: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
797: END IF;
798: RETURN;
799: END IF;
792: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
793: 'RETURN_STATUS = ' || x_return_status);
794: FND_LOG.STRING(g_level_statement,
795: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
796: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
797: END IF;
798: RETURN;
799: END IF;
800:
812: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
813:
814: IF (g_level_statement >= g_current_runtime_level ) THEN
815: FND_LOG.STRING(g_level_statement,
816: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
817: 'Incorrect return_status after calling ' ||
818: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_applied');
819: FND_LOG.STRING(g_level_statement,
820: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
816: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
817: 'Incorrect return_status after calling ' ||
818: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_applied');
819: FND_LOG.STRING(g_level_statement,
820: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
821: 'RETURN_STATUS = ' || x_return_status);
822: FND_LOG.STRING(g_level_statement,
823: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
824: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
819: FND_LOG.STRING(g_level_statement,
820: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
821: 'RETURN_STATUS = ' || x_return_status);
822: FND_LOG.STRING(g_level_statement,
823: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
824: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
825: END IF;
826: RETURN;
827: END IF;
820: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
821: 'RETURN_STATUS = ' || x_return_status);
822: FND_LOG.STRING(g_level_statement,
823: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
824: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
825: END IF;
826: RETURN;
827: END IF;
828:
855:
856: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
857: IF (g_level_statement >= g_current_runtime_level ) THEN
858: FND_LOG.STRING(g_level_statement,
859: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
860: 'Incorrect return_status after calling ' ||
861: 'ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines');
862: FND_LOG.STRING(g_level_statement,
863: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
859: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
860: 'Incorrect return_status after calling ' ||
861: 'ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines');
862: FND_LOG.STRING(g_level_statement,
863: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
864: 'RETURN_STATUS = ' || x_return_status);
865: FND_LOG.STRING(g_level_statement,
866: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
867: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
862: FND_LOG.STRING(g_level_statement,
863: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
864: 'RETURN_STATUS = ' || x_return_status);
865: FND_LOG.STRING(g_level_statement,
866: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
867: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
868: END IF;
869: RETURN;
870: END IF;
863: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
864: 'RETURN_STATUS = ' || x_return_status);
865: FND_LOG.STRING(g_level_statement,
866: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
867: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
868: END IF;
869: RETURN;
870: END IF;
871:
910:
911: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
912: IF (g_level_statement >= g_current_runtime_level ) THEN
913: FND_LOG.STRING(g_level_statement,
914: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
915: 'Incorrect return_status after calling ' ||
916: ' ZX_ON_FLY_TRX_UPGRADE_PKG.upgrade_trx_on_fly');
917: FND_LOG.STRING(g_level_statement,
918: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
914: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
915: 'Incorrect return_status after calling ' ||
916: ' ZX_ON_FLY_TRX_UPGRADE_PKG.upgrade_trx_on_fly');
917: FND_LOG.STRING(g_level_statement,
918: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
919: 'RETURN_STATUS = ' || x_return_status);
920: FND_LOG.STRING(g_level_statement,
921: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
922: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
917: FND_LOG.STRING(g_level_statement,
918: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
919: 'RETURN_STATUS = ' || x_return_status);
920: FND_LOG.STRING(g_level_statement,
921: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
922: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
923: END IF;
924: RETURN;
925: END IF;
918: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
919: 'RETURN_STATUS = ' || x_return_status);
920: FND_LOG.STRING(g_level_statement,
921: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
922: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
923: END IF;
924: RETURN;
925: END IF;
926:
938: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
939:
940: IF (g_level_statement >= g_current_runtime_level ) THEN
941: FND_LOG.STRING(g_level_statement,
942: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
943: 'Incorrect return_status after calling ' ||
944: 'ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines');
945: FND_LOG.STRING(g_level_statement,
946: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
942: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
943: 'Incorrect return_status after calling ' ||
944: 'ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines');
945: FND_LOG.STRING(g_level_statement,
946: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
947: 'RETURN_STATUS = ' || x_return_status);
948: FND_LOG.STRING(g_level_statement,
949: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
950: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
945: FND_LOG.STRING(g_level_statement,
946: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
947: 'RETURN_STATUS = ' || x_return_status);
948: FND_LOG.STRING(g_level_statement,
949: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
950: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
951: END IF;
952: RETURN;
953: END IF;
946: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
947: 'RETURN_STATUS = ' || x_return_status);
948: FND_LOG.STRING(g_level_statement,
949: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
950: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
951: END IF;
952: RETURN;
953: END IF;
954:
976:
977: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
978: IF (g_level_statement >= g_current_runtime_level ) THEN
979: FND_LOG.STRING(g_level_statement,
980: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
981: 'Incorrect return_status after calling ' ||
982: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx');
983: FND_LOG.STRING(g_level_statement,
984: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
980: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
981: 'Incorrect return_status after calling ' ||
982: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx');
983: FND_LOG.STRING(g_level_statement,
984: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
985: 'RETURN_STATUS = ' || x_return_status);
986: FND_LOG.STRING(g_level_statement,
987: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
988: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
983: FND_LOG.STRING(g_level_statement,
984: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
985: 'RETURN_STATUS = ' || x_return_status);
986: FND_LOG.STRING(g_level_statement,
987: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
988: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
989: END IF;
990: RETURN;
991: END IF;
984: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
985: 'RETURN_STATUS = ' || x_return_status);
986: FND_LOG.STRING(g_level_statement,
987: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
988: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
989: END IF;
990: RETURN;
991: END IF;
992:
1014: -- need to define new error message code
1015: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1016: IF (g_level_statement >= g_current_runtime_level ) THEN
1017: FND_LOG.STRING(g_level_statement,
1018: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1019: 'No record found in zx_evnt_mappings.' );
1020: FND_LOG.STRING(g_level_statement,
1021: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1022: 'application_id: '||
1017: FND_LOG.STRING(g_level_statement,
1018: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1019: 'No record found in zx_evnt_mappings.' );
1020: FND_LOG.STRING(g_level_statement,
1021: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1022: 'application_id: '||
1023: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.application_id(p_trx_line_index) );
1024: FND_LOG.STRING(g_level_statement,
1025: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1021: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1022: 'application_id: '||
1023: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.application_id(p_trx_line_index) );
1024: FND_LOG.STRING(g_level_statement,
1025: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1026: 'entity_code: '||
1027: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.entity_code(p_trx_line_index) );
1028: FND_LOG.STRING(g_level_statement,
1029: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1025: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1026: 'entity_code: '||
1027: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.entity_code(p_trx_line_index) );
1028: FND_LOG.STRING(g_level_statement,
1029: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1030: 'event_class_code: '||
1031: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.event_class_code(p_trx_line_index) );
1032: FND_LOG.STRING(g_level_statement,
1033: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1029: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1030: 'event_class_code: '||
1031: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.event_class_code(p_trx_line_index) );
1032: FND_LOG.STRING(g_level_statement,
1033: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1034: 'RETURN_STATUS = ' || x_return_status);
1035: FND_LOG.STRING(g_level_statement,
1036: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1037: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1032: FND_LOG.STRING(g_level_statement,
1033: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1034: 'RETURN_STATUS = ' || x_return_status);
1035: FND_LOG.STRING(g_level_statement,
1036: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1037: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1038: END IF;
1039: RETURN;
1040: END IF;
1033: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1034: 'RETURN_STATUS = ' || x_return_status);
1035: FND_LOG.STRING(g_level_statement,
1036: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1037: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1038: END IF;
1039: RETURN;
1040: END IF;
1041:
1068:
1069: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1070: IF (g_level_statement >= g_current_runtime_level ) THEN
1071: FND_LOG.STRING(g_level_statement,
1072: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1073: 'Incorrect return_status after calling ' ||
1074: ' ZX_ON_FLY_TRX_UPGRADE_PKG.upgrade_trx_on_fly');
1075: FND_LOG.STRING(g_level_statement,
1076: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1072: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1073: 'Incorrect return_status after calling ' ||
1074: ' ZX_ON_FLY_TRX_UPGRADE_PKG.upgrade_trx_on_fly');
1075: FND_LOG.STRING(g_level_statement,
1076: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1077: 'RETURN_STATUS = ' || x_return_status);
1078: FND_LOG.STRING(g_level_statement,
1079: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1080: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1075: FND_LOG.STRING(g_level_statement,
1076: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1077: 'RETURN_STATUS = ' || x_return_status);
1078: FND_LOG.STRING(g_level_statement,
1079: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1080: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1081: END IF;
1082: RETURN;
1083: END IF;
1076: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1077: 'RETURN_STATUS = ' || x_return_status);
1078: FND_LOG.STRING(g_level_statement,
1079: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1080: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1081: END IF;
1082: RETURN;
1083: END IF;
1084:
1095:
1096: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1097: IF (g_level_statement >= g_current_runtime_level ) THEN
1098: FND_LOG.STRING(g_level_statement,
1099: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1100: 'Incorrect return_status after calling ' ||
1101: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx');
1102: FND_LOG.STRING(g_level_statement,
1103: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1099: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1100: 'Incorrect return_status after calling ' ||
1101: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx');
1102: FND_LOG.STRING(g_level_statement,
1103: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1104: 'RETURN_STATUS = ' || x_return_status);
1105: FND_LOG.STRING(g_level_statement,
1106: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1107: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1102: FND_LOG.STRING(g_level_statement,
1103: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1104: 'RETURN_STATUS = ' || x_return_status);
1105: FND_LOG.STRING(g_level_statement,
1106: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1107: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1108: END IF;
1109: RETURN;
1110: END IF;
1103: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1104: 'RETURN_STATUS = ' || x_return_status);
1105: FND_LOG.STRING(g_level_statement,
1106: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1107: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1108: END IF;
1109: RETURN;
1110: END IF;
1111:
1119: --
1120: IF ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.line_level_action (
1121: p_trx_line_index ) <> 'LINE_INFO_TAX_ONLY' AND
1122: p_event_class_rec.process_for_applicability_flag = 'Y' AND
1123: NVL(ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_for_appl_flg, 'Y') = 'Y' AND
1124: -- Bug 4765758: for TM, check source_process_for_appl_flag to determine
1125: -- whether tax needs to be calcualted or not.
1126: NVL(p_event_class_rec.source_process_for_appl_flag, 'Y') = 'Y'
1127: THEN
1150:
1151: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1152: IF (g_level_error >= g_current_runtime_level ) THEN
1153: FND_LOG.STRING(g_level_error,
1154: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1155: 'Incorrect return_status after calling ' ||
1156: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_process_results()');
1157: FND_LOG.STRING(g_level_error,
1158: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1154: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1155: 'Incorrect return_status after calling ' ||
1156: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_process_results()');
1157: FND_LOG.STRING(g_level_error,
1158: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1159: 'RETURN_STATUS = ' || x_return_status);
1160: FND_LOG.STRING(g_level_error,
1161: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1162: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1157: FND_LOG.STRING(g_level_error,
1158: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1159: 'RETURN_STATUS = ' || x_return_status);
1160: FND_LOG.STRING(g_level_error,
1161: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1162: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1163: END IF;
1164: RETURN;
1165: END IF;
1158: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1159: 'RETURN_STATUS = ' || x_return_status);
1160: FND_LOG.STRING(g_level_error,
1161: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1162: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1163: END IF;
1164: RETURN;
1165: END IF;
1166:
1201: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1202: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1203: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1204: FND_LOG.STRING(G_LEVEL_STATEMENT,
1205: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1206: 'Incorrect return_status after calling ' ||
1207: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_taxes()');
1208: FND_LOG.STRING(G_LEVEL_STATEMENT,
1209: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1205: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1206: 'Incorrect return_status after calling ' ||
1207: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_taxes()');
1208: FND_LOG.STRING(G_LEVEL_STATEMENT,
1209: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1210: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1211: END IF;
1212: RETURN;
1213: END IF;
1206: 'Incorrect return_status after calling ' ||
1207: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_taxes()');
1208: FND_LOG.STRING(G_LEVEL_STATEMENT,
1209: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1210: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1211: END IF;
1212: RETURN;
1213: END IF;
1214: END IF;
1236:
1237: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1238: IF (g_level_statement >= g_current_runtime_level ) THEN
1239: FND_LOG.STRING(g_level_statement,
1240: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1241: 'Incorrect return_status after calling ' ||
1242: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_from_account');
1243: FND_LOG.STRING(g_level_statement,
1244: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1240: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1241: 'Incorrect return_status after calling ' ||
1242: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_from_account');
1243: FND_LOG.STRING(g_level_statement,
1244: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1245: 'RETURN_STATUS = ' || x_return_status);
1246: FND_LOG.STRING(g_level_statement,
1247: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1248: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1243: FND_LOG.STRING(g_level_statement,
1244: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1245: 'RETURN_STATUS = ' || x_return_status);
1246: FND_LOG.STRING(g_level_statement,
1247: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1248: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1249: END IF;
1250: RETURN;
1251: END IF;
1244: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1245: 'RETURN_STATUS = ' || x_return_status);
1246: FND_LOG.STRING(g_level_statement,
1247: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1248: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1249: END IF;
1250: RETURN;
1251: END IF;
1252: END IF;
1273:
1274: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1275: IF (g_level_error >= g_current_runtime_level ) THEN
1276: FND_LOG.STRING(g_level_error,
1277: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1278: 'Incorrect return_status after calling ' ||
1279: 'ZX_TDS_TAX_STATUS_DETM_PKG.get_tax_status()');
1280: FND_LOG.STRING(g_level_error,
1281: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1277: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1278: 'Incorrect return_status after calling ' ||
1279: 'ZX_TDS_TAX_STATUS_DETM_PKG.get_tax_status()');
1280: FND_LOG.STRING(g_level_error,
1281: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1282: 'RETURN_STATUS = ' || x_return_status);
1283: FND_LOG.STRING(g_level_error,
1284: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1285: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1280: FND_LOG.STRING(g_level_error,
1281: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1282: 'RETURN_STATUS = ' || x_return_status);
1283: FND_LOG.STRING(g_level_error,
1284: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1285: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1286: END IF;
1287: RETURN;
1288: END IF;
1281: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1282: 'RETURN_STATUS = ' || x_return_status);
1283: FND_LOG.STRING(g_level_error,
1284: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1285: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1286: END IF;
1287: RETURN;
1288: END IF;
1289:
1300:
1301: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1302: IF (g_level_error >= g_current_runtime_level ) THEN
1303: FND_LOG.STRING(g_level_error,
1304: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1305: 'Incorrect return_status after calling ' ||
1306: 'ZX_TDS_RATE_DETM_PKG.get_tax_rate()');
1307: FND_LOG.STRING(g_level_error,
1308: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1304: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1305: 'Incorrect return_status after calling ' ||
1306: 'ZX_TDS_RATE_DETM_PKG.get_tax_rate()');
1307: FND_LOG.STRING(g_level_error,
1308: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1309: 'RETURN_STATUS = ' || x_return_status);
1310: FND_LOG.STRING(g_level_error,
1311: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1312: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1307: FND_LOG.STRING(g_level_error,
1308: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1309: 'RETURN_STATUS = ' || x_return_status);
1310: FND_LOG.STRING(g_level_error,
1311: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1312: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1313: END IF;
1314: RETURN;
1315: END IF;
1308: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1309: 'RETURN_STATUS = ' || x_return_status);
1310: FND_LOG.STRING(g_level_error,
1311: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1312: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1313: END IF;
1314: RETURN;
1315: END IF;
1316: END IF; -- historical_flag <> 'Y'
1328:
1329: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1330: IF (g_level_error >= g_current_runtime_level ) THEN
1331: FND_LOG.STRING(g_level_error,
1332: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1333: 'Incorrect return_status after calling ' || '
1334: ZX_TDS_TAXABLE_BASIS_DETM_PKG.get_taxable_basis()');
1335: FND_LOG.STRING(g_level_error,
1336: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1332: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1333: 'Incorrect return_status after calling ' || '
1334: ZX_TDS_TAXABLE_BASIS_DETM_PKG.get_taxable_basis()');
1335: FND_LOG.STRING(g_level_error,
1336: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1337: 'RETURN_STATUS = ' || x_return_status);
1338: FND_LOG.STRING(g_level_error,
1339: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1340: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1335: FND_LOG.STRING(g_level_error,
1336: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1337: 'RETURN_STATUS = ' || x_return_status);
1338: FND_LOG.STRING(g_level_error,
1339: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1340: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1341: END IF;
1342: RETURN;
1343: END IF;
1336: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1337: 'RETURN_STATUS = ' || x_return_status);
1338: FND_LOG.STRING(g_level_error,
1339: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1340: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1341: END IF;
1342: RETURN;
1343: END IF;
1344:
1355:
1356: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1357: IF (g_level_error >= g_current_runtime_level ) THEN
1358: FND_LOG.STRING(g_level_error,
1359: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1360: 'Incorrect return_status after calling '||
1361: 'ZX_TDS_CALC_PKG.Get_tax_amount()');
1362: FND_LOG.STRING(g_level_error,
1363: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1359: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1360: 'Incorrect return_status after calling '||
1361: 'ZX_TDS_CALC_PKG.Get_tax_amount()');
1362: FND_LOG.STRING(g_level_error,
1363: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1364: 'RETURN_STATUS = ' || x_return_status);
1365: FND_LOG.STRING(g_level_error,
1366: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1367: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1362: FND_LOG.STRING(g_level_error,
1363: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1364: 'RETURN_STATUS = ' || x_return_status);
1365: FND_LOG.STRING(g_level_error,
1366: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1367: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1368: END IF;
1369: RETURN;
1370: END IF;
1363: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1364: 'RETURN_STATUS = ' || x_return_status);
1365: FND_LOG.STRING(g_level_error,
1366: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1367: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1368: END IF;
1369: RETURN;
1370: END IF;
1371:
1394:
1395: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1396: IF (g_level_error >= g_current_runtime_level ) THEN
1397: FND_LOG.STRING(g_level_error,
1398: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1399: 'Incorrect return_status after calling '||
1400: 'ZX_TDS_TAX_LINES_POPU_PKG.pop_tax_line_for_trx_line()');
1401: FND_LOG.STRING(g_level_error,
1402: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1398: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1399: 'Incorrect return_status after calling '||
1400: 'ZX_TDS_TAX_LINES_POPU_PKG.pop_tax_line_for_trx_line()');
1401: FND_LOG.STRING(g_level_error,
1402: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1403: 'RETURN_STATUS = ' || x_return_status);
1404: FND_LOG.STRING(g_level_error,
1405: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1406: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1401: FND_LOG.STRING(g_level_error,
1402: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1403: 'RETURN_STATUS = ' || x_return_status);
1404: FND_LOG.STRING(g_level_error,
1405: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1406: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1407: END IF;
1408: RETURN;
1409: END IF;
1402: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1403: 'RETURN_STATUS = ' || x_return_status);
1404: FND_LOG.STRING(g_level_error,
1405: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1406: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1407: END IF;
1408: RETURN;
1409: END IF;
1410: END IF; -- begin_index and end_index NOT NULL, call internal services
1413: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR; -- bug 4893261
1414: IF (g_level_statement >= g_current_runtime_level ) THEN
1415:
1416: FND_LOG.STRING(g_level_statement,
1417: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1418: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)'||'Tax Event Type Code: '||
1419: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.tax_event_type_code(
1420: p_trx_line_index));
1421: END IF;
1414: IF (g_level_statement >= g_current_runtime_level ) THEN
1415:
1416: FND_LOG.STRING(g_level_statement,
1417: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1418: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)'||'Tax Event Type Code: '||
1419: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.tax_event_type_code(
1420: p_trx_line_index));
1421: END IF;
1422: RETURN;
1429: --
1430: -- set overridden_flag = 'Y' and last_manual_entry = 'TAX_AMOUNT'
1431: --
1432:
1433: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ctrl_total_hdr_tx_amt_flg := 'Y'; -- bug 5417887
1434:
1435: IF ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ctrl_hdr_tx_appl_flag(
1436: p_trx_line_index) = 'N' THEN
1437: FOR tax_line_index IN nvl(l_begin_index,0) .. nvl(l_end_index,-99) LOOP
1434:
1435: IF ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ctrl_hdr_tx_appl_flag(
1436: p_trx_line_index) = 'N' THEN
1437: FOR tax_line_index IN nvl(l_begin_index,0) .. nvl(l_end_index,-99) LOOP
1438: ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(
1439: tax_line_index).self_assessed_flag := 'Y';
1440: END LOOP;
1441:
1442: END IF; -- ctrl_hdr_tx_appl_flag is 'N'
1449: p_trx_line_index) IS NOT NULL
1450: THEN
1451: l_tax_exists_flg := 'N';
1452: FOR i IN NVL(l_begin_index, 0) .. NVL(l_end_index, -1) LOOP
1453: IF ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(
1454: i).self_assessed_flag <> 'Y' AND
1455: ( ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(
1456: i).offset_flag <> 'Y' OR
1457: ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(
1451: l_tax_exists_flg := 'N';
1452: FOR i IN NVL(l_begin_index, 0) .. NVL(l_end_index, -1) LOOP
1453: IF ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(
1454: i).self_assessed_flag <> 'Y' AND
1455: ( ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(
1456: i).offset_flag <> 'Y' OR
1457: ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(
1458: i).offset_flag IS NULL) --Bug 5765221
1459: THEN
1453: IF ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(
1454: i).self_assessed_flag <> 'Y' AND
1455: ( ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(
1456: i).offset_flag <> 'Y' OR
1457: ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(
1458: i).offset_flag IS NULL) --Bug 5765221
1459: THEN
1460: l_tax_exists_flg := 'Y';
1461: EXIT;
1467: -- populate p_event_class_rec.ctrl_total_line_tx_amt_flg because the value
1468: -- of ctrl_total_line_tx_amt of this transaction line is not null.
1469: --
1470: p_event_class_rec.ctrl_total_line_tx_amt_flg := 'Y';
1471: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ctrl_total_line_tx_amt_flg := 'Y'; -- bug 5417887
1472:
1473: ELSE
1474: IF ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ctrl_total_line_tx_amt(
1475: p_trx_line_index) <> 0
1476: THEN
1477: x_return_status := FND_API.G_RET_STS_ERROR;
1478: IF (g_level_error >= g_current_runtime_level ) THEN
1479: FND_LOG.STRING(g_level_error,
1480: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1481: 'line level control tax amount is not 0, ' ||
1482: 'but there is no tax lines created for the trx line.');
1483:
1484: FND_LOG.STRING(g_level_error,
1481: 'line level control tax amount is not 0, ' ||
1482: 'but there is no tax lines created for the trx line.');
1483:
1484: FND_LOG.STRING(g_level_error,
1485: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1486: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1487: END IF;
1488:
1489: FND_MESSAGE.SET_NAME('ZX','ZX_LN_CTRL_TOTAL_TAX_NOT_EXIST');
1482: 'but there is no tax lines created for the trx line.');
1483:
1484: FND_LOG.STRING(g_level_error,
1485: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1486: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1487: END IF;
1488:
1489: FND_MESSAGE.SET_NAME('ZX','ZX_LN_CTRL_TOTAL_TAX_NOT_EXIST');
1490:
1488:
1489: FND_MESSAGE.SET_NAME('ZX','ZX_LN_CTRL_TOTAL_TAX_NOT_EXIST');
1490:
1491: -- FND_MSG_PUB.Add;
1492: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_line_id :=
1493: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.trx_line_id(p_trx_line_index);
1494: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_level_type :=
1495: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.trx_level_type(p_trx_line_index);
1496:
1490:
1491: -- FND_MSG_PUB.Add;
1492: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_line_id :=
1493: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.trx_line_id(p_trx_line_index);
1494: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_level_type :=
1495: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.trx_level_type(p_trx_line_index);
1496:
1497: ZX_API_PUB.add_msg(ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec);
1498:
1493: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.trx_line_id(p_trx_line_index);
1494: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_level_type :=
1495: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.trx_level_type(p_trx_line_index);
1496:
1497: ZX_API_PUB.add_msg(ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec);
1498:
1499: RETURN;
1500: END IF; -- ctrl_total_line_tx_amt <> 0
1501: END IF; -- l_tax_exists_flg = 'Y' or ELSE
1511:
1512: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1513: IF (g_level_error >= g_current_runtime_level ) THEN
1514: FND_LOG.STRING(g_level_error,
1515: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1516: 'Incorrect return_status after calling ' ||
1517: 'dump_detail_tax_lines_into_gt()');
1518: FND_LOG.STRING(g_level_error,
1519: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1515: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1516: 'Incorrect return_status after calling ' ||
1517: 'dump_detail_tax_lines_into_gt()');
1518: FND_LOG.STRING(g_level_error,
1519: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1520: 'RETURN_STATUS = ' || x_return_status);
1521: FND_LOG.STRING(g_level_error,
1522: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1523: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1518: FND_LOG.STRING(g_level_error,
1519: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1520: 'RETURN_STATUS = ' || x_return_status);
1521: FND_LOG.STRING(g_level_error,
1522: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1523: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1524: END IF;
1525: RETURN;
1526: END IF;
1519: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1520: 'RETURN_STATUS = ' || x_return_status);
1521: FND_LOG.STRING(g_level_error,
1522: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1523: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1524: END IF;
1525: RETURN;
1526: END IF;
1527: END IF;
1528:
1529: IF (g_level_procedure >= g_current_runtime_level ) THEN
1530:
1531: FND_LOG.STRING(g_level_procedure,
1532: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1533: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)'||x_return_status);
1534: END IF;
1535:
1536: EXCEPTION
1529: IF (g_level_procedure >= g_current_runtime_level ) THEN
1530:
1531: FND_LOG.STRING(g_level_procedure,
1532: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1533: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)'||x_return_status);
1534: END IF;
1535:
1536: EXCEPTION
1537: WHEN OTHERS THEN
1538: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1539:
1540: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1541: FND_LOG.STRING(g_level_unexpected,
1542: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1543: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
1544: FND_LOG.STRING(g_level_unexpected,
1545: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1546: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1541: FND_LOG.STRING(g_level_unexpected,
1542: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1543: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
1544: FND_LOG.STRING(g_level_unexpected,
1545: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1546: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1547: END IF;
1548:
1549: END calculate_tax;
1542: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax',
1543: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
1544: FND_LOG.STRING(g_level_unexpected,
1545: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax.END',
1546: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax(-)');
1547: END IF;
1548:
1549: END calculate_tax;
1550:
1562: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1563:
1564: IF (g_level_procedure >= g_current_runtime_level ) THEN
1565: FND_LOG.STRING(g_level_procedure,
1566: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.overide_detail_tax_lines.BEGIN',
1567: 'ZX_TDS_CALC_SERVICES_PUB_PKG.overide_detail_tax_lines(+)');
1568: END IF;
1569: x_return_status := FND_API.G_RET_STS_SUCCESS;
1570:
1563:
1564: IF (g_level_procedure >= g_current_runtime_level ) THEN
1565: FND_LOG.STRING(g_level_procedure,
1566: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.overide_detail_tax_lines.BEGIN',
1567: 'ZX_TDS_CALC_SERVICES_PUB_PKG.overide_detail_tax_lines(+)');
1568: END IF;
1569: x_return_status := FND_API.G_RET_STS_SUCCESS;
1570:
1571: IF (ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.tax_event_type_code(
1577:
1578: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1579: IF (g_level_error >= g_current_runtime_level ) THEN
1580: FND_LOG.STRING(g_level_error,
1581: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.overide_detail_tax_lines',
1582: 'Incorrect return_status after calling calculate_tax()');
1583: FND_LOG.STRING(g_level_error,
1584: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.overide_detail_tax_lines',
1585: 'RETURN_STATUS = ' || x_return_status);
1580: FND_LOG.STRING(g_level_error,
1581: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.overide_detail_tax_lines',
1582: 'Incorrect return_status after calling calculate_tax()');
1583: FND_LOG.STRING(g_level_error,
1584: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.overide_detail_tax_lines',
1585: 'RETURN_STATUS = ' || x_return_status);
1586: FND_LOG.STRING(g_level_error,
1587: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.overide_detail_tax_lines.END',
1588: 'ZX_TDS_CALC_SERVICES_PUB_PKG.override_detail_tax_lines(-)');
1583: FND_LOG.STRING(g_level_error,
1584: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.overide_detail_tax_lines',
1585: 'RETURN_STATUS = ' || x_return_status);
1586: FND_LOG.STRING(g_level_error,
1587: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.overide_detail_tax_lines.END',
1588: 'ZX_TDS_CALC_SERVICES_PUB_PKG.override_detail_tax_lines(-)');
1589: END IF;
1590: RETURN;
1591: END IF;
1584: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.overide_detail_tax_lines',
1585: 'RETURN_STATUS = ' || x_return_status);
1586: FND_LOG.STRING(g_level_error,
1587: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.overide_detail_tax_lines.END',
1588: 'ZX_TDS_CALC_SERVICES_PUB_PKG.override_detail_tax_lines(-)');
1589: END IF;
1590: RETURN;
1591: END IF;
1592:
1593: ELSE
1594: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR; -- bug 4893261
1595: IF (g_level_statement >= g_current_runtime_level ) THEN
1596: FND_LOG.STRING(g_level_statement,
1597: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.override_detail_tax_lines',
1598: 'Tax Event Type Code: '||
1599: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.tax_event_type_code(
1600: p_trx_line_index) ||' is not correct.');
1601: END IF;
1603:
1604: IF (g_level_procedure >= g_current_runtime_level ) THEN
1605:
1606: FND_LOG.STRING(g_level_procedure,
1607: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.overide_detail_tax_lines.END',
1608: 'ZX_TDS_CALC_SERVICES_PUB_PKG.override_detail_tax_lines(-)'||x_return_status);
1609: END IF;
1610:
1611: EXCEPTION
1604: IF (g_level_procedure >= g_current_runtime_level ) THEN
1605:
1606: FND_LOG.STRING(g_level_procedure,
1607: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.overide_detail_tax_lines.END',
1608: 'ZX_TDS_CALC_SERVICES_PUB_PKG.override_detail_tax_lines(-)'||x_return_status);
1609: END IF;
1610:
1611: EXCEPTION
1612: WHEN OTHERS THEN
1612: WHEN OTHERS THEN
1613: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1614: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1615: FND_LOG.STRING(g_level_unexpected,
1616: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.override_detail_tax_lines',
1617: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
1618: FND_LOG.STRING(g_level_unexpected,
1619: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.override_detail_tax_lines.END',
1620: 'ZX_TDS_CALC_SERVICES_PUB_PKG.override_detail_tax_lines(-)');
1615: FND_LOG.STRING(g_level_unexpected,
1616: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.override_detail_tax_lines',
1617: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
1618: FND_LOG.STRING(g_level_unexpected,
1619: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.override_detail_tax_lines.END',
1620: 'ZX_TDS_CALC_SERVICES_PUB_PKG.override_detail_tax_lines(-)');
1621: END IF;
1622:
1623:
1616: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.override_detail_tax_lines',
1617: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
1618: FND_LOG.STRING(g_level_unexpected,
1619: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.override_detail_tax_lines.END',
1620: 'ZX_TDS_CALC_SERVICES_PUB_PKG.override_detail_tax_lines(-)');
1621: END IF;
1622:
1623:
1624: END override_detail_tax_lines;
1636: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1637:
1638: IF (g_level_procedure >= g_current_runtime_level ) THEN
1639: FND_LOG.STRING(g_level_procedure,
1640: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.override_summary_tax_lines.BEGIN',
1641: 'ZX_TDS_CALC_SERVICES_PUB_PKG.override_summary_tax_lines(+)');
1642: END IF;
1643: x_return_status := FND_API.G_RET_STS_SUCCESS;
1644:
1637:
1638: IF (g_level_procedure >= g_current_runtime_level ) THEN
1639: FND_LOG.STRING(g_level_procedure,
1640: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.override_summary_tax_lines.BEGIN',
1641: 'ZX_TDS_CALC_SERVICES_PUB_PKG.override_summary_tax_lines(+)');
1642: END IF;
1643: x_return_status := FND_API.G_RET_STS_SUCCESS;
1644:
1645: IF ( ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.tax_event_type_code(
1651:
1652: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1653: IF (g_level_error >= g_current_runtime_level ) THEN
1654: FND_LOG.STRING(g_level_error,
1655: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.override_summary_tax_lines',
1656: 'Incorrect return_status after calling calculate_tax()');
1657: FND_LOG.STRING(g_level_error,
1658: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.override_summary_tax_lines',
1659: 'RETURN_STATUS = ' || x_return_status);
1654: FND_LOG.STRING(g_level_error,
1655: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.override_summary_tax_lines',
1656: 'Incorrect return_status after calling calculate_tax()');
1657: FND_LOG.STRING(g_level_error,
1658: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.override_summary_tax_lines',
1659: 'RETURN_STATUS = ' || x_return_status);
1660: FND_LOG.STRING(g_level_error,
1661: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.override_summary_tax_lines.END',
1662: 'ZX_TDS_CALC_SERVICES_PUB_PKG.override_summary_tax_lines(-)');
1657: FND_LOG.STRING(g_level_error,
1658: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.override_summary_tax_lines',
1659: 'RETURN_STATUS = ' || x_return_status);
1660: FND_LOG.STRING(g_level_error,
1661: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.override_summary_tax_lines.END',
1662: 'ZX_TDS_CALC_SERVICES_PUB_PKG.override_summary_tax_lines(-)');
1663: END IF;
1664: RETURN;
1665: END IF;
1658: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.override_summary_tax_lines',
1659: 'RETURN_STATUS = ' || x_return_status);
1660: FND_LOG.STRING(g_level_error,
1661: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.override_summary_tax_lines.END',
1662: 'ZX_TDS_CALC_SERVICES_PUB_PKG.override_summary_tax_lines(-)');
1663: END IF;
1664: RETURN;
1665: END IF;
1666:
1667: ELSE
1668: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR; -- bug 4893261
1669: IF (g_level_statement >= g_current_runtime_level ) THEN
1670: FND_LOG.STRING(g_level_statement,
1671: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.override_summary_tax_lines',
1672: 'Tax Event Type Code: '||
1673: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.tax_event_type_code(
1674: p_trx_line_index) ||' is not correct.');
1675: END IF;
1676: END IF;
1677: IF (g_level_procedure >= g_current_runtime_level ) THEN
1678:
1679: FND_LOG.STRING(g_level_procedure,
1680: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.override_summary_tax_lines.END',
1681: 'ZX_TDS_CALC_SERVICES_PUB_PKG.override_summary_tax_lines(-)'||x_return_status);
1682: END IF;
1683:
1684: EXCEPTION
1677: IF (g_level_procedure >= g_current_runtime_level ) THEN
1678:
1679: FND_LOG.STRING(g_level_procedure,
1680: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.override_summary_tax_lines.END',
1681: 'ZX_TDS_CALC_SERVICES_PUB_PKG.override_summary_tax_lines(-)'||x_return_status);
1682: END IF;
1683:
1684: EXCEPTION
1685: WHEN OTHERS THEN
1685: WHEN OTHERS THEN
1686: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1687: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1688: FND_LOG.STRING(g_level_unexpected,
1689: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.override_summary_tax_lines',
1690: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
1691: FND_LOG.STRING(g_level_unexpected,
1692: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.override_summary_tax_lines.END',
1693: 'ZX_TDS_CALC_SERVICES_PUB_PKG.override_summary_tax_lines(-)');
1688: FND_LOG.STRING(g_level_unexpected,
1689: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.override_summary_tax_lines',
1690: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
1691: FND_LOG.STRING(g_level_unexpected,
1692: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.override_summary_tax_lines.END',
1693: 'ZX_TDS_CALC_SERVICES_PUB_PKG.override_summary_tax_lines(-)');
1694: END IF;
1695:
1696: END override_summary_tax_lines;
1689: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.override_summary_tax_lines',
1690: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
1691: FND_LOG.STRING(g_level_unexpected,
1692: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.override_summary_tax_lines.END',
1693: 'ZX_TDS_CALC_SERVICES_PUB_PKG.override_summary_tax_lines(-)');
1694: END IF;
1695:
1696: END override_summary_tax_lines;
1697:
1710: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1711:
1712: IF (g_level_procedure >= g_current_runtime_level ) THEN
1713: FND_LOG.STRING(g_level_procedure,
1714: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination.BEGIN',
1715: 'ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination(+)');
1716: END IF;
1717:
1718: x_return_status := FND_API.G_RET_STS_SUCCESS;
1711:
1712: IF (g_level_procedure >= g_current_runtime_level ) THEN
1713: FND_LOG.STRING(g_level_procedure,
1714: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination.BEGIN',
1715: 'ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination(+)');
1716: END IF;
1717:
1718: x_return_status := FND_API.G_RET_STS_SUCCESS;
1719:
1716: END IF;
1717:
1718: x_return_status := FND_API.G_RET_STS_SUCCESS;
1719:
1720: IF ZX_TDS_CALC_SERVICES_PUB_PKG.g_ctrl_total_line_tx_amt_flg = 'Y' THEN
1721:
1722: -- Prorate tax across tax lines created for the transactrion line
1723: -- where the control_total_tax_line_amt is not null
1724: --
1729:
1730: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1731: IF (g_level_error >= g_current_runtime_level ) THEN
1732: FND_LOG.STRING(g_level_error,
1733: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1734: 'Incorrect return_status after calling '||
1735: 'ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_line');
1736: FND_LOG.STRING(g_level_error,
1737: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1731: IF (g_level_error >= g_current_runtime_level ) THEN
1732: FND_LOG.STRING(g_level_error,
1733: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1734: 'Incorrect return_status after calling '||
1735: 'ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_line');
1736: FND_LOG.STRING(g_level_error,
1737: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1738: 'RETURN_STATUS = ' || x_return_status);
1739: FND_LOG.STRING(g_level_error,
1733: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1734: 'Incorrect return_status after calling '||
1735: 'ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_line');
1736: FND_LOG.STRING(g_level_error,
1737: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1738: 'RETURN_STATUS = ' || x_return_status);
1739: FND_LOG.STRING(g_level_error,
1740: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination.END',
1741: 'ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination(-)');
1736: FND_LOG.STRING(g_level_error,
1737: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1738: 'RETURN_STATUS = ' || x_return_status);
1739: FND_LOG.STRING(g_level_error,
1740: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination.END',
1741: 'ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination(-)');
1742: END IF;
1743: RETURN;
1744: END IF;
1737: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1738: 'RETURN_STATUS = ' || x_return_status);
1739: FND_LOG.STRING(g_level_error,
1740: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination.END',
1741: 'ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination(-)');
1742: END IF;
1743: RETURN;
1744: END IF;
1745:
1742: END IF;
1743: RETURN;
1744: END IF;
1745:
1746: ELSIF ZX_TDS_CALC_SERVICES_PUB_PKG.g_ctrl_total_hdr_tx_amt_flg = 'Y' THEN
1747: -- If ctrl_total_hdr_tx_amt is not null, process taxes for header level
1748: -- xml invoice
1749: --
1750: -- process xml invoice with header level contrl amount
1756:
1757: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1758: IF (g_level_error >= g_current_runtime_level ) THEN
1759: FND_LOG.STRING(g_level_error,
1760: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1761: 'Incorrect return_status after calling '||
1762: 'ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_hdr');
1763: FND_LOG.STRING(g_level_error,
1764: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1758: IF (g_level_error >= g_current_runtime_level ) THEN
1759: FND_LOG.STRING(g_level_error,
1760: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1761: 'Incorrect return_status after calling '||
1762: 'ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_hdr');
1763: FND_LOG.STRING(g_level_error,
1764: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1765: 'RETURN_STATUS = ' || x_return_status);
1766: FND_LOG.STRING(g_level_error,
1760: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1761: 'Incorrect return_status after calling '||
1762: 'ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_hdr');
1763: FND_LOG.STRING(g_level_error,
1764: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1765: 'RETURN_STATUS = ' || x_return_status);
1766: FND_LOG.STRING(g_level_error,
1767: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination.END',
1768: 'ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination(-)');
1763: FND_LOG.STRING(g_level_error,
1764: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1765: 'RETURN_STATUS = ' || x_return_status);
1766: FND_LOG.STRING(g_level_error,
1767: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination.END',
1768: 'ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination(-)');
1769: END IF;
1770: RETURN;
1771: END IF;
1764: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1765: 'RETURN_STATUS = ' || x_return_status);
1766: FND_LOG.STRING(g_level_error,
1767: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination.END',
1768: 'ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination(-)');
1769: END IF;
1770: RETURN;
1771: END IF;
1772:
1781:
1782: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1783: IF (g_level_error >= g_current_runtime_level ) THEN
1784: FND_LOG.STRING(g_level_error,
1785: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1786: 'Incorrect return_status after calling '||
1787: 'ZX_TDS_TAX_LINES_DETM_PKG.determine_tax_lines()');
1788: FND_LOG.STRING(g_level_error,
1789: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1785: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1786: 'Incorrect return_status after calling '||
1787: 'ZX_TDS_TAX_LINES_DETM_PKG.determine_tax_lines()');
1788: FND_LOG.STRING(g_level_error,
1789: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1790: 'RETURN_STATUS = ' || x_return_status);
1791: FND_LOG.STRING(g_level_error,
1792: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination.END',
1793: 'ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination(-)');
1788: FND_LOG.STRING(g_level_error,
1789: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1790: 'RETURN_STATUS = ' || x_return_status);
1791: FND_LOG.STRING(g_level_error,
1792: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination.END',
1793: 'ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination(-)');
1794: END IF;
1795: RETURN;
1796: END IF;
1789: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1790: 'RETURN_STATUS = ' || x_return_status);
1791: FND_LOG.STRING(g_level_error,
1792: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination.END',
1793: 'ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination(-)');
1794: END IF;
1795: RETURN;
1796: END IF;
1797:
1799: -- different from the control amount
1800: --
1801: -- xml invoice with header level control amount
1802: --
1803: IF ZX_TDS_CALC_SERVICES_PUB_PKG.g_ctrl_total_hdr_tx_amt_flg = 'Y' THEN
1804:
1805: adjust_tax_for_xml_inv_hdr (
1806: -- p_event_class_rec,
1807: x_return_status);
1808:
1809: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1810: IF (g_level_error >= g_current_runtime_level ) THEN
1811: FND_LOG.STRING(g_level_error,
1812: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1813: 'Incorrect return_status after calling '||
1814: 'ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_hdr');
1815: FND_LOG.STRING(g_level_error,
1816: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1810: IF (g_level_error >= g_current_runtime_level ) THEN
1811: FND_LOG.STRING(g_level_error,
1812: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1813: 'Incorrect return_status after calling '||
1814: 'ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_hdr');
1815: FND_LOG.STRING(g_level_error,
1816: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1817: 'RETURN_STATUS = ' || x_return_status);
1818: FND_LOG.STRING(g_level_error,
1812: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1813: 'Incorrect return_status after calling '||
1814: 'ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_hdr');
1815: FND_LOG.STRING(g_level_error,
1816: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1817: 'RETURN_STATUS = ' || x_return_status);
1818: FND_LOG.STRING(g_level_error,
1819: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination.END',
1820: 'ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination(-)');
1815: FND_LOG.STRING(g_level_error,
1816: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1817: 'RETURN_STATUS = ' || x_return_status);
1818: FND_LOG.STRING(g_level_error,
1819: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination.END',
1820: 'ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination(-)');
1821: END IF;
1822: RETURN;
1823: END IF;
1816: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1817: 'RETURN_STATUS = ' || x_return_status);
1818: FND_LOG.STRING(g_level_error,
1819: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination.END',
1820: 'ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination(-)');
1821: END IF;
1822: RETURN;
1823: END IF;
1824:
1821: END IF;
1822: RETURN;
1823: END IF;
1824:
1825: ELSIF ZX_TDS_CALC_SERVICES_PUB_PKG.g_ctrl_total_line_tx_amt_flg = 'Y' THEN
1826:
1827: -- xml invoice with header level control amount
1828: --
1829: -- if p_event_class_rec.ctrl_total_line_tx_amt_flg is 'Y'
1835:
1836: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1837: IF (g_level_error >= g_current_runtime_level ) THEN
1838: FND_LOG.STRING(g_level_error,
1839: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1840: 'Incorrect return_status after calling '||
1841: 'ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_line');
1842: FND_LOG.STRING(g_level_error,
1843: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1837: IF (g_level_error >= g_current_runtime_level ) THEN
1838: FND_LOG.STRING(g_level_error,
1839: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1840: 'Incorrect return_status after calling '||
1841: 'ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_line');
1842: FND_LOG.STRING(g_level_error,
1843: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1844: 'RETURN_STATUS = ' || x_return_status);
1845: FND_LOG.STRING(g_level_error,
1839: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1840: 'Incorrect return_status after calling '||
1841: 'ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_line');
1842: FND_LOG.STRING(g_level_error,
1843: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1844: 'RETURN_STATUS = ' || x_return_status);
1845: FND_LOG.STRING(g_level_error,
1846: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination.END',
1847: 'ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination(-)');
1842: FND_LOG.STRING(g_level_error,
1843: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1844: 'RETURN_STATUS = ' || x_return_status);
1845: FND_LOG.STRING(g_level_error,
1846: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination.END',
1847: 'ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination(-)');
1848: END IF;
1849: RETURN;
1850: END IF;
1843: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1844: 'RETURN_STATUS = ' || x_return_status);
1845: FND_LOG.STRING(g_level_error,
1846: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination.END',
1847: 'ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination(-)');
1848: END IF;
1849: RETURN;
1850: END IF;
1851:
1853:
1854: IF p_event_class_rec.tax_event_type_code = 'OVERRIDE_TAX' AND
1855: p_event_class_rec.override_level = 'SUMMARY_OVERRIDE' THEN
1856:
1857: ZX_TDS_CALC_SERVICES_PUB_PKG.match_tax_amt_to_summary_line (
1858: p_event_class_rec => p_event_class_rec,
1859: x_return_status => x_return_status );
1860:
1861: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1860:
1861: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1862: IF (g_level_error >= g_current_runtime_level ) THEN
1863: FND_LOG.STRING(g_level_error,
1864: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1865: 'Incorrect return_status after calling '||
1866: 'ZX_TDS_CALC_SERVICES_PUB_PKG.match_tax_amt_to_summary_line');
1867: FND_LOG.STRING(g_level_error,
1868: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1862: IF (g_level_error >= g_current_runtime_level ) THEN
1863: FND_LOG.STRING(g_level_error,
1864: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1865: 'Incorrect return_status after calling '||
1866: 'ZX_TDS_CALC_SERVICES_PUB_PKG.match_tax_amt_to_summary_line');
1867: FND_LOG.STRING(g_level_error,
1868: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1869: 'RETURN_STATUS = ' || x_return_status);
1870: FND_LOG.STRING(g_level_error,
1864: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1865: 'Incorrect return_status after calling '||
1866: 'ZX_TDS_CALC_SERVICES_PUB_PKG.match_tax_amt_to_summary_line');
1867: FND_LOG.STRING(g_level_error,
1868: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1869: 'RETURN_STATUS = ' || x_return_status);
1870: FND_LOG.STRING(g_level_error,
1871: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination.END',
1872: 'ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination(-)');
1867: FND_LOG.STRING(g_level_error,
1868: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1869: 'RETURN_STATUS = ' || x_return_status);
1870: FND_LOG.STRING(g_level_error,
1871: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination.END',
1872: 'ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination(-)');
1873: END IF;
1874: RETURN;
1875: END IF;
1868: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1869: 'RETURN_STATUS = ' || x_return_status);
1870: FND_LOG.STRING(g_level_error,
1871: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination.END',
1872: 'ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination(-)');
1873: END IF;
1874: RETURN;
1875: END IF;
1876:
1880: -- Process tolerance check if control total passed
1881: -- bug 5684123
1882: IF (p_event_class_rec.tax_tolerance IS NOT NULL OR
1883: p_event_class_rec.tax_tol_amt_range IS NOT NULL) AND
1884: ((ZX_TDS_CALC_SERVICES_PUB_PKG.g_ctrl_total_hdr_tx_amt_flg = 'Y' OR
1885: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ctrl_total_line_tx_amt_flg = 'Y'
1886: ) OR
1887: (p_event_class_rec.tax_event_type_code = 'UPDATE' AND
1888: ZX_TDS_CALC_SERVICES_PUB_PKG.g_overridden_tax_ln_exist_flg = 'Y'
1881: -- bug 5684123
1882: IF (p_event_class_rec.tax_tolerance IS NOT NULL OR
1883: p_event_class_rec.tax_tol_amt_range IS NOT NULL) AND
1884: ((ZX_TDS_CALC_SERVICES_PUB_PKG.g_ctrl_total_hdr_tx_amt_flg = 'Y' OR
1885: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ctrl_total_line_tx_amt_flg = 'Y'
1886: ) OR
1887: (p_event_class_rec.tax_event_type_code = 'UPDATE' AND
1888: ZX_TDS_CALC_SERVICES_PUB_PKG.g_overridden_tax_ln_exist_flg = 'Y'
1889: )
1884: ((ZX_TDS_CALC_SERVICES_PUB_PKG.g_ctrl_total_hdr_tx_amt_flg = 'Y' OR
1885: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ctrl_total_line_tx_amt_flg = 'Y'
1886: ) OR
1887: (p_event_class_rec.tax_event_type_code = 'UPDATE' AND
1888: ZX_TDS_CALC_SERVICES_PUB_PKG.g_overridden_tax_ln_exist_flg = 'Y'
1889: )
1890: )
1891: THEN
1892:
1897:
1898: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1899: IF (g_level_error >= g_current_runtime_level ) THEN
1900: FND_LOG.STRING(g_level_error,
1901: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1902: 'Incorrect return_status after calling '||
1903: 'ZX_TDS_TAX_LINES_POPU_PKG.process_tax_tolerance');
1904: FND_LOG.STRING(g_level_error,
1905: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1901: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1902: 'Incorrect return_status after calling '||
1903: 'ZX_TDS_TAX_LINES_POPU_PKG.process_tax_tolerance');
1904: FND_LOG.STRING(g_level_error,
1905: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1906: 'RETURN_STATUS = ' || x_return_status);
1907: FND_LOG.STRING(g_level_error,
1908: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination.END
1909: ',
1904: FND_LOG.STRING(g_level_error,
1905: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1906: 'RETURN_STATUS = ' || x_return_status);
1907: FND_LOG.STRING(g_level_error,
1908: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination.END
1909: ',
1910: 'ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination(-)');
1911: END IF;
1912: RETURN;
1906: 'RETURN_STATUS = ' || x_return_status);
1907: FND_LOG.STRING(g_level_error,
1908: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination.END
1909: ',
1910: 'ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination(-)');
1911: END IF;
1912: RETURN;
1913: END IF;
1914:
1919:
1920: IF (g_level_procedure >= g_current_runtime_level ) THEN
1921:
1922: FND_LOG.STRING(g_level_procedure,
1923: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination.END',
1924: 'ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination(-)'||x_return_status);
1925: END IF;
1926:
1927: EXCEPTION
1920: IF (g_level_procedure >= g_current_runtime_level ) THEN
1921:
1922: FND_LOG.STRING(g_level_procedure,
1923: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination.END',
1924: 'ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination(-)'||x_return_status);
1925: END IF;
1926:
1927: EXCEPTION
1928: WHEN OTHERS THEN
1928: WHEN OTHERS THEN
1929: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1930: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1931: FND_LOG.STRING(g_level_unexpected,
1932: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1933: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
1934: FND_LOG.STRING(g_level_unexpected,
1935: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination.END',
1936: 'ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination(-)');
1931: FND_LOG.STRING(g_level_unexpected,
1932: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1933: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
1934: FND_LOG.STRING(g_level_unexpected,
1935: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination.END',
1936: 'ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination(-)');
1937: END IF;
1938:
1939: END tax_line_determination;
1932: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination',
1933: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
1934: FND_LOG.STRING(g_level_unexpected,
1935: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination.END',
1936: 'ZX_TDS_CALC_SERVICES_PUB_PKG.tax_line_determination(-)');
1937: END IF;
1938:
1939: END tax_line_determination;
1940:
1951: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1952:
1953: IF (g_level_procedure >= g_current_runtime_level ) THEN
1954: FND_LOG.STRING(g_level_procedure,
1955: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines.BEGIN',
1956: 'ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines(+)');
1957: END IF;
1958:
1959: x_return_status := FND_API.G_RET_STS_SUCCESS;
1952:
1953: IF (g_level_procedure >= g_current_runtime_level ) THEN
1954: FND_LOG.STRING(g_level_procedure,
1955: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines.BEGIN',
1956: 'ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines(+)');
1957: END IF;
1958:
1959: x_return_status := FND_API.G_RET_STS_SUCCESS;
1960:
1966:
1967: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1968: IF (g_level_statement >= g_current_runtime_level ) THEN
1969: FND_LOG.STRING(g_level_statement,
1970: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines',
1971: 'Incorrect return_status after calling ' ||
1972: 'ZX_TDS_IMPORT_DOCUMENT_PKG.prorate_imported_sum_tax_lines() ' || x_return_status);
1973: FND_LOG.STRING(g_level_statement,
1974: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines.END',
1970: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines',
1971: 'Incorrect return_status after calling ' ||
1972: 'ZX_TDS_IMPORT_DOCUMENT_PKG.prorate_imported_sum_tax_lines() ' || x_return_status);
1973: FND_LOG.STRING(g_level_statement,
1974: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines.END',
1975: 'ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines(-)');
1976: END IF;
1977: RETURN;
1978: END IF;
1971: 'Incorrect return_status after calling ' ||
1972: 'ZX_TDS_IMPORT_DOCUMENT_PKG.prorate_imported_sum_tax_lines() ' || x_return_status);
1973: FND_LOG.STRING(g_level_statement,
1974: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines.END',
1975: 'ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines(-)');
1976: END IF;
1977: RETURN;
1978: END IF;
1979:
1984:
1985: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1986: IF (g_level_error >= g_current_runtime_level ) THEN
1987: FND_LOG.STRING(g_level_error,
1988: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines',
1989: 'Incorrect return_status after calling ' ||
1990: 'dump_detail_tax_lines_into_gt()');
1991: FND_LOG.STRING(g_level_error,
1992: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines',
1988: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines',
1989: 'Incorrect return_status after calling ' ||
1990: 'dump_detail_tax_lines_into_gt()');
1991: FND_LOG.STRING(g_level_error,
1992: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines',
1993: 'RETURN_STATUS = ' || x_return_status);
1994: FND_LOG.STRING(g_level_error,
1995: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines.END',
1996: 'ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines(-)');
1991: FND_LOG.STRING(g_level_error,
1992: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines',
1993: 'RETURN_STATUS = ' || x_return_status);
1994: FND_LOG.STRING(g_level_error,
1995: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines.END',
1996: 'ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines(-)');
1997: END IF;
1998: RETURN;
1999: END IF;
1992: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines',
1993: 'RETURN_STATUS = ' || x_return_status);
1994: FND_LOG.STRING(g_level_error,
1995: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines.END',
1996: 'ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines(-)');
1997: END IF;
1998: RETURN;
1999: END IF;
2000:
2000:
2001: IF (g_level_procedure >= g_current_runtime_level ) THEN
2002:
2003: FND_LOG.STRING(g_level_procedure,
2004: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines.END',
2005: 'ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines(-)'||x_return_status);
2006: END IF;
2007:
2008: EXCEPTION
2001: IF (g_level_procedure >= g_current_runtime_level ) THEN
2002:
2003: FND_LOG.STRING(g_level_procedure,
2004: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines.END',
2005: 'ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines(-)'||x_return_status);
2006: END IF;
2007:
2008: EXCEPTION
2009: WHEN OTHERS THEN
2009: WHEN OTHERS THEN
2010: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2011: IF (g_level_unexpected >= g_current_runtime_level ) THEN
2012: FND_LOG.STRING(g_level_unexpected,
2013: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines',
2014: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2015: FND_LOG.STRING(g_level_unexpected,
2016: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines.END',
2017: 'ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines(-)');
2012: FND_LOG.STRING(g_level_unexpected,
2013: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines',
2014: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2015: FND_LOG.STRING(g_level_unexpected,
2016: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines.END',
2017: 'ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines(-)');
2018: END IF;
2019: END prorate_imported_sum_tax_lines;
2020:
2013: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines',
2014: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2015: FND_LOG.STRING(g_level_unexpected,
2016: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines.END',
2017: 'ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines(-)');
2018: END IF;
2019: END prorate_imported_sum_tax_lines;
2020:
2021: /* ======================================================================*
2034: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2035:
2036: IF (g_level_procedure >= g_current_runtime_level ) THEN
2037: FND_LOG.STRING(g_level_procedure,
2038: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import.BEGIN',
2039: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import(+)');
2040: END IF;
2041:
2042: x_return_status := FND_API.G_RET_STS_SUCCESS;
2035:
2036: IF (g_level_procedure >= g_current_runtime_level ) THEN
2037: FND_LOG.STRING(g_level_procedure,
2038: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import.BEGIN',
2039: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import(+)');
2040: END IF;
2041:
2042: x_return_status := FND_API.G_RET_STS_SUCCESS;
2043:
2048: p_trx_line_index) = 'RECORD_WITH_NO_TAX'
2049: THEN
2050: IF (g_level_statement >= g_current_runtime_level ) THEN
2051: FND_LOG.STRING(g_level_statement,
2052: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import.END',
2053: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import(-)'||' Skip processing for record_with_no_tax');
2054: END IF;
2055: RETURN;
2056: END IF;
2049: THEN
2050: IF (g_level_statement >= g_current_runtime_level ) THEN
2051: FND_LOG.STRING(g_level_statement,
2052: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import.END',
2053: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import(-)'||' Skip processing for record_with_no_tax');
2054: END IF;
2055: RETURN;
2056: END IF;
2057:
2067:
2068: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2069: IF (g_level_error >= g_current_runtime_level ) THEN
2070: FND_LOG.STRING(g_level_error,
2071: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import',
2072: 'Incorrect return_status after calling ' ||
2073: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_date()');
2074: FND_LOG.STRING(g_level_error,
2075: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import',
2071: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import',
2072: 'Incorrect return_status after calling ' ||
2073: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_date()');
2074: FND_LOG.STRING(g_level_error,
2075: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import',
2076: 'RETURN_STATUS = ' || x_return_status);
2077: FND_LOG.STRING(g_level_error,
2078: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import.END',
2079: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import(-)');
2074: FND_LOG.STRING(g_level_error,
2075: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import',
2076: 'RETURN_STATUS = ' || x_return_status);
2077: FND_LOG.STRING(g_level_error,
2078: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import.END',
2079: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import(-)');
2080: END IF;
2081: RETURN;
2082: END IF;
2075: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import',
2076: 'RETURN_STATUS = ' || x_return_status);
2077: FND_LOG.STRING(g_level_error,
2078: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import.END',
2079: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import(-)');
2080: END IF;
2081: RETURN;
2082: END IF;
2083:
2099:
2100: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2101: IF (g_level_error >= g_current_runtime_level ) THEN
2102: FND_LOG.STRING(g_level_error,
2103: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import',
2104: 'Incorrect return_status after calling ' ||
2105: 'ZX_TDS_IMPORT_DOCUMENT_PKG.calculate_tax_for_import()');
2106: FND_LOG.STRING(g_level_error,
2107: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import',
2103: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import',
2104: 'Incorrect return_status after calling ' ||
2105: 'ZX_TDS_IMPORT_DOCUMENT_PKG.calculate_tax_for_import()');
2106: FND_LOG.STRING(g_level_error,
2107: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import',
2108: 'RETURN_STATUS = ' || x_return_status);
2109: FND_LOG.STRING(g_level_error,
2110: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import.END',
2111: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import(-)');
2106: FND_LOG.STRING(g_level_error,
2107: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import',
2108: 'RETURN_STATUS = ' || x_return_status);
2109: FND_LOG.STRING(g_level_error,
2110: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import.END',
2111: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import(-)');
2112: END IF;
2113: RETURN;
2114: END IF;
2107: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import',
2108: 'RETURN_STATUS = ' || x_return_status);
2109: FND_LOG.STRING(g_level_error,
2110: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import.END',
2111: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import(-)');
2112: END IF;
2113: RETURN;
2114: END IF;
2115:
2116: ELSE
2117: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR; -- bug 4893261
2118: IF (g_level_error >= g_current_runtime_level ) THEN
2119: FND_LOG.STRING(g_level_error,
2120: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import.END',
2121: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import(-)'||' tax event type'||
2122: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.tax_event_type_code(
2123: p_trx_line_index));
2124: END IF;
2117: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR; -- bug 4893261
2118: IF (g_level_error >= g_current_runtime_level ) THEN
2119: FND_LOG.STRING(g_level_error,
2120: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import.END',
2121: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import(-)'||' tax event type'||
2122: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.tax_event_type_code(
2123: p_trx_line_index));
2124: END IF;
2125: RETURN;
2127:
2128: IF (g_level_procedure >= g_current_runtime_level ) THEN
2129:
2130: FND_LOG.STRING(g_level_procedure,
2131: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import.END',
2132: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import(-)'||x_return_status);
2133: END IF;
2134:
2135: EXCEPTION
2128: IF (g_level_procedure >= g_current_runtime_level ) THEN
2129:
2130: FND_LOG.STRING(g_level_procedure,
2131: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import.END',
2132: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import(-)'||x_return_status);
2133: END IF;
2134:
2135: EXCEPTION
2136: WHEN OTHERS THEN
2136: WHEN OTHERS THEN
2137: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2138: IF (g_level_unexpected >= g_current_runtime_level ) THEN
2139: FND_LOG.STRING(g_level_unexpected,
2140: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import',
2141: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2142: FND_LOG.STRING(g_level_unexpected,
2143: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import.END',
2144: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import(-)');
2139: FND_LOG.STRING(g_level_unexpected,
2140: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import',
2141: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2142: FND_LOG.STRING(g_level_unexpected,
2143: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import.END',
2144: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import(-)');
2145: END IF;
2146:
2147: END calculate_tax_for_import;
2140: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import',
2141: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2142: FND_LOG.STRING(g_level_unexpected,
2143: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import.END',
2144: 'ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import(-)');
2145: END IF;
2146:
2147: END calculate_tax_for_import;
2148:
2161: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2162:
2163: IF (g_level_procedure >= g_current_runtime_level ) THEN
2164: FND_LOG.STRING(g_level_procedure,
2165: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate.BEGIN',
2166: 'ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate(+)');
2167: END IF;
2168: x_return_status := FND_API.G_RET_STS_SUCCESS;
2169:
2162:
2163: IF (g_level_procedure >= g_current_runtime_level ) THEN
2164: FND_LOG.STRING(g_level_procedure,
2165: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate.BEGIN',
2166: 'ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate(+)');
2167: END IF;
2168: x_return_status := FND_API.G_RET_STS_SUCCESS;
2169:
2170: -- assign p_currency_conversion_rate to a local variable for a IN OUT
2184:
2185: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2186: IF (g_level_error >= g_current_runtime_level ) THEN
2187: FND_LOG.STRING(g_level_error,
2188: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate',
2189: 'Incorrect return_status after calling ' ||
2190: 'ZX_TDS_TAX_ROUNDING_PKG.convert_and_round_curr()');
2191: FND_LOG.STRING(g_level_error,
2192: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate',
2188: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate',
2189: 'Incorrect return_status after calling ' ||
2190: 'ZX_TDS_TAX_ROUNDING_PKG.convert_and_round_curr()');
2191: FND_LOG.STRING(g_level_error,
2192: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate',
2193: 'RETURN_STATUS = ' || x_return_status);
2194: FND_LOG.STRING(g_level_error,
2195: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate.END',
2196: 'ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate(-)');
2191: FND_LOG.STRING(g_level_error,
2192: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate',
2193: 'RETURN_STATUS = ' || x_return_status);
2194: FND_LOG.STRING(g_level_error,
2195: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate.END',
2196: 'ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate(-)');
2197: END IF;
2198: RETURN;
2199: END IF;
2192: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate',
2193: 'RETURN_STATUS = ' || x_return_status);
2194: FND_LOG.STRING(g_level_error,
2195: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate.END',
2196: 'ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate(-)');
2197: END IF;
2198: RETURN;
2199: END IF;
2200:
2216:
2217: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2218: IF (g_level_error >= g_current_runtime_level ) THEN
2219: FND_LOG.STRING(g_level_error,
2220: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate',
2221: 'Incorrect return_status after calling ' ||
2222: 'ZX_TRD_INTERNAL_SERVICES_PVT.update_exchange_rate()');
2223: FND_LOG.STRING(g_level_error,
2224: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate',
2220: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate',
2221: 'Incorrect return_status after calling ' ||
2222: 'ZX_TRD_INTERNAL_SERVICES_PVT.update_exchange_rate()');
2223: FND_LOG.STRING(g_level_error,
2224: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate',
2225: 'RETURN_STATUS = ' || x_return_status);
2226: FND_LOG.STRING(g_level_error,
2227: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate.END',
2228: 'ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate(-)');
2223: FND_LOG.STRING(g_level_error,
2224: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate',
2225: 'RETURN_STATUS = ' || x_return_status);
2226: FND_LOG.STRING(g_level_error,
2227: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate.END',
2228: 'ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate(-)');
2229: END IF;
2230: RETURN;
2231: END IF;
2224: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate',
2225: 'RETURN_STATUS = ' || x_return_status);
2226: FND_LOG.STRING(g_level_error,
2227: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate.END',
2228: 'ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate(-)');
2229: END IF;
2230: RETURN;
2231: END IF;
2232: END IF; -- p_event_class_rec.tax_recovery_flag = 'Y'
2240:
2241: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2242: IF (g_level_error >= g_current_runtime_level ) THEN
2243: FND_LOG.STRING(g_level_error,
2244: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate',
2245: 'Incorrect return_status after calling ' ||
2246: 'ZX_TRL_PUB_PKG.update_exchange_rate()');
2247: FND_LOG.STRING(g_level_error,
2248: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate',
2244: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate',
2245: 'Incorrect return_status after calling ' ||
2246: 'ZX_TRL_PUB_PKG.update_exchange_rate()');
2247: FND_LOG.STRING(g_level_error,
2248: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate',
2249: 'RETURN_STATUS = ' || x_return_status);
2250: FND_LOG.STRING(g_level_error,
2251: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate.END',
2252: 'ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate(-)');
2247: FND_LOG.STRING(g_level_error,
2248: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate',
2249: 'RETURN_STATUS = ' || x_return_status);
2250: FND_LOG.STRING(g_level_error,
2251: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate.END',
2252: 'ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate(-)');
2253: END IF;
2254: RETURN;
2255: END IF;
2248: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate',
2249: 'RETURN_STATUS = ' || x_return_status);
2250: FND_LOG.STRING(g_level_error,
2251: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate.END',
2252: 'ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate(-)');
2253: END IF;
2254: RETURN;
2255: END IF;
2256:
2256:
2257: IF (g_level_procedure >= g_current_runtime_level ) THEN
2258:
2259: FND_LOG.STRING(g_level_procedure,
2260: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate.END',
2261: 'ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate(-)'||x_return_status);
2262: END IF;
2263:
2264: EXCEPTION
2257: IF (g_level_procedure >= g_current_runtime_level ) THEN
2258:
2259: FND_LOG.STRING(g_level_procedure,
2260: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate.END',
2261: 'ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate(-)'||x_return_status);
2262: END IF;
2263:
2264: EXCEPTION
2265: WHEN OTHERS THEN
2265: WHEN OTHERS THEN
2266: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2267: IF (g_level_unexpected >= g_current_runtime_level ) THEN
2268: FND_LOG.STRING(g_level_unexpected,
2269: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate',
2270: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2271: FND_LOG.STRING(g_level_unexpected,
2272: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate.END',
2273: 'ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate(-)');
2268: FND_LOG.STRING(g_level_unexpected,
2269: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate',
2270: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2271: FND_LOG.STRING(g_level_unexpected,
2272: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate.END',
2273: 'ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate(-)');
2274: END IF;
2275:
2276: END update_exchange_rate;
2269: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate',
2270: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2271: FND_LOG.STRING(g_level_unexpected,
2272: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate.END',
2273: 'ZX_TDS_CALC_SERVICES_PUB_PKG.update_exchange_rate(-)');
2274: END IF;
2275:
2276: END update_exchange_rate;
2277:
2288: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2289:
2290: IF (g_level_procedure >= g_current_runtime_level ) THEN
2291: FND_LOG.STRING(g_level_procedure,
2292: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.validate_document_for_tax.BEGIN',
2293: 'ZX_TDS_CALC_SERVICES_PUB_PKG.validate_document_for_tax(+)');
2294: END IF;
2295:
2296: begin_index := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.trx_id.FIRST;
2289:
2290: IF (g_level_procedure >= g_current_runtime_level ) THEN
2291: FND_LOG.STRING(g_level_procedure,
2292: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.validate_document_for_tax.BEGIN',
2293: 'ZX_TDS_CALC_SERVICES_PUB_PKG.validate_document_for_tax(+)');
2294: END IF;
2295:
2296: begin_index := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.trx_id.FIRST;
2297:
2301: ELSE
2302: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR; -- bug 4893261
2303: IF (g_level_statement >= g_current_runtime_level ) THEN
2304: FND_LOG.STRING(g_level_statement,
2305: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.validate_document_for_tax',
2306: 'Tax Event Type Code: '||
2307: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.tax_event_type_code(
2308: begin_index) ||' is not correct.');
2309: END IF;
2310: END IF;
2311:
2312: IF (g_level_procedure >= g_current_runtime_level ) THEN
2313: FND_LOG.STRING(g_level_procedure,
2314: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.validate_document_for_tax',
2315: 'RETURN_STATUS = ' || x_return_status);
2316: FND_LOG.STRING(g_level_procedure,
2317: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.validate_document_for_tax.END',
2318: 'ZX_TDS_CALC_SERVICES_PUB_PKG.validate_document_for_tax(-)');
2313: FND_LOG.STRING(g_level_procedure,
2314: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.validate_document_for_tax',
2315: 'RETURN_STATUS = ' || x_return_status);
2316: FND_LOG.STRING(g_level_procedure,
2317: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.validate_document_for_tax.END',
2318: 'ZX_TDS_CALC_SERVICES_PUB_PKG.validate_document_for_tax(-)');
2319: END IF;
2320:
2321: EXCEPTION
2314: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.validate_document_for_tax',
2315: 'RETURN_STATUS = ' || x_return_status);
2316: FND_LOG.STRING(g_level_procedure,
2317: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.validate_document_for_tax.END',
2318: 'ZX_TDS_CALC_SERVICES_PUB_PKG.validate_document_for_tax(-)');
2319: END IF;
2320:
2321: EXCEPTION
2322: WHEN OTHERS THEN
2322: WHEN OTHERS THEN
2323: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2324: IF (g_level_unexpected >= g_current_runtime_level ) THEN
2325: FND_LOG.STRING(g_level_unexpected,
2326: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.validate_document_for_tax',
2327: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2328: FND_LOG.STRING(g_level_unexpected,
2329: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.validate_document_for_tax.END',
2330: 'ZX_TDS_CALC_SERVICES_PUB_PKG.validate_document_for_tax(-)');
2325: FND_LOG.STRING(g_level_unexpected,
2326: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.validate_document_for_tax',
2327: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2328: FND_LOG.STRING(g_level_unexpected,
2329: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.validate_document_for_tax.END',
2330: 'ZX_TDS_CALC_SERVICES_PUB_PKG.validate_document_for_tax(-)');
2331: END IF;
2332:
2333: END validate_document_for_tax;
2326: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.validate_document_for_tax',
2327: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2328: FND_LOG.STRING(g_level_unexpected,
2329: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.validate_document_for_tax.END',
2330: 'ZX_TDS_CALC_SERVICES_PUB_PKG.validate_document_for_tax(-)');
2331: END IF;
2332:
2333: END validate_document_for_tax;
2334:
2343: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2344:
2345: IF (g_level_procedure >= g_current_runtime_level ) THEN
2346: FND_LOG.STRING(g_level_procedure,
2347: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.reverse_document.BEGIN',
2348: 'ZX_TDS_CALC_SERVICES_PUB_PKG.reverse_document(+)');
2349: END IF;
2350:
2351: x_return_status := FND_API.G_RET_STS_SUCCESS;
2344:
2345: IF (g_level_procedure >= g_current_runtime_level ) THEN
2346: FND_LOG.STRING(g_level_procedure,
2347: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.reverse_document.BEGIN',
2348: 'ZX_TDS_CALC_SERVICES_PUB_PKG.reverse_document(+)');
2349: END IF;
2350:
2351: x_return_status := FND_API.G_RET_STS_SUCCESS;
2352:
2352:
2353: --
2354: -- init msg record to be passed back to TSRM
2355: --
2356: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.application_id :=
2357: p_event_class_rec.application_id;
2358: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.entity_code :=
2359: p_event_class_rec.entity_code;
2360: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.event_class_code :=
2354: -- init msg record to be passed back to TSRM
2355: --
2356: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.application_id :=
2357: p_event_class_rec.application_id;
2358: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.entity_code :=
2359: p_event_class_rec.entity_code;
2360: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.event_class_code :=
2361: p_event_class_rec.event_class_code;
2362: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_id :=
2356: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.application_id :=
2357: p_event_class_rec.application_id;
2358: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.entity_code :=
2359: p_event_class_rec.entity_code;
2360: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.event_class_code :=
2361: p_event_class_rec.event_class_code;
2362: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_id :=
2363: p_event_class_rec.trx_id;
2364: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_line_id := NULL;
2358: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.entity_code :=
2359: p_event_class_rec.entity_code;
2360: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.event_class_code :=
2361: p_event_class_rec.event_class_code;
2362: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_id :=
2363: p_event_class_rec.trx_id;
2364: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_line_id := NULL;
2365: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_level_type := NULL;
2366: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.summary_tax_line_number :=
2360: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.event_class_code :=
2361: p_event_class_rec.event_class_code;
2362: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_id :=
2363: p_event_class_rec.trx_id;
2364: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_line_id := NULL;
2365: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_level_type := NULL;
2366: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.summary_tax_line_number :=
2367: NULL;
2368: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.tax_line_id := NULL;
2361: p_event_class_rec.event_class_code;
2362: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_id :=
2363: p_event_class_rec.trx_id;
2364: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_line_id := NULL;
2365: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_level_type := NULL;
2366: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.summary_tax_line_number :=
2367: NULL;
2368: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.tax_line_id := NULL;
2369: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_line_dist_id := NULL;
2362: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_id :=
2363: p_event_class_rec.trx_id;
2364: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_line_id := NULL;
2365: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_level_type := NULL;
2366: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.summary_tax_line_number :=
2367: NULL;
2368: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.tax_line_id := NULL;
2369: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_line_dist_id := NULL;
2370:
2364: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_line_id := NULL;
2365: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_level_type := NULL;
2366: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.summary_tax_line_number :=
2367: NULL;
2368: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.tax_line_id := NULL;
2369: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_line_dist_id := NULL;
2370:
2371: -- call procedure reverse_document in ZX_TDS_REVERSE_DOCUMENT_PKG
2372: --
2365: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_level_type := NULL;
2366: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.summary_tax_line_number :=
2367: NULL;
2368: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.tax_line_id := NULL;
2369: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_line_dist_id := NULL;
2370:
2371: -- call procedure reverse_document in ZX_TDS_REVERSE_DOCUMENT_PKG
2372: --
2373: ZX_TDS_REVERSE_DOCUMENT_PKG.reverse_document ( p_event_class_rec,
2375:
2376: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2377: IF (g_level_statement >= g_current_runtime_level ) THEN
2378: FND_LOG.STRING(g_level_statement,
2379: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.reverse_document',
2380: 'Incorrect return_status after calling ' ||
2381: 'ZX_TDS_REVERSE_DOCUMENT_PKG.reverse_document() ' || x_return_status);
2382: FND_LOG.STRING(g_level_statement,
2383: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.reverse_document.END',
2379: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.reverse_document',
2380: 'Incorrect return_status after calling ' ||
2381: 'ZX_TDS_REVERSE_DOCUMENT_PKG.reverse_document() ' || x_return_status);
2382: FND_LOG.STRING(g_level_statement,
2383: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.reverse_document.END',
2384: 'ZX_TDS_CALC_SERVICES_PUB_PKG.reverse_document(-)');
2385: END IF;
2386: RETURN;
2387: END IF;
2380: 'Incorrect return_status after calling ' ||
2381: 'ZX_TDS_REVERSE_DOCUMENT_PKG.reverse_document() ' || x_return_status);
2382: FND_LOG.STRING(g_level_statement,
2383: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.reverse_document.END',
2384: 'ZX_TDS_CALC_SERVICES_PUB_PKG.reverse_document(-)');
2385: END IF;
2386: RETURN;
2387: END IF;
2388:
2388:
2389: IF (g_level_procedure >= g_current_runtime_level ) THEN
2390:
2391: FND_LOG.STRING(g_level_procedure,
2392: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.reverse_document.END',
2393: 'ZX_TDS_CALC_SERVICES_PUB_PKG.reverse_document(-)'||x_return_status);
2394: END IF;
2395:
2396: EXCEPTION
2389: IF (g_level_procedure >= g_current_runtime_level ) THEN
2390:
2391: FND_LOG.STRING(g_level_procedure,
2392: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.reverse_document.END',
2393: 'ZX_TDS_CALC_SERVICES_PUB_PKG.reverse_document(-)'||x_return_status);
2394: END IF;
2395:
2396: EXCEPTION
2397: WHEN OTHERS THEN
2398: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2399:
2400: IF (g_level_unexpected >= g_current_runtime_level ) THEN
2401: FND_LOG.STRING(g_level_unexpected,
2402: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.reverse_document',
2403: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2404: FND_LOG.STRING(g_level_unexpected,
2405: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.reverse_document.END',
2406: 'ZX_TDS_CALC_SERVICES_PUB_PKG.reverse_document(-)');
2401: FND_LOG.STRING(g_level_unexpected,
2402: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.reverse_document',
2403: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2404: FND_LOG.STRING(g_level_unexpected,
2405: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.reverse_document.END',
2406: 'ZX_TDS_CALC_SERVICES_PUB_PKG.reverse_document(-)');
2407: END IF;
2408:
2409: END reverse_document;
2402: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.reverse_document',
2403: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2404: FND_LOG.STRING(g_level_unexpected,
2405: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.reverse_document.END',
2406: 'ZX_TDS_CALC_SERVICES_PUB_PKG.reverse_document(-)');
2407: END IF;
2408:
2409: END reverse_document;
2410:
2410:
2411: /* ======================================================================*
2412: | Procedure set_detail_tax_line_def_val is called to check the |
2413: | default values in the global structure |
2414: | ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl |
2415: | Bug fix 3423300 |
2416: * =====================================================================*/
2417:
2418: PROCEDURE set_detail_tax_line_def_val (
2423: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2424:
2425: IF (g_level_procedure >= g_current_runtime_level ) THEN
2426: FND_LOG.STRING(g_level_procedure,
2427: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.set_detail_tax_line_def_val.BEGIN',
2428: 'ZX_TDS_CALC_SERVICES_PUB_PKG.set_detail_tax_line_def_val(+)');
2429: END IF;
2430: x_return_status := FND_API.G_RET_STS_SUCCESS;
2431:
2424:
2425: IF (g_level_procedure >= g_current_runtime_level ) THEN
2426: FND_LOG.STRING(g_level_procedure,
2427: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.set_detail_tax_line_def_val.BEGIN',
2428: 'ZX_TDS_CALC_SERVICES_PUB_PKG.set_detail_tax_line_def_val(+)');
2429: END IF;
2430: x_return_status := FND_API.G_RET_STS_SUCCESS;
2431:
2432: p_detail_tax_lines_rec.tax_amt_included_flag := NVL( p_detail_tax_lines_rec.tax_amt_included_flag, 'N' );
2472: --
2473: -- override the rounding rule from registration party type or tax
2474: -- with the rounding rule from TSRM rounding party hierarchy
2475: --
2476: --IF ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_rule IS NOT NULL THEN
2477: -- p_detail_tax_lines_rec.rounding_rule_code := ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_rule;
2478: --END IF;
2479:
2480: IF (g_level_procedure >= g_current_runtime_level ) THEN
2473: -- override the rounding rule from registration party type or tax
2474: -- with the rounding rule from TSRM rounding party hierarchy
2475: --
2476: --IF ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_rule IS NOT NULL THEN
2477: -- p_detail_tax_lines_rec.rounding_rule_code := ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_rule;
2478: --END IF;
2479:
2480: IF (g_level_procedure >= g_current_runtime_level ) THEN
2481: FND_LOG.STRING(g_level_procedure,
2478: --END IF;
2479:
2480: IF (g_level_procedure >= g_current_runtime_level ) THEN
2481: FND_LOG.STRING(g_level_procedure,
2482: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.set_detail_tax_line_def_val.END',
2483: 'ZX_TDS_CALC_SERVICES_PUB_PKG.set_detail_tax_line_def_val(-)');
2484: END IF;
2485:
2486: END set_detail_tax_line_def_val;
2479:
2480: IF (g_level_procedure >= g_current_runtime_level ) THEN
2481: FND_LOG.STRING(g_level_procedure,
2482: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.set_detail_tax_line_def_val.END',
2483: 'ZX_TDS_CALC_SERVICES_PUB_PKG.set_detail_tax_line_def_val(-)');
2484: END IF;
2485:
2486: END set_detail_tax_line_def_val;
2487:
2500: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2501:
2502: IF (g_level_procedure >= g_current_runtime_level ) THEN
2503: FND_LOG.STRING(g_level_procedure,
2504: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt.BEGIN',
2505: 'ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt(+)');
2506: END IF;
2507: x_return_status := FND_API.G_RET_STS_SUCCESS;
2508:
2501:
2502: IF (g_level_procedure >= g_current_runtime_level ) THEN
2503: FND_LOG.STRING(g_level_procedure,
2504: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt.BEGIN',
2505: 'ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt(+)');
2506: END IF;
2507: x_return_status := FND_API.G_RET_STS_SUCCESS;
2508:
2509: IF (p_detail_tax_lines_tbl.COUNT = 0) THEN
2508:
2509: IF (p_detail_tax_lines_tbl.COUNT = 0) THEN
2510: IF (g_level_statement >= g_current_runtime_level ) THEN
2511: FND_LOG.STRING(g_level_statement,
2512: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt',
2513: 'p_detail_tax_lines_tbl is empty. ');
2514: END IF;
2515:
2516: ELSE
2541:
2542: IF (g_level_procedure >= g_current_runtime_level ) THEN
2543:
2544: FND_LOG.STRING(g_level_procedure,
2545: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt.END',
2546: 'ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt(-)'||x_return_status);
2547: END IF;
2548:
2549: EXCEPTION
2542: IF (g_level_procedure >= g_current_runtime_level ) THEN
2543:
2544: FND_LOG.STRING(g_level_procedure,
2545: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt.END',
2546: 'ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt(-)'||x_return_status);
2547: END IF;
2548:
2549: EXCEPTION
2550: WHEN OTHERS THEN
2550: WHEN OTHERS THEN
2551: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2552: IF (g_level_unexpected >= g_current_runtime_level ) THEN
2553: FND_LOG.STRING(g_level_unexpected,
2554: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt',
2555: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2556: FND_LOG.STRING(g_level_unexpected,
2557: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt.END',
2558: 'ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt(-)');
2553: FND_LOG.STRING(g_level_unexpected,
2554: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt',
2555: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2556: FND_LOG.STRING(g_level_unexpected,
2557: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt.END',
2558: 'ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt(-)');
2559: END IF;
2560:
2561: END dump_detail_tax_lines_into_gt;
2554: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt',
2555: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2556: FND_LOG.STRING(g_level_unexpected,
2557: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt.END',
2558: 'ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt(-)');
2559: END IF;
2560:
2561: END dump_detail_tax_lines_into_gt;
2562:
2572: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2573:
2574: IF (g_level_procedure >= g_current_runtime_level ) THEN
2575: FND_LOG.STRING(g_level_procedure,
2576: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt.BEGIN',
2577: 'ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt(+)');
2578: END IF;
2579:
2580: x_return_status := FND_API.G_RET_STS_SUCCESS;
2573:
2574: IF (g_level_procedure >= g_current_runtime_level ) THEN
2575: FND_LOG.STRING(g_level_procedure,
2576: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt.BEGIN',
2577: 'ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt(+)');
2578: END IF;
2579:
2580: x_return_status := FND_API.G_RET_STS_SUCCESS;
2581:
2582: /*
2583: * move to dump_detail_tax_lines_into_gt with 2 parameters
2584: *
2585: * FOR l_index IN
2586: * NVL(ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl.FIRST, 1) ..
2587: * NVL(ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl.LAST, 0)
2588: * LOOP
2589: * set_detail_tax_line_def_val (
2590: * ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(l_index),
2583: * move to dump_detail_tax_lines_into_gt with 2 parameters
2584: *
2585: * FOR l_index IN
2586: * NVL(ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl.FIRST, 1) ..
2587: * NVL(ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl.LAST, 0)
2588: * LOOP
2589: * set_detail_tax_line_def_val (
2590: * ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(l_index),
2591: * x_return_status );
2586: * NVL(ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl.FIRST, 1) ..
2587: * NVL(ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl.LAST, 0)
2588: * LOOP
2589: * set_detail_tax_line_def_val (
2590: * ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(l_index),
2591: * x_return_status );
2592: * END LOOP;
2593: */
2594:
2592: * END LOOP;
2593: */
2594:
2595: dump_detail_tax_lines_into_gt(
2596: ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl,
2597: x_return_status );
2598:
2599: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2600: IF (g_level_error >= g_current_runtime_level ) THEN
2598:
2599: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2600: IF (g_level_error >= g_current_runtime_level ) THEN
2601: FND_LOG.STRING(g_level_error,
2602: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt',
2603: 'Incorrect return_status after calling '||
2604: 'ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt');
2605: FND_LOG.STRING(g_level_error,
2606: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt',
2600: IF (g_level_error >= g_current_runtime_level ) THEN
2601: FND_LOG.STRING(g_level_error,
2602: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt',
2603: 'Incorrect return_status after calling '||
2604: 'ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt');
2605: FND_LOG.STRING(g_level_error,
2606: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt',
2607: 'RETURN_STATUS = ' || x_return_status);
2608: FND_LOG.STRING(g_level_error,
2602: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt',
2603: 'Incorrect return_status after calling '||
2604: 'ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt');
2605: FND_LOG.STRING(g_level_error,
2606: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt',
2607: 'RETURN_STATUS = ' || x_return_status);
2608: FND_LOG.STRING(g_level_error,
2609: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt.END',
2610: 'ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt(-)');
2605: FND_LOG.STRING(g_level_error,
2606: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt',
2607: 'RETURN_STATUS = ' || x_return_status);
2608: FND_LOG.STRING(g_level_error,
2609: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt.END',
2610: 'ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt(-)');
2611: END IF;
2612: RETURN;
2613: END IF;
2606: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt',
2607: 'RETURN_STATUS = ' || x_return_status);
2608: FND_LOG.STRING(g_level_error,
2609: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt.END',
2610: 'ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt(-)');
2611: END IF;
2612: RETURN;
2613: END IF;
2614:
2612: RETURN;
2613: END IF;
2614:
2615: -- Flush g_detail_tax_lines_tbl
2616: ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl.DELETE;
2617:
2618: IF (g_level_procedure >= g_current_runtime_level ) THEN
2619:
2620: FND_LOG.STRING(g_level_procedure,
2617:
2618: IF (g_level_procedure >= g_current_runtime_level ) THEN
2619:
2620: FND_LOG.STRING(g_level_procedure,
2621: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt.END',
2622: 'ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt(-)'||x_return_status);
2623: END IF;
2624:
2625: EXCEPTION
2618: IF (g_level_procedure >= g_current_runtime_level ) THEN
2619:
2620: FND_LOG.STRING(g_level_procedure,
2621: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt.END',
2622: 'ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt(-)'||x_return_status);
2623: END IF;
2624:
2625: EXCEPTION
2626: WHEN OTHERS THEN
2626: WHEN OTHERS THEN
2627: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2628: IF (g_level_unexpected >= g_current_runtime_level ) THEN
2629: FND_LOG.STRING(g_level_unexpected,
2630: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt',
2631: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2632: FND_LOG.STRING(g_level_unexpected,
2633: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt.END',
2634: 'ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt(-)');
2629: FND_LOG.STRING(g_level_unexpected,
2630: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt',
2631: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2632: FND_LOG.STRING(g_level_unexpected,
2633: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt.END',
2634: 'ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt(-)');
2635: END IF;
2636:
2637: END dump_detail_tax_lines_into_gt;
2630: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt',
2631: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2632: FND_LOG.STRING(g_level_unexpected,
2633: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt.END',
2634: 'ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt(-)');
2635: END IF;
2636:
2637: END dump_detail_tax_lines_into_gt;
2638:
2645: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2646:
2647: IF (g_level_procedure >= g_current_runtime_level ) THEN
2648: FND_LOG.STRING(g_level_procedure,
2649: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize.BEGIN',
2650: 'ZX_TDS_CALC_SERVICES_PUB_PKG.initialize(+)');
2651: END IF;
2652: g_detail_tax_lines_tbl.DELETE;
2653:
2646:
2647: IF (g_level_procedure >= g_current_runtime_level ) THEN
2648: FND_LOG.STRING(g_level_procedure,
2649: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize.BEGIN',
2650: 'ZX_TDS_CALC_SERVICES_PUB_PKG.initialize(+)');
2651: END IF;
2652: g_detail_tax_lines_tbl.DELETE;
2653:
2654: -- g_trx_lines_counter :=0;
2666: -- g_trx_alphanum_value_tbl.DELETE;
2667:
2668: IF (g_level_procedure >= g_current_runtime_level ) THEN
2669: FND_LOG.STRING(g_level_procedure,
2670: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize.END',
2671: 'ZX_TDS_CALC_SERVICES_PUB_PKG.initialize(-)');
2672: END IF;
2673:
2674: EXCEPTION
2667:
2668: IF (g_level_procedure >= g_current_runtime_level ) THEN
2669: FND_LOG.STRING(g_level_procedure,
2670: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize.END',
2671: 'ZX_TDS_CALC_SERVICES_PUB_PKG.initialize(-)');
2672: END IF;
2673:
2674: EXCEPTION
2675: WHEN OTHERS THEN
2674: EXCEPTION
2675: WHEN OTHERS THEN
2676: IF (g_level_unexpected >= g_current_runtime_level ) THEN
2677: FND_LOG.STRING(g_level_unexpected,
2678: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
2679: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2680: FND_LOG.STRING(g_level_unexpected,
2681: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize.END',
2682: 'ZX_TDS_CALC_SERVICES_PUB_PKG.initialize(-)');
2677: FND_LOG.STRING(g_level_unexpected,
2678: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
2679: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2680: FND_LOG.STRING(g_level_unexpected,
2681: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize.END',
2682: 'ZX_TDS_CALC_SERVICES_PUB_PKG.initialize(-)');
2683: END IF;
2684:
2685: RAISE;
2678: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
2679: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2680: FND_LOG.STRING(g_level_unexpected,
2681: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize.END',
2682: 'ZX_TDS_CALC_SERVICES_PUB_PKG.initialize(-)');
2683: END IF;
2684:
2685: RAISE;
2686:
2709: BEGIN
2710:
2711: IF (g_level_procedure>= g_current_runtime_level ) THEN
2712: FND_LOG.STRING(g_level_procedure,
2713: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.fetch_detail_tax_lines.BEGIN',
2714: 'ZX_TDS_CALC_SERVICES_PUB_PKG.fetch_detail_tax_lines(+)');
2715: END IF;
2716: x_return_status := FND_API.G_RET_STS_SUCCESS;
2717: l_last_row := 1;
2710:
2711: IF (g_level_procedure>= g_current_runtime_level ) THEN
2712: FND_LOG.STRING(g_level_procedure,
2713: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.fetch_detail_tax_lines.BEGIN',
2714: 'ZX_TDS_CALC_SERVICES_PUB_PKG.fetch_detail_tax_lines(+)');
2715: END IF;
2716: x_return_status := FND_API.G_RET_STS_SUCCESS;
2717: l_last_row := 1;
2718:
2727:
2728: IF (g_level_procedure >= g_current_runtime_level ) THEN
2729:
2730: FND_LOG.STRING(g_level_procedure,
2731: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.fetch_detail_tax_lines.END',
2732: 'ZX_TDS_CALC_SERVICES_PUB_PKG.fetch_detail_tax_lines(-)'||x_return_status);
2733: END IF;
2734:
2735: EXCEPTION
2728: IF (g_level_procedure >= g_current_runtime_level ) THEN
2729:
2730: FND_LOG.STRING(g_level_procedure,
2731: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.fetch_detail_tax_lines.END',
2732: 'ZX_TDS_CALC_SERVICES_PUB_PKG.fetch_detail_tax_lines(-)'||x_return_status);
2733: END IF;
2734:
2735: EXCEPTION
2736: WHEN OTHERS THEN
2736: WHEN OTHERS THEN
2737: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2738: IF (g_level_unexpected >= g_current_runtime_level ) THEN
2739: FND_LOG.STRING(g_level_unexpected,
2740: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.fetch_detail_tax_lines',
2741: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2742: FND_LOG.STRING(g_level_unexpected,
2743: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.fetch_detail_tax_lines.END',
2744: 'ZX_TDS_CALC_SERVICES_PUB_PKG.fetch_detail_tax_lines(-)');
2739: FND_LOG.STRING(g_level_unexpected,
2740: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.fetch_detail_tax_lines',
2741: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2742: FND_LOG.STRING(g_level_unexpected,
2743: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.fetch_detail_tax_lines.END',
2744: 'ZX_TDS_CALC_SERVICES_PUB_PKG.fetch_detail_tax_lines(-)');
2745: END IF;
2746:
2747: END fetch_detail_tax_lines;
2740: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.fetch_detail_tax_lines',
2741: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2742: FND_LOG.STRING(g_level_unexpected,
2743: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.fetch_detail_tax_lines.END',
2744: 'ZX_TDS_CALC_SERVICES_PUB_PKG.fetch_detail_tax_lines(-)');
2745: END IF;
2746:
2747: END fetch_detail_tax_lines;
2748:
2824: BEGIN
2825:
2826: IF (g_level_procedure >= g_current_runtime_level ) THEN
2827: FND_LOG.STRING(g_level_procedure,
2828: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_line.BEGIN',
2829: 'ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_line(+)');
2830: END IF;
2831:
2832: x_return_status := FND_API.G_RET_STS_SUCCESS;
2825:
2826: IF (g_level_procedure >= g_current_runtime_level ) THEN
2827: FND_LOG.STRING(g_level_procedure,
2828: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_line.BEGIN',
2829: 'ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_line(+)');
2830: END IF;
2831:
2832: x_return_status := FND_API.G_RET_STS_SUCCESS;
2833: OPEN get_mismatch_tax_lines_csr;
2843:
2844: IF (g_level_statement >= g_current_runtime_level ) THEN
2845:
2846: FND_LOG.STRING(g_level_statement,
2847: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_line',
2848: 'line level control tax amount is not 0, ' ||
2849: 'but the total calculated tax amount for this trx line is 0, cannot do tax proration.' );
2850: --FND_LOG.STRING(g_level_statement,
2851: -- 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_line',
2847: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_line',
2848: 'line level control tax amount is not 0, ' ||
2849: 'but the total calculated tax amount for this trx line is 0, cannot do tax proration.' );
2850: --FND_LOG.STRING(g_level_statement,
2851: -- 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_line',
2852: -- 'trx_line_id = ' || l_trx_line_id_tbl(i));
2853: FND_LOG.STRING(g_level_statement,
2854: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_line.END',
2855: 'ZX_TDS_CALC_SERVICES_PUB_PKG.' ||
2850: --FND_LOG.STRING(g_level_statement,
2851: -- 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_line',
2852: -- 'trx_line_id = ' || l_trx_line_id_tbl(i));
2853: FND_LOG.STRING(g_level_statement,
2854: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_line.END',
2855: 'ZX_TDS_CALC_SERVICES_PUB_PKG.' ||
2856: 'process_taxes_for_xml_inv_line(-)');
2857: END IF;
2858:
2851: -- 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_line',
2852: -- 'trx_line_id = ' || l_trx_line_id_tbl(i));
2853: FND_LOG.STRING(g_level_statement,
2854: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_line.END',
2855: 'ZX_TDS_CALC_SERVICES_PUB_PKG.' ||
2856: 'process_taxes_for_xml_inv_line(-)');
2857: END IF;
2858:
2859: FND_MESSAGE.SET_NAME('ZX','ZX_LN_CTRL_TOTAL_TAX_MISMATCH');
2858:
2859: FND_MESSAGE.SET_NAME('ZX','ZX_LN_CTRL_TOTAL_TAX_MISMATCH');
2860:
2861: -- FND_MSG_PUB.Add;
2862: --ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_line_id :=
2863: -- l_trx_line_id_tbl(i);
2864: --ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_level_type :=
2865: -- l_trx_level_type_tbl(i);
2866: ZX_API_PUB.add_msg(ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec);
2860:
2861: -- FND_MSG_PUB.Add;
2862: --ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_line_id :=
2863: -- l_trx_line_id_tbl(i);
2864: --ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_level_type :=
2865: -- l_trx_level_type_tbl(i);
2866: ZX_API_PUB.add_msg(ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec);
2867:
2868: RETURN;
2862: --ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_line_id :=
2863: -- l_trx_line_id_tbl(i);
2864: --ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_level_type :=
2865: -- l_trx_level_type_tbl(i);
2866: ZX_API_PUB.add_msg(ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec);
2867:
2868: RETURN;
2869: ELSE
2870: CLOSE get_mismatch_tax_lines_csr;
2954: CLOSE get_total_line_tax_amt_csr;
2955:
2956: IF (g_level_procedure >= g_current_runtime_level ) THEN
2957: FND_LOG.STRING(g_level_procedure,
2958: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_line',
2959: 'RETURN_STATUS = ' || x_return_status);
2960: FND_LOG.STRING(g_level_procedure,
2961: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_line.END',
2962: 'ZX_TDS_CALC_SERVICES_PUB_PKG.' ||
2957: FND_LOG.STRING(g_level_procedure,
2958: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_line',
2959: 'RETURN_STATUS = ' || x_return_status);
2960: FND_LOG.STRING(g_level_procedure,
2961: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_line.END',
2962: 'ZX_TDS_CALC_SERVICES_PUB_PKG.' ||
2963: 'process_taxes_for_xml_inv_line(-)');
2964: END IF;
2965:
2958: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_line',
2959: 'RETURN_STATUS = ' || x_return_status);
2960: FND_LOG.STRING(g_level_procedure,
2961: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_line.END',
2962: 'ZX_TDS_CALC_SERVICES_PUB_PKG.' ||
2963: 'process_taxes_for_xml_inv_line(-)');
2964: END IF;
2965:
2966: EXCEPTION
2970: END IF;
2971: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2972: IF (g_level_unexpected >= g_current_runtime_level ) THEN
2973: FND_LOG.STRING(g_level_unexpected,
2974: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_line',
2975: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2976: FND_LOG.STRING(g_level_unexpected,
2977: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_line.END',
2978: 'ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_line(-)');
2973: FND_LOG.STRING(g_level_unexpected,
2974: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_line',
2975: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2976: FND_LOG.STRING(g_level_unexpected,
2977: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_line.END',
2978: 'ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_line(-)');
2979: END IF;
2980:
2981: END process_taxes_for_xml_inv_line;
2974: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_line',
2975: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
2976: FND_LOG.STRING(g_level_unexpected,
2977: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_line.END',
2978: 'ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_line(-)');
2979: END IF;
2980:
2981: END process_taxes_for_xml_inv_line;
2982:
3057:
3058: BEGIN
3059: IF (g_level_procedure >= g_current_runtime_level ) THEN
3060: FND_LOG.STRING(g_level_procedure,
3061: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_hdr.BEGIN',
3062: 'ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_hdr(+)');
3063: END IF;
3064:
3065: x_return_status := FND_API.G_RET_STS_SUCCESS;
3058: BEGIN
3059: IF (g_level_procedure >= g_current_runtime_level ) THEN
3060: FND_LOG.STRING(g_level_procedure,
3061: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_hdr.BEGIN',
3062: 'ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_hdr(+)');
3063: END IF;
3064:
3065: x_return_status := FND_API.G_RET_STS_SUCCESS;
3066:
3072:
3073: x_return_status := FND_API.G_RET_STS_ERROR;
3074: IF (g_level_statement >= g_current_runtime_level ) THEN
3075: FND_LOG.STRING(g_level_statement,
3076: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_hdr',
3077: 'The header level control tax amount is not 0, ' ||
3078: 'but total calculated tax amount for this transaction is 0.');
3079: FND_LOG.STRING(g_level_statement,
3080: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_hdr.END',
3076: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_hdr',
3077: 'The header level control tax amount is not 0, ' ||
3078: 'but total calculated tax amount for this transaction is 0.');
3079: FND_LOG.STRING(g_level_statement,
3080: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_hdr.END',
3081: 'ZX_TDS_CALC_SERVICES_PUB_PKG.' ||
3082: 'process_taxes_for_xml_inv_hdr(-)');
3083: END IF;
3084:
3077: 'The header level control tax amount is not 0, ' ||
3078: 'but total calculated tax amount for this transaction is 0.');
3079: FND_LOG.STRING(g_level_statement,
3080: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_hdr.END',
3081: 'ZX_TDS_CALC_SERVICES_PUB_PKG.' ||
3082: 'process_taxes_for_xml_inv_hdr(-)');
3083: END IF;
3084:
3085: FND_MESSAGE.SET_NAME('ZX','ZX_HDR_CTRL_TOTAL_TAX_MISMATCH');
3084:
3085: FND_MESSAGE.SET_NAME('ZX','ZX_HDR_CTRL_TOTAL_TAX_MISMATCH');
3086:
3087: -- FND_MSG_PUB.Add;
3088: ZX_API_PUB.add_msg(ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec);
3089:
3090: RETURN;
3091: ELSE
3092: CLOSE get_mismatch_tax_lines_csr;
3182: CLOSE get_total_trx_tax_amt_csr;
3183:
3184: IF (g_level_procedure >= g_current_runtime_level ) THEN
3185: FND_LOG.STRING(g_level_procedure,
3186: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_hdr',
3187: 'RETURN_STATUS = ' || x_return_status);
3188: FND_LOG.STRING(g_level_procedure,
3189: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_hdr.END',
3190: 'ZX_TDS_CALC_SERVICES_PUB_PKG.' ||
3185: FND_LOG.STRING(g_level_procedure,
3186: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_hdr',
3187: 'RETURN_STATUS = ' || x_return_status);
3188: FND_LOG.STRING(g_level_procedure,
3189: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_hdr.END',
3190: 'ZX_TDS_CALC_SERVICES_PUB_PKG.' ||
3191: 'process_taxes_for_xml_inv_hdr(-)');
3192: END IF;
3193:
3186: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_hdr',
3187: 'RETURN_STATUS = ' || x_return_status);
3188: FND_LOG.STRING(g_level_procedure,
3189: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_hdr.END',
3190: 'ZX_TDS_CALC_SERVICES_PUB_PKG.' ||
3191: 'process_taxes_for_xml_inv_hdr(-)');
3192: END IF;
3193:
3194: EXCEPTION
3198: END IF;
3199: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3200: IF (g_level_unexpected >= g_current_runtime_level ) THEN
3201: FND_LOG.STRING(g_level_unexpected,
3202: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_hdr',
3203: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3204: FND_LOG.STRING(g_level_unexpected,
3205: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_hdr.END',
3206: 'ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_hdr(-)');
3201: FND_LOG.STRING(g_level_unexpected,
3202: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_hdr',
3203: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3204: FND_LOG.STRING(g_level_unexpected,
3205: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_hdr.END',
3206: 'ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_hdr(-)');
3207: END IF;
3208:
3209: END process_taxes_for_xml_inv_hdr;
3202: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_hdr',
3203: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3204: FND_LOG.STRING(g_level_unexpected,
3205: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_hdr.END',
3206: 'ZX_TDS_CALC_SERVICES_PUB_PKG.process_taxes_for_xml_inv_hdr(-)');
3207: END IF;
3208:
3209: END process_taxes_for_xml_inv_hdr;
3210:
3275: BEGIN
3276:
3277: IF (g_level_procedure >= g_current_runtime_level ) THEN
3278: FND_LOG.STRING(g_level_procedure,
3279: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_line.BEGIN',
3280: 'ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_line(+)');
3281: END IF;
3282:
3283: x_return_status := FND_API.G_RET_STS_SUCCESS;
3276:
3277: IF (g_level_procedure >= g_current_runtime_level ) THEN
3278: FND_LOG.STRING(g_level_procedure,
3279: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_line.BEGIN',
3280: 'ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_line(+)');
3281: END IF;
3282:
3283: x_return_status := FND_API.G_RET_STS_SUCCESS;
3284: l_index := 0;
3323: AND rownum = 1;
3324:
3325: IF (g_level_procedure >= g_current_runtime_level ) THEN
3326: FND_LOG.STRING(g_level_procedure,
3327: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_line',
3328: 'RETURN_STATUS = ' || x_return_status);
3329: FND_LOG.STRING(g_level_procedure,
3330: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_line.END',
3331: 'ZX_TDS_CALC_SERVICES_PUB_PKG.' ||
3326: FND_LOG.STRING(g_level_procedure,
3327: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_line',
3328: 'RETURN_STATUS = ' || x_return_status);
3329: FND_LOG.STRING(g_level_procedure,
3330: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_line.END',
3331: 'ZX_TDS_CALC_SERVICES_PUB_PKG.' ||
3332: 'adjust_tax_for_xml_inv_line(-)');
3333: END IF;
3334:
3327: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_line',
3328: 'RETURN_STATUS = ' || x_return_status);
3329: FND_LOG.STRING(g_level_procedure,
3330: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_line.END',
3331: 'ZX_TDS_CALC_SERVICES_PUB_PKG.' ||
3332: 'adjust_tax_for_xml_inv_line(-)');
3333: END IF;
3334:
3335: EXCEPTION
3339: END IF;
3340: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3341: IF (g_level_unexpected >= g_current_runtime_level ) THEN
3342: FND_LOG.STRING(g_level_unexpected,
3343: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_line',
3344: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3345: FND_LOG.STRING(g_level_unexpected,
3346: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_line.END',
3347: 'ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_line(-)');
3342: FND_LOG.STRING(g_level_unexpected,
3343: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_line',
3344: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3345: FND_LOG.STRING(g_level_unexpected,
3346: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_line.END',
3347: 'ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_line(-)');
3348: END IF;
3349:
3350: END adjust_tax_for_xml_inv_line;
3343: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_line',
3344: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3345: FND_LOG.STRING(g_level_unexpected,
3346: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_line.END',
3347: 'ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_line(-)');
3348: END IF;
3349:
3350: END adjust_tax_for_xml_inv_line;
3351:
3401:
3402: BEGIN
3403: IF (g_level_procedure >= g_current_runtime_level ) THEN
3404: FND_LOG.STRING(g_level_procedure,
3405: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_hdr.BEGIN',
3406: 'ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_hdr(+)');
3407: END IF;
3408: x_return_status := FND_API.G_RET_STS_SUCCESS;
3409:
3402: BEGIN
3403: IF (g_level_procedure >= g_current_runtime_level ) THEN
3404: FND_LOG.STRING(g_level_procedure,
3405: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_hdr.BEGIN',
3406: 'ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_hdr(+)');
3407: END IF;
3408: x_return_status := FND_API.G_RET_STS_SUCCESS;
3409:
3410: -- get l_total_trx_tax_amt for all tax lines of this transaction
3440: AND rownum = 1;
3441:
3442: IF (g_level_procedure >= g_current_runtime_level ) THEN
3443: FND_LOG.STRING(g_level_procedure,
3444: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_hdr',
3445: 'RETURN_STATUS = ' || x_return_status);
3446: FND_LOG.STRING(g_level_procedure,
3447: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_hdr.END',
3448: 'ZX_TDS_CALC_SERVICES_PUB_PKG.' ||
3443: FND_LOG.STRING(g_level_procedure,
3444: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_hdr',
3445: 'RETURN_STATUS = ' || x_return_status);
3446: FND_LOG.STRING(g_level_procedure,
3447: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_hdr.END',
3448: 'ZX_TDS_CALC_SERVICES_PUB_PKG.' ||
3449: 'adjust_tax_for_xml_inv_hdr(-)');
3450: END IF;
3451:
3444: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_hdr',
3445: 'RETURN_STATUS = ' || x_return_status);
3446: FND_LOG.STRING(g_level_procedure,
3447: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_hdr.END',
3448: 'ZX_TDS_CALC_SERVICES_PUB_PKG.' ||
3449: 'adjust_tax_for_xml_inv_hdr(-)');
3450: END IF;
3451:
3452: EXCEPTION
3456: END IF;
3457: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3458: IF (g_level_unexpected >= g_current_runtime_level ) THEN
3459: FND_LOG.STRING(g_level_unexpected,
3460: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_hdr',
3461: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3462: FND_LOG.STRING(g_level_unexpected,
3463: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_hdr.END',
3464: 'ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_hdr(-)');
3459: FND_LOG.STRING(g_level_unexpected,
3460: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_hdr',
3461: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3462: FND_LOG.STRING(g_level_unexpected,
3463: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_hdr.END',
3464: 'ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_hdr(-)');
3465: END IF;
3466:
3467: END adjust_tax_for_xml_inv_hdr;
3460: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_hdr',
3461: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3462: FND_LOG.STRING(g_level_unexpected,
3463: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_hdr.END',
3464: 'ZX_TDS_CALC_SERVICES_PUB_PKG.adjust_tax_for_xml_inv_hdr(-)');
3465: END IF;
3466:
3467: END adjust_tax_for_xml_inv_hdr;
3468:
3513: BEGIN
3514:
3515: IF (g_level_procedure >= g_current_runtime_level ) THEN
3516: FND_LOG.STRING(g_level_procedure,
3517: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.match_tax_amt_to_summary_line.BEGIN',
3518: 'ZX_TDS_CALC_SERVICES_PUB_PKG.match_tax_amt_to_summary_line(+)');
3519: END IF;
3520:
3521: x_return_status := FND_API.G_RET_STS_SUCCESS;
3514:
3515: IF (g_level_procedure >= g_current_runtime_level ) THEN
3516: FND_LOG.STRING(g_level_procedure,
3517: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.match_tax_amt_to_summary_line.BEGIN',
3518: 'ZX_TDS_CALC_SERVICES_PUB_PKG.match_tax_amt_to_summary_line(+)');
3519: END IF;
3520:
3521: x_return_status := FND_API.G_RET_STS_SUCCESS;
3522: l_tbl_index := 0;
3560: END IF; -- l_summary_tax_line_id_tbl.COUNT > 0
3561:
3562: IF (g_level_procedure >= g_current_runtime_level ) THEN
3563: FND_LOG.STRING(g_level_procedure,
3564: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.match_tax_amt_to_summary_line',
3565: 'RETURN_STATUS = ' || x_return_status);
3566: FND_LOG.STRING(g_level_procedure,
3567: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.match_tax_amt_to_summary_line.END',
3568: 'ZX_TDS_CALC_SERVICES_PUB_PKG.' ||
3563: FND_LOG.STRING(g_level_procedure,
3564: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.match_tax_amt_to_summary_line',
3565: 'RETURN_STATUS = ' || x_return_status);
3566: FND_LOG.STRING(g_level_procedure,
3567: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.match_tax_amt_to_summary_line.END',
3568: 'ZX_TDS_CALC_SERVICES_PUB_PKG.' ||
3569: 'match_tax_amt_to_summary_line(-)');
3570: END IF;
3571:
3564: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.match_tax_amt_to_summary_line',
3565: 'RETURN_STATUS = ' || x_return_status);
3566: FND_LOG.STRING(g_level_procedure,
3567: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.match_tax_amt_to_summary_line.END',
3568: 'ZX_TDS_CALC_SERVICES_PUB_PKG.' ||
3569: 'match_tax_amt_to_summary_line(-)');
3570: END IF;
3571:
3572: EXCEPTION
3573: WHEN OTHERS THEN
3574: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3575: IF (g_level_unexpected >= g_current_runtime_level ) THEN
3576: FND_LOG.STRING(g_level_unexpected,
3577: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.match_tax_amt_to_summary_line',
3578: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3579: FND_LOG.STRING(g_level_unexpected,
3580: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.match_tax_amt_to_summary_line.END',
3581: 'ZX_TDS_CALC_SERVICES_PUB_PKG.match_tax_amt_to_summary_line(-)');
3576: FND_LOG.STRING(g_level_unexpected,
3577: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.match_tax_amt_to_summary_line',
3578: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3579: FND_LOG.STRING(g_level_unexpected,
3580: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.match_tax_amt_to_summary_line.END',
3581: 'ZX_TDS_CALC_SERVICES_PUB_PKG.match_tax_amt_to_summary_line(-)');
3582: END IF;
3583:
3584: END match_tax_amt_to_summary_line;
3577: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.match_tax_amt_to_summary_line',
3578: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3579: FND_LOG.STRING(g_level_unexpected,
3580: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.match_tax_amt_to_summary_line.END',
3581: 'ZX_TDS_CALC_SERVICES_PUB_PKG.match_tax_amt_to_summary_line(-)');
3582: END IF;
3583:
3584: END match_tax_amt_to_summary_line;
3585:
3594: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
3595:
3596: IF (g_level_procedure >= g_current_runtime_level ) THEN
3597: FND_LOG.STRING(g_level_procedure,
3598: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_session.BEGIN',
3599: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_session(+)');
3600: END IF;
3601:
3602: x_return_status := FND_API.G_RET_STS_SUCCESS;
3595:
3596: IF (g_level_procedure >= g_current_runtime_level ) THEN
3597: FND_LOG.STRING(g_level_procedure,
3598: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_session.BEGIN',
3599: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_session(+)');
3600: END IF;
3601:
3602: x_return_status := FND_API.G_RET_STS_SUCCESS;
3603:
3604: -- init gt tables
3605: DELETE FROM ZX_DETAIL_TAX_LINES_GT;
3606:
3607: -- added the following initializations for bug fix 5417887
3608: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ctrl_total_line_tx_amt_flg := 'N';
3609: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ctrl_total_hdr_tx_amt_flg := 'N';
3610:
3611: --bug 7537542
3612: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_cancel_exist_flg := 'N';
3605: DELETE FROM ZX_DETAIL_TAX_LINES_GT;
3606:
3607: -- added the following initializations for bug fix 5417887
3608: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ctrl_total_line_tx_amt_flg := 'N';
3609: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ctrl_total_hdr_tx_amt_flg := 'N';
3610:
3611: --bug 7537542
3612: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_cancel_exist_flg := 'N';
3613: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_discard_exist_flg := 'N';
3608: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ctrl_total_line_tx_amt_flg := 'N';
3609: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ctrl_total_hdr_tx_amt_flg := 'N';
3610:
3611: --bug 7537542
3612: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_cancel_exist_flg := 'N';
3613: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_discard_exist_flg := 'N';
3614: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_nochange_exist_flg := 'N';
3615: ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_copy_and_create_flg := 'N';
3616: ZX_TDS_CALC_SERVICES_PUB_PKG.g_reference_doc_exist_flg := 'N';
3609: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ctrl_total_hdr_tx_amt_flg := 'N';
3610:
3611: --bug 7537542
3612: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_cancel_exist_flg := 'N';
3613: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_discard_exist_flg := 'N';
3614: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_nochange_exist_flg := 'N';
3615: ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_copy_and_create_flg := 'N';
3616: ZX_TDS_CALC_SERVICES_PUB_PKG.g_reference_doc_exist_flg := 'N';
3617: --bug 7537542
3610:
3611: --bug 7537542
3612: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_cancel_exist_flg := 'N';
3613: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_discard_exist_flg := 'N';
3614: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_nochange_exist_flg := 'N';
3615: ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_copy_and_create_flg := 'N';
3616: ZX_TDS_CALC_SERVICES_PUB_PKG.g_reference_doc_exist_flg := 'N';
3617: --bug 7537542
3618:
3611: --bug 7537542
3612: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_cancel_exist_flg := 'N';
3613: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_discard_exist_flg := 'N';
3614: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_nochange_exist_flg := 'N';
3615: ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_copy_and_create_flg := 'N';
3616: ZX_TDS_CALC_SERVICES_PUB_PKG.g_reference_doc_exist_flg := 'N';
3617: --bug 7537542
3618:
3619: ZX_GLOBAL_STRUCTURES_PKG.g_credit_memo_exists_flg := 'N';
3612: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_cancel_exist_flg := 'N';
3613: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_discard_exist_flg := 'N';
3614: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_nochange_exist_flg := 'N';
3615: ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_copy_and_create_flg := 'N';
3616: ZX_TDS_CALC_SERVICES_PUB_PKG.g_reference_doc_exist_flg := 'N';
3617: --bug 7537542
3618:
3619: ZX_GLOBAL_STRUCTURES_PKG.g_credit_memo_exists_flg := 'N';
3620: ZX_GLOBAL_STRUCTURES_PKG.g_update_event_process_flag := 'N';
3621: ZX_GLOBAL_STRUCTURES_PKG.g_bulk_process_flag := 'N';
3622: ZX_GLOBAL_STRUCTURES_PKG.ptnr_tax_regime_tbl.DELETE;
3623:
3624:
3625: ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl.DELETE;
3626: ZX_TDS_CALC_SERVICES_PUB_PKG.g_check_cond_grp_tbl.DELETE;
3627: ZX_TDS_CALC_SERVICES_PUB_PKG.g_fsc_tbl.DELETE;
3628:
3629: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tsrm_num_value_tbl.DELETE;
3622: ZX_GLOBAL_STRUCTURES_PKG.ptnr_tax_regime_tbl.DELETE;
3623:
3624:
3625: ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl.DELETE;
3626: ZX_TDS_CALC_SERVICES_PUB_PKG.g_check_cond_grp_tbl.DELETE;
3627: ZX_TDS_CALC_SERVICES_PUB_PKG.g_fsc_tbl.DELETE;
3628:
3629: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tsrm_num_value_tbl.DELETE;
3630: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tsrm_alphanum_value_tbl.DELETE;
3623:
3624:
3625: ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl.DELETE;
3626: ZX_TDS_CALC_SERVICES_PUB_PKG.g_check_cond_grp_tbl.DELETE;
3627: ZX_TDS_CALC_SERVICES_PUB_PKG.g_fsc_tbl.DELETE;
3628:
3629: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tsrm_num_value_tbl.DELETE;
3630: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tsrm_alphanum_value_tbl.DELETE;
3631: ZX_TDS_CALC_SERVICES_PUB_PKG.g_trx_alphanum_value_tbl.DELETE;
3625: ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl.DELETE;
3626: ZX_TDS_CALC_SERVICES_PUB_PKG.g_check_cond_grp_tbl.DELETE;
3627: ZX_TDS_CALC_SERVICES_PUB_PKG.g_fsc_tbl.DELETE;
3628:
3629: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tsrm_num_value_tbl.DELETE;
3630: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tsrm_alphanum_value_tbl.DELETE;
3631: ZX_TDS_CALC_SERVICES_PUB_PKG.g_trx_alphanum_value_tbl.DELETE;
3632:
3633: ZX_TDS_UTILITIES_PKG.g_tax_rec_tbl.DELETE;
3626: ZX_TDS_CALC_SERVICES_PUB_PKG.g_check_cond_grp_tbl.DELETE;
3627: ZX_TDS_CALC_SERVICES_PUB_PKG.g_fsc_tbl.DELETE;
3628:
3629: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tsrm_num_value_tbl.DELETE;
3630: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tsrm_alphanum_value_tbl.DELETE;
3631: ZX_TDS_CALC_SERVICES_PUB_PKG.g_trx_alphanum_value_tbl.DELETE;
3632:
3633: ZX_TDS_UTILITIES_PKG.g_tax_rec_tbl.DELETE;
3634: ZX_TDS_UTILITIES_PKG.g_tax_rate_info_tbl.DELETE;
3627: ZX_TDS_CALC_SERVICES_PUB_PKG.g_fsc_tbl.DELETE;
3628:
3629: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tsrm_num_value_tbl.DELETE;
3630: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tsrm_alphanum_value_tbl.DELETE;
3631: ZX_TDS_CALC_SERVICES_PUB_PKG.g_trx_alphanum_value_tbl.DELETE;
3632:
3633: ZX_TDS_UTILITIES_PKG.g_tax_rec_tbl.DELETE;
3634: ZX_TDS_UTILITIES_PKG.g_tax_rate_info_tbl.DELETE;
3635: ZX_TDS_UTILITIES_PKG.g_tax_status_info_tbl.DELETE;
3651: ZX_TDS_RULE_BASE_DETM_PVT.g_value_high_tbl.DELETE;
3652: ZX_TDS_RULE_BASE_DETM_PVT.g_segment_array.DELETE;
3653:
3654: ZX_TDS_TAX_ROUNDING_PKG.g_euro_code := NULL;
3655: ZX_TDS_CALC_SERVICES_PUB_PKG.g_max_tax_line_number := NULL;
3656: ZX_TDS_CALC_SERVICES_PUB_PKG.g_trx_lines_counter := NULL;
3657: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_level := NULL;
3658: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_rule := NULL;
3659: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rnd_lvl_party_tax_prof_id := NULL;
3652: ZX_TDS_RULE_BASE_DETM_PVT.g_segment_array.DELETE;
3653:
3654: ZX_TDS_TAX_ROUNDING_PKG.g_euro_code := NULL;
3655: ZX_TDS_CALC_SERVICES_PUB_PKG.g_max_tax_line_number := NULL;
3656: ZX_TDS_CALC_SERVICES_PUB_PKG.g_trx_lines_counter := NULL;
3657: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_level := NULL;
3658: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_rule := NULL;
3659: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rnd_lvl_party_tax_prof_id := NULL;
3660: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_lvl_party_type := NULL;
3653:
3654: ZX_TDS_TAX_ROUNDING_PKG.g_euro_code := NULL;
3655: ZX_TDS_CALC_SERVICES_PUB_PKG.g_max_tax_line_number := NULL;
3656: ZX_TDS_CALC_SERVICES_PUB_PKG.g_trx_lines_counter := NULL;
3657: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_level := NULL;
3658: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_rule := NULL;
3659: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rnd_lvl_party_tax_prof_id := NULL;
3660: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_lvl_party_type := NULL;
3661:
3654: ZX_TDS_TAX_ROUNDING_PKG.g_euro_code := NULL;
3655: ZX_TDS_CALC_SERVICES_PUB_PKG.g_max_tax_line_number := NULL;
3656: ZX_TDS_CALC_SERVICES_PUB_PKG.g_trx_lines_counter := NULL;
3657: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_level := NULL;
3658: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_rule := NULL;
3659: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rnd_lvl_party_tax_prof_id := NULL;
3660: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_lvl_party_type := NULL;
3661:
3662: -- added for bug 5684123
3655: ZX_TDS_CALC_SERVICES_PUB_PKG.g_max_tax_line_number := NULL;
3656: ZX_TDS_CALC_SERVICES_PUB_PKG.g_trx_lines_counter := NULL;
3657: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_level := NULL;
3658: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_rule := NULL;
3659: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rnd_lvl_party_tax_prof_id := NULL;
3660: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_lvl_party_type := NULL;
3661:
3662: -- added for bug 5684123
3663: ZX_TDS_CALC_SERVICES_PUB_PKG.g_overridden_tax_ln_exist_flg := 'N';
3656: ZX_TDS_CALC_SERVICES_PUB_PKG.g_trx_lines_counter := NULL;
3657: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_level := NULL;
3658: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_rule := NULL;
3659: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rnd_lvl_party_tax_prof_id := NULL;
3660: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_lvl_party_type := NULL;
3661:
3662: -- added for bug 5684123
3663: ZX_TDS_CALC_SERVICES_PUB_PKG.g_overridden_tax_ln_exist_flg := 'N';
3664:
3659: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rnd_lvl_party_tax_prof_id := NULL;
3660: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_lvl_party_type := NULL;
3661:
3662: -- added for bug 5684123
3663: ZX_TDS_CALC_SERVICES_PUB_PKG.g_overridden_tax_ln_exist_flg := 'N';
3664:
3665: IF (g_level_procedure >= g_current_runtime_level ) THEN
3666: FND_LOG.STRING(g_level_procedure,
3667: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_session',
3663: ZX_TDS_CALC_SERVICES_PUB_PKG.g_overridden_tax_ln_exist_flg := 'N';
3664:
3665: IF (g_level_procedure >= g_current_runtime_level ) THEN
3666: FND_LOG.STRING(g_level_procedure,
3667: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_session',
3668: 'RETURN_STATUS = ' || x_return_status);
3669: FND_LOG.STRING(g_level_procedure,
3670: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_session.END',
3671: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_session(-)');
3666: FND_LOG.STRING(g_level_procedure,
3667: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_session',
3668: 'RETURN_STATUS = ' || x_return_status);
3669: FND_LOG.STRING(g_level_procedure,
3670: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_session.END',
3671: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_session(-)');
3672: END IF;
3673:
3674: EXCEPTION
3667: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_session',
3668: 'RETURN_STATUS = ' || x_return_status);
3669: FND_LOG.STRING(g_level_procedure,
3670: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_session.END',
3671: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_session(-)');
3672: END IF;
3673:
3674: EXCEPTION
3675: WHEN OTHERS THEN
3675: WHEN OTHERS THEN
3676: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3677: IF (g_level_unexpected >= g_current_runtime_level ) THEN
3678: FND_LOG.STRING(g_level_unexpected,
3679: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_session',
3680: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3681: FND_LOG.STRING(g_level_unexpected,
3682: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_session.END',
3683: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_session(-)');
3678: FND_LOG.STRING(g_level_unexpected,
3679: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_session',
3680: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3681: FND_LOG.STRING(g_level_unexpected,
3682: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_session.END',
3683: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_session(-)');
3684: END IF;
3685:
3686: END init_for_session;
3679: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_session',
3680: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3681: FND_LOG.STRING(g_level_unexpected,
3682: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_session.END',
3683: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_session(-)');
3684: END IF;
3685:
3686: END init_for_session;
3687:
3697: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
3698:
3699: IF (g_level_procedure >= g_current_runtime_level ) THEN
3700: FND_LOG.STRING(g_level_procedure,
3701: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_header.BEGIN',
3702: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_header(+)');
3703: END IF;
3704:
3705: x_return_status := FND_API.G_RET_STS_SUCCESS;
3698:
3699: IF (g_level_procedure >= g_current_runtime_level ) THEN
3700: FND_LOG.STRING(g_level_procedure,
3701: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_header.BEGIN',
3702: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_header(+)');
3703: END IF;
3704:
3705: x_return_status := FND_API.G_RET_STS_SUCCESS;
3706:
3704:
3705: x_return_status := FND_API.G_RET_STS_SUCCESS;
3706:
3707: -- comment out the following init for bug fix 5417887
3708: -- ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl.DELETE;
3709: ZX_TDS_CALC_SERVICES_PUB_PKG.g_check_cond_grp_tbl.DELETE;
3710: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tsrm_num_value_tbl.DELETE;
3711: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tsrm_alphanum_value_tbl.DELETE;
3712: ZX_TDS_CALC_SERVICES_PUB_PKG.g_trx_alphanum_value_tbl.DELETE;
3705: x_return_status := FND_API.G_RET_STS_SUCCESS;
3706:
3707: -- comment out the following init for bug fix 5417887
3708: -- ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl.DELETE;
3709: ZX_TDS_CALC_SERVICES_PUB_PKG.g_check_cond_grp_tbl.DELETE;
3710: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tsrm_num_value_tbl.DELETE;
3711: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tsrm_alphanum_value_tbl.DELETE;
3712: ZX_TDS_CALC_SERVICES_PUB_PKG.g_trx_alphanum_value_tbl.DELETE;
3713:
3706:
3707: -- comment out the following init for bug fix 5417887
3708: -- ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl.DELETE;
3709: ZX_TDS_CALC_SERVICES_PUB_PKG.g_check_cond_grp_tbl.DELETE;
3710: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tsrm_num_value_tbl.DELETE;
3711: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tsrm_alphanum_value_tbl.DELETE;
3712: ZX_TDS_CALC_SERVICES_PUB_PKG.g_trx_alphanum_value_tbl.DELETE;
3713:
3714: ZX_TDS_RULE_BASE_DETM_PVT.g_determining_factor_class_tbl.DELETE;
3707: -- comment out the following init for bug fix 5417887
3708: -- ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl.DELETE;
3709: ZX_TDS_CALC_SERVICES_PUB_PKG.g_check_cond_grp_tbl.DELETE;
3710: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tsrm_num_value_tbl.DELETE;
3711: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tsrm_alphanum_value_tbl.DELETE;
3712: ZX_TDS_CALC_SERVICES_PUB_PKG.g_trx_alphanum_value_tbl.DELETE;
3713:
3714: ZX_TDS_RULE_BASE_DETM_PVT.g_determining_factor_class_tbl.DELETE;
3715: ZX_TDS_RULE_BASE_DETM_PVT.g_determining_factor_cq_tbl.DELETE;
3708: -- ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl.DELETE;
3709: ZX_TDS_CALC_SERVICES_PUB_PKG.g_check_cond_grp_tbl.DELETE;
3710: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tsrm_num_value_tbl.DELETE;
3711: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tsrm_alphanum_value_tbl.DELETE;
3712: ZX_TDS_CALC_SERVICES_PUB_PKG.g_trx_alphanum_value_tbl.DELETE;
3713:
3714: ZX_TDS_RULE_BASE_DETM_PVT.g_determining_factor_class_tbl.DELETE;
3715: ZX_TDS_RULE_BASE_DETM_PVT.g_determining_factor_cq_tbl.DELETE;
3716: ZX_TDS_RULE_BASE_DETM_PVT.g_data_type_tbl.DELETE;
3726:
3727: --bug 7444373
3728: ZX_GLOBAL_STRUCTURES_PKG.ptnr_exemption_tbl.DELETE;
3729:
3730: ZX_TDS_CALC_SERVICES_PUB_PKG.g_max_tax_line_number := NULL;
3731: ZX_TDS_CALC_SERVICES_PUB_PKG.g_trx_lines_counter := NULL;
3732: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_level := NULL;
3733: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_rule := NULL;
3734: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rnd_lvl_party_tax_prof_id := NULL;
3727: --bug 7444373
3728: ZX_GLOBAL_STRUCTURES_PKG.ptnr_exemption_tbl.DELETE;
3729:
3730: ZX_TDS_CALC_SERVICES_PUB_PKG.g_max_tax_line_number := NULL;
3731: ZX_TDS_CALC_SERVICES_PUB_PKG.g_trx_lines_counter := NULL;
3732: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_level := NULL;
3733: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_rule := NULL;
3734: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rnd_lvl_party_tax_prof_id := NULL;
3735: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_lvl_party_type := NULL;
3728: ZX_GLOBAL_STRUCTURES_PKG.ptnr_exemption_tbl.DELETE;
3729:
3730: ZX_TDS_CALC_SERVICES_PUB_PKG.g_max_tax_line_number := NULL;
3731: ZX_TDS_CALC_SERVICES_PUB_PKG.g_trx_lines_counter := NULL;
3732: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_level := NULL;
3733: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_rule := NULL;
3734: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rnd_lvl_party_tax_prof_id := NULL;
3735: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_lvl_party_type := NULL;
3736: -- bug7537542
3729:
3730: ZX_TDS_CALC_SERVICES_PUB_PKG.g_max_tax_line_number := NULL;
3731: ZX_TDS_CALC_SERVICES_PUB_PKG.g_trx_lines_counter := NULL;
3732: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_level := NULL;
3733: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_rule := NULL;
3734: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rnd_lvl_party_tax_prof_id := NULL;
3735: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_lvl_party_type := NULL;
3736: -- bug7537542
3737: /*
3730: ZX_TDS_CALC_SERVICES_PUB_PKG.g_max_tax_line_number := NULL;
3731: ZX_TDS_CALC_SERVICES_PUB_PKG.g_trx_lines_counter := NULL;
3732: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_level := NULL;
3733: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_rule := NULL;
3734: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rnd_lvl_party_tax_prof_id := NULL;
3735: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_lvl_party_type := NULL;
3736: -- bug7537542
3737: /*
3738: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_cancel_exist_flg := 'N';
3731: ZX_TDS_CALC_SERVICES_PUB_PKG.g_trx_lines_counter := NULL;
3732: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_level := NULL;
3733: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_rule := NULL;
3734: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rnd_lvl_party_tax_prof_id := NULL;
3735: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_lvl_party_type := NULL;
3736: -- bug7537542
3737: /*
3738: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_cancel_exist_flg := 'N';
3739: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_discard_exist_flg := 'N';
3734: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rnd_lvl_party_tax_prof_id := NULL;
3735: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_lvl_party_type := NULL;
3736: -- bug7537542
3737: /*
3738: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_cancel_exist_flg := 'N';
3739: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_discard_exist_flg := 'N';
3740: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_nochange_exist_flg := 'N';
3741: ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_copy_and_create_flg := 'N';
3742: ZX_TDS_CALC_SERVICES_PUB_PKG.g_reference_doc_exist_flg := 'N';
3735: ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_lvl_party_type := NULL;
3736: -- bug7537542
3737: /*
3738: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_cancel_exist_flg := 'N';
3739: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_discard_exist_flg := 'N';
3740: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_nochange_exist_flg := 'N';
3741: ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_copy_and_create_flg := 'N';
3742: ZX_TDS_CALC_SERVICES_PUB_PKG.g_reference_doc_exist_flg := 'N';
3743: */
3736: -- bug7537542
3737: /*
3738: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_cancel_exist_flg := 'N';
3739: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_discard_exist_flg := 'N';
3740: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_nochange_exist_flg := 'N';
3741: ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_copy_and_create_flg := 'N';
3742: ZX_TDS_CALC_SERVICES_PUB_PKG.g_reference_doc_exist_flg := 'N';
3743: */
3744: ZX_TRD_INTERNAL_SERVICES_PVT.g_tax_recovery_info_tbl.DELETE;
3737: /*
3738: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_cancel_exist_flg := 'N';
3739: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_discard_exist_flg := 'N';
3740: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_nochange_exist_flg := 'N';
3741: ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_copy_and_create_flg := 'N';
3742: ZX_TDS_CALC_SERVICES_PUB_PKG.g_reference_doc_exist_flg := 'N';
3743: */
3744: ZX_TRD_INTERNAL_SERVICES_PVT.g_tax_recovery_info_tbl.DELETE;
3745:
3738: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_cancel_exist_flg := 'N';
3739: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_discard_exist_flg := 'N';
3740: ZX_TDS_CALC_SERVICES_PUB_PKG.g_ln_action_nochange_exist_flg := 'N';
3741: ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_copy_and_create_flg := 'N';
3742: ZX_TDS_CALC_SERVICES_PUB_PKG.g_reference_doc_exist_flg := 'N';
3743: */
3744: ZX_TRD_INTERNAL_SERVICES_PVT.g_tax_recovery_info_tbl.DELETE;
3745:
3746: --Bug 7519403--
3748:
3749: --
3750: -- init msg record to be passed back to TSRM
3751: --
3752: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.application_id :=
3753: p_event_class_rec.application_id;
3754: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.entity_code :=
3755: p_event_class_rec.entity_code;
3756: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.event_class_code :=
3750: -- init msg record to be passed back to TSRM
3751: --
3752: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.application_id :=
3753: p_event_class_rec.application_id;
3754: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.entity_code :=
3755: p_event_class_rec.entity_code;
3756: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.event_class_code :=
3757: p_event_class_rec.event_class_code;
3758: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_id :=
3752: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.application_id :=
3753: p_event_class_rec.application_id;
3754: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.entity_code :=
3755: p_event_class_rec.entity_code;
3756: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.event_class_code :=
3757: p_event_class_rec.event_class_code;
3758: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_id :=
3759: p_event_class_rec.trx_id;
3760: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_line_id := NULL;
3754: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.entity_code :=
3755: p_event_class_rec.entity_code;
3756: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.event_class_code :=
3757: p_event_class_rec.event_class_code;
3758: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_id :=
3759: p_event_class_rec.trx_id;
3760: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_line_id := NULL;
3761: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_level_type := NULL;
3762: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.summary_tax_line_number :=
3756: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.event_class_code :=
3757: p_event_class_rec.event_class_code;
3758: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_id :=
3759: p_event_class_rec.trx_id;
3760: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_line_id := NULL;
3761: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_level_type := NULL;
3762: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.summary_tax_line_number :=
3763: NULL;
3764: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.tax_line_id := NULL;
3757: p_event_class_rec.event_class_code;
3758: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_id :=
3759: p_event_class_rec.trx_id;
3760: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_line_id := NULL;
3761: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_level_type := NULL;
3762: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.summary_tax_line_number :=
3763: NULL;
3764: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.tax_line_id := NULL;
3765: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_line_dist_id := NULL;
3758: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_id :=
3759: p_event_class_rec.trx_id;
3760: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_line_id := NULL;
3761: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_level_type := NULL;
3762: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.summary_tax_line_number :=
3763: NULL;
3764: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.tax_line_id := NULL;
3765: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_line_dist_id := NULL;
3766:
3760: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_line_id := NULL;
3761: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_level_type := NULL;
3762: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.summary_tax_line_number :=
3763: NULL;
3764: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.tax_line_id := NULL;
3765: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_line_dist_id := NULL;
3766:
3767: -- bugfix 5024740: initialize zx_jurisdictions_gt
3768:
3761: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_level_type := NULL;
3762: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.summary_tax_line_number :=
3763: NULL;
3764: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.tax_line_id := NULL;
3765: ZX_TDS_CALC_SERVICES_PUB_PKG.g_msg_context_info_rec.trx_line_dist_id := NULL;
3766:
3767: -- bugfix 5024740: initialize zx_jurisdictions_gt
3768:
3769: delete from zx_jurisdictions_gt;
3769: delete from zx_jurisdictions_gt;
3770:
3771: IF (g_level_procedure >= g_current_runtime_level ) THEN
3772: FND_LOG.STRING(g_level_procedure,
3773: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_header',
3774: 'RETURN_STATUS = ' || x_return_status);
3775: FND_LOG.STRING(g_level_procedure,
3776: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_header.END',
3777: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_header(-)');
3772: FND_LOG.STRING(g_level_procedure,
3773: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_header',
3774: 'RETURN_STATUS = ' || x_return_status);
3775: FND_LOG.STRING(g_level_procedure,
3776: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_header.END',
3777: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_header(-)');
3778: END IF;
3779:
3780: EXCEPTION
3773: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_header',
3774: 'RETURN_STATUS = ' || x_return_status);
3775: FND_LOG.STRING(g_level_procedure,
3776: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_header.END',
3777: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_header(-)');
3778: END IF;
3779:
3780: EXCEPTION
3781: WHEN OTHERS THEN
3781: WHEN OTHERS THEN
3782: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3783: IF (g_level_unexpected >= g_current_runtime_level ) THEN
3784: FND_LOG.STRING(g_level_unexpected,
3785: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_header',
3786: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3787: FND_LOG.STRING(g_level_unexpected,
3788: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_header.END',
3789: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_header(-)');
3784: FND_LOG.STRING(g_level_unexpected,
3785: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_header',
3786: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3787: FND_LOG.STRING(g_level_unexpected,
3788: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_header.END',
3789: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_header(-)');
3790: END IF;
3791:
3792: END init_for_header;
3785: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_header',
3786: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3787: FND_LOG.STRING(g_level_unexpected,
3788: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_header.END',
3789: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_header(-)');
3790: END IF;
3791:
3792: END init_for_header;
3793:
3803: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
3804:
3805: IF (g_level_procedure >= g_current_runtime_level ) THEN
3806: FND_LOG.STRING(g_level_procedure,
3807: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_line.BEGIN',
3808: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_line(+)');
3809: END IF;
3810:
3811: x_return_status := FND_API.G_RET_STS_SUCCESS;
3804:
3805: IF (g_level_procedure >= g_current_runtime_level ) THEN
3806: FND_LOG.STRING(g_level_procedure,
3807: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_line.BEGIN',
3808: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_line(+)');
3809: END IF;
3810:
3811: x_return_status := FND_API.G_RET_STS_SUCCESS;
3812:
3809: END IF;
3810:
3811: x_return_status := FND_API.G_RET_STS_SUCCESS;
3812:
3813: ZX_TDS_CALC_SERVICES_PUB_PKG.g_check_cond_grp_tbl.DELETE;
3814: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tsrm_num_value_tbl.DELETE;
3815: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tsrm_alphanum_value_tbl.DELETE;
3816: ZX_TDS_CALC_SERVICES_PUB_PKG.g_trx_alphanum_value_tbl.DELETE;
3817:
3810:
3811: x_return_status := FND_API.G_RET_STS_SUCCESS;
3812:
3813: ZX_TDS_CALC_SERVICES_PUB_PKG.g_check_cond_grp_tbl.DELETE;
3814: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tsrm_num_value_tbl.DELETE;
3815: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tsrm_alphanum_value_tbl.DELETE;
3816: ZX_TDS_CALC_SERVICES_PUB_PKG.g_trx_alphanum_value_tbl.DELETE;
3817:
3818: ZX_TDS_RULE_BASE_DETM_PVT.g_determining_factor_class_tbl.DELETE;
3811: x_return_status := FND_API.G_RET_STS_SUCCESS;
3812:
3813: ZX_TDS_CALC_SERVICES_PUB_PKG.g_check_cond_grp_tbl.DELETE;
3814: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tsrm_num_value_tbl.DELETE;
3815: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tsrm_alphanum_value_tbl.DELETE;
3816: ZX_TDS_CALC_SERVICES_PUB_PKG.g_trx_alphanum_value_tbl.DELETE;
3817:
3818: ZX_TDS_RULE_BASE_DETM_PVT.g_determining_factor_class_tbl.DELETE;
3819: ZX_TDS_RULE_BASE_DETM_PVT.g_determining_factor_cq_tbl.DELETE;
3812:
3813: ZX_TDS_CALC_SERVICES_PUB_PKG.g_check_cond_grp_tbl.DELETE;
3814: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tsrm_num_value_tbl.DELETE;
3815: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tsrm_alphanum_value_tbl.DELETE;
3816: ZX_TDS_CALC_SERVICES_PUB_PKG.g_trx_alphanum_value_tbl.DELETE;
3817:
3818: ZX_TDS_RULE_BASE_DETM_PVT.g_determining_factor_class_tbl.DELETE;
3819: ZX_TDS_RULE_BASE_DETM_PVT.g_determining_factor_cq_tbl.DELETE;
3820: ZX_TDS_RULE_BASE_DETM_PVT.g_data_type_tbl.DELETE;
3827: ZX_TDS_RULE_BASE_DETM_PVT.g_value_low_tbl.DELETE;
3828: ZX_TDS_RULE_BASE_DETM_PVT.g_value_high_tbl.DELETE;
3829: ZX_TDS_RULE_BASE_DETM_PVT.g_segment_array.DELETE;
3830:
3831: ZX_TDS_CALC_SERVICES_PUB_PKG.g_max_tax_line_number := NULL;
3832:
3833: -- bugfix 5024740: initialize zx_jurisdictions_gt
3834:
3835: delete from zx_jurisdictions_gt;
3835: delete from zx_jurisdictions_gt;
3836:
3837: IF (g_level_procedure >= g_current_runtime_level ) THEN
3838: FND_LOG.STRING(g_level_procedure,
3839: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_line',
3840: 'RETURN_STATUS = ' || x_return_status);
3841: FND_LOG.STRING(g_level_procedure,
3842: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_line.END',
3843: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_line(-)');
3838: FND_LOG.STRING(g_level_procedure,
3839: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_line',
3840: 'RETURN_STATUS = ' || x_return_status);
3841: FND_LOG.STRING(g_level_procedure,
3842: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_line.END',
3843: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_line(-)');
3844: END IF;
3845:
3846: EXCEPTION
3839: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_line',
3840: 'RETURN_STATUS = ' || x_return_status);
3841: FND_LOG.STRING(g_level_procedure,
3842: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_line.END',
3843: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_line(-)');
3844: END IF;
3845:
3846: EXCEPTION
3847: WHEN OTHERS THEN
3847: WHEN OTHERS THEN
3848: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3849: IF (g_level_unexpected >= g_current_runtime_level ) THEN
3850: FND_LOG.STRING(g_level_unexpected,
3851: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_line',
3852: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3853: FND_LOG.STRING(g_level_unexpected,
3854: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_line.END',
3855: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_line(-)');
3850: FND_LOG.STRING(g_level_unexpected,
3851: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_line',
3852: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3853: FND_LOG.STRING(g_level_unexpected,
3854: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_line.END',
3855: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_line(-)');
3856: END IF;
3857:
3858: END init_for_line;
3851: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_line',
3852: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3853: FND_LOG.STRING(g_level_unexpected,
3854: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_line.END',
3855: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_line(-)');
3856: END IF;
3857:
3858: END init_for_line;
3859:
3869: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
3870:
3871: IF (g_level_procedure >= g_current_runtime_level ) THEN
3872: FND_LOG.STRING(g_level_procedure,
3873: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_line.BEGIN',
3874: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_line(+)');
3875: END IF;
3876:
3877: x_return_status := FND_API.G_RET_STS_SUCCESS;
3870:
3871: IF (g_level_procedure >= g_current_runtime_level ) THEN
3872: FND_LOG.STRING(g_level_procedure,
3873: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_line.BEGIN',
3874: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_line(+)');
3875: END IF;
3876:
3877: x_return_status := FND_API.G_RET_STS_SUCCESS;
3878:
3879: ZX_TDS_RULE_BASE_DETM_PVT.g_segment_array.DELETE;
3880:
3881: IF (g_level_procedure >= g_current_runtime_level ) THEN
3882: FND_LOG.STRING(g_level_procedure,
3883: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_line',
3884: 'RETURN_STATUS = ' || x_return_status);
3885: FND_LOG.STRING(g_level_procedure,
3886: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_line.END',
3887: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_line(-)');
3882: FND_LOG.STRING(g_level_procedure,
3883: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_line',
3884: 'RETURN_STATUS = ' || x_return_status);
3885: FND_LOG.STRING(g_level_procedure,
3886: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_line.END',
3887: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_line(-)');
3888: END IF;
3889:
3890: EXCEPTION
3883: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_line',
3884: 'RETURN_STATUS = ' || x_return_status);
3885: FND_LOG.STRING(g_level_procedure,
3886: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_line.END',
3887: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_line(-)');
3888: END IF;
3889:
3890: EXCEPTION
3891: WHEN OTHERS THEN
3891: WHEN OTHERS THEN
3892: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3893: IF (g_level_unexpected >= g_current_runtime_level ) THEN
3894: FND_LOG.STRING(g_level_unexpected,
3895: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_line',
3896: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3897: FND_LOG.STRING(g_level_unexpected,
3898: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_line.END',
3899: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_line(-)');
3894: FND_LOG.STRING(g_level_unexpected,
3895: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_line',
3896: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3897: FND_LOG.STRING(g_level_unexpected,
3898: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_line.END',
3899: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_line(-)');
3900: END IF;
3901:
3902: END init_for_tax_line;
3895: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_line',
3896: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3897: FND_LOG.STRING(g_level_unexpected,
3898: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_line.END',
3899: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_line(-)');
3900: END IF;
3901:
3902: END init_for_tax_line;
3903:
3913: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
3914:
3915: IF (g_level_procedure >= g_current_runtime_level ) THEN
3916: FND_LOG.STRING(g_level_procedure,
3917: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_dist.BEGIN',
3918: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_dist(+)');
3919: END IF;
3920:
3921: x_return_status := FND_API.G_RET_STS_SUCCESS;
3914:
3915: IF (g_level_procedure >= g_current_runtime_level ) THEN
3916: FND_LOG.STRING(g_level_procedure,
3917: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_dist.BEGIN',
3918: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_dist(+)');
3919: END IF;
3920:
3921: x_return_status := FND_API.G_RET_STS_SUCCESS;
3922:
3924: DELETE FROM ZX_REC_NREC_DIST_GT;
3925:
3926: IF (g_level_procedure >= g_current_runtime_level ) THEN
3927: FND_LOG.STRING(g_level_procedure,
3928: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_dist',
3929: 'RETURN_STATUS = ' || x_return_status);
3930: FND_LOG.STRING(g_level_procedure,
3931: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_dist.END',
3932: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_dist(-)');
3927: FND_LOG.STRING(g_level_procedure,
3928: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_dist',
3929: 'RETURN_STATUS = ' || x_return_status);
3930: FND_LOG.STRING(g_level_procedure,
3931: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_dist.END',
3932: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_dist(-)');
3933: END IF;
3934:
3935: EXCEPTION
3928: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_dist',
3929: 'RETURN_STATUS = ' || x_return_status);
3930: FND_LOG.STRING(g_level_procedure,
3931: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_dist.END',
3932: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_dist(-)');
3933: END IF;
3934:
3935: EXCEPTION
3936: WHEN OTHERS THEN
3936: WHEN OTHERS THEN
3937: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3938: IF (g_level_unexpected >= g_current_runtime_level ) THEN
3939: FND_LOG.STRING(g_level_unexpected,
3940: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_dist',
3941: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3942: FND_LOG.STRING(g_level_unexpected,
3943: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_dist.END',
3944: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_dist(-)');
3939: FND_LOG.STRING(g_level_unexpected,
3940: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_dist',
3941: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3942: FND_LOG.STRING(g_level_unexpected,
3943: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_dist.END',
3944: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_dist(-)');
3945: END IF;
3946:
3947: END init_for_tax_dist;
3940: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_dist',
3941: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
3942: FND_LOG.STRING(g_level_unexpected,
3943: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_dist.END',
3944: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_dist(-)');
3945: END IF;
3946:
3947: END init_for_tax_dist;
3948:
3961: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
3962:
3963: IF (g_level_procedure >= g_current_runtime_level ) THEN
3964: FND_LOG.STRING(g_level_procedure,
3965: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize.BEGIN',
3966: 'ZX_TDS_CALC_SERVICES_PUB_PKG.initialize(+)');
3967: FND_LOG.STRING(g_level_procedure,
3968: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
3969: 'p_init_level = ' || p_init_level);
3962:
3963: IF (g_level_procedure >= g_current_runtime_level ) THEN
3964: FND_LOG.STRING(g_level_procedure,
3965: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize.BEGIN',
3966: 'ZX_TDS_CALC_SERVICES_PUB_PKG.initialize(+)');
3967: FND_LOG.STRING(g_level_procedure,
3968: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
3969: 'p_init_level = ' || p_init_level);
3970: END IF;
3964: FND_LOG.STRING(g_level_procedure,
3965: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize.BEGIN',
3966: 'ZX_TDS_CALC_SERVICES_PUB_PKG.initialize(+)');
3967: FND_LOG.STRING(g_level_procedure,
3968: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
3969: 'p_init_level = ' || p_init_level);
3970: END IF;
3971:
3972: x_return_status := FND_API.G_RET_STS_SUCCESS;
3977:
3978: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3979: IF (g_level_error >= g_current_runtime_level ) THEN
3980: FND_LOG.STRING(g_level_error,
3981: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
3982: 'Incorrect return_status after calling ' ||
3983: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_session()');
3984: FND_LOG.STRING(g_level_error,
3985: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
3979: IF (g_level_error >= g_current_runtime_level ) THEN
3980: FND_LOG.STRING(g_level_error,
3981: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
3982: 'Incorrect return_status after calling ' ||
3983: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_session()');
3984: FND_LOG.STRING(g_level_error,
3985: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
3986: 'RETURN_STATUS = ' || x_return_status);
3987: FND_LOG.STRING(g_level_error,
3981: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
3982: 'Incorrect return_status after calling ' ||
3983: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_session()');
3984: FND_LOG.STRING(g_level_error,
3985: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
3986: 'RETURN_STATUS = ' || x_return_status);
3987: FND_LOG.STRING(g_level_error,
3988: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize.END',
3989: 'ZX_TDS_CALC_SERVICES_PUB_PKG.initialize(-)');
3984: FND_LOG.STRING(g_level_error,
3985: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
3986: 'RETURN_STATUS = ' || x_return_status);
3987: FND_LOG.STRING(g_level_error,
3988: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize.END',
3989: 'ZX_TDS_CALC_SERVICES_PUB_PKG.initialize(-)');
3990: END IF;
3991: RETURN;
3992: END IF;
3985: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
3986: 'RETURN_STATUS = ' || x_return_status);
3987: FND_LOG.STRING(g_level_error,
3988: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize.END',
3989: 'ZX_TDS_CALC_SERVICES_PUB_PKG.initialize(-)');
3990: END IF;
3991: RETURN;
3992: END IF;
3993:
3998:
3999: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4000: IF (g_level_error >= g_current_runtime_level ) THEN
4001: FND_LOG.STRING(g_level_error,
4002: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4003: 'Incorrect return_status after calling ' ||
4004: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_header()');
4005: FND_LOG.STRING(g_level_error,
4006: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4000: IF (g_level_error >= g_current_runtime_level ) THEN
4001: FND_LOG.STRING(g_level_error,
4002: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4003: 'Incorrect return_status after calling ' ||
4004: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_header()');
4005: FND_LOG.STRING(g_level_error,
4006: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4007: 'RETURN_STATUS = ' || x_return_status);
4008: FND_LOG.STRING(g_level_error,
4002: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4003: 'Incorrect return_status after calling ' ||
4004: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_header()');
4005: FND_LOG.STRING(g_level_error,
4006: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4007: 'RETURN_STATUS = ' || x_return_status);
4008: FND_LOG.STRING(g_level_error,
4009: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize.END',
4010: 'ZX_TDS_CALC_SERVICES_PUB_PKG.initialize(-)');
4005: FND_LOG.STRING(g_level_error,
4006: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4007: 'RETURN_STATUS = ' || x_return_status);
4008: FND_LOG.STRING(g_level_error,
4009: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize.END',
4010: 'ZX_TDS_CALC_SERVICES_PUB_PKG.initialize(-)');
4011: END IF;
4012: RETURN;
4013: END IF;
4006: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4007: 'RETURN_STATUS = ' || x_return_status);
4008: FND_LOG.STRING(g_level_error,
4009: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize.END',
4010: 'ZX_TDS_CALC_SERVICES_PUB_PKG.initialize(-)');
4011: END IF;
4012: RETURN;
4013: END IF;
4014: ELSIF p_init_level = 'LINE' THEN
4018:
4019: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4020: IF (g_level_error >= g_current_runtime_level ) THEN
4021: FND_LOG.STRING(g_level_error,
4022: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4023: 'Incorrect return_status after calling ' ||
4024: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_line()');
4025: FND_LOG.STRING(g_level_error,
4026: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4020: IF (g_level_error >= g_current_runtime_level ) THEN
4021: FND_LOG.STRING(g_level_error,
4022: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4023: 'Incorrect return_status after calling ' ||
4024: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_line()');
4025: FND_LOG.STRING(g_level_error,
4026: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4027: 'RETURN_STATUS = ' || x_return_status);
4028: FND_LOG.STRING(g_level_error,
4022: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4023: 'Incorrect return_status after calling ' ||
4024: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_line()');
4025: FND_LOG.STRING(g_level_error,
4026: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4027: 'RETURN_STATUS = ' || x_return_status);
4028: FND_LOG.STRING(g_level_error,
4029: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize.END',
4030: 'ZX_TDS_CALC_SERVICES_PUB_PKG.initialize(-)');
4025: FND_LOG.STRING(g_level_error,
4026: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4027: 'RETURN_STATUS = ' || x_return_status);
4028: FND_LOG.STRING(g_level_error,
4029: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize.END',
4030: 'ZX_TDS_CALC_SERVICES_PUB_PKG.initialize(-)');
4031: END IF;
4032: RETURN;
4033: END IF;
4026: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4027: 'RETURN_STATUS = ' || x_return_status);
4028: FND_LOG.STRING(g_level_error,
4029: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize.END',
4030: 'ZX_TDS_CALC_SERVICES_PUB_PKG.initialize(-)');
4031: END IF;
4032: RETURN;
4033: END IF;
4034:
4039:
4040: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4041: IF (g_level_error >= g_current_runtime_level ) THEN
4042: FND_LOG.STRING(g_level_error,
4043: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4044: 'Incorrect return_status after calling ' ||
4045: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_line()');
4046: FND_LOG.STRING(g_level_error,
4047: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4041: IF (g_level_error >= g_current_runtime_level ) THEN
4042: FND_LOG.STRING(g_level_error,
4043: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4044: 'Incorrect return_status after calling ' ||
4045: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_line()');
4046: FND_LOG.STRING(g_level_error,
4047: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4048: 'RETURN_STATUS = ' || x_return_status);
4049: FND_LOG.STRING(g_level_error,
4043: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4044: 'Incorrect return_status after calling ' ||
4045: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_line()');
4046: FND_LOG.STRING(g_level_error,
4047: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4048: 'RETURN_STATUS = ' || x_return_status);
4049: FND_LOG.STRING(g_level_error,
4050: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize.END',
4051: 'ZX_TDS_CALC_SERVICES_PUB_PKG.initialize(-)');
4046: FND_LOG.STRING(g_level_error,
4047: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4048: 'RETURN_STATUS = ' || x_return_status);
4049: FND_LOG.STRING(g_level_error,
4050: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize.END',
4051: 'ZX_TDS_CALC_SERVICES_PUB_PKG.initialize(-)');
4052: END IF;
4053: RETURN;
4054: END IF;
4047: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4048: 'RETURN_STATUS = ' || x_return_status);
4049: FND_LOG.STRING(g_level_error,
4050: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize.END',
4051: 'ZX_TDS_CALC_SERVICES_PUB_PKG.initialize(-)');
4052: END IF;
4053: RETURN;
4054: END IF;
4055:
4060:
4061: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4062: IF (g_level_error >= g_current_runtime_level ) THEN
4063: FND_LOG.STRING(g_level_error,
4064: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4065: 'Incorrect return_status after calling ' ||
4066: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_dist()');
4067: FND_LOG.STRING(g_level_error,
4068: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4062: IF (g_level_error >= g_current_runtime_level ) THEN
4063: FND_LOG.STRING(g_level_error,
4064: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4065: 'Incorrect return_status after calling ' ||
4066: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_dist()');
4067: FND_LOG.STRING(g_level_error,
4068: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4069: 'RETURN_STATUS = ' || x_return_status);
4070: FND_LOG.STRING(g_level_error,
4064: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4065: 'Incorrect return_status after calling ' ||
4066: 'ZX_TDS_CALC_SERVICES_PUB_PKG.init_for_tax_dist()');
4067: FND_LOG.STRING(g_level_error,
4068: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4069: 'RETURN_STATUS = ' || x_return_status);
4070: FND_LOG.STRING(g_level_error,
4071: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize.END',
4072: 'ZX_TDS_CALC_SERVICES_PUB_PKG.initialize(-)');
4067: FND_LOG.STRING(g_level_error,
4068: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4069: 'RETURN_STATUS = ' || x_return_status);
4070: FND_LOG.STRING(g_level_error,
4071: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize.END',
4072: 'ZX_TDS_CALC_SERVICES_PUB_PKG.initialize(-)');
4073: END IF;
4074: RETURN;
4075: END IF;
4068: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4069: 'RETURN_STATUS = ' || x_return_status);
4070: FND_LOG.STRING(g_level_error,
4071: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize.END',
4072: 'ZX_TDS_CALC_SERVICES_PUB_PKG.initialize(-)');
4073: END IF;
4074: RETURN;
4075: END IF;
4076:
4077: END IF;
4078:
4079: IF (g_level_procedure >= g_current_runtime_level ) THEN
4080: FND_LOG.STRING(g_level_procedure,
4081: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4082: 'RETURN_STATUS = ' || x_return_status);
4083: FND_LOG.STRING(g_level_procedure,
4084: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize.END',
4085: 'ZX_TDS_CALC_SERVICES_PUB_PKG.initialize(-)');
4080: FND_LOG.STRING(g_level_procedure,
4081: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4082: 'RETURN_STATUS = ' || x_return_status);
4083: FND_LOG.STRING(g_level_procedure,
4084: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize.END',
4085: 'ZX_TDS_CALC_SERVICES_PUB_PKG.initialize(-)');
4086: END IF;
4087:
4088: EXCEPTION
4081: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4082: 'RETURN_STATUS = ' || x_return_status);
4083: FND_LOG.STRING(g_level_procedure,
4084: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize.END',
4085: 'ZX_TDS_CALC_SERVICES_PUB_PKG.initialize(-)');
4086: END IF;
4087:
4088: EXCEPTION
4089: WHEN OTHERS THEN
4089: WHEN OTHERS THEN
4090: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4091: IF (g_level_unexpected >= g_current_runtime_level ) THEN
4092: FND_LOG.STRING(g_level_unexpected,
4093: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4094: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
4095: FND_LOG.STRING(g_level_unexpected,
4096: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize.END',
4097: 'ZX_TDS_CALC_SERVICES_PUB_PKG.initialize(-)');
4092: FND_LOG.STRING(g_level_unexpected,
4093: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4094: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
4095: FND_LOG.STRING(g_level_unexpected,
4096: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize.END',
4097: 'ZX_TDS_CALC_SERVICES_PUB_PKG.initialize(-)');
4098: END IF;
4099:
4100: END initialize;
4093: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize',
4094: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
4095: FND_LOG.STRING(g_level_unexpected,
4096: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.initialize.END',
4097: 'ZX_TDS_CALC_SERVICES_PUB_PKG.initialize(-)');
4098: END IF;
4099:
4100: END initialize;
4101:
4114: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
4115:
4116: IF (g_level_procedure >= g_current_runtime_level ) THEN
4117: FND_LOG.STRING(g_level_procedure,
4118: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg.BEGIN',
4119: 'ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg(+)');
4120: FND_LOG.STRING(g_level_procedure,
4121: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg',
4122: 'p_tax_prof_id = ' || p_tax_prof_id);
4115:
4116: IF (g_level_procedure >= g_current_runtime_level ) THEN
4117: FND_LOG.STRING(g_level_procedure,
4118: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg.BEGIN',
4119: 'ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg(+)');
4120: FND_LOG.STRING(g_level_procedure,
4121: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg',
4122: 'p_tax_prof_id = ' || p_tax_prof_id);
4123: FND_LOG.STRING(g_level_procedure,'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg',
4117: FND_LOG.STRING(g_level_procedure,
4118: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg.BEGIN',
4119: 'ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg(+)');
4120: FND_LOG.STRING(g_level_procedure,
4121: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg',
4122: 'p_tax_prof_id = ' || p_tax_prof_id);
4123: FND_LOG.STRING(g_level_procedure,'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg',
4124: 'ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_for_appl_flg set for supplier site is ' ||ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_for_appl_flg);
4125: END IF;
4119: 'ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg(+)');
4120: FND_LOG.STRING(g_level_procedure,
4121: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg',
4122: 'p_tax_prof_id = ' || p_tax_prof_id);
4123: FND_LOG.STRING(g_level_procedure,'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg',
4124: 'ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_for_appl_flg set for supplier site is ' ||ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_for_appl_flg);
4125: END IF;
4126:
4127:
4120: FND_LOG.STRING(g_level_procedure,
4121: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg',
4122: 'p_tax_prof_id = ' || p_tax_prof_id);
4123: FND_LOG.STRING(g_level_procedure,'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg',
4124: 'ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_for_appl_flg set for supplier site is ' ||ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_for_appl_flg);
4125: END IF;
4126:
4127:
4128: x_return_status := FND_API.G_RET_STS_SUCCESS;
4129:
4130: -- Check if the tax calculation level from the party site is 'None'
4131: -- If it is 'None', skip the processing taxes for this transaction
4132: -- line get_process_for_appl_flg
4133: -- If the variable ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_for_appl_flg was set
4134: -- for the supplier site within the rounding package then do not get the
4135: -- process for applicability flag for the rounding party tax profile. Added
4136: -- the if ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_for_appl_flg IS NULL condition
4137: -- for this. Bug 7005483
4132: -- line get_process_for_appl_flg
4133: -- If the variable ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_for_appl_flg was set
4134: -- for the supplier site within the rounding package then do not get the
4135: -- process for applicability flag for the rounding party tax profile. Added
4136: -- the if ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_for_appl_flg IS NULL condition
4137: -- for this. Bug 7005483
4138: IF ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_for_appl_flg IS NULL THEN
4139: IF p_tax_prof_id IS NOT NULL THEN
4140: --Introducing caching logic..
4134: -- for the supplier site within the rounding package then do not get the
4135: -- process for applicability flag for the rounding party tax profile. Added
4136: -- the if ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_for_appl_flg IS NULL condition
4137: -- for this. Bug 7005483
4138: IF ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_for_appl_flg IS NULL THEN
4139: IF p_tax_prof_id IS NOT NULL THEN
4140: --Introducing caching logic..
4141: IF l_tax_prof_id_tbl.EXISTS(p_tax_prof_id)
4142: AND l_tax_prof_id_tbl(p_tax_prof_id).tax_prof_id = p_tax_prof_id THEN
4148:
4149: l_tax_prof_id_tbl(p_tax_prof_id).tax_prof_id := p_tax_prof_id;
4150: l_tax_prof_id_tbl(p_tax_prof_id).process_for_appl_flg := l_process_for_appl_flg;
4151: END IF;
4152: ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_for_appl_flg := l_process_for_appl_flg;
4153: END IF;
4154: END IF;
4155:
4156: IF (g_level_procedure >= g_current_runtime_level ) THEN
4155:
4156: IF (g_level_procedure >= g_current_runtime_level ) THEN
4157:
4158: FND_LOG.STRING(g_level_procedure,
4159: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg.END',
4160: 'ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg(-)'||'process for appl flag' ||g_process_for_appl_flg);
4161: END IF;
4162:
4163: EXCEPTION
4156: IF (g_level_procedure >= g_current_runtime_level ) THEN
4157:
4158: FND_LOG.STRING(g_level_procedure,
4159: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg.END',
4160: 'ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg(-)'||'process for appl flag' ||g_process_for_appl_flg);
4161: END IF;
4162:
4163: EXCEPTION
4164: WHEN OTHERS THEN
4164: WHEN OTHERS THEN
4165: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4166: IF (g_level_unexpected >= g_current_runtime_level ) THEN
4167: FND_LOG.STRING(g_level_unexpected,
4168: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg',
4169: 'No data found: p_tax_prof_id: '||p_tax_prof_id);
4170: FND_LOG.STRING(g_level_unexpected,
4171: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg',
4172: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
4167: FND_LOG.STRING(g_level_unexpected,
4168: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg',
4169: 'No data found: p_tax_prof_id: '||p_tax_prof_id);
4170: FND_LOG.STRING(g_level_unexpected,
4171: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg',
4172: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
4173: FND_LOG.STRING(g_level_unexpected,
4174: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg.END',
4175: 'ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg(-)');
4170: FND_LOG.STRING(g_level_unexpected,
4171: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg',
4172: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
4173: FND_LOG.STRING(g_level_unexpected,
4174: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg.END',
4175: 'ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg(-)');
4176: END IF;
4177:
4178: END get_process_for_appl_flg;
4171: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg',
4172: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
4173: FND_LOG.STRING(g_level_unexpected,
4174: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg.END',
4175: 'ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg(-)');
4176: END IF;
4177:
4178: END get_process_for_appl_flg;
4179:
4182: * ======================================================================*/
4183: BEGIN
4184: IF (g_level_procedure >= g_current_runtime_level ) THEN
4185: FND_LOG.STRING(g_level_procedure,
4186: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.constructor.BEGIN',
4187: 'ZX_TDS_CALC_SERVICES_PUB_PKG.constructor(+)');
4188:
4189: END IF;
4190:
4183: BEGIN
4184: IF (g_level_procedure >= g_current_runtime_level ) THEN
4185: FND_LOG.STRING(g_level_procedure,
4186: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.constructor.BEGIN',
4187: 'ZX_TDS_CALC_SERVICES_PUB_PKG.constructor(+)');
4188:
4189: END IF;
4190:
4191: initialize;
4191: initialize;
4192:
4193: IF (g_level_procedure >= g_current_runtime_level ) THEN
4194: FND_LOG.STRING(g_level_procedure,
4195: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.constructor.END',
4196: 'ZX_TDS_CALC_SERVICES_PUB_PKG.constructor(-)');
4197: END IF;
4198:
4199: END ZX_TDS_CALC_SERVICES_PUB_PKG ;
4192:
4193: IF (g_level_procedure >= g_current_runtime_level ) THEN
4194: FND_LOG.STRING(g_level_procedure,
4195: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.constructor.END',
4196: 'ZX_TDS_CALC_SERVICES_PUB_PKG.constructor(-)');
4197: END IF;
4198:
4199: END ZX_TDS_CALC_SERVICES_PUB_PKG ;
4195: 'ZX.PLSQL.ZX_TDS_CALC_SERVICES_PUB_PKG.constructor.END',
4196: 'ZX_TDS_CALC_SERVICES_PUB_PKG.constructor(-)');
4197: END IF;
4198:
4199: END ZX_TDS_CALC_SERVICES_PUB_PKG ;