$self->{cv}->delete(cascade => 1);
my $snumbers = $self->is_vendor() ? 'vendornumber_'. $self->{cv}->vendornumber : 'customernumber_'. $self->{cv}->customernumber;
$self->{cv}->delete(cascade => 1);
my $snumbers = $self->is_vendor() ? 'vendornumber_'. $self->{cv}->vendornumber : 'customernumber_'. $self->{cv}->customernumber;
if ( $self->{contact}->used ) {
$self->{contact}->detach();
$self->{contact}->save();
if ( $self->{contact}->used ) {
$self->{contact}->detach();
$self->{contact}->save();
$self->{contact}->delete(cascade => 1);
SL::Helper::Flash::flash('info', $::locale->text('Contact deleted.'));
}
$self->{contact}->delete(cascade => 1);
SL::Helper::Flash::flash('info', $::locale->text('Contact deleted.'));
}
if ( $self->{shipto}->used ) {
$self->{shipto}->detach();
$self->{shipto}->save(cascade => 1);
if ( $self->{shipto}->used ) {
$self->{shipto}->detach();
$self->{shipto}->save(cascade => 1);
$self->{shipto}->delete(cascade => 1);
SL::Helper::Flash::flash('info', $::locale->text('Shipto deleted.'));
}
$self->{shipto}->delete(cascade => 1);
SL::Helper::Flash::flash('info', $::locale->text('Shipto deleted.'));
}