Revision 0af1d584
Von Tamino Steinert vor mehr als 1 Jahr hinzugefügt
| SL/IS.pm | ||
|---|---|---|
|
return $result;
|
||
|
}
|
||
|
|
||
|
sub has_hard_links {
|
||
|
$main::lxdebug->enter_sub();
|
||
|
my ($self, $myconfig, $form, $table) = @_;
|
||
|
$main::lxdebug->leave_sub() and return 0 unless ($form->{id});
|
||
|
my $result = 0;
|
||
|
if ($table eq 'ap') {
|
||
|
require SL::DB::PurchaseInvoice;
|
||
|
my $record = SL::DB::PurchaseInvoice->new(id => $form->{id})->load;
|
||
|
$result = SL::DB::Helper::HardRecordLinks->get_count($record);
|
||
|
}
|
||
|
$main::lxdebug->leave_sub();
|
||
|
|
||
|
return $result;
|
||
|
}
|
||
|
|
||
|
sub is_storno {
|
||
|
$main::lxdebug->enter_sub();
|
||
|
|
||
Auch abrufbar als: Unified diff
Deaktiviere Löschen-Button bei festen Verknüpfungen (order, ap)