333: dbms_lob.writeAppend( l_xfdf_string, length(l_str_pd_l),l_str_pd_l);
334:
335:
336:
337: hr_utility.set_location('Entering CHQR ',10);
338:
339: i := 0;
340:
341: If p_sort = 'ORG' then
462: End If;
463:
464: dbms_lob.writeAppend( l_xfdf_string, length(''),'');
465:
466: hr_utility.set_location('Finished creating xml data for Procedure CHQR ',20);
467:
468: DBMS_LOB.CREATETEMPORARY(l_xfdf_blob,TRUE);
469: clob_to_blob(l_xfdf_string,l_xfdf_blob);
470:
470:
471:
472: /*EXCEPTION
473: WHEN utl_file.invalid_path then
474: hr_utility.set_message(8301, 'GHR_38830_INVALID_UTL_FILE_PATH');
475: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
476: hr_utility.raise_error;
477: --
478: WHEN utl_file.invalid_mode then
471:
472: /*EXCEPTION
473: WHEN utl_file.invalid_path then
474: hr_utility.set_message(8301, 'GHR_38830_INVALID_UTL_FILE_PATH');
475: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
476: hr_utility.raise_error;
477: --
478: WHEN utl_file.invalid_mode then
479: hr_utility.set_message(8301, 'GHR_38831_INVALID_FILE_MODE');
472: /*EXCEPTION
473: WHEN utl_file.invalid_path then
474: hr_utility.set_message(8301, 'GHR_38830_INVALID_UTL_FILE_PATH');
475: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
476: hr_utility.raise_error;
477: --
478: WHEN utl_file.invalid_mode then
479: hr_utility.set_message(8301, 'GHR_38831_INVALID_FILE_MODE');
480: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
475: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
476: hr_utility.raise_error;
477: --
478: WHEN utl_file.invalid_mode then
479: hr_utility.set_message(8301, 'GHR_38831_INVALID_FILE_MODE');
480: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
481: hr_utility.raise_error;
482: --
483: WHEN utl_file.invalid_filehandle then
476: hr_utility.raise_error;
477: --
478: WHEN utl_file.invalid_mode then
479: hr_utility.set_message(8301, 'GHR_38831_INVALID_FILE_MODE');
480: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
481: hr_utility.raise_error;
482: --
483: WHEN utl_file.invalid_filehandle then
484: hr_utility.set_message(8301, 'GHR_38832_INVALID_FILE_HANDLE');
477: --
478: WHEN utl_file.invalid_mode then
479: hr_utility.set_message(8301, 'GHR_38831_INVALID_FILE_MODE');
480: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
481: hr_utility.raise_error;
482: --
483: WHEN utl_file.invalid_filehandle then
484: hr_utility.set_message(8301, 'GHR_38832_INVALID_FILE_HANDLE');
485: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
480: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
481: hr_utility.raise_error;
482: --
483: WHEN utl_file.invalid_filehandle then
484: hr_utility.set_message(8301, 'GHR_38832_INVALID_FILE_HANDLE');
485: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
486: hr_utility.raise_error;
487: --
488: WHEN utl_file.invalid_operation then
481: hr_utility.raise_error;
482: --
483: WHEN utl_file.invalid_filehandle then
484: hr_utility.set_message(8301, 'GHR_38832_INVALID_FILE_HANDLE');
485: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
486: hr_utility.raise_error;
487: --
488: WHEN utl_file.invalid_operation then
489: hr_utility.set_message(8301, 'GHR_38833_INVALID_OPER');
482: --
483: WHEN utl_file.invalid_filehandle then
484: hr_utility.set_message(8301, 'GHR_38832_INVALID_FILE_HANDLE');
485: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
486: hr_utility.raise_error;
487: --
488: WHEN utl_file.invalid_operation then
489: hr_utility.set_message(8301, 'GHR_38833_INVALID_OPER');
490: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
485: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
486: hr_utility.raise_error;
487: --
488: WHEN utl_file.invalid_operation then
489: hr_utility.set_message(8301, 'GHR_38833_INVALID_OPER');
490: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
491: hr_utility.raise_error;
492: --
493: WHEN utl_file.read_error then
486: hr_utility.raise_error;
487: --
488: WHEN utl_file.invalid_operation then
489: hr_utility.set_message(8301, 'GHR_38833_INVALID_OPER');
490: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
491: hr_utility.raise_error;
492: --
493: WHEN utl_file.read_error then
494: hr_utility.set_message(8301, 'GHR_38834_FILE_READ_ERROR');
487: --
488: WHEN utl_file.invalid_operation then
489: hr_utility.set_message(8301, 'GHR_38833_INVALID_OPER');
490: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
491: hr_utility.raise_error;
492: --
493: WHEN utl_file.read_error then
494: hr_utility.set_message(8301, 'GHR_38834_FILE_READ_ERROR');
495: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
490: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
491: hr_utility.raise_error;
492: --
493: WHEN utl_file.read_error then
494: hr_utility.set_message(8301, 'GHR_38834_FILE_READ_ERROR');
495: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
496: hr_utility.raise_error;
497: --
498: WHEN others THEN
491: hr_utility.raise_error;
492: --
493: WHEN utl_file.read_error then
494: hr_utility.set_message(8301, 'GHR_38834_FILE_READ_ERROR');
495: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
496: hr_utility.raise_error;
497: --
498: WHEN others THEN
499: hr_utility.set_message(800,'FFU10_GENERAL_ORACLE_ERROR');
492: --
493: WHEN utl_file.read_error then
494: hr_utility.set_message(8301, 'GHR_38834_FILE_READ_ERROR');
495: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
496: hr_utility.raise_error;
497: --
498: WHEN others THEN
499: hr_utility.set_message(800,'FFU10_GENERAL_ORACLE_ERROR');
500: hr_utility.set_message_token('2',substr(sqlerrm,1,200));
495: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
496: hr_utility.raise_error;
497: --
498: WHEN others THEN
499: hr_utility.set_message(800,'FFU10_GENERAL_ORACLE_ERROR');
500: hr_utility.set_message_token('2',substr(sqlerrm,1,200));
501: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
502: hr_utility.raise_error;*/
503: END CHEQUE_LISTING;
496: hr_utility.raise_error;
497: --
498: WHEN others THEN
499: hr_utility.set_message(800,'FFU10_GENERAL_ORACLE_ERROR');
500: hr_utility.set_message_token('2',substr(sqlerrm,1,200));
501: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
502: hr_utility.raise_error;*/
503: END CHEQUE_LISTING;
504: -------------------------------------------------------------------------------------------
497: --
498: WHEN others THEN
499: hr_utility.set_message(800,'FFU10_GENERAL_ORACLE_ERROR');
500: hr_utility.set_message_token('2',substr(sqlerrm,1,200));
501: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
502: hr_utility.raise_error;*/
503: END CHEQUE_LISTING;
504: -------------------------------------------------------------------------------------------
505:
498: WHEN others THEN
499: hr_utility.set_message(800,'FFU10_GENERAL_ORACLE_ERROR');
500: hr_utility.set_message_token('2',substr(sqlerrm,1,200));
501: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
502: hr_utility.raise_error;*/
503: END CHEQUE_LISTING;
504: -------------------------------------------------------------------------------------------
505:
506: PROCEDURE WritetoCLOB
516: l_str7 varchar2(1000);
517: l_str8 varchar2(240);
518: l_str9 varchar2(240);
519: BEGIN
520: hr_utility.set_location('Entered Procedure Write to clob ',100);
521: l_str1 := '
522:
523:
524: l_str2 := '