254: /*Fetching the characterset of the Database*/
255: l_IANA_charset :=HR_NO_UTILITY.get_IANA_charset ;
256:
257: /*Generate an xml string*/
258: dbms_lob.createtemporary(l_xfdf_string,FALSE,DBMS_LOB.CALL);
259: dbms_lob.open(l_xfdf_string,dbms_lob.lob_readwrite);
260:
261: l_str1 := '
262:
255: l_IANA_charset :=HR_NO_UTILITY.get_IANA_charset ;
256:
257: /*Generate an xml string*/
258: dbms_lob.createtemporary(l_xfdf_string,FALSE,DBMS_LOB.CALL);
259: dbms_lob.open(l_xfdf_string,dbms_lob.lob_readwrite);
260:
261: l_str1 := '
262:
261: l_str1 := '
262:
264: skjemanummer="669" etatid="974761076" blankettnummer="RF-1037">';
265: dbms_lob.writeAppend( l_xfdf_string, length(l_str1), l_str1 );
266:
267: l_str1 :='
268:
269:
280:
281:
282:
283: ';
284: dbms_lob.writeAppend( l_xfdf_string, length(l_str1), l_str1 );
285:
286: l_str1 :='
287:
288:
296:
297:
298:
299: ';
300: dbms_lob.writeAppend( l_xfdf_string, length(l_str1), l_str1 );
301:
302:
303: l_str1 :='
304: dbms_lob.writeAppend( l_xfdf_string, length(l_str1), l_str1 );
300: dbms_lob.writeAppend( l_xfdf_string, length(l_str1), l_str1 );
301:
302:
303: l_str1 :='
304: dbms_lob.writeAppend( l_xfdf_string, length(l_str1), l_str1 );
305:
306: /*Loop through records in the body*/
307:
308: FOR rg_rser_body_rpt IN csr_rser_body_rpt( l_payroll_action_id)
332:
333:
334:
335: ';
336: dbms_lob.writeAppend( l_xfdf_string, length(l_str1), l_str1 );
337: END LOOP;
338:
339: l_str1 :='
340:
357:
358:
359:
360: ';
361: dbms_lob.writeAppend( l_xfdf_string, length(l_str1), l_str1 );
362:
363: l_str1 :='';
364: dbms_lob.writeAppend( l_xfdf_string, length(l_str1), l_str1 );
365:
360: ';
361: dbms_lob.writeAppend( l_xfdf_string, length(l_str1), l_str1 );
362:
363: l_str1 :='';
364: dbms_lob.writeAppend( l_xfdf_string, length(l_str1), l_str1 );
365:
366: l_str1 :='
367:
368:
378:
379:
380:
381: ';
382: dbms_lob.writeAppend( l_xfdf_string, length(l_str1), l_str1 );
383:
384: hr_utility.set_location('Inside GETDATA',30);
385:
386: p_xml := l_xfdf_string;