Quotes from DWS
Ekkehard Goerlach
e.goerlach@computer.org
20 Nov 2001 22:19:51 +0100
Hi,
is it possible to use the DWS module of Finance::Quote from within
gnucash ?=20
By the way, I have a small patch for that module: some of the quotes
from DWS are not in EUR but USD or CHF. The following diff has the
necessary changes:
diff DWS.pm DWS.pm.orig
74,82d73
< # Some of the funds are reported in curencies other than EUR:
< my %dwscurrency =3D ( "986956" =3D> "CHF",
< "974087" =3D> "CHF",
< "974919" =3D> "USD",
< "974088" =3D> "CHF",
< "974089" =3D> "CHF",
< "974604" =3D> "CHF",
< "986605" =3D> "USD");
<
104,113c95
<
< if (exists $dwscurrency{$q[0]})
< {
< $info{$q[0], "currency"} =3D $dwscurrency{$q[0]};
< }
< else
< {
< $info{$q[0], "currency"} =3D "EUR";
< }
<
---
> $info{$q[0], "currency"} =3D "EUR";
Ekkehard
--=20
Ekkehard G=F6rlach Tumringerstrasse 287
e.goerlach@computer.org D-79539 L=F6rrach