AUDIT: r17075 - gnucash/trunk/src/import-export/qif-import - Bug #527459: Add QIF importer support for voided transactions.
Charles Day
cedayiv at cvs.gnucash.org
Thu Apr 10 19:34:42 EDT 2008
Author: cedayiv
Date: 2008-04-10 19:34:42 -0400 (Thu, 10 Apr 2008)
New Revision: 17075
Trac: http://svn.gnucash.org/trac/changeset/17075
Modified:
gnucash/trunk/src/import-export/qif-import/qif-to-gnc.scm
Log:
Bug #527459: Add QIF importer support for voided transactions.
BP
Modified: gnucash/trunk/src/import-export/qif-import/qif-to-gnc.scm
===================================================================
--- gnucash/trunk/src/import-export/qif-import/qif-to-gnc.scm 2008-04-10 20:37:41 UTC (rev 17074)
+++ gnucash/trunk/src/import-export/qif-import/qif-to-gnc.scm 2008-04-10 23:34:42 UTC (rev 17075)
@@ -6,7 +6,9 @@
;;; Copyright 2000-2001 Bill Gribble <grib at billgribble.com>
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+(use-modules (srfi srfi-13))
+
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; qif-import:find-or-make-acct
;;
@@ -745,6 +747,12 @@
(xaccSplitSetParent commission-split gnc-xtn)
(xaccSplitSetAccount commission-split
commission-acct)))))))
+
+ ;; QIF indicates a void transaction by starting the payee with "**VOID**".
+ (if (and (string? qif-payee)
+ (string-prefix? "**VOID**" qif-payee))
+ (xaccTransVoid gnc-xtn "QIF"))
+
;; return the modified transaction (though it's ignored).
gnc-xtn))
More information about the gnucash-changes
mailing list