Revision 2e66dde5
Von Moritz Bunkus vor mehr als 11 Jahren hinzugefügt
| bin/mozilla/ustva.pl | ||
|---|---|---|
| 38 | 38 |
|
| 39 | 39 |
use List::Util qw(first); |
| 40 | 40 |
|
| 41 |
use SL::DB::Default; |
|
| 41 | 42 |
use SL::PE; |
| 42 | 43 |
use SL::RP; |
| 43 | 44 |
use SL::USTVA; |
| ... | ... | |
| 225 | 226 |
$::auth->assert('advance_turnover_tax_return');
|
| 226 | 227 |
|
| 227 | 228 |
# parse help documents under doc |
| 228 |
my $tmp = $::form->{templates};
|
|
| 229 | 229 |
$::form->{templates} = 'doc';
|
| 230 | 230 |
$::form->{help} = 'ustva';
|
| 231 | 231 |
$::form->{type} = 'help';
|
| 232 | 232 |
$::form->{format} = 'html';
|
| 233 | 233 |
generate_ustva(); |
| 234 | 234 |
|
| 235 |
#$form->{templates} = $tmp;
|
|
| 236 | 235 |
$::lxdebug->leave_sub(); |
| 237 | 236 |
} |
| 238 | 237 |
|
| ... | ... | |
| 543 | 542 |
|
| 544 | 543 |
$::auth->assert('advance_turnover_tax_return');
|
| 545 | 544 |
|
| 545 |
my $defaults = SL::DB::Default->get; |
|
| 546 |
$form->error($::locale->text('No print templates have been created for this client yet. Please do so in the client configuration.')) if !$defaults->templates;
|
|
| 547 |
$form->{templates} = $defaults->templates;
|
|
| 548 |
|
|
| 546 | 549 |
# Aufruf von get_config zum Einlesen der Finanzamtdaten aus finanzamt.ini |
| 547 | 550 |
|
| 548 | 551 |
my $ustva = USTVA->new(); |
| ... | ... | |
| 1060 | 1063 |
. '!'); |
| 1061 | 1064 |
} |
| 1062 | 1065 |
|
| 1063 |
$form->{templates} = $myconfig{templates};
|
|
| 1064 | 1066 |
$form->{templates} = "doc" if ( $form->{type} eq 'help' );
|
| 1065 | 1067 |
|
| 1066 | 1068 |
if ($form->{format} eq 'generic'){
|
Auch abrufbar als: Unified diff
'templates' nicht aus %::myconfig, sondern aus Defaults-Tabelle holen