1 <?xml version=
"1.0" encoding=
"UTF-8"?>
2 <!DOCTYPE script:module PUBLIC
"-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd">
4 * This file is part of the LibreOffice project.
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/.
10 * This file incorporates work covered by the following license notice:
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 .
20 <script:module xmlns:
script=
"http://openoffice.org/2000/script" script:
name=
"Lang_ja" script:
language=
"StarBasic">Option Explicit
22 Sub LoadJapaneseLanguage()
24 sProductname = GetProductname
26 sCancel =
"キャンセル
"
27 sColumnHeader =
"列番号
"
28 sInsertStockName =
"最初に株の銘柄を入力してください。
"
29 sTitle =
"<PRODUCTNAME
>: 株管理
"
30 sTitle = ReplaceString(sTitle, sProductName,
"<PRODUCTNAME
>")
31 sMsgError =
"入力フィールド
"
32 sMsgNoName = sInsertStockname
33 sMsgNoQuantity =
"0 より大きな額を入力してください。
"
34 sMsgNoDividend =
"1株当たりの配当金額または総配当金額を入力してください。
"
35 sMsgNoExchangeRate =
"交換比率(旧株-
>新株)を入力してください。
"
36 sMsgNoValidExchangeDate =
"株式分割日を入力してください。
"
37 sMsgWrongExchangeDate =
"分割日以降に取引がすでに存在するので、分割できません。
"
38 sMsgSellTooMuch =
"売却できる株式数を超えています。最大値:
"
39 sMsgConfirm =
"ご確認ください
"
40 sMsgFreeStock =
"無料株式を入力しますか?
"
41 sMsgTotalLoss =
"全損の入力を行いますか?
"
42 sMsgAuthorization =
"確認ダイアログ
"
43 sMsgDeleteAll =
"すべての移動を取り消し、ポートフォリオの概要をリセットしますか?
"
44 cSplit =
"株式分割日
"
45 sHistory =
"履歴
"
46 TransactTitle(
1) =
"株を買う
"
47 TransactTitle(
2) =
"株を買う
"
48 StockRatesTitle(
1) =
"配当額
"
49 StockRatesTitle(
2) =
"株式分割
"
50 StockRatesTitle(
3) = sHistory
51 sDepotCurrency =
"ポートフォリオの通貨
"
52 sStockName =
"株式名
"
53 TransactMode = LIFO
' Possible values:
"FIFO
" and
"LIFO
"
54 DateCellStyle =
"結果(日付)
"
55 CurrCellStyle =
"1"
56 sStartDate =
"開始日:
"
57 sEndDate =
"終了日:
"
58 sStartUpWelcome =
"このテンプレートを使えば、株式のポートフォリオをより効率的に管理できます。
"
59 sStartUpChooseMarket =
"まず、インターネットにより情報を更新する基準通貨と、対応する証券取引所を選択します。
"
60 sStartUpHint =
"残念ながら、
<History
> 機能を使用できるのは米国市場に限られています。
"
61 sStartupHint = ReplaceString(sStartUpHint, sHistory,
"<History
>")
62 sNoInternetUpdate =
"インターネットによる情報の更新を行いません
"
63 sMarketPlace =
"証券取引所:
"
64 sNoInternetDataAvailable =
"インターネットから株価情報を受信できない場合があります!
"
65 sCheckInternetSettings =
"考えられる原因は次のとおりです。
<BR
>インターネット設定の変更が必要です。
<BR
>入力した株式のが間違っています。
"
66 sCheckInternetSettings = ReplaceString(sCheckInternetSettings, chr(
13),
"<BR
>")
68 sMsgEndDatebeforeNow =
"終了日は、今日の日付より前であることが必要です。
"
69 sMsgStartDatebeforeEndDate =
"開始日は、終了日より前であることが必要です。
"
71 sMarket(
0,
0) =
"米ドル
"
72 sMarket(
0,
1) =
"$
"
73 sMarket(
0,
2) =
"ニューヨーク
"
74 sMarket(
0,
3) =
"http://finance.yahoo.com/d/quotes.csv?s=
<StockID
>&f=sl1d1t1c1ohgv
&e=.csv
"
75 sMarket(
0,
4) =
"http://ichart.finance.yahoo.com/table.csv?
" &_
76 "s=
<StockID
>&d=
<EndMonth
>&e=
<EndDay
>&f=
<Endyear
>&g=d
&" &_
77 "a=
<StartMonth
>&b=
<StartDay
>&c=
<Startyear
>&ignore=.csv
"
78 sMarket(
0,
5) =
"シンボル
"
79 sMarket(
0,
6) =
"en
"
80 sMarket(
0,
7) =
"US
"
81 sMarket(
0,
8) =
"409"
82 sMarket(
0,
9) =
"44"
83 sMarket(
0,
10) =
"1"
85 sMarket(
1,
0) =
"ユーロ
"
86 sMarket(
1,
1) = chr(
8364)
87 sMarket(
1,
2) =
"フランクフルト
"
88 sMarket(
1,
3) =
"http://de.finance.yahoo.com/d/quotes.csv?s=
<StockID
>.F
&f=sl1t1c1ghpv
&e=.csv
"
89 sMarket(
1,
5) =
"銘柄コード
"
90 sMarket(
1,
6) =
"de;nl;pt;el
"
91 sMarket(
1,
7) =
"DE;NL;PT;GR
"
92 sMarket(
1,
8) =
"407;
413;
816;
408"
93 sMarket(
1,
9) =
"59/
9"
94 sMarket(
1,
10) =
"1"
96 sMarket(
2,
0) =
"英ポンド
"
97 sMarket(
2,
1) =
"£
"
98 sMarket(
2,
2) =
"ロンドン
"
99 sMarket(
2,
3) =
"http://uk.finance.yahoo.com/d/quotes.csv?s=
<StockID
>.L
&m=*
&f=sl1t1c1ghov
&e=.csv
"
100 sMarket(
2,
5) =
"シンボル
"
101 sMarket(
2,
6) =
"en
"
102 sMarket(
2,
7) =
"GB
"
103 sMarket(
2,
8) =
"809"
104 sMarket(
2,
9) =
"44"
105 sMarket(
2,
10) =
"1"
107 sMarket(
3,
0) =
"日本円
"
108 sMarket(
3,
1) =
"¥
"
109 sMarket(
3,
2) =
"東京
"
110 sMarket(
3,
3) =
""
111 sMarket(
3,
5) =
"コード
"
112 sMarket(
3,
6) =
"ja
"
113 sMarket(
3,
7) =
"JP
"
114 sMarket(
3,
8) =
"411"
115 sMarket(
3,
9) =
""
116 sMarket(
3,
10) =
""
118 sMarket(
4,
0) =
"香港ドル
"
119 sMarket(
4,
1) =
"HK$
"
120 sMarket(
4,
2) =
"香港
"
121 sMarket(
4,
3) =
"http://hk.finance.yahoo.com/d/quotes.csv?s=
<StockID
>.HK
&f=sl1d1t1c1ohgv
&e=.csv
"
122 sMarket(
4,
5) =
"番号
"
123 sMarket(
4,
6) =
"zh
"
124 sMarket(
4,
7) =
"HK
"
125 sMarket(
4,
8) =
"C04
"
126 sMarket(
4,
9) =
"44"
127 sMarket(
4,
10) =
"1"
129 sMarket(
5,
0) =
"オーストリア・ドル
"
130 sMarket(
5,
1) =
"$
"
131 sMarket(
5,
2) =
"シドニー
"
132 sMarket(
5,
3) =
"http://au.finance.yahoo.com/d/quotes.csv?s=
<StockID
>&f=sl1d1t1c1ohgv
&e=.csv
"
133 sMarket(
5,
5) =
"シンボル
"
134 sMarket(
5,
6) =
"en
"
135 sMarket(
5,
7) =
"AU
"
136 sMarket(
5,
8) =
"C09
"
137 sMarket(
5,
9) =
"44"
138 sMarket(
5,
10) =
"1"
140 ' ****************************End of the default subset*********************************
143 LocalizedCurrencies()
146 .lblStockNames.Label = sStockname
147 .lblQuantity.Label =
"株数
"
148 .lblRate.Label =
"価格
"
149 .lblDate.Label =
"取引日
"
150 .hlnCommission.Label =
"その他の経費n
"
151 .lblCommission.Label =
"手数料
"
152 .lblMinimum.Label =
"最低手数料
"
153 .lblFix.Label =
"固定費/諸経費
"
155 .cmdCancel.Label = sCancel
159 .optPerShare.Label =
"配当金/株式数
"
160 .optTotal.Label =
"配当金の総額
"
161 .lblDividend.Label =
"金額
"
162 .lblExchangeRate.Label =
"交換比率(旧株-
>新株)
"
163 .lblColon.Label =
":
"
164 .lblDate.Label =
"交換日:
"
165 .lblStockNames.Label = sStockname
166 .lblStartDate.Label = sStartDate
167 .lblEndDate.Label = sEndDate
168 .optDaily.Label =
"~毎日
"
169 .optWeekly.Label =
"~毎週
"
170 .hlnInterval.Label =
"期間
"
172 .cmdCancel.Label = sCancel