From 025ddb52aa533870901465fdb84ee23a8d8cd3e8 Mon Sep 17 00:00:00 2001 From: Derek Atkins Date: Fri, 17 Jan 2003 04:26:09 +0000 Subject: [PATCH] * qif-merge-groups.scm: Limit matches against only the accounts in the old group, so we don't match against ourselves. This should limit the matches to only "reasonable" matches, and should fix #102463 git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@7842 57a11ea4-9604-0410-9ed3-97b8803252fd --- ChangeLog | 4 ++++ src/import-export/qif-import/qif-merge-groups.scm | 5 +++++ 2 files changed, 9 insertions(+) diff --git a/ChangeLog b/ChangeLog index a325438608..6f9cd38363 100644 --- a/ChangeLog +++ b/ChangeLog @@ -13,6 +13,10 @@ NOTE: Might need similar fixed in qif-io-core? + * qif-merge-groups.scm: Limit matches against only the accounts in + the old group, so we don't match against ourselves. This should + limit the matches to only "reasonable" matches, and should fix #102463 + 2003-01-15 David Hampton * configure.in: Remove restriction on guile versions > 1.4. diff --git a/src/import-export/qif-import/qif-merge-groups.scm b/src/import-export/qif-import/qif-merge-groups.scm index 5bc6b53347..8bc7d8fb51 100644 --- a/src/import-export/qif-import/qif-merge-groups.scm +++ b/src/import-export/qif-import/qif-merge-groups.scm @@ -63,6 +63,11 @@ (gnc:progress-dialog-update progress-dialog))) (gnc:query-set-book query (gnc:group-get-book old-group)) + + ;; first, we want to find only transactions from the old group. + (gnc:query-add-account-match query + (gnc:group-get-subaccounts old-group) + 'guid-match-any 'query-and) ;; the date should be close to the same.. +/- a week. (let ((date (gnc:transaction-get-date-posted xtn)))