70: l_payroll_action_id :=p_payroll_action_id;
71:
72: END IF;
73:
74: hr_utility.set_location('Entered Procedure GETDATA',10);
75:
76: /* Pick up the details belonging to Header */
77:
78: OPEN csr_ltfr_header_rpt( l_payroll_action_id);
78: OPEN csr_ltfr_header_rpt( l_payroll_action_id);
79: FETCH csr_ltfr_header_rpt INTO rg_ltfr_header_rpt;
80: CLOSE csr_ltfr_header_rpt;
81:
82: hr_utility.set_location('Before populating pl/sql table',20);
83:
84: FOR rg_ltfr_body_rpt IN csr_ltfr_body_rpt( l_payroll_action_id)
85: LOOP
86:
166: l_counter := l_counter + 1;
167:
168: END LOOP;
169:
170: hr_utility.set_location('After populating pl/sql table',30);
171:
172:
173: WritetoCLOB (p_xml );
174:
194: l_IANA_charset VARCHAR2 (50);
195:
196: BEGIN
197: l_IANA_charset :=hr_fi_utility.get_IANA_charset ;
198: hr_utility.set_location('Entering WritetoCLOB ',70);
199: l_str1 := '
200: l_str2 := '<';
201: l_str3 := '>';
202: l_str4 := '';
268: END IF;
269:
270: p_xfdf_clob := l_xfdf_string;
271:
272: hr_utility.set_location('Leaving WritetoCLOB ',40);
273:
274: EXCEPTION
275: WHEN OTHERS then
276: HR_UTILITY.TRACE('sqlerrm ' || SQLERRM);
272: hr_utility.set_location('Leaving WritetoCLOB ',40);
273:
274: EXCEPTION
275: WHEN OTHERS then
276: HR_UTILITY.TRACE('sqlerrm ' || SQLERRM);
277: HR_UTILITY.RAISE_ERROR;
278: END WritetoCLOB;
279: -------------------------------------------------------------------------------------------------------------------------
280:
273:
274: EXCEPTION
275: WHEN OTHERS then
276: HR_UTILITY.TRACE('sqlerrm ' || SQLERRM);
277: HR_UTILITY.RAISE_ERROR;
278: END WritetoCLOB;
279: -------------------------------------------------------------------------------------------------------------------------
280:
281: END PAY_FI_LTFR;