Revision c7f9da81
Von Moritz Bunkus vor mehr als 17 Jahren hinzugefügt
| bin/mozilla/am.pl | ||
|---|---|---|
| 413 | 413 |
|
| 414 | 414 |
foreach $ca (@{ $form->{CA} }) {
|
| 415 | 415 |
|
| 416 |
$ca->{debit} = " ";
|
|
| 417 |
$ca->{credit} = " ";
|
|
| 416 |
$ca->{debit} = "";
|
|
| 417 |
$ca->{credit} = "";
|
|
| 418 | 418 |
|
| 419 | 419 |
if ($ca->{amount} > 0) {
|
| 420 |
$ca->{credit} =
|
|
| 421 |
$form->format_amount(\%myconfig, $ca->{amount}, 2, " ");
|
|
| 420 |
$ca->{credit} = $form->format_amount(\%myconfig, $ca->{amount}, 2);
|
|
| 422 | 421 |
} |
| 423 | 422 |
if ($ca->{amount} < 0) {
|
| 424 |
$ca->{debit} =
|
|
| 425 |
$form->format_amount(\%myconfig, -1 * $ca->{amount}, 2, " ");
|
|
| 423 |
$ca->{debit} = $form->format_amount(\%myconfig, -1 * $ca->{amount}, 2);
|
|
| 426 | 424 |
} |
| 427 | 425 |
$ca->{heading} = ( $ca->{charttype} eq 'H' ) ? 1:'';
|
| 428 | 426 |
$ca->{link_edit_account} =
|
| ... | ... | |
| 437 | 435 |
."&password=$form->{password}&action=list_account_details&";
|
| 438 | 436 |
|
| 439 | 437 |
|
| 440 |
my $pjx = new CGI::Ajax( |
|
| 441 |
'list_account_details' => $list_account_details_url |
|
| 442 |
); |
|
| 438 |
my $pjx = new CGI::Ajax('list_account_details' => $list_account_details_url);
|
|
| 443 | 439 |
|
| 444 | 440 |
# Eneable AJAX debuging |
| 445 | 441 |
#$pjx->DEBUG(1); |
| 446 | 442 |
#$pjx->JSDEBUG(1); |
| 447 | 443 |
|
| 448 | 444 |
push(@ { $form->{AJAX} }, $pjx);
|
| 449 |
|
|
| 445 |
|
|
| 446 |
$form->{stylesheets} = "list_accounts.css";
|
|
| 447 |
|
|
| 450 | 448 |
$form->header; |
| 451 | 449 |
|
| 452 | 450 |
|
| ... | ... | |
| 455 | 453 |
}; |
| 456 | 454 |
|
| 457 | 455 |
# Ausgabe des Templates |
| 458 |
print($form->parse_html_template('am/list_accounts', $parameters_ref));
|
|
| 456 |
print($form->parse_html_template2('am/list_accounts', $parameters_ref));
|
|
| 459 | 457 |
|
| 460 | 458 |
$lxdebug->leave_sub(); |
| 461 | 459 |
|
Auch abrufbar als: Unified diff
Umstellung der Kontenübersicht auf die Verwendung von "Template".