sql >> Databáze >  >> RDS >> Oracle

Jak vytvořit sestavu PDF pomocí PL/SQL

Než jsem napsal a uvedl tento příklad pro vytvoření sestavy PDF pomocí PL/SQL v Oracle, hodně jsem zkoumal na Googlu, ale nenašel jsem žádný správný příklad. Takže jsem si řekl, že bych měl uvést příklad pro generování souboru sestavy PDF pomocí PL/SQL. Chcete-li to provést nejprve, musíte do schématu nainstalovat balíček databáze pdf_builder_pkg . Tento balíček si můžete stáhnout z následujícího odkazu pdf_builder_pkg.

Po provedení výše uvedeného skriptu balíčku ve schématu musíte vytvořit objekt adresáře databáze pro umístění souborů PDF, jak je znázorněno níže:

CREATE OR REPLACE DIRECTORY 
MY_PDF_DIR AS 
'D:\abc\plsql_pdfs'
/

Změňte cestu ve výše uvedeném příkazu podle cesty k adresáři systému Windows nebo pokud používáte Linux nebo Unix, pak podle jejich umístění, jak je uvedeno v příkladu níže:

CREATE OR REPLACE DIRECTORY 
MY_PDF_DIR AS 
'/usr09/oracle/files/'
/

Název adresáře MY_PDF_DIR můžete změnit na jakýkoli název, protože tento název adresáře potřebujeme předat jako parametr proceduře save_pdf, kterou vám ukážu v níže uvedeném příkladu.

Nyní jste již nainstalovali databázový balíček a vytvořili objekt adresáře. Nyní můžete napsat postup pro vytvoření zprávy PDF pomocí PL/SQL . Níže je uveden příklad bloku PL/SQL.

DECLARE
 CURSOR c_emp
 IS
 SELECT empno,
 ename,
 job,
 mgr,
 hiredate,
 sal,
 comm,
 deptno
 FROM employee;

v_hdr VARCHAR (1000);
 v_dtl VARCHAR (1000);
 v_rec NUMBER (10) := 0;
 v_sal NUMBER (10) := 0;
 v_comm NUMBER (10) := 0;
 BEGIN
 /* First line to initialize the package*/
 pdf_builder_pkg.init;
 /* Set the font to bold for heading*/
 pdf_builder_pkg.set_font ('helvetica', 'b');
 /* Write a line using pdf_builder_pkg.write procedure*/
 pdf_builder_pkg.write ('Employee Report');
 /* Set the font to normal */
 pdf_builder_pkg.set_font ('helvetica');
 pdf_builder_pkg.
 write ('Printed Date: ' || SYSDATE, -1, p_alignment => 'right');
 pdf_builder_pkg.
 write (
 '________________________________________________________________________________');
 pdf_builder_pkg.write (' ' || CHR (10) || CHR (13));
 /* Setting font courier for better alignment*/
 pdf_builder_pkg.set_font ('courier');
 v_hdr :=
 RPAD ('Emp No.', 10, ' ')
 || RPAD ('Emp Name', 12, ' ')
 || RPAD ('Job', 10, ' ')
 || RPAD ('Manager', 10, ' ')
 || RPAD ('Hire Date', 12, ' ')
 || RPAD ('Salary', 10, ' ')
 || RPAD ('Comm', 10, ' ');
 pdf_builder_pkg.write (v_hdr);
 pdf_builder_pkg.set_font ('helvetica');
 pdf_builder_pkg.
 write (
 '________________________________________________________________________________');
 pdf_builder_pkg.write (CHR (10) || CHR (13));
 pdf_builder_pkg.set_font ('courier');

FOR c IN c_emp
 LOOP
 v_dtl :=
 RPAD (c.empno, 10, ' ')
 || RPAD (c.ename, 12, ' ')
 || RPAD (c.job, 10, ' ')
 || RPAD (c.mgr, 10, ' ')
 || RPAD (c.hiredate, 12, ' ')
 || RPAD (c.sal, 10, ' ')
 || RPAD (c.comm, 10, ' ')
 || CHR (10)
 || CHR (13);
 pdf_builder_pkg.write (v_dtl);
 v_rec := v_rec + 1;
 v_sal := v_sal + c.sal;
 v_comm := v_comm + NVL (c.comm, 0);
 END LOOP;

pdf_builder_pkg.set_font ('helvetica');
 pdf_builder_pkg.
 write (
 '________________________________________________________________________________');
 pdf_builder_pkg.set_font ('courier');
 pdf_builder_pkg.write ('Records Count:' || v_rec);
 pdf_builder_pkg.write ('Total Salary:' || v_sal);
 pdf_builder_pkg.write ('Total Comm:' || v_comm);
 /* Saving the PDF file by passing directory name and file name */
 pdf_builder_pkg.save_pdf ('MY_PDF_DIR', 'emp_report.pdf');
 END;
 /

Soubor PDF s názvem emp_report.pdf naleznete ve svém adresáři . Pokud chcete další referenční příkazy pro balíček pdf_builder_pkg, můžete si stáhnout následující odkaz. Zpráva ve formátu PDF bude vypadat takto:

Můžete také zkontrolovat tento mnou vytvořený nástroj pro generování šablony procedury PL/SQL podle vašeho příkazu SQL. Zkontrolujte prosím Generate PL/SQL Procedure Template.

Viz také:

  • Vytváření souborů aplikace Excel pomocí PL/SQL
  • Vytvářejte soubory ZIP pomocí PL/SQL
  • Export dat do souboru JSON v Oracle 11g pomocí PL/SQL
  1. Sloupec neexistuje?

  2. SQlite Query v Androidu pomocí kurzoru

  3. LINQ to SQL více tabulek levé vnější spojení

  4. kopírování z jedné databáze do druhé pomocí vývojáře Oracle SQL - připojení se nezdařilo