Revision 9e06d0e4
Von Philip Reetz vor mehr als 16 Jahren hinzugefügt
| bin/mozilla/am.pl | ||
|---|---|---|
| 2524 | 2524 |
|
| 2525 | 2525 |
AM->closedto(\%myconfig, \%$form); |
| 2526 | 2526 |
|
| 2527 |
if ($form->{revtrans}) {
|
|
| 2528 |
$checked{Y} = "checked";
|
|
| 2529 |
} else {
|
|
| 2530 |
$checked{N} = "checked";
|
|
| 2531 |
} |
|
| 2532 |
|
|
| 2533 | 2527 |
$form->header; |
| 2534 | 2528 |
|
| 2535 | 2529 |
print qq| |
| ... | ... | |
| 2543 | 2537 |
<tr> |
| 2544 | 2538 |
<td> |
| 2545 | 2539 |
<table> |
| 2546 |
<tr> |
|
| 2547 |
<td>| |
|
| 2548 |
. $locale->text('Enforce transaction reversal for all dates') . qq|</th>
|
|
| 2549 |
<td><input name=revtrans class=radio type=radio value="1" $checked{Y}> |
|
|
| 2550 |
. $locale->text('Yes')
|
|
| 2551 |
. qq| <input name=revtrans class=radio type=radio value="0" $checked{N}> |
|
|
| 2552 |
. $locale->text('No')
|
|
| 2553 |
. qq|</td> |
|
| 2554 |
</tr> |
|
| 2555 | 2540 |
<tr> |
| 2556 | 2541 |
<th>| . $locale->text('Close Books up to') . qq|</th>
|
| 2557 | 2542 |
<td><input name=closedto size=11 title="$myconfig{dateformat}" value=$form->{closedto}></td>
|
| ... | ... | |
| 2585 | 2570 |
|
| 2586 | 2571 |
AM->closebooks(\%myconfig, \%$form); |
| 2587 | 2572 |
|
| 2588 |
if ($form->{revtrans}) {
|
|
| 2573 |
if ($form->{closedto}) {
|
|
| 2589 | 2574 |
$form->redirect( |
| 2590 |
$locale->text('Transaction reversal enforced for all dates'));
|
|
| 2575 |
$locale->text('Books closed up to') . " "
|
|
| 2576 |
. $locale->date(\%myconfig, $form->{closedto}, 1));
|
|
| 2591 | 2577 |
} else {
|
| 2592 |
if ($form->{closedto}) {
|
|
| 2593 |
$form->redirect( |
|
| 2594 |
$locale->text('Transaction reversal enforced up to') . " "
|
|
| 2595 |
. $locale->date(\%myconfig, $form->{closedto}, 1));
|
|
| 2596 |
} else {
|
|
| 2597 |
$form->redirect($locale->text('Books are open'));
|
|
| 2598 |
} |
|
| 2578 |
$form->redirect($locale->text('Books are open'));
|
|
| 2599 | 2579 |
} |
| 2600 | 2580 |
|
| 2601 | 2581 |
$lxdebug->leave_sub(); |
Auch abrufbar als: Unified diff
Ueberarbeitete Buecherkontrolle