File Coverage

blib/lib/WebService/KvKAPI/LocationProfile.pm

Criterion	Covered	Total	%
statement	18	18	100.0
branch	1	2	50.0
condition			n/a
subroutine	6	6	100.0
pod	1	1	100.0
total	26	27	96.3

use utf8;
package WebService::KvKAPI::LocationProfile;
our $VERSION = '0.105';
# ABSTRACT: Instance of OpenAPI client for locatieprofiel API of the KvK.

use v5.26;
use Object::Pad;
use WebService::KvKAPI::Formatters qw(format_location_number);

class WebService::KvKAPI::LocationProfile :does(WebService::KvKAPI::Roles::OpenAPI);

method get_location_profile {
    my $id  = format_location_number(shift);
    my $geo = shift;
    return $self->api_call(
        'getVestigingByVestigingsnummer',
        vestigingsnummer => $id,
        $geo ? (geoData => 1) : ()
    );
}

1;

=pod

=encoding UTF-8

=head1 NAME

WebService::KvKAPI::LocationProfile - Instance of OpenAPI client for locatieprofiel API of the KvK.

=head1 VERSION

version 0.105

=head1 AUTHOR

Wesley Schwengle

=head1 COPYRIGHT AND LICENSE

This software is Copyright (c) 2018 by Mintlab / Zaaksysteem.nl / xxllnc, see CONTRIBUTORS file for others.

This is free software, licensed under:

  The European Union Public License (EUPL) v1.1

=cut

__DATA__