some optimization to reduce db selections

This commit is contained in:
ragu 2022-11-22 18:10:06 +01:00
parent f39ac77590
commit 8cfb680fec
9 changed files with 48 additions and 55 deletions

View file

@ -128,7 +128,7 @@ sub handler {
#3. authorize
my $author = $apif->authorization($q,$varenv{merchant_id},$hw_id,$aowner);#$co like browser hw_id
#4. verify and get user values
($api_return,$users_sharee) = $apif->auth_verify($q,$author->{authcookie},"",$author->{new_authcoo});
($api_return,$users_sharee) = $apif->auth_verify($q,$author->{authcookie},"");
#5. domcookie by authcookie substr (cut first 15 chars), AND also sessionid
if($author->{authcookie} && length($author->{authcookie}) > 30){
@ -638,6 +638,10 @@ sub handler {
print redirect("$varenv{wwwhost}/$varenv{mandant}/Account/$varenv{accounting_1_5}$session");
exit 0;
}
elsif($users_sharee->{int12} || $users_sharee->{int03} != $R::int03){
print redirect("$varenv{wwwhost}/$varenv{mandant}/Account/$varenv{accounting_2}?cum=2$session_and\&$returnwww");
exit 0;
}
elsif($payable_check && (!$users_sharee->{int04} || !$users_sharee->{int13})){
print redirect("$varenv{wwwhost}/$varenv{mandant}/Account/$varenv{accounting_3}?cum=2$session_and\&$returnwww");
exit 0;