Hi!

I lost track of which reports should work and which are broken,
so I'm sending a bug report...

Profit & Loss:
Error: gnc_report_error_dialog: error running report.
/usr/local/share/gnucash/scm/report/balance-and-pnl.scm:36:3: In
expression (sum (map # group)):
/usr/local/share/gnucash/scm/report/balance-and-pnl.scm:36:3: Unbound
variable: sum
35  (if (= i num-accounts) (quote ()) ...)
36  [cons ...
37*  [#<procedure (x)> #<pt-Account*:0x81F3EE8>]
38   [handle-level-1-account # #<procedure dispatch #>]
     ...
39   (let (# #) (if # #) (l2-collector # account-balance) ...)
40*  [gnc:group-map-accounts #<procedure (x)>
#<pt-AccountGroup*:0x81F2938>]
41   (letrec ((loop (lambda # #))) (loop (gnc:group-get-num-accounts
group) 0))
     ...
42   [cons "<TR><TD align=right> Wertpapierhandelsgeb�hren </TD><TD
align=righ$
43*   [loop 11 1]
44    (if (= i num-accounts) (quote ()) ...)
45    [cons ...
46*    [#<procedure (x)> #<pt-Account*:0x81F43F8>]
47     [handle-level-2-account # #<procedure dispatch #>]
       ...
48     (let ((grandchildren #)) (if (not #) (balance # #)) ...)
49*    (if (not #) (balance # #))
50     [#<procedure (action value)> add ...
51*     [- 0 ...
52*      (if balance-sheet? # #)
53       [gnc:group-get-balance-interval # # #]
54       (sum (map (lambda # #) group))

Balance sheet:
Error: gnc_report_error_dialog: error running report.
/usr/local/share/gnucash/scm/report/balance-and-pnl.scm:33:3: In
expression (sum (map # group)):
/usr/local/share/gnucash/scm/report/balance-and-pnl.scm:33:3: Unbound
variable: sum
23  (if (= i num-accounts) (quote ()) ...)
24  [cons ...
25*  [#<procedure (x)> #<pt-Account*:0x81D1600>]
26   [handle-level-1-account # #<procedure dispatch #>]
     ...
27   (let (# #) (if # #) (l2-collector # account-balance) ...)
28*  [gnc:group-map-accounts #<procedure (x)>
#<pt-AccountGroup*:0x81D1A58>]
29   (letrec ((loop (lambda # #))) (loop (gnc:group-get-num-accounts
group) 0))
     ...
30   [cons "<TR><TD align=right> tagesgeldkonto </TD><TD align=right>
Bank </T$
31*   [loop 2 1]
32    (if (= i num-accounts) (quote ()) ...)
33    [cons ...
34*    [#<procedure (x)> #<pt-Account*:0x81D4608>]
35     [handle-level-2-account # #<procedure dispatch #>]
       ...
36     (let ((grandchildren #)) (if (not #) (balance # #)) ...)
37*    (if (not #) (balance # #))
38     [#<procedure (action value)> add ...
39*     [+ 0 ...
40*      (if balance-sheet? # #)
41       [gnc:group-get-balance-until #<pt-AccountGroup*:0x81D48F8> (# .
0)]
42       (sum (map (lambda (x) (gnc:account-get-balance-until x to-tp))
group))

Account Balance Tracker:
mostly works, but all averages are 1.00 and max and mins are
ridiculously high

Budget:
Error: gnc_report_error_dialog: error running report.
ERROR: In procedure scm-error in expression (scm-error (quote
misc-error) #f ...):
ERROR: Bad argument (entry report) "to function" #<procedure list-index
(pred lis1 . lists)>
 9  (let ((lines (rendering-thunk options))) (report-output->string
lines))
10* [#<procedure (options)> #<procedure dispatch (key)>]
11  (let* (# # # # ...) (gnc:debug "a") (letrec # #) ...)
12* (letrec ((loop (lambda # #))) (loop (gnc:get-current-group)))
13  [loop #<pt-AccountGroup*:0x81B4FF8>]
    ...
14  [cons ...
15*  [#<procedure (account)> #<pt-Account*:0x81B7A68>]
16   (let ((line #)) (if line (gnc:for-each-split-in-account account #))
...)
17*  [budget-get-line RaiBa Altertheim (# # # #)]
18   (cond ((null? budget) #f) (#t (letrec (#) (loop2 #))))
     ...
19   [loop2 ...
20*   [budget-entry-get-accounts ...
21*    [budget-line-get-entry #<budget-line-structure entry: # report:
#>]
22     ((record-accessor budget-line-structure (quote entry)) line)
23*    [record-accessor #<record-type budget-line-structure> entry]
24     (let ((pos #)) (if (not pos) (error # field-name)) ...)
25*    [list-index (entry report) entry]
26*    [srfi-1:check-arg #<primitive-procedure procedure?> (entry
report) ...]
27     (if (pred val) val (srfi-1:error Bad argument val to function
caller))
       ...
28     [scm-error misc-error #f ...]

Account Transactions:
This one really works great!

These errors occured with cvs as of 2000-03-19.
I'm using SuSE 6.3, guile 1.3.4, slib2c7.

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

--
Gnucash Developer's List 
To unsubscribe send empty email to: [EMAIL PROTECTED]

Reply via email to