printf " Zahlungsausgänge %9.2f\n", -$sum_neg
if ($sum_neg > 0);
print "==================================================================\n";
- printf " Summe %9.2f\n", $sum_pos - $sum_neg;
+ printf " Summe %9.2f\n\n", $sum_pos - $sum_neg;
}
}
} elsif ($ARGV[$i] eq "input") {
&buchung_input();
} elsif ($ARGV[$i] eq "unpaid") {
- &sales_list("paid = 0");
+ $saved_table = $table;
+ $table = "sales_dm";
+ &sales_list("paid = 0");
+ $table = "sales";
+ &sales_list("paid = 0");
+ $table = $table_saved;
} else {
&usage();
}