coupon select and feedback

This commit is contained in:
Rainer Gümpelein 2022-02-16 15:56:45 +01:00
parent d2ef211f68
commit 7656e9d291
7 changed files with 67 additions and 58 deletions

View file

@ -358,6 +358,8 @@ sub save_account(){
};
print FILE "operator adr update preview with bonusnr:\n" . Dumper($adr_bonus) . "\n";
$ret = $pl->set_usertarif($dbh,$operator_conf->{database}->{dbname},$adr_bonus,$bonus_collect);
}else{
$ret = "failure::txt15#top7";
}
}else{
$ret = "failure::txt15#top5";