From 2b554d4f9a608c3189a52a8d863b1e06cf2bda18 Mon Sep 17 00:00:00 2001 From: tetragon Date: Tue, 11 Sep 2007 18:39:02 +0000 Subject: Some formatting fixes to the inventory activity report git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/branches/1.2@1567 4979c152-3d1c-0410-bac9-87ea11338e46 --- bin/rp.pl | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) (limited to 'bin/rp.pl') diff --git a/bin/rp.pl b/bin/rp.pl index aca6133a..b696a5c4 100755 --- a/bin/rp.pl +++ b/bin/rp.pl @@ -984,10 +984,15 @@ qq|rp.pl?path=$form->{path}&action=continue&accounttype=$form->{accounttype}&log $ref->{partnumber} = qq|$ref->{partnumber}|; $ref->{sold} = qq|$ref->{sold}|; $ref->{received} = qq|$ref->{received}|; + $ref->{revenue} = + $form->format_amount( \%myconfig, $ref->{revenue}, 2, ' ' ); + $ref->{expenses} = + $form->format_amount( \%myconfig, $ref->{expenses}, 2, ' ' ); + $ref->{expense} = $ref->{expenses}; map { $column_data{$_} = " " } @column_index; print qq| - + |; map { print "$ref->{$_}\n" } @column_index; -- cgit v1.2.3