This should have gone back to the list so Andrew can see it.

-derek

Quoting Eildert Groeneveld <[EMAIL PROTECTED]>:

Derek

not much luck I am afraid. patch make make install all wentrthrough nicely.
But this is the result:

Anything else I could do?

greetings
Eildert




;;; WARNING (wrong arguments for gnc:make-gnc-monetary:  #f #<<gnc-numeric>
num: -736000 denom: 100>)
In /usr/local/share/gnucash/guile-modules/gnucash/report/advanced-portfolio.scm:
   ...
186: 51  (let* (# # # # ...) (if price-is-dirty #) (for-each # #) ...)
315: 52* (if (or include-empty (not #)) (let* (# # # ...) (if # #) ...) ...)
316: 53  (let* (# # # #) (if # #) (if show-symbol #) ...)
316: 54* [gnc:monetary-neg ...
317: 55*  [gnc:sum-collector-commodity #<procedure #f #> # #<procedure #f #>]
In /usr/local/share/gnucash/scm/commodity-utilities.scm:
885: 56   (cond ((and foreign exchange-fn) (let (#) (foreign # # ...) ...))
(#t #f))
886: 57   (let ((balance #)) (foreign (quote format) (lambda # #) ...) ...)
887: 58*  [#<procedure #f #> format #<procedure #f #> #f]
In /usr/local/share/gnucash/scm/report-utilities.scm:
448: 59   (case action ((quote add) (add-commodity-value commodity
amount)) ...)
    ...
414: 60   [map #<procedure #f (pair)> ((#f #<procedure #f (action amount)>))]
In unknown file:
  ?: 61*  [#<procedure #f (pair)> (#f #<procedure #f (action amount)>)]
In /usr/local/share/gnucash/scm/report-utilities.scm:
415: 62*  [#<procedure #f (curr val)> #f #<<gnc-numeric> num: -736000 denom:
100>]
In /usr/local/share/gnucash/scm/commodity-utilities.scm:
890: 63   (if (gnc:commodity-equiv? domestic curr) (balance #
domestic ...) ...)
892: 64   [#<procedure #f #> add # ...
893: 65*   [gnc:gnc-monetary-amount #f]
In unknown file:
  ?: 66    (and (eq? (quote #) (record-type-descriptor obj)) (struct-ref obj
1))
  ?: 67*   [eq? #<record-type <gnc-monetary>> ...
  ?: 68*    [record-type-descriptor #f]
  ?: 69     (if (struct? obj) (struct-vtable obj) (error (quote not-a-record)
obj))
      ...
  ?: 70     [scm-error misc-error #f "~A ~S" (not-a-record #f) #f]
<unnamed port>: In procedure scm-error in expression (scm-error (quote
misc-error) #f ...):
<unnamed port>: not-a-record #f
























Thanks!

-derek

Quoting Eildert Groeneveld <[EMAIL PROTECTED]>:
> Andrew
>
> just wondering: did the patch make it into svn?
>
> cause if it did it did not solve my problem:
>
>
>
>
> ;;; WARNING (wrong arguments for gnc:make-gnc-monetary:  #f
> #<<gnc-numeric> num: -736000 denom: 100>)
> In
> /usr/local/share/gnucash/guile-modules/gnucash/report/advanced-portfolio.
>scm: ...
> 184: 51  (let* (# # # # ...) (for-each # #) (moneyincoll # dividendcoll
> #f) ...)
> 275: 52* (if (or include-empty #) (let # # ...) ...)
> 276: 53  (let (# # # #) (total-value # # #) (total-moneyin # moneyincoll
> #f) ...)
> 276: 54* [gnc:monetary-neg ...
> 277: 55*  [gnc:sum-collector-commodity #<procedure #f #> # #<procedure #f
> #>] In /usr/local/share/gnucash/scm/commodity-utilities.scm:
> 885: 56   (cond ((and foreign exchange-fn) (let (#) (foreign # # ...)
> ...)) (#t #f))
> 886: 57   (let ((balance #)) (foreign (quote format) (lambda # #) ...)
> ...) 887: 58*  [#<procedure #f #> format #<procedure #f #> #f]
> In /usr/local/share/gnucash/scm/report-utilities.scm:
> 448: 59   (case action ((quote add) (add-commodity-value commodity
> amount)) ...)
>     ...
> 414: 60   [map #<procedure #f (pair)> ((#f #<procedure #f (action
> amount)>))] In unknown file:
>   ?: 61*  [#<procedure #f (pair)> (#f #<procedure #f (action amount)>)]
> In /usr/local/share/gnucash/scm/report-utilities.scm:
> 415: 62*  [#<procedure #f (curr val)> #f #<<gnc-numeric> num: -736000
> denom: 100>]
> In /usr/local/share/gnucash/scm/commodity-utilities.scm:
> 890: 63   (if (gnc:commodity-equiv? domestic curr) (balance #
> domestic ...) ...)
> 892: 64   [#<procedure #f #> add # ...
> 893: 65*   [gnc:gnc-monetary-amount #f]
> In unknown file:
>   ?: 66    (and (eq? (quote #) (record-type-descriptor obj)) (struct-ref
> obj 1))
>   ?: 67*   [eq? #<record-type <gnc-monetary>> ...
>   ?: 68*    [record-type-descriptor #f]
>   ?: 69     (if (struct? obj) (struct-vtable obj) (error (quote
> not-a-record) obj))
>       ...
>   ?: 70     [scm-error misc-error #f "~A ~S" (not-a-record #f) #f]
> <unnamed port>: In procedure scm-error in expression (scm-error (quote
> misc-error) #f ...):
> <unnamed port>: not-a-record #f




--
      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
gnucash-devel@gnucash.org
https://lists.gnucash.org/mailman/listinfo/gnucash-devel

Reply via email to