roko.li/sharee.bike
5
0
Fork 0
mirror of https://gitlab.com/t6353/sharee.bike.git synced 2025-05-10 14:06:26 +02:00
Code Issues Projects Releases Packages Wiki Activity

SWK Tarif on register and delete_account on craete

Browse source
This commit is contained in:
Rainer Gümpelein 2022-01-23 19:16:23 +01:00
parent 901c4c2a71
commit 83da7fe92b
4 changed files with 26 additions and 16 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -338,7 +338,13 @@ sub save_account(){
if($bonus_record->{c_id} > 3){#means if not file greped with static c_id <= 3
$dbt->update_content4comp($dbh_operator,$bonus_record->{c_id},"-","1");
}
@txt30_op = ("$bonus_record->{int22}") if($bonus_record->{int22});
if($bonus_collect->{1}->{int22} && $bonus_collect->{2}->{int22}){
@txt30_op = ("$bonus_collect->{1}->{int22}","$bonus_collect->{2}->{int22}");
print FILE "SWK bonus_collect on adr insert:\n" . Dumper($bonus_collect) . "\n";
}elsif($bonus_record->{int22}){
@txt30_op = ("$bonus_record->{int22}");
}
}
#address hash wit bonusnr
my $adr_bonus = {