49: --
50: BEGIN
51: --
52: l_procedure := g_package || 'get_template';
53: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
54:
55: IF g_debug THEN
56: pay_in_utils.trace('**************************************************','********************');
57: pay_in_utils.trace('p_business_group_id',p_business_group_id);
52: l_procedure := g_package || 'get_template';
53: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
54:
55: IF g_debug THEN
56: pay_in_utils.trace('**************************************************','********************');
57: pay_in_utils.trace('p_business_group_id',p_business_group_id);
58: pay_in_utils.trace('**************************************************','********************');
59: END IF;
60:
53: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
54:
55: IF g_debug THEN
56: pay_in_utils.trace('**************************************************','********************');
57: pay_in_utils.trace('p_business_group_id',p_business_group_id);
58: pay_in_utils.trace('**************************************************','********************');
59: END IF;
60:
61:
54:
55: IF g_debug THEN
56: pay_in_utils.trace('**************************************************','********************');
57: pay_in_utils.trace('p_business_group_id',p_business_group_id);
58: pay_in_utils.trace('**************************************************','********************');
59: END IF;
60:
61:
62:
73: g_chunk_size := 500;
74: --
75: ELSE
76: --
77: pay_in_utils.trace('l_template ',l_template);
78: pay_in_utils.set_location(g_debug,l_procedure,20);
79: pay_in_utils.trace('g_chunk_size ',g_chunk_size);
80: pay_in_utils.set_location(g_debug,l_procedure,30);
81:
74: --
75: ELSE
76: --
77: pay_in_utils.trace('l_template ',l_template);
78: pay_in_utils.set_location(g_debug,l_procedure,20);
79: pay_in_utils.trace('g_chunk_size ',g_chunk_size);
80: pay_in_utils.set_location(g_debug,l_procedure,30);
81:
82: p_template := l_template;
75: ELSE
76: --
77: pay_in_utils.trace('l_template ',l_template);
78: pay_in_utils.set_location(g_debug,l_procedure,20);
79: pay_in_utils.trace('g_chunk_size ',g_chunk_size);
80: pay_in_utils.set_location(g_debug,l_procedure,30);
81:
82: p_template := l_template;
83: g_chunk_size := l_chunk_size;
76: --
77: pay_in_utils.trace('l_template ',l_template);
78: pay_in_utils.set_location(g_debug,l_procedure,20);
79: pay_in_utils.trace('g_chunk_size ',g_chunk_size);
80: pay_in_utils.set_location(g_debug,l_procedure,30);
81:
82: p_template := l_template;
83: g_chunk_size := l_chunk_size;
84: --
84: --
85: END IF;
86: --
87: IF g_debug THEN
88: pay_in_utils.trace('**************************************************','********************');
89: pay_in_utils.trace('p_template',p_template);
90: pay_in_utils.trace('**************************************************','********************');
91: END IF;
92:
85: END IF;
86: --
87: IF g_debug THEN
88: pay_in_utils.trace('**************************************************','********************');
89: pay_in_utils.trace('p_template',p_template);
90: pay_in_utils.trace('**************************************************','********************');
91: END IF;
92:
93: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,40);
86: --
87: IF g_debug THEN
88: pay_in_utils.trace('**************************************************','********************');
89: pay_in_utils.trace('p_template',p_template);
90: pay_in_utils.trace('**************************************************','********************');
91: END IF;
92:
93: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,40);
94:
89: pay_in_utils.trace('p_template',p_template);
90: pay_in_utils.trace('**************************************************','********************');
91: END IF;
92:
93: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,40);
94:
95: EXCEPTION
96: WHEN OTHERS THEN
97: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
93: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,40);
94:
95: EXCEPTION
96: WHEN OTHERS THEN
97: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
98: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,50);
99: pay_in_utils.trace(l_message,l_procedure);
100:
101: IF csr_payslip_info%ISOPEN THEN
94:
95: EXCEPTION
96: WHEN OTHERS THEN
97: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
98: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,50);
99: pay_in_utils.trace(l_message,l_procedure);
100:
101: IF csr_payslip_info%ISOPEN THEN
102: CLOSE csr_payslip_info;
95: EXCEPTION
96: WHEN OTHERS THEN
97: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
98: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,50);
99: pay_in_utils.trace(l_message,l_procedure);
100:
101: IF csr_payslip_info%ISOPEN THEN
102: CLOSE csr_payslip_info;
103: END IF;
130: --
131: BEGIN
132: --
133: l_procedure := g_package || 'append_tag';
134: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
135:
136: IF g_debug THEN
137: pay_in_utils.trace('**************************************************','********************');
138: pay_in_utils.trace('p_tag_name',p_tag_name);
133: l_procedure := g_package || 'append_tag';
134: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
135:
136: IF g_debug THEN
137: pay_in_utils.trace('**************************************************','********************');
138: pay_in_utils.trace('p_tag_name',p_tag_name);
139: pay_in_utils.trace('p_value',p_value);
140: pay_in_utils.trace('**************************************************','********************');
141: END IF;
134: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
135:
136: IF g_debug THEN
137: pay_in_utils.trace('**************************************************','********************');
138: pay_in_utils.trace('p_tag_name',p_tag_name);
139: pay_in_utils.trace('p_value',p_value);
140: pay_in_utils.trace('**************************************************','********************');
141: END IF;
142:
135:
136: IF g_debug THEN
137: pay_in_utils.trace('**************************************************','********************');
138: pay_in_utils.trace('p_tag_name',p_tag_name);
139: pay_in_utils.trace('p_value',p_value);
140: pay_in_utils.trace('**************************************************','********************');
141: END IF;
142:
143: /*Bug 4070869 - Encoded the data*/
136: IF g_debug THEN
137: pay_in_utils.trace('**************************************************','********************');
138: pay_in_utils.trace('p_tag_name',p_tag_name);
139: pay_in_utils.trace('p_value',p_value);
140: pay_in_utils.trace('**************************************************','********************');
141: END IF;
142:
143: /*Bug 4070869 - Encoded the data*/
144: l_str:= '<'||p_tag_name||'>'||pay_in_utils.ENCODE_HTML_STRING(p_value)||'';
140: pay_in_utils.trace('**************************************************','********************');
141: END IF;
142:
143: /*Bug 4070869 - Encoded the data*/
144: l_str:= '<'||p_tag_name||'>'||pay_in_utils.ENCODE_HTML_STRING(p_value)||'';
145:
146: pay_in_utils.trace('l_str ',l_str);
147: pay_in_utils.set_location(g_debug,l_procedure,20);
148:
142:
143: /*Bug 4070869 - Encoded the data*/
144: l_str:= '<'||p_tag_name||'>'||pay_in_utils.ENCODE_HTML_STRING(p_value)||'';
145:
146: pay_in_utils.trace('l_str ',l_str);
147: pay_in_utils.set_location(g_debug,l_procedure,20);
148:
149: dbms_lob.writeAppend(g_tmp_clob,length(l_str),l_str);
150:
143: /*Bug 4070869 - Encoded the data*/
144: l_str:= '<'||p_tag_name||'>'||pay_in_utils.ENCODE_HTML_STRING(p_value)||'';
145:
146: pay_in_utils.trace('l_str ',l_str);
147: pay_in_utils.set_location(g_debug,l_procedure,20);
148:
149: dbms_lob.writeAppend(g_tmp_clob,length(l_str),l_str);
150:
151: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,30);
147: pay_in_utils.set_location(g_debug,l_procedure,20);
148:
149: dbms_lob.writeAppend(g_tmp_clob,length(l_str),l_str);
150:
151: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,30);
152:
153: END append_tag;
154:
155: --------------------------------------------------------------------------
173: --
174: BEGIN
175: --
176: l_procedure := g_package || 'open_tag';
177: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
178:
179: IF g_debug THEN
180: pay_in_utils.trace ('**************************************************','********************');
181: pay_in_utils.trace ('p_tag_name',p_tag_name);
176: l_procedure := g_package || 'open_tag';
177: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
178:
179: IF g_debug THEN
180: pay_in_utils.trace ('**************************************************','********************');
181: pay_in_utils.trace ('p_tag_name',p_tag_name);
182: pay_in_utils.trace ('**************************************************','********************');
183: END IF;
184:
177: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
178:
179: IF g_debug THEN
180: pay_in_utils.trace ('**************************************************','********************');
181: pay_in_utils.trace ('p_tag_name',p_tag_name);
182: pay_in_utils.trace ('**************************************************','********************');
183: END IF;
184:
185: l_str:= '<'||p_tag_name||'>';
178:
179: IF g_debug THEN
180: pay_in_utils.trace ('**************************************************','********************');
181: pay_in_utils.trace ('p_tag_name',p_tag_name);
182: pay_in_utils.trace ('**************************************************','********************');
183: END IF;
184:
185: l_str:= '<'||p_tag_name||'>';
186: dbms_lob.writeAppend(g_tmp_clob,length(l_str),l_str);
184:
185: l_str:= '<'||p_tag_name||'>';
186: dbms_lob.writeAppend(g_tmp_clob,length(l_str),l_str);
187:
188: pay_in_utils.trace('l_str ',l_str);
189: pay_in_utils.set_location(g_debug,l_procedure,20);
190:
191: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,30);
192:
185: l_str:= '<'||p_tag_name||'>';
186: dbms_lob.writeAppend(g_tmp_clob,length(l_str),l_str);
187:
188: pay_in_utils.trace('l_str ',l_str);
189: pay_in_utils.set_location(g_debug,l_procedure,20);
190:
191: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,30);
192:
193: END open_tag;
187:
188: pay_in_utils.trace('l_str ',l_str);
189: pay_in_utils.set_location(g_debug,l_procedure,20);
190:
191: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,30);
192:
193: END open_tag;
194:
195: --------------------------------------------------------------------------
213: --
214: BEGIN
215: --
216: l_procedure := g_package || 'close_tag';
217: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
218:
219: IF g_debug THEN
220: pay_in_utils.trace ('**************************************************','********************');
221: pay_in_utils.trace ('p_tag_name',p_tag_name);
216: l_procedure := g_package || 'close_tag';
217: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
218:
219: IF g_debug THEN
220: pay_in_utils.trace ('**************************************************','********************');
221: pay_in_utils.trace ('p_tag_name',p_tag_name);
222: pay_in_utils.trace ('**************************************************','********************');
223: END IF;
224:
217: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
218:
219: IF g_debug THEN
220: pay_in_utils.trace ('**************************************************','********************');
221: pay_in_utils.trace ('p_tag_name',p_tag_name);
222: pay_in_utils.trace ('**************************************************','********************');
223: END IF;
224:
225: l_str:= '';
218:
219: IF g_debug THEN
220: pay_in_utils.trace ('**************************************************','********************');
221: pay_in_utils.trace ('p_tag_name',p_tag_name);
222: pay_in_utils.trace ('**************************************************','********************');
223: END IF;
224:
225: l_str:= '';
226: dbms_lob.writeAppend(g_tmp_clob,length(l_str),l_str);
224:
225: l_str:= '';
226: dbms_lob.writeAppend(g_tmp_clob,length(l_str),l_str);
227:
228: pay_in_utils.trace('l_str ',l_str);
229: pay_in_utils.set_location(g_debug,l_procedure,20);
230:
231: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,30);
232:
225: l_str:= '';
226: dbms_lob.writeAppend(g_tmp_clob,length(l_str),l_str);
227:
228: pay_in_utils.trace('l_str ',l_str);
229: pay_in_utils.set_location(g_debug,l_procedure,20);
230:
231: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,30);
232:
233: END close_tag;
227:
228: pay_in_utils.trace('l_str ',l_str);
229: pay_in_utils.set_location(g_debug,l_procedure,20);
230:
231: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,30);
232:
233: END close_tag;
234:
235: --------------------------------------------------------------------------
281: --
282: BEGIN
283: --
284: l_procedure := g_package || 'append_elements';
285: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
286:
287: IF g_debug THEN
288: pay_in_utils.trace ('**************************************************','********************');
289: pay_in_utils.trace ('p_action_context_id',p_action_context_id);
284: l_procedure := g_package || 'append_elements';
285: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
286:
287: IF g_debug THEN
288: pay_in_utils.trace ('**************************************************','********************');
289: pay_in_utils.trace ('p_action_context_id',p_action_context_id);
290: pay_in_utils.trace ('p_classification_name',p_classification_name);
291: pay_in_utils.trace ('**************************************************','********************');
292: END IF;
285: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
286:
287: IF g_debug THEN
288: pay_in_utils.trace ('**************************************************','********************');
289: pay_in_utils.trace ('p_action_context_id',p_action_context_id);
290: pay_in_utils.trace ('p_classification_name',p_classification_name);
291: pay_in_utils.trace ('**************************************************','********************');
292: END IF;
293:
286:
287: IF g_debug THEN
288: pay_in_utils.trace ('**************************************************','********************');
289: pay_in_utils.trace ('p_action_context_id',p_action_context_id);
290: pay_in_utils.trace ('p_classification_name',p_classification_name);
291: pay_in_utils.trace ('**************************************************','********************');
292: END IF;
293:
294:
287: IF g_debug THEN
288: pay_in_utils.trace ('**************************************************','********************');
289: pay_in_utils.trace ('p_action_context_id',p_action_context_id);
290: pay_in_utils.trace ('p_classification_name',p_classification_name);
291: pay_in_utils.trace ('**************************************************','********************');
292: END IF;
293:
294:
295: l_total := 0;
308: --
309: END IF;
310: open_tag(l_classification_tag);
311:
312: pay_in_utils.trace('l_classification_tag ',l_classification_tag);
313: pay_in_utils.set_location(g_debug,l_procedure,20);
314:
315: IF (l_classification_tag = 'Earnings') THEN
316: FOR rec in csr_elements_earnings
309: END IF;
310: open_tag(l_classification_tag);
311:
312: pay_in_utils.trace('l_classification_tag ',l_classification_tag);
313: pay_in_utils.set_location(g_debug,l_procedure,20);
314:
315: IF (l_classification_tag = 'Earnings') THEN
316: FOR rec in csr_elements_earnings
317: LOOP
318: --
319: l_rec_exists := TRUE;
320: open_tag(l_classification_tag || 'Element');
321:
322: pay_in_utils.trace('Element Name : ',rec.ename);
323: pay_in_utils.set_location(g_debug,l_procedure,30);
324: pay_in_utils.trace('This Pay : ',rec.amt);
325: pay_in_utils.set_location(g_debug,l_procedure,40);
326:
319: l_rec_exists := TRUE;
320: open_tag(l_classification_tag || 'Element');
321:
322: pay_in_utils.trace('Element Name : ',rec.ename);
323: pay_in_utils.set_location(g_debug,l_procedure,30);
324: pay_in_utils.trace('This Pay : ',rec.amt);
325: pay_in_utils.set_location(g_debug,l_procedure,40);
326:
327: append_tag('Description',rec.ename);
320: open_tag(l_classification_tag || 'Element');
321:
322: pay_in_utils.trace('Element Name : ',rec.ename);
323: pay_in_utils.set_location(g_debug,l_procedure,30);
324: pay_in_utils.trace('This Pay : ',rec.amt);
325: pay_in_utils.set_location(g_debug,l_procedure,40);
326:
327: append_tag('Description',rec.ename);
328: append_tag('Amount',pay_us_employee_payslip_web.get_format_value(
321:
322: pay_in_utils.trace('Element Name : ',rec.ename);
323: pay_in_utils.set_location(g_debug,l_procedure,30);
324: pay_in_utils.trace('This Pay : ',rec.amt);
325: pay_in_utils.set_location(g_debug,l_procedure,40);
326:
327: append_tag('Description',rec.ename);
328: append_tag('Amount',pay_us_employee_payslip_web.get_format_value(
329: g_business_group_id
340: --
341: l_rec_exists := TRUE;
342: open_tag(l_classification_tag || 'Element');
343:
344: pay_in_utils.trace('Element Name : ',rec.ename);
345: pay_in_utils.set_location(g_debug,l_procedure,30);
346: pay_in_utils.trace('This Pay : ',rec.amt);
347: pay_in_utils.set_location(g_debug,l_procedure,40);
348:
341: l_rec_exists := TRUE;
342: open_tag(l_classification_tag || 'Element');
343:
344: pay_in_utils.trace('Element Name : ',rec.ename);
345: pay_in_utils.set_location(g_debug,l_procedure,30);
346: pay_in_utils.trace('This Pay : ',rec.amt);
347: pay_in_utils.set_location(g_debug,l_procedure,40);
348:
349: append_tag('Description',rec.ename);
342: open_tag(l_classification_tag || 'Element');
343:
344: pay_in_utils.trace('Element Name : ',rec.ename);
345: pay_in_utils.set_location(g_debug,l_procedure,30);
346: pay_in_utils.trace('This Pay : ',rec.amt);
347: pay_in_utils.set_location(g_debug,l_procedure,40);
348:
349: append_tag('Description',rec.ename);
350: append_tag('Amount',pay_us_employee_payslip_web.get_format_value(
343:
344: pay_in_utils.trace('Element Name : ',rec.ename);
345: pay_in_utils.set_location(g_debug,l_procedure,30);
346: pay_in_utils.trace('This Pay : ',rec.amt);
347: pay_in_utils.set_location(g_debug,l_procedure,40);
348:
349: append_tag('Description',rec.ename);
350: append_tag('Amount',pay_us_employee_payslip_web.get_format_value(
351: g_business_group_id
356: --
357: END LOOP;
358: END IF;
359:
360: pay_in_utils.trace('l_total : ',l_total);
361: pay_in_utils.set_location(g_debug,l_procedure,50);
362:
363: IF l_rec_exists = FALSE THEN
364: --
357: END LOOP;
358: END IF;
359:
360: pay_in_utils.trace('l_total : ',l_total);
361: pay_in_utils.set_location(g_debug,l_procedure,50);
362:
363: IF l_rec_exists = FALSE THEN
364: --
365: open_tag(l_classification_tag|| 'Element');
377:
378: close_tag(l_classification_tag);
379:
380:
381: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,60);
382:
383: EXCEPTION
384: WHEN others THEN
385: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
381: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,60);
382:
383: EXCEPTION
384: WHEN others THEN
385: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
386: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,70);
387: pay_in_utils.trace(l_message,l_procedure);
388:
389: IF csr_elements%ISOPEN THEN
382:
383: EXCEPTION
384: WHEN others THEN
385: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
386: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,70);
387: pay_in_utils.trace(l_message,l_procedure);
388:
389: IF csr_elements%ISOPEN THEN
390: CLOSE csr_elements;
383: EXCEPTION
384: WHEN others THEN
385: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
386: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,70);
387: pay_in_utils.trace(l_message,l_procedure);
388:
389: IF csr_elements%ISOPEN THEN
390: CLOSE csr_elements;
391: END IF;
429: --
430: BEGIN
431: --
432: l_procedure := g_package || 'append_net_pay';
433: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
434:
435: IF g_debug THEN
436: pay_in_utils.trace ('**************************************************','********************');
437: pay_in_utils.trace (' p_action_context_id', p_action_context_id);
432: l_procedure := g_package || 'append_net_pay';
433: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
434:
435: IF g_debug THEN
436: pay_in_utils.trace ('**************************************************','********************');
437: pay_in_utils.trace (' p_action_context_id', p_action_context_id);
438: pay_in_utils.trace ('**************************************************','********************');
439: END IF;
440:
433: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
434:
435: IF g_debug THEN
436: pay_in_utils.trace ('**************************************************','********************');
437: pay_in_utils.trace (' p_action_context_id', p_action_context_id);
438: pay_in_utils.trace ('**************************************************','********************');
439: END IF;
440:
441:
434:
435: IF g_debug THEN
436: pay_in_utils.trace ('**************************************************','********************');
437: pay_in_utils.trace (' p_action_context_id', p_action_context_id);
438: pay_in_utils.trace ('**************************************************','********************');
439: END IF;
440:
441:
442: open_tag('NetPay');
462: CLOSE csr_sum_amt;
463:
464: l_gross_earnings := l_gross_earnings + NVL(l_advances,0)+ NVL(l_fbenefits,0) + NVL(l_mon_perks,0);
465:
466: pay_in_utils.trace('l_gross_earnings : ',l_gross_earnings);
467: pay_in_utils.set_location(g_debug,l_procedure,20);
468:
469: append_tag('GrossEarnings',pay_us_employee_payslip_web.get_format_value(
470: g_business_group_id
463:
464: l_gross_earnings := l_gross_earnings + NVL(l_advances,0)+ NVL(l_fbenefits,0) + NVL(l_mon_perks,0);
465:
466: pay_in_utils.trace('l_gross_earnings : ',l_gross_earnings);
467: pay_in_utils.set_location(g_debug,l_procedure,20);
468:
469: append_tag('GrossEarnings',pay_us_employee_payslip_web.get_format_value(
470: g_business_group_id
471: ,l_gross_earnings));
476: INTO l_gross_deductions;
477: CLOSE csr_sum_amt;
478:
479: l_gross_deductions := NVL(l_gross_deductions,0);
480: pay_in_utils.trace('l_gross_deductions ',l_gross_deductions);
481: pay_in_utils.set_location(g_debug,l_procedure,30);
482:
483: append_tag('GrossDeductions',pay_us_employee_payslip_web.get_format_value(
484: g_business_group_id
477: CLOSE csr_sum_amt;
478:
479: l_gross_deductions := NVL(l_gross_deductions,0);
480: pay_in_utils.trace('l_gross_deductions ',l_gross_deductions);
481: pay_in_utils.set_location(g_debug,l_procedure,30);
482:
483: append_tag('GrossDeductions',pay_us_employee_payslip_web.get_format_value(
484: g_business_group_id
485: ,l_gross_deductions));
485: ,l_gross_deductions));
486:
487: l_net_pay:=l_gross_earnings - l_gross_deductions;
488:
489: pay_in_utils.trace('l_net_pay ',l_net_pay);
490: pay_in_utils.set_location(g_debug,l_procedure,30);
491:
492: append_tag('Pay',pay_us_employee_payslip_web.get_format_value(
493: g_business_group_id
486:
487: l_net_pay:=l_gross_earnings - l_gross_deductions;
488:
489: pay_in_utils.trace('l_net_pay ',l_net_pay);
490: pay_in_utils.set_location(g_debug,l_procedure,30);
491:
492: append_tag('Pay',pay_us_employee_payslip_web.get_format_value(
493: g_business_group_id
494: ,l_net_pay));
496:
497: close_tag('NetPay');
498:
499: --
500: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,40);
501:
502: EXCEPTION
503: WHEN others THEN
504: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
500: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,40);
501:
502: EXCEPTION
503: WHEN others THEN
504: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
505: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,50);
506: pay_in_utils.trace(l_message,l_procedure);
507:
508: IF csr_sum_amt%ISOPEN THEN
501:
502: EXCEPTION
503: WHEN others THEN
504: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
505: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,50);
506: pay_in_utils.trace(l_message,l_procedure);
507:
508: IF csr_sum_amt%ISOPEN THEN
509: CLOSE csr_sum_amt;
502: EXCEPTION
503: WHEN others THEN
504: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
505: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,50);
506: pay_in_utils.trace(l_message,l_procedure);
507:
508: IF csr_sum_amt%ISOPEN THEN
509: CLOSE csr_sum_amt;
510: END IF;
542: --
543: BEGIN
544: --
545: l_procedure := g_package ||'append_balances';
546: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
547:
548: IF g_debug THEN
549: pay_in_utils.trace ('**************************************************','********************');
550: pay_in_utils.trace ('p_action_context_id',p_action_context_id);
545: l_procedure := g_package ||'append_balances';
546: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
547:
548: IF g_debug THEN
549: pay_in_utils.trace ('**************************************************','********************');
550: pay_in_utils.trace ('p_action_context_id',p_action_context_id);
551: pay_in_utils.trace ('**************************************************','********************');
552: END IF;
553:
546: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
547:
548: IF g_debug THEN
549: pay_in_utils.trace ('**************************************************','********************');
550: pay_in_utils.trace ('p_action_context_id',p_action_context_id);
551: pay_in_utils.trace ('**************************************************','********************');
552: END IF;
553:
554:
547:
548: IF g_debug THEN
549: pay_in_utils.trace ('**************************************************','********************');
550: pay_in_utils.trace ('p_action_context_id',p_action_context_id);
551: pay_in_utils.trace ('**************************************************','********************');
552: END IF;
553:
554:
555: open_tag('Balances');
558: LOOP
559: --
560: open_tag('Balance');
561:
562: pay_in_utils.trace('Balance Name : ',rec.bname);
563: pay_in_utils.set_location(g_debug,l_procedure,20);
564: pay_in_utils.trace('YTD : ',rec.ytd);
565: pay_in_utils.set_location(g_debug,l_procedure,30);
566:
559: --
560: open_tag('Balance');
561:
562: pay_in_utils.trace('Balance Name : ',rec.bname);
563: pay_in_utils.set_location(g_debug,l_procedure,20);
564: pay_in_utils.trace('YTD : ',rec.ytd);
565: pay_in_utils.set_location(g_debug,l_procedure,30);
566:
567: append_tag('Description',rec.bname);
560: open_tag('Balance');
561:
562: pay_in_utils.trace('Balance Name : ',rec.bname);
563: pay_in_utils.set_location(g_debug,l_procedure,20);
564: pay_in_utils.trace('YTD : ',rec.ytd);
565: pay_in_utils.set_location(g_debug,l_procedure,30);
566:
567: append_tag('Description',rec.bname);
568: append_tag('YTD',pay_us_employee_payslip_web.get_format_value(
561:
562: pay_in_utils.trace('Balance Name : ',rec.bname);
563: pay_in_utils.set_location(g_debug,l_procedure,20);
564: pay_in_utils.trace('YTD : ',rec.ytd);
565: pay_in_utils.set_location(g_debug,l_procedure,30);
566:
567: append_tag('Description',rec.bname);
568: append_tag('YTD',pay_us_employee_payslip_web.get_format_value(
569: g_business_group_id
573: --
574: END LOOP;
575:
576: close_tag('Balances');
577: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,40);
578:
579: EXCEPTION
580: WHEN others THEN
581: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
577: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,40);
578:
579: EXCEPTION
580: WHEN others THEN
581: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
582: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,50);
583: pay_in_utils.trace(l_message,l_procedure);
584:
585: IF csr_balances%ISOPEN THEN
578:
579: EXCEPTION
580: WHEN others THEN
581: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
582: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,50);
583: pay_in_utils.trace(l_message,l_procedure);
584:
585: IF csr_balances%ISOPEN THEN
586: CLOSE csr_balances;
579: EXCEPTION
580: WHEN others THEN
581: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
582: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,50);
583: pay_in_utils.trace(l_message,l_procedure);
584:
585: IF csr_balances%ISOPEN THEN
586: CLOSE csr_balances;
587: END IF;
623: BEGIN
624: --
625: l_rec_exists := FALSE;
626: l_procedure := g_package ||'append_other_elements';
627: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
628:
629: IF g_debug THEN
630: pay_in_utils.trace ('**************************************************','********************');
631: pay_in_utils.trace ('p_action_context_id',p_action_context_id);
626: l_procedure := g_package ||'append_other_elements';
627: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
628:
629: IF g_debug THEN
630: pay_in_utils.trace ('**************************************************','********************');
631: pay_in_utils.trace ('p_action_context_id',p_action_context_id);
632: pay_in_utils.trace ('**************************************************','********************');
633: END IF;
634:
627: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
628:
629: IF g_debug THEN
630: pay_in_utils.trace ('**************************************************','********************');
631: pay_in_utils.trace ('p_action_context_id',p_action_context_id);
632: pay_in_utils.trace ('**************************************************','********************');
633: END IF;
634:
635: open_tag('EMEAElements');
628:
629: IF g_debug THEN
630: pay_in_utils.trace ('**************************************************','********************');
631: pay_in_utils.trace ('p_action_context_id',p_action_context_id);
632: pay_in_utils.trace ('**************************************************','********************');
633: END IF;
634:
635: open_tag('EMEAElements');
636:
640: l_rec_exists := TRUE;
641: open_tag('EMEAElement');
642:
643:
644: pay_in_utils.trace('Element Name : ',rec.narrative);
645: pay_in_utils.set_location(g_debug,l_procedure,20);
646: pay_in_utils.trace('Value : ',rec.amount);
647: pay_in_utils.set_location(g_debug,l_procedure,30);
648:
641: open_tag('EMEAElement');
642:
643:
644: pay_in_utils.trace('Element Name : ',rec.narrative);
645: pay_in_utils.set_location(g_debug,l_procedure,20);
646: pay_in_utils.trace('Value : ',rec.amount);
647: pay_in_utils.set_location(g_debug,l_procedure,30);
648:
649: append_tag('Description',rec.narrative);
642:
643:
644: pay_in_utils.trace('Element Name : ',rec.narrative);
645: pay_in_utils.set_location(g_debug,l_procedure,20);
646: pay_in_utils.trace('Value : ',rec.amount);
647: pay_in_utils.set_location(g_debug,l_procedure,30);
648:
649: append_tag('Description',rec.narrative);
650:
643:
644: pay_in_utils.trace('Element Name : ',rec.narrative);
645: pay_in_utils.set_location(g_debug,l_procedure,20);
646: pay_in_utils.trace('Value : ',rec.amount);
647: pay_in_utils.set_location(g_debug,l_procedure,30);
648:
649: append_tag('Description',rec.narrative);
650:
651: BEGIN
672: --
673: END IF;
674: close_tag('EMEAElements');
675:
676: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,40);
677:
678: EXCEPTION
679: WHEN OTHERS THEN
680: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
676: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,40);
677:
678: EXCEPTION
679: WHEN OTHERS THEN
680: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
681: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,50);
682: pay_in_utils.trace(l_message,l_procedure);
683:
684: IF csr_other_elements%ISOPEN THEN
677:
678: EXCEPTION
679: WHEN OTHERS THEN
680: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
681: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,50);
682: pay_in_utils.trace(l_message,l_procedure);
683:
684: IF csr_other_elements%ISOPEN THEN
685: CLOSE csr_other_elements;
678: EXCEPTION
679: WHEN OTHERS THEN
680: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
681: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,50);
682: pay_in_utils.trace(l_message,l_procedure);
683:
684: IF csr_other_elements%ISOPEN THEN
685: CLOSE csr_other_elements;
686: END IF;
720: --
721: BEGIN
722: --
723: l_procedure := g_package ||'append_accruals';
724: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
725:
726: IF g_debug THEN
727: pay_in_utils.trace ('**************************************************','********************');
728: pay_in_utils.trace ('p_action_context_id',p_action_context_id);
723: l_procedure := g_package ||'append_accruals';
724: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
725:
726: IF g_debug THEN
727: pay_in_utils.trace ('**************************************************','********************');
728: pay_in_utils.trace ('p_action_context_id',p_action_context_id);
729: pay_in_utils.trace ('**************************************************','********************');
730: END IF;
731:
724: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
725:
726: IF g_debug THEN
727: pay_in_utils.trace ('**************************************************','********************');
728: pay_in_utils.trace ('p_action_context_id',p_action_context_id);
729: pay_in_utils.trace ('**************************************************','********************');
730: END IF;
731:
732: l_rec_exists := FALSE;
725:
726: IF g_debug THEN
727: pay_in_utils.trace ('**************************************************','********************');
728: pay_in_utils.trace ('p_action_context_id',p_action_context_id);
729: pay_in_utils.trace ('**************************************************','********************');
730: END IF;
731:
732: l_rec_exists := FALSE;
733: open_tag('Accruals');
737: --
738: l_rec_exists := TRUE;
739: open_tag('AccrualPlan');
740:
741: pay_in_utils.trace('Plan Name : ',rec.plan_name);
742: pay_in_utils.set_location(g_debug,l_procedure,20);
743: pay_in_utils.trace('UOM : ',rec.uom);
744: pay_in_utils.set_location(g_debug,l_procedure,30);
745: pay_in_utils.trace('Accrual Balance : ',rec.balance);
738: l_rec_exists := TRUE;
739: open_tag('AccrualPlan');
740:
741: pay_in_utils.trace('Plan Name : ',rec.plan_name);
742: pay_in_utils.set_location(g_debug,l_procedure,20);
743: pay_in_utils.trace('UOM : ',rec.uom);
744: pay_in_utils.set_location(g_debug,l_procedure,30);
745: pay_in_utils.trace('Accrual Balance : ',rec.balance);
746: pay_in_utils.set_location(g_debug,l_procedure,40);
739: open_tag('AccrualPlan');
740:
741: pay_in_utils.trace('Plan Name : ',rec.plan_name);
742: pay_in_utils.set_location(g_debug,l_procedure,20);
743: pay_in_utils.trace('UOM : ',rec.uom);
744: pay_in_utils.set_location(g_debug,l_procedure,30);
745: pay_in_utils.trace('Accrual Balance : ',rec.balance);
746: pay_in_utils.set_location(g_debug,l_procedure,40);
747:
740:
741: pay_in_utils.trace('Plan Name : ',rec.plan_name);
742: pay_in_utils.set_location(g_debug,l_procedure,20);
743: pay_in_utils.trace('UOM : ',rec.uom);
744: pay_in_utils.set_location(g_debug,l_procedure,30);
745: pay_in_utils.trace('Accrual Balance : ',rec.balance);
746: pay_in_utils.set_location(g_debug,l_procedure,40);
747:
748: /* Bug 4218967 Changed the tag AccrBalance to Balance */
741: pay_in_utils.trace('Plan Name : ',rec.plan_name);
742: pay_in_utils.set_location(g_debug,l_procedure,20);
743: pay_in_utils.trace('UOM : ',rec.uom);
744: pay_in_utils.set_location(g_debug,l_procedure,30);
745: pay_in_utils.trace('Accrual Balance : ',rec.balance);
746: pay_in_utils.set_location(g_debug,l_procedure,40);
747:
748: /* Bug 4218967 Changed the tag AccrBalance to Balance */
749: append_tag('PlanName',rec.plan_name);
742: pay_in_utils.set_location(g_debug,l_procedure,20);
743: pay_in_utils.trace('UOM : ',rec.uom);
744: pay_in_utils.set_location(g_debug,l_procedure,30);
745: pay_in_utils.trace('Accrual Balance : ',rec.balance);
746: pay_in_utils.set_location(g_debug,l_procedure,40);
747:
748: /* Bug 4218967 Changed the tag AccrBalance to Balance */
749: append_tag('PlanName',rec.plan_name);
750: append_tag('UOM',rec.uom);
768: --
769: END IF;
770: close_tag('Accruals');
771:
772: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,60);
773:
774: EXCEPTION
775: WHEN others THEN
776: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
772: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,60);
773:
774: EXCEPTION
775: WHEN others THEN
776: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
777: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,70);
778: pay_in_utils.trace(l_message,l_procedure);
779:
780: IF csr_accruals%ISOPEN THEN
773:
774: EXCEPTION
775: WHEN others THEN
776: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
777: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,70);
778: pay_in_utils.trace(l_message,l_procedure);
779:
780: IF csr_accruals%ISOPEN THEN
781: CLOSE csr_accruals;
774: EXCEPTION
775: WHEN others THEN
776: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
777: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,70);
778: pay_in_utils.trace(l_message,l_procedure);
779:
780: IF csr_accruals%ISOPEN THEN
781: CLOSE csr_accruals;
782: END IF;
817: --
818: BEGIN
819: --
820: l_procedure := g_package || 'append_absences';
821: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
822:
823: IF g_debug THEN
824: pay_in_utils.trace ('**************************************************','********************');
825: pay_in_utils.trace ('p_action_context_id',p_action_context_id);
820: l_procedure := g_package || 'append_absences';
821: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
822:
823: IF g_debug THEN
824: pay_in_utils.trace ('**************************************************','********************');
825: pay_in_utils.trace ('p_action_context_id',p_action_context_id);
826: pay_in_utils.trace ('**************************************************','********************');
827: END IF;
828:
821: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
822:
823: IF g_debug THEN
824: pay_in_utils.trace ('**************************************************','********************');
825: pay_in_utils.trace ('p_action_context_id',p_action_context_id);
826: pay_in_utils.trace ('**************************************************','********************');
827: END IF;
828:
829: l_rec_exists := FALSE;
822:
823: IF g_debug THEN
824: pay_in_utils.trace ('**************************************************','********************');
825: pay_in_utils.trace ('p_action_context_id',p_action_context_id);
826: pay_in_utils.trace ('**************************************************','********************');
827: END IF;
828:
829: l_rec_exists := FALSE;
830: open_tag('Absences');
834: --
835: l_rec_exists := TRUE;
836: open_tag('Absence');
837:
838: pay_in_utils.trace('Absence Name : ',rec.absence_name);
839: pay_in_utils.set_location(g_debug,l_procedure,20);
840: pay_in_utils.trace('Start Date : ',to_char(rec.start_date,'DD-MON-YYYY'));
841: pay_in_utils.set_location(g_debug,l_procedure,30);
842: pay_in_utils.trace('End Date : ',to_char(rec.end_date,'DD-MON-YYYY'));
835: l_rec_exists := TRUE;
836: open_tag('Absence');
837:
838: pay_in_utils.trace('Absence Name : ',rec.absence_name);
839: pay_in_utils.set_location(g_debug,l_procedure,20);
840: pay_in_utils.trace('Start Date : ',to_char(rec.start_date,'DD-MON-YYYY'));
841: pay_in_utils.set_location(g_debug,l_procedure,30);
842: pay_in_utils.trace('End Date : ',to_char(rec.end_date,'DD-MON-YYYY'));
843: pay_in_utils.set_location(g_debug,l_procedure,40);
836: open_tag('Absence');
837:
838: pay_in_utils.trace('Absence Name : ',rec.absence_name);
839: pay_in_utils.set_location(g_debug,l_procedure,20);
840: pay_in_utils.trace('Start Date : ',to_char(rec.start_date,'DD-MON-YYYY'));
841: pay_in_utils.set_location(g_debug,l_procedure,30);
842: pay_in_utils.trace('End Date : ',to_char(rec.end_date,'DD-MON-YYYY'));
843: pay_in_utils.set_location(g_debug,l_procedure,40);
844: pay_in_utils.trace('This Pay : ',rec.absence_value);
837:
838: pay_in_utils.trace('Absence Name : ',rec.absence_name);
839: pay_in_utils.set_location(g_debug,l_procedure,20);
840: pay_in_utils.trace('Start Date : ',to_char(rec.start_date,'DD-MON-YYYY'));
841: pay_in_utils.set_location(g_debug,l_procedure,30);
842: pay_in_utils.trace('End Date : ',to_char(rec.end_date,'DD-MON-YYYY'));
843: pay_in_utils.set_location(g_debug,l_procedure,40);
844: pay_in_utils.trace('This Pay : ',rec.absence_value);
845: pay_in_utils.set_location(g_debug,l_procedure,50);
838: pay_in_utils.trace('Absence Name : ',rec.absence_name);
839: pay_in_utils.set_location(g_debug,l_procedure,20);
840: pay_in_utils.trace('Start Date : ',to_char(rec.start_date,'DD-MON-YYYY'));
841: pay_in_utils.set_location(g_debug,l_procedure,30);
842: pay_in_utils.trace('End Date : ',to_char(rec.end_date,'DD-MON-YYYY'));
843: pay_in_utils.set_location(g_debug,l_procedure,40);
844: pay_in_utils.trace('This Pay : ',rec.absence_value);
845: pay_in_utils.set_location(g_debug,l_procedure,50);
846:
839: pay_in_utils.set_location(g_debug,l_procedure,20);
840: pay_in_utils.trace('Start Date : ',to_char(rec.start_date,'DD-MON-YYYY'));
841: pay_in_utils.set_location(g_debug,l_procedure,30);
842: pay_in_utils.trace('End Date : ',to_char(rec.end_date,'DD-MON-YYYY'));
843: pay_in_utils.set_location(g_debug,l_procedure,40);
844: pay_in_utils.trace('This Pay : ',rec.absence_value);
845: pay_in_utils.set_location(g_debug,l_procedure,50);
846:
847: append_tag('AbsenceName',rec.absence_name);
840: pay_in_utils.trace('Start Date : ',to_char(rec.start_date,'DD-MON-YYYY'));
841: pay_in_utils.set_location(g_debug,l_procedure,30);
842: pay_in_utils.trace('End Date : ',to_char(rec.end_date,'DD-MON-YYYY'));
843: pay_in_utils.set_location(g_debug,l_procedure,40);
844: pay_in_utils.trace('This Pay : ',rec.absence_value);
845: pay_in_utils.set_location(g_debug,l_procedure,50);
846:
847: append_tag('AbsenceName',rec.absence_name);
848: append_tag('StartDate',to_char(rec.start_date,'DD-MON-YYYY'));
841: pay_in_utils.set_location(g_debug,l_procedure,30);
842: pay_in_utils.trace('End Date : ',to_char(rec.end_date,'DD-MON-YYYY'));
843: pay_in_utils.set_location(g_debug,l_procedure,40);
844: pay_in_utils.trace('This Pay : ',rec.absence_value);
845: pay_in_utils.set_location(g_debug,l_procedure,50);
846:
847: append_tag('AbsenceName',rec.absence_name);
848: append_tag('StartDate',to_char(rec.start_date,'DD-MON-YYYY'));
849: append_tag('EndDate',to_char(rec.end_date,'DD-MON-YYYY'));
869: END IF;
870: close_tag('Absences');
871:
872: --
873: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,60);
874:
875: EXCEPTION
876: WHEN others THEN
877: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
873: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,60);
874:
875: EXCEPTION
876: WHEN others THEN
877: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
878: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,70);
879: pay_in_utils.trace(l_message,l_procedure);
880:
881: IF csr_absences%ISOPEN THEN
874:
875: EXCEPTION
876: WHEN others THEN
877: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
878: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,70);
879: pay_in_utils.trace(l_message,l_procedure);
880:
881: IF csr_absences%ISOPEN THEN
882: CLOSE csr_absences;
875: EXCEPTION
876: WHEN others THEN
877: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
878: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,70);
879: pay_in_utils.trace(l_message,l_procedure);
880:
881: IF csr_absences%ISOPEN THEN
882: CLOSE csr_absences;
883: END IF;
918: --
919: BEGIN
920:
921: l_procedure := g_package || 'append_messages';
922: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
923:
924: IF g_debug THEN
925: pay_in_utils.trace('**************************************************','********************');
926: pay_in_utils.trace('p_action_context_id',p_action_context_id);
921: l_procedure := g_package || 'append_messages';
922: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
923:
924: IF g_debug THEN
925: pay_in_utils.trace('**************************************************','********************');
926: pay_in_utils.trace('p_action_context_id',p_action_context_id);
927: pay_in_utils.trace('**************************************************','********************');
928: END IF;
929:
922: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
923:
924: IF g_debug THEN
925: pay_in_utils.trace('**************************************************','********************');
926: pay_in_utils.trace('p_action_context_id',p_action_context_id);
927: pay_in_utils.trace('**************************************************','********************');
928: END IF;
929:
930:
923:
924: IF g_debug THEN
925: pay_in_utils.trace('**************************************************','********************');
926: pay_in_utils.trace('p_action_context_id',p_action_context_id);
927: pay_in_utils.trace('**************************************************','********************');
928: END IF;
929:
930:
931: open_tag('Messages');
933: LOOP
934: --
935: open_tag('Mesg');
936:
937: pay_in_utils.trace('Mesg : ',rec.value);
938: pay_in_utils.set_location(g_debug,l_procedure,20);
939:
940: append_tag('Value',rec.value);
941:
934: --
935: open_tag('Mesg');
936:
937: pay_in_utils.trace('Mesg : ',rec.value);
938: pay_in_utils.set_location(g_debug,l_procedure,20);
939:
940: append_tag('Value',rec.value);
941:
942: close_tag('Mesg');
943: --
944: END LOOP;
945: close_tag('Messages');
946:
947: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,30);
948:
949: EXCEPTION
950: WHEN OTHERS THEN
951: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
947: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,30);
948:
949: EXCEPTION
950: WHEN OTHERS THEN
951: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
952: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,30);
953: pay_in_utils.trace(l_message,l_procedure);
954:
955: IF csr_messages%ISOPEN THEN
948:
949: EXCEPTION
950: WHEN OTHERS THEN
951: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
952: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,30);
953: pay_in_utils.trace(l_message,l_procedure);
954:
955: IF csr_messages%ISOPEN THEN
956: CLOSE csr_messages;
949: EXCEPTION
950: WHEN OTHERS THEN
951: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
952: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,30);
953: pay_in_utils.trace(l_message,l_procedure);
954:
955: IF csr_messages%ISOPEN THEN
956: CLOSE csr_messages;
957: END IF;
990: --
991: BEGIN
992: --
993: l_procedure := g_package || 'append_other_balances';
994: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
995:
996: IF g_debug THEN
997: pay_in_utils.trace('**************************************************','********************');
998: pay_in_utils.trace('p_action_context_id',p_action_context_id);
993: l_procedure := g_package || 'append_other_balances';
994: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
995:
996: IF g_debug THEN
997: pay_in_utils.trace('**************************************************','********************');
998: pay_in_utils.trace('p_action_context_id',p_action_context_id);
999: pay_in_utils.trace('**************************************************','********************');
1000: END IF;
1001:
994: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
995:
996: IF g_debug THEN
997: pay_in_utils.trace('**************************************************','********************');
998: pay_in_utils.trace('p_action_context_id',p_action_context_id);
999: pay_in_utils.trace('**************************************************','********************');
1000: END IF;
1001:
1002: l_rec_exists := FALSE;
995:
996: IF g_debug THEN
997: pay_in_utils.trace('**************************************************','********************');
998: pay_in_utils.trace('p_action_context_id',p_action_context_id);
999: pay_in_utils.trace('**************************************************','********************');
1000: END IF;
1001:
1002: l_rec_exists := FALSE;
1003: open_tag('EMEABalances');
1007: --
1008: l_rec_exists := TRUE;
1009: open_tag('EMEABalance');
1010:
1011: pay_in_utils.trace('Description : ',rec.narrative);
1012: pay_in_utils.set_location(g_debug,l_procedure,20);
1013: pay_in_utils.trace('Amount : ',rec.value);
1014: pay_in_utils.set_location(g_debug,l_procedure,30);
1015:
1008: l_rec_exists := TRUE;
1009: open_tag('EMEABalance');
1010:
1011: pay_in_utils.trace('Description : ',rec.narrative);
1012: pay_in_utils.set_location(g_debug,l_procedure,20);
1013: pay_in_utils.trace('Amount : ',rec.value);
1014: pay_in_utils.set_location(g_debug,l_procedure,30);
1015:
1016:
1009: open_tag('EMEABalance');
1010:
1011: pay_in_utils.trace('Description : ',rec.narrative);
1012: pay_in_utils.set_location(g_debug,l_procedure,20);
1013: pay_in_utils.trace('Amount : ',rec.value);
1014: pay_in_utils.set_location(g_debug,l_procedure,30);
1015:
1016:
1017: append_tag('Description',rec.narrative);
1010:
1011: pay_in_utils.trace('Description : ',rec.narrative);
1012: pay_in_utils.set_location(g_debug,l_procedure,20);
1013: pay_in_utils.trace('Amount : ',rec.value);
1014: pay_in_utils.set_location(g_debug,l_procedure,30);
1015:
1016:
1017: append_tag('Description',rec.narrative);
1018: append_tag('Amount',pay_us_employee_payslip_web.get_format_value(
1034: --
1035: END IF;
1036: close_tag('EMEABalances');
1037:
1038: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,20);
1039:
1040: EXCEPTION
1041: WHEN OTHERS THEN
1042: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
1038: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,20);
1039:
1040: EXCEPTION
1041: WHEN OTHERS THEN
1042: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
1043: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,30);
1044: pay_in_utils.trace(l_message,l_procedure);
1045:
1046: IF csr_other_balances%ISOPEN THEN
1039:
1040: EXCEPTION
1041: WHEN OTHERS THEN
1042: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
1043: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,30);
1044: pay_in_utils.trace(l_message,l_procedure);
1045:
1046: IF csr_other_balances%ISOPEN THEN
1047: CLOSE csr_other_balances;
1040: EXCEPTION
1041: WHEN OTHERS THEN
1042: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
1043: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,30);
1044: pay_in_utils.trace(l_message,l_procedure);
1045:
1046: IF csr_other_balances%ISOPEN THEN
1047: CLOSE csr_other_balances;
1048: END IF;
1083: --
1084: BEGIN
1085: --
1086: l_procedure := g_package ||'append_payment_details';
1087: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1088:
1089: IF g_debug THEN
1090: pay_in_utils.trace ('**************************************************','********************');
1091: pay_in_utils.trace ('p_action_context_id',p_action_context_id);
1086: l_procedure := g_package ||'append_payment_details';
1087: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1088:
1089: IF g_debug THEN
1090: pay_in_utils.trace ('**************************************************','********************');
1091: pay_in_utils.trace ('p_action_context_id',p_action_context_id);
1092: pay_in_utils.trace ('**************************************************','********************');
1093: END IF;
1094:
1087: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1088:
1089: IF g_debug THEN
1090: pay_in_utils.trace ('**************************************************','********************');
1091: pay_in_utils.trace ('p_action_context_id',p_action_context_id);
1092: pay_in_utils.trace ('**************************************************','********************');
1093: END IF;
1094:
1095: l_rec_exists := FALSE;
1088:
1089: IF g_debug THEN
1090: pay_in_utils.trace ('**************************************************','********************');
1091: pay_in_utils.trace ('p_action_context_id',p_action_context_id);
1092: pay_in_utils.trace ('**************************************************','********************');
1093: END IF;
1094:
1095: l_rec_exists := FALSE;
1096: open_tag('PaymentDetails');
1100: --
1101: l_rec_exists := TRUE;
1102: open_tag('Payment');
1103:
1104: pay_in_utils.trace('Payment Method : ',rec.payment_method);
1105: pay_in_utils.set_location(g_debug,l_procedure,20);
1106: pay_in_utils.trace('Bank Name : ',rec.bank_name);
1107: pay_in_utils.set_location(g_debug,l_procedure,30);
1108: pay_in_utils.trace('Account Number : ',rec.account_number);
1101: l_rec_exists := TRUE;
1102: open_tag('Payment');
1103:
1104: pay_in_utils.trace('Payment Method : ',rec.payment_method);
1105: pay_in_utils.set_location(g_debug,l_procedure,20);
1106: pay_in_utils.trace('Bank Name : ',rec.bank_name);
1107: pay_in_utils.set_location(g_debug,l_procedure,30);
1108: pay_in_utils.trace('Account Number : ',rec.account_number);
1109: pay_in_utils.set_location(g_debug,l_procedure,40);
1102: open_tag('Payment');
1103:
1104: pay_in_utils.trace('Payment Method : ',rec.payment_method);
1105: pay_in_utils.set_location(g_debug,l_procedure,20);
1106: pay_in_utils.trace('Bank Name : ',rec.bank_name);
1107: pay_in_utils.set_location(g_debug,l_procedure,30);
1108: pay_in_utils.trace('Account Number : ',rec.account_number);
1109: pay_in_utils.set_location(g_debug,l_procedure,40);
1110: pay_in_utils.trace('This Pay : ',rec.value);
1103:
1104: pay_in_utils.trace('Payment Method : ',rec.payment_method);
1105: pay_in_utils.set_location(g_debug,l_procedure,20);
1106: pay_in_utils.trace('Bank Name : ',rec.bank_name);
1107: pay_in_utils.set_location(g_debug,l_procedure,30);
1108: pay_in_utils.trace('Account Number : ',rec.account_number);
1109: pay_in_utils.set_location(g_debug,l_procedure,40);
1110: pay_in_utils.trace('This Pay : ',rec.value);
1111: pay_in_utils.set_location(g_debug,l_procedure,50);
1104: pay_in_utils.trace('Payment Method : ',rec.payment_method);
1105: pay_in_utils.set_location(g_debug,l_procedure,20);
1106: pay_in_utils.trace('Bank Name : ',rec.bank_name);
1107: pay_in_utils.set_location(g_debug,l_procedure,30);
1108: pay_in_utils.trace('Account Number : ',rec.account_number);
1109: pay_in_utils.set_location(g_debug,l_procedure,40);
1110: pay_in_utils.trace('This Pay : ',rec.value);
1111: pay_in_utils.set_location(g_debug,l_procedure,50);
1112:
1105: pay_in_utils.set_location(g_debug,l_procedure,20);
1106: pay_in_utils.trace('Bank Name : ',rec.bank_name);
1107: pay_in_utils.set_location(g_debug,l_procedure,30);
1108: pay_in_utils.trace('Account Number : ',rec.account_number);
1109: pay_in_utils.set_location(g_debug,l_procedure,40);
1110: pay_in_utils.trace('This Pay : ',rec.value);
1111: pay_in_utils.set_location(g_debug,l_procedure,50);
1112:
1113: append_tag('PaymentType',rec.payment_method);
1106: pay_in_utils.trace('Bank Name : ',rec.bank_name);
1107: pay_in_utils.set_location(g_debug,l_procedure,30);
1108: pay_in_utils.trace('Account Number : ',rec.account_number);
1109: pay_in_utils.set_location(g_debug,l_procedure,40);
1110: pay_in_utils.trace('This Pay : ',rec.value);
1111: pay_in_utils.set_location(g_debug,l_procedure,50);
1112:
1113: append_tag('PaymentType',rec.payment_method);
1114: append_tag('Bank',rec.bank_name);
1107: pay_in_utils.set_location(g_debug,l_procedure,30);
1108: pay_in_utils.trace('Account Number : ',rec.account_number);
1109: pay_in_utils.set_location(g_debug,l_procedure,40);
1110: pay_in_utils.trace('This Pay : ',rec.value);
1111: pay_in_utils.set_location(g_debug,l_procedure,50);
1112:
1113: append_tag('PaymentType',rec.payment_method);
1114: append_tag('Bank',rec.bank_name);
1115: append_tag('AccountNumber',rec.account_number);
1134: --
1135: END IF;
1136: close_tag('PaymentDetails');
1137:
1138: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,60);
1139:
1140: EXCEPTION
1141: WHEN others THEN
1142: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
1138: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,60);
1139:
1140: EXCEPTION
1141: WHEN others THEN
1142: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
1143: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,70);
1144: pay_in_utils.trace(l_message,l_procedure);
1145:
1146: IF csr_payment_details%ISOPEN THEN
1139:
1140: EXCEPTION
1141: WHEN others THEN
1142: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
1143: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,70);
1144: pay_in_utils.trace(l_message,l_procedure);
1145:
1146: IF csr_payment_details%ISOPEN THEN
1147: CLOSE csr_payment_details;
1140: EXCEPTION
1141: WHEN others THEN
1142: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
1143: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,70);
1144: pay_in_utils.trace(l_message,l_procedure);
1145:
1146: IF csr_payment_details%ISOPEN THEN
1147: CLOSE csr_payment_details;
1148: END IF;
1174: BEGIN
1175: --
1176:
1177: l_procedure := g_package||'fetch_xml';
1178: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1179:
1180:
1181:
1182: -- If Clobs exists return next clob else exit NULL
1189: --
1190: p_clob := null;
1191: --
1192: END IF;
1193: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,20);
1194:
1195: END fetch_xml;
1196:
1197: --------------------------------------------------------------------------
1264: BEGIN
1265: --
1266:
1267: l_procedure := g_package ||'get_template';
1268: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1269:
1270: IF g_debug THEN
1271: pay_in_utils.trace('**************************************************','********************');
1272: pay_in_utils.trace('p_business_group_id : ', p_business_group_id);
1267: l_procedure := g_package ||'get_template';
1268: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1269:
1270: IF g_debug THEN
1271: pay_in_utils.trace('**************************************************','********************');
1272: pay_in_utils.trace('p_business_group_id : ', p_business_group_id);
1273: pay_in_utils.trace('p_start_date : ', p_start_date);
1274: pay_in_utils.trace('p_end_date : ', p_end_date);
1275: pay_in_utils.trace('p_payroll_id : ', p_payroll_id);
1268: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1269:
1270: IF g_debug THEN
1271: pay_in_utils.trace('**************************************************','********************');
1272: pay_in_utils.trace('p_business_group_id : ', p_business_group_id);
1273: pay_in_utils.trace('p_start_date : ', p_start_date);
1274: pay_in_utils.trace('p_end_date : ', p_end_date);
1275: pay_in_utils.trace('p_payroll_id : ', p_payroll_id);
1276: pay_in_utils.trace('p_consolidation_set_id : ', p_consolidation_set_id);
1269:
1270: IF g_debug THEN
1271: pay_in_utils.trace('**************************************************','********************');
1272: pay_in_utils.trace('p_business_group_id : ', p_business_group_id);
1273: pay_in_utils.trace('p_start_date : ', p_start_date);
1274: pay_in_utils.trace('p_end_date : ', p_end_date);
1275: pay_in_utils.trace('p_payroll_id : ', p_payroll_id);
1276: pay_in_utils.trace('p_consolidation_set_id : ', p_consolidation_set_id);
1277: pay_in_utils.trace('p_sort_order1 : ', p_sort_order1);
1270: IF g_debug THEN
1271: pay_in_utils.trace('**************************************************','********************');
1272: pay_in_utils.trace('p_business_group_id : ', p_business_group_id);
1273: pay_in_utils.trace('p_start_date : ', p_start_date);
1274: pay_in_utils.trace('p_end_date : ', p_end_date);
1275: pay_in_utils.trace('p_payroll_id : ', p_payroll_id);
1276: pay_in_utils.trace('p_consolidation_set_id : ', p_consolidation_set_id);
1277: pay_in_utils.trace('p_sort_order1 : ', p_sort_order1);
1278: pay_in_utils.trace('p_sort_order2 : ', p_sort_order2);
1271: pay_in_utils.trace('**************************************************','********************');
1272: pay_in_utils.trace('p_business_group_id : ', p_business_group_id);
1273: pay_in_utils.trace('p_start_date : ', p_start_date);
1274: pay_in_utils.trace('p_end_date : ', p_end_date);
1275: pay_in_utils.trace('p_payroll_id : ', p_payroll_id);
1276: pay_in_utils.trace('p_consolidation_set_id : ', p_consolidation_set_id);
1277: pay_in_utils.trace('p_sort_order1 : ', p_sort_order1);
1278: pay_in_utils.trace('p_sort_order2 : ', p_sort_order2);
1279: pay_in_utils.trace('p_sort_order3 : ', p_sort_order3);
1272: pay_in_utils.trace('p_business_group_id : ', p_business_group_id);
1273: pay_in_utils.trace('p_start_date : ', p_start_date);
1274: pay_in_utils.trace('p_end_date : ', p_end_date);
1275: pay_in_utils.trace('p_payroll_id : ', p_payroll_id);
1276: pay_in_utils.trace('p_consolidation_set_id : ', p_consolidation_set_id);
1277: pay_in_utils.trace('p_sort_order1 : ', p_sort_order1);
1278: pay_in_utils.trace('p_sort_order2 : ', p_sort_order2);
1279: pay_in_utils.trace('p_sort_order3 : ', p_sort_order3);
1280: pay_in_utils.trace('p_sort_order4 : ', p_sort_order4);
1273: pay_in_utils.trace('p_start_date : ', p_start_date);
1274: pay_in_utils.trace('p_end_date : ', p_end_date);
1275: pay_in_utils.trace('p_payroll_id : ', p_payroll_id);
1276: pay_in_utils.trace('p_consolidation_set_id : ', p_consolidation_set_id);
1277: pay_in_utils.trace('p_sort_order1 : ', p_sort_order1);
1278: pay_in_utils.trace('p_sort_order2 : ', p_sort_order2);
1279: pay_in_utils.trace('p_sort_order3 : ', p_sort_order3);
1280: pay_in_utils.trace('p_sort_order4 : ', p_sort_order4);
1281: pay_in_utils.trace('**************************************************','********************');
1274: pay_in_utils.trace('p_end_date : ', p_end_date);
1275: pay_in_utils.trace('p_payroll_id : ', p_payroll_id);
1276: pay_in_utils.trace('p_consolidation_set_id : ', p_consolidation_set_id);
1277: pay_in_utils.trace('p_sort_order1 : ', p_sort_order1);
1278: pay_in_utils.trace('p_sort_order2 : ', p_sort_order2);
1279: pay_in_utils.trace('p_sort_order3 : ', p_sort_order3);
1280: pay_in_utils.trace('p_sort_order4 : ', p_sort_order4);
1281: pay_in_utils.trace('**************************************************','********************');
1282: END IF;
1275: pay_in_utils.trace('p_payroll_id : ', p_payroll_id);
1276: pay_in_utils.trace('p_consolidation_set_id : ', p_consolidation_set_id);
1277: pay_in_utils.trace('p_sort_order1 : ', p_sort_order1);
1278: pay_in_utils.trace('p_sort_order2 : ', p_sort_order2);
1279: pay_in_utils.trace('p_sort_order3 : ', p_sort_order3);
1280: pay_in_utils.trace('p_sort_order4 : ', p_sort_order4);
1281: pay_in_utils.trace('**************************************************','********************');
1282: END IF;
1283:
1276: pay_in_utils.trace('p_consolidation_set_id : ', p_consolidation_set_id);
1277: pay_in_utils.trace('p_sort_order1 : ', p_sort_order1);
1278: pay_in_utils.trace('p_sort_order2 : ', p_sort_order2);
1279: pay_in_utils.trace('p_sort_order3 : ', p_sort_order3);
1280: pay_in_utils.trace('p_sort_order4 : ', p_sort_order4);
1281: pay_in_utils.trace('**************************************************','********************');
1282: END IF;
1283:
1284:
1277: pay_in_utils.trace('p_sort_order1 : ', p_sort_order1);
1278: pay_in_utils.trace('p_sort_order2 : ', p_sort_order2);
1279: pay_in_utils.trace('p_sort_order3 : ', p_sort_order3);
1280: pay_in_utils.trace('p_sort_order4 : ', p_sort_order4);
1281: pay_in_utils.trace('**************************************************','********************');
1282: END IF;
1283:
1284:
1285: l_start_date := fnd_date.canonical_to_date(p_start_date);
1352: -- Append sort order to SQL statement
1353: --
1354: l_stmt := l_stmt || l_sort_by;
1355:
1356: pay_in_utils.trace('Before Open Cursor',20);
1357: l_sql_csr := dbms_sql.open_cursor;
1358:
1359: pay_in_utils.set_location(g_debug,'Before parse',30);
1360: dbms_sql.parse(l_sql_csr,l_stmt,dbms_sql.native);
1355:
1356: pay_in_utils.trace('Before Open Cursor',20);
1357: l_sql_csr := dbms_sql.open_cursor;
1358:
1359: pay_in_utils.set_location(g_debug,'Before parse',30);
1360: dbms_sql.parse(l_sql_csr,l_stmt,dbms_sql.native);
1361: dbms_sql.define_column(l_sql_csr,1,l_action_context_id);
1362: dbms_sql.define_column(l_sql_csr,2,l_employee_number,240);
1363: dbms_sql.define_column(l_sql_csr,3,l_assignment_number,240);
1375: dbms_sql.define_column(l_sql_csr,15,l_grade,240);
1376: dbms_sql.define_column(l_sql_csr,16,l_pan,240);
1377: dbms_sql.define_column(l_sql_csr,17,l_superannuation,240);
1378:
1379: pay_in_utils.set_location(g_debug,'Before Bind',40);
1380: dbms_sql.bind_variable(l_sql_csr,':bg_id',p_business_group_id);
1381: dbms_sql.bind_variable(l_sql_csr,':start_date',l_start_date);
1382: dbms_sql.bind_variable(l_sql_csr,':end_date',l_end_date);
1383: dbms_sql.bind_variable(l_sql_csr,':payroll_id',p_payroll_id);
1382: dbms_sql.bind_variable(l_sql_csr,':end_date',l_end_date);
1383: dbms_sql.bind_variable(l_sql_csr,':payroll_id',p_payroll_id);
1384: dbms_sql.bind_variable(l_sql_csr,':cons_set_id',p_consolidation_set_id);
1385:
1386: pay_in_utils.set_location(g_debug,'Before execute',50);
1387: l_dummy := dbms_sql.execute(l_sql_csr);
1388:
1389: LOOP
1390: --
1413: dbms_sql.column_value(l_sql_csr,15,l_grade);
1414: dbms_sql.column_value(l_sql_csr,16,l_pan);
1415: dbms_sql.column_value(l_sql_csr,17,l_superannuation);
1416:
1417: pay_in_utils.trace('l_action_context_id : ', l_action_context_id);
1418: pay_in_utils.set_location(g_debug,l_procedure,20);
1419: pay_in_utils.trace('l_employee_number : ', l_employee_number);
1420: pay_in_utils.set_location(g_debug,l_procedure,20);
1421: pay_in_utils.trace('l_assignment_number : ', l_assignment_number);
1414: dbms_sql.column_value(l_sql_csr,16,l_pan);
1415: dbms_sql.column_value(l_sql_csr,17,l_superannuation);
1416:
1417: pay_in_utils.trace('l_action_context_id : ', l_action_context_id);
1418: pay_in_utils.set_location(g_debug,l_procedure,20);
1419: pay_in_utils.trace('l_employee_number : ', l_employee_number);
1420: pay_in_utils.set_location(g_debug,l_procedure,20);
1421: pay_in_utils.trace('l_assignment_number : ', l_assignment_number);
1422: pay_in_utils.set_location(g_debug,l_procedure,30);
1415: dbms_sql.column_value(l_sql_csr,17,l_superannuation);
1416:
1417: pay_in_utils.trace('l_action_context_id : ', l_action_context_id);
1418: pay_in_utils.set_location(g_debug,l_procedure,20);
1419: pay_in_utils.trace('l_employee_number : ', l_employee_number);
1420: pay_in_utils.set_location(g_debug,l_procedure,20);
1421: pay_in_utils.trace('l_assignment_number : ', l_assignment_number);
1422: pay_in_utils.set_location(g_debug,l_procedure,30);
1423: pay_in_utils.trace('l_dob : ', l_dob);
1416:
1417: pay_in_utils.trace('l_action_context_id : ', l_action_context_id);
1418: pay_in_utils.set_location(g_debug,l_procedure,20);
1419: pay_in_utils.trace('l_employee_number : ', l_employee_number);
1420: pay_in_utils.set_location(g_debug,l_procedure,20);
1421: pay_in_utils.trace('l_assignment_number : ', l_assignment_number);
1422: pay_in_utils.set_location(g_debug,l_procedure,30);
1423: pay_in_utils.trace('l_dob : ', l_dob);
1424: pay_in_utils.set_location(g_debug,l_procedure,40);
1417: pay_in_utils.trace('l_action_context_id : ', l_action_context_id);
1418: pay_in_utils.set_location(g_debug,l_procedure,20);
1419: pay_in_utils.trace('l_employee_number : ', l_employee_number);
1420: pay_in_utils.set_location(g_debug,l_procedure,20);
1421: pay_in_utils.trace('l_assignment_number : ', l_assignment_number);
1422: pay_in_utils.set_location(g_debug,l_procedure,30);
1423: pay_in_utils.trace('l_dob : ', l_dob);
1424: pay_in_utils.set_location(g_debug,l_procedure,40);
1425: pay_in_utils.trace('l_joining_date : ', l_joining_date);
1418: pay_in_utils.set_location(g_debug,l_procedure,20);
1419: pay_in_utils.trace('l_employee_number : ', l_employee_number);
1420: pay_in_utils.set_location(g_debug,l_procedure,20);
1421: pay_in_utils.trace('l_assignment_number : ', l_assignment_number);
1422: pay_in_utils.set_location(g_debug,l_procedure,30);
1423: pay_in_utils.trace('l_dob : ', l_dob);
1424: pay_in_utils.set_location(g_debug,l_procedure,40);
1425: pay_in_utils.trace('l_joining_date : ', l_joining_date);
1426: pay_in_utils.set_location(g_debug,l_procedure,50);
1419: pay_in_utils.trace('l_employee_number : ', l_employee_number);
1420: pay_in_utils.set_location(g_debug,l_procedure,20);
1421: pay_in_utils.trace('l_assignment_number : ', l_assignment_number);
1422: pay_in_utils.set_location(g_debug,l_procedure,30);
1423: pay_in_utils.trace('l_dob : ', l_dob);
1424: pay_in_utils.set_location(g_debug,l_procedure,40);
1425: pay_in_utils.trace('l_joining_date : ', l_joining_date);
1426: pay_in_utils.set_location(g_debug,l_procedure,50);
1427: pay_in_utils.trace('l_ptn : ', l_ptn);
1420: pay_in_utils.set_location(g_debug,l_procedure,20);
1421: pay_in_utils.trace('l_assignment_number : ', l_assignment_number);
1422: pay_in_utils.set_location(g_debug,l_procedure,30);
1423: pay_in_utils.trace('l_dob : ', l_dob);
1424: pay_in_utils.set_location(g_debug,l_procedure,40);
1425: pay_in_utils.trace('l_joining_date : ', l_joining_date);
1426: pay_in_utils.set_location(g_debug,l_procedure,50);
1427: pay_in_utils.trace('l_ptn : ', l_ptn);
1428: pay_in_utils.set_location(g_debug,l_procedure,60);
1421: pay_in_utils.trace('l_assignment_number : ', l_assignment_number);
1422: pay_in_utils.set_location(g_debug,l_procedure,30);
1423: pay_in_utils.trace('l_dob : ', l_dob);
1424: pay_in_utils.set_location(g_debug,l_procedure,40);
1425: pay_in_utils.trace('l_joining_date : ', l_joining_date);
1426: pay_in_utils.set_location(g_debug,l_procedure,50);
1427: pay_in_utils.trace('l_ptn : ', l_ptn);
1428: pay_in_utils.set_location(g_debug,l_procedure,60);
1429: pay_in_utils.trace('l_pf_number : ', l_pf_number);
1422: pay_in_utils.set_location(g_debug,l_procedure,30);
1423: pay_in_utils.trace('l_dob : ', l_dob);
1424: pay_in_utils.set_location(g_debug,l_procedure,40);
1425: pay_in_utils.trace('l_joining_date : ', l_joining_date);
1426: pay_in_utils.set_location(g_debug,l_procedure,50);
1427: pay_in_utils.trace('l_ptn : ', l_ptn);
1428: pay_in_utils.set_location(g_debug,l_procedure,60);
1429: pay_in_utils.trace('l_pf_number : ', l_pf_number);
1430: pay_in_utils.set_location(g_debug,l_procedure,70);
1423: pay_in_utils.trace('l_dob : ', l_dob);
1424: pay_in_utils.set_location(g_debug,l_procedure,40);
1425: pay_in_utils.trace('l_joining_date : ', l_joining_date);
1426: pay_in_utils.set_location(g_debug,l_procedure,50);
1427: pay_in_utils.trace('l_ptn : ', l_ptn);
1428: pay_in_utils.set_location(g_debug,l_procedure,60);
1429: pay_in_utils.trace('l_pf_number : ', l_pf_number);
1430: pay_in_utils.set_location(g_debug,l_procedure,70);
1431: pay_in_utils.trace('l_esi_number : ', l_esi_number);
1424: pay_in_utils.set_location(g_debug,l_procedure,40);
1425: pay_in_utils.trace('l_joining_date : ', l_joining_date);
1426: pay_in_utils.set_location(g_debug,l_procedure,50);
1427: pay_in_utils.trace('l_ptn : ', l_ptn);
1428: pay_in_utils.set_location(g_debug,l_procedure,60);
1429: pay_in_utils.trace('l_pf_number : ', l_pf_number);
1430: pay_in_utils.set_location(g_debug,l_procedure,70);
1431: pay_in_utils.trace('l_esi_number : ', l_esi_number);
1432: pay_in_utils.set_location(g_debug,l_procedure,80);
1425: pay_in_utils.trace('l_joining_date : ', l_joining_date);
1426: pay_in_utils.set_location(g_debug,l_procedure,50);
1427: pay_in_utils.trace('l_ptn : ', l_ptn);
1428: pay_in_utils.set_location(g_debug,l_procedure,60);
1429: pay_in_utils.trace('l_pf_number : ', l_pf_number);
1430: pay_in_utils.set_location(g_debug,l_procedure,70);
1431: pay_in_utils.trace('l_esi_number : ', l_esi_number);
1432: pay_in_utils.set_location(g_debug,l_procedure,80);
1433: pay_in_utils.trace('l_pay_month : ', l_pay_month);
1426: pay_in_utils.set_location(g_debug,l_procedure,50);
1427: pay_in_utils.trace('l_ptn : ', l_ptn);
1428: pay_in_utils.set_location(g_debug,l_procedure,60);
1429: pay_in_utils.trace('l_pf_number : ', l_pf_number);
1430: pay_in_utils.set_location(g_debug,l_procedure,70);
1431: pay_in_utils.trace('l_esi_number : ', l_esi_number);
1432: pay_in_utils.set_location(g_debug,l_procedure,80);
1433: pay_in_utils.trace('l_pay_month : ', l_pay_month);
1434: pay_in_utils.set_location(g_debug,l_procedure,90);
1427: pay_in_utils.trace('l_ptn : ', l_ptn);
1428: pay_in_utils.set_location(g_debug,l_procedure,60);
1429: pay_in_utils.trace('l_pf_number : ', l_pf_number);
1430: pay_in_utils.set_location(g_debug,l_procedure,70);
1431: pay_in_utils.trace('l_esi_number : ', l_esi_number);
1432: pay_in_utils.set_location(g_debug,l_procedure,80);
1433: pay_in_utils.trace('l_pay_month : ', l_pay_month);
1434: pay_in_utils.set_location(g_debug,l_procedure,90);
1435: pay_in_utils.trace('l_job : ', l_job);
1428: pay_in_utils.set_location(g_debug,l_procedure,60);
1429: pay_in_utils.trace('l_pf_number : ', l_pf_number);
1430: pay_in_utils.set_location(g_debug,l_procedure,70);
1431: pay_in_utils.trace('l_esi_number : ', l_esi_number);
1432: pay_in_utils.set_location(g_debug,l_procedure,80);
1433: pay_in_utils.trace('l_pay_month : ', l_pay_month);
1434: pay_in_utils.set_location(g_debug,l_procedure,90);
1435: pay_in_utils.trace('l_job : ', l_job);
1436: pay_in_utils.set_location(g_debug,l_procedure,100);
1429: pay_in_utils.trace('l_pf_number : ', l_pf_number);
1430: pay_in_utils.set_location(g_debug,l_procedure,70);
1431: pay_in_utils.trace('l_esi_number : ', l_esi_number);
1432: pay_in_utils.set_location(g_debug,l_procedure,80);
1433: pay_in_utils.trace('l_pay_month : ', l_pay_month);
1434: pay_in_utils.set_location(g_debug,l_procedure,90);
1435: pay_in_utils.trace('l_job : ', l_job);
1436: pay_in_utils.set_location(g_debug,l_procedure,100);
1437: pay_in_utils.trace('l_position : ', l_position);
1430: pay_in_utils.set_location(g_debug,l_procedure,70);
1431: pay_in_utils.trace('l_esi_number : ', l_esi_number);
1432: pay_in_utils.set_location(g_debug,l_procedure,80);
1433: pay_in_utils.trace('l_pay_month : ', l_pay_month);
1434: pay_in_utils.set_location(g_debug,l_procedure,90);
1435: pay_in_utils.trace('l_job : ', l_job);
1436: pay_in_utils.set_location(g_debug,l_procedure,100);
1437: pay_in_utils.trace('l_position : ', l_position);
1438: pay_in_utils.set_location(g_debug,l_procedure,110);
1431: pay_in_utils.trace('l_esi_number : ', l_esi_number);
1432: pay_in_utils.set_location(g_debug,l_procedure,80);
1433: pay_in_utils.trace('l_pay_month : ', l_pay_month);
1434: pay_in_utils.set_location(g_debug,l_procedure,90);
1435: pay_in_utils.trace('l_job : ', l_job);
1436: pay_in_utils.set_location(g_debug,l_procedure,100);
1437: pay_in_utils.trace('l_position : ', l_position);
1438: pay_in_utils.set_location(g_debug,l_procedure,110);
1439: pay_in_utils.trace('l_grade : ', l_grade);
1432: pay_in_utils.set_location(g_debug,l_procedure,80);
1433: pay_in_utils.trace('l_pay_month : ', l_pay_month);
1434: pay_in_utils.set_location(g_debug,l_procedure,90);
1435: pay_in_utils.trace('l_job : ', l_job);
1436: pay_in_utils.set_location(g_debug,l_procedure,100);
1437: pay_in_utils.trace('l_position : ', l_position);
1438: pay_in_utils.set_location(g_debug,l_procedure,110);
1439: pay_in_utils.trace('l_grade : ', l_grade);
1440: pay_in_utils.set_location(g_debug,l_procedure,120);
1433: pay_in_utils.trace('l_pay_month : ', l_pay_month);
1434: pay_in_utils.set_location(g_debug,l_procedure,90);
1435: pay_in_utils.trace('l_job : ', l_job);
1436: pay_in_utils.set_location(g_debug,l_procedure,100);
1437: pay_in_utils.trace('l_position : ', l_position);
1438: pay_in_utils.set_location(g_debug,l_procedure,110);
1439: pay_in_utils.trace('l_grade : ', l_grade);
1440: pay_in_utils.set_location(g_debug,l_procedure,120);
1441: pay_in_utils.trace('l_emp_cnt : ', l_emp_cnt);
1434: pay_in_utils.set_location(g_debug,l_procedure,90);
1435: pay_in_utils.trace('l_job : ', l_job);
1436: pay_in_utils.set_location(g_debug,l_procedure,100);
1437: pay_in_utils.trace('l_position : ', l_position);
1438: pay_in_utils.set_location(g_debug,l_procedure,110);
1439: pay_in_utils.trace('l_grade : ', l_grade);
1440: pay_in_utils.set_location(g_debug,l_procedure,120);
1441: pay_in_utils.trace('l_emp_cnt : ', l_emp_cnt);
1442: pay_in_utils.set_location(g_debug,l_procedure,130);
1435: pay_in_utils.trace('l_job : ', l_job);
1436: pay_in_utils.set_location(g_debug,l_procedure,100);
1437: pay_in_utils.trace('l_position : ', l_position);
1438: pay_in_utils.set_location(g_debug,l_procedure,110);
1439: pay_in_utils.trace('l_grade : ', l_grade);
1440: pay_in_utils.set_location(g_debug,l_procedure,120);
1441: pay_in_utils.trace('l_emp_cnt : ', l_emp_cnt);
1442: pay_in_utils.set_location(g_debug,l_procedure,130);
1443:
1436: pay_in_utils.set_location(g_debug,l_procedure,100);
1437: pay_in_utils.trace('l_position : ', l_position);
1438: pay_in_utils.set_location(g_debug,l_procedure,110);
1439: pay_in_utils.trace('l_grade : ', l_grade);
1440: pay_in_utils.set_location(g_debug,l_procedure,120);
1441: pay_in_utils.trace('l_emp_cnt : ', l_emp_cnt);
1442: pay_in_utils.set_location(g_debug,l_procedure,130);
1443:
1444: IF ( l_emp_cnt = 0) OR ( l_emp_cnt >=g_chunk_size ) THEN
1437: pay_in_utils.trace('l_position : ', l_position);
1438: pay_in_utils.set_location(g_debug,l_procedure,110);
1439: pay_in_utils.trace('l_grade : ', l_grade);
1440: pay_in_utils.set_location(g_debug,l_procedure,120);
1441: pay_in_utils.trace('l_emp_cnt : ', l_emp_cnt);
1442: pay_in_utils.set_location(g_debug,l_procedure,130);
1443:
1444: IF ( l_emp_cnt = 0) OR ( l_emp_cnt >=g_chunk_size ) THEN
1445: --
1438: pay_in_utils.set_location(g_debug,l_procedure,110);
1439: pay_in_utils.trace('l_grade : ', l_grade);
1440: pay_in_utils.set_location(g_debug,l_procedure,120);
1441: pay_in_utils.trace('l_emp_cnt : ', l_emp_cnt);
1442: pay_in_utils.set_location(g_debug,l_procedure,130);
1443:
1444: IF ( l_emp_cnt = 0) OR ( l_emp_cnt >=g_chunk_size ) THEN
1445: --
1446: pay_in_utils.set_location(g_debug,'Inside If emp_cnt = 0 or emp_cnt > chunk_size',70);
1442: pay_in_utils.set_location(g_debug,l_procedure,130);
1443:
1444: IF ( l_emp_cnt = 0) OR ( l_emp_cnt >=g_chunk_size ) THEN
1445: --
1446: pay_in_utils.set_location(g_debug,'Inside If emp_cnt = 0 or emp_cnt > chunk_size',70);
1447:
1448: -- If not the first employee close the previous clob
1449: -- Put the clob in the global CLOB array
1450: --
1460: -- Increment global clob count
1461: --
1462: g_clob_cnt := g_clob_cnt + 1;
1463:
1464: pay_in_utils.trace('g_clob_cnt : ', g_clob_cnt);
1465: pay_in_utils.set_location(g_debug,l_procedure,140);
1466:
1467: -- Open a new CLOB
1468: --
1461: --
1462: g_clob_cnt := g_clob_cnt + 1;
1463:
1464: pay_in_utils.trace('g_clob_cnt : ', g_clob_cnt);
1465: pay_in_utils.set_location(g_debug,l_procedure,140);
1466:
1467: -- Open a new CLOB
1468: --
1469: pay_in_utils.set_location(g_debug,'Before Create Temporary',150);
1465: pay_in_utils.set_location(g_debug,l_procedure,140);
1466:
1467: -- Open a new CLOB
1468: --
1469: pay_in_utils.set_location(g_debug,'Before Create Temporary',150);
1470: dbms_lob.createtemporary(g_tmp_clob,FALSE,DBMS_LOB.CALL);
1471:
1472: pay_in_utils.set_location(g_debug,'Before Open',160);
1473: dbms_lob.open(g_tmp_clob,dbms_lob.lob_readwrite);
1468: --
1469: pay_in_utils.set_location(g_debug,'Before Create Temporary',150);
1470: dbms_lob.createtemporary(g_tmp_clob,FALSE,DBMS_LOB.CALL);
1471:
1472: pay_in_utils.set_location(g_debug,'Before Open',160);
1473: dbms_lob.open(g_tmp_clob,dbms_lob.lob_readwrite);
1474:
1475: -- Append Open tags to new CLOB
1476: --
1477: dbms_lob.writeAppend(g_tmp_clob,length(l_open_tag),l_open_tag);
1478: --
1479: END IF;
1480:
1481: pay_in_utils.set_location(g_debug,'Before employee tag',170);
1482:
1483: -- Open Employee tag
1484: -- Append Details
1485: --
1522: -- Close employee tag
1523: --
1524: close_tag('Employee');
1525: l_emp_cnt := l_emp_cnt + 1;
1526: pay_in_utils.set_location(g_debug,'After employee tag',180);
1527: --
1528: END LOOP;
1529:
1530: pay_in_utils.set_location(g_debug,'Close cursor',190);
1526: pay_in_utils.set_location(g_debug,'After employee tag',180);
1527: --
1528: END LOOP;
1529:
1530: pay_in_utils.set_location(g_debug,'Close cursor',190);
1531: dbms_sql.close_cursor(l_sql_csr);
1532:
1533: -- Last CLOB is not yet closed
1534: -- So close it.
1533: -- Last CLOB is not yet closed
1534: -- So close it.
1535: IF ( g_clob_cnt <> 0) THEN
1536: --
1537: pay_in_utils.set_location(g_debug,'Closing last clob',200);
1538: close_tag('clob');
1539: dbms_lob.close(g_tmp_clob);
1540: g_clob(g_clob_cnt):=g_tmp_clob;
1541: --
1543: END IF;
1544: p_clob_cnt := g_clob_cnt;
1545:
1546: IF g_debug THEN
1547: pay_in_utils.trace('**************************************************','********************');
1548: pay_in_utils.trace('p_clob_cnt : ',p_clob_cnt);
1549: pay_in_utils.trace('**************************************************','********************');
1550: END IF;
1551:
1544: p_clob_cnt := g_clob_cnt;
1545:
1546: IF g_debug THEN
1547: pay_in_utils.trace('**************************************************','********************');
1548: pay_in_utils.trace('p_clob_cnt : ',p_clob_cnt);
1549: pay_in_utils.trace('**************************************************','********************');
1550: END IF;
1551:
1552: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,220);
1545:
1546: IF g_debug THEN
1547: pay_in_utils.trace('**************************************************','********************');
1548: pay_in_utils.trace('p_clob_cnt : ',p_clob_cnt);
1549: pay_in_utils.trace('**************************************************','********************');
1550: END IF;
1551:
1552: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,220);
1553:
1548: pay_in_utils.trace('p_clob_cnt : ',p_clob_cnt);
1549: pay_in_utils.trace('**************************************************','********************');
1550: END IF;
1551:
1552: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,220);
1553:
1554: EXCEPTION
1555: WHEN others THEN
1556: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
1552: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,220);
1553:
1554: EXCEPTION
1555: WHEN others THEN
1556: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
1557: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,230);
1558: pay_in_utils.trace(l_message,l_procedure);
1559:
1560: IF dbms_sql.is_open(l_sql_csr) THEN
1553:
1554: EXCEPTION
1555: WHEN others THEN
1556: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
1557: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,230);
1558: pay_in_utils.trace(l_message,l_procedure);
1559:
1560: IF dbms_sql.is_open(l_sql_csr) THEN
1561: dbms_sql.close_cursor(l_sql_csr);
1554: EXCEPTION
1555: WHEN others THEN
1556: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
1557: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,230);
1558: pay_in_utils.trace(l_message,l_procedure);
1559:
1560: IF dbms_sql.is_open(l_sql_csr) THEN
1561: dbms_sql.close_cursor(l_sql_csr);
1562: END IF;