SL/HowTo localize qatesttool environment into Slovenian
This page contains detailed instructions for qatesttool environment changes (added lines except where indicated) to support Slovenian localization. They relate to OOO320m8 zipped autotests by maho.
WARNING: It is work in progress and it is linked here from issue 107893.
testautomation/framework/tools/input/i18ndata.txt
- WARNING: this file already contains Slovenian language codes which are wrong (386 instead of 50), so these two linese must be edited, not added! Look for 'slovenian' and 'sl'!
@: [english names]
50=slovenian
@: [locale_short]
50=sl
testautomation/global/system/includes/iniinfo.inc
sub GetLanguageInformation
@: select case lcase ( sLanOutIni )
case "sl_si", "sl-si", "sl" : iSprache = 50 ' Slovenian
function ConvertLanguage
@: select case lCase ( Sprache )
case "slovenian", "slovenisch" : ConvertLanguage = 50
function GetLanguageText
@: select case iLan
case 50 : GetlanguageText = "Slovenian"
function ConvertLanguage2
@: select case lCase ( sSprache )
case "sl_si", "sl-si", "sl" : ConvertLanguage2 = 50 ' Slovenian
function ConvertCodeToLanguage
@: select case lCase ( sSprache )
case "1060" : ConvertCodeToLanguage = 50 ' Slovenian
testautomation/writer/optional/includes/regexp/search.inc
testcase tCallDialog
@: select case iSprache
case 50 : Shortcut = "<Mod1 f>"
testcase tUnderline_Search
@: Select Case iSprache (if+else!)
if:
case 50: ToggleAttribute(15,"True")
else:
case 50: ToggleAttribute(24,"True") ' Podčrtano
testcase tUnderline_Replace
@: Select Case iSprache (if+else!)
if:
case 50: ToggleAttribute(15,"True")
else:
case 50: ToggleAttribute(24,"True") ' Podčrtano
testcase tParagraphStyle_Search
@: Select Case iSprache
Case 50 : Such_Text = "Naslov"
sub Meldungs_Test
@: select case iSprache
Case 50 : Text_In_Meldung = sProduct & " Writer je preiskal do konca dokumenta. Ali želite nadaljevati na začetku?"
testautomation/writer/tools/includes/w_locale_strings2.inc
function wGetLanguageGuessString
@: ***'///already covered Office languages: ///'
'///slovenian 50 ///'
function wGetLanguageGuessString
@: Select Case iSprache 'Detecting Office language
Case 50 'Case 50: slovenian
Select Case iLanguageCount
Case 1: WordPreSet = "Jezik besede je angleški (ZDA)"
ParagraphPreSet = "Jezik odstavka je angleški (ZDA)"
Case 2: WordPreSet = "Jezik besede je portugalski (Portugalska)"
ParagraphPreSet = "Jezik odstavka je portugalski (Portugalska)"
Case 3: WordPreSet = "Jezik besede je ruski"
ParagraphPreSet = "Jezik odstavka je ruski"
Case 4: WordPreSet = "Jezik besede je nizozemski (Nizozemska)"
ParagraphPreSet = "Jezik odstavka je nizozemski (Nizozemska)"
Case 5: WordPreSet = "Jezik besede je francoski (Francija)"
ParagraphPreSet = "Jezik odstavka je francoski (Francija)"
Case 6: WordPreSet = "Jezik besede je španski (Španija)"
ParagraphPreSet = "Jezik odstavka je španski (Španija)"
Case 7: WordPreSet = "Jezik besede je madžarski"
ParagraphPreSet = "Jezik odstavka je madžarski"
Case 8: WordPreSet = "Jezik besede je italijanski (Italija)"
ParagraphPreSet = "Jezik odstavka je italijanski (Italija)"
Case 9: WordPreSet = "Jezik besede je švedski (Švedska)"
ParagraphPreSet = "Jezik odstavka je švedski (Švedska)"
Case 10:WordPreSet = "Jezik besede je poljski"
ParagraphPreSet = "Jezik odstavka je poljski"
Case 11:WordPreSet = "Jezik besede je nemški (Nemčija)"
ParagraphPreSet = "Jezik odstavka je nemški (Nemčija)"
end select
'-----------------------------------------------------------------------
testautomation/dbaccess/optional/includes/frm_FormFilter.inc
testcase tFF_Navigator
@: if iSprache = 01 then
elseif iSprache = 50 then
if FilterNavigator.getSelText <> "LIKE '*value*'" then
warnlog "The text is not right in the filter navigator. It have to be LIKE '*value*' but it is " + FilterNavigator.getSelText
endif
testautomation/framework/optional/includes/CJK_CollationDialogue_1.inc (4)
testcase tLanguageTest_1
@: select case iSprache
case 50 :' Slovenian
sKeyTypeEnglishUSA = "Alfanumerično"
sKeyTypeSChinese = "Nabor znakov"
sKeyTypeTChinese = "Numerično"
sKeyTypeJapanese = "Nabor znakov"
sKeyTypeKoren = "Nabor znakov"
testcase tLanguageTest_2
@: select case iSprache
case 50 :' Slovenian
sKeyTypeEnglishUSA = "Alfanumerično"
sKeyTypeSChinese = "Nabor znakov"
sKeyTypeTChinese = "Numerično"
sKeyTypeJapanese = "Nabor znakov"
sKeyTypeKoren = "Nabor znakov"
testcase tStrokeSort
@: select case iSprache
case 50 : ' Slovenian
sKeyTypeSChinese = "Poteza"
testcase tPinyinSort
@: select case iSprache
case 50 : ' Slovenian
sKeyTypeSChinese = "Pinjin"
testautomation/framework/optional/includes/CJK_RubyDialogueProposal_1.inc (2)
testcase tRubyDialog_4
@: select case iSprache
case 50 : sCharacterStyle = "Rubys"
testcase tRubyDialog_5
@: select case iSprache
case 50 : sCharacterStyle = "Rubys"
testautomation/framework/optional/includes/configuration.inc (2)
testcase tToolsOptionsAPIConfiguration
@: select case iSprache
case 50 : iJump = 0 ' Slovenian
testcase tToolsOptionsAPIConfiguration
@: select case iSprache
case 50 : iJump = 0 ' Slovenian
testautomation/framework/tools/includes/CJK_tools.inc (1)
function fGetCountryName
@: select case iSprache
case 50 : ' Slovenian
select case CountryID
case 1: fGetCountryName = "angleški (ZDA)"
case 33: fGetCountryName = "francoski (Francija)"
case 34: fGetCountryName = "španski (Španija)"
case 39: fGetCountryName = "italijanski (Italija)"
case 46: fGetCountryName = "švedski (Švedska)"
case 49: fGetCountryName = "nemški (Nemčija)"
case 55: fGetCountryName = "portugalski (Brazilija)"
case 81: fGetCountryName = "japonski"
case 82: fGetCountryName = "korejski (RK)"
case 86: fGetCountryName = "kitajski (poenostavljeni)"
case 88: fGetCountryName = "kitajski (tradicionalni)"
case else :
QAErrorLog "Now, the test does not support for the language " +iSprache
fGetCountryName = ""
end select
more file updates will follow here
