summaryrefslogtreecommitdiff
path: root/wizards
diff options
context:
space:
mode:
authorVolker Ahrendt <va@openoffice.org>2002-11-21 12:26:55 +0000
committerVolker Ahrendt <va@openoffice.org>2002-11-21 12:26:55 +0000
commit387b6c3d36ad5c9eb58065a2e9afc50943cd11f4 (patch)
tree7ae279360c2a8d4b3bc49e3ce7689b7065097f1d /wizards
parent4ac0a6ee3f5ada7950df17787d4a9b3a99fdd0b3 (diff)
#102336# Replaced placeholder in BASIC.
Diffstat (limited to 'wizards')
-rw-r--r--wizards/source/depot/CommonLang.xba35
-rw-r--r--wizards/source/depot/Currency.xba1
-rw-r--r--wizards/source/depot/Depot.xba4
-rw-r--r--wizards/source/depot/Internet.xba6
-rw-r--r--wizards/source/depot/Lang_de.xba6
-rw-r--r--wizards/source/depot/Lang_en.xba10
-rw-r--r--wizards/source/depot/Lang_es.xba10
-rw-r--r--wizards/source/depot/Lang_fr.xba10
-rw-r--r--wizards/source/depot/Lang_it.xba10
-rw-r--r--wizards/source/depot/Lang_sv.xba10
-rw-r--r--wizards/source/depot/Lang_tw.xba10
-rw-r--r--wizards/source/depot/Lang_zh.xba10
12 files changed, 92 insertions, 30 deletions
diff --git a/wizards/source/depot/CommonLang.xba b/wizards/source/depot/CommonLang.xba
index 7e609416cfa4..a1cb283dab14 100644
--- a/wizards/source/depot/CommonLang.xba
+++ b/wizards/source/depot/CommonLang.xba
@@ -86,6 +86,7 @@ Public sInterval as String
Public ShortMonths(11,1)
Public iStep as Integer
Public sDepotCurrency as String
+Public iValueCol as Integer
Public DlgReference as Object
Public DlgTransaction as Object
@@ -99,8 +100,8 @@ Public TransactTitle(1 To 2)
Public NullList()
Public sStartupWelcome$, sStartupChooseMarket$, sStartupHint$
-Public sMarket(6,9) as String
-Public sCountryMarket(6,9) as String
+Public sMarket(7,10) as String
+Public sCountryMarket(7,10) as String
Public cDlgCaption1$, cDlgCaption2$
Public sMsgError$, sMsgNoName$, sMsgNoQuantity$, sMsgNoDividend$, sMsgNoExchangeRate$
@@ -199,6 +200,7 @@ Sub LocalizedCurrencies()
sCountryMarket(0,7) = &quot;FR&quot;
sCountryMarket(0,8) = &quot;40C&quot;
sCountryMarket(0,9) = &quot;59/9&quot;
+ sCountryMarket(0,10) = &quot;1&quot;
sCountryMarket(1,0) = &quot;Euro&quot;
sCountryMarket(1,1) = chr(8364)
@@ -209,6 +211,7 @@ Sub LocalizedCurrencies()
sCountryMarket(1,7) = &quot;IT&quot;
sCountryMarket(1,8) = &quot;410&quot;
sCountryMarket(1,9) = &quot;44&quot;
+ sCountryMarket(1,10) = &quot;1&quot;
sCountryMarket(2,0) = &quot;Euro&quot;
sCountryMarket(2,1) = chr(8364)
@@ -219,6 +222,7 @@ Sub LocalizedCurrencies()
sCountryMarket(2,7) = &quot;ES&quot;
sCountryMarket(2,8) = &quot;40A&quot;
sCountryMarket(2,9) = &quot;44&quot;
+ sCountryMarket(2,10) = &quot;1&quot;
sCountryMarket(3,0) = &quot;Dansk krone&quot;
sCountryMarket(3,1) = &quot;kr&quot;
@@ -229,6 +233,7 @@ Sub LocalizedCurrencies()
sCountryMarket(3,7) = &quot;DK&quot;
sCountryMarket(3,8) = &quot;406&quot;
sCountryMarket(3,9) = &quot;44&quot;
+ sCountryMarket(3,10) = &quot;1&quot;
sCountryMarket(4,0) = &quot;Svensk krona&quot;
sCountryMarket(4,1) = &quot;kr&quot;
@@ -239,6 +244,7 @@ Sub LocalizedCurrencies()
sCountryMarket(4,7) = &quot;SE&quot;
sCountryMarket(4,8) = &quot;41D&quot;
sCountryMarket(4,9) = &quot;44&quot;
+ sCountryMarket(4,10) = &quot;1&quot;
&apos; Taiwan Dollar
sCountryMarket(5,0) = &quot;新臺幣&quot;
@@ -250,6 +256,7 @@ Sub LocalizedCurrencies()
sCountryMarket(5,7) = &quot;TW&quot;
sCountryMarket(5,8) = &quot;404&quot;
sCountryMarket(5,9) = &quot;44&quot;
+ sCountryMarket(5,10) = &quot;1&quot;
&apos; Chinese Yuan
sCountryMarket(6,0) = &quot;人民币&quot;
@@ -261,17 +268,19 @@ Sub LocalizedCurrencies()
sCountryMarket(6,7) = &quot;CN&quot;
sCountryMarket(6,8) = &quot;804&quot;
sCountryMarket(6,9) = &quot;44&quot;
-
+ sCountryMarket(6,10) = &quot;1&quot;
+
&apos; korean Won
-&apos; sCountryMarket(7,0) = &quot;한국 원&quot;
-&apos; sCountryMarket(7,1) = &quot;&quot;
-&apos; sCountryMarket(7,2) = &quot;&quot;
-&apos; sCountryMarket(7,3) = &quot;&quot;
-&apos; sCountryMarket(7,5) = &quot;&quot;
-&apos; sCountryMarket(7,6) = &quot;ko&quot;
-&apos; sCountryMarket(7,7) = &quot;KR&quot;
-&apos; sCountryMarket(7,8) = &quot;412&quot;
-&apos; sCountryMarket(7,9) = &quot;&quot;
+ sCountryMarket(7,0) = &quot;한국 원화&quot;
+ sCountryMarket(7,1) = &quot;₩&quot;
+ sCountryMarket(7,2) = &quot;서울&quot;
+ sCountryMarket(7,3) = &quot;http://kr.finance.yahoo.com/d/quotes.csv?s=&lt;StockID&gt;.KS&amp;f=snl1d1t1c1ohgv&amp;e=.csv&quot;
+ sCountryMarket(7,5) = &quot;종목 코드&quot;
+ sCountryMarket(7,6) = &quot;ko&quot;
+ sCountryMarket(7,7) = &quot;KR&quot;
+ sCountryMarket(7,8) = &quot;412&quot;
+ sCountryMarket(7,9) = &quot;44&quot;
+ sCountryMarket(7,10) = &quot;2&quot;
&apos; sCountryMarket(5,0) = &quot;Российский рубль&quot;
@@ -311,7 +320,7 @@ Sub LocalizedCurrencies()
For n = 0 To Ubound(sCountryMarket(),1)
If sDocLanguage = sCountryMarket(n,6) and sDocCountry = sCountryMarket(n,7) Then
GlobListIndex = 6
- For m = 0 To 9
+ For m = 0 To 10
sMarket(6,m) = sCountryMarket(n,m)
Next m
Exit For
diff --git a/wizards/source/depot/Currency.xba b/wizards/source/depot/Currency.xba
index 654e916e84fc..c432fecc2661 100644
--- a/wizards/source/depot/Currency.xba
+++ b/wizards/source/depot/Currency.xba
@@ -72,6 +72,7 @@ Dim bIsDocCountry as Boolean
End If
sCurStockIDLabel = sMarket(Index,5)
sCurExtension = sMarket(Index,8)
+ iValueCol = Val(sMarket(Index,10)
If Instr(sCurExtension,&quot;;&quot;) &lt;&gt; 0 Then
&apos; Take the german extension as the stock place is Frankfurt
sCurExtension = &quot;407&quot;
diff --git a/wizards/source/depot/Depot.xba b/wizards/source/depot/Depot.xba
index 324fe2e4ba41..435280136818 100644
--- a/wizards/source/depot/Depot.xba
+++ b/wizards/source/depot/Depot.xba
@@ -4,7 +4,10 @@
Sub Initialize(Optional bChooseMarketPlace as Boolean)
+Dim bEnableHistory as Boolean
GlobalScope.BasicLibraries.LoadLibrary(&quot;Tools&quot;)
+&apos; oMarketModel = GetControlModel(oDocument.Sheets(0), &quot;CmdHistory&quot;)
+&apos; bEnableHistory = oMarketModel.Enabled
ToggleWindow(False)
Today = Date()
bDebugmode = False
@@ -22,6 +25,7 @@ Sub Initialize(Optional bChooseMarketPlace as Boolean)
sDocCountry = oDocLocale.Country
LoadLanguage()
ToggleWindow(True)
+&apos; oMarketModel.Enabled = bEnableHistory
If Not IsMissing(bChooseMarketPlace) Then
If bChoosemarketPlace Then
ChooseMarket()
diff --git a/wizards/source/depot/Internet.xba b/wizards/source/depot/Internet.xba
index 62522956fadc..d6d718561384 100644
--- a/wizards/source/depot/Internet.xba
+++ b/wizards/source/depot/Internet.xba
@@ -121,7 +121,7 @@ End Sub
-Function GetCurrentRate(sUrl as String, fValue As Double, iValueCol as Integer) as Boolean
+Function GetCurrentRate(sUrl as String, fValue As Double, iValueRow as Integer) as Boolean
Dim sFilter As String
Dim sOptions As String
Dim oLinkSheet As Object
@@ -139,10 +139,10 @@ Dim sDate as String
oLinkSheet.LinkMode = com.sun.star.sheet.SheetLinkMode.NONE
oLinkSheet.link(sUrl, &quot;&quot;, sFilter, sOptions, 1 )
- fValue = oLinkSheet.getCellByPosition(1, iValueCol).Value
+ fValue = oLinkSheet.getCellByPosition(iValueCol, iValueRow).Value
If fValue = 0 Then
Dim sValue as String
- sValue = oLinkSheet.getCellByPosition(1, iValueCol).String
+ sValue = oLinkSheet.getCellByPosition(1, iValueRow).String
sValue = ReplaceString(sValue, &quot;.&quot;,&quot;,&quot;)
fValue = Val(sValue)
End If
diff --git a/wizards/source/depot/Lang_de.xba b/wizards/source/depot/Lang_de.xba
index 630d9528ac62..d2b9362872e9 100644
--- a/wizards/source/depot/Lang_de.xba
+++ b/wizards/source/depot/Lang_de.xba
@@ -63,6 +63,7 @@ Sub LoadGermanLanguage()
sMarket(0,7) = &quot;US&quot;
sMarket(0,8) = &quot;409&quot;
sMarket(0,9) = &quot;44&quot;
+ sMarket(0,10) = &quot;1&quot;
sMarket(1,0) = &quot;Euro&quot;
sMarket(1,1) = chr(8364)
@@ -73,6 +74,7 @@ Sub LoadGermanLanguage()
sMarket(1,7) = &quot;DE;NL;PT;GR&quot;
sMarket(1,8) = &quot;407;413;816;408&quot;
sMarket(1,9) = &quot;59/9&quot;
+ sMarket(1,10) = &quot;1&quot;
sMarket(2,0) = &quot;Englisches Pfund&quot;
sMarket(2,1) = &quot;£&quot;
@@ -83,6 +85,7 @@ Sub LoadGermanLanguage()
sMarket(2,7) = &quot;GB&quot;
sMarket(2,8) = &quot;809&quot;
sMarket(2,9) = &quot;44&quot;
+ sMarket(2,10) = &quot;1&quot;
sMarket(3,0) = &quot;Japanischer Yen&quot;
sMarket(3,1) = &quot;¥&quot;
@@ -93,6 +96,7 @@ Sub LoadGermanLanguage()
sMarket(3,7) = &quot;JP&quot;
sMarket(3,8) = &quot;411&quot;
sMarket(3,9) = &quot;&quot;
+ sMarket(3,10) = &quot;&quot;
sMarket(4,0) = &quot;Hongkong Dollar&quot;
sMarket(4,1) = &quot;HK$&quot;
@@ -103,6 +107,7 @@ Sub LoadGermanLanguage()
sMarket(4,7) = &quot;HK&quot;
sMarket(4,8) = &quot;C04&quot;
sMarket(4,9) = &quot;44&quot;
+ sMarket(4,10) = &quot;1&quot;
sMarket(5,0) = &quot;Australischer Dollar&quot;
sMarket(5,1) = &quot;$&quot;
@@ -113,6 +118,7 @@ Sub LoadGermanLanguage()
sMarket(5,7) = &quot;AU&quot;
sMarket(5,8) = &quot;C09&quot;
sMarket(5,9) = &quot;44&quot;
+ sMarket(5,10) = &quot;1&quot;
&apos; ****************************End of the default subset*********************************
CompleteMarketList()
diff --git a/wizards/source/depot/Lang_en.xba b/wizards/source/depot/Lang_en.xba
index d648c3d1643e..fa8beb77dde4 100644
--- a/wizards/source/depot/Lang_en.xba
+++ b/wizards/source/depot/Lang_en.xba
@@ -9,7 +9,7 @@ Sub LoadEnglishLanguage()
sCancel = &quot;Cancel&quot;
sColumnHeader = &quot;Column Header&quot;
sInsertStockName = &quot;Please enter shares in your portfolio.&quot;
- sTitle = &quot;&lt;PRODUCTNAME&gt;&lt;PRODUCTNAME&gt;: Stocks Manager&quot;
+ sTitle = &quot;&lt;PRODUCTNAME&gt;: Stocks Manager&quot;
sTitle = ReplaceString(sTitle, sProductName, &quot;&lt;PRODUCTNAME&gt;&quot;)
sMsgError = &quot;Input Error&quot;
sMsgNoName = sInsertStockname
@@ -45,7 +45,7 @@ Sub LoadEnglishLanguage()
sNoInternetUpdate = &quot;without Internet update&quot;
sMarketPlace = &quot;Stock exchange:&quot;
sNoInternetDataAvailable = &quot;No prices could be received from the Internet!&quot;
- sCheckInternetSettings = &quot;Possible causes could be: &lt;BR&gt;Your Internet settings have to be modified. &lt;BR&gt;The &lt;SYMBOL&gt; entered for the stock was incorrect.&quot;
+ sCheckInternetSettings = &quot;Possible causes could be: &lt;BR&gt;Your Internet settings have to be modified. &lt;BR&gt;The Symbol (e.g. Code, Ticker Symbol) entered for the stock was incorrect.&quot;
sCheckInternetSettings = ReplaceString(sCheckInternetSettings, chr(13), &quot;&lt;BR&gt;&quot;)
sMsgEndDatebeforeNow = &quot;The end date has to be before today&apos;s date.&quot;
@@ -63,6 +63,7 @@ Sub LoadEnglishLanguage()
sMarket(0,7) = &quot;US&quot;
sMarket(0,8) = &quot;409&quot;
sMarket(0,9) = &quot;44&quot;
+ sMarket(0,10) = &quot;1&quot;
sMarket(1,0) = &quot;Euro&quot;
sMarket(1,1) = chr(8364)
@@ -73,6 +74,7 @@ Sub LoadEnglishLanguage()
sMarket(1,7) = &quot;DE;NL;PT;GR&quot;
sMarket(1,8) = &quot;407;413;816;408&quot;
sMarket(1,9) = &quot;59/9&quot;
+ sMarket(1,10) = &quot;1&quot;
sMarket(2,0) = &quot;British Pound&quot;
sMarket(2,1) = &quot;£&quot;
@@ -83,6 +85,7 @@ Sub LoadEnglishLanguage()
sMarket(2,7) = &quot;GB&quot;
sMarket(2,8) = &quot;809&quot;
sMarket(2,9) = &quot;44&quot;
+ sMarket(2,10) = &quot;1&quot;
sMarket(3,0) = &quot;Japanese Yen&quot;
sMarket(3,1) = &quot;¥&quot;
@@ -93,6 +96,7 @@ Sub LoadEnglishLanguage()
sMarket(3,7) = &quot;JP&quot;
sMarket(3,8) = &quot;411&quot;
sMarket(3,9) = &quot;&quot;
+ sMarket(3,10) = &quot;&quot;
sMarket(4,0) = &quot;Hong Kong Dollar&quot;
sMarket(4,1) = &quot;HK$&quot;
@@ -103,6 +107,7 @@ Sub LoadEnglishLanguage()
sMarket(4,7) = &quot;HK&quot;
sMarket(4,8) = &quot;C04&quot;
sMarket(4,9) = &quot;44&quot;
+ sMarket(4,10) = &quot;1&quot;
sMarket(5,0) = &quot;Australian Dollar&quot;
sMarket(5,1) = &quot;$&quot;
@@ -113,6 +118,7 @@ Sub LoadEnglishLanguage()
sMarket(5,7) = &quot;AU&quot;
sMarket(5,8) = &quot;C09&quot;
sMarket(5,9) = &quot;44&quot;
+ sMarket(5,10) = &quot;1&quot;
&apos; ****************************End of the default subset*********************************
CompleteMarketList()
diff --git a/wizards/source/depot/Lang_es.xba b/wizards/source/depot/Lang_es.xba
index 5e0524bfc2ca..e02280744a1e 100644
--- a/wizards/source/depot/Lang_es.xba
+++ b/wizards/source/depot/Lang_es.xba
@@ -9,7 +9,7 @@ Sub LoadSpanishLanguage()
sCancel = &quot;Cancelar&quot;
sColumnHeader = &quot;Título de columna&quot;
sInsertStockName = &quot;Introduzca primero algunas acciones en su depósito.&quot;
- sTitle = &quot;&lt;PRODUCTNAME&gt;&lt;PRODUCTNAME&gt;: Administración de acciones&quot;
+ sTitle = &quot;&lt;PRODUCTNAME&gt;: Administración de acciones&quot;
sTitle = ReplaceString(sTitle, sProductName, &quot;&lt;PRODUCTNAME&gt;&quot;)
sMsgError = &quot;Error de entrada&quot;
sMsgNoName = sInsertStockname
@@ -45,7 +45,7 @@ Sub LoadSpanishLanguage()
sNoInternetUpdate = &quot;Sin actualización por Internet&quot;
sMarketPlace = &quot;Plaza bursátil:&quot;
sNoInternetDataAvailable = &quot;No se pudieron recibir las cotizaciones por Internet.&quot;
- sCheckInternetSettings = &quot;Las causas posibles son: &lt;BR&gt;Verifique su configuración de Internet. &lt;BR&gt;Ha indicado un &lt;SYMBOL&gt; incorrecto para la acción.&quot;
+ sCheckInternetSettings = &quot;Causas posibles: &lt;BR&gt; Debe comprobar la configuración de Internet.&lt;BR&gt; Ha indicado un código incorrecto (p.ej. número, símbolo, etc.) para la acción.&quot;
sCheckInternetSettings = ReplaceString(sCheckInternetSettings, chr(13), &quot;&lt;BR&gt;&quot;)
sMsgEndDatebeforeNow = &quot;La fecha final debe ser anterior a la fecha de hoy.&quot;
@@ -63,6 +63,7 @@ Sub LoadSpanishLanguage()
sMarket(0,7) = &quot;US&quot;
sMarket(0,8) = &quot;409&quot;
sMarket(0,9) = &quot;44&quot;
+ sMarket(0,10) = &quot;1&quot;
sMarket(1,0) = &quot;Euro&quot;
sMarket(1,1) = chr(8364)
@@ -73,6 +74,7 @@ Sub LoadSpanishLanguage()
sMarket(1,7) = &quot;DE;NL;PT;GR&quot;
sMarket(1,8) = &quot;407;413;816;408&quot;
sMarket(1,9) = &quot;59/9&quot;
+ sMarket(1,10) = &quot;1&quot;
sMarket(2,0) = &quot;Libra esterlina&quot;
sMarket(2,1) = &quot;£&quot;
@@ -83,6 +85,7 @@ Sub LoadSpanishLanguage()
sMarket(2,7) = &quot;GB&quot;
sMarket(2,8) = &quot;809&quot;
sMarket(2,9) = &quot;44&quot;
+ sMarket(2,10) = &quot;1&quot;
sMarket(3,0) = &quot;Yen japonés&quot;
sMarket(3,1) = &quot;¥&quot;
@@ -93,6 +96,7 @@ Sub LoadSpanishLanguage()
sMarket(3,7) = &quot;JP&quot;
sMarket(3,8) = &quot;411&quot;
sMarket(3,9) = &quot;&quot;
+ sMarket(3,10) = &quot;&quot;
sMarket(4,0) = &quot;Dólar hongkonés&quot;
sMarket(4,1) = &quot;HK$&quot;
@@ -103,6 +107,7 @@ Sub LoadSpanishLanguage()
sMarket(4,7) = &quot;HK&quot;
sMarket(4,8) = &quot;C04&quot;
sMarket(4,9) = &quot;44&quot;
+ sMarket(4,10) = &quot;1&quot;
sMarket(5,0) = &quot;Dólar australiano&quot;
sMarket(5,1) = &quot;$&quot;
@@ -113,6 +118,7 @@ Sub LoadSpanishLanguage()
sMarket(5,7) = &quot;AU&quot;
sMarket(5,8) = &quot;C09&quot;
sMarket(5,9) = &quot;44&quot;
+ sMarket(5,10) = &quot;1&quot;
&apos; ****************************End of the default subset*********************************
CompleteMarketList()
diff --git a/wizards/source/depot/Lang_fr.xba b/wizards/source/depot/Lang_fr.xba
index dff6e0f5c3a8..f506c595be31 100644
--- a/wizards/source/depot/Lang_fr.xba
+++ b/wizards/source/depot/Lang_fr.xba
@@ -9,7 +9,7 @@ Sub LoadFrenchLanguage()
sCancel = &quot;Annuler&quot;
sColumnHeader = &quot;En-tête de colonne&quot;
sInsertStockName = &quot;Saisissez quelques actions dans votre portefeuille !&quot;
- sTitle = &quot;&lt;PRODUCTNAME&gt;&lt;PRODUCTNAME&gt; : Gestion d&apos;actions&quot;
+ sTitle = &quot;&lt;PRODUCTNAME&gt; : Gestion d&apos;actions&quot;
sTitle = ReplaceString(sTitle, sProductName, &quot;&lt;PRODUCTNAME&gt;&quot;)
sMsgError = &quot;Erreur de saisie&quot;
sMsgNoName = sInsertStockname
@@ -45,7 +45,7 @@ Sub LoadFrenchLanguage()
sNoInternetUpdate = &quot;Sans mise à jour Internet&quot;
sMarketPlace = &quot;Place boursière :&quot;
sNoInternetDataAvailable = &quot;Réception des cours Internet impossible !&quot;
- sCheckInternetSettings = &quot;Causes possibles : &lt;BR&gt;Problème de paramétrage Internet : vérifiez les paramètres ! &lt;BR&gt;Vous avez saisi le mauvais &lt;SYMBOL&gt; pour l&apos;action.&quot;
+ sCheckInternetSettings = &quot;Causes possibles : &lt;BR&gt; Problème de paramétrage Internet : vérifiez les paramètres !&lt;BR&gt; Vous avez saisi un identificateur (par ex. symbole ou code) incorrect pour l&apos;action.&quot;
sCheckInternetSettings = ReplaceString(sCheckInternetSettings, chr(13), &quot;&lt;BR&gt;&quot;)
sMsgEndDatebeforeNow = &quot;La date spécifiée pour la fin doit précéder celle de ce jour !&quot;
@@ -63,6 +63,7 @@ Sub LoadFrenchLanguage()
sMarket(0,7) = &quot;US&quot;
sMarket(0,8) = &quot;409&quot;
sMarket(0,9) = &quot;44&quot;
+ sMarket(0,10) = &quot;1&quot;
sMarket(1,0) = &quot;Euro&quot;
sMarket(1,1) = chr(8364)
@@ -73,6 +74,7 @@ Sub LoadFrenchLanguage()
sMarket(1,7) = &quot;DE;NL;PT;GR&quot;
sMarket(1,8) = &quot;407;413;816;408&quot;
sMarket(1,9) = &quot;59/9&quot;
+ sMarket(1,10) = &quot;1&quot;
sMarket(2,0) = &quot;Livre Sterling&quot;
sMarket(2,1) = &quot;£&quot;
@@ -83,6 +85,7 @@ Sub LoadFrenchLanguage()
sMarket(2,7) = &quot;GB&quot;
sMarket(2,8) = &quot;809&quot;
sMarket(2,9) = &quot;44&quot;
+ sMarket(2,10) = &quot;1&quot;
sMarket(3,0) = &quot;Yen Japonais&quot;
sMarket(3,1) = &quot;¥&quot;
@@ -93,6 +96,7 @@ Sub LoadFrenchLanguage()
sMarket(3,7) = &quot;JP&quot;
sMarket(3,8) = &quot;411&quot;
sMarket(3,9) = &quot;&quot;
+ sMarket(3,10) = &quot;&quot;
sMarket(4,0) = &quot;Dollar de Hong Kong&quot;
sMarket(4,1) = &quot;HK$&quot;
@@ -103,6 +107,7 @@ Sub LoadFrenchLanguage()
sMarket(4,7) = &quot;HK&quot;
sMarket(4,8) = &quot;C04&quot;
sMarket(4,9) = &quot;44&quot;
+ sMarket(4,10) = &quot;1&quot;
sMarket(5,0) = &quot;Dollar Australien&quot;
sMarket(5,1) = &quot;$&quot;
@@ -113,6 +118,7 @@ Sub LoadFrenchLanguage()
sMarket(5,7) = &quot;AU&quot;
sMarket(5,8) = &quot;C09&quot;
sMarket(5,9) = &quot;44&quot;
+ sMarket(5,10) = &quot;1&quot;
&apos; ****************************End of the default subset*********************************
CompleteMarketList()
diff --git a/wizards/source/depot/Lang_it.xba b/wizards/source/depot/Lang_it.xba
index 5ad83ebc415b..1b49ae2b8a8d 100644
--- a/wizards/source/depot/Lang_it.xba
+++ b/wizards/source/depot/Lang_it.xba
@@ -9,7 +9,7 @@ Sub LoadItalianLanguage()
sCancel = &quot;Annulla&quot;
sColumnHeader = &quot;Intestazione colonna&quot;
sInsertStockName = &quot;Inserite un nome di azioni&quot;
- sTitle = &quot;&lt;PRODUCTNAME&gt;&lt;PRODUCTNAME&gt;: Gestione delle azioni&quot;
+ sTitle = &quot;&lt;PRODUCTNAME&gt;: Gestione delle azioni&quot;
sTitle = ReplaceString(sTitle, sProductName, &quot;&lt;PRODUCTNAME&gt;&quot;)
sMsgError = &quot;Errore dati immessi&quot;
sMsgNoName = sInsertStockname
@@ -45,7 +45,7 @@ Sub LoadItalianLanguage()
sNoInternetUpdate = &quot;Senza aggiornamento Internet&quot;
sMarketPlace = &quot;Borsa:&quot;
sNoInternetDataAvailable = &quot;Impossibile ricevere le quotazioni Internet&quot;
- sCheckInternetSettings = &quot;Possibili cause: &lt;BR&gt;le impostazioni Internet devono essere verificate. &lt;BR&gt;Avete indicato un &lt;SYMBOL&gt; errato per le azioni.&quot;
+ sCheckInternetSettings = &quot;Possibili cause: &lt;BR&gt; le impostazioni Internet devono essere modificate.&lt;BR&gt; Avete indicato un indice (ad es. simbolo o codice) errato per le azioni.&quot;
sCheckInternetSettings = ReplaceString(sCheckInternetSettings, chr(13), &quot;&lt;BR&gt;&quot;)
sMsgEndDatebeforeNow = &quot;La data finale dev&apos;essere anteriore alla data odierna.&quot;
@@ -63,6 +63,7 @@ Sub LoadItalianLanguage()
sMarket(0,7) = &quot;US&quot;
sMarket(0,8) = &quot;409&quot;
sMarket(0,9) = &quot;44&quot;
+ sMarket(0,10) = &quot;1&quot;
sMarket(1,0) = &quot;Euro&quot;
sMarket(1,1) = chr(8364)
@@ -73,6 +74,7 @@ Sub LoadItalianLanguage()
sMarket(1,7) = &quot;DE;NL;PT;GR&quot;
sMarket(1,8) = &quot;407;413;816;408&quot;
sMarket(1,9) = &quot;59/9&quot;
+ sMarket(1,10) = &quot;1&quot;
sMarket(2,0) = &quot;Sterlina inglese&quot;
sMarket(2,1) = &quot;£&quot;
@@ -83,6 +85,7 @@ Sub LoadItalianLanguage()
sMarket(2,7) = &quot;GB&quot;
sMarket(2,8) = &quot;809&quot;
sMarket(2,9) = &quot;44&quot;
+ sMarket(2,10) = &quot;1&quot;
sMarket(3,0) = &quot;Yen&quot;
sMarket(3,1) = &quot;¥&quot;
@@ -93,6 +96,7 @@ Sub LoadItalianLanguage()
sMarket(3,7) = &quot;JP&quot;
sMarket(3,8) = &quot;411&quot;
sMarket(3,9) = &quot;&quot;
+ sMarket(3,10) = &quot;&quot;
sMarket(4,0) = &quot;Dollaro Hong Kong&quot;
sMarket(4,1) = &quot;HK$&quot;
@@ -103,6 +107,7 @@ Sub LoadItalianLanguage()
sMarket(4,7) = &quot;HK&quot;
sMarket(4,8) = &quot;C04&quot;
sMarket(4,9) = &quot;44&quot;
+ sMarket(4,10) = &quot;1&quot;
sMarket(5,0) = &quot;Dollaro australiano&quot;
sMarket(5,1) = &quot;$&quot;
@@ -113,6 +118,7 @@ Sub LoadItalianLanguage()
sMarket(5,7) = &quot;AU&quot;
sMarket(5,8) = &quot;C09&quot;
sMarket(5,9) = &quot;44&quot;
+ sMarket(5,10) = &quot;1&quot;
&apos; ****************************End of the default subset*********************************
CompleteMarketList()
diff --git a/wizards/source/depot/Lang_sv.xba b/wizards/source/depot/Lang_sv.xba
index 7b695b5e4fab..4e9cb8f561d6 100644
--- a/wizards/source/depot/Lang_sv.xba
+++ b/wizards/source/depot/Lang_sv.xba
@@ -8,7 +8,7 @@ Sub LoadSwedishLanguage()
sCancel = &quot;Avbryt&quot;
sColumnHeader = &quot;Kolumnhuvud&quot;
sInsertStockName = &quot;Infoga först några aktier i Din portfölj!&quot;
- sTitle = &quot;&lt;PRODUCTNAME&gt;&lt;PRODUCTNAME&gt;: Aktieförvaltning&quot;
+ sTitle = &quot;&lt;PRODUCTNAME&gt;: Aktieförvaltning&quot;
sTitle = ReplaceString(sTitle, sProductName, &quot;&lt;PRODUCTNAME&gt;&quot;)
sMsgError = &quot;Inmatningsfel&quot;
sMsgNoName = sInsertStockname
@@ -44,7 +44,7 @@ Sub LoadSwedishLanguage()
sNoInternetUpdate = &quot;utan Internet-uppdatering&quot;
sMarketPlace = &quot;Börs:&quot;
sNoInternetDataAvailable = &quot;Det gick inte att ta emot Internet-kurser!&quot;
- sCheckInternetSettings = &quot;Detta kan bero på att: &lt;BR&gt;Dina Internet-inställningar måste ändras. &lt;BR&gt;Du har angivit en felaktig &lt;SYMBOL&gt; för aktien.&quot;
+ 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;
sCheckInternetSettings = ReplaceString(sCheckInternetSettings, chr(13), &quot;&lt;BR&gt;&quot;)
sMsgEndDatebeforeNow = &quot;Slutdatum måste ligga före idag!&quot;
@@ -62,6 +62,7 @@ Sub LoadSwedishLanguage()
sMarket(0,7) = &quot;US&quot;
sMarket(0,8) = &quot;409&quot;
sMarket(0,9) = &quot;44&quot;
+ sMarket(0,10) = &quot;1&quot;
sMarket(1,0) = &quot;Euro&quot;
sMarket(1,1) = chr(8364)
@@ -72,6 +73,7 @@ Sub LoadSwedishLanguage()
sMarket(1,7) = &quot;DE;NL;PT;GR&quot;
sMarket(1,8) = &quot;407;413;816;408&quot;
sMarket(1,9) = &quot;59/9&quot;
+ sMarket(1,10) = &quot;1&quot;
sMarket(2,0) = &quot;Engelskt pund&quot;
sMarket(2,1) = &quot;£&quot;
@@ -82,6 +84,7 @@ Sub LoadSwedishLanguage()
sMarket(2,7) = &quot;GB&quot;
sMarket(2,8) = &quot;809&quot;
sMarket(2,9) = &quot;44&quot;
+ sMarket(2,10) = &quot;1&quot;
sMarket(3,0) = &quot;Japansk yen&quot;
sMarket(3,1) = &quot;¥&quot;
@@ -92,6 +95,7 @@ Sub LoadSwedishLanguage()
sMarket(3,7) = &quot;JP&quot;
sMarket(3,8) = &quot;411&quot;
sMarket(3,9) = &quot;&quot;
+ sMarket(3,10) = &quot;&quot;
sMarket(4,0) = &quot;Hongkongdollar&quot;
sMarket(4,1) = &quot;HK$&quot;
@@ -102,6 +106,7 @@ Sub LoadSwedishLanguage()
sMarket(4,7) = &quot;HK&quot;
sMarket(4,8) = &quot;C04&quot;
sMarket(4,9) = &quot;44&quot;
+ sMarket(4,10) = &quot;1&quot;
sMarket(5,0) = &quot;Australisk dollar&quot;
sMarket(5,1) = &quot;$&quot;
@@ -112,6 +117,7 @@ Sub LoadSwedishLanguage()
sMarket(5,7) = &quot;AU&quot;
sMarket(5,8) = &quot;C09&quot;
sMarket(5,9) = &quot;44&quot;
+ sMarket(5,10) = &quot;1&quot;
&apos; ****************************End of the default subset*********************************
CompleteMarketList()
diff --git a/wizards/source/depot/Lang_tw.xba b/wizards/source/depot/Lang_tw.xba
index f8c48b8adf54..40a5bf8af043 100644
--- a/wizards/source/depot/Lang_tw.xba
+++ b/wizards/source/depot/Lang_tw.xba
@@ -9,7 +9,7 @@ Sub LoadChineseTradLanguage()
sCancel = &quot;取消&quot;
sColumnHeader = &quot;欄標簽&quot;
sInsertStockName = &quot;請先填入股票名稱!&quot;
- sTitle = &quot;&lt;PRODUCTNAME&gt;&lt;PRODUCTNAME&gt;: 股票管理&quot;
+ sTitle = &quot;&lt;PRODUCTNAME&gt;: 股票管理&quot;
sTitle = ReplaceString(sTitle, sProductName, &quot;&lt;PRODUCTNAME&gt;&quot;)
sMsgError = &quot;輸入無效&quot;
sMsgNoName = sInsertStockname
@@ -45,7 +45,7 @@ Sub LoadChineseTradLanguage()
sNoInternetUpdate = &quot;不透過 internet 更新&quot;
sMarketPlace = &quot;證券交易所:&quot;
sNoInternetDataAvailable = &quot;無法接受 Internet 股票價格!&quot;
- sCheckInternetSettings = &quot;可能的原因: Internet 設定不正確,需要重新設定。 &lt;BR&gt;輸入了一個錯誤的股票 &lt;SYMBOL&gt; 。&quot;
+ sCheckInternetSettings = &quot;可能的原因:&lt;BR&gt;Internet 設定不正確,需要重新設定。&lt;BR&gt;輸入了一個錯誤的股票代碼。&quot;
sCheckInternetSettings = ReplaceString(sCheckInternetSettings, chr(13), &quot;&lt;BR&gt;&quot;)
sMsgEndDatebeforeNow = &quot;到期日期必須是在今日之前!&quot;
@@ -63,6 +63,7 @@ Sub LoadChineseTradLanguage()
sMarket(0,7) = &quot;US&quot;
sMarket(0,8) = &quot;409&quot;
sMarket(0,9) = &quot;44&quot;
+ sMarket(0,10) = &quot;1&quot;
sMarket(1,0) = &quot;歐元&quot;
sMarket(1,1) = chr(8364)
@@ -73,6 +74,7 @@ Sub LoadChineseTradLanguage()
sMarket(1,7) = &quot;DE;NL;PT;GR&quot;
sMarket(1,8) = &quot;407;413;816;408&quot;
sMarket(1,9) = &quot;59/9&quot;
+ sMarket(1,10) = &quot;1&quot;
sMarket(2,0) = &quot;英鎊&quot;
sMarket(2,1) = &quot;£&quot;
@@ -83,6 +85,7 @@ Sub LoadChineseTradLanguage()
sMarket(2,7) = &quot;GB&quot;
sMarket(2,8) = &quot;809&quot;
sMarket(2,9) = &quot;44&quot;
+ sMarket(2,10) = &quot;1&quot;
sMarket(3,0) = &quot;日元&quot;
sMarket(3,1) = &quot;¥&quot;
@@ -93,6 +96,7 @@ Sub LoadChineseTradLanguage()
sMarket(3,7) = &quot;JP&quot;
sMarket(3,8) = &quot;411&quot;
sMarket(3,9) = &quot;&quot;
+ sMarket(3,10) = &quot;&quot;
sMarket(4,0) = &quot;港幣&quot;
sMarket(4,1) = &quot;HK$&quot;
@@ -103,6 +107,7 @@ Sub LoadChineseTradLanguage()
sMarket(4,7) = &quot;HK&quot;
sMarket(4,8) = &quot;C04&quot;
sMarket(4,9) = &quot;44&quot;
+ sMarket(4,10) = &quot;1&quot;
sMarket(5,0) = &quot;澳元&quot;
sMarket(5,1) = &quot;$&quot;
@@ -113,6 +118,7 @@ Sub LoadChineseTradLanguage()
sMarket(5,7) = &quot;AU&quot;
sMarket(5,8) = &quot;C09&quot;
sMarket(5,9) = &quot;44&quot;
+ sMarket(5,10) = &quot;1&quot;
&apos; ****************************End of the default subset*********************************
CompleteMarketList()
diff --git a/wizards/source/depot/Lang_zh.xba b/wizards/source/depot/Lang_zh.xba
index 2a236df1f47d..4300b591f87d 100644
--- a/wizards/source/depot/Lang_zh.xba
+++ b/wizards/source/depot/Lang_zh.xba
@@ -9,7 +9,7 @@ Sub LoadChineseSimpleLanguage()
sCancel = &quot;取消&quot;
sColumnHeader = &quot;列标题&quot;
sInsertStockName = &quot;请首先往您的帐号内输入一些股票名称!&quot;
- sTitle = &quot;&lt;PRODUCTNAME&gt;&lt;PRODUCTNAME&gt;:股票管理&quot;
+ sTitle = &quot;&lt;PRODUCTNAME&gt;:股票管理&quot;
sTitle = ReplaceString(sTitle, sProductName, &quot;&lt;PRODUCTNAME&gt;&quot;)
sMsgError = &quot;输入错误&quot;
sMsgNoName = sInsertStockname
@@ -45,7 +45,7 @@ Sub LoadChineseSimpleLanguage()
sNoInternetUpdate = &quot;不通过国际互联网更新&quot;
sMarketPlace = &quot;交易所:&quot;
sNoInternetDataAvailable = &quot;无法获得国际互联网上的行情!&quot;
- sCheckInternetSettings = &quot;可能的原因是: 您的国际互联网设定不正确,需要重新设定。 &lt;BR&gt;输入了一个错误的股票&lt;SYMBOL&gt;。&quot;
+ sCheckInternetSettings = &quot;可能的原因是:&lt;BR&gt;您的国际互联网设定不正确,需要重新设定。&lt;BR&gt;输入了一个错误的股票号码。&quot;
sCheckInternetSettings = ReplaceString(sCheckInternetSettings, chr(13), &quot;&lt;BR&gt;&quot;)
sMsgEndDatebeforeNow = &quot;终止日期必须在今天之前!&quot;
@@ -63,6 +63,7 @@ Sub LoadChineseSimpleLanguage()
sMarket(0,7) = &quot;US&quot;
sMarket(0,8) = &quot;409&quot;
sMarket(0,9) = &quot;44&quot;
+ sMarket(0,10) = &quot;1&quot;
sMarket(1,0) = &quot;欧元&quot;
sMarket(1,1) = chr(8364)
@@ -73,6 +74,7 @@ Sub LoadChineseSimpleLanguage()
sMarket(1,7) = &quot;DE;NL;PT;GR&quot;
sMarket(1,8) = &quot;407;413;816;408&quot;
sMarket(1,9) = &quot;59/9&quot;
+ sMarket(1,10) = &quot;1&quot;
sMarket(2,0) = &quot;英镑&quot;
sMarket(2,1) = &quot;£&quot;
@@ -83,6 +85,7 @@ Sub LoadChineseSimpleLanguage()
sMarket(2,7) = &quot;GB&quot;
sMarket(2,8) = &quot;809&quot;
sMarket(2,9) = &quot;44&quot;
+ sMarket(2,10) = &quot;1&quot;
sMarket(3,0) = &quot;日元&quot;
sMarket(3,1) = &quot;¥&quot;
@@ -93,6 +96,7 @@ Sub LoadChineseSimpleLanguage()
sMarket(3,7) = &quot;JP&quot;
sMarket(3,8) = &quot;411&quot;
sMarket(3,9) = &quot;&quot;
+ sMarket(3,10) = &quot;&quot;
sMarket(4,0) = &quot;港币&quot;
sMarket(4,1) = &quot;HK$&quot;
@@ -103,6 +107,7 @@ Sub LoadChineseSimpleLanguage()
sMarket(4,7) = &quot;HK&quot;
sMarket(4,8) = &quot;C04&quot;
sMarket(4,9) = &quot;44&quot;
+ sMarket(4,10) = &quot;1&quot;
sMarket(5,0) = &quot;澳元&quot;
sMarket(5,1) = &quot;$&quot;
@@ -113,6 +118,7 @@ Sub LoadChineseSimpleLanguage()
sMarket(5,7) = &quot;AU&quot;
sMarket(5,8) = &quot;C09&quot;
sMarket(5,9) = &quot;44&quot;
+ sMarket(5,10) = &quot;1&quot;
&apos; ****************************End of the default subset*********************************
CompleteMarketList()