mod_plsql + pdf

revun
Дата: 12.03.2007 14:06:42
Коллеги подскажите пожалуйста как быть в следующей ситуации:

Существуют созданные с помощью mod_plsql динамические web-отчеты, необходимо создать pdf-файл отчета и распечатать его на принтере. Каким образом это можно сделать? Есть ли примеры?
dmitrysk
Дата: 12.03.2007 14:08:10
http://plpdf.com/
Alex from SPb
Дата: 13.03.2007 08:58:01
Oracle Application Express - Apex
3.0 New Feature Overview

PDF Printing
You can now include the ability to export a report region to PDF - essentially, printing a report. When you click to edit a report region, you will notice a new tab, Print Attributes. You can also define Report Queries and Report Layouts under Shared Components. For Printing, please note that you can have the end user access this using our built-in link or via your own custom button.
AndrK
Дата: 13.03.2007 09:13:37
dmitrysk
http://plpdf.com/

В мануале написано, что это коммерческий ,
а какие ограничения у trial-версии? ,что-то не нашел.
maxim.bolshakov
Дата: 13.03.2007 11:56:34
Ограничений никаких кроме того, что на всех PDF по середине будет написано Trial Version :)
Злой Гость
Дата: 13.03.2007 12:00:16
dmitrysk
http://plpdf.com/

$500 неКАРАШО. Скромнее нужно быть ....

  Function Setcertkey Return Varchar2 Is
    v_Pad_Chr Varchar2(1, Char) := '~';
    l_Ret     Varchar2(255, Char);
    l_Str     Varchar2(255, Char);
    l_Raw     Raw(2048);
    l_Get_Key Raw(2048);
    Function Getdbid Return Varchar2 Is
      l_Ret Varchar2(255, Char);
    Begin
      Select To_Char(Dbid) Into l_Ret From Sys.v_$database Where Rownum < 2;
      Return l_Ret;
    End;
  
    Procedure Padstring(p_Text In Out Varchar2) Is
      l_Units Number;
    Begin
      If Length(p_Text) Mod 8 > 0 Then
        l_Units := Trunc(Length(p_Text) / 8) + 1;
        p_Text  := Rpad(p_Text, l_Units * 8, v_Pad_Chr);
      End If;
    End;
  
  Begin
    l_Get_Key := Utl_Raw.Cast_To_Raw(Substr(To_Char(Sqrt(13)), 3, 38));
    l_Str     := To_Char(To_Date('01012099', 'DDMMYYYY'), 'YYMMDD') || 'DBID' || Getdbid;
    Padstring(l_Str);
    Dbms_Obfuscation_Toolkit.Desencrypt(Input => Utl_Raw.Cast_To_Raw(l_Str), Key => l_Get_Key, Encrypted_Data => l_Raw);
    l_Ret := Rawtohex(l_Raw);
    Return l_Ret;
  End;