Hi,
I applied that patch and it definitely fixes the hash-fold problem.
However, it still crashes. When I hit 'next' from the "Match
payee's/memos" window I still get the "An error occurred while
importing" error along with this backtrace:
Backtrace:
13 [#<procedure ()>]
14 (let* ((old-group #) (new-group #) (gnc-acct-hash #) ...) (for-each (lambda # #)
(vector->list qif-acct-map)) ...)
15* [for-each #<procedure (qif-file)> (#<qif-file path:
/home/warlord/GnuCash/Chase.qif y2k-threshold: 50 xtns: # accounts: () cats: ()
classes: ()>)]
16* [#<procedure (qif-file)> #<qif-file path: /home/warlord/GnuCash/Chase.qif
y2k-threshold: 50 xtns: (# # # ...) accounts: () cats: () classes: ()>]
17* [for-each #<procedure (xtn)> (#<qif-xtn date: # payee: TRADER JOE'S # 0005SM2
Retail address: #f number: #f action: #f cleared: #f from-acct: Chase share-price: #f
num-shares: #f security-name: #f commission: #f splits: # mark: #f> #<qif-xtn date: #
payee: SPORTY'S CATALOGS Retail address: #f number: #f action: #f cleared: #f
from-acct: Chase share-price: #f num-shares: #f security-name: #f commission: #f
splits: # mark: #f> #<qif-xtn date: # payee: FOODMASTER #04 SI3 Retail address:
#f number: #f action: #f cleared: #f from-acct: Chase share-price: #f num-shares: #f
security-name: #f commission: #f splits: # mark: #f> ...)]
18* [#<procedure (xtn)> #<qif-xtn date: (28 9 2000) payee: TRADER JOE'S # 0005SM2
Retail address: #f number: #f action: #f cleared: #f from-acct: Chase share-price: #f
num-shares: #f security-name: #f commission: #f splits: (#) mark: #f>]
19* (if (not (qif-xtn:mark xtn)) (begin (let # # ...)))
20 (begin (let (#) (gnc:transaction-begin-edit gnc-xtn) ...))
21 (let ((gnc-xtn #)) (gnc:transaction-begin-edit gnc-xtn) ...)
22* [qif-import:qif-xtn-to-gnc-xtn #<qif-xtn date: (28 9 2000) payee: TRADER JOE'S #
0005SM2 Retail address: #f number: #f action: #f cleared: #f from-acct: Chase
share-price: #f num-shares: #f security-name: #f commission: #f splits: (#) mark: #f>
#<qif-file path: /home/warlord/GnuCash/Chase.qif y2k-threshold: 50 xtns: (# # # ...)
accounts: () cats: () classes: ()> ...]
23 (let ((splits #) (gnc-near-split #) (near-split-total #) ...) (apply
gnc:transaction-set-date gnc-xtn ...) ...)
24* (if (not qif-security) (begin (set! near-acct-info #) (set! near-acct-name #) ...)
...)
25 (begin (set! near-acct-info (hash-ref qif-acct-map qif-from-acct)) (set!
near-acct-name (qif-map-entry:gnc-name near-acct-info)) ...)
26* [for-each #<procedure (qif-split)> (#<qif-split category: class: memo: #f
amount: # category-is-account?: #f matching-cleared: #f mark: #f miscx-category: #f
miscx-is-account?: #f miscx-class: #f>)]
27* [#<procedure (qif-split)> #<qif-split category: class: memo: #f amount: -19.59
category-is-account?: #f matching-cleared: #f mark: #f miscx-category: #f
miscx-is-account?: #f miscx-class: #f>]
28* (if (not (qif-split:mark qif-split)) (let (# # # ...) (if # #) ...))
29 (let ((gnc-far-split #) (far-acct-info #f) (far-acct-name #f) ...) (if (not
split-amt) (set! split-amt #)) ...)
30* [#<procedure (n)> -19.59]
31 (if n (gnc:double-to-gnc-numeric n GNC-DENOM-AUTO ...) ...)
32 [gnc:double-to-gnc-numeric -19.59 0 ...]
/usr/gnucash/share/gnucash/scm/qif-import/qif-to-gnc.scm:362:24: In procedure
gnc:double-to-gnc-numeric in expression (gnc:double-to-gnc-numeric n GNC-DENOM-AUTO
...):
/usr/gnucash/share/gnucash/scm/qif-import/qif-to-gnc.scm:362:24: Wrong type argument
in position 2: 4294967295
-derek
--
Derek Atkins, SB '93 MIT EE, SM '95 MIT Media Laboratory
Member, MIT Student Information Processing Board (SIPB)
URL: http://web.mit.edu/warlord/ PP-ASEL-IA N1NWH
[EMAIL PROTECTED] PGP key available
_______________________________________________
gnucash-devel mailing list
[EMAIL PROTECTED]
http://www.gnumatic.com/cgi-bin/mailman/listinfo/gnucash-devel
