Revision bde667c2
Von Moritz Bunkus vor fast 18 Jahren hinzugefügt
| bin/mozilla/ar.pl | ||
|---|---|---|
| 38 | 38 |
|
| 39 | 39 |
require "$form->{path}/arap.pl";
|
| 40 | 40 |
require "bin/mozilla/common.pl"; |
| 41 |
require "bin/mozilla/drafts.pl"; |
|
| 41 | 42 |
|
| 42 | 43 |
1; |
| 43 | 44 |
|
| ... | ... | |
| 73 | 74 |
|
| 74 | 75 |
sub add {
|
| 75 | 76 |
$lxdebug->enter_sub(); |
| 76 |
|
|
| 77 |
|
|
| 78 |
return $lxdebug->leave_sub() if (load_draft_maybe()); |
|
| 79 |
|
|
| 77 | 80 |
# saving the history |
| 78 | 81 |
if(!exists $form->{addition} && ($form->{id} ne "")) {
|
| 79 | 82 |
$form->{addition} = "ADDED";
|
| ... | ... | |
| 494 | 497 |
<input type=hidden name=locked value=$form->{locked}>
|
| 495 | 498 |
<input type=hidden name=title value="$title"> |
| 496 | 499 |
|
| 500 |
| . ($form->{saved_message} ? qq|<p>$form->{saved_message}</p>| : "") . qq|
|
|
| 501 |
|
|
| 497 | 502 |
<table width=100%> |
| 498 | 503 |
<tr class=listtop> |
| 499 | 504 |
<th class=listtop>$form->{title}</th>
|
| ... | ... | |
| 789 | 794 |
<input type=hidden name=path value=$form->{path}>
|
| 790 | 795 |
<input type=hidden name=login value=$form->{login}>
|
| 791 | 796 |
<input type=hidden name=password value=$form->{password}>
|
| 797 |
| |
|
| 798 |
. $cgi->hidden('-name' => 'draft_id', '-default' => [$form->{draft_id}])
|
|
| 799 |
. $cgi->hidden('-name' => 'draft_description', '-default' => [$form->{draft_description}])
|
|
| 800 |
. qq| |
|
| 792 | 801 |
|
| 793 | 802 |
<br> |
| 794 | 803 |
|; |
| ... | ... | |
| 822 | 831 |
} else {
|
| 823 | 832 |
if ($transdate > $closedto) {
|
| 824 | 833 |
print qq|<input class=submit type=submit name=action value="| |
| 825 |
. $locale->text('Post') . qq|">|;
|
|
| 834 |
. $locale->text('Post') . qq|"> | .
|
|
| 835 |
NTI($cgi->submit('-name' => 'action', '-value' => $locale->text('Save draft'),
|
|
| 836 |
'-class' => 'submit')); |
|
| 826 | 837 |
} |
| 827 | 838 |
} |
| 828 | 839 |
|
| ... | ... | |
| 1049 | 1060 |
$form->save_history($form->dbconnect(\%myconfig)); |
| 1050 | 1061 |
} |
| 1051 | 1062 |
# /saving the history |
| 1063 |
remove_draft(); |
|
| 1052 | 1064 |
$form->redirect($locale->text('Transaction posted!'));
|
| 1053 | 1065 |
} |
| 1054 | 1066 |
$form->error($locale->text('Cannot post transaction!'));
|
Auch abrufbar als: Unified diff
Einkaufs-, Verkaufs-, Debitoren- und Kreditorenrechnungen können als Entwurf gespeichert und später weiter bearbeitet werden. Dabei werden sie nicht gebucht.