diff options
-rw-r--r-- | bin/rp.pl | 13 | ||||
-rw-r--r-- | templates/demo/balance_sheet.html | 2 |
2 files changed, 6 insertions, 9 deletions
@@ -824,6 +824,7 @@ qq|<input name=accno class=radio type=radio value="gifi_$ref->{accno}"> $re } + $form->{login} = 'test'; print qq| $gifi @@ -1096,11 +1097,6 @@ sub generate_income_statement { sub generate_balance_sheet { ##SC: START HTML - $form->{padding} = " "; - $form->{bold} = "<b>"; - $form->{endbold} = "</b>"; - $form->{br} = "<br>"; - RP->balance_sheet( \%myconfig, \%$form ); $form->{asofdate} = $form->current_date( \%myconfig ) @@ -1111,10 +1107,11 @@ sub generate_balance_sheet { ( $form->{department} ) = split /--/, $form->{department}; # define Current Earnings account - $padding = ( $form->{l_heading} ) ? $form->{padding} : ""; push( - @{ $form->{equity_account} }, { current_earnings => 1, - text => $locale->text('Current Earnings')} + @{ $form->{equity_account} }, { + current_earnings => 1, + text => $locale->text('Current Earnings') + }, ); $form->{this_period} = $locale->date( \%myconfig, $form->{asofdate}, 0 ); diff --git a/templates/demo/balance_sheet.html b/templates/demo/balance_sheet.html index 995fb5ab..e21fe7b3 100644 --- a/templates/demo/balance_sheet.html +++ b/templates/demo/balance_sheet.html @@ -46,7 +46,7 @@ account_data.text; ?></a><?lsmb ELSIF account_data.subtotal; ?><b> <?lsmb account_data.text; ?></b><?lsmb - ELSIF account_data.current_earnings; ?> <?lsmb + ELSIF account_data.current_earnings; IF l_heading ?> <?lsmb END; account_data.text; ELSE; account_data; |