Changes for release v14_0. (#107)

Build.PL

@@ -42,7 +42,19 @@ $build_sc->new(
   create_makefile_pl => "traditional",
   dist_abstract      => "Google Ads API Client Library for Perl",
   dist_name          => "Google-Ads-GoogleAds-Client",
-  dist_version       => "16.1.0",
+  dist_version       => "17.0.0",
+  no_index           => {
+    namespace => [
+      "Google::Ads::GoogleAds::V12::Enums",
+	  "Google::Ads::GoogleAds::V12::Common",
+	  "Google::Ads::GoogleAds::V12::Resources",
+	  "Google::Ads::GoogleAds::V12::Services",
+      "Google::Ads::GoogleAds::V13::Enums",
+	  "Google::Ads::GoogleAds::V13::Common",
+	  "Google::Ads::GoogleAds::V13::Resources",
+	  "Google::Ads::GoogleAds::V13::Services",
+    ],
+  },
   requires           => {
     "Class::Load"                  => 0,
     "Class::Std::Fast"             => 0,

CHANGELOG.md

@@ -1,3 +1,13 @@
+17.0.0 - 2023-06-08
+-------------------
+- Added support for Google Ads API v14.
+- Removed examples: generate_forecast_metrics, generate_historical_metrics,
+  get_campaign_criterion_bid_modifier_simulations.
+
+16.1.2 - 2023-05-17
+-------------------
+- Mark namespaces as no_index to avoid PAUSE indexing issues.
+
 16.1.0 - 2023-04-28
 -------------------
 - Added support for Google Ads API v13.1.

examples/account_management/approve_merchant_center_link.pl

@@ -33,11 +33,11 @@
 use Google::Ads::GoogleAds::Client;
 use Google::Ads::GoogleAds::Utils::GoogleAdsHelper;
 use Google::Ads::GoogleAds::Utils::FieldMasks;
-use Google::Ads::GoogleAds::V13::Resources::MerchantCenterLink;
-use Google::Ads::GoogleAds::V13::Enums::MerchantCenterLinkStatusEnum
+use Google::Ads::GoogleAds::V14::Resources::MerchantCenterLink;
+use Google::Ads::GoogleAds::V14::Enums::MerchantCenterLinkStatusEnum
   qw(ENABLED PENDING);
 use
-  Google::Ads::GoogleAds::V13::Services::MerchantCenterLinkService::MerchantCenterLinkOperation;
+  Google::Ads::GoogleAds::V14::Services::MerchantCenterLinkService::MerchantCenterLinkOperation;
 
 use Getopt::Long qw(:config auto_help);
 use Pod::Usage;
@@ -106,7 +106,7 @@ sub update_merchant_center_link_status {
   # Create an updated MerchantCenterLink object derived from the original, but
   # with the specified status.
   my $merchant_center_link_to_update =
-    Google::Ads::GoogleAds::V13::Resources::MerchantCenterLink->new({
+    Google::Ads::GoogleAds::V14::Resources::MerchantCenterLink->new({
       resourceName => $merchant_center_link->{resourceName},
       status       => $new_merchant_center_link_status
     });
@@ -115,7 +115,7 @@ sub update_merchant_center_link_status {
   # FieldMasks utility to derive the update mask. This mask tells the Google Ads
   # API which attributes of the Merchant Center link you want to change.
   my $merchant_center_link_operation =
-    Google::Ads::GoogleAds::V13::Services::MerchantCenterLinkService::MerchantCenterLinkOperation
+    Google::Ads::GoogleAds::V14::Services::MerchantCenterLinkService::MerchantCenterLinkOperation
     ->new({
       update     => $merchant_center_link_to_update,
       updateMask => all_set_fields_of($merchant_center_link_to_update)});

examples/account_management/create_customer.pl

@@ -29,7 +29,7 @@
 use lib "$Bin/../../lib";
 use Google::Ads::GoogleAds::Client;
 use Google::Ads::GoogleAds::Utils::GoogleAdsHelper;
-use Google::Ads::GoogleAds::V13::Resources::Customer;
+use Google::Ads::GoogleAds::V14::Resources::Customer;
 
 use Getopt::Long qw(:config auto_help);
 use Pod::Usage;
@@ -51,7 +51,7 @@ sub create_customer {
   my ($api_client, $manager_customer_id) = @_;
 
   # Initialize a customer to be created.
-  my $customer = Google::Ads::GoogleAds::V13::Resources::Customer->new({
+  my $customer = Google::Ads::GoogleAds::V14::Resources::Customer->new({
       descriptiveName => "Account created with CustomerService on #" . uniqid(),
 
       # For a list of valid currency codes and time zones, see this documentation:

examples/account_management/get_account_hierarchy.pl

@@ -32,7 +32,7 @@
 use Google::Ads::GoogleAds::Utils::GoogleAdsHelper;
 use Google::Ads::GoogleAds::Utils::SearchStreamHandler;
 use
-  Google::Ads::GoogleAds::V13::Services::GoogleAdsService::SearchGoogleAdsStreamRequest;
+  Google::Ads::GoogleAds::V14::Services::GoogleAdsService::SearchGoogleAdsStreamRequest;
 
 use Getopt::Long qw(:config auto_help);
 use Pod::Usage;
@@ -177,7 +177,7 @@ ()
       Google::Ads::GoogleAds::Utils::SearchStreamHandler->new({
         service => $google_ads_service,
         request =>
-          Google::Ads::GoogleAds::V13::Services::GoogleAdsService::SearchGoogleAdsStreamRequest
+          Google::Ads::GoogleAds::V14::Services::GoogleAdsService::SearchGoogleAdsStreamRequest
           ->new({
             customerId => $customer_id_to_search,
             query      => $search_query,

examples/account_management/get_change_details.pl

@@ -27,12 +27,12 @@
 use Google::Ads::GoogleAds::Utils::GoogleAdsHelper;
 use Google::Ads::GoogleAds::Utils::SearchGoogleAdsIterator;
 use Google::Ads::GoogleAds::Utils::FieldMasks;
-use Google::Ads::GoogleAds::V13::Enums::ResourceChangeOperationEnum
+use Google::Ads::GoogleAds::V14::Enums::ResourceChangeOperationEnum
   qw(CREATE UPDATE);
-use Google::Ads::GoogleAds::V13::Enums::ChangeEventResourceTypeEnum
+use Google::Ads::GoogleAds::V14::Enums::ChangeEventResourceTypeEnum
   qw(AD AD_GROUP AD_GROUP_AD AD_GROUP_ASSET AD_GROUP_CRITERION AD_GROUP_BID_MODIFIER ASSET ASSET_SET ASSET_SET_ASSET CAMPAIGN CAMPAIGN_ASSET CAMPAIGN_ASSET_SET CAMPAIGN_BUDGET CAMPAIGN_CRITERION AD_GROUP_FEED CAMPAIGN_FEED CUSTOMER_ASSET FEED FEED_ITEM);
 use
-  Google::Ads::GoogleAds::V13::Services::GoogleAdsService::SearchGoogleAdsRequest;
+  Google::Ads::GoogleAds::V14::Services::GoogleAdsService::SearchGoogleAdsRequest;
 
 use Getopt::Long qw(:config auto_help);
 use JSON::XS;
@@ -74,7 +74,7 @@ sub get_change_details {
   # Create a search Google Ads request that will retrieve all change events using
   # pages of the specified page size.
   my $search_request =
-    Google::Ads::GoogleAds::V13::Services::GoogleAdsService::SearchGoogleAdsRequest
+    Google::Ads::GoogleAds::V14::Services::GoogleAdsService::SearchGoogleAdsRequest
     ->new({
       customerId => $customer_id,
       query      => $search_query,

examples/account_management/get_change_summary.pl

@@ -26,10 +26,10 @@
 use Google::Ads::GoogleAds::Client;
 use Google::Ads::GoogleAds::Utils::GoogleAdsHelper;
 use Google::Ads::GoogleAds::Utils::SearchGoogleAdsIterator;
-use Google::Ads::GoogleAds::V13::Enums::ChangeStatusResourceTypeEnum
+use Google::Ads::GoogleAds::V14::Enums::ChangeStatusResourceTypeEnum
   qw(AD_GROUP AD_GROUP_AD AD_GROUP_CRITERION CAMPAIGN CAMPAIGN_CRITERION FEED FEED_ITEM AD_GROUP_FEED CAMPAIGN_FEED AD_GROUP_BID_MODIFIER);
 use
-  Google::Ads::GoogleAds::V13::Services::GoogleAdsService::SearchGoogleAdsRequest;
+  Google::Ads::GoogleAds::V14::Services::GoogleAdsService::SearchGoogleAdsRequest;
 
 use Getopt::Long qw(:config auto_help);
 use Pod::Usage;
@@ -75,7 +75,7 @@ sub get_change_summary {
   # Create a search Google Ads request that will retrieve all change statuses using
   # pages of the specified page size.
   my $search_request =
-    Google::Ads::GoogleAds::V13::Services::GoogleAdsService::SearchGoogleAdsRequest
+    Google::Ads::GoogleAds::V14::Services::GoogleAdsService::SearchGoogleAdsRequest
     ->new({
       customerId => $customer_id,
       query      => $search_query,

examples/account_management/get_pending_invitations.pl

@@ -27,7 +27,7 @@
 use Google::Ads::GoogleAds::Utils::GoogleAdsHelper;
 use Google::Ads::GoogleAds::Utils::SearchStreamHandler;
 use
-  Google::Ads::GoogleAds::V13::Services::GoogleAdsService::SearchGoogleAdsStreamRequest;
+  Google::Ads::GoogleAds::V14::Services::GoogleAdsService::SearchGoogleAdsStreamRequest;
 
 use Getopt::Long qw(:config auto_help);
 use Pod::Usage;
@@ -59,7 +59,7 @@ sub get_pending_invitations {
   # Create a search Google Ads stream request that will retrieve the pending
   # invitations.
   my $search_stream_request =
-    Google::Ads::GoogleAds::V13::Services::GoogleAdsService::SearchGoogleAdsStreamRequest
+    Google::Ads::GoogleAds::V14::Services::GoogleAdsService::SearchGoogleAdsStreamRequest
     ->new({
       customerId => $customer_id,
       query      => $search_query,

examples/account_management/invite_user_with_access_role.pl

@@ -25,9 +25,9 @@
 use lib "$Bin/../../lib";
 use Google::Ads::GoogleAds::Client;
 use Google::Ads::GoogleAds::Utils::GoogleAdsHelper;
-use Google::Ads::GoogleAds::V13::Resources::CustomerUserAccessInvitation;
+use Google::Ads::GoogleAds::V14::Resources::CustomerUserAccessInvitation;
 use
-  Google::Ads::GoogleAds::V13::Services::CustomerUserAccessInvitationService::CustomerUserAccessInvitationOperation;
+  Google::Ads::GoogleAds::V14::Services::CustomerUserAccessInvitationService::CustomerUserAccessInvitationOperation;
 
 use Getopt::Long qw(:config auto_help);
 use Pod::Usage;
@@ -43,7 +43,7 @@
 # Running the example with -h will print the command line usage.
 my $customer_id   = "INSERT_CUSTOMER_ID_HERE";
 my $email_address = "INSERT_EMAIL_ADDRESS_HERE";
-# See Google::Ads::GoogleAds::V13::Enums::AccessRoleEnum for optional values.
+# See Google::Ads::GoogleAds::V14::Enums::AccessRoleEnum for optional values.
 my $access_role = "INSERT_ACCESS_ROLE_HERE";
 
 # [START invite_user_with_access_role]
@@ -52,14 +52,14 @@ sub invite_user_with_access_role {
 
   # Create the user access invitation.
   my $user_access_invitation =
-    Google::Ads::GoogleAds::V13::Resources::CustomerUserAccessInvitation->new({
+    Google::Ads::GoogleAds::V14::Resources::CustomerUserAccessInvitation->new({
       emailAddress => $email_address,
       accessRole   => $access_role
     });
 
   # Create the user access invitation operation.
   my $invitation_operation =
-    Google::Ads::GoogleAds::V13::Services::CustomerUserAccessInvitationService::CustomerUserAccessInvitationOperation
+    Google::Ads::GoogleAds::V14::Services::CustomerUserAccessInvitationService::CustomerUserAccessInvitationOperation
     ->new({create => $user_access_invitation});
 
   # Send the user access invitation.

examples/account_management/link_manager_to_client.pl

@@ -26,15 +26,15 @@
 use Google::Ads::GoogleAds::Client;
 use Google::Ads::GoogleAds::Utils::GoogleAdsHelper;
 use Google::Ads::GoogleAds::Utils::FieldMasks;
-use Google::Ads::GoogleAds::V13::Resources::CustomerClientLink;
-use Google::Ads::GoogleAds::V13::Resources::CustomerManagerLink;
-use Google::Ads::GoogleAds::V13::Enums::ManagerLinkStatusEnum
+use Google::Ads::GoogleAds::V14::Resources::CustomerClientLink;
+use Google::Ads::GoogleAds::V14::Resources::CustomerManagerLink;
+use Google::Ads::GoogleAds::V14::Enums::ManagerLinkStatusEnum
   qw(PENDING ACTIVE);
 use
-  Google::Ads::GoogleAds::V13::Services::CustomerClientLinkService::CustomerClientLinkOperation;
+  Google::Ads::GoogleAds::V14::Services::CustomerClientLinkService::CustomerClientLinkOperation;
 use
-  Google::Ads::GoogleAds::V13::Services::CustomerManagerLinkService::CustomerManagerLinkOperation;
-use Google::Ads::GoogleAds::V13::Utils::ResourceNames;
+  Google::Ads::GoogleAds::V14::Services::CustomerManagerLinkService::CustomerManagerLinkOperation;
+use Google::Ads::GoogleAds::V14::Utils::ResourceNames;
 
 use Getopt::Long qw(:config auto_help);
 use Pod::Usage;
@@ -66,16 +66,16 @@ sub link_manager_to_client {
 
   # Create a customer client link.
   my $api_client_link =
-    Google::Ads::GoogleAds::V13::Resources::CustomerClientLink->new({
+    Google::Ads::GoogleAds::V14::Resources::CustomerClientLink->new({
       clientCustomer =>
-        Google::Ads::GoogleAds::V13::Utils::ResourceNames::customer(
+        Google::Ads::GoogleAds::V14::Utils::ResourceNames::customer(
         $api_client_customer_id),
       status => PENDING
     });
 
   # Create a customer client link operation.
   my $api_client_link_operation =
-    Google::Ads::GoogleAds::V13::Services::CustomerClientLinkService::CustomerClientLinkOperation
+    Google::Ads::GoogleAds::V14::Services::CustomerClientLinkService::CustomerClientLinkOperation
     ->new({
       create => $api_client_link
     });
@@ -110,7 +110,7 @@ sub link_manager_to_client {
     $search_response->{results}[0]{customerClientLink}{managerLinkId};
 
   my $manager_link_resource_name =
-    Google::Ads::GoogleAds::V13::Utils::ResourceNames::customer_manager_link(
+    Google::Ads::GoogleAds::V14::Utils::ResourceNames::customer_manager_link(
     $api_client_customer_id, $manager_customer_id, $manager_link_id);
 
   # Step 3: Accept the manager customer's link invitation while authenticating
@@ -119,14 +119,14 @@ sub link_manager_to_client {
 
   # Create a customer manager link.
   my $manager_link =
-    Google::Ads::GoogleAds::V13::Resources::CustomerManagerLink->new({
+    Google::Ads::GoogleAds::V14::Resources::CustomerManagerLink->new({
       resourceName => $manager_link_resource_name,
       status       => ACTIVE
     });
 
   # Create a customer manager link operation.
   my $manager_link_operation =
-    Google::Ads::GoogleAds::V13::Services::CustomerManagerLinkService::CustomerManagerLinkOperation
+    Google::Ads::GoogleAds::V14::Services::CustomerManagerLinkService::CustomerManagerLinkOperation
     ->new({
       update     => $manager_link,
       updateMask => all_set_fields_of($manager_link)});

examples/account_management/reject_merchant_center_link.pl

@@ -32,7 +32,7 @@
 use Google::Ads::GoogleAds::Client;
 use Google::Ads::GoogleAds::Utils::GoogleAdsHelper;
 use
-  Google::Ads::GoogleAds::V13::Services::MerchantCenterLinkService::MerchantCenterLinkOperation;
+  Google::Ads::GoogleAds::V14::Services::MerchantCenterLinkService::MerchantCenterLinkOperation;
 
 use Getopt::Long qw(:config auto_help);
 use Pod::Usage;
@@ -92,7 +92,7 @@ sub remove_merchant_center_link {
 
   # Create a single remove operation, specifying the Merchant Center link resource name.
   my $merchant_center_link_operation =
-    Google::Ads::GoogleAds::V13::Services::MerchantCenterLinkService::MerchantCenterLinkOperation
+    Google::Ads::GoogleAds::V14::Services::MerchantCenterLinkService::MerchantCenterLinkOperation
     ->new({
       remove => $merchant_center_link->{resourceName}});
 

examples/account_management/update_user_access.pl

@@ -30,12 +30,12 @@
 use Google::Ads::GoogleAds::Utils::GoogleAdsHelper;
 use Google::Ads::GoogleAds::Utils::SearchGoogleAdsIterator;
 use Google::Ads::GoogleAds::Utils::FieldMasks;
-use Google::Ads::GoogleAds::V13::Resources::CustomerUserAccess;
+use Google::Ads::GoogleAds::V14::Resources::CustomerUserAccess;
 use
-  Google::Ads::GoogleAds::V13::Services::GoogleAdsService::SearchGoogleAdsRequest;
+  Google::Ads::GoogleAds::V14::Services::GoogleAdsService::SearchGoogleAdsRequest;
 use
-  Google::Ads::GoogleAds::V13::Services::CustomerUserAccessService::CustomerUserAccessOperation;
-use Google::Ads::GoogleAds::V13::Utils::ResourceNames;
+  Google::Ads::GoogleAds::V14::Services::CustomerUserAccessService::CustomerUserAccessOperation;
+use Google::Ads::GoogleAds::V14::Utils::ResourceNames;
 
 use Getopt::Long qw(:config auto_help);
 use Pod::Usage;
@@ -51,7 +51,7 @@
 # Running the example with -h will print the command line usage.
 my $customer_id   = "INSERT_CUSTOMER_ID_HERE";
 my $email_address = "INSERT_EMAIL_ADDRESS_HERE";
-# See Google::Ads::GoogleAds::V13::Enums::AccessRoleEnum for optional values.
+# See Google::Ads::GoogleAds::V14::Enums::AccessRoleEnum for optional values.
 my $access_role = "INSERT_ACCESS_ROLE_HERE";
 
 sub update_user_access {
@@ -79,7 +79,7 @@ sub get_user_access {
 
   # Create a search Google Ads request that will retrieve the customer user access.
   my $search_request =
-    Google::Ads::GoogleAds::V13::Services::GoogleAdsService::SearchGoogleAdsRequest
+    Google::Ads::GoogleAds::V14::Services::GoogleAdsService::SearchGoogleAdsRequest
     ->new({
       customerId => $customer_id,
       query      => $search_query
@@ -115,17 +115,17 @@ sub modify_user_access {
 
   # Create the modified user access.
   my $user_access =
-    Google::Ads::GoogleAds::V13::Resources::CustomerUserAccess->new({
+    Google::Ads::GoogleAds::V14::Resources::CustomerUserAccess->new({
       resourceName =>
-        Google::Ads::GoogleAds::V13::Utils::ResourceNames::customer_user_access(
+        Google::Ads::GoogleAds::V14::Utils::ResourceNames::customer_user_access(
         $customer_id, $user_id
         ),
       accessRole => $access_role
     });
 
   # Create the operation.
   my $user_access_operation =
-    Google::Ads::GoogleAds::V13::Services::CustomerUserAccessService::CustomerUserAccessOperation
+    Google::Ads::GoogleAds::V14::Services::CustomerUserAccessService::CustomerUserAccessOperation
     ->new({
       update     => $user_access,
       updateMask => all_set_fields_of($user_access)});