wizards/source/depot/Lang_sv.xba

   1 <?xml version="1.0" encoding="UTF-8"?>
   2 <!DOCTYPE script:module PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd">
   3 <!--
   4  * This file is part of the LibreOffice project.
   5  *
   6  * This Source Code Form is subject to the terms of the Mozilla Public
   7  * License, v. 2.0. If a copy of the MPL was not distributed with this
   8  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
   9  *
  10  * This file incorporates work covered by the following license notice:
  11  *
  12  *   Licensed to the Apache Software Foundation (ASF) under one or more
  13  *   contributor license agreements. See the NOTICE file distributed
  14  *   with this work for additional information regarding copyright
  15  *   ownership. The ASF licenses this file to you under the Apache
  16  *   License, Version 2.0 (the "License"); you may not use this file
  17  *   except in compliance with the License. You may obtain a copy of
  18  *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
  19 -->
  20 <script:module xmlns:script="http://openoffice.org/2000/script" script:name="Lang_sv" script:language="StarBasic">Option Explicit
  21
  22 Sub LoadSwedishLanguage()
  23         sProductname = GetProductname
  24         sOK = &quot;~OK&quot;
  25         sCancel = &quot;Avbryt&quot;
  26         sColumnHeader = &quot;Kolumnhuvud&quot;
  27         sInsertStockName = &quot;Infoga först några aktier i Din portfölj!&quot;
  28         sTitle = &quot;&lt;PRODUCTNAME&gt;: Aktieförvaltning&quot;
  29         sTitle = ReplaceString(sTitle, sProductName, &quot;&lt;PRODUCTNAME&gt;&quot;)
  30         sMsgError = &quot;Inmatningsfel&quot;
  31         sMsgNoName = sInsertStockname
  32         sMsgNoQuantity = &quot;Var vänlig och mata in ett större antal än 0&quot;
  33         sMsgNoDividend = &quot;Var vänlig och mata in utdelning per styck eller den totala utdelningen&quot;
  34         sMsgNoExchangeRate = &quot;Var vänlig och mata in en korrekt omräkningskurs (gamla aktier -&gt; nya aktier).&quot;
  35         sMsgNoValidExchangeDate = &quot;Var vänlig och mata in ett giltigt datum för aktiesplitten.&quot;
  36         sMsgWrongExchangeDate = &quot;Split är inte möjlig eftersom det redan finns transaktioner efter splitdatum.&quot;
  37         sMsgSellTooMuch = &quot;Så många aktier kan Du inte sälja. Maximum: &quot;
  38         sMsgConfirm = &quot;Bekräftelse krävs&quot;
  39         sMsgFreeStock = &quot;Avser Du att mata in gratisaktier?&quot;
  40         sMsgTotalLoss = &quot;Avser Du att mata in en totalförlust?&quot;
  41         sMsgAuthorization = &quot;Säkerhetskontroll&quot;
  42         sMsgDeleteAll = &quot;Vill Du ta bort alla rörelser och återställa portföljöversikten?&quot;
  43         cSplit = &quot;Aktiesplit den &quot;
  44         sHistory = &quot;Historik&quot;
  45         TransactTitle(1) =       &quot;Sälja aktier&quot;
  46         TransactTitle(2) = &quot;Köpa aktier&quot;
  47         StockRatesTitle(1) = &quot;Aktieutdelning&quot;
  48         StockRatesTitle(2) = &quot;Aktiesplit&quot;
  49         StockRatesTitle(3) = sHistory
  50         sDepotCurrency = &quot;Portföljvaluta&quot;
  51         sStockName = &quot;Aktienamn&quot;
  52         TransactMode = LIFO     &apos; Possible values: &quot;FIFO&quot; and &quot;LIFO&quot;
  53         DateCellStyle = &quot;Resultat datum&quot;
  54         CurrCellStyle = &quot;1&quot;
  55         sStartDate = &quot;Startdatum:&quot;
  56         sEndDate = &quot;Slutdatum:&quot;
  57         sStartUpWelcome = &quot;Med hjälp av den här mallen kan Du förvalta Din aktieportfölj effektivt&quot;
  58         sStartUpChooseMarket = &quot;Välj först Din referensvaluta och därigenom börs för Internet-uppdateringen!&quot;
  59         sStartUpHint = &quot;Tyvärr är &lt;History&gt;-funktionen bara tillgänglig för den amerikanska marknaden!&quot;
  60         sStartupHint = ReplaceString(sStartUpHint, sHistory, &quot;&lt;History&gt;&quot;)
  61         sNoInternetUpdate = &quot;utan Internet-uppdatering&quot;
  62         sMarketPlace = &quot;Börs:&quot;
  63         sNoInternetDataAvailable = &quot;Det gick inte att ta emot Internet-kurser!&quot;
  64         sCheckInternetSettings = &quot;Detta kan bero på att: &lt;BR&gt; Dina Internet-inställningar måste ändras.&lt;BR&gt; Du har angivit ett felaktigt ID (t.ex. symbol, värdepappersnr.) för aktien.&quot;
  65         sCheckInternetSettings = ReplaceString(sCheckInternetSettings, chr(13), &quot;&lt;BR&gt;&quot;)
  66
  67         sMsgEndDatebeforeNow = &quot;Slutdatum måste ligga före idag!&quot;
  68         sMsgStartDatebeforeEndDate = &quot;Startdatum måste ligga före slutdatum!&quot;
  69
  70         sMarket(0,0) = &quot;Amerikansk dollar&quot;
  71         sMarket(0,1) = &quot;$&quot;
  72         sMarket(0,2) = &quot;New York&quot;
  73         sMarket(0,3) = &quot;http://finance.yahoo.com/d/quotes.csv?s=&lt;StockID&gt;&amp;f=sl1d1t1c1ohgv&amp;e=.csv&quot;
  74         sMarket(0,4) = &quot;http://ichart.finance.yahoo.com/table.csv?&quot; &amp;_
  75                                    &quot;s=&lt;StockID&gt;&amp;d=&lt;EndMonth&gt;&amp;e=&lt;EndDay&gt;&amp;f=&lt;Endyear&gt;&amp;g=d&amp;&quot; &amp;_
  76                                    &quot;a=&lt;StartMonth&gt;&amp;b=&lt;StartDay&gt;&amp;c=&lt;Startyear&gt;&amp;ignore=.csv&quot;
  77         sMarket(0,5) = &quot;Symbol&quot;
  78         sMarket(0,6) = &quot;en&quot;
  79         sMarket(0,7) = &quot;US&quot;
  80         sMarket(0,8) = &quot;409&quot;
  81         sMarket(0,9) = &quot;44&quot;
  82         sMarket(0,10) = &quot;1&quot;
  83
  84         sMarket(1,0) = &quot;Euro&quot;
  85         sMarket(1,1) = chr(8364)
  86         sMarket(1,2) = &quot;Frankfurt&quot;
  87         sMarket(1,3) = &quot;http://de.finance.yahoo.com/d/quotes.csv?s=&lt;StockID&gt;.F&amp;f=sl1t1c1ghpv&amp;e=.csv&quot;
  88         sMarket(1,5) = &quot;Värdepappersnr&quot;
  89         sMarket(1,6) = &quot;de;nl;pt;el&quot;
  90         sMarket(1,7) = &quot;DE;NL;PT;GR&quot;
  91         sMarket(1,8) = &quot;407;413;816;408&quot;
  92         sMarket(1,9) = &quot;59/9&quot;
  93         sMarket(1,10) = &quot;1&quot;
  94
  95         sMarket(2,0) = &quot;Engelskt pund&quot;
  96         sMarket(2,1) = &quot;£&quot;
  97         sMarket(2,2) = &quot;London&quot;
  98         sMarket(2,3) = &quot;http://uk.finance.yahoo.com/d/quotes.csv?s=&lt;StockID&gt;.L&amp;m=*&amp;f=sl1t1c1ghov&amp;e=.csv&quot;
  99         sMarket(2,5) = &quot;Symbol&quot;
 100         sMarket(2,6) = &quot;en&quot;
 101         sMarket(2,7) = &quot;GB&quot;
 102         sMarket(2,8) = &quot;809&quot;
 103         sMarket(2,9) = &quot;44&quot;
 104         sMarket(2,10) = &quot;1&quot;
 105
 106         sMarket(3,0) = &quot;Japansk yen&quot;
 107         sMarket(3,1) = &quot;¥&quot;
 108         sMarket(3,2) = &quot;Tokyo&quot;
 109         sMarket(3,3) = &quot;&quot;
 110         sMarket(3,5) = &quot;Kod&quot;
 111         sMarket(3,6) = &quot;ja&quot;
 112         sMarket(3,7) = &quot;JP&quot;
 113         sMarket(3,8) = &quot;411&quot;
 114         sMarket(3,9) = &quot;&quot;
 115         sMarket(3,10) = &quot;&quot;
 116
 117         sMarket(4,0) = &quot;Hongkongdollar&quot;
 118         sMarket(4,1) = &quot;HK$&quot;
 119         sMarket(4,2) = &quot;Hongkong&quot;
 120         sMarket(4,3) = &quot;http://hk.finance.yahoo.com/d/quotes.csv?s=&lt;StockID&gt;&amp;f=sl1d1t1c1ohgv&amp;e=.csv&quot;
 121         sMarket(4,5) = &quot;Nummer&quot;
 122         sMarket(4,6) = &quot;zh&quot;
 123         sMarket(4,7) = &quot;HK&quot;
 124         sMarket(4,8) = &quot;C04&quot;
 125         sMarket(4,9) = &quot;44&quot;
 126         sMarket(4,10) = &quot;1&quot;
 127
 128         sMarket(5,0) = &quot;Australisk dollar&quot;
 129         sMarket(5,1) = &quot;$&quot;
 130         sMarket(5,2) = &quot;Sydney&quot;
 131         sMarket(5,3) = &quot;http://au.finance.yahoo.com/d/quotes.csv?s=&lt;StockID&gt;&amp;f=sl1d1t1c1ohgv&amp;e=.csv&quot;
 132         sMarket(5,5) = &quot;Symbol&quot;
 133         sMarket(5,6) = &quot;en&quot;
 134         sMarket(5,7) = &quot;AU&quot;
 135         sMarket(5,8) = &quot;C09&quot;
 136         sMarket(5,9) = &quot;44&quot;
 137         sMarket(5,10) = &quot;1&quot;
 138
 139 &apos; ****************************End of the default subset*********************************
 140         CompleteMarketList()
 141
 142         LocalizedCurrencies()
 143
 144         With TransactModel
 145                 .lblStockNames.Label = sStockname
 146                 .lblQuantity.Label = &quot;Antal&quot;
 147                 .lblRate.Label = &quot;Kurs&quot;
 148                 .lblDate.Label = &quot;Transaktionsdatum&quot;
 149                 .hlnCommission.Label = &quot;Övriga utgifter&quot;
 150                 .lblCommission.Label = &quot;Provision&quot;
 151                 .lblMinimum.Label = &quot;Minimiprovision&quot;
 152                 .lblFix.Label = &quot;Fast belopp/omkostnader&quot;
 153                 .cmdGoOn.Label = sOK
 154                 .cmdCancel.Label = sCancel
 155         End With
 156
 157         With StockRatesModel
 158                 .optPerShare.Label = &quot;Utdelning per aktie&quot;
 159                 .optTotal.Label = &quot;Utdelning totalt&quot;
 160                 .lblDividend.Label = &quot;Belopp&quot;
 161                 .lblExchangeRate.Label = &quot;Omräkningskurs (gammal-&gt;ny)&quot;
 162                 .lblColon.Label = &quot;:&quot;
 163                 .lblDate.Label = &quot;Omräkningsdatum:&quot;
 164                 .lblStockNames.Label = sStockname
 165                 .lblStartDate.Label = sStartDate
 166                 .lblEndDate.Label = sEndDate
 167                 .optDaily.Label = &quot;~Dagligen&quot;
 168                 .optWeekly.Label = &quot;~Varje vecka&quot;
 169                 .hlnInterval.Label = &quot;Period&quot;
 170                 .cmdGoOn.Label = sOk
 171                 .cmdCancel.Label = sCancel
 172         End With
 173 End Sub
 174 </script:module>