Revision 25a5cdc8
Von Moritz Bunkus vor mehr als 15 Jahren hinzugefügt
| bin/mozilla/gl.pl | ||
|---|---|---|
| 41 | 41 |
use SL::ReportGenerator; |
| 42 | 42 |
|
| 43 | 43 |
require "bin/mozilla/common.pl"; |
| 44 |
require "bin/mozilla/drafts.pl"; |
|
| 44 | 45 |
require "bin/mozilla/reportgenerator.pl"; |
| 45 | 46 |
|
| 46 | 47 |
1; |
| ... | ... | |
| 80 | 81 |
|
| 81 | 82 |
$auth->assert('general_ledger');
|
| 82 | 83 |
|
| 84 |
return $lxdebug->leave_sub() if (load_draft_maybe()); |
|
| 85 |
|
|
| 83 | 86 |
$form->{title} = "Add";
|
| 84 | 87 |
|
| 85 | 88 |
$form->{callback} = "gl.pl?action=add" unless $form->{callback};
|
| ... | ... | |
| 1292 | 1295 |
. qq|"> |; |
| 1293 | 1296 |
|
| 1294 | 1297 |
} else {
|
| 1298 |
if ($form->{draft_id}) {
|
|
| 1299 |
my $remove_draft_checked = 'checked' if ($form->{remove_draft});
|
|
| 1300 |
print qq|<p>\n| |
|
| 1301 |
. qq| <input name="remove_draft" id="remove_draft" type="checkbox" class="checkbox" ${remove_draft_checked}>|
|
|
| 1302 |
. qq| <label for="remove_draft">| . $locale->text('Remove Draft') . qq|</label>\n|
|
|
| 1303 |
. qq|</p>\n|; |
|
| 1304 |
} |
|
| 1305 |
|
|
| 1295 | 1306 |
print qq| |
| 1296 | 1307 |
<input class=submit type=submit name=action id=update_button value="| . $locale->text('Update') . qq|">
|
| 1297 |
<input class=submit type=submit name=action value="| . $locale->text('Post') . qq|">|;
|
|
| 1308 |
<input class=submit type=submit name=action value="| . $locale->text('Post') . qq|"> |
|
|
| 1309 |
. NTI($cgi->submit('-name' => 'action', '-value' => $locale->text('Save draft'), '-class' => 'submit'))
|
|
| 1310 |
. $cgi->hidden('-name' => 'draft_id', '-default' => [$form->{draft_id}])
|
|
| 1311 |
. $cgi->hidden('-name' => 'draft_description', '-default' => [$form->{draft_description}]);
|
|
| 1298 | 1312 |
} |
| 1299 | 1313 |
|
| 1300 | 1314 |
print " |
| ... | ... | |
| 1519 | 1533 |
|
| 1520 | 1534 |
post_transaction(); |
| 1521 | 1535 |
|
| 1536 |
remove_draft() if $form->{remove_draft};
|
|
| 1537 |
|
|
| 1522 | 1538 |
$form->{callback} = build_std_url("action=add", "show_details");
|
| 1523 | 1539 |
$form->redirect($form->{callback});
|
| 1524 | 1540 |
|
Auch abrufbar als: Unified diff
Funktion "Als Entwurf speichern" für Dialogbuchungen implementiert.
Teil eines Fixes für Bug 612.