# Copyright 2026, Google LLC # # Licensed under the Apache License, Version 2.0 (the "License"); # you may not use this file except in compliance with the License. # You may obtain a copy of the License at # # http://www.apache.org/licenses/LICENSE-2.0 # # Unless required by applicable law or agreed to in writing, software # distributed under the License is distributed on an "AS IS" BASIS, # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. # See the License for the specific language governing permissions and # limitations under the License. package Google::Ads::GoogleAds::V25::Resources::AppliedIncentive; use strict; use warnings; use base qw(Google::Ads::GoogleAds::BaseEntity); use Google::Ads::GoogleAds::Utils::GoogleAdsHelper; sub new { my ($class, $args) = @_; my $self = { couponCode => $args->{couponCode}, currencyCode => $args->{currencyCode}, currentSpendTowardsFulfillmentMicros => $args->{currentSpendTowardsFulfillmentMicros}, fulfillmentExpirationDateTime => $args->{fulfillmentExpirationDateTime}, grantedAmountMicros => $args->{grantedAmountMicros}, incentiveState => $args->{incentiveState}, redemptionDateTime => $args->{redemptionDateTime}, requiredMinSpendMicros => $args->{requiredMinSpendMicros}, resourceName => $args->{resourceName}, rewardAmountMicros => $args->{rewardAmountMicros}, rewardBalanceRemainingMicros => $args->{rewardBalanceRemainingMicros}, rewardExpirationDateTime => $args->{rewardExpirationDateTime}, rewardGrantDateTime => $args->{rewardGrantDateTime} }; # Delete the unassigned fields in this object for a more concise JSON payload remove_unassigned_fields($self, $args); bless $self, $class; return $self; } 1;