payment type select

This commit is contained in:
ragu 2022-08-01 15:13:43 +02:00
parent af6b806c39
commit c67234d2de
10 changed files with 19 additions and 15 deletions

View file

@ -275,8 +275,8 @@ EOF
my $pay_sequence = " | sequencenr: $ctt->{int18}" if($ctt->{int18});
my @_paymentstate = split(/\|/,$varenv{Zahlungsweise});
my $kind_of_payment = "fehlt";
$kind_of_payment = "$_paymentstate[0]" if($ctt->{int03} == 1);
$kind_of_payment = "$_paymentstate[1]" if($ctt->{int03} == 2);
$kind_of_payment = "$_paymentstate[0]" if($ctadr->{int03} == 1);
$kind_of_payment = "$_paymentstate[1]" if($ctadr->{int03} == 2);
print $q->Tr(),"\n";
print $q->td({-class=>'tdescr'},"Payone Zahlungsart"),"\n";
print $q->td({-class=>'tdval'},"$kind_of_payment"),"\n";

View file

@ -543,7 +543,7 @@ EOF
}else{
undef $_paymentstate[1];
}
$kind_of_payment = "$ctt->{state}" if($ctt->{state});
$kind_of_payment = "$ctt->{state}" if($ctt->{state} && $ctt->{int01});
my $send_invoice_checkbox = 1;