DBA Data[Home] [Help]

APPS.PAY_NL_XDO_REPORT dependencies on UTL_FILE

Line 404: p_l_fp UTL_FILE.FILE_TYPE;

400: PROCEDURE WritetoXML (
401: p_request_id in number,
402: p_output_fname out nocopy varchar2)
403: IS
404: p_l_fp UTL_FILE.FILE_TYPE;
405: l_audit_log_dir varchar2(500) := '/sqlcom/outbound';
406: l_file_name varchar2(50);
407: l_check_flag number;
408: BEGIN

Line 423: WHERE LOWER(name) = 'utl_file_dir';

419:
420: SELECT value
421: INTO l_audit_log_dir
422: FROM v$parameter
423: WHERE LOWER(name) = 'utl_file_dir';
424: -- Check whether more than one util file directory is found
425: IF INSTR(l_audit_log_dir,',') > 0 THEN
426: l_audit_log_dir := substr(l_audit_log_dir,1,instr(l_audit_log_dir,',')-1);
427: END IF;

Line 440: p_l_fp := utl_file.fopen(l_audit_log_dir,l_file_name,'A');

436: ELSE
437: p_output_fname := l_audit_log_dir || '\' || l_file_name;
438: END IF;
439: -- getting Agency name
440: p_l_fp := utl_file.fopen(l_audit_log_dir,l_file_name,'A');
441: utl_file.put_line(p_l_fp,'');
442: utl_file.put_line(p_l_fp,'');
443: -- Writing from and to dates
444: utl_file.put_line(p_l_fp,'');

Line 441: utl_file.put_line(p_l_fp,'');

437: p_output_fname := l_audit_log_dir || '\' || l_file_name;
438: END IF;
439: -- getting Agency name
440: p_l_fp := utl_file.fopen(l_audit_log_dir,l_file_name,'A');
441: utl_file.put_line(p_l_fp,'');
442: utl_file.put_line(p_l_fp,'');
443: -- Writing from and to dates
444: utl_file.put_line(p_l_fp,'');
445: -- Write the header fields to XML File.

Line 442: utl_file.put_line(p_l_fp,'');

438: END IF;
439: -- getting Agency name
440: p_l_fp := utl_file.fopen(l_audit_log_dir,l_file_name,'A');
441: utl_file.put_line(p_l_fp,'');
442: utl_file.put_line(p_l_fp,'');
443: -- Writing from and to dates
444: utl_file.put_line(p_l_fp,'');
445: -- Write the header fields to XML File.
446: --WriteXMLvalues(p_l_fp,'P0_from_date',to_char(p_from_date,'dd') || ' ' || trim(to_char(p_from_date,'Month')) || ' ' || to_char(p_from_date,'yyyy') );

Line 444: utl_file.put_line(p_l_fp,'');

440: p_l_fp := utl_file.fopen(l_audit_log_dir,l_file_name,'A');
441: utl_file.put_line(p_l_fp,'');
442: utl_file.put_line(p_l_fp,'');
443: -- Writing from and to dates
444: utl_file.put_line(p_l_fp,'');
445: -- Write the header fields to XML File.
446: --WriteXMLvalues(p_l_fp,'P0_from_date',to_char(p_from_date,'dd') || ' ' || trim(to_char(p_from_date,'Month')) || ' ' || to_char(p_from_date,'yyyy') );
447: --WriteXMLvalues(p_l_fp,'P0_to_date',to_char(p_to_date,'dd') || ' ' ||to_char(p_to_date,'Month') || ' ' || to_char(p_to_date,'yyyy') );
448: -- Loop through PL/SQL Table and write the values into the XML File.

Line 459: utl_file.put_line(p_l_fp,'');

455: WriteXMLvalues(p_l_fp,vXMLTable(ctr_table).TagName,vXMLTable(ctr_table).TagValue);
456: END LOOP;
457: END IF;
458: -- Write the end tag and close the XML File.
459: utl_file.put_line(p_l_fp,'');
460: utl_file.put_line(p_l_fp,'');
461: utl_file.fclose(p_l_fp);
462: /*Msg in the temorary table*/
463: --insert into tstmsg values('Leaving the procedure WritetoXML.');

Line 460: utl_file.put_line(p_l_fp,'');

456: END LOOP;
457: END IF;
458: -- Write the end tag and close the XML File.
459: utl_file.put_line(p_l_fp,'');
460: utl_file.put_line(p_l_fp,'');
461: utl_file.fclose(p_l_fp);
462: /*Msg in the temorary table*/
463: --insert into tstmsg values('Leaving the procedure WritetoXML.');
464: END WritetoXML;

Line 461: utl_file.fclose(p_l_fp);

457: END IF;
458: -- Write the end tag and close the XML File.
459: utl_file.put_line(p_l_fp,'');
460: utl_file.put_line(p_l_fp,'');
461: utl_file.fclose(p_l_fp);
462: /*Msg in the temorary table*/
463: --insert into tstmsg values('Leaving the procedure WritetoXML.');
464: END WritetoXML;
465:

Line 474: PROCEDURE WriteXMLvalues( p_l_fp utl_file.file_type,p_tagname IN VARCHAR2, p_value IN VARCHAR2) IS

470: |Description : Procedure to write the xml values. Used for debugging |
471: ------------------------------------------------------------------------------*/
472:
473:
474: PROCEDURE WriteXMLvalues( p_l_fp utl_file.file_type,p_tagname IN VARCHAR2, p_value IN VARCHAR2) IS
475: BEGIN
476: -- Writing XML Tag and values to XML File
477: -- utl_file.put_line(p_l_fp,'<' || p_tagname || '>' || p_value || '' );
478: -- New Format XFDF

Line 477: -- utl_file.put_line(p_l_fp,'<' || p_tagname || '>' || p_value || '' );

473:
474: PROCEDURE WriteXMLvalues( p_l_fp utl_file.file_type,p_tagname IN VARCHAR2, p_value IN VARCHAR2) IS
475: BEGIN
476: -- Writing XML Tag and values to XML File
477: -- utl_file.put_line(p_l_fp,'<' || p_tagname || '>' || p_value || '' );
478: -- New Format XFDF
479: utl_file.put_line(p_l_fp,'');
480: utl_file.put_line(p_l_fp,'' || p_value || '' );
481: utl_file.put_line(p_l_fp,'
');

Line 479: utl_file.put_line(p_l_fp,'');

475: BEGIN
476: -- Writing XML Tag and values to XML File
477: -- utl_file.put_line(p_l_fp,'<' || p_tagname || '>' || p_value || '' );
478: -- New Format XFDF
479: utl_file.put_line(p_l_fp,'');
480: utl_file.put_line(p_l_fp,'' || p_value || '' );
481: utl_file.put_line(p_l_fp,'');
482: END WriteXMLvalues;
483:

Line 480: utl_file.put_line(p_l_fp,'' || p_value || '' );

476: -- Writing XML Tag and values to XML File
477: -- utl_file.put_line(p_l_fp,'<' || p_tagname || '>' || p_value || '' );
478: -- New Format XFDF
479: utl_file.put_line(p_l_fp,'');
480: utl_file.put_line(p_l_fp,'' || p_value || '' );
481: utl_file.put_line(p_l_fp,'
');
482: END WriteXMLvalues;
483:
484: /*-------------------------------------------------------------------------------

Line 481: utl_file.put_line(p_l_fp,'');

477: -- utl_file.put_line(p_l_fp,'<' || p_tagname || '>' || p_value || '' );
478: -- New Format XFDF
479: utl_file.put_line(p_l_fp,'');
480: utl_file.put_line(p_l_fp,'' || p_value || '' );
481: utl_file.put_line(p_l_fp,'
');
482: END WriteXMLvalues;
483:
484: /*-------------------------------------------------------------------------------
485: |Name : WritetoXML_rtf |

Line 497: p_l_fp UTL_FILE.FILE_TYPE;

493: PROCEDURE WritetoXML_rtf (
494: p_request_id in number,
495: p_output_fname out nocopy varchar2)
496: IS
497: p_l_fp UTL_FILE.FILE_TYPE;
498: l_audit_log_dir varchar2(500) := '/sqlcom/outbound';
499: l_file_name varchar2(50);
500: l_check_flag number;
501: l_concat_str VARCHAR2(32000);

Line 517: WHERE LOWER(name) = 'utl_file_dir';

513:
514: SELECT value
515: INTO l_audit_log_dir
516: FROM v$parameter
517: WHERE LOWER(name) = 'utl_file_dir';
518: -- Check whether more than one util file directory is found
519: IF INSTR(l_audit_log_dir,',') > 0 THEN
520: l_audit_log_dir := substr(l_audit_log_dir,1,instr(l_audit_log_dir,',')-1);
521: END IF;

Line 534: p_l_fp := utl_file.fopen(l_audit_log_dir,l_file_name,'A',32000);

530: ELSE
531: p_output_fname := l_audit_log_dir || '\' || l_file_name;
532: END IF;
533: -- getting Agency name
534: p_l_fp := utl_file.fopen(l_audit_log_dir,l_file_name,'A',32000);
535: -- Writing from and to dates
536: l_concat_str := '';
537: l_concat_str := l_concat_str||'';
538: --utl_file.put_line(p_l_fp,'');

Line 538: --utl_file.put_line(p_l_fp,'');

534: p_l_fp := utl_file.fopen(l_audit_log_dir,l_file_name,'A',32000);
535: -- Writing from and to dates
536: l_concat_str := '';
537: l_concat_str := l_concat_str||'';
538: --utl_file.put_line(p_l_fp,'');
539: -- Write the header fields to XML File.
540: --WriteXMLvalues(p_l_fp,'P0_from_date',to_char(p_from_date,'dd') || ' ' || trim(to_char(p_from_date,'Month')) || ' ' || to_char(p_from_date,'yyyy') );
541: --WriteXMLvalues(p_l_fp,'P0_to_date',to_char(p_to_date,'dd') || ' ' ||to_char(p_to_date,'Month') || ' ' || to_char(p_to_date,'yyyy') );
542: -- Loop through PL/SQL Table and write the values into the XML File.

Line 550: utl_file.put_line(p_l_fp,l_concat_str);

546: FOR ctr_table IN vXMLTable.FIRST .. vXMLTable.LAST LOOP
547:
548: IF length(l_concat_str) > 28000 THEN
549:
550: utl_file.put_line(p_l_fp,l_concat_str);
551: l_concat_str := '';
552:
553: END IF;
554:

Line 574: utl_file.put_line(p_l_fp,l_concat_str);

570: --WriteXMLvalues_rtf(p_l_fp,vXMLTable(ctr_table).TagName,vXMLTable(ctr_table).TagValue);
571: END LOOP;
572: END IF;
573: IF length(l_concat_str) > 0 THEN
574: utl_file.put_line(p_l_fp,l_concat_str);
575: END IF;
576: -- Write the end tag and close the XML File.
577: utl_file.put_line(p_l_fp,'');
578: utl_file.fclose(p_l_fp);

Line 577: utl_file.put_line(p_l_fp,'');

573: IF length(l_concat_str) > 0 THEN
574: utl_file.put_line(p_l_fp,l_concat_str);
575: END IF;
576: -- Write the end tag and close the XML File.
577: utl_file.put_line(p_l_fp,'');
578: utl_file.fclose(p_l_fp);
579: /*Msg in the temorary table*/
580: --insert into tstmsg values('Leaving the procedure WritetoXML.');
581: END WritetoXML_rtf;

Line 578: utl_file.fclose(p_l_fp);

574: utl_file.put_line(p_l_fp,l_concat_str);
575: END IF;
576: -- Write the end tag and close the XML File.
577: utl_file.put_line(p_l_fp,'');
578: utl_file.fclose(p_l_fp);
579: /*Msg in the temorary table*/
580: --insert into tstmsg values('Leaving the procedure WritetoXML.');
581: END WritetoXML_rtf;
582:

Line 584: PROCEDURE WriteXMLvalues_rtf( p_l_fp utl_file.file_type,p_tagname IN VARCHAR2, p_value IN VARCHAR2) IS

580: --insert into tstmsg values('Leaving the procedure WritetoXML.');
581: END WritetoXML_rtf;
582:
583: /*Function to support building of xml file compatible with RTF processor */
584: PROCEDURE WriteXMLvalues_rtf( p_l_fp utl_file.file_type,p_tagname IN VARCHAR2, p_value IN VARCHAR2) IS
585: BEGIN
586: -- Writing XML Tag and values to XML File
587: -- utl_file.put_line(p_l_fp,'<' || p_tagname || '>' || p_value || '' );
588: -- New Format XFDF

Line 587: -- utl_file.put_line(p_l_fp,'<' || p_tagname || '>' || p_value || '' );

583: /*Function to support building of xml file compatible with RTF processor */
584: PROCEDURE WriteXMLvalues_rtf( p_l_fp utl_file.file_type,p_tagname IN VARCHAR2, p_value IN VARCHAR2) IS
585: BEGIN
586: -- Writing XML Tag and values to XML File
587: -- utl_file.put_line(p_l_fp,'<' || p_tagname || '>' || p_value || '' );
588: -- New Format XFDF
589: utl_file.put_line(p_l_fp,'<' || p_tagname || '>');
590: utl_file.put_line(p_l_fp,'' || p_value || '' );
591: utl_file.put_line(p_l_fp,'');

Line 589: utl_file.put_line(p_l_fp,'<' || p_tagname || '>');

585: BEGIN
586: -- Writing XML Tag and values to XML File
587: -- utl_file.put_line(p_l_fp,'<' || p_tagname || '>' || p_value || '' );
588: -- New Format XFDF
589: utl_file.put_line(p_l_fp,'<' || p_tagname || '>');
590: utl_file.put_line(p_l_fp,'' || p_value || '' );
591: utl_file.put_line(p_l_fp,'');
592: END WriteXMLvalues_rtf;
593:

Line 590: utl_file.put_line(p_l_fp,'' || p_value || '' );

586: -- Writing XML Tag and values to XML File
587: -- utl_file.put_line(p_l_fp,'<' || p_tagname || '>' || p_value || '' );
588: -- New Format XFDF
589: utl_file.put_line(p_l_fp,'<' || p_tagname || '>');
590: utl_file.put_line(p_l_fp,'' || p_value || '' );
591: utl_file.put_line(p_l_fp,'');
592: END WriteXMLvalues_rtf;
593:
594:

Line 591: utl_file.put_line(p_l_fp,'');

587: -- utl_file.put_line(p_l_fp,'<' || p_tagname || '>' || p_value || '' );
588: -- New Format XFDF
589: utl_file.put_line(p_l_fp,'<' || p_tagname || '>');
590: utl_file.put_line(p_l_fp,'' || p_value || '' );
591: utl_file.put_line(p_l_fp,'');
592: END WriteXMLvalues_rtf;
593:
594:
595: