Tax report bug

Richard -Gilligan- Uschold uschold@cs.ucf.edu
Wed, 22 Nov 2000 02:03:52 +0000


--------------88828A24C151B7EACBF6AF19
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit

Herbert Thoma wrote:

> Hi!
>
> When I try to set the parameters of the tax report,
> I get the following error:
>
> Error: gnc_report_error_dialog: gnc_report_error_dialog: error running report.
> Function: string-length, wrong-type-arg
>
> /usr/local/share/gnucash/scm/report/tax.scm:235:32: In procedure string-length in expression (string-length notes):
> /usr/local/share/gnucash/scm/report/tax.scm:235:32: Wrong type argument in position 1: #f
> 10* [alist-for-each #<procedure run-callback (id cbdata)> ((0 #f #f ...))]
> 11  [for-each #<procedure (pair)> ((0 #f #f #<procedure ()>))]
> 12* [#<procedure (pair)> (0 #f #f #<procedure ()>)]
> 13* [run-callback 0 (#f #f #<procedure ()>)]
> 14  (let ((section #) (name #) (callback #)) (if (not section) (callback) ...))
>     ...
> 15  [gnc:option-invoke-callback # #]
> 16* [#<procedure ()>]
> 17* [gnc:run-report "Tax" #<procedure dispatch (key)>]
> 18  (letrec (# # #) (let # #))
>     ...
> 19  (let* ((renderer #) (lines #) (output #)) output)
> 20* [#<procedure (options)> #<procedure dispatch (key)>]
> 21  [generate-tax "Taxable / Deductable" ...]
>     ...
> 22  (let* (# # # # ...) (letrec # #))
> 23* (case tax-stat (# # #) (# # #) ...)
> 24* [key-status (#<pt-Account*:0x82523A8> #<pt-Account*:0x82508A0>) #t ...]
> 25  (let ((key-len #)) (map (lambda # #) accounts))
> 26  [map #<procedure (a)> (#<pt-Account*:0x82523A8> #<pt-Account*:0x82508A0>)]
> 27* [#<procedure (a)> #<pt-Account*:0x82523A8>]
> 28* (let* (# # #) (if # # #) (if kids #))
> 29* [string-length #f]
>
> Error: gnc_run_report: Report output was not a string.
>
> gnucash: latest CVS
> guile: 1.3.4
> g-wrap: 0.9.12
>
>  Herbert.
> --
> Herbert Thoma
> FhG-IIS A, Studio Department
> Am Weichselgarten3, 91058 Erlangen, Germany
> Phone: +49-9131-776-323
> Fax:   +49-9131-776-399
> email: tma@iis.fhg.de
> www: http://www.iis.fhg.de/
>
> _______________________________________________
> gnucash-devel mailing list
> gnucash-devel@lists.gnumatic.com
> http://www.gnumatic.com/cgi-bin/mailman/listinfo/gnucash-devel

I see a possible problem, but, as I don't yet have the latest compiled, (missing dependencies) I can't check it out.
The problem does not seem to exist on 1.5.2 or earlier 1.4.x versions.  Could you add the line below marked with the
"+" between existing lines 233 and 234, in file /usr/share/gnucash/scm/report/tax.scm, and let me know if it fixes the
problem? (don't put in the "+"!)

   (let* ((notes (gnc:account-get-notes a))
+         (notes (if notes notes ""))
          (key-start (string-search notes key 0))

Thanks

--

Gilligan            |                    __o           .oooO
                   /|                  _ \<,_          (   )
                  /p|\                (_)/ (_)          \ (   Oooo.
                 /  | \             ------------         \_)  (   )
                ========                                       ) /
                 ========       gilligan@mpinet.net           (_/
             ~~~~~~~~~~~~~~~~   uschold@cs.ucf.edu



--------------88828A24C151B7EACBF6AF19
Content-Type: text/html; charset=us-ascii
Content-Transfer-Encoding: 7bit

<!doctype html public "-//w3c//dtd html 4.0 transitional//en">
Herbert Thoma wrote:
Hi!

When I try to set the parameters of the tax report,
I get the following error:

Error: gnc_report_error_dialog: gnc_report_error_dialog: error running report.
Function: string-length, wrong-type-arg

/usr/local/share/gnucash/scm/report/tax.scm:235:32: In procedure string-length in expression (string-length notes):
/usr/local/share/gnucash/scm/report/tax.scm:235:32: Wrong type argument in position 1: #f
10* [alist-for-each #<procedure run-callback (id cbdata)> ((0 #f #f ...))]
11  [for-each #<procedure (pair)> ((0 #f #f #<procedure ()>))]
12* [#<procedure (pair)> (0 #f #f #<procedure ()>)]
13* [run-callback 0 (#f #f #<procedure ()>)]
14  (let ((section #) (name #) (callback #)) (if (not section) (callback) ...))
    ...
15  [gnc:option-invoke-callback # #]
16* [#<procedure ()>]
17* [gnc:run-report "Tax" #<procedure dispatch (key)>]
18  (letrec (# # #) (let # #))
    ...
19  (let* ((renderer #) (lines #) (output #)) output)
20* [#<procedure (options)> #<procedure dispatch (key)>]
21  [generate-tax "Taxable / Deductable" ...]
    ...
22  (let* (# # # # ...) (letrec # #))
23* (case tax-stat (# # #) (# # #) ...)
24* [key-status (#<pt-Account*:0x82523A8> #<pt-Account*:0x82508A0>) #t ...]
25  (let ((key-len #)) (map (lambda # #) accounts))
26  [map #<procedure (a)> (#<pt-Account*:0x82523A8> #<pt-Account*:0x82508A0>)]
27* [#<procedure (a)> #<pt-Account*:0x82523A8>]
28* (let* (# # #) (if # # #) (if kids #))
29* [string-length #f]

Error: gnc_run_report: Report output was not a string.

gnucash: latest CVS
guile: 1.3.4
g-wrap: 0.9.12

 Herbert.
--
Herbert Thoma
FhG-IIS A, Studio Department
Am Weichselgarten3, 91058 Erlangen, Germany
Phone: +49-9131-776-323
Fax:   +49-9131-776-399
email: tma@iis.fhg.de
www: http://www.iis.fhg.de/

_______________________________________________
gnucash-devel mailing list
gnucash-devel@lists.gnumatic.com
http://www.gnumatic.com/cgi-bin/mailman/listinfo/gnucash-devel

I see a possible problem, but, as I don't yet have the latest compiled, (missing dependencies) I can't check it out.  The problem does not seem to exist on 1.5.2 or earlier 1.4.x versions.  Could you add the line below marked with the "+" between existing lines 233 and 234, in file /usr/share/gnucash/scm/report/tax.scm, and let me know if it fixes the problem? (don't put in the "+"!)

   (let* ((notes (gnc:account-get-notes a))
+         (notes (if notes notes ""))
          (key-start (string-search notes key 0))

Thanks

-- 

Gilligan            |                    __o           .oooO
                   /|                  _ \<,_          (   )
                  /p|\                (_)/ (_)          \ (   Oooo.
                 /  | \             ------------         \_)  (   )
                ========                                       ) /
                 ========       gilligan@mpinet.net           (_/
             ~~~~~~~~~~~~~~~~   uschold@cs.ucf.edu
  --------------88828A24C151B7EACBF6AF19--