Revision 1071846d
Von Sven Schöling vor fast 14 Jahren hinzugefügt
SL/DATEV.pm | ||
---|---|---|
my $firstrun = 1;
|
||
my $subcent = abs($count) < 0.02;
|
||
|
||
while (abs($count) > 0.01 || $firstrun || ($subcent && abs($count) > 0.001)) {
|
||
while (abs($count) > 0.01 || $firstrun || ($subcent && abs($count) > 0.005)) {
|
||
my $ref2 = $sth->fetchrow_hashref("NAME_lc");
|
||
last unless ($ref2);
|
||
|
Auch abrufbar als: Unified diff
Subcent Grenze auf 0.05 anheben.
Akuter Fall von Geoffrey:
habe einen neuen Fall wo es nicht klappt, mit meinem alten abs($count) > 0.005
aber schon.
Unbalanced ledger!