1 <?xml version=
"1.0" encoding=
"UTF-8"?>
2 <!DOCTYPE script:module PUBLIC
"-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd">
3 <script:module xmlns:
script=
"http://openoffice.org/2000/script" script:
name=
"Lang_de" script:
language=
"StarBasic">Option Explicit
5 Sub LoadGermanLanguage()
7 sProductname = GetProductname
9 sCancel =
"Abbrechen
"
10 sColumnHeader =
"Spaltenkopf
"
11 sInsertStockName =
"Bitte fügen Sie zunächst einige Aktien in Ihr Depot ein!
"
12 sTitle =
"<PRODUCTNAME
>: Aktienverwaltung
"
13 sTitle = ReplaceString(sTitle, sProductName,
"<PRODUCTNAME
>")
14 sMsgError =
"Eingabefehler
"
15 sMsgNoName = sInsertStockname
16 sMsgNoQuantity =
"Bitte geben Sie eine Stückzahl größer als
0 ein
"
17 sMsgNoDividend =
"Bitte geben Sie eine Dividende je Stück oder eine Gesamtdividende ein
"
18 sMsgNoExchangeRate =
"Bitte geben Sie eine korrekte Umtauschrate ein (alte Aktien -
> neue Aktien).
"
19 sMsgNoValidExchangeDate =
"Bitte geben Sie ein gültiges Datum für den Aktiensplitt ein.
"
20 sMsgWrongExchangeDate =
"Splitt nicht möglich, da bereits Transaktionen nach dem Splitt-Datum existieren.
"
21 sMsgSellTooMuch =
"So viele Aktien können Sie nicht verkaufen. Maximum:
"
22 sMsgConfirm =
"Bestätigung erforderlich
"
23 sMsgFreeStock =
"Beabsichtigen Sie die Eingabe von Gratisaktien?
"
24 sMsgTotalLoss =
"Beabsichtigen Sie die Eingabe eines Totalverlustes?
"
25 sMsgAuthorization =
"Sicherheitsabfrage
"
26 sMsgDeleteAll =
"Wollen Sie alle Bewegungen löschen und die Depotübersicht rücksetzen?
"
27 cSplit =
"Aktiensplitt am
"
28 sHistory =
"Historie
"
29 TransactTitle(
1) =
"Aktien verkaufen
"
30 TransactTitle(
2) =
"Aktien kaufen
"
31 StockRatesTitle(
1) =
"Dividendenzahlung
"
32 StockRatesTitle(
2) =
"Aktiensplitt
"
33 StockRatesTitle(
3) = sHistory
34 sDepotCurrency =
"Depotwährung
"
35 sStockName =
"Aktienname
"
36 TransactMode = LIFO
' Possible values:
"FIFO
" and
"LIFO
"
37 DateCellStyle =
"Ergebnis Datum
"
38 CurrCellStyle =
"Ergebnis Euro mit Dezimalen
"
39 sStartDate =
"Startdatum:
"
40 sEndDate =
"Enddatum:
"
41 sStartUpWelcome =
"Diese Vorlage ermöglicht Ihnen eine effiziente Verwaltung Ihres Aktiendepots
"
42 sStartUpChooseMarket =
"Wählen Sie zunächst Ihre Referenz-Währung und damit den Börsenplatz für das Internet Update aus!
"
43 sStartUpHint =
"Leider steht Ihnen die
<History
>- Funktion nur für den amerikanischen Markt zur Verfügung!
"
44 sStartupHint = ReplaceString(sStartUpHint, sHistory,
"<History
>")
45 sNoInternetUpdate =
"ohne Internet Update
"
46 sMarketPlace =
"Börsenplatz:
"
47 sNoInternetDataAvailable =
"Internet-Kurse konnten nicht empfangen werden!
"
48 sCheckInternetSettings =
"Mögliche Ursachen sind:
<BR
> Ihre Internet Einstellungen müssen überprüft werden.
<BR
> Sie haben eine falsche Kennung (z.B. Symbol, WKN) für die Aktie eingegeben.
"
49 sCheckInternetSettings = ReplaceString(sCheckInternetSettings, chr(
13),
"<BR
>")
51 sMsgEndDatebeforeNow =
"Das Enddatum muss vor dem heutigen Tag liegen!
"
52 sMsgStartDatebeforeEndDate =
"Das Startdatum muss vor dem Enddatum liegen!
"
54 sMarket(
0,
0) =
"Amerikanischer Dollar
"
55 sMarket(
0,
1) =
"$
"
56 sMarket(
0,
2) =
"New York
"
57 sMarket(
0,
3) =
"http://finance.yahoo.com/d/quotes.csv?s=
<StockID
>&f=sl1d1t1c1ohgv
&e=.csv
"
58 sMarket(
0,
4) =
"http://ichart.finance.yahoo.com/table.csv?
" &_
59 "s=
<StockID
>&d=
<EndMonth
>&e=
<EndDay
>&f=
<Endyear
>&g=d
&" &_
60 "a=
<StartMonth
>&b=
<StartDay
>&c=
<Startyear
>&ignore=.csv
"
61 sMarket(
0,
5) =
"Symbol
"
62 sMarket(
0,
6) =
"en
"
63 sMarket(
0,
7) =
"US
"
64 sMarket(
0,
8) =
"409"
65 sMarket(
0,
9) =
"44"
66 sMarket(
0,
10) =
"1"
68 sMarket(
1,
0) =
"Euro
"
69 sMarket(
1,
1) = chr(
8364)
70 sMarket(
1,
2) =
"Frankfurt
"
71 sMarket(
1,
3) =
"http://de.finance.yahoo.com/d/quotes.csv?s=
<StockID
>.F
&f=sl1t1c1ghpv
&e=.csv
"
72 sMarket(
1,
5) =
"WKN
"
73 sMarket(
1,
6) =
"de;nl;pt;el
"
74 sMarket(
1,
7) =
"DE;NL;PT;GR
"
75 sMarket(
1,
8) =
"407;
413;
816;
408"
76 sMarket(
1,
9) =
"59/
9"
77 sMarket(
1,
10) =
"1"
79 sMarket(
2,
0) =
"Englisches Pfund
"
80 sMarket(
2,
1) =
"£
"
81 sMarket(
2,
2) =
"London
"
82 sMarket(
2,
3) =
"http://uk.finance.yahoo.com/d/quotes.csv?s=
<StockID
>.L
&m=*
&f=sl1t1c1ghov
&e=.csv
"
83 sMarket(
2,
5) =
"Symbol
"
84 sMarket(
2,
6) =
"en
"
85 sMarket(
2,
7) =
"GB
"
86 sMarket(
2,
8) =
"809"
87 sMarket(
2,
9) =
"44"
88 sMarket(
2,
10) =
"1"
90 sMarket(
3,
0) =
"Japanischer Yen
"
91 sMarket(
3,
1) =
"¥
"
92 sMarket(
3,
2) =
"Tokyo
"
93 sMarket(
3,
3) =
""
94 sMarket(
3,
5) =
"Code
"
95 sMarket(
3,
6) =
"ja
"
96 sMarket(
3,
7) =
"JP
"
97 sMarket(
3,
8) =
"411"
98 sMarket(
3,
9) =
""
99 sMarket(
3,
10) =
""
101 sMarket(
4,
0) =
"Hongkong Dollar
"
102 sMarket(
4,
1) =
"HK$
"
103 sMarket(
4,
2) =
"Hongkong
"
104 sMarket(
4,
3) =
"http://hk.finance.yahoo.com/d/quotes.csv?s=
<StockID
>.HK
&f=sl1d1t1c1ohgv
&e=.csv
"
105 sMarket(
4,
5) =
"Nummer
"
106 sMarket(
4,
6) =
"zh
"
107 sMarket(
4,
7) =
"HK
"
108 sMarket(
4,
8) =
"C04
"
109 sMarket(
4,
9) =
"44"
110 sMarket(
4,
10) =
"1"
112 sMarket(
5,
0) =
"Australischer Dollar
"
113 sMarket(
5,
1) =
"$
"
114 sMarket(
5,
2) =
"Sydney
"
115 sMarket(
5,
3) =
"http://au.finance.yahoo.com/d/quotes.csv?s=
<StockID
>&f=sl1d1t1c1ohgv
&e=.csv
"
116 sMarket(
5,
5) =
"Symbol
"
117 sMarket(
5,
6) =
"en
"
118 sMarket(
5,
7) =
"AU
"
119 sMarket(
5,
8) =
"C09
"
120 sMarket(
5,
9) =
"44"
121 sMarket(
5,
10) =
"1"
123 ' ****************************End of the default subset*********************************
126 LocalizedCurrencies()
129 .lblStockNames.Label = sStockname
130 .lblQuantity.Label =
"Menge
"
131 .lblRate.Label =
"Kurs
"
132 .lblDate.Label =
"Transaktionsdatum
"
133 .hlnCommission.Label =
"Sonstige Ausgaben
"
134 .lblCommission.Label =
"Provision
"
135 .lblMinimum.Label =
"Mindestprovision
"
136 .lblFix.Label =
"Festbetrag/Spesen
"
138 .cmdCancel.Label = sCancel
142 .optPerShare.Label =
"Dividende/Aktie
"
143 .optTotal.Label =
"Dividende gesamt
"
144 .lblDividend.Label =
"Betrag
"
145 .lblExchangeRate.Label =
"Umtauschrate (alt-
>neu)
"
146 .lblColon.Label =
":
"
147 .lblDate.Label =
"Umtauschdatum:
"
148 .lblStockNames.Label = sStockname
149 .lblStartDate.Label = sStartDate
150 .lblEndDate.Label = sEndDate
151 .optDaily.Label =
"~Täglich
"
152 .optWeekly.Label =
"~Wöchentlich
"
153 .hlnInterval.Label =
"Zeitraum
"
155 .cmdCancel.Label = sCancel