diff --git a/amazonka-dynamodb.cabal b/amazonka-dynamodb.cabal
--- a/amazonka-dynamodb.cabal
+++ b/amazonka-dynamodb.cabal
@@ -1,5 +1,5 @@
 name:                  amazonka-dynamodb
-version:               0.0.6
+version:               0.0.7
 synopsis:              Amazon DynamoDB SDK.
 homepage:              https://github.com/brendanhay/amazonka
 license:               OtherLicense
@@ -57,5 +57,5 @@
     other-modules:
 
     build-depends:
-          amazonka-core == 0.0.6.*
+          amazonka-core == 0.0.7.*
         , base          >= 4.7     && < 5
diff --git a/gen/Network/AWS/DynamoDB/BatchGetItem.hs b/gen/Network/AWS/DynamoDB/BatchGetItem.hs
--- a/gen/Network/AWS/DynamoDB/BatchGetItem.hs
+++ b/gen/Network/AWS/DynamoDB/BatchGetItem.hs
@@ -234,6 +234,6 @@
 
 instance FromJSON BatchGetItemResponse where
     parseJSON = withObject "BatchGetItemResponse" $ \o -> BatchGetItemResponse
-        <$> o .:  "ConsumedCapacity"
-        <*> o .:  "Responses"
-        <*> o .:  "UnprocessedKeys"
+        <$> o .:? "ConsumedCapacity" .!= mempty
+        <*> o .:? "Responses" .!= mempty
+        <*> o .:? "UnprocessedKeys" .!= mempty
diff --git a/gen/Network/AWS/DynamoDB/BatchWriteItem.hs b/gen/Network/AWS/DynamoDB/BatchWriteItem.hs
--- a/gen/Network/AWS/DynamoDB/BatchWriteItem.hs
+++ b/gen/Network/AWS/DynamoDB/BatchWriteItem.hs
@@ -301,6 +301,6 @@
 
 instance FromJSON BatchWriteItemResponse where
     parseJSON = withObject "BatchWriteItemResponse" $ \o -> BatchWriteItemResponse
-        <$> o .:  "ConsumedCapacity"
-        <*> o .:  "ItemCollectionMetrics"
-        <*> o .:  "UnprocessedItems"
+        <$> o .:? "ConsumedCapacity" .!= mempty
+        <*> o .:? "ItemCollectionMetrics" .!= mempty
+        <*> o .:? "UnprocessedItems" .!= mempty
diff --git a/gen/Network/AWS/DynamoDB/DeleteItem.hs b/gen/Network/AWS/DynamoDB/DeleteItem.hs
--- a/gen/Network/AWS/DynamoDB/DeleteItem.hs
+++ b/gen/Network/AWS/DynamoDB/DeleteItem.hs
@@ -522,6 +522,6 @@
 
 instance FromJSON DeleteItemResponse where
     parseJSON = withObject "DeleteItemResponse" $ \o -> DeleteItemResponse
-        <$> o .:  "Attributes"
+        <$> o .:? "Attributes" .!= mempty
         <*> o .:? "ConsumedCapacity"
         <*> o .:? "ItemCollectionMetrics"
diff --git a/gen/Network/AWS/DynamoDB/GetItem.hs b/gen/Network/AWS/DynamoDB/GetItem.hs
--- a/gen/Network/AWS/DynamoDB/GetItem.hs
+++ b/gen/Network/AWS/DynamoDB/GetItem.hs
@@ -242,4 +242,4 @@
 instance FromJSON GetItemResponse where
     parseJSON = withObject "GetItemResponse" $ \o -> GetItemResponse
         <$> o .:? "ConsumedCapacity"
-        <*> o .:  "Item"
+        <*> o .:? "Item" .!= mempty
diff --git a/gen/Network/AWS/DynamoDB/ListTables.hs b/gen/Network/AWS/DynamoDB/ListTables.hs
--- a/gen/Network/AWS/DynamoDB/ListTables.hs
+++ b/gen/Network/AWS/DynamoDB/ListTables.hs
@@ -146,7 +146,7 @@
 instance FromJSON ListTablesResponse where
     parseJSON = withObject "ListTablesResponse" $ \o -> ListTablesResponse
         <$> o .:? "LastEvaluatedTableName"
-        <*> o .:  "TableNames"
+        <*> o .:? "TableNames" .!= mempty
 
 instance AWSPager ListTables where
     page rq rs
diff --git a/gen/Network/AWS/DynamoDB/PutItem.hs b/gen/Network/AWS/DynamoDB/PutItem.hs
--- a/gen/Network/AWS/DynamoDB/PutItem.hs
+++ b/gen/Network/AWS/DynamoDB/PutItem.hs
@@ -540,6 +540,6 @@
 
 instance FromJSON PutItemResponse where
     parseJSON = withObject "PutItemResponse" $ \o -> PutItemResponse
-        <$> o .:  "Attributes"
+        <$> o .:? "Attributes" .!= mempty
         <*> o .:? "ConsumedCapacity"
         <*> o .:? "ItemCollectionMetrics"
diff --git a/gen/Network/AWS/DynamoDB/Query.hs b/gen/Network/AWS/DynamoDB/Query.hs
--- a/gen/Network/AWS/DynamoDB/Query.hs
+++ b/gen/Network/AWS/DynamoDB/Query.hs
@@ -640,8 +640,8 @@
     parseJSON = withObject "QueryResponse" $ \o -> QueryResponse
         <$> o .:? "ConsumedCapacity"
         <*> o .:? "Count"
-        <*> o .:  "Items"
-        <*> o .:  "LastEvaluatedKey"
+        <*> o .:? "Items" .!= mempty
+        <*> o .:? "LastEvaluatedKey" .!= mempty
         <*> o .:? "ScannedCount"
 
 instance AWSPager Query where
diff --git a/gen/Network/AWS/DynamoDB/Scan.hs b/gen/Network/AWS/DynamoDB/Scan.hs
--- a/gen/Network/AWS/DynamoDB/Scan.hs
+++ b/gen/Network/AWS/DynamoDB/Scan.hs
@@ -495,8 +495,8 @@
     parseJSON = withObject "ScanResponse" $ \o -> ScanResponse
         <$> o .:? "ConsumedCapacity"
         <*> o .:? "Count"
-        <*> o .:  "Items"
-        <*> o .:  "LastEvaluatedKey"
+        <*> o .:? "Items" .!= mempty
+        <*> o .:? "LastEvaluatedKey" .!= mempty
         <*> o .:? "ScannedCount"
 
 instance AWSPager Scan where
diff --git a/gen/Network/AWS/DynamoDB/Types.hs b/gen/Network/AWS/DynamoDB/Types.hs
--- a/gen/Network/AWS/DynamoDB/Types.hs
+++ b/gen/Network/AWS/DynamoDB/Types.hs
@@ -505,14 +505,14 @@
     parseJSON = withObject "AttributeValue" $ \o -> AttributeValue
         <$> o .:? "B"
         <*> o .:? "BOOL"
-        <*> o .:  "BS"
-        <*> o .:  "L"
-        <*> o .:  "M"
+        <*> o .:? "BS" .!= mempty
+        <*> o .:? "L" .!= mempty
+        <*> o .:? "M" .!= mempty
         <*> o .:? "N"
-        <*> o .:  "NS"
+        <*> o .:? "NS" .!= mempty
         <*> o .:? "NULL"
         <*> o .:? "S"
-        <*> o .:  "SS"
+        <*> o .:? "SS" .!= mempty
 
 instance ToJSON AttributeValue where
     toJSON AttributeValue{..} = object
@@ -905,12 +905,12 @@
 
 instance FromJSON TableDescription where
     parseJSON = withObject "TableDescription" $ \o -> TableDescription
-        <$> o .:  "AttributeDefinitions"
+        <$> o .:? "AttributeDefinitions" .!= mempty
         <*> o .:? "CreationDateTime"
-        <*> o .:  "GlobalSecondaryIndexes"
+        <*> o .:? "GlobalSecondaryIndexes" .!= mempty
         <*> o .:? "ItemCount"
         <*> o .:  "KeySchema"
-        <*> o .:  "LocalSecondaryIndexes"
+        <*> o .:? "LocalSecondaryIndexes" .!= mempty
         <*> o .:? "ProvisionedThroughput"
         <*> o .:? "TableName"
         <*> o .:? "TableSizeBytes"
@@ -1028,7 +1028,7 @@
     parseJSON = withObject "KeysAndAttributes" $ \o -> KeysAndAttributes
         <$> o .:  "AttributesToGet"
         <*> o .:? "ConsistentRead"
-        <*> o .:  "ExpressionAttributeNames"
+        <*> o .:? "ExpressionAttributeNames" .!= mempty
         <*> o .:  "Keys"
         <*> o .:? "ProjectionExpression"
 
@@ -1392,7 +1392,7 @@
 
 instance FromJSON ExpectedAttributeValue where
     parseJSON = withObject "ExpectedAttributeValue" $ \o -> ExpectedAttributeValue
-        <$> o .:  "AttributeValueList"
+        <$> o .:? "AttributeValueList" .!= mempty
         <*> o .:? "ComparisonOperator"
         <*> o .:? "Exists"
         <*> o .:? "Value"
@@ -1745,8 +1745,8 @@
 
 instance FromJSON ItemCollectionMetrics where
     parseJSON = withObject "ItemCollectionMetrics" $ \o -> ItemCollectionMetrics
-        <$> o .:  "ItemCollectionKey"
-        <*> o .:  "SizeEstimateRangeGB"
+        <$> o .:? "ItemCollectionKey" .!= mempty
+        <*> o .:? "SizeEstimateRangeGB" .!= mempty
 
 instance ToJSON ItemCollectionMetrics where
     toJSON ItemCollectionMetrics{..} = object
@@ -1843,8 +1843,8 @@
 instance FromJSON ConsumedCapacity where
     parseJSON = withObject "ConsumedCapacity" $ \o -> ConsumedCapacity
         <$> o .:? "CapacityUnits"
-        <*> o .:  "GlobalSecondaryIndexes"
-        <*> o .:  "LocalSecondaryIndexes"
+        <*> o .:? "GlobalSecondaryIndexes" .!= mempty
+        <*> o .:? "LocalSecondaryIndexes" .!= mempty
         <*> o .:? "Table"
         <*> o .:? "TableName"
 
@@ -2213,7 +2213,7 @@
 
 instance FromJSON DeleteRequest where
     parseJSON = withObject "DeleteRequest" $ \o -> DeleteRequest
-        <$> o .:  "Key"
+        <$> o .:? "Key" .!= mempty
 
 instance ToJSON DeleteRequest where
     toJSON DeleteRequest{..} = object
@@ -2286,7 +2286,7 @@
 
 instance FromJSON PutRequest where
     parseJSON = withObject "PutRequest" $ \o -> PutRequest
-        <$> o .:  "Item"
+        <$> o .:? "Item" .!= mempty
 
 instance ToJSON PutRequest where
     toJSON PutRequest{..} = object
@@ -2455,7 +2455,7 @@
 
 instance FromJSON Condition where
     parseJSON = withObject "Condition" $ \o -> Condition
-        <$> o .:  "AttributeValueList"
+        <$> o .:? "AttributeValueList" .!= mempty
         <*> o .:  "ComparisonOperator"
 
 instance ToJSON Condition where
diff --git a/gen/Network/AWS/DynamoDB/UpdateItem.hs b/gen/Network/AWS/DynamoDB/UpdateItem.hs
--- a/gen/Network/AWS/DynamoDB/UpdateItem.hs
+++ b/gen/Network/AWS/DynamoDB/UpdateItem.hs
@@ -656,6 +656,6 @@
 
 instance FromJSON UpdateItemResponse where
     parseJSON = withObject "UpdateItemResponse" $ \o -> UpdateItemResponse
-        <$> o .:  "Attributes"
+        <$> o .:? "Attributes" .!= mempty
         <*> o .:? "ConsumedCapacity"
         <*> o .:? "ItemCollectionMetrics"