payone_cron refacoring

This commit is contained in:
Rainer Gümpelein 2022-02-14 16:06:02 +01:00
parent d5ea6afcd7
commit 43dbaba064
8 changed files with 50 additions and 573 deletions

View file

@ -81,7 +81,7 @@ sub tpl(){
}elsif($ctf->{txt80} =~ /(\d{2})\.(\d{2})\.(\d{4})$/){
$max_timestamp = $3 . $2 . $1 . "2359";
}
my $max_sum = $ctf->{int03} || "10000";
my $max_sum = 1000;
my $cttpos = { c_id => 0 };
my $rows = 0;
($cttpos,$rows) = $db->collect_contentpos("contenttrans",$rel4tpl->{content_id});
@ -156,13 +156,9 @@ EOF
#Tablecontent (buttons and ct_name(primary key))
#my $scol = "c_id";#changed to itime because of Storno resorts
my $scol = "itime";
my $sum_parts0=0;
my $sum_parts7=0;
my $sum_parts19=0;
my $diff7 = 100 + 7;
#my $diff19 = 100 + $umst1619;
my $diff19 = 100 + 19;
my $sum_umst7=0;
my $sum_umst19=0;
my $i=0;
my $accounting_start;
@ -388,29 +384,20 @@ EOF
}
}#foreach end
if($sum_parts7 != "0"){
$sum_umst7 = $sum_parts7 / $diff7 * 7;
$sum_umst7 = $lb->round($sum_umst7);
}
if($sum_parts19 != "0"){
if($sum_parts19 && $sum_parts19 != 0){
#$sum_umst19 = $sum_parts19 / $diff19 * $umst1619;
$sum_umst19 = $sum_parts19 / $diff19 * 19;
$sum_umst19 = $lb->round($sum_umst19);
}
my $sum_netto7 = $sum_parts7 - $sum_umst7;
my $sum_netto19 = $sum_parts19 - $sum_umst19;
$sum_netto7 = $lb->cashme($sum_netto7);
$sum_netto19 = $lb->cashme($sum_netto19);
my $sum_nettoall = $sum_parts0 + $sum_netto7 + $sum_netto19;
my $sum_nettoall = $sum_netto19;
$sum_nettoall = $lb->round($sum_nettoall);
$sum_nettoall = $lb->cashme($sum_nettoall,",");
my $sum_paid = $sum_parts0 + $sum_parts7 + $sum_parts19;
my $sum_paid = $sum_parts19;
$sum_paid = $lb->round($sum_paid);
my $sum_preauth = $sum_paid || 0;
$sum_parts0 = $lb->cashme($sum_parts0,",");
$sum_parts7 = $lb->cashme($sum_parts7,",");
$sum_parts19 = $lb->cashme($sum_parts19,",");
$sum_umst7 = $lb->cashme($sum_umst7,",");
$sum_umst19 = $lb->round($sum_umst19);
$sum_umst19 = $lb->cashme($sum_umst19,",");
$sum_paid = $lb->cashme($sum_paid,",");
@ -448,17 +435,7 @@ EOF
print $q->td({-class=>'tdint'},"Nettobetrag:");
print $q->td({-class=>'tdint',-nowrap=>"1"},"$sum_nettoall €");
if($sum_parts0 != "0"){
print $q->Tr("\n");$line_count2++;
print $q->td({-class=>'tdint',-nowrap=>"1"},"0% UmSt auf $sum_parts0 €:");
print $q->td({-class=>'tdint',-nowrap=>"1"},"0,00 €");
}
if($sum_netto7 != "0"){
print $q->Tr("\n");$line_count2++;
print $q->td({-class=>'tdint',-nowrap=>"1"},"7% UmSt auf $sum_netto7 €:");
print $q->td({-class=>'tdint',-nowrap=>"1"},"$sum_umst7 €");
}
if($sum_netto19 != "0"){
if($sum_netto19 != 0){
print $q->Tr("\n");$line_count2++;
#print $q->td({-class=>'tdint',-nowrap=>"1"},"$umst1619% UmSt auf $sum_netto19 €:");
print $q->td({-class=>'tdint',-nowrap=>"1"},"19% UmSt auf $sum_netto19 €:");