home *** CD-ROM | disk | FTP | other *** search
/ PC World 2004 May / PCWorld_2004-05_cd.bin / akce / openoffice / f_0221 / Lang_sv.xba < prev    next >
Extensible Markup Language  |  2002-11-21  |  7KB  |  156 lines
  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
  4.  
  5. Sub LoadSwedishLanguage()
  6.     sProductname = GetProductname
  7.     sOK = "~OK" 
  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>")
  49.  
  50.     sMsgEndDatebeforeNow = "Slutdatum m├Ñste ligga f├╢re idag!"
  51.     sMsgStartDatebeforeEndDate = "Startdatum m├Ñste ligga f├╢re slutdatum!"
  52.  
  53.     sMarket(0,0) = "Amerikansk dollar"
  54.     sMarket(0,1) = "$"
  55.     sMarket(0,2) = "New York"
  56.     sMarket(0,3) = "http://quote.yahoo.com/d/quotes.csv?s=<StockID>&f=sl1d1t1c1ohgv&e=.csv"
  57.     sMarket(0,4) = "http://table.finance.yahoo.com/table.csv?" &_
  58.                     "a=<StartMonth>&b=<StartDay>&c=<Startyear>&d=<EndMonth>&" &_
  59.                     "e=<EndDay>&f=<Endyear>&s=<StockID>&y=0&g=<interval>&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"
  66.     
  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"
  77.  
  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"
  88.  
  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) = ""
  99.     
  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"
  110.  
  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"
  121.  
  122. ' ****************************End of the default subset*********************************
  123.     CompleteMarketList()
  124.  
  125.     LocalizedCurrencies()
  126.     
  127.     With TransactModel
  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"
  136.         .cmdGoOn.Label = sOK
  137.         .cmdCancel.Label = sCancel
  138.     End With
  139.     
  140.     With StockRatesModel
  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"
  153.         .cmdGoOn.Label = sOk
  154.         .cmdCancel.Label = sCancel
  155.     End With
  156. End Sub</script:module>