289:
290: vXMLTable.DELETE;
291: vCtr := 1;
292:
293: dbms_lob.createtemporary(l_xfdf_string,FALSE,DBMS_LOB.CALL);
294: dbms_lob.open(l_xfdf_string,dbms_lob.lob_readwrite);
295: DBMS_LOB.CREATETEMPORARY(l_xfdf_blob,TRUE);
296: clob_to_blob(l_xfdf_string,l_xfdf_blob);
297: dbms_lob.writeAppend( l_xfdf_string, length('
290: vXMLTable.DELETE;
291: vCtr := 1;
292:
293: dbms_lob.createtemporary(l_xfdf_string,FALSE,DBMS_LOB.CALL);
294: dbms_lob.open(l_xfdf_string,dbms_lob.lob_readwrite);
295: DBMS_LOB.CREATETEMPORARY(l_xfdf_blob,TRUE);
296: clob_to_blob(l_xfdf_string,l_xfdf_blob);
297: dbms_lob.writeAppend( l_xfdf_string, length('
298:
291: vCtr := 1;
292:
293: dbms_lob.createtemporary(l_xfdf_string,FALSE,DBMS_LOB.CALL);
294: dbms_lob.open(l_xfdf_string,dbms_lob.lob_readwrite);
295: DBMS_LOB.CREATETEMPORARY(l_xfdf_blob,TRUE);
296: clob_to_blob(l_xfdf_string,l_xfdf_blob);
297: dbms_lob.writeAppend( l_xfdf_string, length('
298:
299:
293: dbms_lob.createtemporary(l_xfdf_string,FALSE,DBMS_LOB.CALL);
294: dbms_lob.open(l_xfdf_string,dbms_lob.lob_readwrite);
295: DBMS_LOB.CREATETEMPORARY(l_xfdf_blob,TRUE);
296: clob_to_blob(l_xfdf_string,l_xfdf_blob);
297: dbms_lob.writeAppend( l_xfdf_string, length('
299:
300: l_str_rep_label := '
301: dbms_lob.writeAppend( l_xfdf_string, length(l_str_rep_label),l_str_rep_label);
297: dbms_lob.writeAppend( l_xfdf_string, length('
298:
299:
300: l_str_rep_label := '
301: dbms_lob.writeAppend( l_xfdf_string, length(l_str_rep_label),l_str_rep_label);
302:
303: l_str_py_label := '
304: dbms_lob.writeAppend( l_xfdf_string, length(l_str_py_label),l_str_py_label);
305:
300: l_str_rep_label := '
301: dbms_lob.writeAppend( l_xfdf_string, length(l_str_rep_label),l_str_rep_label);
302:
303: l_str_py_label := '
304: dbms_lob.writeAppend( l_xfdf_string, length(l_str_py_label),l_str_py_label);
305:
306: l_str_py_name := '
307: dbms_lob.writeAppend( l_xfdf_string, length(l_str_py_name),l_str_py_name);
308:
303: l_str_py_label := '
304: dbms_lob.writeAppend( l_xfdf_string, length(l_str_py_label),l_str_py_label);
305:
306: l_str_py_name := '
307: dbms_lob.writeAppend( l_xfdf_string, length(l_str_py_name),l_str_py_name);
308:
309: l_str_n := '
310: dbms_lob.writeAppend( l_xfdf_string, length(l_str_n),l_str_n);
311:
306: l_str_py_name := '
307: dbms_lob.writeAppend( l_xfdf_string, length(l_str_py_name),l_str_py_name);
308:
309: l_str_n := '
310: dbms_lob.writeAppend( l_xfdf_string, length(l_str_n),l_str_n);
311:
312: l_str_name_l := '
313: dbms_lob.writeAppend( l_xfdf_string, length(l_str_name_l),l_str_name_l);
314:
309: l_str_n := '
310: dbms_lob.writeAppend( l_xfdf_string, length(l_str_n),l_str_n);
311:
312: l_str_name_l := '
313: dbms_lob.writeAppend( l_xfdf_string, length(l_str_name_l),l_str_name_l);
314:
315: l_str_eno_l := '
316: dbms_lob.writeAppend( l_xfdf_string, length(l_str_eno_l),l_str_eno_l);
317:
312: l_str_name_l := '
313: dbms_lob.writeAppend( l_xfdf_string, length(l_str_name_l),l_str_name_l);
314:
315: l_str_eno_l := '
316: dbms_lob.writeAppend( l_xfdf_string, length(l_str_eno_l),l_str_eno_l);
317:
318: l_str_org_l := '
319: dbms_lob.writeAppend( l_xfdf_string, length(l_str_org_l),l_str_org_l);
320:
315: l_str_eno_l := '
316: dbms_lob.writeAppend( l_xfdf_string, length(l_str_eno_l),l_str_eno_l);
317:
318: l_str_org_l := '
319: dbms_lob.writeAppend( l_xfdf_string, length(l_str_org_l),l_str_org_l);
320:
321: l_str_job_l := '
322: dbms_lob.writeAppend( l_xfdf_string, length(l_str_job_l),l_str_job_l);
323:
318: l_str_org_l := '
319: dbms_lob.writeAppend( l_xfdf_string, length(l_str_org_l),l_str_org_l);
320:
321: l_str_job_l := '
322: dbms_lob.writeAppend( l_xfdf_string, length(l_str_job_l),l_str_job_l);
323:
324: l_str_amt_l := '
325: dbms_lob.writeAppend( l_xfdf_string, length(l_str_amt_l),l_str_amt_l);
326:
321: l_str_job_l := '
322: dbms_lob.writeAppend( l_xfdf_string, length(l_str_job_l),l_str_job_l);
323:
324: l_str_amt_l := '
325: dbms_lob.writeAppend( l_xfdf_string, length(l_str_amt_l),l_str_amt_l);
326:
327: l_str_chq_l := '
328: dbms_lob.writeAppend( l_xfdf_string, length(l_str_chq_l),l_str_chq_l);
329:
324: l_str_amt_l := '
325: dbms_lob.writeAppend( l_xfdf_string, length(l_str_amt_l),l_str_amt_l);
326:
327: l_str_chq_l := '
328: dbms_lob.writeAppend( l_xfdf_string, length(l_str_chq_l),l_str_chq_l);
329:
330: l_str_pd_l := '
331: dbms_lob.writeAppend( l_xfdf_string, length(l_str_pd_l),l_str_pd_l);
332:
327: l_str_chq_l := '
328: dbms_lob.writeAppend( l_xfdf_string, length(l_str_chq_l),l_str_chq_l);
329:
330: l_str_pd_l := '
331: dbms_lob.writeAppend( l_xfdf_string, length(l_str_pd_l),l_str_pd_l);
332:
333:
334:
335: hr_utility.set_location('Entering CHQR ',10);
429: Exit when csr_chq_det%NOTFOUND;
430:
431: l_amount_fm := to_char(l_amount,lg_format_mask);
432:
433: dbms_lob.writeAppend( l_xfdf_string, length('
435: l_str_seq := '
436: l_str_er_name1 := '
437: l_str_er_name2 := '
440: l_str_er_name5 := '
441: l_str_er_name6 := '
442: l_str_er_name7 := '
443:
444: dbms_lob.writeAppend( l_xfdf_string, length(l_str_seq), l_str_seq);
445: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name1), l_str_er_name1);
446: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name2), l_str_er_name2);
447: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name3), l_str_er_name3);
448: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name4), l_str_er_name4);
441: l_str_er_name6 := '
442: l_str_er_name7 := '
443:
444: dbms_lob.writeAppend( l_xfdf_string, length(l_str_seq), l_str_seq);
445: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name1), l_str_er_name1);
446: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name2), l_str_er_name2);
447: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name3), l_str_er_name3);
448: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name4), l_str_er_name4);
449: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name5), l_str_er_name5);
442: l_str_er_name7 := '
443:
444: dbms_lob.writeAppend( l_xfdf_string, length(l_str_seq), l_str_seq);
445: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name1), l_str_er_name1);
446: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name2), l_str_er_name2);
447: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name3), l_str_er_name3);
448: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name4), l_str_er_name4);
449: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name5), l_str_er_name5);
450: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name6), l_str_er_name6);
443:
444: dbms_lob.writeAppend( l_xfdf_string, length(l_str_seq), l_str_seq);
445: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name1), l_str_er_name1);
446: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name2), l_str_er_name2);
447: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name3), l_str_er_name3);
448: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name4), l_str_er_name4);
449: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name5), l_str_er_name5);
450: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name6), l_str_er_name6);
451: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name7), l_str_er_name7);
444: dbms_lob.writeAppend( l_xfdf_string, length(l_str_seq), l_str_seq);
445: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name1), l_str_er_name1);
446: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name2), l_str_er_name2);
447: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name3), l_str_er_name3);
448: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name4), l_str_er_name4);
449: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name5), l_str_er_name5);
450: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name6), l_str_er_name6);
451: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name7), l_str_er_name7);
452:
445: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name1), l_str_er_name1);
446: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name2), l_str_er_name2);
447: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name3), l_str_er_name3);
448: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name4), l_str_er_name4);
449: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name5), l_str_er_name5);
450: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name6), l_str_er_name6);
451: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name7), l_str_er_name7);
452:
453: dbms_lob.writeAppend( l_xfdf_string, length(''),'');
446: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name2), l_str_er_name2);
447: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name3), l_str_er_name3);
448: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name4), l_str_er_name4);
449: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name5), l_str_er_name5);
450: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name6), l_str_er_name6);
451: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name7), l_str_er_name7);
452:
453: dbms_lob.writeAppend( l_xfdf_string, length(''),'');
454: seq := seq + 1;
447: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name3), l_str_er_name3);
448: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name4), l_str_er_name4);
449: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name5), l_str_er_name5);
450: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name6), l_str_er_name6);
451: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name7), l_str_er_name7);
452:
453: dbms_lob.writeAppend( l_xfdf_string, length(''),'');
454: seq := seq + 1;
455: END LOOP;
449: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name5), l_str_er_name5);
450: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name6), l_str_er_name6);
451: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name7), l_str_er_name7);
452:
453: dbms_lob.writeAppend( l_xfdf_string, length(''),'');
454: seq := seq + 1;
455: END LOOP;
456: CLOSE csr_chq_det;
457: j := j + 1;
458:
459: END LOOP;
460: End If;
461:
462: dbms_lob.writeAppend( l_xfdf_string, length(''),'');
463:
464: hr_utility.set_location('Finished creating xml data for Procedure CHQR ',20);
465:
466: DBMS_LOB.CREATETEMPORARY(l_xfdf_blob,TRUE);
462: dbms_lob.writeAppend( l_xfdf_string, length(''),'');
463:
464: hr_utility.set_location('Finished creating xml data for Procedure CHQR ',20);
465:
466: DBMS_LOB.CREATETEMPORARY(l_xfdf_blob,TRUE);
467: clob_to_blob(l_xfdf_string,l_xfdf_blob);
468:
469:
470: /*EXCEPTION
527: l_str7 := '
528:
529:
530:
531: dbms_lob.createtemporary(l_xfdf_string,FALSE,DBMS_LOB.CALL);
532: dbms_lob.open(l_xfdf_string,dbms_lob.lob_readwrite);
533: if vXMLTable.COUNT > 0 then
534: dbms_lob.writeAppend( l_xfdf_string, length(l_str1), l_str1 );
535: FOR ctr_table IN vXMLTable.FIRST .. vXMLTable.LAST LOOP
528:
529:
530:
531: dbms_lob.createtemporary(l_xfdf_string,FALSE,DBMS_LOB.CALL);
532: dbms_lob.open(l_xfdf_string,dbms_lob.lob_readwrite);
533: if vXMLTable.COUNT > 0 then
534: dbms_lob.writeAppend( l_xfdf_string, length(l_str1), l_str1 );
535: FOR ctr_table IN vXMLTable.FIRST .. vXMLTable.LAST LOOP
536: l_str8 := vXMLTable(ctr_table).TagName;
530: ';
531: dbms_lob.createtemporary(l_xfdf_string,FALSE,DBMS_LOB.CALL);
532: dbms_lob.open(l_xfdf_string,dbms_lob.lob_readwrite);
533: if vXMLTable.COUNT > 0 then
534: dbms_lob.writeAppend( l_xfdf_string, length(l_str1), l_str1 );
535: FOR ctr_table IN vXMLTable.FIRST .. vXMLTable.LAST LOOP
536: l_str8 := vXMLTable(ctr_table).TagName;
537: l_str9 := vXMLTable(ctr_table).TagValue;
538: if (l_str9 is not null) then
535: FOR ctr_table IN vXMLTable.FIRST .. vXMLTable.LAST LOOP
536: l_str8 := vXMLTable(ctr_table).TagName;
537: l_str9 := vXMLTable(ctr_table).TagValue;
538: if (l_str9 is not null) then
539: dbms_lob.writeAppend( l_xfdf_string, length(l_str2), l_str2 );
540: dbms_lob.writeAppend( l_xfdf_string, length(l_str8),l_str8);
541: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3 );
542: dbms_lob.writeAppend( l_xfdf_string, length(l_str4), l_str4 );
543: dbms_lob.writeAppend( l_xfdf_string, length(l_str9), l_str9);
536: l_str8 := vXMLTable(ctr_table).TagName;
537: l_str9 := vXMLTable(ctr_table).TagValue;
538: if (l_str9 is not null) then
539: dbms_lob.writeAppend( l_xfdf_string, length(l_str2), l_str2 );
540: dbms_lob.writeAppend( l_xfdf_string, length(l_str8),l_str8);
541: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3 );
542: dbms_lob.writeAppend( l_xfdf_string, length(l_str4), l_str4 );
543: dbms_lob.writeAppend( l_xfdf_string, length(l_str9), l_str9);
544: dbms_lob.writeAppend( l_xfdf_string, length(l_str5), l_str5 );
537: l_str9 := vXMLTable(ctr_table).TagValue;
538: if (l_str9 is not null) then
539: dbms_lob.writeAppend( l_xfdf_string, length(l_str2), l_str2 );
540: dbms_lob.writeAppend( l_xfdf_string, length(l_str8),l_str8);
541: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3 );
542: dbms_lob.writeAppend( l_xfdf_string, length(l_str4), l_str4 );
543: dbms_lob.writeAppend( l_xfdf_string, length(l_str9), l_str9);
544: dbms_lob.writeAppend( l_xfdf_string, length(l_str5), l_str5 );
545: elsif (l_str9 is null and l_str8 is not null) then
538: if (l_str9 is not null) then
539: dbms_lob.writeAppend( l_xfdf_string, length(l_str2), l_str2 );
540: dbms_lob.writeAppend( l_xfdf_string, length(l_str8),l_str8);
541: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3 );
542: dbms_lob.writeAppend( l_xfdf_string, length(l_str4), l_str4 );
543: dbms_lob.writeAppend( l_xfdf_string, length(l_str9), l_str9);
544: dbms_lob.writeAppend( l_xfdf_string, length(l_str5), l_str5 );
545: elsif (l_str9 is null and l_str8 is not null) then
546: dbms_lob.writeAppend(l_xfdf_string,length(l_str2),l_str2);
539: dbms_lob.writeAppend( l_xfdf_string, length(l_str2), l_str2 );
540: dbms_lob.writeAppend( l_xfdf_string, length(l_str8),l_str8);
541: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3 );
542: dbms_lob.writeAppend( l_xfdf_string, length(l_str4), l_str4 );
543: dbms_lob.writeAppend( l_xfdf_string, length(l_str9), l_str9);
544: dbms_lob.writeAppend( l_xfdf_string, length(l_str5), l_str5 );
545: elsif (l_str9 is null and l_str8 is not null) then
546: dbms_lob.writeAppend(l_xfdf_string,length(l_str2),l_str2);
547: dbms_lob.writeAppend(l_xfdf_string,length(l_str8),l_str8);
540: dbms_lob.writeAppend( l_xfdf_string, length(l_str8),l_str8);
541: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3 );
542: dbms_lob.writeAppend( l_xfdf_string, length(l_str4), l_str4 );
543: dbms_lob.writeAppend( l_xfdf_string, length(l_str9), l_str9);
544: dbms_lob.writeAppend( l_xfdf_string, length(l_str5), l_str5 );
545: elsif (l_str9 is null and l_str8 is not null) then
546: dbms_lob.writeAppend(l_xfdf_string,length(l_str2),l_str2);
547: dbms_lob.writeAppend(l_xfdf_string,length(l_str8),l_str8);
548: dbms_lob.writeAppend(l_xfdf_string,length(l_str3),l_str3);
542: dbms_lob.writeAppend( l_xfdf_string, length(l_str4), l_str4 );
543: dbms_lob.writeAppend( l_xfdf_string, length(l_str9), l_str9);
544: dbms_lob.writeAppend( l_xfdf_string, length(l_str5), l_str5 );
545: elsif (l_str9 is null and l_str8 is not null) then
546: dbms_lob.writeAppend(l_xfdf_string,length(l_str2),l_str2);
547: dbms_lob.writeAppend(l_xfdf_string,length(l_str8),l_str8);
548: dbms_lob.writeAppend(l_xfdf_string,length(l_str3),l_str3);
549: dbms_lob.writeAppend(l_xfdf_string,length(l_str4),l_str4);
550: dbms_lob.writeAppend(l_xfdf_string,length(l_str5),l_str5);
543: dbms_lob.writeAppend( l_xfdf_string, length(l_str9), l_str9);
544: dbms_lob.writeAppend( l_xfdf_string, length(l_str5), l_str5 );
545: elsif (l_str9 is null and l_str8 is not null) then
546: dbms_lob.writeAppend(l_xfdf_string,length(l_str2),l_str2);
547: dbms_lob.writeAppend(l_xfdf_string,length(l_str8),l_str8);
548: dbms_lob.writeAppend(l_xfdf_string,length(l_str3),l_str3);
549: dbms_lob.writeAppend(l_xfdf_string,length(l_str4),l_str4);
550: dbms_lob.writeAppend(l_xfdf_string,length(l_str5),l_str5);
551: else
544: dbms_lob.writeAppend( l_xfdf_string, length(l_str5), l_str5 );
545: elsif (l_str9 is null and l_str8 is not null) then
546: dbms_lob.writeAppend(l_xfdf_string,length(l_str2),l_str2);
547: dbms_lob.writeAppend(l_xfdf_string,length(l_str8),l_str8);
548: dbms_lob.writeAppend(l_xfdf_string,length(l_str3),l_str3);
549: dbms_lob.writeAppend(l_xfdf_string,length(l_str4),l_str4);
550: dbms_lob.writeAppend(l_xfdf_string,length(l_str5),l_str5);
551: else
552: null;
545: elsif (l_str9 is null and l_str8 is not null) then
546: dbms_lob.writeAppend(l_xfdf_string,length(l_str2),l_str2);
547: dbms_lob.writeAppend(l_xfdf_string,length(l_str8),l_str8);
548: dbms_lob.writeAppend(l_xfdf_string,length(l_str3),l_str3);
549: dbms_lob.writeAppend(l_xfdf_string,length(l_str4),l_str4);
550: dbms_lob.writeAppend(l_xfdf_string,length(l_str5),l_str5);
551: else
552: null;
553: end if;
546: dbms_lob.writeAppend(l_xfdf_string,length(l_str2),l_str2);
547: dbms_lob.writeAppend(l_xfdf_string,length(l_str8),l_str8);
548: dbms_lob.writeAppend(l_xfdf_string,length(l_str3),l_str3);
549: dbms_lob.writeAppend(l_xfdf_string,length(l_str4),l_str4);
550: dbms_lob.writeAppend(l_xfdf_string,length(l_str5),l_str5);
551: else
552: null;
553: end if;
554: END LOOP;
551: else
552: null;
553: end if;
554: END LOOP;
555: dbms_lob.writeAppend( l_xfdf_string, length(l_str6), l_str6 );
556: else
557: dbms_lob.writeAppend( l_xfdf_string, length(l_str7), l_str7 );
558: end if;
559: DBMS_LOB.CREATETEMPORARY(p_xfdf_blob,TRUE);
553: end if;
554: END LOOP;
555: dbms_lob.writeAppend( l_xfdf_string, length(l_str6), l_str6 );
556: else
557: dbms_lob.writeAppend( l_xfdf_string, length(l_str7), l_str7 );
558: end if;
559: DBMS_LOB.CREATETEMPORARY(p_xfdf_blob,TRUE);
560: clob_to_blob(l_xfdf_string,p_xfdf_blob);
561: hr_utility.set_location('Finished Procedure Write to CLOB ,Before clob to blob ',110);
555: dbms_lob.writeAppend( l_xfdf_string, length(l_str6), l_str6 );
556: else
557: dbms_lob.writeAppend( l_xfdf_string, length(l_str7), l_str7 );
558: end if;
559: DBMS_LOB.CREATETEMPORARY(p_xfdf_blob,TRUE);
560: clob_to_blob(l_xfdf_string,p_xfdf_blob);
561: hr_utility.set_location('Finished Procedure Write to CLOB ,Before clob to blob ',110);
562: --return p_xfdf_blob;
563: EXCEPTION
583: begin
584: l_buffer_len := 20000;
585: hr_utility.set_location('Entered Procedure clob to blob',120);
586: select userenv('LANGUAGE') into g_nls_db_char from dual;
587: l_length_clob := dbms_lob.getlength(p_clob);
588: l_offset := 1;
589: while l_length_clob > 0 loop
590: hr_utility.trace('l_length_clob '|| l_length_clob);
591: if l_length_clob < l_buffer_len then
592: l_chunk_len := l_length_clob;
593: else
594: l_chunk_len := l_buffer_len;
595: end if;
596: DBMS_LOB.READ(p_clob,l_chunk_len,l_offset,l_varchar_buffer);
597: fnd_file.put_line(fnd_file.log,l_varchar_buffer);
598: --l_raw_buffer := utl_raw.cast_to_raw(l_varchar_buffer);
599: l_raw_buffer := utl_raw.convert(utl_raw.cast_to_raw(l_varchar_buffer),'American_America.UTF8',g_nls_db_char);
600: l_raw_buffer_len := utl_raw.length(utl_raw.convert(utl_raw.cast_to_raw(l_varchar_buffer),'American_America.UTF8',g_nls_db_char));
598: --l_raw_buffer := utl_raw.cast_to_raw(l_varchar_buffer);
599: l_raw_buffer := utl_raw.convert(utl_raw.cast_to_raw(l_varchar_buffer),'American_America.UTF8',g_nls_db_char);
600: l_raw_buffer_len := utl_raw.length(utl_raw.convert(utl_raw.cast_to_raw(l_varchar_buffer),'American_America.UTF8',g_nls_db_char));
601: hr_utility.trace('l_varchar_buffer '|| l_varchar_buffer);
602: --dbms_lob.write(p_blob,l_chunk_len, l_offset, l_raw_buffer);
603: dbms_lob.write(p_blob,l_raw_buffer_len, l_blob_offset, l_raw_buffer);
604: l_blob_offset := l_blob_offset + l_raw_buffer_len;
605: l_offset := l_offset + l_chunk_len;
606: l_length_clob := l_length_clob - l_chunk_len;
599: l_raw_buffer := utl_raw.convert(utl_raw.cast_to_raw(l_varchar_buffer),'American_America.UTF8',g_nls_db_char);
600: l_raw_buffer_len := utl_raw.length(utl_raw.convert(utl_raw.cast_to_raw(l_varchar_buffer),'American_America.UTF8',g_nls_db_char));
601: hr_utility.trace('l_varchar_buffer '|| l_varchar_buffer);
602: --dbms_lob.write(p_blob,l_chunk_len, l_offset, l_raw_buffer);
603: dbms_lob.write(p_blob,l_raw_buffer_len, l_blob_offset, l_raw_buffer);
604: l_blob_offset := l_blob_offset + l_raw_buffer_len;
605: l_offset := l_offset + l_chunk_len;
606: l_length_clob := l_length_clob - l_chunk_len;
607: hr_utility.trace('l_length_blob '|| dbms_lob.getlength(p_blob));
603: dbms_lob.write(p_blob,l_raw_buffer_len, l_blob_offset, l_raw_buffer);
604: l_blob_offset := l_blob_offset + l_raw_buffer_len;
605: l_offset := l_offset + l_chunk_len;
606: l_length_clob := l_length_clob - l_chunk_len;
607: hr_utility.trace('l_length_blob '|| dbms_lob.getlength(p_blob));
608: end loop;
609: hr_utility.set_location('Finished Procedure clob to blob ',130);
610: end clob_to_blob;
611: ------------------------------------------------------------------