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);
336:
337: i := 0;
338:
339: If p_sort = 'ORG' then
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);
467: clob_to_blob(l_xfdf_string,l_xfdf_blob);
468:
468:
469:
470: /*EXCEPTION
471: WHEN utl_file.invalid_path then
472: hr_utility.set_message(8301, 'GHR_38830_INVALID_UTL_FILE_PATH');
473: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
474: hr_utility.raise_error;
475: --
476: WHEN utl_file.invalid_mode then
469:
470: /*EXCEPTION
471: WHEN utl_file.invalid_path then
472: hr_utility.set_message(8301, 'GHR_38830_INVALID_UTL_FILE_PATH');
473: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
474: hr_utility.raise_error;
475: --
476: WHEN utl_file.invalid_mode then
477: hr_utility.set_message(8301, 'GHR_38831_INVALID_FILE_MODE');
470: /*EXCEPTION
471: WHEN utl_file.invalid_path then
472: hr_utility.set_message(8301, 'GHR_38830_INVALID_UTL_FILE_PATH');
473: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
474: hr_utility.raise_error;
475: --
476: WHEN utl_file.invalid_mode then
477: hr_utility.set_message(8301, 'GHR_38831_INVALID_FILE_MODE');
478: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
473: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
474: hr_utility.raise_error;
475: --
476: WHEN utl_file.invalid_mode then
477: hr_utility.set_message(8301, 'GHR_38831_INVALID_FILE_MODE');
478: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
479: hr_utility.raise_error;
480: --
481: WHEN utl_file.invalid_filehandle then
474: hr_utility.raise_error;
475: --
476: WHEN utl_file.invalid_mode then
477: hr_utility.set_message(8301, 'GHR_38831_INVALID_FILE_MODE');
478: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
479: hr_utility.raise_error;
480: --
481: WHEN utl_file.invalid_filehandle then
482: hr_utility.set_message(8301, 'GHR_38832_INVALID_FILE_HANDLE');
475: --
476: WHEN utl_file.invalid_mode then
477: hr_utility.set_message(8301, 'GHR_38831_INVALID_FILE_MODE');
478: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
479: hr_utility.raise_error;
480: --
481: WHEN utl_file.invalid_filehandle then
482: hr_utility.set_message(8301, 'GHR_38832_INVALID_FILE_HANDLE');
483: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
478: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
479: hr_utility.raise_error;
480: --
481: WHEN utl_file.invalid_filehandle then
482: hr_utility.set_message(8301, 'GHR_38832_INVALID_FILE_HANDLE');
483: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
484: hr_utility.raise_error;
485: --
486: WHEN utl_file.invalid_operation then
479: hr_utility.raise_error;
480: --
481: WHEN utl_file.invalid_filehandle then
482: hr_utility.set_message(8301, 'GHR_38832_INVALID_FILE_HANDLE');
483: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
484: hr_utility.raise_error;
485: --
486: WHEN utl_file.invalid_operation then
487: hr_utility.set_message(8301, 'GHR_38833_INVALID_OPER');
480: --
481: WHEN utl_file.invalid_filehandle then
482: hr_utility.set_message(8301, 'GHR_38832_INVALID_FILE_HANDLE');
483: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
484: hr_utility.raise_error;
485: --
486: WHEN utl_file.invalid_operation then
487: hr_utility.set_message(8301, 'GHR_38833_INVALID_OPER');
488: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
483: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
484: hr_utility.raise_error;
485: --
486: WHEN utl_file.invalid_operation then
487: hr_utility.set_message(8301, 'GHR_38833_INVALID_OPER');
488: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
489: hr_utility.raise_error;
490: --
491: WHEN utl_file.read_error then
484: hr_utility.raise_error;
485: --
486: WHEN utl_file.invalid_operation then
487: hr_utility.set_message(8301, 'GHR_38833_INVALID_OPER');
488: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
489: hr_utility.raise_error;
490: --
491: WHEN utl_file.read_error then
492: hr_utility.set_message(8301, 'GHR_38834_FILE_READ_ERROR');
485: --
486: WHEN utl_file.invalid_operation then
487: hr_utility.set_message(8301, 'GHR_38833_INVALID_OPER');
488: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
489: hr_utility.raise_error;
490: --
491: WHEN utl_file.read_error then
492: hr_utility.set_message(8301, 'GHR_38834_FILE_READ_ERROR');
493: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
488: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
489: hr_utility.raise_error;
490: --
491: WHEN utl_file.read_error then
492: hr_utility.set_message(8301, 'GHR_38834_FILE_READ_ERROR');
493: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
494: hr_utility.raise_error;
495: --
496: WHEN others THEN
489: hr_utility.raise_error;
490: --
491: WHEN utl_file.read_error then
492: hr_utility.set_message(8301, 'GHR_38834_FILE_READ_ERROR');
493: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
494: hr_utility.raise_error;
495: --
496: WHEN others THEN
497: hr_utility.set_message(800,'FFU10_GENERAL_ORACLE_ERROR');
490: --
491: WHEN utl_file.read_error then
492: hr_utility.set_message(8301, 'GHR_38834_FILE_READ_ERROR');
493: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
494: hr_utility.raise_error;
495: --
496: WHEN others THEN
497: hr_utility.set_message(800,'FFU10_GENERAL_ORACLE_ERROR');
498: hr_utility.set_message_token('2',substr(sqlerrm,1,200));
493: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
494: hr_utility.raise_error;
495: --
496: WHEN others THEN
497: hr_utility.set_message(800,'FFU10_GENERAL_ORACLE_ERROR');
498: hr_utility.set_message_token('2',substr(sqlerrm,1,200));
499: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
500: hr_utility.raise_error;*/
501: END CHEQUE_LISTING;
494: hr_utility.raise_error;
495: --
496: WHEN others THEN
497: hr_utility.set_message(800,'FFU10_GENERAL_ORACLE_ERROR');
498: hr_utility.set_message_token('2',substr(sqlerrm,1,200));
499: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
500: hr_utility.raise_error;*/
501: END CHEQUE_LISTING;
502: -------------------------------------------------------------------------------------------
495: --
496: WHEN others THEN
497: hr_utility.set_message(800,'FFU10_GENERAL_ORACLE_ERROR');
498: hr_utility.set_message_token('2',substr(sqlerrm,1,200));
499: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
500: hr_utility.raise_error;*/
501: END CHEQUE_LISTING;
502: -------------------------------------------------------------------------------------------
503:
496: WHEN others THEN
497: hr_utility.set_message(800,'FFU10_GENERAL_ORACLE_ERROR');
498: hr_utility.set_message_token('2',substr(sqlerrm,1,200));
499: fnd_file.put_line(fnd_file.log,HR_UTILITY.get_message);
500: hr_utility.raise_error;*/
501: END CHEQUE_LISTING;
502: -------------------------------------------------------------------------------------------
503:
504: PROCEDURE WritetoCLOB
514: l_str7 varchar2(1000);
515: l_str8 varchar2(240);
516: l_str9 varchar2(240);
517: BEGIN
518: hr_utility.set_location('Entered Procedure Write to clob ',100);
519: l_str1 := '
520:
521:
522: l_str2 := '