Added supplier location endpoint
This commit is contained in:
parent
df90f62b7a
commit
5e078f8f8b
8 changed files with 414 additions and 1 deletions
|
@ -63,4 +63,16 @@ sub name {
|
|||
}
|
||||
}
|
||||
|
||||
sub type_object {
|
||||
my $self = shift;
|
||||
|
||||
if ( $self->type eq 'customer' ) {
|
||||
return $self->customer;
|
||||
} elsif ( $self->type eq 'organisation' ) {
|
||||
return $self->organisation;
|
||||
} else {
|
||||
return;
|
||||
}
|
||||
}
|
||||
|
||||
1;
|
||||
|
|
Reference in a new issue