Thread PDF::API2 Serienpdf erzeugen (8 answers)
Opened by provisoft at 2017-07-07 11:22

provisoft
 2017-07-07 11:22
#186798 #186798
User since
2012-04-04
29 Artikel
BenutzerIn
[default_avatar]
Hallo ...

ich erzeuge mit dem Modul PDF::API2 öfter PDF-Files.
Klappt alles ohne Probleme.
Nun möchte ich per While Schleife Pdf erzeugen und dies gleich per Mail verschicken.
Beim ertsen Durchgang klappt das, beim zweiten scheitere ich mit dem Fehler:
Can't call method "val" on an undefined value at D:/Dev/Perl/perl/site/lib/PDF/API2/Resource.pm line 64.
Muss ich irgendetwas initialisieren ? habe schon alles Mögliche versucht.

Beispiel von Code-Schnipsel anbei...
Der Fehler tritt bei ersten Schreiben einer Zeile in zweiten Durchlauf der Schleife auf ....

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
while (@a = $A->fetchrow_array) 
    { 
        #-------------------------
        # File öffnen
        #----------------------------- 
        $pdfdir        = $zeile[6];
        $pdfpath       = $zeile[5];
                        
        $filename = "xxxxxxx_" . $a[0] . ".pdf";
                        
        $pdfname  = $filename;
                                                
        &newPage_Quer();
        &head();
                        
        $seite         = 1;
        $hoch          = "490";
        $abda          = "30";                          
                        
        &writeLine  ( $abda, $hoch, "Helvetica", 12, $a[0],  "left");
        $hoch = $hoch - 20;
        &writeLine  ( $abda, $hoch, "Helvetica", 12, "xxxxxxxx",  "left");
                                                                
                        
                        
        $pdf->saveas($pdfpath . $pdfname);
        $pdf->end; 
                                        
        if ($a[1] ne '')
          {
             &sendEmail($a[1],$filename,$a[0]);
          }; 
                        
  };

Last edited: 2017-07-07 13:25:27 +0200 (CEST)

View full thread PDF::API2 Serienpdf erzeugen