roko.li/sharee.bike
5
0
Fork 0
mirror of https://gitlab.com/t6353/sharee.bike.git synced 2025-05-11 22:37:27 +02:00
Code Issues Projects Releases Packages Wiki Activity

Kundendaten Formular failure messages

Browse source
This commit is contained in:
Rainer Gümpelein 2022-02-23 12:33:59 +01:00
parent 6b7a616b44
commit eafd393458
4 changed files with 33 additions and 30 deletions
Download patch file Download diff file Expand all files Collapse all files

2
copri4/main/src/Mod/APIfunc.pm
View file

@ -1120,7 +1120,7 @@ sub booking_update(){
if($q->param('voltage') && $q->param('voltage') =~ /(\d+)/){
$update_cc->{int14} = $1;
$self->service_automatic($q) if($1 <= 40);
$self->service_automatic($q) if($1 <= 50);
}
my $update_pos = {

11
copri4/main/src/Mod/KMLout.pm
View file

@ -91,7 +91,12 @@ sub kmlGenerator {
my $kmlfile = "sharee-$timestamp-$users_sharee->{c_id}.kml";
$bw->log("kmlGenerator with: ",$kmlfile,"");
my $uri_primary = $dbt->{primary}->{sharee_primary}->{primaryApp};
#request primary will jsonclient loop_sharees
my $uri_request = $dbt->{primary}->{sharee_primary}->{primaryApp};
#detect DMS, because this will do it directly without loop_sharees
$uri_request = $dbt->{operator}->{$varenv->{dbname}}->{operatorApp} if($varenv->{dbname} ne "sharee_primary" && $varenv->{syshost} =~ /shareedms-/);
my $rest_stations = "request=stations_available&project=$project&authcookie=$authcookie->{authcookie}";
my $rest_bikes = "request=bikes_available&project=$project&authcookie=$authcookie->{authcookie}";
@ -108,8 +113,8 @@ sub kmlGenerator {
my %place_latitude;
#reading shareejson
my $stations_json = fetch_primary_json("",$uri_primary,$rest_stations);
my $bikes_json = fetch_primary_json("",$uri_primary,$rest_bikes);
my $stations_json = fetch_primary_json("",$uri_request,$rest_stations);
my $bikes_json = fetch_primary_json("",$uri_request,$rest_bikes);
open(XML,">$varenv->{basedir}/xml/$kmlfile") || die "$0 can not write $!";

9
copri4/main/src/Mod/Payment.pm
View file

@ -453,8 +453,8 @@ sub rpc {
my $update_adr = {
table => "contentadr",
mtime => "now()",
owner => $owner
#mtime => "now()",
#owner => $owner
};
my $update_ctt = {
@ -587,6 +587,11 @@ sub rpc {
print FILE "payone RPC end\n\n" if($debug);
close(FILE) if($debug);
#set contentadr owner and mtime only if Vde or error will be set by payone id's
if((($update_adr->{int12} && $update_adr->{int12} > 0) || $update_adr->{txt28}) && ($owner == 178 || $owner == 179)){
$update_adr->{owner} = "$owner";
$update_adr->{mtime} = "now()";
}
$dbt->update_record($dbh,$update_adr,$ctadr) if($ctadr->{c_id} > 0);
$dbt->update_record($dbh,$update_ctt,$ctt) if($ctt->{c_id} > 0);
return $payoneret;