investment portfolio report error

[Andrew Sackville-West]

On Sat, Feb 21, 2009 at 10:59:51PM -0700, Brad Haack wrote:
> Here ya go
> 
> 
> In /usr/share/gnucash/scm/report.scm:
>   488: 23* [gnc:report-render-html # #t]
>   454: 24  (if (and (not #) (gnc:report-ctext report)) (gnc:report-ctext 
> report) ...)
>   462: 25  (let ((template #) (doc #f)) (set! doc (if template # #f)) doc)
>   465: 26* (set! doc (if template (let* # # # ...) #f))
>   465: 27* (if template (let* # # # ...) #f)
>   466: 28  (let* (# # # ...) (gnc:html-document-set-style-sheet! doc 
> stylesheet) ...)
>   468: 29* [portfolio-renderer #]
> In /usr/share/gnucash/guile-modules/gnucash/report/portfolio.scm:
>    99: 30  (let (# #) (letrec # # #))
>      ...
>   168: 31  (let (# # # ...) (gnc:html-document-set-title! document #) ...)
>   190: 32* (if (not #) (let* # # # ...) (gnc:html-document-add-object! 
> document #))
>   191: 33  (let* (# # # ...) (gnc:html-table-set-col-headers! table #) ...)
>   234: 34* [table-add-stock-rows # # # ...]
>   112: 35  (let ((share-print-info #)) (letrec (#) (set! work-to-do #) ...))
>      ...
>   136: 36  (begin # # #)
>   137: 37* [gnc:html-table-append-row/markup! # "normal-row" ...
>   140: 38* [list #<<html-text> body: # style: #> "FCPVX" "FUND" ... ...
>   146: 39* [gnc:make-html-table-header-cell/markup "number-cell" ...
>   148: 40* [gnc:html-price-anchor #f ...
>   150: 41* [gnc:make-gnc-monetary ...
>   150: 42* [gnc-price-get-currency #f]
> /usr/share/gnucash/guile-modules/gnucash/report/portfolio.scm:150:56: In 
> procedure gnc-price-get-currency in expression (gnc-price-get-currency 
> (car price-info)):
> /usr/share/gnucash/guile-modules/gnucash/report/portfolio.scm:150:56: 
> Wrong type argument in position 1: #f

> * 22:57:07  WARN <gnc.scm> In /usr/share/gnucash/scm/report.scm:
>   488: 23* [gnc:report-render-html # #t]
>   454: 24  (if (and (not #) (gnc:report-ctext report)) (gnc:report-ctext 
> report) ...)
>   462: 25  (let ((template #) (doc #f)) (set! doc (if template # #f)) doc)
>   465: 26* (set! doc (if template (let* # # # ...) #f))
>   465: 27* (if template (let* # # # ...) #f)
>   466: 28  (let* (# # # ...) (gnc:html-document-set-style-sheet! doc 
> stylesheet) ...)
>   468: 29* [portfolio-renderer #]
> In /usr/share/gnucash/guile-modules/gnucash/report/portfolio.scm:
>    99: 30  (let (# #) (letrec # # #))
>      ...
>   168: 31  (let (# # # ...) (gnc:html-document-set-title! document #) ...)
>   190: 32* (if (not #) (let* # # # ...) (gnc:html-document-add-object! 
> document #))
>   191: 33  (let* (# # # ...) (gnc:html-table-set-col-headers! table #) ...)
>   234: 34* [table-add-stock-rows # # # ...]
>   112: 35  (let ((share-print-info #)) (letrec (#) (set! work-to-do #) ...))
>      ...
>   136: 36  (begin # # #)
>   137: 37* [gnc:html-table-append-row/markup! # "normal-row" ...
>   140: 38* [list #<<html-text> body: # style: #> "FCPVX" "FUND" ... ...
>   146: 39* [gnc:make-html-table-header-cell/markup "number-cell" ...
>   148: 40* [gnc:html-price-anchor #f ...
>   150: 41* [gnc:make-gnc-monetary ...
>   150: 42* [gnc-price-get-currency #f]
> /usr/share/gnucash/guile-modules/gnucash/report/portfolio.scm:150:56: In 
> procedure gnc-price-get-currency in expression (gnc-price-get-currency 
> (car price-info)):
> /usr/share/gnucash/guile-modules/gnucash/report/portfolio.scm:150:56: 
> Wrong type argument in position 1: #f
> In /usr/share/gnucash/scm/report.scm:
>   488: 20* [gnc:report-render-html # #t]
>   454: 21  (if (and (not #) (gnc:report-ctext report)) (gnc:report-ctext 
> report) ...)
>   462: 22  (let ((template #) (doc #f)) (set! doc (if template # #f)) doc)
>   465: 23* (set! doc (if template (let* # # # ...) #f))
>   465: 24* (if template (let* # # # ...) #f)
>   466: 25  (let* (# # # ...) (gnc:html-document-set-style-sheet! doc 
> stylesheet) ...)
>   468: 26* [portfolio-renderer #]
> In /usr/share/gnucash/guile-modules/gnucash/report/portfolio.scm:
>    99: 27  (let (# #) (letrec # # #))
>      ...
>   168: 28  (let (# # # ...) (gnc:html-document-set-title! document #) ...)
>   190: 29* (if (not #) (let* # # # ...) (gnc:html-document-add-object! 
> document #))
>   191: 30  (let* (# # # ...) (gnc:html-table-set-col-headers! table #) ...)
>   234: 31* [table-add-stock-rows # # # ...]
>   112: 32  (let ((share-print-info #)) (letrec (#) (set! work-to-do #) ...))
>      ...
>   136: 33  (begin # # #)
>   137: 34* [gnc:html-table-append-row/markup! # "normal-row" ...
>   140: 35* [list #<<html-text> body: # style: #> "FCPVX" "FUND" ... ...
>   146: 36* [gnc:make-html-table-header-cell/markup "number-cell" ...
>   148: 37* [gnc:html-price-anchor #f ...
>   150: 38* [gnc:make-gnc-monetary ...
>   150: 39* [gnc-price-get-currency #f]
> /usr/share/gnucash/guile-modules/gnucash/report/portfolio.scm:150:56: In 
> procedure gnc-price-get-currency in expression (gnc-price-get-currency 
> (car price-info)):
> /usr/share/gnucash/guile-modules/gnucash/report/portfolio.scm:150:56: 
> Wrong type argument in position 1: #f
> * 22:57:07  WARN <gnc.scm> In /usr/share/gnucash/scm/report.scm:
>   488: 20* [gnc:report-render-html # #t]
>   454: 21  (if (and (not #) (gnc:report-ctext report)) (gnc:report-ctext 
> report) ...)
>   462: 22  (let ((template #) (doc #f)) (set! doc (if template # #f)) doc)
>   465: 23* (set! doc (if template (let* # # # ...) #f))
>   465: 24* (if template (let* # # # ...) #f)
>   466: 25  (let* (# # # ...) (gnc:html-document-set-style-sheet! doc 
> stylesheet) ...)
>   468: 26* [portfolio-renderer #]
> In /usr/share/gnucash/guile-modules/gnucash/report/portfolio.scm:
>    99: 27  (let (# #) (letrec # # #))
>      ...
>   168: 28  (let (# # # ...) (gnc:html-document-set-title! document #) ...)
>   190: 29* (if (not #) (let* # # # ...) (gnc:html-document-add-object! 
> document #))
>   191: 30  (let* (# # # ...) (gnc:html-table-set-col-headers! table #) ...)
>   234: 31* [table-add-stock-rows # # # ...]
>   112: 32  (let ((share-print-info #)) (letrec (#) (set! work-to-do #) ...))
>      ...
>   136: 33  (begin # # #)
>   137: 34* [gnc:html-table-append-row/markup! # "normal-row" ...
>   140: 35* [list #<<html-text> body: # style: #> "FCPVX" "FUND" ... ...
>   146: 36* [gnc:make-html-table-header-cell/markup "number-cell" ...
>   148: 37* [gnc:html-price-anchor #f ...
>   150: 38* [gnc:make-gnc-monetary ...
>   150: 39* [gnc-price-get-currency #f]
> /usr/share/gnucash/guile-modules/gnucash/report/portfolio.scm:150:56: In 
> procedure gnc-price-get-currency in expression (gnc-price-get-currency 
> (car price-info)):
> /usr/share/gnucash/guile-modules/gnucash/report/portfolio.scm:150:56: 
> Wrong type argument in position 1: #f
> 

I *believe* this is a problem with no data in the pricedb, but it's
been a  long time since I've looked at that report. one would think
that a lack of price would be checked for...

A
-------------- next part --------------
A non-text attachment was scrubbed...
Name: not available
Type: application/pgp-signature
Size: 197 bytes
Desc: Digital signature
Url : http://lists.gnucash.org/pipermail/gnucash-user/attachments/20090222/f2c63e8f/attachment.bin