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

cpdate_check and mailing

Browse source
This commit is contained in:
ragu 2023-02-23 12:35:53 +01:00
parent 76afd28578
commit 697a29b97d
6 changed files with 23 additions and 16 deletions
Download patch file Download diff file Expand all files Collapse all files

8
copri4/main/src/Mod/DBtank.pm
View file

@ -282,10 +282,12 @@ sub channel_map(){
169 => "sigo connector",
172 => "reserve timeout",
#173 => "merchant fallback",#mig
174 => "cronjob bonus",
175 => "cronjob cpdate",
176 => "Mein konrad App",#mig
177 => "LastenradBay App",#mig
179 => "cronjob",
178 => "payone API",
179 => "cronjob payone",
#181 => "SMS API",
#182 => "velofactur API",
183 => "Ilockit API",
@ -796,7 +798,9 @@ sub fetch_tablerecord(){
if($key =~ /ct_name/ && $value =~ /CAST/){#CAST(c_id AS text)
$where .= " and $key $op $value";
}elsif($key =~ /^(ct_name$|txt\d+|uri\d+|state)$/ && $value){
if($value eq "null"){
if($value =~ /length\($key\)/){
$where .= " and $value";
}elsif($value eq "null"){
$where .= " and $key $op $value";
}elsif($op eq "IN"){
$where .= " and $key $op $value";

6
copri4/main/src/Mod/Indexsharee.pm
View file

@ -485,7 +485,7 @@ sub handler {
$update_adr->{ct_name} = $q->escapeHTML($R::pseudocardpan);
$update_adr->{txt27} = $q->escapeHTML($R::status);
$update_adr->{txt28} = $now_dt . " pseudocardpan\n" . $q->escapeHTML($payone_return);
$update_adr->{int12} = 0;
$update_adr->{int12} = 0 if($users_sharee->{int12} != 2);#Vde hard set by fibu
$update_adr->{int03} = 2;
$dbt->update_record($dbh,$update_adr,$users_sharee) if($users_sharee->{c_id} > 0);
($api_return,$users_sharee) = $apif->auth_verify($q,$coo,"");
@ -613,8 +613,8 @@ sub handler {
($api_return,$users_sharee) = $apif->auth_verify($q,"",$users_sharee->{c_id}) if($users_sharee->{c_id});
if($users_sharee->{int12} != 2 && $users_sharee->{int04} && $users_sharee->{int13}){
#2023-01-17 disabled because of should only be set by payment check
if($users_sharee->{int04} && $users_sharee->{int13}){
#2023-01-17 disabled because of should only be set by pseudocardpan ajax
#my $row = $db->updater("contentadr","c_id","$users_sharee->{c_id}","int12","0");#Vde
$dbt->update_operatorsloop($varenv{dbname},$users_sharee->{c_id},"update");
}else{

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

@ -165,7 +165,7 @@ sub save_text2contenttrans {
if($ctt->{c_id}){
$u_rows += $dbt->update_record($dbh,$update_ctt,$ctt);
#empty warn_time if warnstate not set
if(!$R::int06 && $R::txt00 eq "Rechnung"){
if(!$R::int06 || !$R::warn_time){
$dbt->update_one($dbh,$update_ctt,"warn_time=null",$c_id);
}
if($R::txt22 && $R::txt22 eq "Zahlungseingang"){

7
copri4/main/src/Tpl/BaseEdit.pm
View file

@ -513,8 +513,6 @@ EOF
my $seldes = $des;
$des .= " ($key)" if($users_dms->{u_id} eq $varenv{superu_id});
#$ctrel->{$key} = $q->unescapeHTML("$ctrel->{$key}");
#$ctrel->{$key} = $lb->newline($ctrel->{$key},"",1);
if($key =~ /c_id|ct_name|barcode|txt/ && $size eq "readonly"){
print $q->Tr();
print $q->td({-class=>'left_italic_cms'},"$des"),"\n";
@ -776,12 +774,17 @@ EOF
}
}
elsif($key =~ /txt/ && $size =~ /area$/){
$ctrel->{$key} = $q->unescapeHTML("$ctrel->{$key}");
$ctrel->{$key} = $lb->newline($ctrel->{$key},"",1);
my $h= 5;# if($size =~ /area(\d+)/);
print $q->Tr();
print $q->td({-class=>'left_italic_cms',-colspan=>1},"$des"),"\n";
print $q->td({-class=>'content1_cms', -colspan=>'3'},$q->textarea(-class=>"etxt", -style=>'border: 1px solid silver;',-rows=>"$h",-cols=>'35em;', -name=>"$key", -override=>'1',-default=>"$ctrel->{$key}")),"\n";
}
elsif($key =~ /txt/ && $size =~ /area(\d+)/){
$ctrel->{$key} = $q->unescapeHTML("$ctrel->{$key}");
$ctrel->{$key} = $lb->newline($ctrel->{$key},"",1);
#my $h= $1 if($size =~ /area(\d+)/);
my $h= "height:" . $1 . "em;";
my $w = "width:25em;";

1
copri4/main/src/scripts/cpdate_check.pl Symbolic link
View file

@ -0,0 +1 @@
../../../../../sharee.bike/copri-bike/main/src/scripts/cpdate_check.pl