2: /* $Header: zxditaxlnpoppkgb.pls 120.100.12020000.3 2013/03/13 06:58:10 ssohal ship $ */
3:
4:
5: g_current_runtime_level NUMBER;
6: g_level_statement CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
7: g_level_procedure CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
8: g_level_unexpected CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
9:
10: -----------------------------------------------------------------------
3:
4:
5: g_current_runtime_level NUMBER;
6: g_level_statement CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
7: g_level_procedure CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
8: g_level_unexpected CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
9:
10: -----------------------------------------------------------------------
11: -- PUBLIC PROCEDURE
4:
5: g_current_runtime_level NUMBER;
6: g_level_statement CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
7: g_level_procedure CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
8: g_level_unexpected CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
9:
10: -----------------------------------------------------------------------
11: -- PUBLIC PROCEDURE
12: -- cp_tsrm_val_to_zx_lines
32: j BINARY_INTEGER;
33:
34: BEGIN
35:
36: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
37:
38: IF (g_level_statement >= g_current_runtime_level ) THEN
39: FND_LOG.STRING(g_level_statement,
40: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.cp_tsrm_val_to_zx_lines.BEGIN',
35:
36: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
37:
38: IF (g_level_statement >= g_current_runtime_level ) THEN
39: FND_LOG.STRING(g_level_statement,
40: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.cp_tsrm_val_to_zx_lines.BEGIN',
41: 'ZX_TDS_TAX_LINES_POPU_PKG: cp_tsrm_val_to_zx_lines(+)');
42: END IF;
43:
52: --
53: IF (p_begin_index IS NULL OR p_end_index IS NULL) THEN
54:
55: IF (g_level_statement >= g_current_runtime_level ) THEN
56: FND_LOG.STRING(g_level_statement,
57: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.cp_tsrm_val_to_zx_lines.END',
58: 'ZX_TDS_TAX_LINES_POPU_PKG: cp_tsrm_val_to_zx_lines(-)'||'Begin index or End index is null');
59:
60: END IF;
519: END LOOP;
520:
521: IF (g_level_statement >= g_current_runtime_level ) THEN
522:
523: FND_LOG.STRING(g_level_statement,
524: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.cp_tsrm_val_to_zx_lines.END',
525: 'ZX_TDS_TAX_LINES_POPU_PKG: cp_tsrm_val_to_zx_lines(-)'||p_return_status);
526: END IF;
527:
530: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
531: p_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
532:
533: IF (g_level_unexpected >= g_current_runtime_level ) THEN
534: FND_LOG.STRING(g_level_unexpected,
535: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.cp_tsrm_val_to_zx_lines',
536: p_error_buffer);
537: END IF;
538:
555: p_error_buffer OUT NOCOPY VARCHAR2)
556: IS
557: BEGIN
558:
559: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
560:
561: IF (g_level_statement >= g_current_runtime_level ) THEN
562: FND_LOG.STRING(g_level_statement,
563: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.populate_tax_lines.BEGIN',
558:
559: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
560:
561: IF (g_level_statement >= g_current_runtime_level ) THEN
562: FND_LOG.STRING(g_level_statement,
563: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.populate_tax_lines.BEGIN',
564: 'ZX_TDS_TAX_LINES_POPU_PKG: populate_tax_lines(+)');
565: END IF;
566:
597: p_error_buffer);
598:
599: IF (g_level_statement >= g_current_runtime_level ) THEN
600:
601: FND_LOG.STRING(g_level_statement,
602: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.populate_tax_lines.END',
603: 'ZX_TDS_TAX_LINES_POPU_PKG: populate_tax_lines(-)'||p_return_status);
604: END IF;
605:
608: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
609: p_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
610:
611: IF (g_level_unexpected >= g_current_runtime_level ) THEN
612: FND_LOG.STRING(g_level_unexpected,
613: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.populate_tax_line',
614: p_error_buffer);
615: END IF;
616:
630:
631: IS
632: BEGIN
633:
634: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
635:
636: IF (g_level_statement >= g_current_runtime_level ) THEN
637: FND_LOG.STRING(g_level_statement,
638: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.populate_orig_columns.BEGIN',
633:
634: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
635:
636: IF (g_level_statement >= g_current_runtime_level ) THEN
637: FND_LOG.STRING(g_level_statement,
638: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.populate_orig_columns.BEGIN',
639: 'ZX_TDS_TAX_LINES_POPU_PKG: populate_orig_columns(+)');
640: END IF;
641:
671:
672:
673: IF (g_level_statement >= g_current_runtime_level ) THEN
674:
675: FND_LOG.STRING(g_level_statement,
676: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.populate_orig_columns.END',
677: 'ZX_TDS_TAX_LINES_POPU_PKG: populate_orig_columns(-)');
678: END IF;
679:
680: EXCEPTION
681: WHEN OTHERS THEN
682:
683: IF (g_level_unexpected >= g_current_runtime_level ) THEN
684: FND_LOG.STRING(g_level_unexpected,
685: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.populate_orig_columns',
686: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
687: END IF;
688:
707: IS
708:
709: BEGIN
710:
711: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
712:
713: IF (g_level_statement >= g_current_runtime_level ) THEN
714: FND_LOG.STRING(g_level_statement,
715: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.populate_mandatory_columns.BEGIN',
710:
711: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
712:
713: IF (g_level_statement >= g_current_runtime_level ) THEN
714: FND_LOG.STRING(g_level_statement,
715: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.populate_mandatory_columns.BEGIN',
716: 'ZX_TDS_TAX_LINES_POPU_PKG: populate_mandatory_columns(+)');
717: END IF;
718:
761: p_tax_line_rec.last_update_date := sysdate;
762:
763: IF (g_level_statement >= g_current_runtime_level ) THEN
764:
765: FND_LOG.STRING(g_level_statement,
766: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.populate_mandatory_columns.END',
767: 'ZX_TDS_TAX_LINES_POPU_PKG: populate_mandatory_columns(-)'||p_return_status);
768: END IF;
769:
772: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
773: p_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
774:
775: IF (g_level_unexpected >= g_current_runtime_level ) THEN
776: FND_LOG.STRING(g_level_unexpected,
777: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.populate_mandatory_columns',
778: p_error_buffer);
779: END IF;
780:
797:
798: IS
799: BEGIN
800:
801: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
802:
803: IF (g_level_statement >= g_current_runtime_level ) THEN
804: FND_LOG.STRING(g_level_statement,
805: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.check_mandatory_columns.BEGIN',
800:
801: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
802:
803: IF (g_level_statement >= g_current_runtime_level ) THEN
804: FND_LOG.STRING(g_level_statement,
805: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.check_mandatory_columns.BEGIN',
806: 'ZX_TDS_TAX_LINES_POPU_PKG: check_mandatory_columns(+)');
807: END IF;
808:
821: p_error_buffer);
822: END IF;
823:
824: IF (g_level_statement >= g_current_runtime_level ) THEN
825: FND_LOG.STRING(g_level_statement,
826: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.check_mandatory_columns',
827: 'p_return_status = ' || p_return_status);
828: FND_LOG.STRING(g_level_statement,
829: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.check_mandatory_columns',
824: IF (g_level_statement >= g_current_runtime_level ) THEN
825: FND_LOG.STRING(g_level_statement,
826: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.check_mandatory_columns',
827: 'p_return_status = ' || p_return_status);
828: FND_LOG.STRING(g_level_statement,
829: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.check_mandatory_columns',
830: 'p_error_buffer = ' || p_error_buffer);
831: FND_LOG.STRING(g_level_statement,
832: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.check_mandatory_columns.END',
827: 'p_return_status = ' || p_return_status);
828: FND_LOG.STRING(g_level_statement,
829: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.check_mandatory_columns',
830: 'p_error_buffer = ' || p_error_buffer);
831: FND_LOG.STRING(g_level_statement,
832: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.check_mandatory_columns.END',
833: 'ZX_TDS_TAX_LINES_POPU_PKG: check_mandatory_columns(-)');
834: END IF;
835:
838: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
839: p_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
840:
841: IF (g_level_unexpected >= g_current_runtime_level ) THEN
842: FND_LOG.STRING(g_level_unexpected,
843: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.check_mandatory_columns',
844: p_error_buffer);
845: END IF;
846:
863:
864: IS
865: BEGIN
866:
867: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
868:
869: IF (g_level_statement >= g_current_runtime_level ) THEN
870: FND_LOG.STRING(g_level_statement,
871: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.check_mandatory_columns_all.BEGIN',
866:
867: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
868:
869: IF (g_level_statement >= g_current_runtime_level ) THEN
870: FND_LOG.STRING(g_level_statement,
871: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.check_mandatory_columns_all.BEGIN',
872: 'ZX_TDS_TAX_LINES_POPU_PKG: check_mandatory_columns_all(+)');
873: END IF;
874:
921: p_error_buffer := 'tax_status_code can not be NULL';
922: END IF;
923:
924: IF (g_level_statement >= g_current_runtime_level ) THEN
925: FND_LOG.STRING(g_level_statement,
926: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.check_mandatory_columns_all',
927: 'p_return_status = ' || p_return_status);
928: FND_LOG.STRING(g_level_statement,
929: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.check_mandatory_columns_all',
924: IF (g_level_statement >= g_current_runtime_level ) THEN
925: FND_LOG.STRING(g_level_statement,
926: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.check_mandatory_columns_all',
927: 'p_return_status = ' || p_return_status);
928: FND_LOG.STRING(g_level_statement,
929: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.check_mandatory_columns_all',
930: 'p_error_buffer = ' || p_error_buffer);
931: FND_LOG.STRING(g_level_statement,
932: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.check_mandatory_columns_all.END',
927: 'p_return_status = ' || p_return_status);
928: FND_LOG.STRING(g_level_statement,
929: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.check_mandatory_columns_all',
930: 'p_error_buffer = ' || p_error_buffer);
931: FND_LOG.STRING(g_level_statement,
932: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.check_mandatory_columns_all.END',
933: 'ZX_TDS_TAX_LINES_POPU_PKG: check_mandatory_columns_all(-)');
934: END IF;
935:
938: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
939: p_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
940:
941: IF (g_level_unexpected >= g_current_runtime_level ) THEN
942: FND_LOG.STRING(g_level_unexpected,
943: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.check_mandatory_columns_all',
944: p_error_buffer);
945: END IF;
946:
965:
966: IS
967: BEGIN
968:
969: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
970:
971: IF (g_level_statement >= g_current_runtime_level ) THEN
972: FND_LOG.STRING(g_level_statement,
973: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.check_non_manual_tax_line.BEGIN',
968:
969: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
970:
971: IF (g_level_statement >= g_current_runtime_level ) THEN
972: FND_LOG.STRING(g_level_statement,
973: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.check_non_manual_tax_line.BEGIN',
974: 'ZX_TDS_TAX_LINES_POPU_PKG: check_non_manual_tax_line(+)');
975: END IF;
976:
1021:
1022: END IF;
1023:
1024: IF (g_level_statement >= g_current_runtime_level ) THEN
1025: FND_LOG.STRING(g_level_statement,
1026: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.check_non_manual_tax_line',
1027: 'p_return_status = ' || p_return_status);
1028: FND_LOG.STRING(g_level_statement,
1029: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.check_non_manual_tax_line',
1024: IF (g_level_statement >= g_current_runtime_level ) THEN
1025: FND_LOG.STRING(g_level_statement,
1026: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.check_non_manual_tax_line',
1027: 'p_return_status = ' || p_return_status);
1028: FND_LOG.STRING(g_level_statement,
1029: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.check_non_manual_tax_line',
1030: 'p_error_buffer = ' || p_error_buffer);
1031: FND_LOG.STRING(g_level_statement,
1032: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.check_non_manual_tax_line.END',
1027: 'p_return_status = ' || p_return_status);
1028: FND_LOG.STRING(g_level_statement,
1029: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.check_non_manual_tax_line',
1030: 'p_error_buffer = ' || p_error_buffer);
1031: FND_LOG.STRING(g_level_statement,
1032: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.check_non_manual_tax_line.END',
1033: 'ZX_TDS_TAX_LINES_POPU_PKG: check_non_manual_tax_line(-)');
1034: END IF;
1035:
1038: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1039: p_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
1040:
1041: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1042: FND_LOG.STRING(g_level_unexpected,
1043: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.check_non_manual_tax_line',
1044: p_error_buffer);
1045: END IF;
1046:
1069: IS
1070:
1071: BEGIN
1072:
1073: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1074:
1075: IF (g_level_statement >= g_current_runtime_level ) THEN
1076: FND_LOG.STRING(g_level_statement,
1077: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_tax_line_for_trx_line.BEGIN',
1072:
1073: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1074:
1075: IF (g_level_statement >= g_current_runtime_level ) THEN
1076: FND_LOG.STRING(g_level_statement,
1077: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_tax_line_for_trx_line.BEGIN',
1078: 'ZX_TDS_TAX_LINES_POPU_PKG: pop_tax_line_for_trx_line(+)');
1079: FND_LOG.STRING(g_level_statement,
1080: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_tax_line_for_trx_line',
1075: IF (g_level_statement >= g_current_runtime_level ) THEN
1076: FND_LOG.STRING(g_level_statement,
1077: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_tax_line_for_trx_line.BEGIN',
1078: 'ZX_TDS_TAX_LINES_POPU_PKG: pop_tax_line_for_trx_line(+)');
1079: FND_LOG.STRING(g_level_statement,
1080: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_tax_line_for_trx_line',
1081: 'p_begin_index = ' || to_char(p_begin_index));
1082: FND_LOG.STRING(g_level_statement,
1083: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_tax_line_for_trx_line',
1078: 'ZX_TDS_TAX_LINES_POPU_PKG: pop_tax_line_for_trx_line(+)');
1079: FND_LOG.STRING(g_level_statement,
1080: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_tax_line_for_trx_line',
1081: 'p_begin_index = ' || to_char(p_begin_index));
1082: FND_LOG.STRING(g_level_statement,
1083: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_tax_line_for_trx_line',
1084: 'p_end_index = ' || to_char(p_end_index));
1085: END IF;
1086:
1092: --
1093: IF (p_begin_index IS NULL OR p_end_index IS NULL) THEN
1094:
1095: IF (g_level_statement >= g_current_runtime_level ) THEN
1096: FND_LOG.STRING(g_level_statement,
1097: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_tax_line_for_trx_line',
1098: 'Begin index or End index is null' );
1099: END IF;
1100:
1121: RETURN;
1122: END IF;
1123:
1124: IF (g_level_statement >= g_current_runtime_level ) THEN
1125: FND_LOG.STRING(g_level_statement,
1126: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_tax_line_for_trx_lines',
1127: 'p_return_status = ' || p_return_status);
1128: FND_LOG.STRING(g_level_statement,
1129: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_tax_line_for_trx_lines',
1124: IF (g_level_statement >= g_current_runtime_level ) THEN
1125: FND_LOG.STRING(g_level_statement,
1126: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_tax_line_for_trx_lines',
1127: 'p_return_status = ' || p_return_status);
1128: FND_LOG.STRING(g_level_statement,
1129: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_tax_line_for_trx_lines',
1130: 'p_error_buffer = ' || p_error_buffer);
1131: FND_LOG.STRING(g_level_statement,
1132: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_tax_line_for_trx_lines.END',
1127: 'p_return_status = ' || p_return_status);
1128: FND_LOG.STRING(g_level_statement,
1129: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_tax_line_for_trx_lines',
1130: 'p_error_buffer = ' || p_error_buffer);
1131: FND_LOG.STRING(g_level_statement,
1132: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_tax_line_for_trx_lines.END',
1133: 'ZX_TDS_TAX_LINES_POPU_PKG: pop_tax_line_for_trx_lines(-)');
1134: END IF;
1135:
1138: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1139: p_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
1140:
1141: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1142: FND_LOG.STRING(g_level_unexpected,
1143: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_tax_line_for_trx_line',
1144: p_error_buffer);
1145: END IF;
1146:
1168: l_process_offset_flag VARCHAR2(1);
1169:
1170: BEGIN
1171:
1172: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1173:
1174: IF (g_level_statement >= g_current_runtime_level ) THEN
1175: FND_LOG.STRING(g_level_statement,
1176: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_mandatory_col_for_trx_line.BEGIN',
1171:
1172: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1173:
1174: IF (g_level_statement >= g_current_runtime_level ) THEN
1175: FND_LOG.STRING(g_level_statement,
1176: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_mandatory_col_for_trx_line.BEGIN',
1177: 'ZX_TDS_TAX_LINES_POPU_PKG: pop_mandatory_col_for_trx_line(+)');
1178: FND_LOG.STRING(g_level_statement,
1179: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_mandatory_col_for_trx_line',
1174: IF (g_level_statement >= g_current_runtime_level ) THEN
1175: FND_LOG.STRING(g_level_statement,
1176: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_mandatory_col_for_trx_line.BEGIN',
1177: 'ZX_TDS_TAX_LINES_POPU_PKG: pop_mandatory_col_for_trx_line(+)');
1178: FND_LOG.STRING(g_level_statement,
1179: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_mandatory_col_for_trx_line',
1180: 'p_begin_index = ' || to_char(p_begin_index));
1181: FND_LOG.STRING(g_level_statement,
1182: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_mandatory_col_for_trx_line',
1177: 'ZX_TDS_TAX_LINES_POPU_PKG: pop_mandatory_col_for_trx_line(+)');
1178: FND_LOG.STRING(g_level_statement,
1179: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_mandatory_col_for_trx_line',
1180: 'p_begin_index = ' || to_char(p_begin_index));
1181: FND_LOG.STRING(g_level_statement,
1182: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_mandatory_col_for_trx_line',
1183: 'p_end_index = ' || to_char(p_end_index));
1184: END IF;
1185:
1193: --
1194: IF (p_begin_index IS NULL OR p_end_index IS NULL) THEN
1195:
1196: IF (g_level_statement >= g_current_runtime_level ) THEN
1197: FND_LOG.STRING(g_level_statement,
1198: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_mandatory_col_for_trx_line',
1199: 'Begin index or End index is null' );
1200: END IF;
1201:
1204:
1205: FOR i IN p_begin_index ..p_end_index LOOP
1206:
1207: IF (g_level_statement >= g_current_runtime_level ) THEN
1208: FND_LOG.STRING(g_level_statement,
1209: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_mandatory_col_for_trx_line',
1210: 'Processing detail line index = ' || to_char(i));
1211: END IF;
1212:
1264: l_process_offset_flag := 'Y';
1265: END IF;
1266:
1267: IF (g_level_statement >= g_current_runtime_level ) THEN
1268: FND_LOG.STRING(g_level_statement,
1269: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_mandatory_col_for_trx_line',
1270: 'Tax_Line_Id = ' ||
1271: to_char(ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(i).tax_line_id));
1272: END IF;
1276:
1277: --bug8517610
1278: IF l_process_offset_flag = 'Y' THEN
1279: IF (g_level_statement >= g_current_runtime_level ) THEN
1280: FND_LOG.STRING(g_level_statement,
1281: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_mandatory_col_for_trx_line',
1282: 'Setting Offset_Link_To_Tax_Line_Id');
1283: END IF;
1284:
1296: ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(j).offset_link_to_tax_line_id :=
1297: ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(i).tax_line_id;
1298:
1299: IF (g_level_statement >= g_current_runtime_level ) THEN
1300: FND_LOG.STRING(g_level_statement,
1301: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_mandatory_col_for_trx_line',
1302: 'Tax_Line_Id '||
1303: TO_CHAR(ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(j).tax_line_id)||
1304: ' has Offset_Link_To_Tax_Line_Id '||
1313:
1314: END IF;
1315:
1316: IF (g_level_statement >= g_current_runtime_level ) THEN
1317: FND_LOG.STRING(g_level_statement,
1318: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_mandatory_col_for_trx_line',
1319: 'p_return_status = ' || p_return_status);
1320: FND_LOG.STRING(g_level_statement,
1321: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_mandatory_col_for_trx_line',
1316: IF (g_level_statement >= g_current_runtime_level ) THEN
1317: FND_LOG.STRING(g_level_statement,
1318: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_mandatory_col_for_trx_line',
1319: 'p_return_status = ' || p_return_status);
1320: FND_LOG.STRING(g_level_statement,
1321: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_mandatory_col_for_trx_line',
1322: 'p_error_buffer = ' || p_error_buffer);
1323: FND_LOG.STRING(g_level_statement,
1324: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_mandatory_col_for_trx_line.END',
1319: 'p_return_status = ' || p_return_status);
1320: FND_LOG.STRING(g_level_statement,
1321: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_mandatory_col_for_trx_line',
1322: 'p_error_buffer = ' || p_error_buffer);
1323: FND_LOG.STRING(g_level_statement,
1324: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_mandatory_col_for_trx_line.END',
1325: 'ZX_TDS_TAX_LINES_POPU_PKG: pop_mandatory_col_for_trx_line(-)');
1326: END IF;
1327:
1330: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1331: p_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
1332:
1333: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1334: FND_LOG.STRING(g_level_unexpected,
1335: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.pop_mandatory_col_for_trx_line',
1336: p_error_buffer);
1337: END IF;
1338:
1358:
1359: IS
1360: BEGIN
1361:
1362: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1363:
1364: IF (g_level_statement >= g_current_runtime_level ) THEN
1365: FND_LOG.STRING(g_level_statement,
1366: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mandatory_col_for_trx_line.BEGIN',
1361:
1362: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1363:
1364: IF (g_level_statement >= g_current_runtime_level ) THEN
1365: FND_LOG.STRING(g_level_statement,
1366: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mandatory_col_for_trx_line.BEGIN',
1367: 'ZX_TDS_TAX_LINES_POPU_PKG: chk_mandatory_col_for_trx_line(+)');
1368: FND_LOG.STRING(g_level_statement,
1369: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mandatory_col_for_trx_line',
1364: IF (g_level_statement >= g_current_runtime_level ) THEN
1365: FND_LOG.STRING(g_level_statement,
1366: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mandatory_col_for_trx_line.BEGIN',
1367: 'ZX_TDS_TAX_LINES_POPU_PKG: chk_mandatory_col_for_trx_line(+)');
1368: FND_LOG.STRING(g_level_statement,
1369: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mandatory_col_for_trx_line',
1370: 'p_begin_index = ' || to_char(p_begin_index));
1371: FND_LOG.STRING(g_level_statement,
1372: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mandatory_col_for_trx_line',
1367: 'ZX_TDS_TAX_LINES_POPU_PKG: chk_mandatory_col_for_trx_line(+)');
1368: FND_LOG.STRING(g_level_statement,
1369: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mandatory_col_for_trx_line',
1370: 'p_begin_index = ' || to_char(p_begin_index));
1371: FND_LOG.STRING(g_level_statement,
1372: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mandatory_col_for_trx_line',
1373: 'p_end_index = ' || to_char(p_end_index));
1374: END IF;
1375:
1380: --
1381: IF (p_begin_index IS NULL OR p_end_index IS NULL) THEN
1382:
1383: IF (g_level_statement >= g_current_runtime_level ) THEN
1384: FND_LOG.STRING(g_level_statement,
1385: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mandatory_col_for_trx_line',
1386: 'Begin index or End index is null' );
1387: END IF;
1388:
1415: RETURN;
1416: END IF;
1417:
1418: IF (g_level_statement >= g_current_runtime_level ) THEN
1419: FND_LOG.STRING(g_level_statement,
1420: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mandatory_col_for_trx_line',
1421: 'p_return_status = ' || p_return_status);
1422: FND_LOG.STRING(g_level_statement,
1423: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mandatory_col_for_trx_line',
1418: IF (g_level_statement >= g_current_runtime_level ) THEN
1419: FND_LOG.STRING(g_level_statement,
1420: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mandatory_col_for_trx_line',
1421: 'p_return_status = ' || p_return_status);
1422: FND_LOG.STRING(g_level_statement,
1423: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mandatory_col_for_trx_line',
1424: 'p_error_buffer = ' || p_error_buffer);
1425: FND_LOG.STRING(g_level_statement,
1426: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mandatory_col_for_trx_line.END',
1421: 'p_return_status = ' || p_return_status);
1422: FND_LOG.STRING(g_level_statement,
1423: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mandatory_col_for_trx_line',
1424: 'p_error_buffer = ' || p_error_buffer);
1425: FND_LOG.STRING(g_level_statement,
1426: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mandatory_col_for_trx_line.END',
1427: 'ZX_TDS_TAX_LINES_POPU_PKG: chk_mandatory_col_for_trx_line(-)');
1428: END IF;
1429:
1432: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1433: p_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
1434:
1435: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1436: FND_LOG.STRING(g_level_unexpected,
1437: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mandatory_col_for_trx_line',
1438: p_error_buffer);
1439: END IF;
1440:
1458: p_error_buffer OUT NOCOPY VARCHAR2)
1459: IS
1460: BEGIN
1461:
1462: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1463:
1464: IF (g_level_statement >= g_current_runtime_level ) THEN
1465: FND_LOG.STRING(g_level_statement,
1466: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mand_col_all_for_trx_line.BEGIN',
1461:
1462: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1463:
1464: IF (g_level_statement >= g_current_runtime_level ) THEN
1465: FND_LOG.STRING(g_level_statement,
1466: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mand_col_all_for_trx_line.BEGIN',
1467: 'ZX_TDS_TAX_LINES_POPU_PKG: chk_mand_col_all_for_trx_line(+)');
1468: FND_LOG.STRING(g_level_statement,
1469: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mand_col_all_for_trx_line',
1464: IF (g_level_statement >= g_current_runtime_level ) THEN
1465: FND_LOG.STRING(g_level_statement,
1466: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mand_col_all_for_trx_line.BEGIN',
1467: 'ZX_TDS_TAX_LINES_POPU_PKG: chk_mand_col_all_for_trx_line(+)');
1468: FND_LOG.STRING(g_level_statement,
1469: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mand_col_all_for_trx_line',
1470: 'p_begin_index = ' || to_char(p_begin_index));
1471: FND_LOG.STRING(g_level_statement,
1472: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mand_col_all_for_trx_line',
1467: 'ZX_TDS_TAX_LINES_POPU_PKG: chk_mand_col_all_for_trx_line(+)');
1468: FND_LOG.STRING(g_level_statement,
1469: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mand_col_all_for_trx_line',
1470: 'p_begin_index = ' || to_char(p_begin_index));
1471: FND_LOG.STRING(g_level_statement,
1472: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mand_col_all_for_trx_line',
1473: 'p_end_index = ' || to_char(p_end_index));
1474: END IF;
1475:
1480: --
1481: IF (p_begin_index IS NULL OR p_end_index IS NULL) THEN
1482:
1483: IF (g_level_statement >= g_current_runtime_level ) THEN
1484: FND_LOG.STRING(g_level_statement,
1485: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mand_col_all_for_trx_line',
1486: 'Begin index or End index is null' );
1487: END IF;
1488:
1491:
1492: FOR i IN p_begin_index ..p_end_index LOOP
1493:
1494: IF (g_level_statement >= g_current_runtime_level ) THEN
1495: FND_LOG.STRING(g_level_statement,
1496: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mand_col_all_for_trx_line',
1497: 'processing detail line index = ' || to_char(i));
1498: END IF;
1499:
1550:
1551: END LOOP;
1552:
1553: IF (g_level_statement >= g_current_runtime_level ) THEN
1554: FND_LOG.STRING(g_level_statement,
1555: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mand_col_all_for_trx_line',
1556: 'p_return_status = ' || p_return_status);
1557: FND_LOG.STRING(g_level_statement,
1558: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mand_col_all_for_trx_line',
1553: IF (g_level_statement >= g_current_runtime_level ) THEN
1554: FND_LOG.STRING(g_level_statement,
1555: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mand_col_all_for_trx_line',
1556: 'p_return_status = ' || p_return_status);
1557: FND_LOG.STRING(g_level_statement,
1558: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mand_col_all_for_trx_line',
1559: 'p_error_buffer = ' || p_error_buffer);
1560: FND_LOG.STRING(g_level_statement,
1561: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mand_col_all_for_trx_line.END',
1556: 'p_return_status = ' || p_return_status);
1557: FND_LOG.STRING(g_level_statement,
1558: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mand_col_all_for_trx_line',
1559: 'p_error_buffer = ' || p_error_buffer);
1560: FND_LOG.STRING(g_level_statement,
1561: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mand_col_all_for_trx_line.END',
1562: 'ZX_TDS_TAX_LINES_POPU_PKG: chk_mand_col_all_for_trx_line(-)');
1563: END IF;
1564:
1567: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1568: p_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
1569:
1570: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1571: FND_LOG.STRING(g_level_unexpected,
1572: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_mand_col_all_for_trx_line',
1573: p_error_buffer);
1574: END IF;
1575:
1595: p_error_buffer OUT NOCOPY VARCHAR2)
1596: IS
1597: BEGIN
1598:
1599: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1600:
1601: IF (g_level_statement >= g_current_runtime_level ) THEN
1602: FND_LOG.STRING(g_level_statement,
1603: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_non_manual_line_f_trx_line.BEGIN',
1598:
1599: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1600:
1601: IF (g_level_statement >= g_current_runtime_level ) THEN
1602: FND_LOG.STRING(g_level_statement,
1603: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_non_manual_line_f_trx_line.BEGIN',
1604: 'ZX_TDS_TAX_LINES_POPU_PKG: chk_non_manual_line_f_trx_line(+)');
1605: FND_LOG.STRING(g_level_statement,
1606: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_non_manual_line_f_trx_line',
1601: IF (g_level_statement >= g_current_runtime_level ) THEN
1602: FND_LOG.STRING(g_level_statement,
1603: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_non_manual_line_f_trx_line.BEGIN',
1604: 'ZX_TDS_TAX_LINES_POPU_PKG: chk_non_manual_line_f_trx_line(+)');
1605: FND_LOG.STRING(g_level_statement,
1606: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_non_manual_line_f_trx_line',
1607: 'p_begin_index = ' || to_char(p_begin_index));
1608: FND_LOG.STRING(g_level_statement,
1609: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_non_manual_line_f_trx_line',
1604: 'ZX_TDS_TAX_LINES_POPU_PKG: chk_non_manual_line_f_trx_line(+)');
1605: FND_LOG.STRING(g_level_statement,
1606: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_non_manual_line_f_trx_line',
1607: 'p_begin_index = ' || to_char(p_begin_index));
1608: FND_LOG.STRING(g_level_statement,
1609: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_non_manual_line_f_trx_line',
1610: 'p_end_index = ' || to_char(p_end_index));
1611: END IF;
1612:
1617: --
1618: IF (p_begin_index IS NULL OR p_end_index IS NULL) THEN
1619:
1620: IF (g_level_statement >= g_current_runtime_level ) THEN
1621: FND_LOG.STRING(g_level_statement,
1622: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_non_manual_line_f_trx_line',
1623: 'Begin index or End index is null' );
1624: END IF;
1625:
1628:
1629: FOR i IN p_begin_index ..p_end_index LOOP
1630:
1631: IF (g_level_statement >= g_current_runtime_level ) THEN
1632: FND_LOG.STRING(g_level_statement,
1633: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_non_manual_line_f_trx_line',
1634: 'processing detail line index = ' || to_char(i));
1635: END IF;
1636:
1686: END IF; -- non manual tax line
1687: END LOOP;
1688:
1689: IF (g_level_statement >= g_current_runtime_level ) THEN
1690: FND_LOG.STRING(g_level_statement,
1691: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_non_manual_line_f_trx_line',
1692: 'p_return_status = ' || p_return_status);
1693: FND_LOG.STRING(g_level_statement,
1694: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_non_manual_line_f_trx_line',
1689: IF (g_level_statement >= g_current_runtime_level ) THEN
1690: FND_LOG.STRING(g_level_statement,
1691: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_non_manual_line_f_trx_line',
1692: 'p_return_status = ' || p_return_status);
1693: FND_LOG.STRING(g_level_statement,
1694: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_non_manual_line_f_trx_line',
1695: 'p_error_buffer = ' || p_error_buffer);
1696: FND_LOG.STRING(g_level_statement,
1697: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_non_manual_line_f_trx_line.END',
1692: 'p_return_status = ' || p_return_status);
1693: FND_LOG.STRING(g_level_statement,
1694: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_non_manual_line_f_trx_line',
1695: 'p_error_buffer = ' || p_error_buffer);
1696: FND_LOG.STRING(g_level_statement,
1697: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_non_manual_line_f_trx_line.END',
1698: 'ZX_TDS_TAX_LINES_POPU_PKG: chk_non_manual_line_f_trx_line(-)');
1699: END IF;
1700:
1703: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1704: p_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
1705:
1706: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1707: FND_LOG.STRING(g_level_unexpected,
1708: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.chk_non_manual_line_f_trx_line',
1709: p_error_buffer);
1710: END IF;
1711:
1730:
1731: IS
1732: BEGIN
1733:
1734: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1735:
1736: IF (g_level_procedure >= g_current_runtime_level ) THEN
1737: FND_LOG.STRING(g_level_procedure,
1738: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_cancel_tax_lines.BEGIN',
1733:
1734: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1735:
1736: IF (g_level_procedure >= g_current_runtime_level ) THEN
1737: FND_LOG.STRING(g_level_procedure,
1738: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_cancel_tax_lines.BEGIN',
1739: 'ZX_TDS_TAX_LINES_POPU_PKG: process_cancel_tax_lines(+)');
1740: END IF;
1741:
2381: )
2382: );
2383:
2384: IF (g_level_statement >= g_current_runtime_level ) THEN
2385: FND_LOG.STRING(g_level_statement,
2386: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_cancel_tax_lines',
2387: 'Number of Rows Inserted: ' || SQL%ROWCOUNT);
2388: END IF;
2389:
2387: 'Number of Rows Inserted: ' || SQL%ROWCOUNT);
2388: END IF;
2389:
2390: IF (g_level_procedure >= g_current_runtime_level ) THEN
2391: FND_LOG.STRING(g_level_procedure,
2392: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_cancel_tax_lines',
2393: 'p_return_status = ' || p_return_status);
2394: FND_LOG.STRING(g_level_procedure,
2395: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_cancel_tax_lines',
2390: IF (g_level_procedure >= g_current_runtime_level ) THEN
2391: FND_LOG.STRING(g_level_procedure,
2392: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_cancel_tax_lines',
2393: 'p_return_status = ' || p_return_status);
2394: FND_LOG.STRING(g_level_procedure,
2395: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_cancel_tax_lines',
2396: 'p_error_buffer = ' || p_error_buffer);
2397: FND_LOG.STRING(g_level_procedure,
2398: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_cancel_tax_lines.END',
2393: 'p_return_status = ' || p_return_status);
2394: FND_LOG.STRING(g_level_procedure,
2395: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_cancel_tax_lines',
2396: 'p_error_buffer = ' || p_error_buffer);
2397: FND_LOG.STRING(g_level_procedure,
2398: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_cancel_tax_lines.END',
2399: 'ZX_TDS_TAX_LINES_POPU_PKG: process_cancel_tax_lines(-)');
2400: END IF;
2401:
2404: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2405: p_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
2406:
2407: IF (g_level_unexpected >= g_current_runtime_level ) THEN
2408: FND_LOG.STRING(g_level_unexpected,
2409: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_cancel_tax_lines',
2410: p_error_buffer);
2411: END IF;
2412:
2431:
2432: IS
2433: BEGIN
2434:
2435: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2436:
2437: IF (g_level_procedure >= g_current_runtime_level ) THEN
2438: FND_LOG.STRING(g_level_procedure,
2439: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_frozen_tax_lines.BEGIN',
2434:
2435: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2436:
2437: IF (g_level_procedure >= g_current_runtime_level ) THEN
2438: FND_LOG.STRING(g_level_procedure,
2439: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_frozen_tax_lines.BEGIN',
2440: 'ZX_TDS_TAX_LINES_POPU_PKG: process_frozen_tax_lines(+)');
2441: END IF;
2442:
3225: AND zl.cancel_flag <> 'Y'
3226: );
3227:
3228: IF (g_level_statement >= g_current_runtime_level ) THEN
3229: FND_LOG.STRING(g_level_statement,
3230: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_frozen_tax_lines',
3231: 'Number of Rows Updated: ' || SQL%ROWCOUNT);
3232: END IF;
3233:
3885: )
3886: );
3887:
3888: IF (g_level_statement >= g_current_runtime_level ) THEN
3889: FND_LOG.STRING(g_level_statement,
3890: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_frozen_tax_lines',
3891: 'Number of Rows Inserted: ' || SQL%ROWCOUNT);
3892: END IF;
3893:
3893:
3894: END IF; -- tax_event_type_code = OVERRIDE_TAX, or else
3895:
3896: IF (g_level_procedure >= g_current_runtime_level ) THEN
3897: FND_LOG.STRING(g_level_procedure,
3898: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_frozen_tax_lines',
3899: 'p_return_status = ' || p_return_status);
3900: FND_LOG.STRING(g_level_procedure,
3901: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_frozen_tax_lines',
3896: IF (g_level_procedure >= g_current_runtime_level ) THEN
3897: FND_LOG.STRING(g_level_procedure,
3898: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_frozen_tax_lines',
3899: 'p_return_status = ' || p_return_status);
3900: FND_LOG.STRING(g_level_procedure,
3901: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_frozen_tax_lines',
3902: 'p_error_buffer = ' || p_error_buffer);
3903: FND_LOG.STRING(g_level_procedure,
3904: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_frozen_tax_lines.END',
3899: 'p_return_status = ' || p_return_status);
3900: FND_LOG.STRING(g_level_procedure,
3901: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_frozen_tax_lines',
3902: 'p_error_buffer = ' || p_error_buffer);
3903: FND_LOG.STRING(g_level_procedure,
3904: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_frozen_tax_lines.END',
3905: 'ZX_TDS_TAX_LINES_POPU_PKG: process_frozen_tax_lines(-)');
3906: END IF;
3907:
3910: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3911: p_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
3912:
3913: IF (g_level_unexpected >= g_current_runtime_level ) THEN
3914: FND_LOG.STRING(g_level_unexpected,
3915: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_frozen_tax_lines',
3916: p_error_buffer);
3917: END IF;
3918:
3936:
3937: IS
3938: BEGIN
3939:
3940: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
3941:
3942: IF (g_level_procedure >= g_current_runtime_level ) THEN
3943: FND_LOG.STRING(g_level_procedure,
3944: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_discard_tax_lines.BEGIN',
3939:
3940: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
3941:
3942: IF (g_level_procedure >= g_current_runtime_level ) THEN
3943: FND_LOG.STRING(g_level_procedure,
3944: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_discard_tax_lines.BEGIN',
3945: 'ZX_TDS_TAX_LINES_POPU_PKG: process_discard_tax_lines(+)');
3946: END IF;
3947:
4590: )
4591: );
4592:
4593: IF (g_level_procedure >= g_current_runtime_level ) THEN
4594: FND_LOG.STRING(g_level_procedure,
4595: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_discard_tax_lines',
4596: 'Number of Rows Inserted: ' || SQL%ROWCOUNT);
4597: FND_LOG.STRING(g_level_procedure,
4598: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_discard_tax_lines',
4593: IF (g_level_procedure >= g_current_runtime_level ) THEN
4594: FND_LOG.STRING(g_level_procedure,
4595: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_discard_tax_lines',
4596: 'Number of Rows Inserted: ' || SQL%ROWCOUNT);
4597: FND_LOG.STRING(g_level_procedure,
4598: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_discard_tax_lines',
4599: 'p_return_status = ' || p_return_status);
4600: FND_LOG.STRING(g_level_procedure,
4601: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_discard_tax_lines',
4596: 'Number of Rows Inserted: ' || SQL%ROWCOUNT);
4597: FND_LOG.STRING(g_level_procedure,
4598: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_discard_tax_lines',
4599: 'p_return_status = ' || p_return_status);
4600: FND_LOG.STRING(g_level_procedure,
4601: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_discard_tax_lines',
4602: 'p_error_buffer = ' || p_error_buffer);
4603: FND_LOG.STRING(g_level_procedure,
4604: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_discard_tax_lines.END',
4599: 'p_return_status = ' || p_return_status);
4600: FND_LOG.STRING(g_level_procedure,
4601: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_discard_tax_lines',
4602: 'p_error_buffer = ' || p_error_buffer);
4603: FND_LOG.STRING(g_level_procedure,
4604: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_discard_tax_lines.END',
4605: 'ZX_TDS_TAX_LINES_POPU_PKG: process_discard_tax_lines(-)');
4606: END IF;
4607:
4610: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4611: p_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
4612:
4613: IF (g_level_unexpected >= g_current_runtime_level ) THEN
4614: FND_LOG.STRING(g_level_unexpected,
4615: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_discard_tax_lines',
4616: p_error_buffer);
4617: END IF;
4618:
4637:
4638: IS
4639: BEGIN
4640:
4641: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
4642:
4643: IF (g_level_procedure >= g_current_runtime_level ) THEN
4644: FND_LOG.STRING(g_level_procedure,
4645: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_cancel_trx_lines.BEGIN',
4640:
4641: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
4642:
4643: IF (g_level_procedure >= g_current_runtime_level ) THEN
4644: FND_LOG.STRING(g_level_procedure,
4645: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_cancel_trx_lines.BEGIN',
4646: 'ZX_TDS_TAX_LINES_POPU_PKG: process_cancel_trx_lines(+)');
4647: END IF;
4648:
5269:
5270: );
5271:
5272: IF (g_level_procedure >= g_current_runtime_level ) THEN
5273: FND_LOG.STRING(g_level_procedure,
5274: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_cancel_trx_lines',
5275: 'p_return_status = ' || p_return_status);
5276: FND_LOG.STRING(g_level_procedure,
5277: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_cancel_trx_lines',
5272: IF (g_level_procedure >= g_current_runtime_level ) THEN
5273: FND_LOG.STRING(g_level_procedure,
5274: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_cancel_trx_lines',
5275: 'p_return_status = ' || p_return_status);
5276: FND_LOG.STRING(g_level_procedure,
5277: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_cancel_trx_lines',
5278: 'p_error_buffer = ' || p_error_buffer);
5279: FND_LOG.STRING(g_level_procedure,
5280: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_cancel_trx_lines.END',
5275: 'p_return_status = ' || p_return_status);
5276: FND_LOG.STRING(g_level_procedure,
5277: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_cancel_trx_lines',
5278: 'p_error_buffer = ' || p_error_buffer);
5279: FND_LOG.STRING(g_level_procedure,
5280: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_cancel_trx_lines.END',
5281: 'ZX_TDS_TAX_LINES_POPU_PKG: process_cancel_trx_lines(-)');
5282: END IF;
5283:
5286: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5287: p_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
5288:
5289: IF (g_level_unexpected >= g_current_runtime_level ) THEN
5290: FND_LOG.STRING(g_level_unexpected,
5291: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_cancel_trx_lines',
5292: p_error_buffer);
5293: END IF;
5294:
5461: );
5462:
5463: BEGIN
5464:
5465: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
5466:
5467: IF (g_level_statement >= g_current_runtime_level ) THEN
5468: FND_LOG.STRING(g_level_statement,
5469: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_tax_tolerance.BEGIN',
5464:
5465: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
5466:
5467: IF (g_level_statement >= g_current_runtime_level ) THEN
5468: FND_LOG.STRING(g_level_statement,
5469: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_tax_tolerance.BEGIN',
5470: 'ZX_TDS_TAX_LINES_POPU_PKG: process_tax_tolerance(+)');
5471: END IF;
5472:
5475: IF p_event_class_rec.tax_tolerance IS NOT NULL OR
5476: p_event_class_rec.tax_tol_amt_range IS NOT NULL
5477: THEN
5478: IF (g_level_statement >= g_current_runtime_level ) THEN
5479: FND_LOG.STRING(g_level_statement,
5480: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_tax_tolerance',
5481: 'Tax Tolerance: '||TO_CHAR(p_event_class_rec.tax_tolerance)||
5482: ', Tax Tolerance Amount Range: '||TO_CHAR(p_event_class_rec.tax_tol_amt_range)
5483: );
5497:
5498: l_count := l_orig_tax_amt_tax_curr_tbl.COUNT;
5499:
5500: IF (g_level_statement >= g_current_runtime_level ) THEN
5501: FND_LOG.STRING(g_level_statement,
5502: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_tax_tolerance',
5503: 'Number of rows fetched for OVERRIDE_TAX = ' || to_char(l_count));
5504: END IF;
5505:
5583: -- bulk update the current rows processed
5584: -- before fetch the next set of rows
5585: --
5586: IF (g_level_statement >= g_current_runtime_level) THEN
5587: FND_LOG.STRING(g_level_statement,
5588: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_tax_tolerance',
5589: 'Update ZX_DETAIL_TAX_LINES_GT with Tax Hold Info - OVERRIDE_TAX');
5590: END IF;
5591:
5596: tax_hold_released_code = nvl(l_tax_hold_released_code_tbl(i), tax_hold_released_code)
5597: WHERE tax_line_id = l_tax_line_id_tbl(i);
5598:
5599: IF (g_level_statement >= g_current_runtime_level ) THEN
5600: FND_LOG.STRING(g_level_statement,
5601: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_tax_tolerance',
5602: 'Number of Rows Updated: ' || SQL%ROWCOUNT);
5603: END IF;
5604: END IF; -- IF l_count
5626:
5627: l_count := l_orig_tax_amt_tax_curr_tbl.COUNT;
5628:
5629: IF (g_level_statement >= g_current_runtime_level ) THEN
5630: FND_LOG.STRING(g_level_statement,
5631: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_tax_tolerance',
5632: 'Number of rows fetched for Control Line Amount = ' || to_char(l_count));
5633: END IF;
5634:
5712: -- bulk update the current rows processed
5713: -- before fetch the next set of rows
5714: --
5715: IF (g_level_statement >= g_current_runtime_level ) THEN
5716: FND_LOG.STRING(g_level_statement,
5717: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_tax_tolerance',
5718: 'Update ZX_DETAIL_TAX_LINES_GT with Tax Hold Info - Control Line Amount');
5719: END IF;
5720:
5725: tax_hold_released_code = nvl(l_tax_hold_released_code_tbl(i), tax_hold_released_code)
5726: WHERE tax_line_id = l_tax_line_id_tbl(i);
5727:
5728: IF (g_level_statement >= g_current_runtime_level ) THEN
5729: FND_LOG.STRING(g_level_statement,
5730: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_tax_tolerance',
5731: 'Number of Rows Updated: ' || SQL%ROWCOUNT);
5732: END IF;
5733: END IF; -- IF l_count
5755:
5756: l_count := l_orig_tax_amt_tax_curr_tbl.COUNT;
5757:
5758: IF (g_level_statement >= g_current_runtime_level ) THEN
5759: FND_LOG.STRING(g_level_statement,
5760: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_tax_tolerance',
5761: 'Number of rows fetched for Control Header Amount = ' || to_char(l_count));
5762: END IF;
5763:
5841: -- bulk update the current rows processed
5842: -- before fetch the next set of rows
5843: --
5844: IF (g_level_statement >= g_current_runtime_level ) THEN
5845: FND_LOG.STRING(g_level_statement,
5846: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_tax_tolerance',
5847: 'Update ZX_DETAIL_TAX_LINES_GT with Tax Hold Info - Control Header Amount');
5848: END IF;
5849:
5854: tax_hold_released_code = nvl(l_tax_hold_released_code_tbl(i), tax_hold_released_code)
5855: WHERE tax_line_id = l_tax_line_id_tbl(i);
5856:
5857: IF (g_level_statement >= g_current_runtime_level ) THEN
5858: FND_LOG.STRING(g_level_statement,
5859: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_tax_tolerance',
5860: 'Number of Rows Updated: ' || SQL%ROWCOUNT);
5861: END IF;
5862: END IF; -- IF l_count
5884:
5885: l_count := l_orig_tax_amt_tax_curr_tbl.COUNT;
5886:
5887: IF (g_level_statement >= g_current_runtime_level ) THEN
5888: FND_LOG.STRING(g_level_statement,
5889: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_tax_tolerance',
5890: 'Number of rows fetched for UPDATE = ' || to_char(l_count));
5891: END IF;
5892:
5970: -- bulk update the current rows processed
5971: -- before fetch the next set of rows
5972: --
5973: IF (g_level_statement >= g_current_runtime_level ) THEN
5974: FND_LOG.STRING(g_level_statement,
5975: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_tax_tolerance',
5976: 'Update ZX_DETAIL_TAX_LINES_GT with Tax Hold Info - UPDATE event');
5977: END IF;
5978:
5983: tax_hold_released_code = nvl(l_tax_hold_released_code_tbl(i), tax_hold_released_code)
5984: WHERE tax_line_id = l_tax_line_id_tbl(i);
5985:
5986: IF (g_level_statement >= g_current_runtime_level ) THEN
5987: FND_LOG.STRING(g_level_statement,
5988: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_tax_tolerance',
5989: 'Number of Rows Updated: ' || SQL%ROWCOUNT);
5990: END IF;
5991: END IF; -- IF l_count
6013:
6014: l_count := l_orig_tax_amt_tax_curr_tbl.COUNT;
6015:
6016: IF (g_level_statement >= g_current_runtime_level ) THEN
6017: FND_LOG.STRING(g_level_statement,
6018: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_tax_tolerance',
6019: 'Number of rows fetched for CREATE event = ' || to_char(l_count));
6020: END IF;
6021:
6099: -- bulk update the current rows processed
6100: -- before fetch the next set of rows
6101: --
6102: IF (g_level_statement >= g_current_runtime_level) THEN
6103: FND_LOG.STRING(g_level_statement,
6104: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_tax_tolerance',
6105: 'Update ZX_DETAIL_TAX_LINES_GT with Tax Hold Info - CREATE event');
6106: END IF;
6107:
6112: tax_hold_released_code = nvl(l_tax_hold_released_code_tbl(i), tax_hold_released_code)
6113: WHERE tax_line_id = l_tax_line_id_tbl(i);
6114:
6115: IF (g_level_statement >= g_current_runtime_level ) THEN
6116: FND_LOG.STRING(g_level_statement,
6117: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_tax_tolerance',
6118: 'Number of Rows Updated: ' || SQL%ROWCOUNT);
6119: END IF;
6120: END IF; -- IF l_count
6129:
6130: END IF; -- end if p_event_class_rec.tax_tolerance is not null
6131:
6132: IF (g_level_statement >= g_current_runtime_level ) THEN
6133: FND_LOG.STRING(g_level_statement,
6134: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_tax_tolerance',
6135: 'p_return_status = ' || p_return_status);
6136: FND_LOG.STRING(g_level_statement,
6137: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_tax_tolerance',
6132: IF (g_level_statement >= g_current_runtime_level ) THEN
6133: FND_LOG.STRING(g_level_statement,
6134: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_tax_tolerance',
6135: 'p_return_status = ' || p_return_status);
6136: FND_LOG.STRING(g_level_statement,
6137: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_tax_tolerance',
6138: 'p_error_buffer = ' || p_error_buffer);
6139: FND_LOG.STRING(g_level_statement,
6140: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_tax_tolerance.END',
6135: 'p_return_status = ' || p_return_status);
6136: FND_LOG.STRING(g_level_statement,
6137: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_tax_tolerance',
6138: 'p_error_buffer = ' || p_error_buffer);
6139: FND_LOG.STRING(g_level_statement,
6140: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_tax_tolerance.END',
6141: 'ZX_TDS_TAX_LINES_POPU_PKG: process_tax_tolerance(-)');
6142: END IF;
6143:
6146: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6147: p_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
6148:
6149: IF (g_level_unexpected >= g_current_runtime_level ) THEN
6150: FND_LOG.STRING(g_level_unexpected,
6151: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.process_tax_tolerance',
6152: p_error_buffer);
6153: END IF;
6154:
6174: IS
6175:
6176: BEGIN
6177:
6178: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
6179:
6180: IF (g_level_statement >= g_current_runtime_level ) THEN
6181: FND_LOG.STRING(g_level_statement,
6182: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.populate_recovery_flg.BEGIN',
6177:
6178: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
6179:
6180: IF (g_level_statement >= g_current_runtime_level ) THEN
6181: FND_LOG.STRING(g_level_statement,
6182: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.populate_recovery_flg.BEGIN',
6183: 'ZX_TDS_TAX_LINES_POPU_PKG: populate_recovery_flg(+)');
6184: FND_LOG.STRING(g_level_statement,
6185: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.populate_recovery_flg',
6180: IF (g_level_statement >= g_current_runtime_level ) THEN
6181: FND_LOG.STRING(g_level_statement,
6182: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.populate_recovery_flg.BEGIN',
6183: 'ZX_TDS_TAX_LINES_POPU_PKG: populate_recovery_flg(+)');
6184: FND_LOG.STRING(g_level_statement,
6185: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.populate_recovery_flg',
6186: 'begin_index = ' || to_char(p_begin_index) || ' end_index= '
6187: || to_char(p_end_index));
6188: END IF;
6194: --
6195: IF (p_begin_index IS NULL OR p_end_index IS NULL) THEN
6196:
6197: IF (g_level_statement >= g_current_runtime_level ) THEN
6198: FND_LOG.STRING(g_level_statement,
6199: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.populate_recovery_flg',
6200: 'Begin index or End index is null' );
6201: END IF;
6202:
6222: END LOOP;
6223: END IF;
6224:
6225: IF (g_level_statement >= g_current_runtime_level ) THEN
6226: FND_LOG.STRING(g_level_statement,
6227: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.populate_recovery_flg.END',
6228: 'ZX_TDS_TAX_LINES_POPU_PKG: populate_recovery_flg(-)');
6229: END IF;
6230:
6232: WHEN OTHERS THEN
6233: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6234: p_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
6235: IF (g_level_unexpected >= g_current_runtime_level ) THEN
6236: FND_LOG.STRING(g_level_unexpected,
6237: 'ZX.PLSQL.ZX_TDS_TAX_LINES_POPU_PKG.populate_recovery_flg',
6238: p_error_buffer);
6239: END IF;
6240: