GNUCash 1.6 Expecting ROSTRINGP on QIF Import

Michael T. Garrison Stuber garrisonstuber@bellsouth.net
Mon, 18 Jun 2001 22:44:37 -0400


Greetings!

   I'm in the process of converting from the land of Bill to GNU/Linux. 
After a lot of RPM updates I have my Mandrake 8 system running GNUCash 1.6. 
It looks _beautiful_.  So, I'm trying to import my Quicken data, having 
done a "dump everything" from Quicken 2001.  Everything goes swimlingly 
through the druid.  I get account lists, accounts created in place of 
categories, and transactions which are unspecified.  Finally, it's ready to 
actually do the conversion.  Then it crashes.  I get the following dump 
running with the --debug switch:

gnucash: [D] "Running functions on hook "book-closed-hook
  #<procedure gnc:main-window-book-close-handler (book-url)>
gnucash: [D] "Running functions on hook "book-closed-hook
  #<procedure gnc:main-window-book-close-handler (book-url)>
gnucash: [D] "Running functions on hook "book-opened-hook
  #<procedure gnc:main-window-book-open-handler (book-url)>
  #<procedure import-old-currencies (from-filename)>
gnucash: [D] "Running functions on hook "book-closed-hook
  #<procedure gnc:main-window-book-close-handler (book-url)>
gnucash: [D] "Running functions on hook "book-opened-hook
  #<procedure gnc:main-window-book-open-handler (book-url)>
  #<procedure import-old-currencies (from-filename)>
Backtrace:
 3  (begin # # # ...)
 4* (if (and # # #) (begin # #) (begin # # # ...))
 5  (begin (gnc:load-account-file) (gnc:default-ui-start) ...)
 6  [gnc:start-ui-event-loop]
 7* [qif-import:update-stock-hash # # #]
 8* (let ((names #)) (hash-fold (lambda # #) #f ...) ...)
 9* [hash-fold #<procedure (qif-name map-entry p)> #f ...]
10* [#<procedure #> Itron NYBL Incentive Savings:Stable Value Option-401k # 
#f]
11* (let ((stock-name #)) (if (and stock-name # # ...) (let* # #)) #f)
12* (if (and stock-name # # ...) (let* # #))
13  (let* (# # #) (if # # #))
    ...
14  (let (#) (if # #) (set! names #) ...)
15* [qif-ticker-map:lookup-ticker # Stable Value Option-401k]
16  (let (#) (for-each # #) retval)
17* [for-each #<procedure (symbol)> (# # # # ...)]
18* [#<procedure #> #]
19* (if (string=? name #) (begin # #))
20  (begin (set! retval #) (if # #))
21  (if (string=? retval ) (set! retval #f))
22* [string=? #f ]

/usr/share/gnucash/scm/qif-import/qif-objects.scm:650:18: In procedure 
string=? in expression (string=? retval ""):
/usr/share/gnucash/scm/qif-import/qif-objects.scm:650:18: Wrong type 
argument in position 1 (expecting ROSTRINGP): #f

Any notion?  I think I have the correct versions of everything.  I'd 
appreciate any pointers.  Thanks.