X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Frc.pl;h=47344335fef4312463172af277532c9c1af415b4;hb=b29783a3f0cff568b5d344d4fd34fe65840bea46;hp=4df612cc57ad353a70d0230d29fb5184402512d9;hpb=d629acd82a27e980899a044ca8b0f4becc8e94bb;p=kivitendo-erp.git diff --git a/bin/mozilla/rc.pl b/bin/mozilla/rc.pl index 4df612cc5..47344335f 100644 --- a/bin/mozilla/rc.pl +++ b/bin/mozilla/rc.pl @@ -42,6 +42,8 @@ require "bin/mozilla/common.pl"; sub reconciliation { $lxdebug->enter_sub(); + $auth->assert('cash'); + RC->paymentaccounts(\%myconfig, \%$form); $selection = ""; @@ -96,9 +98,6 @@ sub reconciliation {
-{login}> -{password}> - @@ -116,6 +115,8 @@ sub continue { call_sub($form->{"nextsub"}); } sub get_payments { $lxdebug->enter_sub(); + $auth->assert('cash'); + ($form->{accno}, $form->{account}) = split /--/, $form->{accno}; RC->payment_transactions(\%myconfig, \%$form); @@ -128,6 +129,8 @@ sub get_payments { sub display_form { $lxdebug->enter_sub(); + $auth->assert('cash'); + @column_index = qw(cleared transdate source name credit debit balance); $column_header{cleared} = " "; @@ -369,9 +372,6 @@ sub display_form { {fromdate}> {todate}> -{login}> -{password}> -
@@ -392,6 +392,8 @@ sub display_form { sub update { $lxdebug->enter_sub(); + $auth->assert('cash'); + RC->payment_transactions(\%myconfig, \%$form); foreach $ref (@{ $form->{PR} }) { @@ -409,6 +411,8 @@ sub update { sub select_all { $lxdebug->enter_sub(); + $auth->assert('cash'); + RC->payment_transactions(\%myconfig, \%$form); map { $_->{cleared} = "checked" unless $_->{fx_transaction} } @@ -422,8 +426,9 @@ sub select_all { sub done { $lxdebug->enter_sub(); - $form->{callback} = - "$form->{script}?action=reconciliation&login=$form->{login}&password=$form->{password}"; + $auth->assert('cash'); + + $form->{callback} = "$form->{script}?action=reconciliation"; $form->error($locale->text('Out of balance!')) if ($form->{difference} *= 1);