some minor mailing-footer fixes

This commit is contained in:
ragu 2023-08-01 14:26:20 +02:00
parent e3d3713994
commit 01ddabbad2
3 changed files with 21 additions and 33 deletions

View file

@ -171,7 +171,7 @@ td {
my $site_all=1;
my $header_top = 0;
my $footer_px = 1780;
my $footer_px = 1800;
my $footer_top = $footer_px;#end 1.site
my $sum_paid = 0;
@ -949,7 +949,7 @@ td {
my @txt12 = split (/;/,"$ctf->{txt12}");#Geschäftsführer
my @txt19 = split (/;/,"$ctf->{txt19}");#Bank usw.
my $top2 = $footer_top + 120;
my $top2 = $footer_top + 150;
$footer_top .= "px";
$top2 .= "px";
print PMA "sub text_footer --> footer_top: $footer_top | top2: $top2\n";
@ -984,10 +984,10 @@ td {
print "<br />\n";
}
print $q->start_table({-width=>'100%',-border=>'0',-align=>'center', -cellpadding=>'2', -cellspacing=>'0'});
print $q->start_table({-width=>'100%',-border=>'0',-align=>'left', -cellpadding=>'0', -cellspacing=>'0'});
print "<tr>";
print "<td style='width:25%;'>";
print "<td>";
print $q->start_table({-border=>'0',-align=>'left'});
print $q->Tr();
print $q->td({-class=>'tdpdf2'}, "$txt12[0]"),"\n";
@ -1000,7 +1000,7 @@ td {
print $q->end_table;
print "</td>";
print "<td style='width:25%;'>";
print "<td>";
print $q->start_table({-border=>'0',-align=>'left'});
print $q->Tr();
print $q->td({-class=>'tdpdf2'}, "TEL: $ctf->{txt07}"),"\n";
@ -1010,18 +1010,10 @@ td {
print $q->td({-class=>'tdpdf2'}, "$txt11[0]"),"\n";
print $q->Tr();
print $q->td({-class=>'tdpdf2'}, "$txt11[1]"),"\n";
print $q->Tr();
print $q->td({-class=>'tdpdf2'}, "$txt11[2]"),"\n";
print $q->Tr();
print $q->td({-class=>'tdpdf2'}, "$txt11[3]"),"\n";
print $q->Tr();
print $q->td({-class=>'tdpdf2'}, "$txt11[4]"),"\n";
print $q->Tr();
print $q->td({-class=>'tdpdf2'}, "$txt11[5]"),"\n";
print $q->end_table;
print "</td>";
print "<td style='width:25%'>";
print "<td>";
print $q->start_table({-border=>'0',-align=>'left'});
print $q->Tr();
print $q->td({-class=>'tdpdf2'}, "$txt19[0]"),"\n";
@ -1031,24 +1023,17 @@ td {
print $q->td({-class=>'tdpdf2'}, "$txt19[2]"),"\n";
print $q->Tr();
print $q->td({-class=>'tdpdf2'}, "$txt19[3]"),"\n";
print $q->end_table;
print "</td>";
print "<td>";
print $q->start_table({-border=>'0',-align=>'left'});
print $q->Tr();
print $q->td({-class=>'tdpdf2'}, "$txt19[4]"),"\n";
print $q->Tr();
print $q->td({-class=>'tdpdf2'}, "$txt19[5]"),"\n";
print $q->end_table;
print "</td>";
print "<td style='width:25%;'>";
print $q->start_table({-width=>'100%',-border=>'0',-align=>'left'});
print $q->Tr();
print $q->td({-class=>'tdpdf2'}, "$txt19[6]"),"\n";
print $q->Tr();
print $q->td({-class=>'tdpdf2'}, "$txt19[7]"),"\n";
print $q->Tr();
print $q->td({-class=>'tdpdf2'}, "$txt19[8]"),"\n";
print $q->Tr();
print $q->td({-class=>'tdpdf2'}, "$txt19[9]"),"\n";
print $q->Tr();
print $q->td({-class=>'tdpdf2'}, "$txt19[10]"),"\n";
print $q->end_table;
print "</td>";