File Coverage

lib/Google/Ads/AdWords/v201702/ManagedCustomerService/ManagedCustomerServiceInterfacePort.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


line stmt bran cond sub pod time code
1             package Google::Ads::AdWords::v201702::ManagedCustomerService::ManagedCustomerServiceInterfacePort;
2 1     1   6829 use strict;
  1         4  
  1         41  
3 1     1   7 use warnings;
  1         3  
  1         30  
4 1     1   5 use Class::Std::Fast::Storable;
  1         2  
  1         12  
5 1     1   159 use Scalar::Util qw(blessed);
  1         2  
  1         57  
6 1     1   5 use base qw(SOAP::WSDL::Client::Base);
  1         2  
  1         85  
7              
8             # only load if it hasn't been loaded before
9             require Google::Ads::AdWords::v201702::TypeMaps::ManagedCustomerService
10             if not Google::Ads::AdWords::v201702::TypeMaps::ManagedCustomerService->can('get_class');
11              
12             sub START {
13             $_[0]->set_proxy('https://adwords.google.com/api/adwords/mcm/v201702/ManagedCustomerService') if not $_[2]->{proxy};
14             $_[0]->set_class_resolver('Google::Ads::AdWords::v201702::TypeMaps::ManagedCustomerService')
15             if not $_[2]->{class_resolver};
16              
17             $_[0]->set_prefix($_[2]->{use_prefix}) if exists $_[2]->{use_prefix};
18             }
19              
20             sub get {
21             my ($self, $body, $header) = @_;
22             die "get must be called as object method (\$self is <$self>)" if not blessed($self);
23             return $self->SUPER::call({
24             operation => 'get',
25             soap_action => '',
26             style => 'document',
27             body => {
28            
29              
30             'use' => 'literal',
31             namespace => 'http://schemas.xmlsoap.org/wsdl/soap/',
32             encodingStyle => '',
33             parts => [qw( Google::Ads::AdWords::v201702::ManagedCustomerService::get )],
34             },
35             header => {
36            
37              
38              
39             'use' => 'literal',
40             namespace => 'http://schemas.xmlsoap.org/wsdl/soap/',
41             encodingStyle => '',
42             parts => [qw( Google::Ads::AdWords::v201702::ManagedCustomerService::RequestHeader )],
43             },
44             headerfault => {
45            
46             }
47             }, $body, $header);
48             }
49              
50              
51             sub getPendingInvitations {
52             my ($self, $body, $header) = @_;
53             die "getPendingInvitations must be called as object method (\$self is <$self>)" if not blessed($self);
54             return $self->SUPER::call({
55             operation => 'getPendingInvitations',
56             soap_action => '',
57             style => 'document',
58             body => {
59            
60              
61             'use' => 'literal',
62             namespace => 'http://schemas.xmlsoap.org/wsdl/soap/',
63             encodingStyle => '',
64             parts => [qw( Google::Ads::AdWords::v201702::ManagedCustomerService::getPendingInvitations )],
65             },
66             header => {
67            
68              
69              
70             'use' => 'literal',
71             namespace => 'http://schemas.xmlsoap.org/wsdl/soap/',
72             encodingStyle => '',
73             parts => [qw( Google::Ads::AdWords::v201702::ManagedCustomerService::RequestHeader )],
74             },
75             headerfault => {
76            
77             }
78             }, $body, $header);
79             }
80              
81              
82             sub mutate {
83             my ($self, $body, $header) = @_;
84             die "mutate must be called as object method (\$self is <$self>)" if not blessed($self);
85             return $self->SUPER::call({
86             operation => 'mutate',
87             soap_action => '',
88             style => 'document',
89             body => {
90            
91              
92             'use' => 'literal',
93             namespace => 'http://schemas.xmlsoap.org/wsdl/soap/',
94             encodingStyle => '',
95             parts => [qw( Google::Ads::AdWords::v201702::ManagedCustomerService::mutate )],
96             },
97             header => {
98            
99              
100              
101             'use' => 'literal',
102             namespace => 'http://schemas.xmlsoap.org/wsdl/soap/',
103             encodingStyle => '',
104             parts => [qw( Google::Ads::AdWords::v201702::ManagedCustomerService::RequestHeader )],
105             },
106             headerfault => {
107            
108             }
109             }, $body, $header);
110             }
111              
112              
113             sub mutateLabel {
114             my ($self, $body, $header) = @_;
115             die "mutateLabel must be called as object method (\$self is <$self>)" if not blessed($self);
116             return $self->SUPER::call({
117             operation => 'mutateLabel',
118             soap_action => '',
119             style => 'document',
120             body => {
121            
122              
123             'use' => 'literal',
124             namespace => 'http://schemas.xmlsoap.org/wsdl/soap/',
125             encodingStyle => '',
126             parts => [qw( Google::Ads::AdWords::v201702::ManagedCustomerService::mutateLabel )],
127             },
128             header => {
129            
130              
131              
132             'use' => 'literal',
133             namespace => 'http://schemas.xmlsoap.org/wsdl/soap/',
134             encodingStyle => '',
135             parts => [qw( Google::Ads::AdWords::v201702::ManagedCustomerService::RequestHeader )],
136             },
137             headerfault => {
138            
139             }
140             }, $body, $header);
141             }
142              
143              
144             sub mutateLink {
145             my ($self, $body, $header) = @_;
146             die "mutateLink must be called as object method (\$self is <$self>)" if not blessed($self);
147             return $self->SUPER::call({
148             operation => 'mutateLink',
149             soap_action => '',
150             style => 'document',
151             body => {
152            
153              
154             'use' => 'literal',
155             namespace => 'http://schemas.xmlsoap.org/wsdl/soap/',
156             encodingStyle => '',
157             parts => [qw( Google::Ads::AdWords::v201702::ManagedCustomerService::mutateLink )],
158             },
159             header => {
160            
161              
162              
163             'use' => 'literal',
164             namespace => 'http://schemas.xmlsoap.org/wsdl/soap/',
165             encodingStyle => '',
166             parts => [qw( Google::Ads::AdWords::v201702::ManagedCustomerService::RequestHeader )],
167             },
168             headerfault => {
169            
170             }
171             }, $body, $header);
172             }
173              
174              
175             sub mutateManager {
176             my ($self, $body, $header) = @_;
177             die "mutateManager must be called as object method (\$self is <$self>)" if not blessed($self);
178             return $self->SUPER::call({
179             operation => 'mutateManager',
180             soap_action => '',
181             style => 'document',
182             body => {
183            
184              
185             'use' => 'literal',
186             namespace => 'http://schemas.xmlsoap.org/wsdl/soap/',
187             encodingStyle => '',
188             parts => [qw( Google::Ads::AdWords::v201702::ManagedCustomerService::mutateManager )],
189             },
190             header => {
191            
192              
193              
194             'use' => 'literal',
195             namespace => 'http://schemas.xmlsoap.org/wsdl/soap/',
196             encodingStyle => '',
197             parts => [qw( Google::Ads::AdWords::v201702::ManagedCustomerService::RequestHeader )],
198             },
199             headerfault => {
200            
201             }
202             }, $body, $header);
203             }
204              
205              
206              
207              
208             1;
209              
210              
211              
212             __END__