scalar => [ qw(table) ],
);
+sub set_profile_defaults {
+};
+
sub init_class {
my ($self) = @_;
$self->class('SL::DB::Contact');
if ($object->cp_id) {
my $existing_contact = $contacts_by_id{ $object->cp_id };
if (!$existing_contact) {
- $contacts_by_id{ $object->cp_id } = $object;
+ $contacts_by_id{ $object->cp_id } = $object if $object->cp_id;
} elsif ($update_policy eq 'skip') {
push(@{ $entry->{errors} }, $::locale->text('Skipping due to existing entry in database'));
};
}
-sub field_lengths {
- return ( cp_title => 75,
- cp_givenname => 75,
- cp_name => 75,
- cp_phone1 => 75,
- cp_phone2 => 75,
- cp_gender => 1,
- );
-}
-
sub setup_displayable_columns {
my ($self) = @_;
{ name => 'customer', description => $::locale->text('Customer (name)') },
{ name => 'customernumber', description => $::locale->text('Customer Number') },
+ { name => 'customer_gln', description => $::locale->text('Customer GLN') },
{ name => 'vendor', description => $::locale->text('Vendor (name)') },
{ name => 'vendornumber', description => $::locale->text('Vendor Number') },
+ { name => 'vendor_gln', description => $::locale->text('Vendor GLN') },
);
}