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

@ -178,7 +178,7 @@ sub send_invoice {
my $ctt = { c_id => 0 };
$ctt = $dbt->fetch_tablerecord($dbh,$fetchctt);
$sendref = prepare_content($sendref,$ctadr,$uadr,$ctt,$varenv{cms}->{$cms_message_key}->{txt});
$sendref = prepare_content($sendref,$ctadr,$uadr,$ctt,$varenv{cms}->{$cms_message_key}->{txt},$with_pdf);
my $updatectt = {
table => "contenttrans",
@ -461,7 +461,8 @@ sub prepare_content {
my $ctadr = shift;
my $uadr = shift;
my $ctt = shift || {};
my $cms_prim = shift;
my $cms_prim = shift || "";
my $with_pdf = shift || "";
my $app_name = "Mietrad App";
$app_name = $dbt->{operator}->{$varenv{dbname}}->{app_name};
@ -470,7 +471,7 @@ sub prepare_content {
my $sharee_ticket = "";
if(ref($ctt) eq "HASH" && $ctt->{ct_name}){
$invoice_name = "$ctt->{txt00}-$varenv{dbname}-$ctt->{ct_name}.pdf";
$sendref->{attachment} = "$invoice_name";
$sendref->{attachment} = "$invoice_name" if($with_pdf);
$invoice_nr = "$varenv{dbname}-$ctt->{ct_name}";
$sharee_ticket = "[$invoice_nr]";
}
@ -489,7 +490,9 @@ my $signature = <<EOF
$uadr->{txt07}
$uadr->{txt08}
$uadr->{txt84}
$uadr->{txt09}
$uadr->{txt10}
EOF
;