Hide Show 6 lines of Pod
sub
_type_name {
return
'EstimatedBidAndTraffic'
;
}
sub
_namespace_uri {
}
our
@_attributes
= (
qw/
AverageCPC
CTR
Currency
EstimatedMinBid
MatchType
MaxClicksPerWeek
MaxImpressionsPerWeek
MaxTotalCostPerWeek
MinClicksPerWeek
MinImpressionsPerWeek
MinTotalCostPerWeek
/
);
sub
_attributes {
my
$self
=
shift
;
return
(
$self
->SUPER::_attributes,
@_attributes
);
}
our
%_attribute_type
= (
AverageCPC
=>
'double'
,
CTR
=>
'double'
,
Currency
=>
'Currency'
,
EstimatedMinBid
=>
'double'
,
MatchType
=>
'MatchType'
,
MaxClicksPerWeek
=>
'int'
,
MaxImpressionsPerWeek
=>
'int'
,
MaxTotalCostPerWeek
=>
'double'
,
MinClicksPerWeek
=>
'int'
,
MinImpressionsPerWeek
=>
'int'
,
MinTotalCostPerWeek
=>
'double'
,
);
sub
_attribute_type {
my
(
$self
,
$attribute
) =
@_
;
if
(
exists
$_attribute_type
{
$attribute
}) {
return
$_attribute_type
{
$attribute
};
}
return
$self
->SUPER::_attribute_type(
$attribute
);
}
our
%_attribute_min_occurs
= (
AverageCPC
=> 0,
CTR
=> 0,
Currency
=> 0,
EstimatedMinBid
=> 0,
MatchType
=> 0,
MaxClicksPerWeek
=> 0,
MaxImpressionsPerWeek
=> 0,
MaxTotalCostPerWeek
=> 0,
MinClicksPerWeek
=> 0,
MinImpressionsPerWeek
=> 0,
MinTotalCostPerWeek
=> 0,
);
sub
_attribute_min_occurs {
my
(
$self
,
$attribute
) =
@_
;
if
(
exists
$_attribute_min_occurs
{
$attribute
}) {
return
$_attribute_min_occurs
{
$attribute
};
}
return
$self
->SUPER::_attribute_min_occurs(
$attribute
);
}
__PACKAGE__->mk_accessors(
@_attributes
);
1;
Hide Show 58 lines of Pod