Revision 468e86a6
Von Moritz Bunkus vor fast 17 Jahren hinzugefügt
| SL/AM.pm | ||
|---|---|---|
| 332 | 332 |
next READTAXKEYS; |
| 333 | 333 |
} |
| 334 | 334 |
|
| 335 |
# check if there is at least one relation to pos_ustva or tax_id |
|
| 336 |
if ( $form->{"taxkey_pos_ustva_$tk_count"} eq '' && $form->{"taxkey_tax_$tk_count"} == 0 ) {
|
|
| 337 |
$tk_count++; |
|
| 338 |
next READTAXKEYS; |
|
| 339 |
} |
|
| 340 |
|
|
| 341 | 335 |
# Add valid taxkeys into the array |
| 342 | 336 |
push @taxkeys , |
| 343 | 337 |
{
|
| ... | ... | |
| 345 | 339 |
tax_id => conv_i($form->{"taxkey_tax_$tk_count"}),
|
| 346 | 340 |
startdate => conv_date($form->{"taxkey_startdate_$tk_count"}),
|
| 347 | 341 |
chart_id => conv_i($form->{"id"}),
|
| 348 |
pos_ustva => $form->{"taxkey_pos_ustva_$tk_count"},
|
|
| 342 |
pos_ustva => conv_i($form->{"taxkey_pos_ustva_$tk_count"}),
|
|
| 349 | 343 |
delete => ( $form->{"taxkey_del_$tk_count"} eq 'delete' ) ? '1' : '',
|
| 350 | 344 |
}; |
| 351 | 345 |
|
Auch abrufbar als: Unified diff
Es muss beim Bearbeiten von Konten möglich sein, einen Steuerschlüssel auf "0" anzulegen, weil das intern überall gemacht wird, wo keine Steuerautomatik vorhanden ist.