Revision 00f239f3
Von Jan Büren vor etwa 2 Jahren hinzugefügt
bin/mozilla/ap.pl | ||
---|---|---|
394 | 394 |
# type=submit $locale->text('Add Accounts Payables Transaction') |
395 | 395 |
# type=submit $locale->text('Edit Accounts Payables Transaction') |
396 | 396 |
|
397 |
my $readonly = $form->{id} ? "readonly" : ""; |
|
398 |
|
|
399 |
$form->{radier} = ($::instance_conf->get_ap_changeable == 2) |
|
400 |
? ($form->current_date(\%myconfig) eq $form->{gldate}) |
|
401 |
: ($::instance_conf->get_ap_changeable == 1); |
|
402 |
$readonly = $form->{radier} ? "" : $readonly; |
|
403 |
|
|
404 |
$form->{readonly} = $readonly; |
|
405 |
|
|
406 | 397 |
# currencies |
407 | 398 |
$form->{defaultcurrency} = $form->get_default_currency(\%myconfig); |
408 | 399 |
if ($form->{currency} ne $form->{defaultcurrency}) { |
... | ... | |
1395 | 1386 |
if ($::form->{id} && SL::DB::Manager::ApGl->find_by(ap_id => $::form->{id})) { |
1396 | 1387 |
$is_linked_gl_transaction = 1; |
1397 | 1388 |
} |
1389 |
# add readonly state in $::form |
|
1390 |
$::form->{readonly} = !$may_edit_create ? 1 |
|
1391 |
: $is_closed ? 1 |
|
1392 |
: $is_storno ? 1 |
|
1393 |
: $has_storno ? 1 |
|
1394 |
: ($::form->{id} && $change_never) ? 1 |
|
1395 |
: ($::form->{id} && $change_on_same_day_only) ? 1 |
|
1396 |
: $is_linked_bank_transaction ? 1 |
|
1397 |
: $has_sepa_exports ? 1 |
|
1398 |
: 0; |
|
1398 | 1399 |
|
1399 | 1400 |
my $create_post_action = sub { |
1400 | 1401 |
# $_[0]: description |
Auch abrufbar als: Unified diff
Wechselkurs in form_header anzeigen, inkl. Herkunft (Beleg oder Tageskurs)
> form>radier entfernt und den Zustand readonly in allen 4Buchungsmasken auch anhand der Zustände der action_bar Knöpfe
abhängig gemacht (in form oder TMPL_VARS gesetzt)