Revision c954dea7
Von Moritz Bunkus vor fast 8 Jahren hinzugefügt
| SL/GL.pm | ||
|---|---|---|
| 45 | 45 |
use SL::DATEV qw(:CONSTANTS); |
| 46 | 46 |
use SL::DBUtils; |
| 47 | 47 |
use SL::DB::Chart; |
| 48 |
use SL::DB::Draft; |
|
| 48 | 49 |
use SL::Util qw(trim); |
| 49 | 50 |
use SL::DB; |
| 50 | 51 |
|
| ... | ... | |
| 190 | 191 |
do_query($form, $dbh, qq|UPDATE gl SET storno = 't' WHERE id = ?|, conv_i($form->{storno_id}));
|
| 191 | 192 |
} |
| 192 | 193 |
|
| 194 |
if ($form->{draft_id}) {
|
|
| 195 |
SL::DB::Manager::Draft->delete_all(where => [ id => delete($form->{draft_id}) ]);
|
|
| 196 |
} |
|
| 197 |
|
|
| 193 | 198 |
# safety check datev export |
| 194 | 199 |
if ($::instance_conf->get_datev_check_on_gl_transaction) {
|
| 195 | 200 |
my $transdate = $::form->{transdate} ? DateTime->from_lxoffice($::form->{transdate}) : undef;
|
Auch abrufbar als: Unified diff
Entwürfe: beim Buchen dazugehörigen Entwurf löschen