DBA Data[Home] [Help]

APPS.GHR_EEOC_STATUS_REPORT dependencies on UTL_FILE

Line 541: p_xml_fp UTL_FILE.FILE_TYPE;

537: ,p_gen_file IN VARCHAR2
538: ,p_report_date IN DATE
539: ,p_sub_agency_subelement IN VARCHAR2)
540: IS
541: p_xml_fp UTL_FILE.FILE_TYPE;
542: p_ascii_fp UTL_FILE.FILE_TYPE;
543: l_audit_log_dir varchar2(500);
544: l_xml_file_name varchar2(500);
545: l_ascii_file_name varchar2(500);

Line 542: p_ascii_fp UTL_FILE.FILE_TYPE;

538: ,p_report_date IN DATE
539: ,p_sub_agency_subelement IN VARCHAR2)
540: IS
541: p_xml_fp UTL_FILE.FILE_TYPE;
542: p_ascii_fp UTL_FILE.FILE_TYPE;
543: l_audit_log_dir varchar2(500);
544: l_xml_file_name varchar2(500);
545: l_ascii_file_name varchar2(500);
546: l_output_xml_fname varchar2(500);

Line 565: WHERE NAME = 'utl_file_dir';

561: CURSOR c_get_dir
562: IS
563: SELECT value
564: FROM V$PARAMETER
565: WHERE NAME = 'utl_file_dir';
566:
567: BEGIN
568:
569: -- Assigning the File name.

Line 598: p_xml_fp := utl_file.fopen(l_audit_log_dir,l_xml_file_name,'w',32767);

594: l_output_ascii_fname := l_audit_log_dir || '\' || l_ascii_file_name;
595: END IF;
596:
597: IF p_gen_file = 'XML' THEN
598: p_xml_fp := utl_file.fopen(l_audit_log_dir,l_xml_file_name,'w',32767);
599: utl_file.put_line(p_xml_fp,'');
600: -- Writing from and to dates
601: utl_file.put_line(p_xml_fp,'');
602: -- Loop through cursor and write the values into the XML and ASCII File.

Line 599: utl_file.put_line(p_xml_fp,'');

595: END IF;
596:
597: IF p_gen_file = 'XML' THEN
598: p_xml_fp := utl_file.fopen(l_audit_log_dir,l_xml_file_name,'w',32767);
599: utl_file.put_line(p_xml_fp,'');
600: -- Writing from and to dates
601: utl_file.put_line(p_xml_fp,'');
602: -- Loop through cursor and write the values into the XML and ASCII File.
603: FOR ctr_table IN c_eeoc_status(l_session_id) LOOP

Line 601: utl_file.put_line(p_xml_fp,'');

597: IF p_gen_file = 'XML' THEN
598: p_xml_fp := utl_file.fopen(l_audit_log_dir,l_xml_file_name,'w',32767);
599: utl_file.put_line(p_xml_fp,'');
600: -- Writing from and to dates
601: utl_file.put_line(p_xml_fp,'');
602: -- Loop through cursor and write the values into the XML and ASCII File.
603: FOR ctr_table IN c_eeoc_status(l_session_id) LOOP
604: WriteTagValues(ctr_table,v_tags,p_report_date,p_sub_agency_subelement);
605: utl_file.put_line(p_xml_fp,'');

Line 605: utl_file.put_line(p_xml_fp,'');

601: utl_file.put_line(p_xml_fp,'');
602: -- Loop through cursor and write the values into the XML and ASCII File.
603: FOR ctr_table IN c_eeoc_status(l_session_id) LOOP
604: WriteTagValues(ctr_table,v_tags,p_report_date,p_sub_agency_subelement);
605: utl_file.put_line(p_xml_fp,'');
606: WriteXMLvalues(p_xml_fp,v_tags);
607: utl_file.put_line(p_xml_fp,'');
608: IF l_count = 1 THEN
609: WriteHeaderRow(p_ascii_fp,v_tags,p_gen_file);

Line 607: utl_file.put_line(p_xml_fp,'');

603: FOR ctr_table IN c_eeoc_status(l_session_id) LOOP
604: WriteTagValues(ctr_table,v_tags,p_report_date,p_sub_agency_subelement);
605: utl_file.put_line(p_xml_fp,'');
606: WriteXMLvalues(p_xml_fp,v_tags);
607: utl_file.put_line(p_xml_fp,'
');
608: IF l_count = 1 THEN
609: WriteHeaderRow(p_ascii_fp,v_tags,p_gen_file);
610: END IF;
611: WriteAsciivalues(p_ascii_fp,v_tags,p_gen_file);

Line 614: utl_file.put_line(p_xml_fp,'');

610: END IF;
611: WriteAsciivalues(p_ascii_fp,v_tags,p_gen_file);
612: l_count := l_count + 1;
613: END LOOP;
614: utl_file.put_line(p_xml_fp,'');
615: utl_file.fclose(p_xml_fp);
616: ELSE
617: p_ascii_fp := utl_file.fopen(l_audit_log_dir,l_ascii_file_name,'w',32767);
618: FOR ctr_table IN c_eeoc_status(l_session_id) LOOP

Line 615: utl_file.fclose(p_xml_fp);

611: WriteAsciivalues(p_ascii_fp,v_tags,p_gen_file);
612: l_count := l_count + 1;
613: END LOOP;
614: utl_file.put_line(p_xml_fp,'');
615: utl_file.fclose(p_xml_fp);
616: ELSE
617: p_ascii_fp := utl_file.fopen(l_audit_log_dir,l_ascii_file_name,'w',32767);
618: FOR ctr_table IN c_eeoc_status(l_session_id) LOOP
619: WriteTagValues(ctr_table,v_tags,p_report_date,p_sub_agency_subelement);

Line 617: p_ascii_fp := utl_file.fopen(l_audit_log_dir,l_ascii_file_name,'w',32767);

613: END LOOP;
614: utl_file.put_line(p_xml_fp,'');
615: utl_file.fclose(p_xml_fp);
616: ELSE
617: p_ascii_fp := utl_file.fopen(l_audit_log_dir,l_ascii_file_name,'w',32767);
618: FOR ctr_table IN c_eeoc_status(l_session_id) LOOP
619: WriteTagValues(ctr_table,v_tags,p_report_date,p_sub_agency_subelement);
620: IF l_count = 1 THEN
621: WriteHeaderRow(p_ascii_fp,v_tags,p_gen_file);

Line 819: PROCEDURE WriteXMLvalues(p_l_fp utl_file.file_type,

815:
816: -----------------------------------------------------------------------------
817: -- Writing the records from PL/SQL table p_tags into XML File
818: -----------------------------------------------------------------------------
819: PROCEDURE WriteXMLvalues(p_l_fp utl_file.file_type,
820: p_tags t_tags)
821: IS
822: BEGIN
823: FOR l_tags IN p_tags.FIRST .. p_tags.LAST

Line 825: utl_file.put_line(p_l_fp,'<' || p_tags(l_tags).tagname || '>' || p_tags(l_tags).tagvalue || '');

821: IS
822: BEGIN
823: FOR l_tags IN p_tags.FIRST .. p_tags.LAST
824: LOOP
825: utl_file.put_line(p_l_fp,'<' || p_tags(l_tags).tagname || '>' || p_tags(l_tags).tagvalue || '');
826: END LOOP;
827: END;
828:
829: -----------------------------------------------------------------------------

Line 832: PROCEDURE WriteAsciivalues(p_l_fp utl_file.file_type,

828:
829: -----------------------------------------------------------------------------
830: -- Writing the records from PL/SQL table p_tags into Text and FND Output File
831: -----------------------------------------------------------------------------
832: PROCEDURE WriteAsciivalues(p_l_fp utl_file.file_type,
833: p_tags t_tags,
834: p_gen_file IN VARCHAR2 )
835: IS
836: l_temp VARCHAR2(4000);

Line 845: utl_file.put_line(p_l_fp,l_temp);

841: FOR l_tags IN p_tags.FIRST .. p_tags.LAST LOOP
842: IF l_tags = l_tot THEN
843: l_temp := p_tags(l_tags).tagvalue;
844: IF p_gen_file = 'TEXT' THEN
845: utl_file.put_line(p_l_fp,l_temp);
846: END IF;
847: fnd_file.put_line(fnd_file.output,l_temp);
848: ELSE
849: l_temp := p_tags(l_tags).tagvalue || '|';

Line 851: utl_file.put(p_l_fp,l_temp);

847: fnd_file.put_line(fnd_file.output,l_temp);
848: ELSE
849: l_temp := p_tags(l_tags).tagvalue || '|';
850: IF p_gen_file = 'TEXT' THEN
851: utl_file.put(p_l_fp,l_temp);
852: END IF;
853: fnd_file.put(fnd_file.output,l_temp);
854: END IF;
855: END LOOP;

Line 863: PROCEDURE WriteHeaderRow(p_l_fp UTL_FILE.FILE_TYPE,

859:
860: ----------------------------------------------------------------------------
861: -- Writing the Header into FND Output file
862: -----------------------------------------------------------------------------
863: PROCEDURE WriteHeaderRow(p_l_fp UTL_FILE.FILE_TYPE,
864: p_tags T_TAGS,
865: p_gen_file IN VARCHAR2)
866: IS
867: l_tot NUMBER;

Line 878: utl_file.put(p_l_fp,l_temp);

874: IF NOT(l_tags = l_tot) THEN
875: l_temp := l_temp||'|';
876: END IF;
877: IF p_gen_file = 'TEXT' THEN
878: utl_file.put(p_l_fp,l_temp);
879: END IF;
880:
881: fnd_file.put(fnd_file.output,l_temp);
882: END LOOP;

Line 884: utl_file.new_line(p_l_fp);

880:
881: fnd_file.put(fnd_file.output,l_temp);
882: END LOOP;
883: IF p_gen_file = 'TEXT' THEN
884: utl_file.new_line(p_l_fp);
885: END IF;
886: fnd_file.new_line(fnd_file.output);
887: END;
888: