1: PACKAGE BODY ZX_TRL_PUB_PKG AS
2: /* $Header: zxrwlnrepsrvpubb.pls 120.44.12020000.5 2013/02/19 15:43:22 ssohal ship $ */
3:
4: g_current_runtime_level NUMBER;
5: g_level_statement CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
6: g_level_procedure CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
7: g_level_event CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
8: g_level_unexpected CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
9: g_level_error CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
2: /* $Header: zxrwlnrepsrvpubb.pls 120.44.12020000.5 2013/02/19 15:43:22 ssohal ship $ */
3:
4: g_current_runtime_level NUMBER;
5: g_level_statement CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
6: g_level_procedure CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
7: g_level_event CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
8: g_level_unexpected CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
9: g_level_error CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
10:
3:
4: g_current_runtime_level NUMBER;
5: g_level_statement CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
6: g_level_procedure CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
7: g_level_event CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
8: g_level_unexpected CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
9: g_level_error CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
10:
11: -- Added procedure to run the Frozen tax dist deleted validation --
4: g_current_runtime_level NUMBER;
5: g_level_statement CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
6: g_level_procedure CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
7: g_level_event CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
8: g_level_unexpected CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
9: g_level_error CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
10:
11: -- Added procedure to run the Frozen tax dist deleted validation --
12: PROCEDURE Check_Frozen_Tax_Dists
5: g_level_statement CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
6: g_level_procedure CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
7: g_level_event CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
8: g_level_unexpected CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
9: g_level_error CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
10:
11: -- Added procedure to run the Frozen tax dist deleted validation --
12: PROCEDURE Check_Frozen_Tax_Dists
13: (x_return_status OUT NOCOPY VARCHAR2,
26: l_error_buffer VARCHAR2(100);
27: l_msg_context_info_rec ZX_API_PUB.CONTEXT_INFO_REC_TYPE;
28:
29: BEGIN
30: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
31:
32: IF (g_level_procedure >= g_current_runtime_level ) THEN
33: FND_LOG.STRING(g_level_procedure,
34: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.BEGIN',
29: BEGIN
30: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
31:
32: IF (g_level_procedure >= g_current_runtime_level ) THEN
33: FND_LOG.STRING(g_level_procedure,
34: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.BEGIN',
35: 'ZX_TRL_PUB_PKG: Manage_TaxLines (+)');
36: END IF;
37:
97: p_event_class_rec => p_event_class_rec);
98:
99: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
100: IF (g_level_error >= g_current_runtime_level ) THEN
101: FND_LOG.STRING(g_level_error,
102: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
103: 'Incorrect return_status after calling ' ||
104: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Detail_Lines()');
105: FND_LOG.STRING(g_level_error,
101: FND_LOG.STRING(g_level_error,
102: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
103: 'Incorrect return_status after calling ' ||
104: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Detail_Lines()');
105: FND_LOG.STRING(g_level_error,
106: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
107: 'RETURN_STATUS = ' || x_return_status);
108: FND_LOG.STRING(g_level_error,
109: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
104: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Detail_Lines()');
105: FND_LOG.STRING(g_level_error,
106: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
107: 'RETURN_STATUS = ' || x_return_status);
108: FND_LOG.STRING(g_level_error,
109: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
110: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
111: END IF;
112: RETURN;
120: x_return_status => x_return_status);
121:
122: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
123: IF (g_level_error >= g_current_runtime_level ) THEN
124: FND_LOG.STRING(g_level_error,
125: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
126: 'Incorrect return_status after calling ' ||
127: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
128: FND_LOG.STRING(g_level_error,
124: FND_LOG.STRING(g_level_error,
125: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
126: 'Incorrect return_status after calling ' ||
127: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
128: FND_LOG.STRING(g_level_error,
129: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
130: 'RETURN_STATUS = ' || x_return_status);
131: FND_LOG.STRING(g_level_error,
132: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
127: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
128: FND_LOG.STRING(g_level_error,
129: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
130: 'RETURN_STATUS = ' || x_return_status);
131: FND_LOG.STRING(g_level_error,
132: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
133: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
134: END IF;
135: RETURN;
147: x_return_status => x_return_status);
148:
149: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
150: IF (g_level_error >= g_current_runtime_level ) THEN
151: FND_LOG.STRING(g_level_error,
152: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
153: 'Incorrect return_status after calling ' ||
154: 'ZX_TRL_MANAGE_TAX_PKG.update_exist_summary_line_id()');
155: FND_LOG.STRING(g_level_error,
151: FND_LOG.STRING(g_level_error,
152: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
153: 'Incorrect return_status after calling ' ||
154: 'ZX_TRL_MANAGE_TAX_PKG.update_exist_summary_line_id()');
155: FND_LOG.STRING(g_level_error,
156: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
157: 'RETURN_STATUS = ' || x_return_status);
158: FND_LOG.STRING(g_level_error,
159: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
154: 'ZX_TRL_MANAGE_TAX_PKG.update_exist_summary_line_id()');
155: FND_LOG.STRING(g_level_error,
156: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
157: 'RETURN_STATUS = ' || x_return_status);
158: FND_LOG.STRING(g_level_error,
159: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
160: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
161: END IF;
162: RETURN;
168: p_event_class_rec => p_event_class_rec);
169:
170: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
171: IF (g_level_error >= g_current_runtime_level ) THEN
172: FND_LOG.STRING(g_level_error,
173: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
174: 'Incorrect return_status after calling ' ||
175: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Summary_Lines()');
176: FND_LOG.STRING(g_level_error,
172: FND_LOG.STRING(g_level_error,
173: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
174: 'Incorrect return_status after calling ' ||
175: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Summary_Lines()');
176: FND_LOG.STRING(g_level_error,
177: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
178: 'RETURN_STATUS = ' || x_return_status);
179: FND_LOG.STRING(g_level_error,
180: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
175: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Summary_Lines()');
176: FND_LOG.STRING(g_level_error,
177: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
178: 'RETURN_STATUS = ' || x_return_status);
179: FND_LOG.STRING(g_level_error,
180: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
181: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
182: END IF;
183: RETURN;
197: x_return_status => x_return_status );
198:
199: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
200: IF (g_level_error >= g_current_runtime_level ) THEN
201: FND_LOG.STRING(g_level_error,
202: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
203: 'Incorrect return_status after calling ' ||
204: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt()');
205: FND_LOG.STRING(g_level_error,
201: FND_LOG.STRING(g_level_error,
202: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
203: 'Incorrect return_status after calling ' ||
204: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt()');
205: FND_LOG.STRING(g_level_error,
206: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
207: 'RETURN_STATUS = ' || x_return_status);
208: FND_LOG.STRING(g_level_error,
209: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
204: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt()');
205: FND_LOG.STRING(g_level_error,
206: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
207: 'RETURN_STATUS = ' || x_return_status);
208: FND_LOG.STRING(g_level_error,
209: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
210: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
211: END IF;
212: RETURN;
218: x_return_status => x_return_status);
219:
220: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
221: IF (g_level_error >= g_current_runtime_level ) THEN
222: FND_LOG.STRING(g_level_error,
223: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
224: 'Incorrect return_status after calling ' ||
225: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
226: FND_LOG.STRING(g_level_error,
222: FND_LOG.STRING(g_level_error,
223: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
224: 'Incorrect return_status after calling ' ||
225: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
226: FND_LOG.STRING(g_level_error,
227: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
228: 'RETURN_STATUS = ' || x_return_status);
229: FND_LOG.STRING(g_level_error,
230: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
225: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
226: FND_LOG.STRING(g_level_error,
227: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
228: 'RETURN_STATUS = ' || x_return_status);
229: FND_LOG.STRING(g_level_error,
230: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
231: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
232: END IF;
233: RETURN;
241: x_return_status => x_return_status);
242:
243: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
244: IF (g_level_error >= g_current_runtime_level ) THEN
245: FND_LOG.STRING(g_level_error,
246: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
247: 'Incorrect return_status after calling ' ||
248: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
249: FND_LOG.STRING(g_level_error,
245: FND_LOG.STRING(g_level_error,
246: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
247: 'Incorrect return_status after calling ' ||
248: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
249: FND_LOG.STRING(g_level_error,
250: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
251: 'RETURN_STATUS = ' || x_return_status);
252: FND_LOG.STRING(g_level_error,
253: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
248: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
249: FND_LOG.STRING(g_level_error,
250: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
251: 'RETURN_STATUS = ' || x_return_status);
252: FND_LOG.STRING(g_level_error,
253: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
254: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
255: END IF;
256: RETURN;
261: x_return_status => x_return_status );
262:
263: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
264: IF (g_level_error >= g_current_runtime_level ) THEN
265: FND_LOG.STRING(g_level_error,
266: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
267: 'Incorrect return_status after calling ' ||
268: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt()');
269: FND_LOG.STRING(g_level_error,
265: FND_LOG.STRING(g_level_error,
266: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
267: 'Incorrect return_status after calling ' ||
268: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt()');
269: FND_LOG.STRING(g_level_error,
270: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
271: 'RETURN_STATUS = ' || x_return_status);
272: FND_LOG.STRING(g_level_error,
273: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
268: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt()');
269: FND_LOG.STRING(g_level_error,
270: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
271: 'RETURN_STATUS = ' || x_return_status);
272: FND_LOG.STRING(g_level_error,
273: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
274: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
275: END IF;
276: RETURN;
286: p_event_class_rec => p_event_class_rec);
287:
288: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
289: IF (g_level_error >= g_current_runtime_level ) THEN
290: FND_LOG.STRING(g_level_error,
291: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
292: 'Incorrect return_status after calling ' ||
293: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Loose_Tax_Distributions()');
294: FND_LOG.STRING(g_level_error,
290: FND_LOG.STRING(g_level_error,
291: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
292: 'Incorrect return_status after calling ' ||
293: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Loose_Tax_Distributions()');
294: FND_LOG.STRING(g_level_error,
295: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
296: 'RETURN_STATUS = ' || x_return_status);
297: FND_LOG.STRING(g_level_error,
298: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
293: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Loose_Tax_Distributions()');
294: FND_LOG.STRING(g_level_error,
295: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
296: 'RETURN_STATUS = ' || x_return_status);
297: FND_LOG.STRING(g_level_error,
298: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
299: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
300: END IF;
301: RETURN;
314: x_return_status => x_return_status );
315:
316: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
317: IF (g_level_error >= g_current_runtime_level ) THEN
318: FND_LOG.STRING(g_level_error,
319: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
320: 'Incorrect return_status after calling ' ||
321: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt()');
322: FND_LOG.STRING(g_level_error,
318: FND_LOG.STRING(g_level_error,
319: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
320: 'Incorrect return_status after calling ' ||
321: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt()');
322: FND_LOG.STRING(g_level_error,
323: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
324: 'RETURN_STATUS = ' || x_return_status);
325: FND_LOG.STRING(g_level_error,
326: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
321: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt()');
322: FND_LOG.STRING(g_level_error,
323: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
324: 'RETURN_STATUS = ' || x_return_status);
325: FND_LOG.STRING(g_level_error,
326: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
327: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
328: END IF;
329: RETURN;
337: x_return_status => x_return_status);
338:
339: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
340: IF (g_level_error >= g_current_runtime_level ) THEN
341: FND_LOG.STRING(g_level_error,
342: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
343: 'Incorrect return_status after calling ' ||
344: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
345: FND_LOG.STRING(g_level_error,
341: FND_LOG.STRING(g_level_error,
342: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
343: 'Incorrect return_status after calling ' ||
344: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
345: FND_LOG.STRING(g_level_error,
346: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
347: 'RETURN_STATUS = ' || x_return_status);
348: FND_LOG.STRING(g_level_error,
349: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
344: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
345: FND_LOG.STRING(g_level_error,
346: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
347: 'RETURN_STATUS = ' || x_return_status);
348: FND_LOG.STRING(g_level_error,
349: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
350: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
351: END IF;
352: RETURN;
370: p_event_class_rec => p_event_class_rec);
371:
372: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
373: IF (g_level_error >= g_current_runtime_level ) THEN
374: FND_LOG.STRING(g_level_error,
375: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
376: 'Incorrect return_status after calling ' ||
377: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Detail_Lines()');
378: FND_LOG.STRING(g_level_error,
374: FND_LOG.STRING(g_level_error,
375: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
376: 'Incorrect return_status after calling ' ||
377: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Detail_Lines()');
378: FND_LOG.STRING(g_level_error,
379: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
380: 'RETURN_STATUS = ' || x_return_status);
381: FND_LOG.STRING(g_level_error,
382: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
377: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Detail_Lines()');
378: FND_LOG.STRING(g_level_error,
379: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
380: 'RETURN_STATUS = ' || x_return_status);
381: FND_LOG.STRING(g_level_error,
382: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
383: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
384: END IF;
385: RETURN;
393: x_return_status => x_return_status);
394:
395: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
396: IF (g_level_error >= g_current_runtime_level ) THEN
397: FND_LOG.STRING(g_level_error,
398: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
399: 'Incorrect return_status after calling ' ||
400: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
401: FND_LOG.STRING(g_level_error,
397: FND_LOG.STRING(g_level_error,
398: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
399: 'Incorrect return_status after calling ' ||
400: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
401: FND_LOG.STRING(g_level_error,
402: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
403: 'RETURN_STATUS = ' || x_return_status);
404: FND_LOG.STRING(g_level_error,
405: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
400: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
401: FND_LOG.STRING(g_level_error,
402: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
403: 'RETURN_STATUS = ' || x_return_status);
404: FND_LOG.STRING(g_level_error,
405: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
406: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
407: END IF;
408: RETURN;
420: x_return_status => x_return_status);
421:
422: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
423: IF (g_level_error >= g_current_runtime_level ) THEN
424: FND_LOG.STRING(g_level_error,
425: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
426: 'Incorrect return_status after calling ' ||
427: 'ZX_TRL_MANAGE_TAX_PKG.update_exist_summary_line_id()');
428: FND_LOG.STRING(g_level_error,
424: FND_LOG.STRING(g_level_error,
425: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
426: 'Incorrect return_status after calling ' ||
427: 'ZX_TRL_MANAGE_TAX_PKG.update_exist_summary_line_id()');
428: FND_LOG.STRING(g_level_error,
429: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
430: 'RETURN_STATUS = ' || x_return_status);
431: FND_LOG.STRING(g_level_error,
432: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
427: 'ZX_TRL_MANAGE_TAX_PKG.update_exist_summary_line_id()');
428: FND_LOG.STRING(g_level_error,
429: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
430: 'RETURN_STATUS = ' || x_return_status);
431: FND_LOG.STRING(g_level_error,
432: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
433: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
434: END IF;
435: RETURN;
441: p_event_class_rec => p_event_class_rec);
442:
443: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
444: IF (g_level_error >= g_current_runtime_level ) THEN
445: FND_LOG.STRING(g_level_error,
446: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
447: 'Incorrect return_status after calling ' ||
448: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Summary_Lines()');
449: FND_LOG.STRING(g_level_error,
445: FND_LOG.STRING(g_level_error,
446: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
447: 'Incorrect return_status after calling ' ||
448: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Summary_Lines()');
449: FND_LOG.STRING(g_level_error,
450: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
451: 'RETURN_STATUS = ' || x_return_status);
452: FND_LOG.STRING(g_level_error,
453: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
448: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Summary_Lines()');
449: FND_LOG.STRING(g_level_error,
450: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
451: 'RETURN_STATUS = ' || x_return_status);
452: FND_LOG.STRING(g_level_error,
453: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
454: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
455: END IF;
456: RETURN;
472: x_return_status => x_return_status );
473:
474: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
475: IF (g_level_error >= g_current_runtime_level ) THEN
476: FND_LOG.STRING(g_level_error,
477: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
478: 'Incorrect return_status after calling ' ||
479: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt()');
480: FND_LOG.STRING(g_level_error,
476: FND_LOG.STRING(g_level_error,
477: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
478: 'Incorrect return_status after calling ' ||
479: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt()');
480: FND_LOG.STRING(g_level_error,
481: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
482: 'RETURN_STATUS = ' || x_return_status);
483: FND_LOG.STRING(g_level_error,
484: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
479: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt()');
480: FND_LOG.STRING(g_level_error,
481: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
482: 'RETURN_STATUS = ' || x_return_status);
483: FND_LOG.STRING(g_level_error,
484: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
485: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
486: END IF;
487: RETURN;
493: x_return_status => x_return_status);
494:
495: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
496: IF (g_level_error >= g_current_runtime_level ) THEN
497: FND_LOG.STRING(g_level_error,
498: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
499: 'Incorrect return_status after calling ' ||
500: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
501: FND_LOG.STRING(g_level_error,
497: FND_LOG.STRING(g_level_error,
498: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
499: 'Incorrect return_status after calling ' ||
500: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
501: FND_LOG.STRING(g_level_error,
502: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
503: 'RETURN_STATUS = ' || x_return_status);
504: FND_LOG.STRING(g_level_error,
505: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
500: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
501: FND_LOG.STRING(g_level_error,
502: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
503: 'RETURN_STATUS = ' || x_return_status);
504: FND_LOG.STRING(g_level_error,
505: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
506: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
507: END IF;
508: RETURN;
519: x_return_status => x_return_status);
520:
521: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
522: IF (g_level_error >= g_current_runtime_level ) THEN
523: FND_LOG.STRING(g_level_error,
524: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
525: 'Incorrect return_status after calling ' ||
526: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
527: FND_LOG.STRING(g_level_error,
523: FND_LOG.STRING(g_level_error,
524: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
525: 'Incorrect return_status after calling ' ||
526: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
527: FND_LOG.STRING(g_level_error,
528: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
529: 'RETURN_STATUS = ' || x_return_status);
530: FND_LOG.STRING(g_level_error,
531: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
526: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
527: FND_LOG.STRING(g_level_error,
528: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
529: 'RETURN_STATUS = ' || x_return_status);
530: FND_LOG.STRING(g_level_error,
531: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
532: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
533: END IF;
534: RETURN;
539: x_return_status => x_return_status );
540:
541: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
542: IF (g_level_error >= g_current_runtime_level ) THEN
543: FND_LOG.STRING(g_level_error,
544: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
545: 'Incorrect return_status after calling ' ||
546: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt()');
547: FND_LOG.STRING(g_level_error,
543: FND_LOG.STRING(g_level_error,
544: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
545: 'Incorrect return_status after calling ' ||
546: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt()');
547: FND_LOG.STRING(g_level_error,
548: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
549: 'RETURN_STATUS = ' || x_return_status);
550: FND_LOG.STRING(g_level_error,
551: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
546: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt()');
547: FND_LOG.STRING(g_level_error,
548: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
549: 'RETURN_STATUS = ' || x_return_status);
550: FND_LOG.STRING(g_level_error,
551: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
552: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
553: END IF;
554: RETURN;
565: p_event_class_rec => p_event_class_rec);
566:
567: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
568: IF (g_level_error >= g_current_runtime_level ) THEN
569: FND_LOG.STRING(g_level_error,
570: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
571: 'Incorrect return_status after calling ' ||
572: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Loose_Tax_Distributions()');
573: FND_LOG.STRING(g_level_error,
569: FND_LOG.STRING(g_level_error,
570: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
571: 'Incorrect return_status after calling ' ||
572: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Loose_Tax_Distributions()');
573: FND_LOG.STRING(g_level_error,
574: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
575: 'RETURN_STATUS = ' || x_return_status);
576: FND_LOG.STRING(g_level_error,
577: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
572: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Loose_Tax_Distributions()');
573: FND_LOG.STRING(g_level_error,
574: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
575: 'RETURN_STATUS = ' || x_return_status);
576: FND_LOG.STRING(g_level_error,
577: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
578: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
579: END IF;
580: RETURN;
583: END IF; -- tax_event_type_code
584:
585: IF (g_level_procedure >= g_current_runtime_level ) THEN
586:
587: FND_LOG.STRING(g_level_procedure,
588: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
589: 'ZX_TRL_PUB_PKG: Manage_TaxLines (-)'||x_return_status);
590: END IF;
591:
594: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
595: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
596:
597: IF (g_level_unexpected >= g_current_runtime_level ) THEN
598: FND_LOG.STRING(g_level_unexpected,
599: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
600: l_error_buffer);
601: END IF;
602:
620: --TRANSACTION LINES FOR THE GIVEN TRANSACTION FOR FURTHER PROCESSING.
621: l_error_buffer VARCHAR2(100);
622:
623: BEGIN
624: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
625:
626: IF (g_level_procedure >= g_current_runtime_level ) THEN
627: FND_LOG.STRING(g_level_procedure,
628: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Document_Level_Changes.BEGIN',
623: BEGIN
624: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
625:
626: IF (g_level_procedure >= g_current_runtime_level ) THEN
627: FND_LOG.STRING(g_level_procedure,
628: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Document_Level_Changes.BEGIN',
629: 'ZX_TRL_PUB_PKG: Document_Level_Changes (+)');
630: END IF;
631:
668: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
669: END IF;
670:
671: IF (g_level_procedure >= g_current_runtime_level ) THEN
672: FND_LOG.STRING(g_level_procedure,
673: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Document_Level_Changes.END',
674: 'ZX_TRL_PUB_PKG: Document_Level_Changes (-)'||x_return_status);
675: END IF;
676:
677: EXCEPTION
678: WHEN FND_API.G_EXC_ERROR THEN
679: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
680: IF (g_level_unexpected >= g_current_runtime_level ) THEN
681: FND_LOG.STRING(g_level_unexpected,
682: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Document_Level_Changes',
683: 'Return Status = ' || x_return_status);
684: END IF;
685:
687: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
688: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
689:
690: IF (g_level_unexpected >= g_current_runtime_level ) THEN
691: FND_LOG.STRING(g_level_unexpected,
692: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Document_Level_Changes',
693: l_error_buffer);
694: END IF;
695:
706: l_return_status VARCHAR2(1);
707: l_error_buffer VARCHAR2(100);
708:
709: BEGIN
710: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
711:
712: IF (g_level_procedure >= g_current_runtime_level ) THEN
713: FND_LOG.STRING(g_level_procedure,
714: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Synchronize_TaxLines.BEGIN',
709: BEGIN
710: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
711:
712: IF (g_level_procedure >= g_current_runtime_level ) THEN
713: FND_LOG.STRING(g_level_procedure,
714: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Synchronize_TaxLines.BEGIN',
715: 'ZX_TRL_PUB_PKG: Synchronize_TaxLines (+)');
716: END IF;
717:
731: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
732: END IF;
733:
734: IF (g_level_procedure >= g_current_runtime_level ) THEN
735: FND_LOG.STRING(g_level_procedure,
736: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Synchronize_TaxLines.END',
737: 'ZX_TRL_PUB_PKG: Synchronize_TaxLines (-)'||x_return_status);
738: END IF;
739:
740: EXCEPTION
741: WHEN FND_API.G_EXC_ERROR THEN
742: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
743: IF (g_level_unexpected >= g_current_runtime_level ) THEN
744: FND_LOG.STRING(g_level_unexpected,
745: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Synchronize_TaxLines',
746: 'Return Status = ' || x_return_status);
747: END IF;
748:
750: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
751: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
752:
753: IF (g_level_unexpected >= g_current_runtime_level ) THEN
754: FND_LOG.STRING(g_level_unexpected,
755: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Synchronize_TaxLines',
756: l_error_buffer);
757: END IF;
758:
769: l_return_status VARCHAR2(1);
770: l_error_buffer VARCHAR2(100);
771:
772: BEGIN
773: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
774:
775: IF (g_level_procedure >= g_current_runtime_level ) THEN
776: FND_LOG.STRING(g_level_procedure,
777: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Mark_Tax_Lines_Delete.BEGIN',
772: BEGIN
773: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
774:
775: IF (g_level_procedure >= g_current_runtime_level ) THEN
776: FND_LOG.STRING(g_level_procedure,
777: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Mark_Tax_Lines_Delete.BEGIN',
778: 'ZX_TRL_PUB_PKG: Mark_Tax_Lines_Delete (+)');
779: END IF;
780:
792: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
793: END IF;
794:
795: IF (g_level_procedure >= g_current_runtime_level ) THEN
796: FND_LOG.STRING(g_level_procedure,
797: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Mark_Tax_Lines_Delete.END',
798: 'ZX_TRL_PUB_PKG.Mark_Tax_Lines_Delete (-)'||x_return_status);
799: END IF;
800:
801: EXCEPTION
802: WHEN FND_API.G_EXC_ERROR THEN
803: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
804: IF (g_level_unexpected >= g_current_runtime_level ) THEN
805: FND_LOG.STRING(g_level_unexpected,
806: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Mark_Tax_Lines_Delete',
807: 'Return Status = ' || x_return_status);
808: END IF;
809:
811: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
812: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
813:
814: IF (g_level_unexpected >= g_current_runtime_level ) THEN
815: FND_LOG.STRING(g_level_unexpected,
816: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Mark_Tax_Lines_Delete',
817: l_error_buffer);
818: END IF;
819:
834: l_error_buffer VARCHAR2(200);
835: l_msg_context_info_rec ZX_API_PUB.CONTEXT_INFO_REC_TYPE;
836:
837: BEGIN
838: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
839:
840: IF (g_level_procedure >= g_current_runtime_level ) THEN
841: FND_LOG.STRING(g_level_procedure,
842: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxDistributions.BEGIN',
837: BEGIN
838: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
839:
840: IF (g_level_procedure >= g_current_runtime_level ) THEN
841: FND_LOG.STRING(g_level_procedure,
842: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxDistributions.BEGIN',
843: 'ZX_TRL_PUB_PKG: Manage_TaxDistributions (+)');
844: END IF;
845:
939: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
940: END IF;
941:
942: IF (g_level_procedure >= g_current_runtime_level ) THEN
943: FND_LOG.STRING(g_level_procedure,
944: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxDistributions.END',
945: 'ZX_TRL_PUB_PKG: Manage_TaxDistributions (-)'||x_return_status);
946: END IF;
947:
948: EXCEPTION
949: WHEN FND_API.G_EXC_ERROR THEN
950: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
951: IF (g_level_unexpected >= g_current_runtime_level ) THEN
952: FND_LOG.STRING(g_level_unexpected,
953: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxDistributions',
954: 'Unexpected Error. Return_Status = '||x_return_status);
955: FND_LOG.STRING(g_level_unexpected,
956: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxDistributions.END',
951: IF (g_level_unexpected >= g_current_runtime_level ) THEN
952: FND_LOG.STRING(g_level_unexpected,
953: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxDistributions',
954: 'Unexpected Error. Return_Status = '||x_return_status);
955: FND_LOG.STRING(g_level_unexpected,
956: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxDistributions.END',
957: 'ZX_TRL_PUB_PKG: Manage_TaxDistributions (-)');
958: END IF;
959:
961: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
962: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
963:
964: IF (g_level_unexpected >= g_current_runtime_level ) THEN
965: FND_LOG.STRING(g_level_unexpected,
966: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxDistributions',
967: l_error_buffer);
968: END IF;
969: END Manage_TaxDistributions;
980:
981: l_error_buffer VARCHAR2(100);
982:
983: BEGIN
984: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
985:
986: IF (g_level_procedure >= g_current_runtime_level ) THEN
987: FND_LOG.STRING(g_level_procedure,
988: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Freeze_TaxDistributions.BEGIN',
983: BEGIN
984: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
985:
986: IF (g_level_procedure >= g_current_runtime_level ) THEN
987: FND_LOG.STRING(g_level_procedure,
988: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Freeze_TaxDistributions.BEGIN',
989: 'ZX_TRL_PUB_PKG: Freeze_TaxDistributions (+)');
990: END IF;
991:
994: p_event_class_rec => p_event_class_rec);
995:
996:
997: IF (g_level_procedure >= g_current_runtime_level ) THEN
998: FND_LOG.STRING(g_level_procedure,
999: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Freeze_TaxDistributions.END',
1000: 'ZX_TRL_PUB_PKG: Freeze_TaxDistributions (-)'||x_return_status);
1001: END IF;
1002:
1003: EXCEPTION
1004: WHEN FND_API.G_EXC_ERROR THEN
1005: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1006: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1007: FND_LOG.STRING(g_level_unexpected,
1008: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Freeze_TaxDistributions',
1009: 'Return Status = ' || x_return_status);
1010: END IF;
1011:
1013: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1014: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
1015:
1016: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1017: FND_LOG.STRING(g_level_unexpected,
1018: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Freeze_TaxDistributions',
1019: l_error_buffer);
1020: END IF;
1021: END Freeze_TaxDistributions;
1031:
1032: l_error_buffer VARCHAR2(100);
1033:
1034: BEGIN
1035: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1036:
1037: IF (g_level_procedure >= g_current_runtime_level ) THEN
1038: FND_LOG.STRING(g_level_procedure,
1039: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Update_Taxlines.BEGIN',
1034: BEGIN
1035: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1036:
1037: IF (g_level_procedure >= g_current_runtime_level ) THEN
1038: FND_LOG.STRING(g_level_procedure,
1039: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Update_Taxlines.BEGIN',
1040: 'ZX_TRL_PUB_PKG: Update_Taxlines (+)');
1041: END IF;
1042:
1044: (x_return_status => x_return_status,
1045: p_event_class_rec => p_event_class_rec);
1046:
1047: IF (g_level_procedure >= g_current_runtime_level ) THEN
1048: FND_LOG.STRING(g_level_procedure,
1049: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Update_Taxlines.END',
1050: 'ZX_TRL_PUB_PKG: Update_Taxlines (-)'||x_return_status);
1051: END IF;
1052:
1053: EXCEPTION
1054: WHEN FND_API.G_EXC_ERROR THEN
1055: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1056: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1057: FND_LOG.STRING(g_level_unexpected,
1058: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Update_Taxlines',
1059: 'Return Status = ' || x_return_status);
1060: END IF;
1061:
1063: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1064: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
1065:
1066: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1067: FND_LOG.STRING(g_level_unexpected,
1068: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Update_Taxlines',
1069: l_error_buffer);
1070: END IF;
1071: END Update_Taxlines;
1076:
1077: l_error_buffer VARCHAR2(100);
1078:
1079: BEGIN
1080: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1081:
1082: IF (g_level_procedure >= g_current_runtime_level ) THEN
1083: FND_LOG.STRING(g_level_procedure,
1084: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Discard_Tax_Only_Lines.BEGIN',
1079: BEGIN
1080: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1081:
1082: IF (g_level_procedure >= g_current_runtime_level ) THEN
1083: FND_LOG.STRING(g_level_procedure,
1084: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Discard_Tax_Only_Lines.BEGIN',
1085: 'ZX_TRL_PUB_PKG: Discard_Tax_Only_Lines (+)');
1086: END IF;
1087:
1087:
1088: ZX_TRL_MANAGE_TAX_PKG.Discard_Tax_Only_Lines (x_return_status, p_event_class_rec);
1089:
1090: IF (g_level_procedure >= g_current_runtime_level ) THEN
1091: FND_LOG.STRING(g_level_procedure,
1092: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Discard_Tax_Only_Lines.END',
1093: 'ZX_TRL_PUB_PKG: Discard_Tax_Only_Lines (-)'||x_return_status);
1094: END IF;
1095:
1096: EXCEPTION
1097: WHEN FND_API.G_EXC_ERROR THEN
1098: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1099: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1100: FND_LOG.STRING(g_level_unexpected,
1101: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Discard_Tax_Only_Lines',
1102: 'Return Status = ' || x_return_status);
1103: END IF;
1104:
1106: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1107: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
1108:
1109: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1110: FND_LOG.STRING(g_level_unexpected,
1111: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Discard_Tax_Only_Lines',
1112: l_error_buffer);
1113: END IF;
1114:
1120:
1121: l_error_buffer VARCHAR2(100);
1122:
1123: BEGIN
1124: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1125:
1126: IF (g_level_procedure >= g_current_runtime_level ) THEN
1127: FND_LOG.STRING(g_level_procedure,
1128: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Update_GL_Date.BEGIN',
1123: BEGIN
1124: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1125:
1126: IF (g_level_procedure >= g_current_runtime_level ) THEN
1127: FND_LOG.STRING(g_level_procedure,
1128: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Update_GL_Date.BEGIN',
1129: 'ZX_TRL_PUB_PKG: Update_GL_Date (+)');
1130: END IF;
1131:
1132: ZX_TRL_MANAGE_TAX_PKG.Update_GL_Date (p_gl_date, x_return_status);
1133:
1134:
1135: IF (g_level_procedure >= g_current_runtime_level ) THEN
1136: FND_LOG.STRING(g_level_procedure,
1137: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Update_GL_Date.END',
1138: 'ZX_TRL_PUB_PKG: Update_GL_Date (-)'||x_return_status);
1139: END IF;
1140:
1141: EXCEPTION
1142: WHEN FND_API.G_EXC_ERROR THEN
1143: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1144: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1145: FND_LOG.STRING(g_level_unexpected,
1146: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Update_GL_Date',
1147: 'Return Status = ' || x_return_status);
1148: END IF;
1149:
1151: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1152: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
1153:
1154: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1155: FND_LOG.STRING(g_level_unexpected,
1156: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Update_GL_Date',
1157: l_error_buffer);
1158: END IF;
1159:
1165:
1166: l_error_buffer VARCHAR2(100);
1167:
1168: BEGIN
1169: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1170:
1171: IF (g_level_procedure >= g_current_runtime_level ) THEN
1172: FND_LOG.STRING(g_level_procedure,
1173: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Update_Exchange_Rate.BEGIN',
1168: BEGIN
1169: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1170:
1171: IF (g_level_procedure >= g_current_runtime_level ) THEN
1172: FND_LOG.STRING(g_level_procedure,
1173: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Update_Exchange_Rate.BEGIN',
1174: 'ZX_TRL_PUB_PKG: Update_Exchange_Rate (+)');
1175: END IF;
1176:
1178: x_return_status);
1179:
1180:
1181: IF (g_level_procedure >= g_current_runtime_level ) THEN
1182: FND_LOG.STRING(g_level_procedure,
1183: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Update_Exchange_Rate.END',
1184: 'ZX_TRL_PUB_PKG: Update_Exchange_Rate (-)'||x_return_status);
1185: END IF;
1186:
1187: EXCEPTION
1188: WHEN FND_API.G_EXC_ERROR THEN
1189: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1190: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1191: FND_LOG.STRING(g_level_unexpected,
1192: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Update_Exchange_Rate',
1193: 'Return Status = ' || x_return_status);
1194: END IF;
1195:
1197: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1198: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
1199:
1200: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1201: FND_LOG.STRING(g_level_unexpected,
1202: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Update_Exchange_Rate',
1203: l_error_buffer);
1204: END IF;
1205:
1238:
1239: l_error_buffer VARCHAR2(100);
1240:
1241: BEGIN
1242: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1243:
1244: IF (g_level_procedure >= g_current_runtime_level ) THEN
1245: FND_LOG.STRING(g_level_procedure,
1246: 'ZX.PLSQL.ZX_TRL_PUB_PKG.delete_tax_lines_and_dists.BEGIN',
1241: BEGIN
1242: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1243:
1244: IF (g_level_procedure >= g_current_runtime_level ) THEN
1245: FND_LOG.STRING(g_level_procedure,
1246: 'ZX.PLSQL.ZX_TRL_PUB_PKG.delete_tax_lines_and_dists.BEGIN',
1247: 'ZX_TRL_PUB_PKG: delete_tax_lines_and_dists (+)');
1248: END IF;
1249: x_return_status := FND_API.G_RET_STS_SUCCESS;
1294: x_return_status => x_return_status
1295: );
1296: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1297: IF (g_level_error >= g_current_runtime_level ) THEN
1298: FND_LOG.STRING(g_level_error,
1299: 'ZX.PLSQL.ZX_TRL_PUB_PKG.delete_tax_lines_and_dists',
1300: 'MRC Lines: Incorrect return_status after calling ' ||
1301: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_from_zx_liness()');
1302: FND_LOG.STRING(g_level_error,
1298: FND_LOG.STRING(g_level_error,
1299: 'ZX.PLSQL.ZX_TRL_PUB_PKG.delete_tax_lines_and_dists',
1300: 'MRC Lines: Incorrect return_status after calling ' ||
1301: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_from_zx_liness()');
1302: FND_LOG.STRING(g_level_error,
1303: 'ZX.PLSQL.ZX_TRL_PUB_PKG.delete_tax_lines_and_dists',
1304: 'RETURN_STATUS = ' || x_return_status);
1305: FND_LOG.STRING(g_level_error,
1306: 'ZX.PLSQL.ZX_TRL_PUB_PKG.delete_tax_lines_and_dists.END',
1301: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_from_zx_liness()');
1302: FND_LOG.STRING(g_level_error,
1303: 'ZX.PLSQL.ZX_TRL_PUB_PKG.delete_tax_lines_and_dists',
1304: 'RETURN_STATUS = ' || x_return_status);
1305: FND_LOG.STRING(g_level_error,
1306: 'ZX.PLSQL.ZX_TRL_PUB_PKG.delete_tax_lines_and_dists.END',
1307: 'ZX_TRL_PUB_PKG.delete_tax_lines_and_dists(-)');
1308: END IF;
1309: RETURN;
1311:
1312: END IF;
1313:
1314: IF (g_level_procedure >= g_current_runtime_level ) THEN
1315: FND_LOG.STRING(g_level_procedure,
1316: 'ZX.PLSQL.ZX_TRL_PUB_PKG.delete_tax_lines_and_dists.END',
1317: 'ZX_TRL_PUB_PKG: delete_tax_lines_and_dists (-)'||x_return_status);
1318: END IF;
1319:
1320: EXCEPTION
1321: WHEN FND_API.G_EXC_ERROR THEN
1322: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1323: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1324: FND_LOG.STRING(g_level_unexpected,
1325: 'ZX.PLSQL.ZX_TRL_PUB_PKG.delete_tax_lines_and_dists',
1326: 'Return Status = ' || x_return_status);
1327: END IF;
1328:
1330: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1331: l_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_TRL_PUB_PKG.delete_tax_lines_and_dists',
1336: l_error_buffer);
1337: END IF;
1338:
1360:
1361: l_error_buffer VARCHAR2(100);
1362:
1363: BEGIN
1364: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1365:
1366: IF (g_level_procedure >= g_current_runtime_level ) THEN
1367: FND_LOG.STRING(g_level_procedure,
1368: 'ZX.PLSQL.ZX_TRL_PUB_PKG.delete_tax_dists.BEGIN',
1363: BEGIN
1364: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1365:
1366: IF (g_level_procedure >= g_current_runtime_level ) THEN
1367: FND_LOG.STRING(g_level_procedure,
1368: 'ZX.PLSQL.ZX_TRL_PUB_PKG.delete_tax_dists.BEGIN',
1369: 'ZX_TRL_PUB_PKG: delete_tax_dists (+)');
1370: END IF;
1371: x_return_status := FND_API.G_RET_STS_SUCCESS;
1395: AND trx_level_type = p_trx_level_type;
1396: END IF;
1397:
1398: IF (g_level_procedure >= g_current_runtime_level ) THEN
1399: FND_LOG.STRING(g_level_procedure,
1400: 'ZX.PLSQL.ZX_TRL_PUB_PKG.delete_tax_dists.END',
1401: 'ZX_TRL_PUB_PKG: delete_tax_dists (-)'||x_return_status);
1402: END IF;
1403:
1404: EXCEPTION
1405: WHEN FND_API.G_EXC_ERROR THEN
1406: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1407: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1408: FND_LOG.STRING(g_level_unexpected,
1409: 'ZX.PLSQL.ZX_TRL_PUB_PKG.delete_tax_dists',
1410: 'Return Status = ' || x_return_status);
1411: END IF;
1412:
1414: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1415: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
1416:
1417: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1418: FND_LOG.STRING(g_level_unexpected,
1419: 'ZX.PLSQL.ZX_TRL_PUB_PKG.delete_tax_dists',
1420: l_error_buffer);
1421: END IF;
1422:
1493: l_tax_dist_id_tbl num_tbl_type;
1494: l_summary_tax_line_id_tbl num_tbl_type;
1495:
1496: BEGIN
1497: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1498:
1499: IF (g_level_procedure >= g_current_runtime_level ) THEN
1500: FND_LOG.STRING(g_level_procedure,
1501: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Check_Frozen_Tax_Dists.BEGIN',
1496: BEGIN
1497: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1498:
1499: IF (g_level_procedure >= g_current_runtime_level ) THEN
1500: FND_LOG.STRING(g_level_procedure,
1501: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Check_Frozen_Tax_Dists.BEGIN',
1502: 'ZX_TRL_PUB_PKG: Check_Frozen_Tax_Dists (+)');
1503: END IF;
1504:
1516: l_msg_context_info_rec.trx_line_dist_id := NULL;
1517:
1518: -- Preventive check to find deleted frozen tax dists --
1519: IF (g_level_procedure >= g_current_runtime_level ) THEN
1520: FND_LOG.STRING(g_level_procedure,
1521: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Check_Frozen_Tax_Dists',
1522: 'Start : Frozen Tax Distributions deleted Validation : '||TO_CHAR(SYSDATE,'DD-MM-YYYY HH24:MI:SS'));
1523: END IF;
1524:
1540: l_error_buffer := 'System is trying to delete frozen tax distributions. '||
1541: 'Unable to complete Tax Processing.';
1542:
1543: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1544: FND_LOG.STRING(g_level_unexpected,
1545: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Check_Frozen_Tax_Dists',
1546: 'ERROR: '||l_error_buffer);
1547: FND_LOG.STRING(g_level_unexpected,
1548: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Check_Frozen_Tax_Dists',
1543: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1544: FND_LOG.STRING(g_level_unexpected,
1545: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Check_Frozen_Tax_Dists',
1546: 'ERROR: '||l_error_buffer);
1547: FND_LOG.STRING(g_level_unexpected,
1548: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Check_Frozen_Tax_Dists',
1549: 'Following frozen tax distributions deleted from ZX_REC_NREC_DIST:');
1550: END IF;
1551:
1559: END IF;
1560: l_prev_trx_id := l_trx_id_tbl(i);
1561:
1562: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1563: FND_LOG.STRING(g_level_unexpected,
1564: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Check_Frozen_Tax_Dists',
1565: TO_CHAR(i)||'. Trx_Id: '||TO_CHAR(l_trx_id_tbl(i))||
1566: ', Rec_Nrec_Tax_Dist_Id: '||TO_CHAR(l_tax_dist_id_tbl(i))||
1567: ', Summary_Tax_Line_Id: '||TO_CHAR(l_summary_tax_line_id_tbl(i)));
1588: l_error_buffer := 'System is trying to delete self-assessed frozen tax distributions. '||
1589: 'Unable to complete Tax Processing.';
1590:
1591: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1592: FND_LOG.STRING(g_level_unexpected,
1593: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Check_Frozen_Tax_Dists',
1594: 'ERROR: '||l_error_buffer);
1595: FND_LOG.STRING(g_level_unexpected,
1596: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Check_Frozen_Tax_Dists',
1591: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1592: FND_LOG.STRING(g_level_unexpected,
1593: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Check_Frozen_Tax_Dists',
1594: 'ERROR: '||l_error_buffer);
1595: FND_LOG.STRING(g_level_unexpected,
1596: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Check_Frozen_Tax_Dists',
1597: 'Following self-assessed frozen tax distributions deleted from ZX_REC_NREC_DIST:');
1598: END IF;
1599:
1607: END IF;
1608: l_prev_trx_id := l_trx_id_tbl(i);
1609:
1610: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1611: FND_LOG.STRING(g_level_unexpected,
1612: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Check_Frozen_Tax_Dists',
1613: TO_CHAR(i)||'. Trx_Id: '||TO_CHAR(l_trx_id_tbl(i))||
1614: ', Rec_Nrec_Tax_Dist_Id: '||TO_CHAR(l_tax_dist_id_tbl(i))||
1615: ', Summary_Tax_Line_Id: '||TO_CHAR(l_summary_tax_line_id_tbl(i)));
1618: END LOOP;
1619: END IF;
1620:
1621: IF (g_level_procedure >= g_current_runtime_level ) THEN
1622: FND_LOG.STRING(g_level_procedure,
1623: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Check_Frozen_Tax_Dists',
1624: 'End : Frozen Tax Distributions deleted Validation : '||TO_CHAR(SYSDATE,'DD-MM-YYYY HH24:MI:SS'));
1625: END IF;
1626:
1624: 'End : Frozen Tax Distributions deleted Validation : '||TO_CHAR(SYSDATE,'DD-MM-YYYY HH24:MI:SS'));
1625: END IF;
1626:
1627: IF (g_level_procedure >= g_current_runtime_level ) THEN
1628: FND_LOG.STRING(g_level_procedure,
1629: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Check_Frozen_Tax_Dists.END',
1630: 'ZX_TRL_PUB_PKG: Check_Frozen_Tax_Dists(-)'||x_return_status);
1631: END IF;
1632:
1635: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1636: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
1637:
1638: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1639: FND_LOG.STRING(g_level_unexpected,
1640: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Check_Frozen_Tax_Dists',
1641: l_error_buffer);
1642: END IF;
1643: END Check_Frozen_Tax_Dists;