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_sv" script:
language=
"StarBasic">Option Explicit
5 Sub LoadSwedishLanguage()
6 sProductname = GetProductname
8 sCancel =
"Avbryt
"
9 sColumnHeader =
"Kolumnhuvud
"
10 sInsertStockName =
"Infoga först några aktier i Din portfölj!
"
11 sTitle =
"<PRODUCTNAME
>: Aktieförvaltning
"
12 sTitle = ReplaceString(sTitle, sProductName,
"<PRODUCTNAME
>")
13 sMsgError =
"Inmatningsfel
"
14 sMsgNoName = sInsertStockname
15 sMsgNoQuantity =
"Var vänlig och mata in ett större antal än
0"
16 sMsgNoDividend =
"Var vänlig och mata in utdelning per styck eller den totala utdelningen
"
17 sMsgNoExchangeRate =
"Var vänlig och mata in en korrekt omräkningskurs (gamla aktier -
> nya aktier).
"
18 sMsgNoValidExchangeDate =
"Var vänlig och mata in ett giltigt datum för aktiesplitten.
"
19 sMsgWrongExchangeDate =
"Split är inte möjlig eftersom det redan finns transaktioner efter splitdatum.
"
20 sMsgSellTooMuch =
"Så många aktier kan Du inte sälja. Maximum:
"
21 sMsgConfirm =
"Bekräftelse krävs
"
22 sMsgFreeStock =
"Avser Du att mata in gratisaktier?
"
23 sMsgTotalLoss =
"Avser Du att mata in en totalförlust?
"
24 sMsgAuthorization =
"Säkerhetskontroll
"
25 sMsgDeleteAll =
"Vill Du ta bort alla rörelser och återställa portföljöversikten?
"
26 cSplit =
"Aktiesplit den
"
27 sHistory =
"Historik
"
28 TransactTitle(
1) =
"Sälja aktier
"
29 TransactTitle(
2) =
"Köpa aktier
"
30 StockRatesTitle(
1) =
"Aktieutdelning
"
31 StockRatesTitle(
2) =
"Aktiesplit
"
32 StockRatesTitle(
3) = sHistory
33 sDepotCurrency =
"Portföljvaluta
"
34 sStockName =
"Aktienamn
"
35 TransactMode = LIFO
' Possible values:
"FIFO
" and
"LIFO
"
36 DateCellStyle =
"Resultat datum
"
37 CurrCellStyle =
"1"
38 sStartDate =
"Startdatum:
"
39 sEndDate =
"Slutdatum:
"
40 sStartUpWelcome =
"Med hjälp av den här mallen kan Du förvalta Din aktieportfölj effektivt
"
41 sStartUpChooseMarket =
"Välj först Din referensvaluta och därigenom börs för Internet-uppdateringen!
"
42 sStartUpHint =
"Tyvärr är
<History
>-funktionen bara tillgänglig för den amerikanska marknaden!
"
43 sStartupHint = ReplaceString(sStartUpHint, sHistory,
"<History
>")
44 sNoInternetUpdate =
"utan Internet-uppdatering
"
45 sMarketPlace =
"Börs:
"
46 sNoInternetDataAvailable =
"Det gick inte att ta emot Internet-kurser!
"
47 sCheckInternetSettings =
"Detta kan bero på att:
<BR
> Dina Internet-inställningar måste ändras.
<BR
> Du har angivit ett felaktigt ID (t.ex. symbol, värdepappersnr.) för aktien.
"
48 sCheckInternetSettings = ReplaceString(sCheckInternetSettings, chr(
13),
"<BR
>")
50 sMsgEndDatebeforeNow =
"Slutdatum måste ligga före idag!
"
51 sMsgStartDatebeforeEndDate =
"Startdatum måste ligga före slutdatum!
"
53 sMarket(
0,
0) =
"Amerikansk dollar
"
54 sMarket(
0,
1) =
"$
"
55 sMarket(
0,
2) =
"New York
"
56 sMarket(
0,
3) =
"http://finance.yahoo.com/d/quotes.csv?s=
<StockID
>&f=sl1d1t1c1ohgv
&e=.csv
"
57 sMarket(
0,
4) =
"http://ichart.finance.yahoo.com/table.csv?
" &_
58 "s=
<StockID
>&d=
<EndMonth
>&e=
<EndDay
>&f=
<Endyear
>&g=d
&" &_
59 "a=
<StartMonth
>&b=
<StartDay
>&c=
<Startyear
>&ignore=.csv
"
60 sMarket(
0,
5) =
"Symbol
"
61 sMarket(
0,
6) =
"en
"
62 sMarket(
0,
7) =
"US
"
63 sMarket(
0,
8) =
"409"
64 sMarket(
0,
9) =
"44"
65 sMarket(
0,
10) =
"1"
67 sMarket(
1,
0) =
"Euro
"
68 sMarket(
1,
1) = chr(
8364)
69 sMarket(
1,
2) =
"Frankfurt
"
70 sMarket(
1,
3) =
"http://de.finance.yahoo.com/d/quotes.csv?s=
<StockID
>.F
&f=sl1t1c1ghpv
&e=.csv
"
71 sMarket(
1,
5) =
"Värdepappersnr
"
72 sMarket(
1,
6) =
"de;nl;pt;el
"
73 sMarket(
1,
7) =
"DE;NL;PT;GR
"
74 sMarket(
1,
8) =
"407;
413;
816;
408"
75 sMarket(
1,
9) =
"59/
9"
76 sMarket(
1,
10) =
"1"
78 sMarket(
2,
0) =
"Engelskt pund
"
79 sMarket(
2,
1) =
"£
"
80 sMarket(
2,
2) =
"London
"
81 sMarket(
2,
3) =
"http://uk.finance.yahoo.com/d/quotes.csv?s=
<StockID
>.L
&m=*
&f=sl1t1c1ghov
&e=.csv
"
82 sMarket(
2,
5) =
"Symbol
"
83 sMarket(
2,
6) =
"en
"
84 sMarket(
2,
7) =
"GB
"
85 sMarket(
2,
8) =
"809"
86 sMarket(
2,
9) =
"44"
87 sMarket(
2,
10) =
"1"
89 sMarket(
3,
0) =
"Japansk yen
"
90 sMarket(
3,
1) =
"¥
"
91 sMarket(
3,
2) =
"Tokyo
"
92 sMarket(
3,
3) =
""
93 sMarket(
3,
5) =
"Kod
"
94 sMarket(
3,
6) =
"ja
"
95 sMarket(
3,
7) =
"JP
"
96 sMarket(
3,
8) =
"411"
97 sMarket(
3,
9) =
""
98 sMarket(
3,
10) =
""
100 sMarket(
4,
0) =
"Hongkongdollar
"
101 sMarket(
4,
1) =
"HK$
"
102 sMarket(
4,
2) =
"Hongkong
"
103 sMarket(
4,
3) =
"http://hk.finance.yahoo.com/d/quotes.csv?s=
<StockID
>&f=sl1d1t1c1ohgv
&e=.csv
"
104 sMarket(
4,
5) =
"Nummer
"
105 sMarket(
4,
6) =
"zh
"
106 sMarket(
4,
7) =
"HK
"
107 sMarket(
4,
8) =
"C04
"
108 sMarket(
4,
9) =
"44"
109 sMarket(
4,
10) =
"1"
111 sMarket(
5,
0) =
"Australisk dollar
"
112 sMarket(
5,
1) =
"$
"
113 sMarket(
5,
2) =
"Sydney
"
114 sMarket(
5,
3) =
"http://au.finance.yahoo.com/d/quotes.csv?s=
<StockID
>&f=sl1d1t1c1ohgv
&e=.csv
"
115 sMarket(
5,
5) =
"Symbol
"
116 sMarket(
5,
6) =
"en
"
117 sMarket(
5,
7) =
"AU
"
118 sMarket(
5,
8) =
"C09
"
119 sMarket(
5,
9) =
"44"
120 sMarket(
5,
10) =
"1"
122 ' ****************************End of the default subset*********************************
125 LocalizedCurrencies()
128 .lblStockNames.Label = sStockname
129 .lblQuantity.Label =
"Antal
"
130 .lblRate.Label =
"Kurs
"
131 .lblDate.Label =
"Transaktionsdatum
"
132 .hlnCommission.Label =
"Övriga utgifter
"
133 .lblCommission.Label =
"Provision
"
134 .lblMinimum.Label =
"Minimiprovision
"
135 .lblFix.Label =
"Fast belopp/omkostnader
"
137 .cmdCancel.Label = sCancel
141 .optPerShare.Label =
"Utdelning per aktie
"
142 .optTotal.Label =
"Utdelning totalt
"
143 .lblDividend.Label =
"Belopp
"
144 .lblExchangeRate.Label =
"Omräkningskurs (gammal-
>ny)
"
145 .lblColon.Label =
":
"
146 .lblDate.Label =
"Omräkningsdatum:
"
147 .lblStockNames.Label = sStockname
148 .lblStartDate.Label = sStartDate
149 .lblEndDate.Label = sEndDate
150 .optDaily.Label =
"~Dagligen
"
151 .optWeekly.Label =
"~Varje vecka
"
152 .hlnInterval.Label =
"Period
"
154 .cmdCancel.Label = sCancel