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