From: Joey Schulze <joey@infodrom.org>
Date: Sun, 24 Aug 2014 21:39:55 +0000 (+0000)
Subject: Prolongue lines
X-Git-Url: https://git.infodrom.org/?p=infodrom.org%2Fservice.infodrom.org;a=commitdiff_plain;h=ea2f89b5da45d06f8da97007226c71297bb71b82

Prolongue lines
---

diff --git a/src/InfoCon/buch/infocon b/src/InfoCon/buch/infocon
index cfd08f3..90c5806 100755
--- a/src/InfoCon/buch/infocon
+++ b/src/InfoCon/buch/infocon
@@ -161,25 +161,25 @@ sub sales_list
 
     $sth = $dbh->prepare($query);
     if ($sth && (my $rc = $sth->execute) > 0) {
-	print " Nr.   Datum  Bezeichnung                                 Betrag\n";
-	print "------------------------------------------------------------------\n";
+	print " Nr.   Datum  Bezeichnung                                           Betrag\n";
+	print "----------------------------------------------------------------------------\n";
 	while (@row = $sth->fetchrow_array) {
-	    $descr = substr($row[2],0,40);
-	    printf "%4d %8s %-40s  %9.2f\n", $row[0], sdate($row[1]), $descr, $row[3];
+	    $descr = substr($row[2],0,50);
+	    printf "%4d %8s %-50s  %9.2f\n", $row[0], sdate($row[1]), $descr, $row[3];
 	    if ($row[3] < 0.0) {
 		$sum_neg -= $row[3];
 	    } else {
 		$sum_pos += $row[3];
 	    }
 	}
-	print "-----------------------------------------------------------------\n"
+	print "---------------------------------------------------------------------------\n"
 	    if ($sum_neg > 0 || $sum_pos > 0) ;
-	printf " Zahlungseingänge                                       %9.2f\n", $sum_pos
+	printf " Zahlungseingänge                                                 %9.2f\n", $sum_pos
 	    if ($sum_pos > 0);
-	printf " Zahlungsausgänge                                       %9.2f\n", -$sum_neg
+	printf " Zahlungsausgänge                                                 %9.2f\n", -$sum_neg
 	    if ($sum_neg > 0);
-	print "==================================================================\n";
-	printf " Summe                                                  %9.2f\n\n", $sum_pos - $sum_neg;
+	print "============================================================================\n";
+	printf " Summe                                                            %9.2f\n\n", $sum_pos - $sum_neg;
     }
     $data{'done'} = 1;
 }