File Coverage

lib/Google/Ads/AdWords/v201702/BatchJobOpsService/BatchJobOpsServiceInterfacePort.pm

Criterion	Covered	Total	%
statement	15	15	100.0
branch			n/a
condition			n/a
subroutine	5	5	100.0
pod			n/a
total	20	20	100.0

package Google::Ads::AdWords::v201702::BatchJobOpsService::BatchJobOpsServiceInterfacePort;
use strict;
use warnings;
use Class::Std::Fast::Storable;
use Scalar::Util qw(blessed);
use base qw(SOAP::WSDL::Client::Base);

# only load if it hasn't been loaded before
require Google::Ads::AdWords::v201702::TypeMaps::BatchJobOpsService
    if not Google::Ads::AdWords::v201702::TypeMaps::BatchJobOpsService->can('get_class');

sub START {
    $_[0]->set_proxy('https://en.wikipedia.org/wiki/Null_device') if not $_[2]->{proxy};
    $_[0]->set_class_resolver('Google::Ads::AdWords::v201702::TypeMaps::BatchJobOpsService')
        if not $_[2]->{class_resolver};

    $_[0]->set_prefix($_[2]->{use_prefix}) if exists $_[2]->{use_prefix};
}

sub mutate {
    my ($self, $body, $header) = @_;
    die "mutate must be called as object method (\$self is <$self>)" if not blessed($self);
    return $self->SUPER::call({
        operation => 'mutate',
        soap_action => '',
        style => 'document',
        body => {


           'use'            => 'literal',
            namespace       => 'http://schemas.xmlsoap.org/wsdl/soap/',
            encodingStyle   => '',
            parts           =>  [qw( Google::Ads::AdWords::v201702::BatchJobOpsService::mutate )],
        },
        header => {

        },
        headerfault => {

        }
    }, $body, $header);
}




1;



__END__