320:
321: vXMLTable.DELETE;
322: vCtr := 1;
323:
324: dbms_lob.createtemporary(l_xfdf_string,FALSE,DBMS_LOB.CALL);
325: dbms_lob.open(l_xfdf_string,dbms_lob.lob_readwrite);
326: DBMS_LOB.CREATETEMPORARY(l_xfdf_blob,TRUE);
327: clob_to_blob(l_xfdf_string,l_xfdf_blob);
328: dbms_lob.writeAppend( l_xfdf_string, length('
321: vXMLTable.DELETE;
322: vCtr := 1;
323:
324: dbms_lob.createtemporary(l_xfdf_string,FALSE,DBMS_LOB.CALL);
325: dbms_lob.open(l_xfdf_string,dbms_lob.lob_readwrite);
326: DBMS_LOB.CREATETEMPORARY(l_xfdf_blob,TRUE);
327: clob_to_blob(l_xfdf_string,l_xfdf_blob);
328: dbms_lob.writeAppend( l_xfdf_string, length('
329:
322: vCtr := 1;
323:
324: dbms_lob.createtemporary(l_xfdf_string,FALSE,DBMS_LOB.CALL);
325: dbms_lob.open(l_xfdf_string,dbms_lob.lob_readwrite);
326: DBMS_LOB.CREATETEMPORARY(l_xfdf_blob,TRUE);
327: clob_to_blob(l_xfdf_string,l_xfdf_blob);
328: dbms_lob.writeAppend( l_xfdf_string, length('
329:
330:
324: dbms_lob.createtemporary(l_xfdf_string,FALSE,DBMS_LOB.CALL);
325: dbms_lob.open(l_xfdf_string,dbms_lob.lob_readwrite);
326: DBMS_LOB.CREATETEMPORARY(l_xfdf_blob,TRUE);
327: clob_to_blob(l_xfdf_string,l_xfdf_blob);
328: dbms_lob.writeAppend( l_xfdf_string, length('
330:
331: l_str_rep_label := '
332: dbms_lob.writeAppend( l_xfdf_string, length(l_str_rep_label),l_str_rep_label);
328: dbms_lob.writeAppend( l_xfdf_string, length('
329:
330:
331: l_str_rep_label := '
332: dbms_lob.writeAppend( l_xfdf_string, length(l_str_rep_label),l_str_rep_label);
333:
334: l_str_py_label := '
335: dbms_lob.writeAppend( l_xfdf_string, length(l_str_py_label),l_str_py_label);
336:
331: l_str_rep_label := '
332: dbms_lob.writeAppend( l_xfdf_string, length(l_str_rep_label),l_str_rep_label);
333:
334: l_str_py_label := '
335: dbms_lob.writeAppend( l_xfdf_string, length(l_str_py_label),l_str_py_label);
336:
337: l_str_py_name := '
338: dbms_lob.writeAppend( l_xfdf_string, length(l_str_py_name),l_str_py_name);
339:
334: l_str_py_label := '
335: dbms_lob.writeAppend( l_xfdf_string, length(l_str_py_label),l_str_py_label);
336:
337: l_str_py_name := '
338: dbms_lob.writeAppend( l_xfdf_string, length(l_str_py_name),l_str_py_name);
339:
340: l_str_n := '
341: dbms_lob.writeAppend( l_xfdf_string, length(l_str_n),l_str_n);
342:
337: l_str_py_name := '
338: dbms_lob.writeAppend( l_xfdf_string, length(l_str_py_name),l_str_py_name);
339:
340: l_str_n := '
341: dbms_lob.writeAppend( l_xfdf_string, length(l_str_n),l_str_n);
342:
343: l_str_name_l := '
344: dbms_lob.writeAppend( l_xfdf_string, length(l_str_name_l),l_str_name_l);
345:
340: l_str_n := '
341: dbms_lob.writeAppend( l_xfdf_string, length(l_str_n),l_str_n);
342:
343: l_str_name_l := '
344: dbms_lob.writeAppend( l_xfdf_string, length(l_str_name_l),l_str_name_l);
345:
346: l_str_eno_l := '
347: dbms_lob.writeAppend( l_xfdf_string, length(l_str_eno_l),l_str_eno_l);
348:
343: l_str_name_l := '
344: dbms_lob.writeAppend( l_xfdf_string, length(l_str_name_l),l_str_name_l);
345:
346: l_str_eno_l := '
347: dbms_lob.writeAppend( l_xfdf_string, length(l_str_eno_l),l_str_eno_l);
348:
349: l_str_org_l := '
350: dbms_lob.writeAppend( l_xfdf_string, length(l_str_org_l),l_str_org_l);
351:
346: l_str_eno_l := '
347: dbms_lob.writeAppend( l_xfdf_string, length(l_str_eno_l),l_str_eno_l);
348:
349: l_str_org_l := '
350: dbms_lob.writeAppend( l_xfdf_string, length(l_str_org_l),l_str_org_l);
351:
352: l_str_job_l := '
353: dbms_lob.writeAppend( l_xfdf_string, length(l_str_job_l),l_str_job_l);
354:
349: l_str_org_l := '
350: dbms_lob.writeAppend( l_xfdf_string, length(l_str_org_l),l_str_org_l);
351:
352: l_str_job_l := '
353: dbms_lob.writeAppend( l_xfdf_string, length(l_str_job_l),l_str_job_l);
354:
355: l_str_amt_l := '
356: dbms_lob.writeAppend( l_xfdf_string, length(l_str_amt_l),l_str_amt_l);
357:
352: l_str_job_l := '
353: dbms_lob.writeAppend( l_xfdf_string, length(l_str_job_l),l_str_job_l);
354:
355: l_str_amt_l := '
356: dbms_lob.writeAppend( l_xfdf_string, length(l_str_amt_l),l_str_amt_l);
357:
358: l_str_chq_l := '
359: dbms_lob.writeAppend( l_xfdf_string, length(l_str_chq_l),l_str_chq_l);
360:
355: l_str_amt_l := '
356: dbms_lob.writeAppend( l_xfdf_string, length(l_str_amt_l),l_str_amt_l);
357:
358: l_str_chq_l := '
359: dbms_lob.writeAppend( l_xfdf_string, length(l_str_chq_l),l_str_chq_l);
360:
361: l_str_pd_l := '
362: dbms_lob.writeAppend( l_xfdf_string, length(l_str_pd_l),l_str_pd_l);
363:
358: l_str_chq_l := '
359: dbms_lob.writeAppend( l_xfdf_string, length(l_str_chq_l),l_str_chq_l);
360:
361: l_str_pd_l := '
362: dbms_lob.writeAppend( l_xfdf_string, length(l_str_pd_l),l_str_pd_l);
363:
364:
365:
366: hr_utility.set_location('Entering CHQR ',10);
460: Exit when csr_chq_det%NOTFOUND;
461:
462: l_amount_fm := to_char(l_amount,lg_format_mask);
463:
464: dbms_lob.writeAppend( l_xfdf_string, length('
466: l_str_seq := '
467: l_str_er_name1 := '
468: l_str_er_name2 := '
471: l_str_er_name5 := '
472: l_str_er_name6 := '
473: l_str_er_name7 := '
474:
475: dbms_lob.writeAppend( l_xfdf_string, length(l_str_seq), l_str_seq);
476: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name1), l_str_er_name1);
477: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name2), l_str_er_name2);
478: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name3), l_str_er_name3);
479: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name4), l_str_er_name4);
472: l_str_er_name6 := '
473: l_str_er_name7 := '
474:
475: dbms_lob.writeAppend( l_xfdf_string, length(l_str_seq), l_str_seq);
476: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name1), l_str_er_name1);
477: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name2), l_str_er_name2);
478: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name3), l_str_er_name3);
479: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name4), l_str_er_name4);
480: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name5), l_str_er_name5);
473: l_str_er_name7 := '
474:
475: dbms_lob.writeAppend( l_xfdf_string, length(l_str_seq), l_str_seq);
476: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name1), l_str_er_name1);
477: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name2), l_str_er_name2);
478: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name3), l_str_er_name3);
479: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name4), l_str_er_name4);
480: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name5), l_str_er_name5);
481: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name6), l_str_er_name6);
474:
475: dbms_lob.writeAppend( l_xfdf_string, length(l_str_seq), l_str_seq);
476: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name1), l_str_er_name1);
477: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name2), l_str_er_name2);
478: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name3), l_str_er_name3);
479: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name4), l_str_er_name4);
480: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name5), l_str_er_name5);
481: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name6), l_str_er_name6);
482: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name7), l_str_er_name7);
475: dbms_lob.writeAppend( l_xfdf_string, length(l_str_seq), l_str_seq);
476: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name1), l_str_er_name1);
477: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name2), l_str_er_name2);
478: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name3), l_str_er_name3);
479: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name4), l_str_er_name4);
480: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name5), l_str_er_name5);
481: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name6), l_str_er_name6);
482: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name7), l_str_er_name7);
483:
476: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name1), l_str_er_name1);
477: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name2), l_str_er_name2);
478: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name3), l_str_er_name3);
479: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name4), l_str_er_name4);
480: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name5), l_str_er_name5);
481: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name6), l_str_er_name6);
482: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name7), l_str_er_name7);
483:
484: dbms_lob.writeAppend( l_xfdf_string, length(''),'');
477: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name2), l_str_er_name2);
478: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name3), l_str_er_name3);
479: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name4), l_str_er_name4);
480: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name5), l_str_er_name5);
481: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name6), l_str_er_name6);
482: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name7), l_str_er_name7);
483:
484: dbms_lob.writeAppend( l_xfdf_string, length(''),'');
485: seq := seq + 1;
478: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name3), l_str_er_name3);
479: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name4), l_str_er_name4);
480: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name5), l_str_er_name5);
481: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name6), l_str_er_name6);
482: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name7), l_str_er_name7);
483:
484: dbms_lob.writeAppend( l_xfdf_string, length(''),'');
485: seq := seq + 1;
486: END LOOP;
480: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name5), l_str_er_name5);
481: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name6), l_str_er_name6);
482: dbms_lob.writeAppend( l_xfdf_string, length(l_str_er_name7), l_str_er_name7);
483:
484: dbms_lob.writeAppend( l_xfdf_string, length(''),'');
485: seq := seq + 1;
486: END LOOP;
487: CLOSE csr_chq_det;
488: j := j + 1;
489:
490: END LOOP;
491: End If;
492:
493: dbms_lob.writeAppend( l_xfdf_string, length(''),'');
494:
495: hr_utility.set_location('Finished creating xml data for Procedure CHQR ',20);
496:
497: DBMS_LOB.CREATETEMPORARY(l_xfdf_blob,TRUE);
493: dbms_lob.writeAppend( l_xfdf_string, length(''),'');
494:
495: hr_utility.set_location('Finished creating xml data for Procedure CHQR ',20);
496:
497: DBMS_LOB.CREATETEMPORARY(l_xfdf_blob,TRUE);
498: clob_to_blob(l_xfdf_string,l_xfdf_blob);
499:
500:
501: /*EXCEPTION
558: l_str7 := '
559:
560:
561:
562: dbms_lob.createtemporary(l_xfdf_string,FALSE,DBMS_LOB.CALL);
563: dbms_lob.open(l_xfdf_string,dbms_lob.lob_readwrite);
564: if vXMLTable.COUNT > 0 then
565: dbms_lob.writeAppend( l_xfdf_string, length(l_str1), l_str1 );
566: FOR ctr_table IN vXMLTable.FIRST .. vXMLTable.LAST LOOP
559:
560:
561:
562: dbms_lob.createtemporary(l_xfdf_string,FALSE,DBMS_LOB.CALL);
563: dbms_lob.open(l_xfdf_string,dbms_lob.lob_readwrite);
564: if vXMLTable.COUNT > 0 then
565: dbms_lob.writeAppend( l_xfdf_string, length(l_str1), l_str1 );
566: FOR ctr_table IN vXMLTable.FIRST .. vXMLTable.LAST LOOP
567: l_str8 := vXMLTable(ctr_table).TagName;
561: ';
562: dbms_lob.createtemporary(l_xfdf_string,FALSE,DBMS_LOB.CALL);
563: dbms_lob.open(l_xfdf_string,dbms_lob.lob_readwrite);
564: if vXMLTable.COUNT > 0 then
565: dbms_lob.writeAppend( l_xfdf_string, length(l_str1), l_str1 );
566: FOR ctr_table IN vXMLTable.FIRST .. vXMLTable.LAST LOOP
567: l_str8 := vXMLTable(ctr_table).TagName;
568: l_str9 := vXMLTable(ctr_table).TagValue;
569: if (l_str9 is not null) then
566: FOR ctr_table IN vXMLTable.FIRST .. vXMLTable.LAST LOOP
567: l_str8 := vXMLTable(ctr_table).TagName;
568: l_str9 := vXMLTable(ctr_table).TagValue;
569: if (l_str9 is not null) then
570: dbms_lob.writeAppend( l_xfdf_string, length(l_str2), l_str2 );
571: dbms_lob.writeAppend( l_xfdf_string, length(l_str8),l_str8);
572: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3 );
573: dbms_lob.writeAppend( l_xfdf_string, length(l_str4), l_str4 );
574: dbms_lob.writeAppend( l_xfdf_string, length(l_str9), l_str9);
567: l_str8 := vXMLTable(ctr_table).TagName;
568: l_str9 := vXMLTable(ctr_table).TagValue;
569: if (l_str9 is not null) then
570: dbms_lob.writeAppend( l_xfdf_string, length(l_str2), l_str2 );
571: dbms_lob.writeAppend( l_xfdf_string, length(l_str8),l_str8);
572: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3 );
573: dbms_lob.writeAppend( l_xfdf_string, length(l_str4), l_str4 );
574: dbms_lob.writeAppend( l_xfdf_string, length(l_str9), l_str9);
575: dbms_lob.writeAppend( l_xfdf_string, length(l_str5), l_str5 );
568: l_str9 := vXMLTable(ctr_table).TagValue;
569: if (l_str9 is not null) then
570: dbms_lob.writeAppend( l_xfdf_string, length(l_str2), l_str2 );
571: dbms_lob.writeAppend( l_xfdf_string, length(l_str8),l_str8);
572: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3 );
573: dbms_lob.writeAppend( l_xfdf_string, length(l_str4), l_str4 );
574: dbms_lob.writeAppend( l_xfdf_string, length(l_str9), l_str9);
575: dbms_lob.writeAppend( l_xfdf_string, length(l_str5), l_str5 );
576: elsif (l_str9 is null and l_str8 is not null) then
569: if (l_str9 is not null) then
570: dbms_lob.writeAppend( l_xfdf_string, length(l_str2), l_str2 );
571: dbms_lob.writeAppend( l_xfdf_string, length(l_str8),l_str8);
572: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3 );
573: dbms_lob.writeAppend( l_xfdf_string, length(l_str4), l_str4 );
574: dbms_lob.writeAppend( l_xfdf_string, length(l_str9), l_str9);
575: dbms_lob.writeAppend( l_xfdf_string, length(l_str5), l_str5 );
576: elsif (l_str9 is null and l_str8 is not null) then
577: dbms_lob.writeAppend(l_xfdf_string,length(l_str2),l_str2);
570: dbms_lob.writeAppend( l_xfdf_string, length(l_str2), l_str2 );
571: dbms_lob.writeAppend( l_xfdf_string, length(l_str8),l_str8);
572: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3 );
573: dbms_lob.writeAppend( l_xfdf_string, length(l_str4), l_str4 );
574: dbms_lob.writeAppend( l_xfdf_string, length(l_str9), l_str9);
575: dbms_lob.writeAppend( l_xfdf_string, length(l_str5), l_str5 );
576: elsif (l_str9 is null and l_str8 is not null) then
577: dbms_lob.writeAppend(l_xfdf_string,length(l_str2),l_str2);
578: dbms_lob.writeAppend(l_xfdf_string,length(l_str8),l_str8);
571: dbms_lob.writeAppend( l_xfdf_string, length(l_str8),l_str8);
572: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3 );
573: dbms_lob.writeAppend( l_xfdf_string, length(l_str4), l_str4 );
574: dbms_lob.writeAppend( l_xfdf_string, length(l_str9), l_str9);
575: dbms_lob.writeAppend( l_xfdf_string, length(l_str5), l_str5 );
576: elsif (l_str9 is null and l_str8 is not null) then
577: dbms_lob.writeAppend(l_xfdf_string,length(l_str2),l_str2);
578: dbms_lob.writeAppend(l_xfdf_string,length(l_str8),l_str8);
579: dbms_lob.writeAppend(l_xfdf_string,length(l_str3),l_str3);
573: dbms_lob.writeAppend( l_xfdf_string, length(l_str4), l_str4 );
574: dbms_lob.writeAppend( l_xfdf_string, length(l_str9), l_str9);
575: dbms_lob.writeAppend( l_xfdf_string, length(l_str5), l_str5 );
576: elsif (l_str9 is null and l_str8 is not null) then
577: dbms_lob.writeAppend(l_xfdf_string,length(l_str2),l_str2);
578: dbms_lob.writeAppend(l_xfdf_string,length(l_str8),l_str8);
579: dbms_lob.writeAppend(l_xfdf_string,length(l_str3),l_str3);
580: dbms_lob.writeAppend(l_xfdf_string,length(l_str4),l_str4);
581: dbms_lob.writeAppend(l_xfdf_string,length(l_str5),l_str5);
574: dbms_lob.writeAppend( l_xfdf_string, length(l_str9), l_str9);
575: dbms_lob.writeAppend( l_xfdf_string, length(l_str5), l_str5 );
576: elsif (l_str9 is null and l_str8 is not null) then
577: dbms_lob.writeAppend(l_xfdf_string,length(l_str2),l_str2);
578: dbms_lob.writeAppend(l_xfdf_string,length(l_str8),l_str8);
579: dbms_lob.writeAppend(l_xfdf_string,length(l_str3),l_str3);
580: dbms_lob.writeAppend(l_xfdf_string,length(l_str4),l_str4);
581: dbms_lob.writeAppend(l_xfdf_string,length(l_str5),l_str5);
582: else
575: dbms_lob.writeAppend( l_xfdf_string, length(l_str5), l_str5 );
576: elsif (l_str9 is null and l_str8 is not null) then
577: dbms_lob.writeAppend(l_xfdf_string,length(l_str2),l_str2);
578: dbms_lob.writeAppend(l_xfdf_string,length(l_str8),l_str8);
579: dbms_lob.writeAppend(l_xfdf_string,length(l_str3),l_str3);
580: dbms_lob.writeAppend(l_xfdf_string,length(l_str4),l_str4);
581: dbms_lob.writeAppend(l_xfdf_string,length(l_str5),l_str5);
582: else
583: null;
576: elsif (l_str9 is null and l_str8 is not null) then
577: dbms_lob.writeAppend(l_xfdf_string,length(l_str2),l_str2);
578: dbms_lob.writeAppend(l_xfdf_string,length(l_str8),l_str8);
579: dbms_lob.writeAppend(l_xfdf_string,length(l_str3),l_str3);
580: dbms_lob.writeAppend(l_xfdf_string,length(l_str4),l_str4);
581: dbms_lob.writeAppend(l_xfdf_string,length(l_str5),l_str5);
582: else
583: null;
584: end if;
577: dbms_lob.writeAppend(l_xfdf_string,length(l_str2),l_str2);
578: dbms_lob.writeAppend(l_xfdf_string,length(l_str8),l_str8);
579: dbms_lob.writeAppend(l_xfdf_string,length(l_str3),l_str3);
580: dbms_lob.writeAppend(l_xfdf_string,length(l_str4),l_str4);
581: dbms_lob.writeAppend(l_xfdf_string,length(l_str5),l_str5);
582: else
583: null;
584: end if;
585: END LOOP;
582: else
583: null;
584: end if;
585: END LOOP;
586: dbms_lob.writeAppend( l_xfdf_string, length(l_str6), l_str6 );
587: else
588: dbms_lob.writeAppend( l_xfdf_string, length(l_str7), l_str7 );
589: end if;
590: DBMS_LOB.CREATETEMPORARY(p_xfdf_blob,TRUE);
584: end if;
585: END LOOP;
586: dbms_lob.writeAppend( l_xfdf_string, length(l_str6), l_str6 );
587: else
588: dbms_lob.writeAppend( l_xfdf_string, length(l_str7), l_str7 );
589: end if;
590: DBMS_LOB.CREATETEMPORARY(p_xfdf_blob,TRUE);
591: clob_to_blob(l_xfdf_string,p_xfdf_blob);
592: hr_utility.set_location('Finished Procedure Write to CLOB ,Before clob to blob ',110);
586: dbms_lob.writeAppend( l_xfdf_string, length(l_str6), l_str6 );
587: else
588: dbms_lob.writeAppend( l_xfdf_string, length(l_str7), l_str7 );
589: end if;
590: DBMS_LOB.CREATETEMPORARY(p_xfdf_blob,TRUE);
591: clob_to_blob(l_xfdf_string,p_xfdf_blob);
592: hr_utility.set_location('Finished Procedure Write to CLOB ,Before clob to blob ',110);
593: --return p_xfdf_blob;
594: EXCEPTION
614: begin
615: l_buffer_len := 20000;
616: hr_utility.set_location('Entered Procedure clob to blob',120);
617: select userenv('LANGUAGE') into g_nls_db_char from dual;
618: l_length_clob := dbms_lob.getlength(p_clob);
619: l_offset := 1;
620: while l_length_clob > 0 loop
621: hr_utility.trace('l_length_clob '|| l_length_clob);
622: if l_length_clob < l_buffer_len then
623: l_chunk_len := l_length_clob;
624: else
625: l_chunk_len := l_buffer_len;
626: end if;
627: DBMS_LOB.READ(p_clob,l_chunk_len,l_offset,l_varchar_buffer);
628: fnd_file.put_line(fnd_file.log,l_varchar_buffer);
629: --l_raw_buffer := utl_raw.cast_to_raw(l_varchar_buffer);
630: l_raw_buffer := utl_raw.convert(utl_raw.cast_to_raw(l_varchar_buffer),'American_America.UTF8',g_nls_db_char);
631: 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));
629: --l_raw_buffer := utl_raw.cast_to_raw(l_varchar_buffer);
630: l_raw_buffer := utl_raw.convert(utl_raw.cast_to_raw(l_varchar_buffer),'American_America.UTF8',g_nls_db_char);
631: 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));
632: hr_utility.trace('l_varchar_buffer '|| l_varchar_buffer);
633: --dbms_lob.write(p_blob,l_chunk_len, l_offset, l_raw_buffer);
634: dbms_lob.write(p_blob,l_raw_buffer_len, l_blob_offset, l_raw_buffer);
635: l_blob_offset := l_blob_offset + l_raw_buffer_len;
636: l_offset := l_offset + l_chunk_len;
637: l_length_clob := l_length_clob - l_chunk_len;
630: l_raw_buffer := utl_raw.convert(utl_raw.cast_to_raw(l_varchar_buffer),'American_America.UTF8',g_nls_db_char);
631: 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));
632: hr_utility.trace('l_varchar_buffer '|| l_varchar_buffer);
633: --dbms_lob.write(p_blob,l_chunk_len, l_offset, l_raw_buffer);
634: dbms_lob.write(p_blob,l_raw_buffer_len, l_blob_offset, l_raw_buffer);
635: l_blob_offset := l_blob_offset + l_raw_buffer_len;
636: l_offset := l_offset + l_chunk_len;
637: l_length_clob := l_length_clob - l_chunk_len;
638: hr_utility.trace('l_length_blob '|| dbms_lob.getlength(p_blob));
634: dbms_lob.write(p_blob,l_raw_buffer_len, l_blob_offset, l_raw_buffer);
635: l_blob_offset := l_blob_offset + l_raw_buffer_len;
636: l_offset := l_offset + l_chunk_len;
637: l_length_clob := l_length_clob - l_chunk_len;
638: hr_utility.trace('l_length_blob '|| dbms_lob.getlength(p_blob));
639: end loop;
640: hr_utility.set_location('Finished Procedure clob to blob ',130);
641: end clob_to_blob;
642: ------------------------------------------------------------------