diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -4,6 +4,10 @@
 The format is based on [Keep a Changelog](http://keepachangelog.com/en/1.0.0/)
 and this project adheres to [Semantic Versioning](http://semver.org/spec/v2.0.0.html)
 
+## 0.64.16
+### Fixed
+- Correct fee calculation for blocks that do not claim all rewards.
+
 ## 0.64.15
 ### Fixed
 - Correct scale of cache pruning code.
diff --git a/haskoin-store-data.cabal b/haskoin-store-data.cabal
--- a/haskoin-store-data.cabal
+++ b/haskoin-store-data.cabal
@@ -4,10 +4,10 @@
 --
 -- see: https://github.com/sol/hpack
 --
--- hash: 1d92004464aff0836fa36768c8c98b1407caf3d022f8977819cd3e711098ea4e
+-- hash: f48a7ae3c9a67fe4458dc559bf0f7f70208a69d48472e728ca1a78a14bc95fb9
 
 name:           haskoin-store-data
-version:        0.64.15
+version:        0.64.16
 synopsis:       Data for Haskoin Store
 description:    Please see the README on GitHub at <https://github.com/haskoin/haskoin-store#readme>
 category:       Bitcoin, Finance, Network
diff --git a/src/Haskoin/Store/Data.hs b/src/Haskoin/Store/Data.hs
--- a/src/Haskoin/Store/Data.hs
+++ b/src/Haskoin/Store/Data.hs
@@ -25,6 +25,8 @@
     -- * Transactions
     TxRef (..),
     TxData (..),
+    txDataFee,
+    isCoinbaseTx,
     Transaction (..),
     transactionToJSON,
     transactionToEncoding,
@@ -836,6 +838,9 @@
   put = serialize
   get = deserialize
 
+isCoinbaseTx :: Tx -> Bool
+isCoinbaseTx = all ((== nullOutPoint) . prevOutput) . txIn
+
 isCoinbase :: StoreInput -> Bool
 isCoinbase StoreCoinbase {} = True
 isCoinbase StoreInput {} = False
@@ -1156,6 +1161,13 @@
 instance Binary TxData where
   put = serialize
   get = deserialize
+
+txDataFee :: TxData -> Word64
+txDataFee TxData {..} =
+  if isCoinbaseTx txData then 0 else inputs - outputs
+  where
+    inputs = sum . map prevAmount $ IntMap.elems txDataPrevs
+    outputs = sum . map outValue $ txOut txData
 
 toTransaction :: TxData -> IntMap Spender -> Transaction
 toTransaction t sm =