mirror of
https://github.com/Gnucash/gnucash.git
synced 2025-02-25 18:55:30 -06:00
Bug 799262 - Failed import QIF investment
the qif-action check should apply to investment transactions only.
This commit is contained in:
parent
9f998892b5
commit
b33b864c2f
@ -596,13 +596,6 @@
|
||||
(else
|
||||
(apply xaccTransSetDate gnc-xtn (qif-xtn:date qif-xtn))))
|
||||
|
||||
(unless qif-action
|
||||
(qif-import:log progress-dialog "qif-import:qif-xtn-to-gnc-xtn"
|
||||
(format #f (G_ "Missing QIF investment action for transaction dated ~a.")
|
||||
(qof-print-date (qif-date-to-time64 qif-date))))
|
||||
(throw 'missing-action "qif-import:qif-xtn-to-gnc-xtn" "Missing investment action."
|
||||
#f #f))
|
||||
|
||||
;; fixme: bug #105
|
||||
(if qif-payee
|
||||
(xaccTransSetDescription gnc-xtn qif-payee))
|
||||
@ -743,6 +736,13 @@
|
||||
|
||||
(if (not num-shares) (set! num-shares (gnc-numeric-zero)))
|
||||
|
||||
(unless qif-action
|
||||
(qif-import:log progress-dialog "qif-import:qif-xtn-to-gnc-xtn"
|
||||
(format #f (G_ "Missing QIF investment action for transaction dated ~a.")
|
||||
(qof-print-date (qif-date-to-time64 qif-date))))
|
||||
(throw 'missing-action "qif-import:qif-xtn-to-gnc-xtn" "Missing investment action."
|
||||
#f #f))
|
||||
|
||||
;; Determine the extended price of all shares without commission.
|
||||
(if xtn-amt
|
||||
;; Adjust for commission (if any).
|
||||
|
Loading…
Reference in New Issue
Block a user