1: PACKAGE BODY ZX_TRL_PUB_PKG AS
2: /* $Header: zxrwlnrepsrvpubb.pls 120.40 2006/09/22 22:56:08 nipatel 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.40 2006/09/22 22:56:08 nipatel 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: /* ===========================================================================*
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: /* ===========================================================================*
12: | PROCEDURE Manage_TaxLines: It will Create, update, delete and cancel tax |
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: /* ===========================================================================*
12: | PROCEDURE Manage_TaxLines: It will Create, update, delete and cancel tax |
13: | lines and summary tax lines in the tax |
21: l_error_buffer VARCHAR2(100);
22: l_msg_context_info_rec ZX_API_PUB.CONTEXT_INFO_REC_TYPE;
23:
24: BEGIN
25: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
26:
27: IF (g_level_procedure >= g_current_runtime_level ) THEN
28: FND_LOG.STRING(g_level_procedure,
29: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.BEGIN',
24: BEGIN
25: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
26:
27: IF (g_level_procedure >= g_current_runtime_level ) THEN
28: FND_LOG.STRING(g_level_procedure,
29: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.BEGIN',
30: 'ZX_TRL_PUB_PKG: Manage_TaxLines (+)');
31: END IF;
32:
92: p_event_class_rec => p_event_class_rec);
93:
94: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
95: IF (g_level_error >= g_current_runtime_level ) THEN
96: FND_LOG.STRING(g_level_error,
97: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
98: 'Incorrect return_status after calling ' ||
99: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Detail_Lines()');
100: FND_LOG.STRING(g_level_error,
96: FND_LOG.STRING(g_level_error,
97: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
98: 'Incorrect return_status after calling ' ||
99: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Detail_Lines()');
100: FND_LOG.STRING(g_level_error,
101: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
102: 'RETURN_STATUS = ' || x_return_status);
103: FND_LOG.STRING(g_level_error,
104: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
99: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Detail_Lines()');
100: FND_LOG.STRING(g_level_error,
101: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
102: 'RETURN_STATUS = ' || x_return_status);
103: FND_LOG.STRING(g_level_error,
104: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
105: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
106: END IF;
107: RETURN;
115: x_return_status => x_return_status);
116:
117: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
118: IF (g_level_error >= g_current_runtime_level ) THEN
119: FND_LOG.STRING(g_level_error,
120: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
121: 'Incorrect return_status after calling ' ||
122: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
123: FND_LOG.STRING(g_level_error,
119: FND_LOG.STRING(g_level_error,
120: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
121: 'Incorrect return_status after calling ' ||
122: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
123: FND_LOG.STRING(g_level_error,
124: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
125: 'RETURN_STATUS = ' || x_return_status);
126: FND_LOG.STRING(g_level_error,
127: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
122: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
123: FND_LOG.STRING(g_level_error,
124: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
125: 'RETURN_STATUS = ' || x_return_status);
126: FND_LOG.STRING(g_level_error,
127: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
128: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
129: END IF;
130: RETURN;
142: x_return_status => x_return_status);
143:
144: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
145: IF (g_level_error >= g_current_runtime_level ) THEN
146: FND_LOG.STRING(g_level_error,
147: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
148: 'Incorrect return_status after calling ' ||
149: 'ZX_TRL_MANAGE_TAX_PKG.update_exist_summary_line_id()');
150: FND_LOG.STRING(g_level_error,
146: FND_LOG.STRING(g_level_error,
147: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
148: 'Incorrect return_status after calling ' ||
149: 'ZX_TRL_MANAGE_TAX_PKG.update_exist_summary_line_id()');
150: FND_LOG.STRING(g_level_error,
151: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
152: 'RETURN_STATUS = ' || x_return_status);
153: FND_LOG.STRING(g_level_error,
154: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
149: 'ZX_TRL_MANAGE_TAX_PKG.update_exist_summary_line_id()');
150: FND_LOG.STRING(g_level_error,
151: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
152: 'RETURN_STATUS = ' || x_return_status);
153: FND_LOG.STRING(g_level_error,
154: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
155: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
156: END IF;
157: RETURN;
163: p_event_class_rec => p_event_class_rec);
164:
165: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
166: IF (g_level_error >= g_current_runtime_level ) THEN
167: FND_LOG.STRING(g_level_error,
168: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
169: 'Incorrect return_status after calling ' ||
170: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Summary_Lines()');
171: FND_LOG.STRING(g_level_error,
167: FND_LOG.STRING(g_level_error,
168: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
169: 'Incorrect return_status after calling ' ||
170: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Summary_Lines()');
171: FND_LOG.STRING(g_level_error,
172: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
173: 'RETURN_STATUS = ' || x_return_status);
174: FND_LOG.STRING(g_level_error,
175: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
170: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Summary_Lines()');
171: FND_LOG.STRING(g_level_error,
172: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
173: 'RETURN_STATUS = ' || x_return_status);
174: FND_LOG.STRING(g_level_error,
175: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
176: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
177: END IF;
178: RETURN;
192: x_return_status => x_return_status );
193:
194: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
195: IF (g_level_error >= g_current_runtime_level ) THEN
196: FND_LOG.STRING(g_level_error,
197: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
198: 'Incorrect return_status after calling ' ||
199: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt()');
200: FND_LOG.STRING(g_level_error,
196: FND_LOG.STRING(g_level_error,
197: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
198: 'Incorrect return_status after calling ' ||
199: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt()');
200: FND_LOG.STRING(g_level_error,
201: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
202: 'RETURN_STATUS = ' || x_return_status);
203: FND_LOG.STRING(g_level_error,
204: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
199: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt()');
200: FND_LOG.STRING(g_level_error,
201: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
202: 'RETURN_STATUS = ' || x_return_status);
203: FND_LOG.STRING(g_level_error,
204: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
205: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
206: END IF;
207: RETURN;
213: x_return_status => x_return_status);
214:
215: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
216: IF (g_level_error >= g_current_runtime_level ) THEN
217: FND_LOG.STRING(g_level_error,
218: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
219: 'Incorrect return_status after calling ' ||
220: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
221: FND_LOG.STRING(g_level_error,
217: FND_LOG.STRING(g_level_error,
218: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
219: 'Incorrect return_status after calling ' ||
220: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
221: FND_LOG.STRING(g_level_error,
222: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
223: 'RETURN_STATUS = ' || x_return_status);
224: FND_LOG.STRING(g_level_error,
225: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
220: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
221: FND_LOG.STRING(g_level_error,
222: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
223: 'RETURN_STATUS = ' || x_return_status);
224: FND_LOG.STRING(g_level_error,
225: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
226: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
227: END IF;
228: RETURN;
236: x_return_status => x_return_status);
237:
238: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
239: IF (g_level_error >= g_current_runtime_level ) THEN
240: FND_LOG.STRING(g_level_error,
241: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
242: 'Incorrect return_status after calling ' ||
243: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
244: FND_LOG.STRING(g_level_error,
240: FND_LOG.STRING(g_level_error,
241: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
242: 'Incorrect return_status after calling ' ||
243: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
244: FND_LOG.STRING(g_level_error,
245: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
246: 'RETURN_STATUS = ' || x_return_status);
247: FND_LOG.STRING(g_level_error,
248: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
243: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
244: FND_LOG.STRING(g_level_error,
245: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
246: 'RETURN_STATUS = ' || x_return_status);
247: FND_LOG.STRING(g_level_error,
248: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
249: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
250: END IF;
251: RETURN;
256: x_return_status => x_return_status );
257:
258: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
259: IF (g_level_error >= g_current_runtime_level ) THEN
260: FND_LOG.STRING(g_level_error,
261: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
262: 'Incorrect return_status after calling ' ||
263: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt()');
264: FND_LOG.STRING(g_level_error,
260: FND_LOG.STRING(g_level_error,
261: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
262: 'Incorrect return_status after calling ' ||
263: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt()');
264: FND_LOG.STRING(g_level_error,
265: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
266: 'RETURN_STATUS = ' || x_return_status);
267: FND_LOG.STRING(g_level_error,
268: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
263: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt()');
264: FND_LOG.STRING(g_level_error,
265: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
266: 'RETURN_STATUS = ' || x_return_status);
267: FND_LOG.STRING(g_level_error,
268: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
269: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
270: END IF;
271: RETURN;
281: p_event_class_rec => p_event_class_rec);
282:
283: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
284: IF (g_level_error >= g_current_runtime_level ) THEN
285: FND_LOG.STRING(g_level_error,
286: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
287: 'Incorrect return_status after calling ' ||
288: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Loose_Tax_Distributions()');
289: FND_LOG.STRING(g_level_error,
285: FND_LOG.STRING(g_level_error,
286: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
287: 'Incorrect return_status after calling ' ||
288: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Loose_Tax_Distributions()');
289: FND_LOG.STRING(g_level_error,
290: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
291: 'RETURN_STATUS = ' || x_return_status);
292: FND_LOG.STRING(g_level_error,
293: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
288: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Loose_Tax_Distributions()');
289: FND_LOG.STRING(g_level_error,
290: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
291: 'RETURN_STATUS = ' || x_return_status);
292: FND_LOG.STRING(g_level_error,
293: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
294: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
295: END IF;
296: RETURN;
309: x_return_status => x_return_status );
310:
311: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
312: IF (g_level_error >= g_current_runtime_level ) THEN
313: FND_LOG.STRING(g_level_error,
314: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
315: 'Incorrect return_status after calling ' ||
316: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt()');
317: FND_LOG.STRING(g_level_error,
313: FND_LOG.STRING(g_level_error,
314: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
315: 'Incorrect return_status after calling ' ||
316: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt()');
317: FND_LOG.STRING(g_level_error,
318: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
319: 'RETURN_STATUS = ' || x_return_status);
320: FND_LOG.STRING(g_level_error,
321: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
316: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt()');
317: FND_LOG.STRING(g_level_error,
318: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
319: 'RETURN_STATUS = ' || x_return_status);
320: FND_LOG.STRING(g_level_error,
321: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
322: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
323: END IF;
324: RETURN;
332: x_return_status => x_return_status);
333:
334: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
335: IF (g_level_error >= g_current_runtime_level ) THEN
336: FND_LOG.STRING(g_level_error,
337: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
338: 'Incorrect return_status after calling ' ||
339: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
340: FND_LOG.STRING(g_level_error,
336: FND_LOG.STRING(g_level_error,
337: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
338: 'Incorrect return_status after calling ' ||
339: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
340: FND_LOG.STRING(g_level_error,
341: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
342: 'RETURN_STATUS = ' || x_return_status);
343: FND_LOG.STRING(g_level_error,
344: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
339: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
340: FND_LOG.STRING(g_level_error,
341: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
342: 'RETURN_STATUS = ' || x_return_status);
343: FND_LOG.STRING(g_level_error,
344: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
345: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
346: END IF;
347: RETURN;
365: p_event_class_rec => p_event_class_rec);
366:
367: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
368: IF (g_level_error >= g_current_runtime_level ) THEN
369: FND_LOG.STRING(g_level_error,
370: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
371: 'Incorrect return_status after calling ' ||
372: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Detail_Lines()');
373: FND_LOG.STRING(g_level_error,
369: FND_LOG.STRING(g_level_error,
370: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
371: 'Incorrect return_status after calling ' ||
372: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Detail_Lines()');
373: FND_LOG.STRING(g_level_error,
374: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
375: 'RETURN_STATUS = ' || x_return_status);
376: FND_LOG.STRING(g_level_error,
377: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
372: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Detail_Lines()');
373: FND_LOG.STRING(g_level_error,
374: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
375: 'RETURN_STATUS = ' || x_return_status);
376: FND_LOG.STRING(g_level_error,
377: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
378: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
379: END IF;
380: RETURN;
388: x_return_status => x_return_status);
389:
390: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
391: IF (g_level_error >= g_current_runtime_level ) THEN
392: FND_LOG.STRING(g_level_error,
393: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
394: 'Incorrect return_status after calling ' ||
395: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
396: FND_LOG.STRING(g_level_error,
392: FND_LOG.STRING(g_level_error,
393: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
394: 'Incorrect return_status after calling ' ||
395: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
396: FND_LOG.STRING(g_level_error,
397: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
398: 'RETURN_STATUS = ' || x_return_status);
399: FND_LOG.STRING(g_level_error,
400: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
395: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
396: FND_LOG.STRING(g_level_error,
397: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
398: 'RETURN_STATUS = ' || x_return_status);
399: FND_LOG.STRING(g_level_error,
400: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
401: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
402: END IF;
403: RETURN;
415: x_return_status => x_return_status);
416:
417: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
418: IF (g_level_error >= g_current_runtime_level ) THEN
419: FND_LOG.STRING(g_level_error,
420: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
421: 'Incorrect return_status after calling ' ||
422: 'ZX_TRL_MANAGE_TAX_PKG.update_exist_summary_line_id()');
423: FND_LOG.STRING(g_level_error,
419: FND_LOG.STRING(g_level_error,
420: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
421: 'Incorrect return_status after calling ' ||
422: 'ZX_TRL_MANAGE_TAX_PKG.update_exist_summary_line_id()');
423: FND_LOG.STRING(g_level_error,
424: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
425: 'RETURN_STATUS = ' || x_return_status);
426: FND_LOG.STRING(g_level_error,
427: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
422: 'ZX_TRL_MANAGE_TAX_PKG.update_exist_summary_line_id()');
423: FND_LOG.STRING(g_level_error,
424: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
425: 'RETURN_STATUS = ' || x_return_status);
426: FND_LOG.STRING(g_level_error,
427: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
428: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
429: END IF;
430: RETURN;
436: p_event_class_rec => p_event_class_rec);
437:
438: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
439: IF (g_level_error >= g_current_runtime_level ) THEN
440: FND_LOG.STRING(g_level_error,
441: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
442: 'Incorrect return_status after calling ' ||
443: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Summary_Lines()');
444: FND_LOG.STRING(g_level_error,
440: FND_LOG.STRING(g_level_error,
441: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
442: 'Incorrect return_status after calling ' ||
443: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Summary_Lines()');
444: FND_LOG.STRING(g_level_error,
445: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
446: 'RETURN_STATUS = ' || x_return_status);
447: FND_LOG.STRING(g_level_error,
448: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
443: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Summary_Lines()');
444: FND_LOG.STRING(g_level_error,
445: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
446: 'RETURN_STATUS = ' || x_return_status);
447: FND_LOG.STRING(g_level_error,
448: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
449: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
450: END IF;
451: RETURN;
467: x_return_status => x_return_status );
468:
469: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
470: IF (g_level_error >= g_current_runtime_level ) THEN
471: FND_LOG.STRING(g_level_error,
472: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
473: 'Incorrect return_status after calling ' ||
474: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt()');
475: FND_LOG.STRING(g_level_error,
471: FND_LOG.STRING(g_level_error,
472: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
473: 'Incorrect return_status after calling ' ||
474: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt()');
475: FND_LOG.STRING(g_level_error,
476: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
477: 'RETURN_STATUS = ' || x_return_status);
478: FND_LOG.STRING(g_level_error,
479: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
474: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt()');
475: FND_LOG.STRING(g_level_error,
476: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
477: 'RETURN_STATUS = ' || x_return_status);
478: FND_LOG.STRING(g_level_error,
479: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
480: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
481: END IF;
482: RETURN;
488: x_return_status => x_return_status);
489:
490: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
491: IF (g_level_error >= g_current_runtime_level ) THEN
492: FND_LOG.STRING(g_level_error,
493: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
494: 'Incorrect return_status after calling ' ||
495: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
496: FND_LOG.STRING(g_level_error,
492: FND_LOG.STRING(g_level_error,
493: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
494: 'Incorrect return_status after calling ' ||
495: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
496: FND_LOG.STRING(g_level_error,
497: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
498: 'RETURN_STATUS = ' || x_return_status);
499: FND_LOG.STRING(g_level_error,
500: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
495: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
496: FND_LOG.STRING(g_level_error,
497: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
498: 'RETURN_STATUS = ' || x_return_status);
499: FND_LOG.STRING(g_level_error,
500: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
501: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
502: END IF;
503: RETURN;
514: x_return_status => x_return_status);
515:
516: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
517: IF (g_level_error >= g_current_runtime_level ) THEN
518: FND_LOG.STRING(g_level_error,
519: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
520: 'Incorrect return_status after calling ' ||
521: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
522: FND_LOG.STRING(g_level_error,
518: FND_LOG.STRING(g_level_error,
519: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
520: 'Incorrect return_status after calling ' ||
521: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
522: FND_LOG.STRING(g_level_error,
523: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
524: 'RETURN_STATUS = ' || x_return_status);
525: FND_LOG.STRING(g_level_error,
526: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
521: 'ZX_TRL_MANAGE_TAX_PKG.Create_Detail_Lines()');
522: FND_LOG.STRING(g_level_error,
523: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
524: 'RETURN_STATUS = ' || x_return_status);
525: FND_LOG.STRING(g_level_error,
526: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
527: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
528: END IF;
529: RETURN;
534: x_return_status => x_return_status );
535:
536: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
537: IF (g_level_error >= g_current_runtime_level ) THEN
538: FND_LOG.STRING(g_level_error,
539: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
540: 'Incorrect return_status after calling ' ||
541: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt()');
542: FND_LOG.STRING(g_level_error,
538: FND_LOG.STRING(g_level_error,
539: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
540: 'Incorrect return_status after calling ' ||
541: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt()');
542: FND_LOG.STRING(g_level_error,
543: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
544: 'RETURN_STATUS = ' || x_return_status);
545: FND_LOG.STRING(g_level_error,
546: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
541: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_lines_crt_evnt()');
542: FND_LOG.STRING(g_level_error,
543: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
544: 'RETURN_STATUS = ' || x_return_status);
545: FND_LOG.STRING(g_level_error,
546: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
547: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
548: END IF;
549: RETURN;
560: p_event_class_rec => p_event_class_rec);
561:
562: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
563: IF (g_level_error >= g_current_runtime_level ) THEN
564: FND_LOG.STRING(g_level_error,
565: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
566: 'Incorrect return_status after calling ' ||
567: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Loose_Tax_Distributions()');
568: FND_LOG.STRING(g_level_error,
564: FND_LOG.STRING(g_level_error,
565: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
566: 'Incorrect return_status after calling ' ||
567: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Loose_Tax_Distributions()');
568: FND_LOG.STRING(g_level_error,
569: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
570: 'RETURN_STATUS = ' || x_return_status);
571: FND_LOG.STRING(g_level_error,
572: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
567: 'ZX_TRL_MANAGE_TAX_PKG.Delete_Loose_Tax_Distributions()');
568: FND_LOG.STRING(g_level_error,
569: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
570: 'RETURN_STATUS = ' || x_return_status);
571: FND_LOG.STRING(g_level_error,
572: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
573: 'ZX_TRL_PUB_PKG.Manage_TaxLines(-)');
574: END IF;
575: RETURN;
578: END IF; -- tax_event_type_code
579:
580: IF (g_level_procedure >= g_current_runtime_level ) THEN
581:
582: FND_LOG.STRING(g_level_procedure,
583: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines.END',
584: 'ZX_TRL_PUB_PKG: Manage_TaxLines (-)'||x_return_status);
585: END IF;
586:
589: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
590: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
591:
592: IF (g_level_unexpected >= g_current_runtime_level ) THEN
593: FND_LOG.STRING(g_level_unexpected,
594: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxLines',
595: l_error_buffer);
596: END IF;
597:
615: --TRANSACTION LINES FOR THE GIVEN TRANSACTION FOR FURTHER PROCESSING.
616: l_error_buffer VARCHAR2(100);
617:
618: BEGIN
619: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
620:
621: IF (g_level_procedure >= g_current_runtime_level ) THEN
622: FND_LOG.STRING(g_level_procedure,
623: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Document_Level_Changes.BEGIN',
618: BEGIN
619: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
620:
621: IF (g_level_procedure >= g_current_runtime_level ) THEN
622: FND_LOG.STRING(g_level_procedure,
623: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Document_Level_Changes.BEGIN',
624: 'ZX_TRL_PUB_PKG: Document_Level_Changes (+)');
625: END IF;
626:
663: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
664: END IF;
665:
666: IF (g_level_procedure >= g_current_runtime_level ) THEN
667: FND_LOG.STRING(g_level_procedure,
668: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Document_Level_Changes.END',
669: 'ZX_TRL_PUB_PKG: Document_Level_Changes (-)'||x_return_status);
670: END IF;
671:
672: EXCEPTION
673: WHEN FND_API.G_EXC_ERROR THEN
674: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
675: IF (g_level_unexpected >= g_current_runtime_level ) THEN
676: FND_LOG.STRING(g_level_unexpected,
677: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Document_Level_Changes',
678: 'Return Status = ' || x_return_status);
679: END IF;
680:
682: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
683: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
684:
685: IF (g_level_unexpected >= g_current_runtime_level ) THEN
686: FND_LOG.STRING(g_level_unexpected,
687: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Document_Level_Changes',
688: l_error_buffer);
689: END IF;
690:
701: l_return_status VARCHAR2(1);
702: l_error_buffer VARCHAR2(100);
703:
704: BEGIN
705: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
706:
707: IF (g_level_procedure >= g_current_runtime_level ) THEN
708: FND_LOG.STRING(g_level_procedure,
709: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Synchronize_TaxLines.BEGIN',
704: BEGIN
705: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
706:
707: IF (g_level_procedure >= g_current_runtime_level ) THEN
708: FND_LOG.STRING(g_level_procedure,
709: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Synchronize_TaxLines.BEGIN',
710: 'ZX_TRL_PUB_PKG: Synchronize_TaxLines (+)');
711: END IF;
712:
726: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
727: END IF;
728:
729: IF (g_level_procedure >= g_current_runtime_level ) THEN
730: FND_LOG.STRING(g_level_procedure,
731: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Synchronize_TaxLines.END',
732: 'ZX_TRL_PUB_PKG: Synchronize_TaxLines (-)'||x_return_status);
733: END IF;
734:
735: EXCEPTION
736: WHEN FND_API.G_EXC_ERROR THEN
737: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
738: IF (g_level_unexpected >= g_current_runtime_level ) THEN
739: FND_LOG.STRING(g_level_unexpected,
740: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Synchronize_TaxLines',
741: 'Return Status = ' || x_return_status);
742: END IF;
743:
745: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
746: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
747:
748: IF (g_level_unexpected >= g_current_runtime_level ) THEN
749: FND_LOG.STRING(g_level_unexpected,
750: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Synchronize_TaxLines',
751: l_error_buffer);
752: END IF;
753:
764: l_return_status VARCHAR2(1);
765: l_error_buffer VARCHAR2(100);
766:
767: BEGIN
768: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
769:
770: IF (g_level_procedure >= g_current_runtime_level ) THEN
771: FND_LOG.STRING(g_level_procedure,
772: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Mark_Tax_Lines_Delete.BEGIN',
767: BEGIN
768: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
769:
770: IF (g_level_procedure >= g_current_runtime_level ) THEN
771: FND_LOG.STRING(g_level_procedure,
772: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Mark_Tax_Lines_Delete.BEGIN',
773: 'ZX_TRL_PUB_PKG: Mark_Tax_Lines_Delete (+)');
774: END IF;
775:
787: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
788: END IF;
789:
790: IF (g_level_procedure >= g_current_runtime_level ) THEN
791: FND_LOG.STRING(g_level_procedure,
792: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Mark_Tax_Lines_Delete.END',
793: 'ZX_TRL_PUB_PKG.Mark_Tax_Lines_Delete (-)'||x_return_status);
794: END IF;
795:
796: EXCEPTION
797: WHEN FND_API.G_EXC_ERROR THEN
798: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
799: IF (g_level_unexpected >= g_current_runtime_level ) THEN
800: FND_LOG.STRING(g_level_unexpected,
801: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Mark_Tax_Lines_Delete',
802: 'Return Status = ' || x_return_status);
803: END IF;
804:
806: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
807: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
808:
809: IF (g_level_unexpected >= g_current_runtime_level ) THEN
810: FND_LOG.STRING(g_level_unexpected,
811: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Mark_Tax_Lines_Delete',
812: l_error_buffer);
813: END IF;
814:
831: ;
832:
833:
834: BEGIN
835: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
836:
837: IF (g_level_procedure >= g_current_runtime_level ) THEN
838: FND_LOG.STRING(g_level_procedure,
839: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxDistributions.BEGIN',
834: BEGIN
835: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
836:
837: IF (g_level_procedure >= g_current_runtime_level ) THEN
838: FND_LOG.STRING(g_level_procedure,
839: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxDistributions.BEGIN',
840: 'ZX_TRL_PUB_PKG: Manage_TaxDistributions (+)');
841: END IF;
842:
921: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
922: END IF;
923:
924: IF (g_level_procedure >= g_current_runtime_level ) THEN
925: FND_LOG.STRING(g_level_procedure,
926: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxDistributions.END',
927: 'ZX_TRL_PUB_PKG: Manage_TaxDistributions (-)'||x_return_status);
928: END IF;
929:
930: EXCEPTION
931: WHEN FND_API.G_EXC_ERROR THEN
932: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
933: IF (g_level_unexpected >= g_current_runtime_level ) THEN
934: FND_LOG.STRING(g_level_unexpected,
935: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxDistributions',
936: 'Return Status = ' || x_return_status);
937: END IF;
938:
940: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
941: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
942:
943: IF (g_level_unexpected >= g_current_runtime_level ) THEN
944: FND_LOG.STRING(g_level_unexpected,
945: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Manage_TaxDistributions',
946: l_error_buffer);
947: END IF;
948: END Manage_TaxDistributions;
959:
960: l_error_buffer VARCHAR2(100);
961:
962: BEGIN
963: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
964:
965: IF (g_level_procedure >= g_current_runtime_level ) THEN
966: FND_LOG.STRING(g_level_procedure,
967: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Freeze_TaxDistributions.BEGIN',
962: BEGIN
963: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
964:
965: IF (g_level_procedure >= g_current_runtime_level ) THEN
966: FND_LOG.STRING(g_level_procedure,
967: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Freeze_TaxDistributions.BEGIN',
968: 'ZX_TRL_PUB_PKG: Freeze_TaxDistributions (+)');
969: END IF;
970:
973: p_event_class_rec => p_event_class_rec);
974:
975:
976: IF (g_level_procedure >= g_current_runtime_level ) THEN
977: FND_LOG.STRING(g_level_procedure,
978: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Freeze_TaxDistributions.END',
979: 'ZX_TRL_PUB_PKG: Freeze_TaxDistributions (-)'||x_return_status);
980: END IF;
981:
982: EXCEPTION
983: WHEN FND_API.G_EXC_ERROR THEN
984: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
985: IF (g_level_unexpected >= g_current_runtime_level ) THEN
986: FND_LOG.STRING(g_level_unexpected,
987: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Freeze_TaxDistributions',
988: 'Return Status = ' || x_return_status);
989: END IF;
990:
992: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
993: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
994:
995: IF (g_level_unexpected >= g_current_runtime_level ) THEN
996: FND_LOG.STRING(g_level_unexpected,
997: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Freeze_TaxDistributions',
998: l_error_buffer);
999: END IF;
1000: END Freeze_TaxDistributions;
1010:
1011: l_error_buffer VARCHAR2(100);
1012:
1013: BEGIN
1014: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1015:
1016: IF (g_level_procedure >= g_current_runtime_level ) THEN
1017: FND_LOG.STRING(g_level_procedure,
1018: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Update_Taxlines.BEGIN',
1013: BEGIN
1014: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1015:
1016: IF (g_level_procedure >= g_current_runtime_level ) THEN
1017: FND_LOG.STRING(g_level_procedure,
1018: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Update_Taxlines.BEGIN',
1019: 'ZX_TRL_PUB_PKG: Update_Taxlines (+)');
1020: END IF;
1021:
1023: (x_return_status => x_return_status,
1024: p_event_class_rec => p_event_class_rec);
1025:
1026: IF (g_level_procedure >= g_current_runtime_level ) THEN
1027: FND_LOG.STRING(g_level_procedure,
1028: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Update_Taxlines.END',
1029: 'ZX_TRL_PUB_PKG: Update_Taxlines (-)'||x_return_status);
1030: END IF;
1031:
1032: EXCEPTION
1033: WHEN FND_API.G_EXC_ERROR THEN
1034: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1035: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1036: FND_LOG.STRING(g_level_unexpected,
1037: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Update_Taxlines',
1038: 'Return Status = ' || x_return_status);
1039: END IF;
1040:
1042: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1043: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
1044:
1045: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1046: FND_LOG.STRING(g_level_unexpected,
1047: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Update_Taxlines',
1048: l_error_buffer);
1049: END IF;
1050: END Update_Taxlines;
1055:
1056: l_error_buffer VARCHAR2(100);
1057:
1058: BEGIN
1059: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1060:
1061: IF (g_level_procedure >= g_current_runtime_level ) THEN
1062: FND_LOG.STRING(g_level_procedure,
1063: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Discard_Tax_Only_Lines.BEGIN',
1058: BEGIN
1059: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1060:
1061: IF (g_level_procedure >= g_current_runtime_level ) THEN
1062: FND_LOG.STRING(g_level_procedure,
1063: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Discard_Tax_Only_Lines.BEGIN',
1064: 'ZX_TRL_PUB_PKG: Discard_Tax_Only_Lines (+)');
1065: END IF;
1066:
1066:
1067: ZX_TRL_MANAGE_TAX_PKG.Discard_Tax_Only_Lines (x_return_status, p_event_class_rec);
1068:
1069: IF (g_level_procedure >= g_current_runtime_level ) THEN
1070: FND_LOG.STRING(g_level_procedure,
1071: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Discard_Tax_Only_Lines.END',
1072: 'ZX_TRL_PUB_PKG: Discard_Tax_Only_Lines (-)'||x_return_status);
1073: END IF;
1074:
1075: EXCEPTION
1076: WHEN FND_API.G_EXC_ERROR THEN
1077: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1078: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1079: FND_LOG.STRING(g_level_unexpected,
1080: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Discard_Tax_Only_Lines',
1081: 'Return Status = ' || x_return_status);
1082: END IF;
1083:
1085: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1086: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
1087:
1088: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1089: FND_LOG.STRING(g_level_unexpected,
1090: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Discard_Tax_Only_Lines',
1091: l_error_buffer);
1092: END IF;
1093:
1099:
1100: l_error_buffer VARCHAR2(100);
1101:
1102: BEGIN
1103: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1104:
1105: IF (g_level_procedure >= g_current_runtime_level ) THEN
1106: FND_LOG.STRING(g_level_procedure,
1107: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Update_GL_Date.BEGIN',
1102: BEGIN
1103: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1104:
1105: IF (g_level_procedure >= g_current_runtime_level ) THEN
1106: FND_LOG.STRING(g_level_procedure,
1107: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Update_GL_Date.BEGIN',
1108: 'ZX_TRL_PUB_PKG: Update_GL_Date (+)');
1109: END IF;
1110:
1111: ZX_TRL_MANAGE_TAX_PKG.Update_GL_Date (p_gl_date, x_return_status);
1112:
1113:
1114: IF (g_level_procedure >= g_current_runtime_level ) THEN
1115: FND_LOG.STRING(g_level_procedure,
1116: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Update_GL_Date.END',
1117: 'ZX_TRL_PUB_PKG: Update_GL_Date (-)'||x_return_status);
1118: END IF;
1119:
1120: EXCEPTION
1121: WHEN FND_API.G_EXC_ERROR THEN
1122: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1123: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1124: FND_LOG.STRING(g_level_unexpected,
1125: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Update_GL_Date',
1126: 'Return Status = ' || x_return_status);
1127: END IF;
1128:
1130: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1131: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
1132:
1133: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1134: FND_LOG.STRING(g_level_unexpected,
1135: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Update_GL_Date',
1136: l_error_buffer);
1137: END IF;
1138:
1144:
1145: l_error_buffer VARCHAR2(100);
1146:
1147: BEGIN
1148: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1149:
1150: IF (g_level_procedure >= g_current_runtime_level ) THEN
1151: FND_LOG.STRING(g_level_procedure,
1152: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Update_Exchange_Rate.BEGIN',
1147: BEGIN
1148: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1149:
1150: IF (g_level_procedure >= g_current_runtime_level ) THEN
1151: FND_LOG.STRING(g_level_procedure,
1152: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Update_Exchange_Rate.BEGIN',
1153: 'ZX_TRL_PUB_PKG: Update_Exchange_Rate (+)');
1154: END IF;
1155:
1157: x_return_status);
1158:
1159:
1160: IF (g_level_procedure >= g_current_runtime_level ) THEN
1161: FND_LOG.STRING(g_level_procedure,
1162: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Update_Exchange_Rate.END',
1163: 'ZX_TRL_PUB_PKG: Update_Exchange_Rate (-)'||x_return_status);
1164: END IF;
1165:
1166: EXCEPTION
1167: WHEN FND_API.G_EXC_ERROR THEN
1168: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1169: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1170: FND_LOG.STRING(g_level_unexpected,
1171: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Update_Exchange_Rate',
1172: 'Return Status = ' || x_return_status);
1173: END IF;
1174:
1176: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1177: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
1178:
1179: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1180: FND_LOG.STRING(g_level_unexpected,
1181: 'ZX.PLSQL.ZX_TRL_PUB_PKG.Update_Exchange_Rate',
1182: l_error_buffer);
1183: END IF;
1184:
1217:
1218: l_error_buffer VARCHAR2(100);
1219:
1220: BEGIN
1221: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1222:
1223: IF (g_level_procedure >= g_current_runtime_level ) THEN
1224: FND_LOG.STRING(g_level_procedure,
1225: 'ZX.PLSQL.ZX_TRL_PUB_PKG.delete_tax_lines_and_dists.BEGIN',
1220: BEGIN
1221: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1222:
1223: IF (g_level_procedure >= g_current_runtime_level ) THEN
1224: FND_LOG.STRING(g_level_procedure,
1225: 'ZX.PLSQL.ZX_TRL_PUB_PKG.delete_tax_lines_and_dists.BEGIN',
1226: 'ZX_TRL_PUB_PKG: delete_tax_lines_and_dists (+)');
1227: END IF;
1228: x_return_status := FND_API.G_RET_STS_SUCCESS;
1273: x_return_status => x_return_status
1274: );
1275: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1276: IF (g_level_error >= g_current_runtime_level ) THEN
1277: FND_LOG.STRING(g_level_error,
1278: 'ZX.PLSQL.ZX_TRL_PUB_PKG.delete_tax_lines_and_dists',
1279: 'MRC Lines: Incorrect return_status after calling ' ||
1280: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_from_zx_liness()');
1281: FND_LOG.STRING(g_level_error,
1277: FND_LOG.STRING(g_level_error,
1278: 'ZX.PLSQL.ZX_TRL_PUB_PKG.delete_tax_lines_and_dists',
1279: 'MRC Lines: Incorrect return_status after calling ' ||
1280: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_from_zx_liness()');
1281: FND_LOG.STRING(g_level_error,
1282: 'ZX.PLSQL.ZX_TRL_PUB_PKG.delete_tax_lines_and_dists',
1283: 'RETURN_STATUS = ' || x_return_status);
1284: FND_LOG.STRING(g_level_error,
1285: 'ZX.PLSQL.ZX_TRL_PUB_PKG.delete_tax_lines_and_dists.END',
1280: 'ZX_TRL_MANAGE_TAX_PKG.create_summary_from_zx_liness()');
1281: FND_LOG.STRING(g_level_error,
1282: 'ZX.PLSQL.ZX_TRL_PUB_PKG.delete_tax_lines_and_dists',
1283: 'RETURN_STATUS = ' || x_return_status);
1284: FND_LOG.STRING(g_level_error,
1285: 'ZX.PLSQL.ZX_TRL_PUB_PKG.delete_tax_lines_and_dists.END',
1286: 'ZX_TRL_PUB_PKG.delete_tax_lines_and_dists(-)');
1287: END IF;
1288: RETURN;
1290:
1291: END IF;
1292:
1293: IF (g_level_procedure >= g_current_runtime_level ) THEN
1294: FND_LOG.STRING(g_level_procedure,
1295: 'ZX.PLSQL.ZX_TRL_PUB_PKG.delete_tax_lines_and_dists.END',
1296: 'ZX_TRL_PUB_PKG: delete_tax_lines_and_dists (-)'||x_return_status);
1297: END IF;
1298:
1299: EXCEPTION
1300: WHEN FND_API.G_EXC_ERROR THEN
1301: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1302: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1303: FND_LOG.STRING(g_level_unexpected,
1304: 'ZX.PLSQL.ZX_TRL_PUB_PKG.delete_tax_lines_and_dists',
1305: 'Return Status = ' || x_return_status);
1306: END IF;
1307:
1309: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1310: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
1311:
1312: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1313: FND_LOG.STRING(g_level_unexpected,
1314: 'ZX.PLSQL.ZX_TRL_PUB_PKG.delete_tax_lines_and_dists',
1315: l_error_buffer);
1316: END IF;
1317:
1339:
1340: l_error_buffer VARCHAR2(100);
1341:
1342: BEGIN
1343: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1344:
1345: IF (g_level_procedure >= g_current_runtime_level ) THEN
1346: FND_LOG.STRING(g_level_procedure,
1347: 'ZX.PLSQL.ZX_TRL_PUB_PKG.delete_tax_dists.BEGIN',
1342: BEGIN
1343: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1344:
1345: IF (g_level_procedure >= g_current_runtime_level ) THEN
1346: FND_LOG.STRING(g_level_procedure,
1347: 'ZX.PLSQL.ZX_TRL_PUB_PKG.delete_tax_dists.BEGIN',
1348: 'ZX_TRL_PUB_PKG: delete_tax_dists (+)');
1349: END IF;
1350: x_return_status := FND_API.G_RET_STS_SUCCESS;
1374: AND trx_level_type = p_trx_level_type;
1375: END IF;
1376:
1377: IF (g_level_procedure >= g_current_runtime_level ) THEN
1378: FND_LOG.STRING(g_level_procedure,
1379: 'ZX.PLSQL.ZX_TRL_PUB_PKG.delete_tax_dists.END',
1380: 'ZX_TRL_PUB_PKG: delete_tax_dists (-)'||x_return_status);
1381: END IF;
1382:
1383: EXCEPTION
1384: WHEN FND_API.G_EXC_ERROR THEN
1385: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1386: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1387: FND_LOG.STRING(g_level_unexpected,
1388: 'ZX.PLSQL.ZX_TRL_PUB_PKG.delete_tax_dists',
1389: 'Return Status = ' || x_return_status);
1390: END IF;
1391:
1393: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1394: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
1395:
1396: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1397: FND_LOG.STRING(g_level_unexpected,
1398: 'ZX.PLSQL.ZX_TRL_PUB_PKG.delete_tax_dists',
1399: l_error_buffer);
1400: END IF;
1401: