pdf download fix

This commit is contained in:
ragu 2022-10-04 12:14:03 +02:00
parent 60a60121f3
commit f65e88b302
6 changed files with 15 additions and 12 deletions

View file

@ -1165,7 +1165,7 @@ sub booking_update(){
gps => "",
latitude => "",
longitude => "",
gps_age_miniutes => 60,
gps_age_minutes => 60,
gps_accuracy => 0,
geo_distance => 1000000,
};
@ -1565,7 +1565,7 @@ sub smartlock {
$update_pos->{txt06} = $gps_data->{gps};#end pos coordinates
$update_pos->{int21} = $gps_data->{gps_age_minutes};
$update_pos->{int22} = $gps_data->{gps_accuracy};
$update_pos->{int23} = $gps_data->{geo_distance};
$update_pos->{int23} = "null";# only computed on rental-end
$booking_values->{response_state} = "OK: bike " . $q->param('bike') . " locked confirmed. ";
$booking_values->{response_text} = "Abschließen von Fahrrad Nr. " . $q->param('bike') . " bestätigt. ";

View file

@ -500,7 +500,7 @@ print ATTR "next: $next\n" if($debug);
}
if($table eq "contentadr" && $_ eq "txt22" && $valxx){
my $currency = "EUR";
$currency = "CHF" if($valxx =~ /^(CH)/i);
#$currency = "CHF" if($valxx =~ /^(CH)/i);
$u_rows += $db->updater("$table","c_id",$c_id,"txt22","$valxx",$users_dms->{u_id});
$u_rows += $db->updater("$table","c_id",$c_id,"txt24","$currency",$users_dms->{u_id});
}

View file

@ -556,7 +556,7 @@ td {
print $q->td({-class=>'Oline',-colspan=>6}," "),"\n";
print "<tr>\n";
print "<td colspan='3' style='border:0px solid silver;vertical-align:top;padding:0.2em 0.5em;font-size:1em;'>$payment_text</td>\n";
print "<td colspan='3' style='border:0px solid silver;vertical-align:top;padding:0.2em 0.5em;font-size:0.91em;'>$payment_text</td>\n";
print "<td colspan='3' style='font-size:1em;'>\n";
print $q->start_table({-style=>'border:1px solid silver;', -border=>'0', -width=>'100%',-align=>'center', -cellpadding=>'3', -cellspacing=>'0'}),"\n";
@ -604,7 +604,7 @@ td {
print $q->start_table({-style=>"margin-top:0.5em;", -border=>'0', -width=>'100%',-align=>'center', -cellpadding=>'0', -cellspacing=>'0'});
#Frei-Text
my $style = "padding:0.4em;text-align:left;font-size:1em;";
my $style = "padding:0.4em;text-align:left;font-size:0.91em;";
if($nullcount > 0){
print $q->Tr();
print $q->td({-style=>"$style",-colspan=>3},"In diesem Zeitraum gab es $nullcount kostenfreie Buchungsvorgänge.");

View file

@ -451,7 +451,7 @@ sub save_account(){
}
if($_ =~ /txt22/ && $valxx){
my $currency = "EUR";
$currency = "CHF" if($valxx =~ /^(CH)/i);
#$currency = "CHF" if($valxx =~ /^(CH)/i);
$u_rows = $dbt->update_one($dbh,$update_primary,"txt24='$currency'");
}