1: PACKAGE BODY ZX_TRL_MANAGE_TAX_PKG AS
2: /* $Header: zxrilnrepsrvpvtb.pls 120.100.12010000.6 2008/12/11 01:06:59 hongliu ship $ */
3:
4: g_current_runtime_level NUMBER;
5: g_level_statement CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
136:
137: l_row_count := 0;
138: IF (g_level_procedure >= g_current_runtime_level ) THEN
139: FND_LOG.STRING(g_level_procedure,
140: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines.BEGIN',
141: 'ZX_TRL_MANAGE_TAX_PKG: Create_Detail_Lines (+)');
142:
143: END IF;
144:
137: l_row_count := 0;
138: IF (g_level_procedure >= g_current_runtime_level ) THEN
139: FND_LOG.STRING(g_level_procedure,
140: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines.BEGIN',
141: 'ZX_TRL_MANAGE_TAX_PKG: Create_Detail_Lines (+)');
142:
143: END IF;
144:
145: x_return_status := FND_API.G_RET_STS_SUCCESS;
787: -- END IF;
788:
789: IF (g_level_procedure >= g_current_runtime_level ) THEN
790: FND_LOG.STRING(g_level_procedure,
791: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines.END',
792: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines (-)'
793: ||l_row_count||'rows inserted');
794: END IF;
795:
788:
789: IF (g_level_procedure >= g_current_runtime_level ) THEN
790: FND_LOG.STRING(g_level_procedure,
791: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines.END',
792: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines (-)'
793: ||l_row_count||'rows inserted');
794: END IF;
795:
796: EXCEPTION
797: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
798: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
799: IF (g_level_procedure >= g_current_runtime_level ) THEN
800: FND_LOG.STRING(g_level_procedure,
801: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines',
802: 'Exception:' ||SQLCODE||';'||SQLERRM);
803:
804: FND_LOG.STRING(g_level_procedure,
805: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines',
801: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines',
802: 'Exception:' ||SQLCODE||';'||SQLERRM);
803:
804: FND_LOG.STRING(g_level_procedure,
805: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines',
806: 'Return Status = '||x_return_status);
807: END IF;
808:
809: WHEN DUP_VAL_ON_INDEX THEN
809: WHEN DUP_VAL_ON_INDEX THEN
810: x_return_status := FND_API.G_RET_STS_ERROR;
811: IF (g_level_procedure >= g_current_runtime_level ) THEN
812: FND_LOG.STRING(g_level_procedure,
813: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines',
814: 'Exception:' ||SQLCODE||';'||SQLERRM);
815:
816: FND_LOG.STRING(g_level_procedure,
817: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines',
813: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines',
814: 'Exception:' ||SQLCODE||';'||SQLERRM);
815:
816: FND_LOG.STRING(g_level_procedure,
817: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines',
818: 'Return Status = '||x_return_status);
819: END IF;
820: FND_MESSAGE.SET_NAME('ZX','ZX_TRL_RECORD_ALREADY_EXISTS');
821: ZX_API_PUB.add_msg(l_msg_context_info_rec);
825: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
826:
827: IF (g_level_unexpected >= g_current_runtime_level ) THEN
828: FND_LOG.STRING(g_level_unexpected,
829: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines',
830: l_error_buffer);
831: END IF;
832:
833: END Create_Detail_Lines;
852: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
853:
854: IF (g_level_procedure >= g_current_runtime_level ) THEN
855: FND_LOG.STRING(g_level_procedure,
856: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Summarization_For_Freeze_Event.BEGIN',
857: 'ZX_TRL_MANAGE_TAX_PKG: Summarization_For_Freeze_Event (+)');
858: END IF;
859:
860: -- Initialize API return status to success
853:
854: IF (g_level_procedure >= g_current_runtime_level ) THEN
855: FND_LOG.STRING(g_level_procedure,
856: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Summarization_For_Freeze_Event.BEGIN',
857: 'ZX_TRL_MANAGE_TAX_PKG: Summarization_For_Freeze_Event (+)');
858: END IF;
859:
860: -- Initialize API return status to success
861: x_return_status := FND_API.G_RET_STS_SUCCESS;
906:
907: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
908: IF (g_level_error >= g_current_runtime_level ) THEN
909: FND_LOG.STRING(g_level_error,
910: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Summarization_For_Freeze_Event',
911: 'MRC Lines: Incorrect return_status after calling ' ||
912: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_upd_evnt()');
913: FND_LOG.STRING(g_level_error,
914: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Summarization_For_Freeze_Event',
908: IF (g_level_error >= g_current_runtime_level ) THEN
909: FND_LOG.STRING(g_level_error,
910: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Summarization_For_Freeze_Event',
911: 'MRC Lines: Incorrect return_status after calling ' ||
912: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_upd_evnt()');
913: FND_LOG.STRING(g_level_error,
914: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Summarization_For_Freeze_Event',
915: 'RETURN_STATUS = ' || x_return_status);
916: FND_LOG.STRING(g_level_error,
910: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Summarization_For_Freeze_Event',
911: 'MRC Lines: Incorrect return_status after calling ' ||
912: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_upd_evnt()');
913: FND_LOG.STRING(g_level_error,
914: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Summarization_For_Freeze_Event',
915: 'RETURN_STATUS = ' || x_return_status);
916: FND_LOG.STRING(g_level_error,
917: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Summarization_For_Freeze_Event.END',
918: 'ZX_TRL_MANAGE_TAX_PKG.Summarization_For_Freeze_Event(-)');
913: FND_LOG.STRING(g_level_error,
914: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Summarization_For_Freeze_Event',
915: 'RETURN_STATUS = ' || x_return_status);
916: FND_LOG.STRING(g_level_error,
917: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Summarization_For_Freeze_Event.END',
918: 'ZX_TRL_MANAGE_TAX_PKG.Summarization_For_Freeze_Event(-)');
919: END IF;
920: RETURN;
921: END IF;
914: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Summarization_For_Freeze_Event',
915: 'RETURN_STATUS = ' || x_return_status);
916: FND_LOG.STRING(g_level_error,
917: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Summarization_For_Freeze_Event.END',
918: 'ZX_TRL_MANAGE_TAX_PKG.Summarization_For_Freeze_Event(-)');
919: END IF;
920: RETURN;
921: END IF;
922:
921: END IF;
922:
923: IF (g_level_procedure >= g_current_runtime_level ) THEN
924: FND_LOG.STRING(g_level_procedure,
925: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Summarization_For_Freeze_Event.END',
926: 'ZX_TRL_MANAGE_TAX_PKG: Summarization_For_Freeze_Event (-)');
927: END IF;
928:
929: EXCEPTION
922:
923: IF (g_level_procedure >= g_current_runtime_level ) THEN
924: FND_LOG.STRING(g_level_procedure,
925: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Summarization_For_Freeze_Event.END',
926: 'ZX_TRL_MANAGE_TAX_PKG: Summarization_For_Freeze_Event (-)');
927: END IF;
928:
929: EXCEPTION
930: WHEN FND_API.G_EXC_ERROR THEN
930: WHEN FND_API.G_EXC_ERROR THEN
931: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
932: IF (g_level_procedure >= g_current_runtime_level ) THEN
933: FND_LOG.STRING(g_level_procedure,
934: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Summarization_For_Freeze_Event',
935: 'Unexpected error ...');
936: END IF;
937:
938: WHEN OTHERS THEN
940: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
941:
942: IF (g_level_unexpected >= g_current_runtime_level ) THEN
943: FND_LOG.STRING(g_level_unexpected,
944: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Summarization_For_Freeze_Event',
945: l_error_buffer);
946: END IF;
947: END Summarization_For_Freeze_Event;
948:
965: l_row_count := 0;
966:
967: IF (g_level_procedure >= g_current_runtime_level ) THEN
968: FND_LOG.STRING(g_level_procedure,
969: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Detail_Lines.BEGIN',
970: 'ZX_TRL_MANAGE_TAX_PKG: Delete_Detail_Lines (+)');
971: END IF;
972:
973: -- Initialize API return status to success
966:
967: IF (g_level_procedure >= g_current_runtime_level ) THEN
968: FND_LOG.STRING(g_level_procedure,
969: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Detail_Lines.BEGIN',
970: 'ZX_TRL_MANAGE_TAX_PKG: Delete_Detail_Lines (+)');
971: END IF;
972:
973: -- Initialize API return status to success
974: x_return_status := FND_API.G_RET_STS_SUCCESS;
1090: END IF;
1091:
1092: IF (g_level_procedure >= g_current_runtime_level ) THEN
1093: FND_LOG.STRING(g_level_procedure,
1094: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Detail_Lines.END',
1095: 'ZX_TRL_MANAGE_TAX_PKG: Delete_Detail_Lines (-)'||
1096: l_row_count||' rows deleted');
1097: END IF;
1098:
1091:
1092: IF (g_level_procedure >= g_current_runtime_level ) THEN
1093: FND_LOG.STRING(g_level_procedure,
1094: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Detail_Lines.END',
1095: 'ZX_TRL_MANAGE_TAX_PKG: Delete_Detail_Lines (-)'||
1096: l_row_count||' rows deleted');
1097: END IF;
1098:
1099: EXCEPTION
1101: WHEN FND_API.G_EXC_ERROR THEN
1102: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1103: IF (g_level_procedure >= g_current_runtime_level ) THEN
1104: FND_LOG.STRING(g_level_procedure,
1105: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Detail_Lines',
1106: 'Unexpected error ...');
1107: END IF;
1108:
1109: WHEN OTHERS THEN
1111: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
1112:
1113: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1114: FND_LOG.STRING(g_level_unexpected,
1115: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Detail_Lines',
1116: l_error_buffer);
1117: END IF;
1118: END Delete_Detail_Lines;
1119:
1135: l_row_count := 0;
1136:
1137: IF (g_level_procedure >= g_current_runtime_level ) THEN
1138: FND_LOG.STRING(g_level_procedure,
1139: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Summary_Lines.BEGIN',
1140: 'ZX_TRL_MANAGE_TAX_PKG: DELETE_SUMMARY_LINES (+)');
1141: END IF;
1142:
1143: -- Initialize API return status to success
1136:
1137: IF (g_level_procedure >= g_current_runtime_level ) THEN
1138: FND_LOG.STRING(g_level_procedure,
1139: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Summary_Lines.BEGIN',
1140: 'ZX_TRL_MANAGE_TAX_PKG: DELETE_SUMMARY_LINES (+)');
1141: END IF;
1142:
1143: -- Initialize API return status to success
1144: x_return_status := FND_API.G_RET_STS_SUCCESS;
1173: */
1174:
1175: IF (g_level_procedure >= g_current_runtime_level ) THEN
1176: FND_LOG.STRING(g_level_procedure,
1177: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Summary_Lines.END',
1178: 'ZX_TRL_MANAGE_TAX_PKG: DELETE_SUMMARY_LINES (-)'||
1179: l_row_count||' rows deleted');
1180: END IF;
1181:
1174:
1175: IF (g_level_procedure >= g_current_runtime_level ) THEN
1176: FND_LOG.STRING(g_level_procedure,
1177: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Summary_Lines.END',
1178: 'ZX_TRL_MANAGE_TAX_PKG: DELETE_SUMMARY_LINES (-)'||
1179: l_row_count||' rows deleted');
1180: END IF;
1181:
1182: EXCEPTION
1183: WHEN FND_API.G_EXC_ERROR THEN
1184: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1185: IF (g_level_procedure >= g_current_runtime_level ) THEN
1186: FND_LOG.STRING(g_level_procedure,
1187: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Summary_Lines',
1188: 'Unexpected error ...');
1189: END IF;
1190:
1191: WHEN OTHERS THEN
1193: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
1194:
1195: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1196: FND_LOG.STRING(g_level_unexpected,
1197: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Summary_Lines',
1198: l_error_buffer);
1199: END IF;
1200: END Delete_Summary_Lines;
1201:
1218: l_row_count := 0;
1219:
1220: IF (g_level_procedure >= g_current_runtime_level ) THEN
1221: FND_LOG.STRING(g_level_procedure,
1222: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Loose_Tax_Distributions.BEGIN',
1223: 'ZX_TRL_MANAGE_TAX_PKG: Delete_Loose_Tax_Distributions (+)');
1224: END IF;
1225:
1226: -- Initialize API return status to success
1219:
1220: IF (g_level_procedure >= g_current_runtime_level ) THEN
1221: FND_LOG.STRING(g_level_procedure,
1222: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Loose_Tax_Distributions.BEGIN',
1223: 'ZX_TRL_MANAGE_TAX_PKG: Delete_Loose_Tax_Distributions (+)');
1224: END IF;
1225:
1226: -- Initialize API return status to success
1227: x_return_status := FND_API.G_RET_STS_SUCCESS;
1271: */
1272:
1273: IF (g_level_procedure >= g_current_runtime_level ) THEN
1274: FND_LOG.STRING(g_level_procedure,
1275: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Loose_Tax_Distributions.END',
1276: 'ZX_TRL_MANAGE_TAX_PKG: Delete_Loose_Tax_Distributions (-)'||
1277: l_row_count||' rows deleted');
1278: END IF;
1279:
1272:
1273: IF (g_level_procedure >= g_current_runtime_level ) THEN
1274: FND_LOG.STRING(g_level_procedure,
1275: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Loose_Tax_Distributions.END',
1276: 'ZX_TRL_MANAGE_TAX_PKG: Delete_Loose_Tax_Distributions (-)'||
1277: l_row_count||' rows deleted');
1278: END IF;
1279:
1280: EXCEPTION
1281: WHEN FND_API.G_EXC_ERROR THEN
1282: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1283: IF (g_level_procedure >= g_current_runtime_level ) THEN
1284: FND_LOG.STRING(g_level_procedure,
1285: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Loose_Tax_Distributions',
1286: 'Unexpected error ...');
1287: END IF;
1288:
1289: WHEN OTHERS THEN
1291: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
1292:
1293: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1294: FND_LOG.STRING(g_level_unexpected,
1295: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Loose_Tax_Distributions',
1296: l_error_buffer);
1297: END IF;
1298: END Delete_Loose_Tax_Distributions;
1299:
1317: l_row_count := 0;
1318:
1319: IF (g_level_procedure >= g_current_runtime_level ) THEN
1320: FND_LOG.STRING(g_level_procedure,
1321: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Tax_Distributions.BEGIN',
1322: 'ZX_TRL_MANAGE_TAX_PKG: DELETE_TAX_DISTRIBUTIONS (+)');
1323: END IF;
1324:
1325: -- Initialize API return status to success
1318:
1319: IF (g_level_procedure >= g_current_runtime_level ) THEN
1320: FND_LOG.STRING(g_level_procedure,
1321: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Tax_Distributions.BEGIN',
1322: 'ZX_TRL_MANAGE_TAX_PKG: DELETE_TAX_DISTRIBUTIONS (+)');
1323: END IF;
1324:
1325: -- Initialize API return status to success
1326: x_return_status := FND_API.G_RET_STS_SUCCESS;
1354: */
1355:
1356: IF (g_level_procedure >= g_current_runtime_level ) THEN
1357: FND_LOG.STRING(g_level_procedure,
1358: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Tax_Distributions.END',
1359: 'ZX_TRL_MANAGE_TAX_PKG: DELETE_TAX_DISTRIBUTIONS (-)'||
1360: l_row_count||' rows deleted');
1361: END IF;
1362:
1355:
1356: IF (g_level_procedure >= g_current_runtime_level ) THEN
1357: FND_LOG.STRING(g_level_procedure,
1358: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Tax_Distributions.END',
1359: 'ZX_TRL_MANAGE_TAX_PKG: DELETE_TAX_DISTRIBUTIONS (-)'||
1360: l_row_count||' rows deleted');
1361: END IF;
1362:
1363: EXCEPTION
1364: WHEN FND_API.G_EXC_ERROR THEN
1365: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1366: IF (g_level_procedure >= g_current_runtime_level ) THEN
1367: FND_LOG.STRING(g_level_procedure,
1368: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Tax_Distributions',
1369: 'Unexpected error ...');
1370: END IF;
1371:
1372: WHEN OTHERS THEN
1374: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
1375:
1376: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1377: FND_LOG.STRING(g_level_unexpected,
1378: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Tax_Distributions',
1379: l_error_buffer);
1380: END IF;
1381: END Delete_Tax_Distributions;
1382:
1412: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1413:
1414: IF (g_level_procedure >= g_current_runtime_level ) THEN
1415: FND_LOG.STRING(g_level_procedure,
1416: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Transaction.BEGIN',
1417: 'ZX_TRL_MANAGE_TAX_PKG: DELETE_TRANSACTION (+)');
1418: END IF;
1419:
1420: -- Standard Start of API savepoint
1413:
1414: IF (g_level_procedure >= g_current_runtime_level ) THEN
1415: FND_LOG.STRING(g_level_procedure,
1416: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Transaction.BEGIN',
1417: 'ZX_TRL_MANAGE_TAX_PKG: DELETE_TRANSACTION (+)');
1418: END IF;
1419:
1420: -- Standard Start of API savepoint
1421: SAVEPOINT Delete_Transaction_Pvt;
1462: AND TRX_ID = p_event_class_rec.TRX_ID;
1463:
1464: IF (g_level_statement >= g_current_runtime_level ) THEN
1465: FND_LOG.STRING(g_level_statement,
1466: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Transaction',
1467: 'Number of rows deleted from zx_lines = '||l_row_count);
1468: END IF;
1469:
1470: IF p_event_class_rec.summarization_flag = 'Y' THEN
1477: AND TRX_ID = p_event_class_rec.TRX_ID;
1478:
1479: IF (g_level_statement >= g_current_runtime_level ) THEN
1480: FND_LOG.STRING(g_level_statement,
1481: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Transaction',
1482: 'Number of rows deleted from zx_lines_summary = '||l_row_count);
1483: END IF;
1484:
1485: END IF;
1491: AND TRX_ID = p_event_class_rec.TRX_ID;
1492:
1493: IF (g_level_statement >= g_current_runtime_level ) THEN
1494: FND_LOG.STRING(g_level_statement,
1495: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Transaction',
1496: 'Number of rows deleted from zx_rec_nrec_dist = '||l_row_count);
1497: END IF;
1498:
1499: IF (g_level_procedure >= g_current_runtime_level ) THEN
1497: END IF;
1498:
1499: IF (g_level_procedure >= g_current_runtime_level ) THEN
1500: FND_LOG.STRING(g_level_procedure,
1501: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Transaction.END',
1502: 'ZX_TRL_MANAGE_TAX_PKG: DELETE_TRANSACTION (-)');
1503: END IF;
1504:
1505: EXCEPTION
1498:
1499: IF (g_level_procedure >= g_current_runtime_level ) THEN
1500: FND_LOG.STRING(g_level_procedure,
1501: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Transaction.END',
1502: 'ZX_TRL_MANAGE_TAX_PKG: DELETE_TRANSACTION (-)');
1503: END IF;
1504:
1505: EXCEPTION
1506: WHEN NO_DATA_FOUND THEN
1506: WHEN NO_DATA_FOUND THEN
1507: -- x_return_status := FND_API.G_RET_STS_ERROR ;
1508: IF (g_level_procedure >= g_current_runtime_level ) THEN
1509: FND_LOG.STRING(g_level_procedure,
1510: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Transaction',
1511: 'Exception:' ||SQLCODE||';'||SQLERRM);
1512: FND_LOG.STRING(g_level_procedure,
1513: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Transaction',
1514: 'Return Status = '||x_return_status);
1509: FND_LOG.STRING(g_level_procedure,
1510: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Transaction',
1511: 'Exception:' ||SQLCODE||';'||SQLERRM);
1512: FND_LOG.STRING(g_level_procedure,
1513: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Transaction',
1514: 'Return Status = '||x_return_status);
1515: END IF;
1516:
1517: /* bug#4374237
1524: WHEN FND_API.G_EXC_ERROR THEN
1525: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1526: IF (g_level_procedure >= g_current_runtime_level ) THEN
1527: FND_LOG.STRING(g_level_procedure,
1528: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Transaction',
1529: 'Exception:' ||SQLCODE||';'||SQLERRM);
1530: FND_LOG.STRING(g_level_procedure,
1531: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Transaction',
1532: 'Return Status = '||x_return_status);
1527: FND_LOG.STRING(g_level_procedure,
1528: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Transaction',
1529: 'Exception:' ||SQLCODE||';'||SQLERRM);
1530: FND_LOG.STRING(g_level_procedure,
1531: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Transaction',
1532: 'Return Status = '||x_return_status);
1533: END IF;
1534:
1535: IF (g_level_procedure >= g_current_runtime_level ) THEN
1533: END IF;
1534:
1535: IF (g_level_procedure >= g_current_runtime_level ) THEN
1536: FND_LOG.STRING(g_level_procedure,
1537: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Manage_TaxLines',
1538: 'Unexpected error ...');
1539: END IF;
1540:
1541: WHEN OTHERS THEN
1543: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
1544:
1545: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1546: FND_LOG.STRING(g_level_unexpected,
1547: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Transaction',
1548: l_error_buffer);
1549: END IF;
1550: END Delete_Transaction;
1551:
1600: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1601:
1602: IF (g_level_procedure >= g_current_runtime_level ) THEN
1603: FND_LOG.STRING(g_level_procedure,
1604: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Cancel_Transaction.BEGIN',
1605: 'ZX_TRL_MANAGE_TAX_PKG: Cancel_Transaction (+)');
1606: END IF;
1607:
1608: -- Initialize API return status to success
1601:
1602: IF (g_level_procedure >= g_current_runtime_level ) THEN
1603: FND_LOG.STRING(g_level_procedure,
1604: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Cancel_Transaction.BEGIN',
1605: 'ZX_TRL_MANAGE_TAX_PKG: Cancel_Transaction (+)');
1606: END IF;
1607:
1608: -- Initialize API return status to success
1609: x_return_status := FND_API.G_RET_STS_SUCCESS;
1620: l_row_count := SQL%ROWCOUNT;
1621:
1622: IF (g_level_statement >= g_current_runtime_level ) THEN
1623: FND_LOG.STRING(g_level_statement,
1624: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Cancel_Transaction',
1625: 'Number of rows updated in zx_lines = '||l_row_count);
1626: END IF;
1627:
1628: IF p_event_class_rec.summarization_flag = 'Y' THEN
1637: l_row_count := SQL%ROWCOUNT;
1638:
1639: IF (g_level_statement >= g_current_runtime_level ) THEN
1640: FND_LOG.STRING(g_level_statement,
1641: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Cancel_Transaction',
1642: 'Number of rows updated in zx_lines_summary = '||l_row_count);
1643: END IF;
1644:
1645: END IF;
2040: l_row_count := SQL%ROWCOUNT;
2041:
2042: IF (g_level_statement >= g_current_runtime_level ) THEN
2043: FND_LOG.STRING(g_level_statement,
2044: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Cancel_Transaction',
2045: 'Number of rows updated in zx_rec_nrec_dist = '||l_row_count);
2046: END IF;
2047:
2048: FORALL i IN NVL(l_rec_nrec_tax_dist_id_tbl.FIRST, 0) ..
2054: l_row_count := SQL%ROWCOUNT;
2055:
2056: IF (g_level_statement >= g_current_runtime_level ) THEN
2057: FND_LOG.STRING(g_level_statement,
2058: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Cancel_Transaction',
2059: 'Number of rows updated in zx_rec_nrec_dist = '||l_row_count);
2060: END IF;
2061:
2062: END IF; -- _rec_nrec_tax_dist_id_tbl.COUNT > 0
2062: END IF; -- _rec_nrec_tax_dist_id_tbl.COUNT > 0
2063:
2064: IF (g_level_procedure >= g_current_runtime_level ) THEN
2065: FND_LOG.STRING(g_level_procedure,
2066: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Cancel_Transaction.END',
2067: 'ZX_TRL_MANAGE_TAX_PKG: CANCEL_TRANSACTION (-)');
2068: END IF;
2069:
2070: EXCEPTION
2063:
2064: IF (g_level_procedure >= g_current_runtime_level ) THEN
2065: FND_LOG.STRING(g_level_procedure,
2066: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Cancel_Transaction.END',
2067: 'ZX_TRL_MANAGE_TAX_PKG: CANCEL_TRANSACTION (-)');
2068: END IF;
2069:
2070: EXCEPTION
2071:
2072: WHEN FND_API.G_EXC_ERROR THEN
2073: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2074: IF (g_level_procedure >= g_current_runtime_level ) THEN
2075: FND_LOG.STRING(g_level_procedure,
2076: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Cancel_Transaction',
2077: 'Exception:' ||SQLCODE||';'||SQLERRM);
2078: FND_LOG.STRING(g_level_procedure,
2079: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Cancel_Transaction',
2080: 'Return Status = '||x_return_status);
2075: FND_LOG.STRING(g_level_procedure,
2076: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Cancel_Transaction',
2077: 'Exception:' ||SQLCODE||';'||SQLERRM);
2078: FND_LOG.STRING(g_level_procedure,
2079: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Cancel_Transaction',
2080: 'Return Status = '||x_return_status);
2081: END IF;
2082:
2083: WHEN OTHERS THEN
2086:
2087: IF (g_level_unexpected >= g_current_runtime_level ) THEN
2088:
2089: FND_LOG.STRING(g_level_unexpected,
2090: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Cancel_Transaction',
2091: l_error_buffer);
2092: END IF;
2093: END Cancel_Transaction;
2094:
2108: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2109:
2110: IF (g_level_procedure >= g_current_runtime_level ) THEN
2111: FND_LOG.STRING(g_level_procedure,
2112: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Purge_Transaction.BEGIN',
2113: 'ZX_TRL_MANAGE_TAX_PKG: PURGE_TRANSACTION (+)');
2114: END IF;
2115:
2116: -- Initialize API return status to success
2109:
2110: IF (g_level_procedure >= g_current_runtime_level ) THEN
2111: FND_LOG.STRING(g_level_procedure,
2112: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Purge_Transaction.BEGIN',
2113: 'ZX_TRL_MANAGE_TAX_PKG: PURGE_TRANSACTION (+)');
2114: END IF;
2115:
2116: -- Initialize API return status to success
2117: x_return_status := FND_API.G_RET_STS_SUCCESS;
2121:
2122: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2123: IF (g_level_procedure >= g_current_runtime_level ) THEN
2124: FND_LOG.STRING(g_level_procedure,
2125: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Transaction',
2126: 'Return Status = '||l_return_status);
2127: END IF;
2128: RAISE FND_API.G_EXC_ERROR;
2129: END IF;
2130:
2131: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2132: IF (g_level_procedure >= g_current_runtime_level ) THEN
2133: FND_LOG.STRING(g_level_procedure,
2134: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Purge_Transaction',
2135: 'Return Status = '||l_return_status);
2136: END IF;
2137: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2138: END IF;
2138: END IF;
2139:
2140: IF (g_level_procedure >= g_current_runtime_level ) THEN
2141: FND_LOG.STRING(g_level_procedure,
2142: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Purge_Transaction.END',
2143: 'ZX_TRL_MANAGE_TAX_PKG: PURGE_TRANSACTION (-)');
2144: END IF;
2145:
2146: EXCEPTION
2139:
2140: IF (g_level_procedure >= g_current_runtime_level ) THEN
2141: FND_LOG.STRING(g_level_procedure,
2142: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Purge_Transaction.END',
2143: 'ZX_TRL_MANAGE_TAX_PKG: PURGE_TRANSACTION (-)');
2144: END IF;
2145:
2146: EXCEPTION
2147: WHEN FND_API.G_EXC_ERROR THEN
2147: WHEN FND_API.G_EXC_ERROR THEN
2148: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2149: IF (g_level_procedure >= g_current_runtime_level ) THEN
2150: FND_LOG.STRING(g_level_procedure,
2151: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Purge_Transaction',
2152: 'Exception:' ||SQLCODE||';'||SQLERRM);
2153: FND_LOG.STRING(g_level_procedure,
2154: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Purge_Transaction',
2155: 'Return Status = '||x_return_status);
2150: FND_LOG.STRING(g_level_procedure,
2151: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Purge_Transaction',
2152: 'Exception:' ||SQLCODE||';'||SQLERRM);
2153: FND_LOG.STRING(g_level_procedure,
2154: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Purge_Transaction',
2155: 'Return Status = '||x_return_status);
2156: END IF;
2157:
2158: WHEN OTHERS THEN
2160: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
2161:
2162: IF (g_level_procedure >= g_current_runtime_level ) THEN
2163: FND_LOG.STRING(g_level_procedure,
2164: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Purge_Transaction',
2165: 'Return Status = '||x_return_status);
2166: END IF;
2167:
2168: IF (g_level_unexpected >= g_current_runtime_level ) THEN
2166: END IF;
2167:
2168: IF (g_level_unexpected >= g_current_runtime_level ) THEN
2169: FND_LOG.STRING(g_level_unexpected,
2170: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Purge_Transaction',
2171: l_error_buffer);
2172: END IF;
2173:
2174: END Purge_Transaction;
2203: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2204:
2205: IF (g_level_procedure >= g_current_runtime_level ) THEN
2206: FND_LOG.STRING(g_level_procedure,
2207: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Mark_Detail_Tax_Lines_Delete.BEGIN',
2208: 'ZX_TRL_MANAGE_TAX_PKG: MARK_DETAIL_TAX_LINES_DELETE (+)');
2209: END IF;
2210:
2211: -- Initialize API return status to success
2204:
2205: IF (g_level_procedure >= g_current_runtime_level ) THEN
2206: FND_LOG.STRING(g_level_procedure,
2207: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Mark_Detail_Tax_Lines_Delete.BEGIN',
2208: 'ZX_TRL_MANAGE_TAX_PKG: MARK_DETAIL_TAX_LINES_DELETE (+)');
2209: END IF;
2210:
2211: -- Initialize API return status to success
2212: x_return_status := FND_API.G_RET_STS_SUCCESS;
2234: --Add the success or failure message into the stack.
2235:
2236: IF (g_level_statement >= g_current_runtime_level ) THEN
2237: FND_LOG.STRING(g_level_statement,
2238: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Mark_Detail_Tax_Lines_Delete',
2239: 'Number of rows updated in zx_lines = '||l_row_count);
2240: END IF;
2241:
2242: IF (g_level_procedure >= g_current_runtime_level ) THEN
2240: END IF;
2241:
2242: IF (g_level_procedure >= g_current_runtime_level ) THEN
2243: FND_LOG.STRING(g_level_procedure,
2244: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Mark_Detail_Tax_Lines_Delete.END',
2245: 'ZX_TRL_MANAGE_TAX_PKG: MARK_DETAIL_TAX_LINES_DELETE (-)');
2246: END IF;
2247:
2248: EXCEPTION
2241:
2242: IF (g_level_procedure >= g_current_runtime_level ) THEN
2243: FND_LOG.STRING(g_level_procedure,
2244: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Mark_Detail_Tax_Lines_Delete.END',
2245: 'ZX_TRL_MANAGE_TAX_PKG: MARK_DETAIL_TAX_LINES_DELETE (-)');
2246: END IF;
2247:
2248: EXCEPTION
2249: WHEN NO_DATA_FOUND THEN
2249: WHEN NO_DATA_FOUND THEN
2250: -- x_return_status := FND_API.G_RET_STS_ERROR ;
2251: IF (g_level_procedure >= g_current_runtime_level ) THEN
2252: FND_LOG.STRING(g_level_procedure,
2253: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Mark_Detail_Tax_Lines_Delete',
2254: 'Exception:' ||SQLCODE||';'||SQLERRM);
2255:
2256: FND_LOG.STRING(g_level_procedure,
2257: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Mark_Detail_Tax_Lines_Delete',
2253: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Mark_Detail_Tax_Lines_Delete',
2254: 'Exception:' ||SQLCODE||';'||SQLERRM);
2255:
2256: FND_LOG.STRING(g_level_procedure,
2257: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Mark_Detail_Tax_Lines_Delete',
2258: 'Return Status = '||x_return_status);
2259: END IF;
2260:
2261: /* bug#4374237
2268: WHEN FND_API.G_EXC_ERROR THEN
2269: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2270: IF (g_level_procedure >= g_current_runtime_level ) THEN
2271: FND_LOG.STRING(g_level_procedure,
2272: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Mark_Detail_Tax_Lines_Delete',
2273: 'Exception:' ||SQLCODE||';'||SQLERRM);
2274:
2275: FND_LOG.STRING(g_level_procedure,
2276: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Mark_Detail_Tax_Lines_Delete',
2272: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Mark_Detail_Tax_Lines_Delete',
2273: 'Exception:' ||SQLCODE||';'||SQLERRM);
2274:
2275: FND_LOG.STRING(g_level_procedure,
2276: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Mark_Detail_Tax_Lines_Delete',
2277: 'Return Status = '||x_return_status);
2278: END IF;
2279:
2280: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2281: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2282:
2283: IF (g_level_procedure >= g_current_runtime_level ) THEN
2284: FND_LOG.STRING(g_level_procedure,
2285: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Mark_Detail_Tax_Lines_Delete',
2286: 'Unexpected Error:' ||SQLCODE||';'||SQLERRM);
2287: FND_LOG.STRING(g_level_procedure,
2288: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Mark_Detail_Tax_Lines_Delete',
2289: 'Return Status = '||x_return_status);
2284: FND_LOG.STRING(g_level_procedure,
2285: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Mark_Detail_Tax_Lines_Delete',
2286: 'Unexpected Error:' ||SQLCODE||';'||SQLERRM);
2287: FND_LOG.STRING(g_level_procedure,
2288: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Mark_Detail_Tax_Lines_Delete',
2289: 'Return Status = '||x_return_status);
2290: FND_LOG.STRING(g_level_procedure,
2291: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Mark_Detail_Tax_Lines_Delete',
2292: 'Unexpected error ...');
2287: FND_LOG.STRING(g_level_procedure,
2288: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Mark_Detail_Tax_Lines_Delete',
2289: 'Return Status = '||x_return_status);
2290: FND_LOG.STRING(g_level_procedure,
2291: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Mark_Detail_Tax_Lines_Delete',
2292: 'Unexpected error ...');
2293: END IF;
2294:
2295: WHEN OTHERS THEN
2297: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
2298:
2299: IF (g_level_procedure >= g_current_runtime_level ) THEN
2300: FND_LOG.STRING(g_level_procedure,
2301: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Mark_Detail_Tax_Lines_Delete',
2302: 'Exception:Others:' ||SQLCODE||';'||SQLERRM);
2303:
2304: FND_LOG.STRING(g_level_procedure,
2305: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Mark_Detail_Tax_Lines_Delete',
2301: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Mark_Detail_Tax_Lines_Delete',
2302: 'Exception:Others:' ||SQLCODE||';'||SQLERRM);
2303:
2304: FND_LOG.STRING(g_level_procedure,
2305: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Mark_Detail_Tax_Lines_Delete',
2306: 'Return Status = '||x_return_status);
2307: END IF;
2308: END Mark_Detail_Tax_Lines_Delete;
2309:
2322: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2323:
2324: IF (g_level_procedure >= g_current_runtime_level ) THEN
2325: FND_LOG.STRING(g_level_procedure,
2326: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Create_Tax_Distributions.BEGIN',
2327: 'ZX_TRL_MANAGE_TAX_PKG: Create_Tax_Distributions (+)');
2328: END IF;
2329:
2330: -- Initialize API return status to success
2323:
2324: IF (g_level_procedure >= g_current_runtime_level ) THEN
2325: FND_LOG.STRING(g_level_procedure,
2326: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Create_Tax_Distributions.BEGIN',
2327: 'ZX_TRL_MANAGE_TAX_PKG: Create_Tax_Distributions (+)');
2328: END IF;
2329:
2330: -- Initialize API return status to success
2331: x_return_status := FND_API.G_RET_STS_SUCCESS;
2671: FROM ZX_REC_NREC_DIST_GT;
2672:
2673: IF (g_level_statement >= g_current_runtime_level ) THEN
2674: FND_LOG.STRING(g_level_statement,
2675: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Create_Tax_Distributions',
2676: 'Number of Rows Inserted: '||SQL%ROWCOUNT);
2677: END IF;
2678:
2679: BEGIN
2690: END;
2691:
2692: IF (g_level_statement >= g_current_runtime_level ) THEN
2693: FND_LOG.STRING(g_level_statement,
2694: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Create_Tax_Distributions',
2695: 'Number of Tax Lines Updated: '||SQL%ROWCOUNT);
2696: END IF;
2697:
2698: IF (g_level_procedure >= g_current_runtime_level ) THEN
2696: END IF;
2697:
2698: IF (g_level_procedure >= g_current_runtime_level ) THEN
2699: FND_LOG.STRING(g_level_procedure,
2700: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Create_Tax_Distributions.END',
2701: 'ZX_TRL_MANAGE_TAX_PKG: CREATE_TAX_DISTRIBUTIONS (-)');
2702: END IF;
2703:
2704: EXCEPTION
2697:
2698: IF (g_level_procedure >= g_current_runtime_level ) THEN
2699: FND_LOG.STRING(g_level_procedure,
2700: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Create_Tax_Distributions.END',
2701: 'ZX_TRL_MANAGE_TAX_PKG: CREATE_TAX_DISTRIBUTIONS (-)');
2702: END IF;
2703:
2704: EXCEPTION
2705: WHEN DUP_VAL_ON_INDEX THEN
2705: WHEN DUP_VAL_ON_INDEX THEN
2706: x_return_status := FND_API.G_RET_STS_ERROR ;
2707: IF (g_level_procedure >= g_current_runtime_level ) THEN
2708: FND_LOG.STRING(g_level_procedure,
2709: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Create_Tax_Distributions',
2710: 'Exception:' ||SQLCODE||';'||SQLERRM);
2711:
2712: FND_LOG.STRING(g_level_procedure,
2713: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Create_Tax_Distributions',
2709: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Create_Tax_Distributions',
2710: 'Exception:' ||SQLCODE||';'||SQLERRM);
2711:
2712: FND_LOG.STRING(g_level_procedure,
2713: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Create_Tax_Distributions',
2714: 'Return Status = '||x_return_status);
2715: END IF;
2716: -- bug#4893261- move to wrapper since do not
2717: -- have event_class_rec here to set message index
2724: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2725:
2726: IF (g_level_procedure >= g_current_runtime_level ) THEN
2727: FND_LOG.STRING(g_level_procedure,
2728: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Create_Tax_Distributions',
2729: 'Exception:Others:' ||SQLCODE||';'||SQLERRM);
2730:
2731: FND_LOG.STRING(g_level_procedure,
2732: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Create_Tax_Distributions',
2728: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Create_Tax_Distributions',
2729: 'Exception:Others:' ||SQLCODE||';'||SQLERRM);
2730:
2731: FND_LOG.STRING(g_level_procedure,
2732: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Create_Tax_Distributions',
2733: 'Return Status = '||x_return_status);
2734: END IF;
2735: END Create_Tax_Distributions;
2736:
2754: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2755:
2756: IF (g_level_procedure >= g_current_runtime_level ) THEN
2757: FND_LOG.STRING(g_level_procedure,
2758: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Dist_Marked_For_Delete.BEGIN',
2759: 'ZX_TRL_MANAGE_TAX_PKG: DELETE_DIST_MARKED_FOR_DELETE (+)');
2760: END IF;
2761:
2762: -- Initialize API return status to success
2755:
2756: IF (g_level_procedure >= g_current_runtime_level ) THEN
2757: FND_LOG.STRING(g_level_procedure,
2758: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Dist_Marked_For_Delete.BEGIN',
2759: 'ZX_TRL_MANAGE_TAX_PKG: DELETE_DIST_MARKED_FOR_DELETE (+)');
2760: END IF;
2761:
2762: -- Initialize API return status to success
2763: x_return_status := FND_API.G_RET_STS_SUCCESS;
2787: x_return_status := FND_API.G_RET_STS_ERROR;
2788:
2789: IF (g_level_procedure >= g_current_runtime_level ) THEN
2790: FND_LOG.STRING(g_level_procedure,
2791: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Dist_Marked_For_Delete',
2792: 'Return Status = '||x_return_status);
2793: END IF;
2794:
2795: FND_MESSAGE.SET_NAME('ZX','ZX_TRL_NULL_VALUES');
2797:
2798: ELSE
2799: IF (g_level_procedure >= g_current_runtime_level ) THEN
2800: FND_LOG.STRING(g_level_procedure,
2801: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Dist_Marked_For_Delete',
2802: 'Delete from ZX_REC_NREC_DIST (+)');
2803:
2804: FND_LOG.STRING(g_level_procedure,
2805: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Dist_Marked_For_Delete',
2801: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Dist_Marked_For_Delete',
2802: 'Delete from ZX_REC_NREC_DIST (+)');
2803:
2804: FND_LOG.STRING(g_level_procedure,
2805: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Dist_Marked_For_Delete',
2806: 'Application Id: ' ||p_event_class_rec.application_id);
2807:
2808: FND_LOG.STRING(g_level_procedure,
2809: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Dist_Marked_For_Delete',
2805: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Dist_Marked_For_Delete',
2806: 'Application Id: ' ||p_event_class_rec.application_id);
2807:
2808: FND_LOG.STRING(g_level_procedure,
2809: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Dist_Marked_For_Delete',
2810: 'Entity Code: ' ||p_event_class_rec.entity_code);
2811:
2812: FND_LOG.STRING(g_level_procedure,
2813: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Dist_Marked_For_Delete',
2809: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Dist_Marked_For_Delete',
2810: 'Entity Code: ' ||p_event_class_rec.entity_code);
2811:
2812: FND_LOG.STRING(g_level_procedure,
2813: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Dist_Marked_For_Delete',
2814: 'Event Class Code: '||p_event_class_rec.event_class_code);
2815:
2816: /*
2817: FND_LOG.STRING(g_level_procedure,
2814: 'Event Class Code: '||p_event_class_rec.event_class_code);
2815:
2816: /*
2817: FND_LOG.STRING(g_level_procedure,
2818: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Dist_Marked_For_Delete',
2819: 'Trx Id: ' ||p_event_class_rec.trx_id);
2820: */
2821: END IF;
2822:
2846: END IF;
2847:
2848: IF (g_level_statement >= g_current_runtime_level ) THEN
2849: FND_LOG.STRING(g_level_statement,
2850: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Dist_Marked_For_Delete',
2851: 'Number of Rows Deleted ='||SQL%ROWCOUNT);
2852: END IF;
2853:
2854: -- bug6890360: synchronize tax_line_number for reversed tax dustributions,
2882: );
2883:
2884: IF (g_level_statement >= g_current_runtime_level ) THEN
2885: FND_LOG.STRING(g_level_statement,
2886: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Dist_Marked_For_Delete',
2887: 'Number of Rows Updated ='||SQL%ROWCOUNT);
2888: END IF;
2889:
2890: EXCEPTION
2933: );
2934:
2935: IF (g_level_statement >= g_current_runtime_level ) THEN
2936: FND_LOG.STRING(g_level_statement,
2937: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Dist_Marked_For_Delete',
2938: 'Number of Rows Updated ='||SQL%ROWCOUNT);
2939: END IF;
2940:
2941: IF (g_level_procedure >= g_current_runtime_level ) THEN
2939: END IF;
2940:
2941: IF (g_level_procedure >= g_current_runtime_level ) THEN
2942: FND_LOG.STRING(g_level_procedure,
2943: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Dist_Marked_For_Delete.END',
2944: 'ZX_TRL_MANAGE_TAX_PKG: DELETE_DIST_MARKED_FOR_DELETE (-)');
2945: END IF;
2946:
2947: EXCEPTION
2940:
2941: IF (g_level_procedure >= g_current_runtime_level ) THEN
2942: FND_LOG.STRING(g_level_procedure,
2943: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Dist_Marked_For_Delete.END',
2944: 'ZX_TRL_MANAGE_TAX_PKG: DELETE_DIST_MARKED_FOR_DELETE (-)');
2945: END IF;
2946:
2947: EXCEPTION
2948: WHEN NO_DATA_FOUND THEN
2956: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2957:
2958: IF (g_level_procedure >= g_current_runtime_level ) THEN
2959: FND_LOG.STRING(g_level_procedure,
2960: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Dist_Marked_For_Delete',
2961: 'Exception:Others:' ||SQLCODE||';'||SQLERRM);
2962:
2963: FND_LOG.STRING(g_level_procedure,
2964: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Dist_Marked_For_Delete',
2960: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Dist_Marked_For_Delete',
2961: 'Exception:Others:' ||SQLCODE||';'||SQLERRM);
2962:
2963: FND_LOG.STRING(g_level_procedure,
2964: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Delete_Dist_Marked_For_Delete',
2965: 'Return Status = '||x_return_status);
2966: END IF;
2967: END Delete_Dist_Marked_For_Delete;
2968:
2983: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2984:
2985: IF (g_level_procedure >= g_current_runtime_level ) THEN
2986: FND_LOG.STRING(g_level_procedure,
2987: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_TaxLine_Rec_Nrec_Amt.BEGIN',
2988: 'ZX_TRL_MANAGE_TAX_PKG: Update_TaxLine_Rec_Nrec_Amt (+)');
2989: END IF;
2990:
2991: -- Initialize API return status to success
2984:
2985: IF (g_level_procedure >= g_current_runtime_level ) THEN
2986: FND_LOG.STRING(g_level_procedure,
2987: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_TaxLine_Rec_Nrec_Amt.BEGIN',
2988: 'ZX_TRL_MANAGE_TAX_PKG: Update_TaxLine_Rec_Nrec_Amt (+)');
2989: END IF;
2990:
2991: -- Initialize API return status to success
2992: x_return_status := FND_API.G_RET_STS_SUCCESS;
3109: END IF;
3110:
3111: IF (g_level_procedure >= g_current_runtime_level ) THEN
3112: FND_LOG.STRING(g_level_procedure,
3113: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_TaxLine_Rec_Nrec_Amt.END',
3114: 'ZX_TRL_MANAGE_TAX_PKG: UPDATE_TAXLINE_REC_NREC_AMT (-)');
3115: END IF;
3116:
3117: EXCEPTION
3110:
3111: IF (g_level_procedure >= g_current_runtime_level ) THEN
3112: FND_LOG.STRING(g_level_procedure,
3113: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_TaxLine_Rec_Nrec_Amt.END',
3114: 'ZX_TRL_MANAGE_TAX_PKG: UPDATE_TAXLINE_REC_NREC_AMT (-)');
3115: END IF;
3116:
3117: EXCEPTION
3118: WHEN OTHERS THEN
3119: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3120:
3121: IF (g_level_procedure >= g_current_runtime_level ) THEN
3122: FND_LOG.STRING(g_level_procedure,
3123: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_TaxLine_Rec_Nrec_Amt',
3124: 'Exception:Others:' ||SQLCODE||';'||SQLERRM);
3125:
3126: FND_LOG.STRING(g_level_procedure,
3127: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_TaxLine_Rec_Nrec_Amt',
3123: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_TaxLine_Rec_Nrec_Amt',
3124: 'Exception:Others:' ||SQLCODE||';'||SQLERRM);
3125:
3126: FND_LOG.STRING(g_level_procedure,
3127: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_TaxLine_Rec_Nrec_Amt',
3128: 'Return Status = '||x_return_status);
3129: END IF;
3130: END Update_TaxLine_Rec_Nrec_Amt;
3131:
3149: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
3150:
3151: IF (g_level_procedure >= g_current_runtime_level ) THEN
3152: FND_LOG.STRING(g_level_procedure,
3153: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag.BEGIN',
3154: 'ZX_TRL_MANAGE_TAX_PKG: Update_Freeze_Flag (+)');
3155: END IF;
3156:
3157: -- Initialize API return status to success
3150:
3151: IF (g_level_procedure >= g_current_runtime_level ) THEN
3152: FND_LOG.STRING(g_level_procedure,
3153: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag.BEGIN',
3154: 'ZX_TRL_MANAGE_TAX_PKG: Update_Freeze_Flag (+)');
3155: END IF;
3156:
3157: -- Initialize API return status to success
3158: x_return_status := FND_API.G_RET_STS_SUCCESS;
3228:
3229: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3230: IF (g_level_error >= g_current_runtime_level ) THEN
3231: FND_LOG.STRING(g_level_error,
3232: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag',
3233: 'MRC Lines: Incorrect return_status after calling ' ||
3234: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_upd_evnt()');
3235: FND_LOG.STRING(g_level_error,
3236: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag',
3230: IF (g_level_error >= g_current_runtime_level ) THEN
3231: FND_LOG.STRING(g_level_error,
3232: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag',
3233: 'MRC Lines: Incorrect return_status after calling ' ||
3234: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_upd_evnt()');
3235: FND_LOG.STRING(g_level_error,
3236: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag',
3237: 'RETURN_STATUS = ' || x_return_status);
3238: FND_LOG.STRING(g_level_error,
3232: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag',
3233: 'MRC Lines: Incorrect return_status after calling ' ||
3234: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_upd_evnt()');
3235: FND_LOG.STRING(g_level_error,
3236: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag',
3237: 'RETURN_STATUS = ' || x_return_status);
3238: FND_LOG.STRING(g_level_error,
3239: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag.END',
3240: 'ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag(-)');
3235: FND_LOG.STRING(g_level_error,
3236: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag',
3237: 'RETURN_STATUS = ' || x_return_status);
3238: FND_LOG.STRING(g_level_error,
3239: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag.END',
3240: 'ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag(-)');
3241: END IF;
3242: RETURN;
3243: END IF;
3236: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag',
3237: 'RETURN_STATUS = ' || x_return_status);
3238: FND_LOG.STRING(g_level_error,
3239: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag.END',
3240: 'ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag(-)');
3241: END IF;
3242: RETURN;
3243: END IF;
3244:
3250:
3251: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3252: IF (g_level_procedure >= g_current_runtime_level ) THEN
3253: FND_LOG.STRING(g_level_procedure,
3254: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag',
3255: 'Exception:' ||SQLCODE||';'||SQLERRM);
3256:
3257: FND_LOG.STRING(g_level_procedure,
3258: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag',
3254: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag',
3255: 'Exception:' ||SQLCODE||';'||SQLERRM);
3256:
3257: FND_LOG.STRING(g_level_procedure,
3258: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag',
3259: 'Return Status = '||l_return_status);
3260: END IF;
3261:
3262: RAISE FND_API.G_EXC_ERROR;
3263:
3264: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3265: IF (g_level_procedure >= g_current_runtime_level ) THEN
3266: FND_LOG.STRING(g_level_procedure,
3267: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag',
3268: 'Exception:' ||SQLCODE||';'||SQLERRM);
3269:
3270: FND_LOG.STRING(g_level_procedure,
3271: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag',
3267: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag',
3268: 'Exception:' ||SQLCODE||';'||SQLERRM);
3269:
3270: FND_LOG.STRING(g_level_procedure,
3271: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag',
3272: 'Return Status = '||l_return_status);
3273: END IF;
3274:
3275: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3277:
3278: IF (g_level_procedure >= g_current_runtime_level ) THEN
3279:
3280: FND_LOG.STRING(g_level_procedure,
3281: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag.END',
3282: 'ZX_TRL_MANAGE_TAX_PKG: UPDATE_FREEZE_FLAG (-)');
3283: END IF;
3284:
3285: EXCEPTION
3278: IF (g_level_procedure >= g_current_runtime_level ) THEN
3279:
3280: FND_LOG.STRING(g_level_procedure,
3281: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag.END',
3282: 'ZX_TRL_MANAGE_TAX_PKG: UPDATE_FREEZE_FLAG (-)');
3283: END IF;
3284:
3285: EXCEPTION
3286: WHEN FND_API.G_EXC_ERROR THEN
3286: WHEN FND_API.G_EXC_ERROR THEN
3287: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3288: IF (g_level_procedure >= g_current_runtime_level ) THEN
3289: FND_LOG.STRING(g_level_procedure,
3290: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag',
3291: 'Exception:' ||SQLCODE||';'||SQLERRM);
3292: FND_LOG.STRING(g_level_procedure,
3293: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag',
3294: 'Return Status = '||x_return_status);
3289: FND_LOG.STRING(g_level_procedure,
3290: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag',
3291: 'Exception:' ||SQLCODE||';'||SQLERRM);
3292: FND_LOG.STRING(g_level_procedure,
3293: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag',
3294: 'Return Status = '||x_return_status);
3295: END IF;
3296:
3297: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3301: FND_MSG_PUB.Add;
3302:
3303: IF (g_level_procedure >= g_current_runtime_level ) THEN
3304: FND_LOG.STRING(g_level_procedure,
3305: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag',
3306: 'Unexpected Error:' ||SQLCODE||';'||SQLERRM);
3307: FND_LOG.STRING(g_level_procedure,
3308: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag',
3309: 'Return Status = '||x_return_status);
3304: FND_LOG.STRING(g_level_procedure,
3305: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag',
3306: 'Unexpected Error:' ||SQLCODE||';'||SQLERRM);
3307: FND_LOG.STRING(g_level_procedure,
3308: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag',
3309: 'Return Status = '||x_return_status);
3310: FND_LOG.STRING(g_level_procedure,
3311: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag',
3312: 'Unexpected error ...');
3307: FND_LOG.STRING(g_level_procedure,
3308: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag',
3309: 'Return Status = '||x_return_status);
3310: FND_LOG.STRING(g_level_procedure,
3311: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag',
3312: 'Unexpected error ...');
3313: END IF;
3314:
3315: WHEN OTHERS THEN
3316: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3317:
3318: IF (g_level_procedure >= g_current_runtime_level ) THEN
3319: FND_LOG.STRING(g_level_procedure,
3320: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag',
3321: 'Exception:Others:' ||SQLCODE||';'||SQLERRM);
3322:
3323: FND_LOG.STRING(g_level_procedure,
3324: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag',
3320: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag',
3321: 'Exception:Others:' ||SQLCODE||';'||SQLERRM);
3322:
3323: FND_LOG.STRING(g_level_procedure,
3324: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Freeze_Flag',
3325: 'Return Status = '||x_return_status);
3326: END IF;
3327: END Update_Freeze_Flag;
3328:
3342: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
3343:
3344: IF (g_level_procedure >= g_current_runtime_level ) THEN
3345: FND_LOG.STRING(g_level_procedure,
3346: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Item_Dist_Changed_Flag.BEGIN',
3347: 'ZX_TRL_MANAGE_TAX_PKG: Update_Item_Dist_Changed_Flag (+)');
3348: END IF;
3349:
3350: -- Initialize API return status to success
3343:
3344: IF (g_level_procedure >= g_current_runtime_level ) THEN
3345: FND_LOG.STRING(g_level_procedure,
3346: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Item_Dist_Changed_Flag.BEGIN',
3347: 'ZX_TRL_MANAGE_TAX_PKG: Update_Item_Dist_Changed_Flag (+)');
3348: END IF;
3349:
3350: -- Initialize API return status to success
3351: x_return_status := FND_API.G_RET_STS_SUCCESS;
3368: AND ZD.DIST_LEVEL_ACTION IN ('UPDATE','CREATE'));
3369:
3370: IF (g_level_procedure >= g_current_runtime_level ) THEN
3371: FND_LOG.STRING(g_level_procedure,
3372: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Item_Dist_Changed_Flag.END',
3373: 'ZX_TRL_MANAGE_TAX_PKG: Update_Item_Dist_Changed_Flag (-)');
3374: END IF;
3375:
3376: EXCEPTION
3369:
3370: IF (g_level_procedure >= g_current_runtime_level ) THEN
3371: FND_LOG.STRING(g_level_procedure,
3372: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Item_Dist_Changed_Flag.END',
3373: 'ZX_TRL_MANAGE_TAX_PKG: Update_Item_Dist_Changed_Flag (-)');
3374: END IF;
3375:
3376: EXCEPTION
3377: WHEN OTHERS THEN
3378: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3379:
3380: IF (g_level_procedure >= g_current_runtime_level ) THEN
3381: FND_LOG.STRING(g_level_procedure,
3382: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Item_Dist_Changed_Flag',
3383: 'Exception:Others:' ||SQLCODE||';'||SQLERRM);
3384:
3385: FND_LOG.STRING(g_level_procedure,
3386: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Item_Dist_Changed_Flag',
3382: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Item_Dist_Changed_Flag',
3383: 'Exception:Others:' ||SQLCODE||';'||SQLERRM);
3384:
3385: FND_LOG.STRING(g_level_procedure,
3386: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Item_Dist_Changed_Flag',
3387: 'Return Status = '||x_return_status);
3388: END IF;
3389: END Update_Item_Dist_Changed_Flag;
3390:
3442: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
3443:
3444: IF (g_level_procedure >= g_current_runtime_level ) THEN
3445: FND_LOG.STRING(g_level_procedure,
3446: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Discard_Tax_Only_Lines.BEGIN',
3447: 'ZX_TRL_MANAGE_TAX_PKG: Discard_Tax_Only_Lines (+)');
3448: END IF;
3449:
3450: -- Initialize API return status to success
3443:
3444: IF (g_level_procedure >= g_current_runtime_level ) THEN
3445: FND_LOG.STRING(g_level_procedure,
3446: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Discard_Tax_Only_Lines.BEGIN',
3447: 'ZX_TRL_MANAGE_TAX_PKG: Discard_Tax_Only_Lines (+)');
3448: END IF;
3449:
3450: -- Initialize API return status to success
3451: x_return_status := FND_API.G_RET_STS_SUCCESS;
3483: l_row_count := SQL%ROWCOUNT;
3484:
3485: IF (g_level_statement >= g_current_runtime_level ) THEN
3486: FND_LOG.STRING(g_level_statement,
3487: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Discard_Tax_Only_Lines',
3488: 'Number of rows updated in zx_lines = '||l_row_count);
3489: END IF;
3490:
3491: IF p_event_class_rec.summarization_flag = 'Y' THEN
3509: l_row_count := SQL%ROWCOUNT;
3510:
3511: IF (g_level_statement >= g_current_runtime_level ) THEN
3512: FND_LOG.STRING(g_level_statement,
3513: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Discard_Tax_Only_Lines',
3514: 'Number of rows updated in zx_lines_summary = '||l_row_count);
3515: END IF;
3516:
3517: END IF;
3914: l_row_count := SQL%ROWCOUNT;
3915:
3916: IF (g_level_statement >= g_current_runtime_level ) THEN
3917: FND_LOG.STRING(g_level_statement,
3918: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Cancel_Transaction',
3919: 'Number of rows updated in zx_rec_nrec_dist = '||l_row_count);
3920: END IF;
3921:
3922: FORALL i IN NVL(l_rec_nrec_tax_dist_id_tbl.FIRST, 0) ..
3928: l_row_count := SQL%ROWCOUNT;
3929:
3930: IF (g_level_statement >= g_current_runtime_level ) THEN
3931: FND_LOG.STRING(g_level_statement,
3932: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Cancel_Transaction',
3933: 'Number of rows updated in zx_rec_nrec_dist = '||l_row_count);
3934: END IF;
3935:
3936: END IF; -- _rec_nrec_tax_dist_id_tbl.COUNT > 0
3937:
3938: /*
3939: * IF (g_level_procedure >= g_current_runtime_level ) THEN
3940: * FND_LOG.STRING(g_level_procedure,
3941: * 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Discard_Tax_Only_Lines',
3942: * 'Update ZX_REC_NREC_DIST set reverse flag to Y (+)');
3943: * END IF;
3944: *
3945: * UPDATE ZX_REC_NREC_DIST
3952: * AND NVL(Tax_Only_Line_Flag, 'N') = 'Y';
3953: *
3954: * IF (g_level_procedure >= g_current_runtime_level ) THEN
3955: * FND_LOG.STRING(g_level_procedure,
3956: * 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Discard_Tax_Only_Lines',
3957: * 'Update ZX_REC_NREC_DIST set reverse flag to Y (-)');
3958: * END IF;
3959: */
3960:
3959: */
3960:
3961: IF (g_level_procedure >= g_current_runtime_level ) THEN
3962: FND_LOG.STRING(g_level_procedure,
3963: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Discard_Tax_Only_Lines.END',
3964: 'ZX_TRL_MANAGE_TAX_PKG: Discard_Tax_Only_Lines (-)');
3965: END IF;
3966:
3967: EXCEPTION
3960:
3961: IF (g_level_procedure >= g_current_runtime_level ) THEN
3962: FND_LOG.STRING(g_level_procedure,
3963: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Discard_Tax_Only_Lines.END',
3964: 'ZX_TRL_MANAGE_TAX_PKG: Discard_Tax_Only_Lines (-)');
3965: END IF;
3966:
3967: EXCEPTION
3968: WHEN OTHERS THEN
3969: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3970:
3971: IF (g_level_procedure >= g_current_runtime_level ) THEN
3972: FND_LOG.STRING(g_level_procedure,
3973: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Discard_Tax_Only_Lines',
3974: 'Exception:Others:' ||SQLCODE||';'||SQLERRM);
3975:
3976: FND_LOG.STRING(g_level_procedure,
3977: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Discard_Tax_Only_Lines',
3973: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Discard_Tax_Only_Lines',
3974: 'Exception:Others:' ||SQLCODE||';'||SQLERRM);
3975:
3976: FND_LOG.STRING(g_level_procedure,
3977: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Discard_Tax_Only_Lines',
3978: 'Return Status = '||x_return_status);
3979: END IF;
3980: END Discard_Tax_Only_Lines;
3981:
3994: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
3995:
3996: IF (g_level_procedure >= g_current_runtime_level ) THEN
3997: FND_LOG.STRING(g_level_procedure,
3998: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_GL_Date.BEGIN',
3999: 'ZX_TRL_MANAGE_TAX_PKG: Update_GL_Date (+)');
4000: END IF;
4001:
4002: -- Initialize API return status to success
3995:
3996: IF (g_level_procedure >= g_current_runtime_level ) THEN
3997: FND_LOG.STRING(g_level_procedure,
3998: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_GL_Date.BEGIN',
3999: 'ZX_TRL_MANAGE_TAX_PKG: Update_GL_Date (+)');
4000: END IF;
4001:
4002: -- Initialize API return status to success
4003: x_return_status := FND_API.G_RET_STS_SUCCESS;
4008: (SELECT tax_dist_id FROM zx_tax_dist_id_gt);
4009:
4010: IF (g_level_procedure >= g_current_runtime_level ) THEN
4011: FND_LOG.STRING(g_level_procedure,
4012: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_GL_Date.END',
4013: 'ZX_TRL_MANAGE_TAX_PKG: Update_GL_Date (-)');
4014: END IF;
4015:
4016: EXCEPTION
4009:
4010: IF (g_level_procedure >= g_current_runtime_level ) THEN
4011: FND_LOG.STRING(g_level_procedure,
4012: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_GL_Date.END',
4013: 'ZX_TRL_MANAGE_TAX_PKG: Update_GL_Date (-)');
4014: END IF;
4015:
4016: EXCEPTION
4017: WHEN OTHERS THEN
4018: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4019:
4020: IF (g_level_procedure >= g_current_runtime_level ) THEN
4021: FND_LOG.STRING(g_level_procedure,
4022: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_GL_Date',
4023: 'Exception:Others:' ||SQLCODE||';'||SQLERRM);
4024:
4025: FND_LOG.STRING(g_level_procedure,
4026: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_GL_Date',
4022: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_GL_Date',
4023: 'Exception:Others:' ||SQLCODE||';'||SQLERRM);
4024:
4025: FND_LOG.STRING(g_level_procedure,
4026: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_GL_Date',
4027: 'Return Status = '||x_return_status);
4028: END IF;
4029: END Update_GL_Date;
4030:
4046: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
4047:
4048: IF (g_level_procedure >= g_current_runtime_level ) THEN
4049: FND_LOG.STRING(g_level_procedure,
4050: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Exchange_Rate.BEGIN',
4051: 'ZX_TRL_MANAGE_TAX_PKG: Update_Exchange_Rate (+)');
4052: END IF;
4053:
4054: -- Initialize API return status to success
4047:
4048: IF (g_level_procedure >= g_current_runtime_level ) THEN
4049: FND_LOG.STRING(g_level_procedure,
4050: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Exchange_Rate.BEGIN',
4051: 'ZX_TRL_MANAGE_TAX_PKG: Update_Exchange_Rate (+)');
4052: END IF;
4053:
4054: -- Initialize API return status to success
4055: x_return_status := FND_API.G_RET_STS_SUCCESS;
4109: END IF;
4110:
4111: IF (g_level_procedure >= g_current_runtime_level ) THEN
4112: FND_LOG.STRING(g_level_procedure,
4113: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Exchange_Rate.END',
4114: 'ZX_TRL_MANAGE_TAX_PKG: Update_Exchange_Rate (-)');
4115: END IF;
4116:
4117: EXCEPTION
4110:
4111: IF (g_level_procedure >= g_current_runtime_level ) THEN
4112: FND_LOG.STRING(g_level_procedure,
4113: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Exchange_Rate.END',
4114: 'ZX_TRL_MANAGE_TAX_PKG: Update_Exchange_Rate (-)');
4115: END IF;
4116:
4117: EXCEPTION
4118: WHEN OTHERS THEN
4119: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4120:
4121: IF (g_level_procedure >= g_current_runtime_level ) THEN
4122: FND_LOG.STRING(g_level_procedure,
4123: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Exchange_Rate',
4124: 'Exception:Others:' ||SQLCODE||';'||SQLERRM);
4125:
4126: FND_LOG.STRING(g_level_procedure,
4127: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Exchange_Rate',
4123: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Exchange_Rate',
4124: 'Exception:Others:' ||SQLCODE||';'||SQLERRM);
4125:
4126: FND_LOG.STRING(g_level_procedure,
4127: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.Update_Exchange_Rate',
4128: 'Return Status = '||x_return_status);
4129: END IF;
4130: END Update_Exchange_Rate;
4131:
4149: l_row_count :=0 ;
4150:
4151: IF (g_level_procedure >= g_current_runtime_level ) THEN
4152: FND_LOG.STRING(g_level_procedure,
4153: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.update_exist_summary_line_id.BEGIN',
4154: 'ZX_TRL_MANAGE_TAX_PKG: update_exist_summary_line_id (+)');
4155: END IF;
4156:
4157: x_return_status := FND_API.G_RET_STS_SUCCESS;
4150:
4151: IF (g_level_procedure >= g_current_runtime_level ) THEN
4152: FND_LOG.STRING(g_level_procedure,
4153: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.update_exist_summary_line_id.BEGIN',
4154: 'ZX_TRL_MANAGE_TAX_PKG: update_exist_summary_line_id (+)');
4155: END IF;
4156:
4157: x_return_status := FND_API.G_RET_STS_SUCCESS;
4158:
4244: WHERE summary_tax_line_id IS NULL;
4245:
4246: IF (g_level_procedure >= g_current_runtime_level ) THEN
4247: FND_LOG.STRING(g_level_procedure,
4248: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.update_exist_summary_line_id.END',
4249: 'ZX_TRL_MANAGE_TAX_PKG: update_exist_summary_line_id (-)');
4250: END IF;
4251:
4252: EXCEPTION
4245:
4246: IF (g_level_procedure >= g_current_runtime_level ) THEN
4247: FND_LOG.STRING(g_level_procedure,
4248: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.update_exist_summary_line_id.END',
4249: 'ZX_TRL_MANAGE_TAX_PKG: update_exist_summary_line_id (-)');
4250: END IF;
4251:
4252: EXCEPTION
4253: WHEN OTHERS THEN
4255: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
4256:
4257: IF (g_level_unexpected >= g_current_runtime_level ) THEN
4258: FND_LOG.STRING(g_level_unexpected,
4259: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.update_exist_summary_line_id(-)',
4260: l_error_buffer);
4261: END IF;
4262:
4263: END update_exist_summary_line_id;
4285: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
4286:
4287: IF (g_level_procedure >= g_current_runtime_level ) THEN
4288: FND_LOG.STRING(g_level_procedure,
4289: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.release_document_tax_hold.BEGIN',
4290: 'ZX_TRL_MANAGE_TAX_PKG: release_document_tax_hold (+)');
4291: END IF;
4292:
4293: -- Initialize API return status to success
4286:
4287: IF (g_level_procedure >= g_current_runtime_level ) THEN
4288: FND_LOG.STRING(g_level_procedure,
4289: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.release_document_tax_hold.BEGIN',
4290: 'ZX_TRL_MANAGE_TAX_PKG: release_document_tax_hold (+)');
4291: END IF;
4292:
4293: -- Initialize API return status to success
4294: x_return_status := FND_API.G_RET_STS_SUCCESS;
4335:
4336: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4337: IF (g_level_statement >= g_current_runtime_level ) THEN
4338: FND_LOG.STRING(g_level_statement,
4339: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.release_document_tax_hold',
4340: 'Incorrect return_status after calling ' ||
4341: ' ZX_ON_FLY_TRX_UPGRADE_PKG.upgrade_trx_on_fly');
4342: FND_LOG.STRING(g_level_statement,
4343: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.release_document_tax_hold',
4339: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.release_document_tax_hold',
4340: 'Incorrect return_status after calling ' ||
4341: ' ZX_ON_FLY_TRX_UPGRADE_PKG.upgrade_trx_on_fly');
4342: FND_LOG.STRING(g_level_statement,
4343: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.release_document_tax_hold',
4344: 'RETURN_STATUS = ' || x_return_status);
4345: FND_LOG.STRING(g_level_statement,
4346: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.release_document_tax_hold.END',
4347: 'ZX_TRL_MANAGE_TAX_PKG.release_document_tax_hold(-)');
4342: FND_LOG.STRING(g_level_statement,
4343: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.release_document_tax_hold',
4344: 'RETURN_STATUS = ' || x_return_status);
4345: FND_LOG.STRING(g_level_statement,
4346: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.release_document_tax_hold.END',
4347: 'ZX_TRL_MANAGE_TAX_PKG.release_document_tax_hold(-)');
4348: END IF;
4349: RETURN;
4350: END IF;
4343: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.release_document_tax_hold',
4344: 'RETURN_STATUS = ' || x_return_status);
4345: FND_LOG.STRING(g_level_statement,
4346: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.release_document_tax_hold.END',
4347: 'ZX_TRL_MANAGE_TAX_PKG.release_document_tax_hold(-)');
4348: END IF;
4349: RETURN;
4350: END IF;
4351:
4364:
4365: IF (g_level_procedure >= g_current_runtime_level ) THEN
4366:
4367: FND_LOG.STRING(g_level_procedure,
4368: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.release_document_tax_hold.END',
4369: 'ZX_TRL_MANAGE_TAX_PKG: release_document_tax_hold (-)'||x_return_status);
4370: END IF;
4371:
4372: EXCEPTION
4365: IF (g_level_procedure >= g_current_runtime_level ) THEN
4366:
4367: FND_LOG.STRING(g_level_procedure,
4368: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.release_document_tax_hold.END',
4369: 'ZX_TRL_MANAGE_TAX_PKG: release_document_tax_hold (-)'||x_return_status);
4370: END IF;
4371:
4372: EXCEPTION
4373: WHEN OTHERS THEN
4375: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
4376:
4377: IF (g_level_unexpected >= g_current_runtime_level ) THEN
4378: FND_LOG.STRING(g_level_unexpected,
4379: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.release_document_tax_hold',
4380: l_error_buffer);
4381: END IF;
4382:
4383: END RELEASE_DOCUMENT_TAX_HOLD;
4412: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
4413:
4414: IF (g_level_procedure >= g_current_runtime_level ) THEN
4415: FND_LOG.STRING(g_level_procedure,
4416: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt.BEGIN',
4417: 'ZX_TRL_MANAGE_TAX_PKG: create_summary_lines_crt_evnt (+)');
4418: END IF;
4419:
4420: -- Initialize API return status to success
4413:
4414: IF (g_level_procedure >= g_current_runtime_level ) THEN
4415: FND_LOG.STRING(g_level_procedure,
4416: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt.BEGIN',
4417: 'ZX_TRL_MANAGE_TAX_PKG: create_summary_lines_crt_evnt (+)');
4418: END IF;
4419:
4420: -- Initialize API return status to success
4421: --
5124:
5125: IF (g_level_procedure >= g_current_runtime_level ) THEN
5126:
5127: FND_LOG.STRING(g_level_procedure,
5128: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt.END',
5129: 'ZX_TRL_MANAGE_TAX_PKG: create_summary_lines_crt_evnt (-)'||x_return_status);
5130: END IF;
5131:
5132: EXCEPTION
5125: IF (g_level_procedure >= g_current_runtime_level ) THEN
5126:
5127: FND_LOG.STRING(g_level_procedure,
5128: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt.END',
5129: 'ZX_TRL_MANAGE_TAX_PKG: create_summary_lines_crt_evnt (-)'||x_return_status);
5130: END IF;
5131:
5132: EXCEPTION
5133: WHEN OTHERS THEN
5135: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
5136:
5137: IF (g_level_unexpected >= g_current_runtime_level ) THEN
5138: FND_LOG.STRING(g_level_unexpected,
5139: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt',
5140: l_error_buffer);
5141: END IF;
5142:
5143: END create_summary_lines_crt_evnt;
5172: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
5173:
5174: IF (g_level_procedure >= g_current_runtime_level ) THEN
5175: FND_LOG.STRING(g_level_procedure,
5176: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_upd_evnt.BEGIN',
5177: 'ZX_TRL_MANAGE_TAX_PKG: create_summary_lines_upd_evnt (+)');
5178: END IF;
5179:
5180: -- Initialize API return status to success
5173:
5174: IF (g_level_procedure >= g_current_runtime_level ) THEN
5175: FND_LOG.STRING(g_level_procedure,
5176: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_upd_evnt.BEGIN',
5177: 'ZX_TRL_MANAGE_TAX_PKG: create_summary_lines_upd_evnt (+)');
5178: END IF;
5179:
5180: -- Initialize API return status to success
5181: --
5205: FOR i IN 1..tax_line_id_tbl.COUNT LOOP
5206:
5207: IF (g_level_procedure >= g_current_runtime_level ) THEN
5208: FND_LOG.STRING(g_level_procedure,
5209: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_upd_evnt.BEGIN',
5210: 'Tax line id for null taxable bsis formula'||to_char(tax_line_id_tbl(i)));
5211: END IF;
5212: IF l_tax_rate_id <> tax_rate_id_tbl(i) THEN
5213: l_tax_rate_id := tax_rate_id_tbl(i);
6399:
6400: IF (g_level_procedure >= g_current_runtime_level ) THEN
6401:
6402: FND_LOG.STRING(g_level_procedure,
6403: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_upd_evnt.END',
6404: 'ZX_TRL_MANAGE_TAX_PKG: create_summary_lines_upd_evnt (-)'||x_return_status);
6405: END IF;
6406:
6407: EXCEPTION
6400: IF (g_level_procedure >= g_current_runtime_level ) THEN
6401:
6402: FND_LOG.STRING(g_level_procedure,
6403: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_upd_evnt.END',
6404: 'ZX_TRL_MANAGE_TAX_PKG: create_summary_lines_upd_evnt (-)'||x_return_status);
6405: END IF;
6406:
6407: EXCEPTION
6408: WHEN OTHERS THEN
6410: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
6411:
6412: IF (g_level_unexpected >= g_current_runtime_level ) THEN
6413: FND_LOG.STRING(g_level_unexpected,
6414: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_upd_evnt',
6415: l_error_buffer);
6416: END IF;
6417:
6418: END create_summary_lines_upd_evnt;
6459: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
6460:
6461: IF (g_level_procedure >= g_current_runtime_level ) THEN
6462: FND_LOG.STRING(g_level_procedure,
6463: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_del_evnt.BEGIN',
6464: 'ZX_TRL_MANAGE_TAX_PKG: create_summary_lines_del_evnt (+)');
6465: END IF;
6466:
6467: -- Initialize API return status to success
6460:
6461: IF (g_level_procedure >= g_current_runtime_level ) THEN
6462: FND_LOG.STRING(g_level_procedure,
6463: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_del_evnt.BEGIN',
6464: 'ZX_TRL_MANAGE_TAX_PKG: create_summary_lines_del_evnt (+)');
6465: END IF;
6466:
6467: -- Initialize API return status to success
6468: --
7009:
7010: IF (g_level_procedure >= g_current_runtime_level ) THEN
7011:
7012: FND_LOG.STRING(g_level_procedure,
7013: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_del_evnt.END',
7014: 'ZX_TRL_MANAGE_TAX_PKG: create_summary_lines_del_evnt (-)'||x_return_status);
7015: END IF;
7016:
7017: EXCEPTION
7010: IF (g_level_procedure >= g_current_runtime_level ) THEN
7011:
7012: FND_LOG.STRING(g_level_procedure,
7013: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_del_evnt.END',
7014: 'ZX_TRL_MANAGE_TAX_PKG: create_summary_lines_del_evnt (-)'||x_return_status);
7015: END IF;
7016:
7017: EXCEPTION
7018: WHEN OTHERS THEN
7020: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
7021:
7022: IF (g_level_unexpected >= g_current_runtime_level ) THEN
7023: FND_LOG.STRING(g_level_unexpected,
7024: 'ZX.PLSQL.ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_del_evnt',
7025: l_error_buffer);
7026: END IF;
7027:
7028: END create_summary_lines_del_evnt;
7033: -- Package constructor
7034: --
7035: -------------------------------------------------------------------------------
7036:
7037: END ZX_TRL_MANAGE_TAX_PKG;