diff --git a/CHANGELOG b/CHANGELOG
index 919f7b2b98..152f0196c7 100644
--- a/CHANGELOG
+++ b/CHANGELOG
@@ -1,3 +1,4 @@
+* Use reference field for statement line relation
 * Do not create dunning for line with pending payment
 * Add support for Python 3.10
 * Remove support for Python 3.6
diff --git a/__init__.py b/__init__.py
index 1ec5b704ea..52f6be034a 100644
--- a/__init__.py
+++ b/__init__.py
@@ -24,6 +24,9 @@ def register():
     Pool.register(
         account.Invoice,
         module='account_payment', type_='model', depends=['account_invoice'])
+    Pool.register(
+        account.StatementLine,
+        module='account_payment', type_='model', depends=['account_statement'])
     Pool.register(
         account.Dunning,
         module='account_payment', type_='model', depends=['account_dunning'])
diff --git a/account.py b/account.py
index b310d8e2a8..76ca1bd07f 100644
--- a/account.py
+++ b/account.py
@@ -14,7 +14,7 @@ from trytond.model import ModelSQL, ModelView, fields
 from trytond.modules.company.model import CompanyValueMixin
 from trytond.modules.currency.fields import Monetary
 from trytond.pool import Pool, PoolMeta
-from trytond.pyson import Eval, Id
+from trytond.pyson import Bool, Eval, Id, If
 from trytond.tools.multivalue import migrate_property
 from trytond.transaction import Transaction
 from trytond.wizard import (
@@ -569,6 +569,63 @@ class Invoice(metaclass=PoolMeta):
         return amounts
 
 
+class StatementLine(metaclass=PoolMeta):
+    __name__ = 'account.statement.line'
+
+    @classmethod
+    def __setup__(cls):
+        super().__setup__()
+        cls.related_to.domain['account.payment'] = [
+            ('company', '=', Eval('company', -1)),
+            If(Bool(Eval('party')),
+                ('party', '=', Eval('party')),
+                ()),
+            ('state', 'in', ['processing', 'succeeded', 'failed']),
+            ('currency', '=', Eval('currency', -1)),
+            ('kind', '=',
+                If(Eval('amount', 0) > 0, 'receivable',
+                    If(Eval('amount', 0) < 0, 'payable', ''))),
+            ]
+        cls.related_to.search_order['account.payment'] = [
+            ('amount', 'ASC'),
+            ('state', 'ASC'),
+            ]
+        cls.related_to.search_context.update({
+                'amount_order': Eval('amount', 0),
+                })
+        for field in ['company', 'party', 'currency', 'amount']:
+            if field not in cls.related_to.depends:
+                cls.related_to.depends.append(field)
+
+    @classmethod
+    def _get_relations(cls):
+        return super()._get_relations() + ['account.payment']
+
+    @property
+    @fields.depends('related_to')
+    def payment(self):
+        pool = Pool()
+        Payment = pool.get('account.payment')
+        related_to = getattr(self, 'related_to', None)
+        if isinstance(related_to, Payment) and related_to.id >= 0:
+            return related_to
+
+    @payment.setter
+    def payment(self, value):
+        self.related_to = value
+
+    @fields.depends(
+        'party', 'statement', '_parent_statement.journal',
+        methods=['payment'])
+    def on_change_related_to(self):
+        super().on_change_related_to()
+        if self.payment:
+            if not self.party:
+                self.party = self.payment.party
+            if self.payment.line:
+                self.account = self.payment.line.account
+
+
 class Dunning(metaclass=PoolMeta):
     __name__ = 'account.dunning'
 
diff --git a/tryton.cfg b/tryton.cfg
index f279c80c5e..c347680ebe 100644
--- a/tryton.cfg
+++ b/tryton.cfg
@@ -10,6 +10,7 @@ depends:
 extras_depend:
     account_dunning
     account_invoice
+    account_statement
 xml:
     payment.xml
     account.xml