tests/testthat/test_pinpointsmsvoicev2.R

In paws.customer.engagement: 'Amazon Web Services' Customer Engagement Services

svc <- paws::pinpointsmsvoicev2()

test_that("describe_account_attributes", {
  expect_error(svc$describe_account_attributes(), NA)
})

test_that("describe_account_attributes", {
  expect_error(svc$describe_account_attributes(MaxResults = 20), NA)
})

test_that("describe_account_limits", {
  expect_error(svc$describe_account_limits(), NA)
})

test_that("describe_account_limits", {
  expect_error(svc$describe_account_limits(MaxResults = 20), NA)
})

test_that("describe_configuration_sets", {
  expect_error(svc$describe_configuration_sets(), NA)
})

test_that("describe_configuration_sets", {
  expect_error(svc$describe_configuration_sets(MaxResults = 20), NA)
})

test_that("describe_opt_out_lists", {
  expect_error(svc$describe_opt_out_lists(), NA)
})

test_that("describe_opt_out_lists", {
  expect_error(svc$describe_opt_out_lists(MaxResults = 20), NA)
})

test_that("describe_phone_numbers", {
  expect_error(svc$describe_phone_numbers(), NA)
})

test_that("describe_phone_numbers", {
  expect_error(svc$describe_phone_numbers(MaxResults = 20), NA)
})

test_that("describe_pools", {
  expect_error(svc$describe_pools(), NA)
})

test_that("describe_pools", {
  expect_error(svc$describe_pools(MaxResults = 20), NA)
})

test_that("describe_sender_ids", {
  expect_error(svc$describe_sender_ids(), NA)
})

test_that("describe_sender_ids", {
  expect_error(svc$describe_sender_ids(MaxResults = 20), NA)
})

test_that("describe_spend_limits", {
  expect_error(svc$describe_spend_limits(), NA)
})

test_that("describe_spend_limits", {
  expect_error(svc$describe_spend_limits(MaxResults = 20), NA)
})