Language.xba (3e02b54d) Language.xba (48978db4)
1<?xml version="1.0" encoding="UTF-8"?>
2<!DOCTYPE script:module PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd">
3<!--***********************************************************
1<?xml version="1.0" encoding="UTF-8"?>
2<!DOCTYPE script:module PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd">
3<!--***********************************************************
4 *
4 *
5 * Licensed to the Apache Software Foundation (ASF) under one
6 * or more contributor license agreements. See the NOTICE file
7 * distributed with this work for additional information
8 * regarding copyright ownership. The ASF licenses this file
9 * to you under the Apache License, Version 2.0 (the
10 * "License"); you may not use this file except in compliance
11 * with the License. You may obtain a copy of the License at
5 * Licensed to the Apache Software Foundation (ASF) under one
6 * or more contributor license agreements. See the NOTICE file
7 * distributed with this work for additional information
8 * regarding copyright ownership. The ASF licenses this file
9 * to you under the Apache License, Version 2.0 (the
10 * "License"); you may not use this file except in compliance
11 * with the License. You may obtain a copy of the License at
12 *
12 *
13 * http://www.apache.org/licenses/LICENSE-2.0
13 * http://www.apache.org/licenses/LICENSE-2.0
14 *
14 *
15 * Unless required by applicable law or agreed to in writing,
16 * software distributed under the License is distributed on an
17 * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
18 * KIND, either express or implied. See the License for the
19 * specific language governing permissions and limitations
20 * under the License.
15 * Unless required by applicable law or agreed to in writing,
16 * software distributed under the License is distributed on an
17 * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
18 * KIND, either express or implied. See the License for the
19 * specific language governing permissions and limitations
20 * under the License.
21 *
21 *
22 ***********************************************************-->
23<script:module xmlns:script="http://openoffice.org/2000/script" script:name="Language" script:language="StarBasic">Option Explicit
24
25Public sMSTemplateCheckbox(2) As String
26Public sMSDocumentCheckbox(2) As String
27Public sSODocumentCheckbox(4) As String
28Public sSOHelperdocuments(1,1) As String
29Public sTemplateCheckbox(SBMAXAPPLCOUNT-1) As String

--- 4 unchanged lines hidden (view full) ---

34Public sPathErrorDocument(SBMAXAPPLCOUNT-1) As String
35Public sPathErrorStarDoc(SBMAXAPPLCOUNT-1) As String
36Public sStarDocLabel(SBMAXAPPLCOUNT-1) As String
37Public sImportLabel As String, sExportLabel As String
38Public SOApplicationName(5) As String
39Public sHelpButton As String, sCancelButton As String, sBackButton As String, sNextButton As String
40Public sSumInclusiveSubDir As String, sSumSaveDocuments As String
41Public sSummaryHeader As String
22 ***********************************************************-->
23<script:module xmlns:script="http://openoffice.org/2000/script" script:name="Language" script:language="StarBasic">Option Explicit
24
25Public sMSTemplateCheckbox(2) As String
26Public sMSDocumentCheckbox(2) As String
27Public sSODocumentCheckbox(4) As String
28Public sSOHelperdocuments(1,1) As String
29Public sTemplateCheckbox(SBMAXAPPLCOUNT-1) As String

--- 4 unchanged lines hidden (view full) ---

34Public sPathErrorDocument(SBMAXAPPLCOUNT-1) As String
35Public sPathErrorStarDoc(SBMAXAPPLCOUNT-1) As String
36Public sStarDocLabel(SBMAXAPPLCOUNT-1) As String
37Public sImportLabel As String, sExportLabel As String
38Public SOApplicationName(5) As String
39Public sHelpButton As String, sCancelButton As String, sBackButton As String, sNextButton As String
40Public sSumInclusiveSubDir As String, sSumSaveDocuments As String
41Public sSummaryHeader As String
42Public sWelcometextLabel1 As String, sWelcometextLabel2 As String, sWelcometextLabel3 As String
42Public sWelcometextLabel1 As String, sWelcometextLabel2 As String, sWelcometextLabel3 As String
43Public sBeginButton As String, sMsgDirNotThere As String
44Public sQueryForNewCreation As String, sPathError3 As String
45Public sNoDirCreation As String
46Public sProgressMoreDocs As String, sProgressMoreTemplates as String
47Public sFileExists As String, sMorePathsError3 As String
48Public sConvertError1 As String, sConvertError2 As String, sPathDialogMessage As String
49Public sRTErrorDesc As String, sRTErrorHeader As String
50Public sProgressPage_1 As String, sProgressPage_2 As String, sProgressPage_3 as String

--- 20 unchanged lines hidden (view full) ---

71Sub LoadLanguage()
72 If InitResources(&quot;ImportWizard&quot;,&quot;imp&quot;) then
73 sHelpButton = GetResText(1000)
74 sCancelButton = GetResText(1001)
75 sBackButton = GetResText(1002)
76 sNextButton = GetResText(1003)
77 sBeginButton = GetResText(1004)
78 sCloseButton = GetResText(1005)
43Public sBeginButton As String, sMsgDirNotThere As String
44Public sQueryForNewCreation As String, sPathError3 As String
45Public sNoDirCreation As String
46Public sProgressMoreDocs As String, sProgressMoreTemplates as String
47Public sFileExists As String, sMorePathsError3 As String
48Public sConvertError1 As String, sConvertError2 As String, sPathDialogMessage As String
49Public sRTErrorDesc As String, sRTErrorHeader As String
50Public sProgressPage_1 As String, sProgressPage_2 As String, sProgressPage_3 as String

--- 20 unchanged lines hidden (view full) ---

71Sub LoadLanguage()
72 If InitResources(&quot;ImportWizard&quot;,&quot;imp&quot;) then
73 sHelpButton = GetResText(1000)
74 sCancelButton = GetResText(1001)
75 sBackButton = GetResText(1002)
76 sNextButton = GetResText(1003)
77 sBeginButton = GetResText(1004)
78 sCloseButton = GetResText(1005)
79
79
80 sWelcometextLabel1 = ReplaceString(GetResText(1006), GetProductName(),&quot;%PRODUCTNAME&quot;)
81 sWelcometextLabel2 = GetResText(1007)
82 sWelcometextLabel3 = GetResText(1008)
83
84 &apos; Microsoft Documents
85 GetApplResourceArray(1009, 3, sMSTemplateCheckBox())
86
87 &apos; DocumentCheckbox- Captions
88 GetApplResourceArray(1012, 3, sMSDocumentCheckBox())
89
90 &apos; DocumentCheckbox- Captions
91 GetApplResourceArray(2013, 5, sSODocumentCheckBox())
92
80 sWelcometextLabel1 = ReplaceString(GetResText(1006), GetProductName(),&quot;%PRODUCTNAME&quot;)
81 sWelcometextLabel2 = GetResText(1007)
82 sWelcometextLabel3 = GetResText(1008)
83
84 &apos; Microsoft Documents
85 GetApplResourceArray(1009, 3, sMSTemplateCheckBox())
86
87 &apos; DocumentCheckbox- Captions
88 GetApplResourceArray(1012, 3, sMSDocumentCheckBox())
89
90 &apos; DocumentCheckbox- Captions
91 GetApplResourceArray(2013, 5, sSODocumentCheckBox())
92
93 &apos;StarOffice Applicationnames
93 &apos; OpenOffice Applicationnames
94
95 sSOHelperDocuments(0,0) = GetResText(2017)
96 sSOHelperDocuments(0,1) = &quot;com.sun.star.text.GlobalDocument&quot;
97 sSOHelperDocuments(1,0) = GetResText(2018)
98 sSOHelperDocuments(1,1) = &quot;com.sun.star.formula.FormulaProperties&quot;
94
95 sSOHelperDocuments(0,0) = GetResText(2017)
96 sSOHelperDocuments(0,1) = &quot;com.sun.star.text.GlobalDocument&quot;
97 sSOHelperDocuments(1,0) = GetResText(2018)
98 sSOHelperDocuments(1,1) = &quot;com.sun.star.formula.FormulaProperties&quot;
99
100 GetApplResourceArray(2017,2, sSOHelperDocuments())
101
99
100 GetApplResourceArray(2017,2, sSOHelperDocuments())
101
102 sContainerName(0) = GetResText(1030)
103 &apos; Note: for the version 5.2 there was no Productname &quot;StarSuite&quot;
102 sContainerName(0) = GetResText(1030)
103 &apos; Note: for the version 5.2 there was no Productname &quot;StarSuite&quot;
104 sContainerName(1) = &quot;StarOffice&quot;
105
104 sContainerName(1) = &quot;OpenOffice&quot;
105
106 sSummaryHeader = GetResText(1031)
107
108 sTemplateGroupName = GetResText(1036)
109
110 sProgressMoreDocs = GetResText(1041)
111 sProgressMoreTemplates = GetResText(1042)
112 sNoDirCreation = GetResText(1050)
113 sMsgDirNotThere = GetResText(1051)
114 sQueryForNewCreation = GetResText(1052)
115 sFileExists = GetResText(1053)
116 sMorePathsError3 = GetResText(1054)
117 sConvertError1 = GetResText(1055)
118 sConvertError2 = GetResText(1056)
119 sRTErrorDesc = GetResText(1057)
120 sRTErrorHeader = GetResText(1058)
121 sOverwriteallFiles = GetResText(1070)
122 sReeditMacro = GetResText(1071)
106 sSummaryHeader = GetResText(1031)
107
108 sTemplateGroupName = GetResText(1036)
109
110 sProgressMoreDocs = GetResText(1041)
111 sProgressMoreTemplates = GetResText(1042)
112 sNoDirCreation = GetResText(1050)
113 sMsgDirNotThere = GetResText(1051)
114 sQueryForNewCreation = GetResText(1052)
115 sFileExists = GetResText(1053)
116 sMorePathsError3 = GetResText(1054)
117 sConvertError1 = GetResText(1055)
118 sConvertError2 = GetResText(1056)
119 sRTErrorDesc = GetResText(1057)
120 sRTErrorHeader = GetResText(1058)
121 sOverwriteallFiles = GetResText(1070)
122 sReeditMacro = GetResText(1071)
123 scouldnotsaveDocument = GetResText(1072)
123 scouldnotsaveDocument = GetResText(1072)
124 scouldnotopenDocument = GetResText(1073)
125 sPathDialogMessage = GetResText(1080)
126 sTitle = GetResText(1081)
127
128 sProgressPage_1 = GetResText(1090)
129 sProgressPage_2 = GetResText(1091)
130 sProgressPage_3 = GetResText(1092)
131 sProgressFound = GetResText(1093)
132 sProgressPage_5 = GetResText(1094)
133 sReady = GetResText(1100)
134 sSourceDocuments = GetResText(2030)
135 sTargetDocuments = GetResText(2031)
136 sLogSummary = GetResText(2034)
137 sSumInclusiveSubDir = GetResText(3000)
138 sSumSaveDocuments = GetResText(3001)
124 scouldnotopenDocument = GetResText(1073)
125 sPathDialogMessage = GetResText(1080)
126 sTitle = GetResText(1081)
127
128 sProgressPage_1 = GetResText(1090)
129 sProgressPage_2 = GetResText(1091)
130 sProgressPage_3 = GetResText(1092)
131 sProgressFound = GetResText(1093)
132 sProgressPage_5 = GetResText(1094)
133 sReady = GetResText(1100)
134 sSourceDocuments = GetResText(2030)
135 sTargetDocuments = GetResText(2031)
136 sLogSummary = GetResText(2034)
137 sSumInclusiveSubDir = GetResText(3000)
138 sSumSaveDocuments = GetResText(3001)
139 &apos;StarOffice Applicationnames
139 &apos;OpenOffice Applicationnames
140 GetApplResourceArray(3100, 4, sSumSODocuments())
141 GetApplResourceArray(3110, 4, sSumSOTemplates())
142 GetApplResourceArray(3200, 3, sSumMSDocuments())
143 GetApplResourceArray(3210, 3, sSumMSTemplates())
144 With ImportDialog
145 sImportLabel = GetResText(1033)
146 sExportLabel = GetResText(1034)
147 sSearchInSubDir = GetResText(1022)

--- 19 unchanged lines hidden (view full) ---

167
168Sub GetApplResourceArray(StartResIndex as Integer, Count as Integer, BigArray())
169Dim i as Integer
170Dim a as Integer
171 a = 0
172 For i = StartResIndex To StartResIndex + Count-1
173 BigArray(a) = GetResText(i)
174 a = a + 1
140 GetApplResourceArray(3100, 4, sSumSODocuments())
141 GetApplResourceArray(3110, 4, sSumSOTemplates())
142 GetApplResourceArray(3200, 3, sSumMSDocuments())
143 GetApplResourceArray(3210, 3, sSumMSTemplates())
144 With ImportDialog
145 sImportLabel = GetResText(1033)
146 sExportLabel = GetResText(1034)
147 sSearchInSubDir = GetResText(1022)

--- 19 unchanged lines hidden (view full) ---

167
168Sub GetApplResourceArray(StartResIndex as Integer, Count as Integer, BigArray())
169Dim i as Integer
170Dim a as Integer
171 a = 0
172 For i = StartResIndex To StartResIndex + Count-1
173 BigArray(a) = GetResText(i)
174 a = a + 1
175 Next
175 Next
176End Sub
177</script:module>
176End Sub
177</script:module>