/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
/* * This file is part of the LibreOffice project . * * This Source Code Form is subject to the terms of the Mozilla Public * License , v . 2 . 0 . If a copy of the MPL was not distributed with this * file , You can obtain one at http : //mozilla.org/MPL/2.0/.
#include "../helper/qahelper.hxx"
#include <LibreOfficeKit/LibreOfficeKitEnums.h>
#include <unotools/syslocaleoptions.hxx>
#include <vcl/keycodes.hxx>
#include <vcl/scheduler.hxx>
#include <comphelper/processfactory.hxx>
#include <comphelper/propertysequence.hxx>
#include <comphelper/scopeguard.hxx>
#include <comphelper/servicehelper.hxx>
#include <com/sun/star/awt/Key.hpp>
#include <com/sun/star/sheet/GlobalSheetSettings.hpp>
#include <condformathelper.hxx>
#include <conditio.hxx>
#include <document.hxx>
#include <docsh.hxx>
#include <dpobject.hxx>
#include <formulaopt.hxx>
#include <inputopt.hxx>
#include <postit.hxx>
#include <rangeutl.hxx>
#include <scmod.hxx>
#include <tabvwsh.hxx>
#include <viewdata.hxx>
using namespace ::com::sun::star;
class ScUiCalcTest :
public ScModelTestBase
{
public :
ScUiCalcTest();
};
ScUiCalcTest::ScUiCalcTest()
: ScModelTestBase(u
"sc/qa/unit/uicalc/data" _ustr)
{
}
static void lcl_AssertConditionalFormatList(ScDocument& rDoc, size_t nSize,
std::unordered_map<OUString, OUString>& rExpectedValues)
{
ScConditionalFormatList* pList = rDoc.GetCondFormList(
0 );
CPPUNIT_ASSERT_EQUAL(nSize, pList->size());
OUString sRangeStr;
for (
const auto & rItem : *pList)
{
const ScRangeList& aRange = rItem->GetRange();
aRange.Format(sRangeStr, ScRefFlags::VALID, rDoc, rDoc.GetAddressConvention());
CPPUNIT_ASSERT_MESSAGE(OString(sRangeStr.toUtf8() +
" not found" ).getStr(),
rExpectedValues.count(sRangeStr));
CPPUNIT_ASSERT_EQUAL(rExpectedValues[sRangeStr],
ScCondFormatHelper::GetExpression(*rItem, aRange.GetTopLeftCorner()));
}
}
static void lcl_AssertCurrentCursorPosition(ScDocShell& rDocSh, std::u16string_v
iew rStr)0 ;false );"Incorrect Column in position " ) + rStr).toUtf8().getStr(),"Incorrect Row in position " ) + rStr).toUtf8().getStr(),ssMode)// Tests are running in Headless mode // Import an ods file with 'Hide' global grid visibility setting. "tdf126541_GridOffGlobally.ods" );// To avoid regression, in headless mode leave the bug tdf126541 // It means Sheet based grid line visibility setting will overwrite the global setting. // If there is only 1 sheet in the document, it will not result visible problems. "tdf126541_GridOff.xlsx" );"A1" _ustr, u"2015" );"A2" _ustr, u"2015" );"A3" _ustr, u"2015" );"B1" _ustr, u"1" );"B2" _ustr, u"1" );"B3" _ustr, u"2" );"C1" _ustr, u"10" );"C2" _ustr, u"20" );"C3" _ustr, u"5" );"D1" _ustr, u"BIG FISH" );"D2" _ustr, u"FISHFISH" );"D3" _ustr, u"FISHY" );// Save the document "calc8" _ustr);// Open a new document // Insert the references to the external document // tdf#115162 "=SUMIFS('" + maTempFile.GetURL() + "'#$Sheet1.C1:C3,'" "'#$Sheet1.B1:B3,1,'" + maTempFile.GetURL()"'#$Sheet1.A1:A3,2015)" ;"A1" _ustr, aFormula);// tdf#115162: Without the fix in place, this test would have failed with // - Expected: 30 // - Actual : Err:504 "30" _ustr, pDoc->GetString(ScAddress(0 , 0 , 0 )));// tdf#114820 "=VLOOKUP('" + maTempFile.GetURL() + "'#$Sheet1.A1;'" "'#$Sheet1.A1:B3,2,0)" ;"A1" _ustr, aFormula);// Without the fix in place, this test would have failed with // - Expected: 1 // - Actual : Err:504 "1" _ustr, pDoc->GetString(ScAddress(0 , 0 , 0 )));// tdf#116149 "=VAR('" + maTempFile.GetURL() + "'#$Sheet1.C1;'" + maTempFile.GetURL()"'#$Sheet1.C2)" ;"A1" _ustr, aFormula);// Without the fix in place, this test would have failed with // - Expected: 50 // - Actual : Err:504 "50" _ustr, pDoc->GetString(ScAddress(0 , 0 , 0 )));// tdf#100847 // Use an empty cell "=+'" + maTempFile.GetURL() + "'#$Sheet1.A1000" ;"A1" _ustr, aFormula);"=+'" + maTempFile.GetURL() + "'#$Sheet1.A1000*1" ;"B1" _ustr, aFormula);"=+N('" + maTempFile.GetURL() + "'#$Sheet1.A1000)*1" ;"C1" _ustr, aFormula);"0" _ustr, pDoc->GetString(ScAddress(0 , 0 , 0 )));// Without the fix in place, this test would have failed with // - Expected: 0 // - Actual : #VALUE! "0" _ustr, pDoc->GetString(ScAddress(1 , 0 , 0 )));"0" _ustr, pDoc->GetString(ScAddress(2 , 0 , 0 )));//tdf#36387 "=AND('" + maTempFile.GetURL() + "'#$Sheet1.A1:C1)" ;"A1" _ustr, aAndFormula);"=OR('" + maTempFile.GetURL() + "'#$Sheet1.A1:C1)" ;"B1" _ustr, aOrFormula);// Without the fix in place, this test would have failed with // - Expected: TRUE // - Actual : Err:504 "TRUE" _ustr, pDoc->GetString(ScAddress(0 , 0 , 0 )));"TRUE" _ustr, pDoc->GetString(ScAddress(1 , 0 , 0 )));//tdf#113898 "=SUMPRODUCT(NOT(ISERROR(FIND(\" FISH\";'" + maTempFile.GetURL()"'#$Sheet1.D1:D3))))" ;"A1" _ustr, aAndFormula);// Without the fix in place, this test would have failed with // - Expected: 3 // - Actual : 1 3 .0 , pDoc->GetValue(ScAddress(0 , 0 , 0 )));#if !defined (MACOSX) && !defined (_WIN32) //FIXME // Set the system locale to German "de-DE" _ustr);"A1" _ustr, u"=1,1" );"A2" _ustr, u"=1.1" );"1,1" _ustr, pDoc->GetString(0 , 0 , 0 ));"#NAME?" _ustr, pDoc->GetString(0 , 1 , 0 ));// change UseEnglishFuncName to true bool bOldStatus = aFormulaOptions.GetUseEnglishFuncName();true );"A1" _ustr, u"=1,1" );"A2" _ustr, u"=1.1" );// Without the fix in place, this test would have failed with // - Expected: 1,1 // - Actual : #NAME? "1,1" _ustr, pDoc->GetString(0 , 0 , 0 ));"#NAME?" _ustr, pDoc->GetString(0 , 1 , 0 ));#endif auto verify = [this ]() {"E5" _ustr, u"=myData[[#Data]]" );"Elisabeth" _ustr, pDoc->GetString(4 , 4 , 0 ));"Frieda" _ustr, pDoc->GetString(4 , 5 , 0 ));"Adele" _ustr, pDoc->GetString(4 , 6 , 0 ));"Berta" _ustr, pDoc->GetString(4 , 7 , 0 ));"total" _ustr, pDoc->GetString(4 , 8 , 0 ));"7" _ustr, pDoc->GetString(5 , 4 , 0 ));"6" _ustr, pDoc->GetString(5 , 5 , 0 ));"4" _ustr, pDoc->GetString(5 , 6 , 0 ));"5" _ustr, pDoc->GetString(5 , 7 , 0 ));"22" _ustr, pDoc->GetString(5 , 8 , 0 ));"H5" _ustr, u"=myData[[#Headers]]" );"Name" _ustr, pDoc->GetString(7 , 4 , 0 ));"Count" _ustr, pDoc->GetString(8 , 4 , 0 ));"K5" _ustr, u"=myData[[#All]]" );"Name" _ustr, pDoc->GetString(10 , 4 , 0 ));"Elisabeth" _ustr, pDoc->GetString(10 , 5 , 0 ));"Frieda" _ustr, pDoc->GetString(10 , 6 , 0 ));"Adele" _ustr, pDoc->GetString(10 , 7 , 0 ));"Berta" _ustr, pDoc->GetString(10 , 8 , 0 ));"total" _ustr, pDoc->GetString(10 , 9 , 0 ));"Count" _ustr, pDoc->GetString(11 , 4 , 0 ));"7" _ustr, pDoc->GetString(11 , 5 , 0 ));"6" _ustr, pDoc->GetString(11 , 6 , 0 ));"4" _ustr, pDoc->GetString(11 , 7 , 0 ));"5" _ustr, pDoc->GetString(11 , 8 , 0 ));"22" _ustr, pDoc->GetString(11 , 9 , 0 ));"tdf162087.ods" );// change UseEnglishFuncName to true bool bOldStatus = aFormulaOptions.GetUseEnglishFuncName();true );"tdf162087.ods" );// Without the fix in place, this test would have failed with // - Expected: Elisabeth // - Actual : #NAME? "A1" _ustr, u"1" );"B1" _ustr, u"2" );// Save the document "calc8" _ustr);// Open a new document // Insert the reference to the external document "='" + maTempFile.GetURL() + "'#$Sheet1.A1" ;"A1" _ustr, aFormula);0 , 0 , 0 ));1 .0 , pDoc->GetValue(ScAddress(0 , 0 , 0 )));"A1" _ustr);".uno:Cut" _ustr, {});"B1" _ustr);".uno:Paste" _ustr, {});// Without the fix in place, this test would have failed with // - Expected: ='file:///tmp/lu124171irlmb.tmp'#$Sheet1.A1 // - Actual : ='file:///tmp/lu124171irlmb.tmp'#$Sheet1.B1 1 , 0 , 0 ));1 .0 , pDoc->GetValue(ScAddress(1 , 0 , 0 )));"A1" _ustr, u"50" );// Save the document "calc8" _ustr);// Open a new document // Change grammar to Excel A1 // Insert the reference to the external document "=['" + maTempFile.GetURL() + "']Sheet1!A1" ;"A1" _ustr, aFormula);// Without the fix in place, this test would have failed with // - Expected: 50 // - Actual : Err:507 "50" _ustr, pDoc->GetString(ScAddress(0 , 0 , 0 )));"A1:A20" _ustr);"FillDir" , uno::Any(u"B" _ustr) },"FillCmd" , uno::Any(u"L" _ustr) },"FillStep" , uno::Any(u"1" _ustr) },"FillDateCmd" , uno::Any(u"D" _ustr) },"FillStart" , uno::Any(u"1" _ustr) },"FillMax" , uno::Any(u"10" _ustr) } }));".uno:FillSeries" _ustr, aArgs);for (size_t i = 0 ; i < 10 ; ++i)1 )),0 , i, 0 )));for (size_t i = 10 ; i < 20 ; ++i)// Without the fix in place, this test would have failed with // - Expected: // - Actual : #NUM! "" _ustr, pDoc->GetString(ScAddress(0 , i, 0 )));// Without the fix in place, this test would have crashed "A1" _ustr, u"A" );"A2" _ustr, u"B" );// Add a new comment to A1 and A2 "Text" , uno::Any(u"Comment" _ustr) } });"A1" _ustr);".uno:InsertAnnotation" _ustr, aArgs);"A2" _ustr);".uno:InsertAnnotation" _ustr, aArgs);"There should be a note on A1" , pDoc->HasNote(ScAddress(0 , 0 , 0 )));"There should be a note on A2" , pDoc->HasNote(ScAddress(0 , 1 , 0 )));"A1" _ustr);".uno:SelectRow" _ustr, {});".uno:DeleteRows" _ustr, {});for (size_t i = 0 ; i < 10 ; ++i)"B" _ustr, pDoc->GetString(ScAddress(0 , 0 , 0 )));"There should be a note on A1" , pDoc->HasNote(ScAddress(0 , 0 , 0 )));"There should be no note on A2" , !pDoc->HasNote(ScAddress(0 , 1 , 0 )));".uno:Undo" _ustr, {});"A" _ustr, pDoc->GetString(ScAddress(0 , 0 , 0 )));"B" _ustr, pDoc->GetString(ScAddress(0 , 1 , 0 )));"There should be a note on A1" , pDoc->HasNote(ScAddress(0 , 0 , 0 )));"There should be a note on A2" , pDoc->HasNote(ScAddress(0 , 1 , 0 )));".uno:Redo" _ustr, {});".uno:Undo" _ustr, {});"A1:A2" _ustr);".uno:SelectRow" _ustr, {});".uno:DeleteRows" _ustr, {});for (size_t i = 0 ; i < 10 ; ++i)"" _ustr, pDoc->GetString(ScAddress(0 , 0 , 0 )));"" _ustr, pDoc->GetString(ScAddress(0 , 1 , 0 )));"There should be no note on A1" , !pDoc->HasNote(ScAddress(0 , 0 , 0 )));"There should be no note on A2" , !pDoc->HasNote(ScAddress(0 , 1 , 0 )));".uno:Undo" _ustr, {});"A" _ustr, pDoc->GetString(ScAddress(0 , 0 , 0 )));"B" _ustr, pDoc->GetString(ScAddress(0 , 1 , 0 )));"There should be a note on A1" , pDoc->HasNote(ScAddress(0 , 0 , 0 )));"There should be a note on A2" , pDoc->HasNote(ScAddress(0 , 1 , 0 )));".uno:Redo" _ustr, {});"A1" _ustr, u"2012-10-31" );"A1:A20" _ustr);"FillDir" , uno::Any(u"B" _ustr) },"FillCmd" , uno::Any(u"D" _ustr) },"FillStep" , uno::Any(u"1" _ustr) },"FillDateCmd" , uno::Any(u"M" _ustr) },"FillStart" , uno::Any(u"41213" _ustr) } }));".uno:FillSeries" _ustr, aArgs);"2012-10-31" _ustr, pDoc->GetString(ScAddress(0 , 0 , 0 )));// Without the fix in place, this test would have failed with // - Expected: 2012-11-30 // - Actual : 2012-12-01 "2012-11-30" _ustr, pDoc->GetString(ScAddress(0 , 1 , 0 )));"2012-12-31" _ustr, pDoc->GetString(ScAddress(0 , 2 , 0 )));"2013-01-31" _ustr, pDoc->GetString(ScAddress(0 , 3 , 0 )));"2013-02-28" _ustr, pDoc->GetString(ScAddress(0 , 4 , 0 )));"2013-03-31" _ustr, pDoc->GetString(ScAddress(0 , 5 , 0 )));"2013-04-30" _ustr, pDoc->GetString(ScAddress(0 , 6 , 0 )));"2013-05-31" _ustr, pDoc->GetString(ScAddress(0 , 7 , 0 )));"2013-06-30" _ustr, pDoc->GetString(ScAddress(0 , 8 , 0 )));"2013-07-31" _ustr, pDoc->GetString(ScAddress(0 , 9 , 0 )));"2013-08-31" _ustr, pDoc->GetString(ScAddress(0 , 10 , 0 )));"2013-09-30" _ustr, pDoc->GetString(ScAddress(0 , 11 , 0 )));"2013-10-31" _ustr, pDoc->GetString(ScAddress(0 , 12 , 0 )));"2013-11-30" _ustr, pDoc->GetString(ScAddress(0 , 13 , 0 )));"2013-12-31" _ustr, pDoc->GetString(ScAddress(0 , 14 , 0 )));"2014-01-31" _ustr, pDoc->GetString(ScAddress(0 , 15 , 0 )));"2014-02-28" _ustr, pDoc->GetString(ScAddress(0 , 16 , 0 )));"2014-03-31" _ustr, pDoc->GetString(ScAddress(0 , 17 , 0 )));"2014-04-30" _ustr, pDoc->GetString(ScAddress(0 , 18 , 0 )));"2014-05-31" _ustr, pDoc->GetString(ScAddress(0 , 19 , 0 )));".uno:Undo" _ustr, {});"2012-10-31" _ustr, pDoc->GetString(ScAddress(0 , 0 , 0 )));"" _ustr, pDoc->GetString(ScAddress(0 , 1 , 0 )));//Select the first row "1:1" _ustr);"FillDir" , uno::Any(u"R" _ustr) },"FillCmd" , uno::Any(u"L" _ustr) },"FillStep" , uno::Any(u"1" _ustr) },"FillDateCmd" , uno::Any(u"D" _ustr) },"FillStart" , uno::Any(u"1" _ustr) } }));// Without the fix in place, this test would have crashed here ".uno:FillSeries" _ustr, aArgs);1 .0 , pDoc->GetValue(ScAddress(0 , 0 , 0 )));16384 .0 , pDoc->GetValue(ScAddress(16383 , 0 , 0 )));"A1" _ustr, u"=COUNTA(B:B)" );"A3" _ustr, u"Range" );"A4" _ustr, u"Range" );"A5" _ustr, u"Range" );"A6" _ustr, u"Range" );"A7" _ustr, u"Range" );"A8" _ustr, u"Range" );"B6" _ustr, u"Test" );1 .0 , pDoc->GetValue(ScAddress(0 , 0 , 0 )));"A3:A8" _ustr);".uno:SelectRow" _ustr, {});//type Control-D/Fill Down ".uno:FillDown" _ustr, {});0 .0 , pDoc->GetValue(ScAddress(0 , 0 , 0 )));".uno:Undo" _ustr, {});// Without the fix in place, this test would have failed with // - Expected: 1 // - Actual : 0 1 .0 , pDoc->GetValue(ScAddress(0 , 0 , 0 )));for (SCROW i = 2 ; i < 8 ; ++i)"Range" _ustr, pDoc->GetString(ScAddress(0 , i, 0 )));"Test" _ustr, pDoc->GetString(ScAddress(1 , 5 , 0 )));"A3:A4" _ustr);".uno:HideRow" _ustr, {});"A2" _ustr, u"1" );"A2:A6" _ustr);"FillDir" , uno::Any(u"B" _ustr) },"FillCmd" , uno::Any(u"A" _ustr) },"FillStep" , uno::Any(u"1" _ustr) },"FillDateCmd" , uno::Any(u"M" _ustr) } }));".uno:FillSeries" _ustr, aArgs);1 .0 , pDoc->GetValue(ScAddress(0 , 1 , 0 )));0 .0 , pDoc->GetValue(ScAddress(0 , 2 , 0 )));0 .0 , pDoc->GetValue(ScAddress(0 , 3 , 0 )));2 .0 , pDoc->GetValue(ScAddress(0 , 4 , 0 )));3 .0 , pDoc->GetValue(ScAddress(0 , 5 , 0 )));t());bool bOldValue = xGlobalSheetSettings->getDoAutoComplete();true );"A1" _ustr, u"ABC" );"A2" _ustr, u"A" );"ABC" _ustr, pDoc->GetString(ScAddress(0 , 1 , 0 )));false );"A3" _ustr, u"A" );// Without the fix in place, this test would have failed with // - Expected: A // - Actual : ABC "A" _ustr, pDoc->GetString(ScAddress(0 , 2 , 0 )));// Restore the previous value "A1" _ustr, u"Test" );"A1" _ustr);for (SCROW i = 1 ; i <= 10 ; ++i)".uno:Copy" _ustr, {});".uno:GoDown" _ustr, {});// Paste using Return 0 , awt::Key::RETURN );0 , awt::Key::RETURN );"Test" _ustr, pDoc->GetString(ScAddress(0 , i, 0 )));"A1" _ustr);"=SUM( 1 + 2 " );// Insert Newline 0 , KEY_MOD1 | awt::Key::RETURN );0 , KEY_MOD1 | awt::Key::RETURN );"+ 3)" );0 , awt::Key::RETURN );0 , awt::Key::RETURN );// Without the fix in place, this test would have failed with // - Expected: 6 // - Actual : Err:501 "6" _ustr, pDoc->GetString(ScAddress(0 , 0 , 0 )));"A1" _ustr, u"aaaa" );0 , KEY_MOD1 | KEY_SHIFT | awt::Key::Y);0 , KEY_MOD1 | KEY_SHIFT | awt::Key::Y);"aaaa" _ustr, pDoc->GetString(ScAddress(0 , 1 , 0 )));0 , awt::Key::F2);0 , awt::Key::F2);0 , awt::Key::DELETE );0 , awt::Key::DELETE );0 , awt::Key::RETURN );0 , awt::Key::RETURN );// Without the fix in place, this test would have failed with // - Expected: aaaa // - Actual : "aaaa" _ustr, pDoc->GetString(ScAddress(0 , 1 , 0 )));"A1" _ustr);"Test" );// Insert Newline 0 , KEY_MOD1 | awt::Key::RETURN );0 , KEY_MOD1 | awt::Key::RETURN );0 , awt::Key::RETURN );0 , awt::Key::RETURN );"Test" + OUStringChar(u'\xA' )),0 , 0 , 0 )));"A1" _ustr);// Without the fix in place, this test would have hung here ".uno:ChangeCaseRotateCase" _ustr, {});"Test" + OUStringChar(u'\xA' )),0 , 0 , 0 )));".uno:ChangeCaseToLower" _ustr, {});"test" + OUStringChar(u'\xA' )),0 , 0 , 0 )));"A1" _ustr, u"2300" );"A2" _ustr, u"Libre" );"B1" _ustr, u"10" );"B2" _ustr, u"Office" );"C1" _ustr, u"=SUM(A1:B1)" );"C2" _ustr, u"=A2&B2" );"2310" _ustr, pDoc->GetString(ScAddress(2 , 0 , 0 )));"LibreOffice" _ustr, pDoc->GetString(ScAddress(2 , 1 , 0 )));"C1:C2" _ustr);".uno:ConvertFormulaToValue" _ustr, {});"2310" _ustr, pDoc->GetString(ScAddress(2 , 0 , 0 )));"LibreOffice" _ustr, pDoc->GetString(ScAddress(2 , 1 , 0 )));"" _ustr, pDoc->GetFormula(2 , 0 , 0 ));"" _ustr, pDoc->GetFormula(2 , 1 , 0 ));".uno:Undo" _ustr, {});"2310" _ustr, pDoc->GetString(ScAddress(2 , 0 , 0 )));"LibreOffice" _ustr, pDoc->GetString(ScAddress(2 , 1 , 0 )));"=SUM(A1:B1)" _ustr, pDoc->GetFormula(2 , 0 , 0 ));"=A2&B2" _ustr, pDoc->GetFormula(2 , 1 , 0 ));"tdf124820.xlsx" );"B2" _ustr);".uno:Strikeout" _ustr, {});"Calc Office Open XML" _ustr);const ScPatternAttr* pPattern = pDoc->GetPattern(1 , 1 , 0 );// Without the fix in place, this test would have failed here "font should be striked out" , STRIKEOUT_SINGLE,"tdf132026.ods" );"=" , u"+" , u"-" };for (auto aChar = aChars.begin(); aChar != aChars.end(); ++aChar)for (size_t i = 0 ; i < aDirections.size(); ++i)"B2" _ustr);0 , nDir);0 , nDir);0 , awt::Key::RETURN );0 , awt::Key::RETURN );"-" ) ? -1 : 1 ;1 );1 , 1 , 0 )));"E2" _ustr);0 , nDir);0 , nDir);0 , awt::Key::RETURN );0 , awt::Key::RETURN );// Without the fix in place, this test would have failed with // - Expected: = // - Actual : =E1 4 , 1 , 0 )));"tdf152037.xlsx" );"C2" _ustr, u"abcdefghi" );// Without the fix in place, this test would have failed with // - Expected: abcdefghi // - Actual : "abcdefghi" _ustr, pDoc->GetString(ScAddress(2 , 1 , 0 )));"tdf119155.xlsx" );"C2:C14" _ustr);// Without the fix in place, this test would have hung here ".uno:ChangeCaseToTitleCase" _ustr, {});"Collagene Expert Targeted Wrinkle Corrector Unboxed 10 Ml" _ustr,2 , 1 , 0 )));"Vitamina Suractivee Hand Cream 400 Ml" _ustr,2 , 13 , 0 )));"tdf146795.ods" );// Disable replace cell warning bool bOldStatus = aInputOption.GetReplaceCellsWarn();false );"B2" _ustr);".uno:Copy" _ustr, {});// Move to B3 0 , KEY_DOWN);// Select the three following cells 0 , KEY_SHIFT | KEY_DOWN);0 , KEY_SHIFT | KEY_DOWN);0 , KEY_SHIFT | KEY_DOWN);// Without the fix in place, this test would have crashed here ".uno:Paste" _ustr, {});"a" _ustr, pDoc->GetString(ScAddress(1 , 1 , 0 )));"a" _ustr, pDoc->GetString(ScAddress(1 , 2 , 0 )));"a" _ustr, pDoc->GetString(ScAddress(1 , 3 , 0 )));"44" _ustr, pDoc->GetString(ScAddress(1 , 4 , 0 )));"44" _ustr, pDoc->GetString(ScAddress(1 , 5 , 0 )));"a" _ustr, pDoc->GetString(ScAddress(1 , 6 , 0 )));"a" _ustr, pDoc->GetString(ScAddress(1 , 7 , 0 )));"44" _ustr, pDoc->GetString(ScAddress(1 , 8 , 0 )));// Restore previous status "tdf147744.ods" );// Disable replace cell warning bool bOldStatus = aInputOption.GetReplaceCellsWarn();false );"A2" _ustr);".uno:Copy" _ustr, {});// Move to A3 0 , KEY_DOWN);// Select the following cell 0 , KEY_SHIFT | KEY_DOWN);// Without the fix in place, this test would have crashed here ".uno:Paste" _ustr, {});1 .0 , pDoc->GetValue(ScAddress(0 , 1 , 0 )));0 .0 , pDoc->GetValue(ScAddress(0 , 2 , 0 )));1 .0 , pDoc->GetValue(ScAddress(0 , 3 , 0 )));0 .0 , pDoc->GetValue(ScAddress(0 , 4 , 0 )));1 .0 , pDoc->GetValue(ScAddress(0 , 5 , 0 )));0 .0 , pDoc->GetValue(ScAddress(0 , 6 , 0 )));// Restore previous status "A1" _ustr, u"=COUNTA(XFD:XFD)" );// Without the fix in place, this test would have failed with // - Expected: 0 // - Actual : 1 "0" _ustr, pDoc->GetString(ScAddress(0 , 0 , 0 )));"tdf138432.ods" );// Set the system locale to Hungarian "hu-HU" _ustr);"12" + OUStringChar(u'\xa0' ) + "345,67" ;0 , 0 , 0 )));"A1" _ustr);".uno:Copy" _ustr, {});"A2" _ustr);"=" );".uno:Paste" _ustr, {});0 , awt::Key::RETURN );0 , awt::Key::RETURN );// Without the fix in place, this test would have failed with // - Expected: 12345,67 // - Actual : Err:509 "12345,67" _ustr, pDoc->GetString(ScAddress(0 , 1 , 0 )));"A2000" _ustr, u"Test" );"Test" _ustr, pDoc->GetString(ScAddress(0 , 1999 , 0 )));"Calc Office Open XML" _ustr);// Without the fix in place, this test would have failed with // - Expected: Test // - Actual : "Test" _ustr, pDoc->GetString(ScAddress(0 , 1999 , 0 )));"A1" _ustr, u"=HYPERLINK(\" a\";\" b\")" );"b" _ustr, pDoc->GetString(ScAddress(0 , 0 , 0 )));// Without the fix in place, this test would have failed with // - Expected: // - Actual : a "" _ustr, pDoc->GetString(ScAddress(0 , 1 , 0 )));"A1" _ustr, u"=INDEX({11;21},0,1)" );"11" _ustr, pDoc->GetString(ScAddress(0 , 0 , 0 )));// Without the fix in place, this test would have failed with // - Expected: 21 // - Actual : "21" _ustr, pDoc->GetString(ScAddress(0 , 1 , 0 )));"tdf159046.ods" );0 , 0 , 6 , 8 );1 ), aObjects.size());0 , 1 , 6 , 8 );0 ), aObjects.size());"A2:F10" _ustr);".uno:Cut" _ustr, {});"B2" _ustr);".uno:Paste" _ustr, {});// Without the fix in place, this test would have crashed here "calc8" _ustr);0 , 0 , 6 , 8 );0 ), aObjects.size());0 , 1 , 6 , 8 );1 ), aObjects.size());"A1" _ustr, u"=TRANSPOSE(IF({0|0|0}=0;RANDBETWEEN.NV(1;1000000)))" );double nA1 = pDoc->GetValue(ScAddress(0 , 0 , 0 ));double nB1 = pDoc->GetValue(ScAddress(1 , 0 , 0 ));double nC1 = pDoc->GetValue(ScAddress(2 , 0 , 0 ));// Without the fix in place, this test would have failed here "tdf144244.ods" );0 ),static_cast <sal_Int32>(2 ), xPage->getCount());// Select column A and B "A:B" _ustr);".uno:DeleteColumns" _ustr, {});"x" _ustr, pDoc->GetString(ScAddress(0 , 0 , 0 )));// Without the fix in place, this test would have crashed "calc8" _ustr);"x" _ustr, pDoc->GetString(ScAddress(0 , 0 , 0 )));0 ), uno::UNO_QUERY_THROW);static_cast <sal_Int32>(2 ), xPage->getCount());"tdf153669.ods" );// Disable replace cell warning bool bOldStatus = aInputOption.GetReplaceCellsWarn();false );"E2" _ustr, u"100" );"110.00" _ustr, pDoc->GetString(ScAddress(5 , 1 , 0 )));".uno:Undo" _ustr, {});"15.00" _ustr, pDoc->GetString(ScAddress(5 , 1 , 0 )));"E7" _ustr);".uno:Copy" _ustr, {});"F7" _ustr);".uno:Paste" _ustr, {});"text" _ustr, pDoc->GetString(ScAddress(5 , 6 , 0 )));"E2" _ustr, u"100" );// Without the fix in place, this test would have failed with // - Expected: 110.00 // - Actual : 15.00 "110.00" _ustr, pDoc->GetString(ScAddress(5 , 1 , 0 )));".uno:Undo" _ustr, {});"15.00" _ustr, pDoc->GetString(ScAddress(5 , 1 , 0 )));// Restore previous status "tdf100582.xls" );// Disable replace cell warning bool bOldStatus = aInputOption.GetReplaceCellsWarn();false );"C10" _ustr);".uno:Copy" _ustr, {});"C10:H14" _ustr);".uno:Paste" _ustr, {});"MS Excel 97" _ustr);3 , 10 , 0 );// Without the fix in place, this test would have failed with // - Expected: {=SUM(($B$3:$B$7=$B11)*(D$3:D$7))} //- Actual : "{=SUM(($B$3:$B$7=$B11)*(D$3:D$7))}" _ustr, aFormula);4 , 10 , 0 );"{=SUM(($B$3:$B$7=$B11)*(E$3:E$7))}" _ustr, aFormula);5 , 10 , 0 );"{=SUM(($B$3:$B$7=$B11)*(F$3:F$7))}" _ustr, aFormula);6 , 10 , 0 );"{=SUM(($B$3:$B$7=$B11)*(G$3:G$7))}" _ustr, aFormula);7 , 10 , 0 );"{=SUM(($B$3:$B$7=$B11)*(H$3:H$7))}" _ustr, aFormula);// Restore previous status "tdf145640.ods" );// Enable sorting with update reference bool bOldStatus = aInputOption.GetSortRefUpdate();true );"A2:F17" _ustr);".uno:SortDescending" _ustr, {});"=SUM(A15:B15:C15:D15:E15:F15)" _ustr, pDoc->GetFormula(6 , 3 , 0 ));// Without the fix in place, this test would have failed with // - Expected: 10 // - Actual : 0 10 .0 , pDoc->GetValue(ScAddress(6 , 3 , 0 )));".uno:Undo" _ustr, {});"=SUM(A4:B4:C4:D4:E4:F4)" _ustr, pDoc->GetFormula(6 , 3 , 0 ));10 .0 , pDoc->GetValue(ScAddress(6 , 3 , 0 )));// Restore previous status "tdf97215.ods" );// Enable sorting with update reference bool bOldStatus = aInputOption.GetSortRefUpdate();true );"Inserted at bottom" _ustr, pDoc->GetString(ScAddress(0 , 23 , 0 )));"A1:M24" _ustr);// Without the fix in place, this test would have hung here ".uno:SortAscending" _ustr, {});"Inserted at bottom" _ustr, pDoc->GetString(ScAddress(0 , 0 , 0 )));".uno:Undo" _ustr, {});"Inserted at bottom" _ustr, pDoc->GetString(ScAddress(0 , 23 , 0 )));// Restore previous status "tdf104026.ods" );"A2" , "Cell value != $Sheet1.$B2" }, { "A3" , "Cell value != $Sheet1.$B3" },"A4" , "Cell value != $Sheet1.$B4" }, { "A5" , "Cell value != $Sheet1.$B5" },"A6" , "Cell value != $Sheet1.$B6" }, { "A7" , "Cell value != $Sheet1.$B7" } };6 , aExpectedValues);"A2" _ustr);".uno:DeleteRows" _ustr, {});// Without the fix in place, this test would have failed with // - Expected: Cell value != $Sheet1.$B2 // - Actual : Cell value != $Sheet1.$B#REF! 5 , aExpectedValues);".uno:Undo" _ustr, {});// tdf#140330: Without the fix in place, this test would have failed with // - Expected: 6 // - Actual : 5 6 , aExpectedValues);"tdf92963.ods" );// Disable replace cell warning bool bOldStatus = aInputOption.GetReplaceCellsWarn();false );"C1" , "Cell value > 14" }, { "C3" , "Cell value > 14" }, { "C4" , "Cell value > 14" } };3 , aExpectedValues);"A3:C4" _ustr);".uno:Copy" _ustr, {});"A1:C1" _ustr);".uno:Paste" _ustr, {});"C3,C1" , "Cell value > 14" }, { "C4,C2" , "Cell value > 14" } };2 , aExpectedValues);// Restore previous status #if !defined (MACOSX) && !defined (_WIN32) //FIXME "tdf140151.ods" );// Focus is already on the button 0 , awt::Key::RETURN );0 , awt::Key::RETURN );// Without the fix in place, the current cursor position wouldn't have changed "B111" );#endif "tdf68290.ods" );const std::vector<OUString> aExpectedAddresses{ u"L3" _ustr, u"L6" _ustr, u"L9" _ustr,"L10" _ustr, u"L11" _ustr, u"L13" _ustr,"L15" _ustr };for (const auto & rAddress : aExpectedAddresses)0 , awt::Key::RETURN );"M3" );"tdf156462.ods" );"G2" );0 , KEY_MOD1 | KEY_LEFT);// Without the fix in place, the cursor would have jumped to cell C2 "D2" );"tdf132057.ods" );"AU43" );0 , KEY_RETURN);// Without the fix in place, the cursor would have jumped to cell BM1 "G39" );"tdf122232.ods" );//Start with from C6. Press tabulator to reach G6. "C6" );0 , KEY_TAB);0 , KEY_TAB);"G6" );//without the fix, cursor would jump to C29 instead of C7. 0 , awt::Key::RETURN );"C7" );"tdf123052.ods" );"F3" _ustr, u"D5" _ustr, u"E5" _ustr,"F6" _ustr, u"A8" _ustr, u"E9" _ustr };for (const auto & rAddress : aExpectedAddresses)0 , awt::Key::TAB);0 , awt::Key::TAB);for (std::vector<OUString>::reverse_iterator it = aExpectedAddresses.rbegin();0 , KEY_SHIFT | awt::Key::TAB);0 , KEY_SHIFT | awt::Key::TAB);// Without the fix in place, this test would have failed here "tdf120660.ods" );// Disable replace cell warning bool bOldStatus = aInputOption.GetReplaceCellsWarn();false );"A8:E8" _ustr);".uno:Copy" _ustr, {});"A4:E4" _ustr);".uno:Paste" _ustr, {});1200 .0 , pDoc->GetValue(ScAddress(4 , 3 , 0 )));100 .0 , pDoc->GetValue(ScAddress(4 , 7 , 0 )));".uno:Undo" _ustr, {});2200 .0 , pDoc->GetValue(ScAddress(4 , 3 , 0 )));900 .0 , pDoc->GetValue(ScAddress(4 , 7 , 0 )));"A8:D8" _ustr);".uno:Copy" _ustr, {});"A4:D4" _ustr);".uno:Paste" _ustr, {});1200 .0 , pDoc->GetValue(ScAddress(4 , 3 , 0 )));// Without the fix in place, this test would have failed with // - Expected: -100 // - Actual : 900 100 .0 , pDoc->GetValue(ScAddress(4 , 7 , 0 )));".uno:Undo" _ustr, {});2200 .0 , pDoc->GetValue(ScAddress(4 , 3 , 0 )));900 .0 , pDoc->GetValue(ScAddress(4 , 7 , 0 )));// Restore previous status "B3" _ustr);"B3" );".uno:Copy" _ustr, {});0 , KEY_RIGHT);0 , KEY_RIGHT);"D3" );".uno:Paste" _ustr, {});0 , KEY_SHIFT | KEY_DOWN);s();// Without the fix in place, this test would have failed with // - Expected: Sheet1.D3:Sheet1.D4 // - Actual : Sheet1.A2:Sheet1.D3 "Sheet1.D3:Sheet1.D4" _ustr, aMarkedAreaString);"tdf157897_main.ods" );const sal_uInt16 nPos = 0 ;const SCTAB nFirstTab = 0 ;// Ensure that there exists a print range in the first documents tab static_cast <sal_uInt16>(1 ), pDoc->GetPrintRangeCount(nFirstTab));// Reload all links and check if the print range was not duplicated const auto initialPrintRange = pDoc->GetPrintRange(nFirstTab, nPos);// Without the fix in place, the print range in the linked tab will be duplicated "tdf154991.ods" );"A1" _ustr);".uno:SelectColumn" _ustr, {});// Without the fix in place, this test would have crashed here ".uno:HideColumn" _ustr, {});0 , 0 ));".uno:Undo" _ustr, {});0 , 0 ));"A1" _ustr, u"1" );"A1" _ustr);".uno:SelectUnprotectedCells" _ustr, {});".uno:Copy" _ustr, {});"B1" _ustr);// Without the fix in place, this test would have crashed here ".uno:Paste" _ustr, {});1 .0 , pDoc->GetValue(0 , 0 , 0 ));0 .0 , pDoc->GetValue(1 , 0 , 0 ));// Use Adding Selection ".uno:StatusSelectionModeExp" _ustr, {});"B1" _ustr);".uno:SelectColumn" _ustr, {});".uno:GoRight" _ustr, {});".uno:GoRight" _ustr, {});".uno:SelectColumn" _ustr, {});".uno:HideColumn" _ustr, {});0 , 0 ));1 , 0 ));2 , 0 ));3 , 0 ));4 , 0 ));".uno:Undo" _ustr, {});0 , 0 ));1 , 0 ));2 , 0 ));3 , 0 ));4 , 0 ));"A1" _ustr, u"1" );"A2" _ustr, u"2" );"A3" _ustr, u"3" );"A4" _ustr, u"4" );"B1" _ustr, u"=IF(A1:A4>2,1,2)" );"B1:B4" _ustr);0 , KEY_F4);2 .0 , pDoc->GetValue(1 , 0 , 0 ));2 .0 , pDoc->GetValue(1 , 1 , 0 ));1 .0 , pDoc->GetValue(1 , 2 , 0 ));1 .0 , pDoc->GetValue(1 , 3 , 0 ));"{=IF($A$1:$A$4>2,1,2)}" _ustr, pDoc->GetFormula(1 , 0 , 0 ));".uno:Undo" _ustr, {});2 .0 , pDoc->GetValue(1 , 0 , 0 ));2 .0 , pDoc->GetValue(1 , 1 , 0 ));1 .0 , pDoc->GetValue(1 , 2 , 0 ));1 .0 , pDoc->GetValue(1 , 3 , 0 ));"{=IF(A1:A4>2,1,2)}" _ustr, pDoc->GetFormula(1 , 0 , 0 )););"R3C3" _ustr, u"xxx" );"R2C2" _ustr, u"=R[1]C[1]" );"=R[1]C[1]" _ustr, pDoc->GetFormula(1 , 1 , 0 ));"xxx" _ustr, pDoc->GetString(1 , 1 , 0 ));"B2" _ustr);0 , KEY_F4);"=R3C3" _ustr, pDoc->GetFormula(1 , 1 , 0 ));"xxx" _ustr, pDoc->GetString(1 , 1 , 0 ));"A2:A3" _ustr);".uno:HideRow" _ustr, {});"A1" _ustr);0 , KEY_SHIFT | KEY_DOWN);s();// Without the fix in place, this test would have failed with // - Expected: Sheet1.A1:Sheet1.A4 // - Actual : Sheet1.A1:Sheet1.A2 "Sheet1.A1:Sheet1.A4" _ustr, aMarkedAreaString);"A1" _ustr, u"A1" );"A3" _ustr, u"A3" );// Use Adding Selection ".uno:StatusSelectionModeExp" _ustr, {});"A1" _ustr);".uno:SelectRow" _ustr, {});".uno:GoDown" _ustr, {});".uno:GoDown" _ustr, {});"A3" );".uno:SelectRow" _ustr, {});".uno:Copy" _ustr, {});// Open a new document ".uno:Paste" _ustr, {});// Without the fix in place, this test would have failed with // - Expected: A1 // - Actual : A3 "A1" _ustr, pDoc->GetString(ScAddress(0 , 0 , 0 )));"A3" _ustr, pDoc->GetString(ScAddress(0 , 1 , 0 )));"" _ustr, pDoc->GetString(ScAddress(0 , 2 , 0 )));"tdf159373.ods" );static_cast <SCTAB>(2 ), pDoc->GetTableCount());"Index" , uno::Any(sal_uInt16(0 )) } }));// Without the fix in place, this test would have crashed here ".uno:Remove" _ustr, aArgs);static_cast <SCTAB>(1 ), pDoc->GetTableCount());".uno:Undo" _ustr, aArgs);static_cast <SCTAB>(2 ), pDoc->GetTableCount());"tdf86166.ods" );static_cast <SCTAB>(2 ), pDoc->GetTableCount());"Index" , uno::Any(sal_uInt16(0 )) } }));// Without the fix in place, this test would have crashed here ".uno:Remove" _ustr, aArgs);static_cast <SCTAB>(1 ), pDoc->GetTableCount());"tdf158802.xlsx" );static_cast <SCTAB>(2 ), pDoc->GetTableCount());"Index" , uno::Any(sal_uInt16(0 )) } }));".uno:Remove" _ustr, aArgs);static_cast <SCTAB>(1 ), pDoc->GetTableCount());// Without the fix in place, this test would have crashed here ".uno:Undo" _ustr, aArgs);static_cast <SCTAB>(2 ), pDoc->GetTableCount());"tdf149502_HangOnDeletingSheet1.ods" );static_cast <SCTAB>(4 ), pDoc->GetTableCount());"Index" , uno::Any(sal_uInt16(0 )) } }));// Before the fix in place, this test frozen here ".uno:Remove" _ustr, aArgs);static_cast <SCTAB>(3 ), pDoc->GetTableCount());"tdf149503.xls" );".uno:SelectAll" _ustr, {});".uno:Cut" _ustr, {});// Without the fix in place, this test would have crashed here ".uno:Paste" _ustr, {});1 ), pDPs->GetCount());"tdf108292.ods" );".uno:SelectAll" _ustr, {});".uno:Copy" _ustr, {});// Open a new document // Without the fix in place, this test would have crashed ".uno:Paste" _ustr, {});"2D" _ustr, pDoc->GetString(ScAddress(26 , 0 , 0 )));// Inspired from testTdf117706, test columns instead of rows "A1" _ustr, u"A1" );"C1" _ustr, u"C1" );// Use Adding Selection ".uno:StatusSelectionModeExp" _ustr, {});"A1" _ustr);".uno:SelectColumn" _ustr, {});".uno:GoRight" _ustr, {});".uno:GoRight" _ustr, {});"C1" );".uno:SelectColumn" _ustr, {});".uno:Copy" _ustr, {});// Open a new document ".uno:Paste" _ustr, {});"A1" _ustr, pDoc->GetString(ScAddress(0 , 0 , 0 )));"C1" _ustr, pDoc->GetString(ScAddress(1 , 0 , 0 )));"" _ustr, pDoc->GetString(ScAddress(2 , 0 , 0 )));// Test the call of .uno:PasteTransposed (tdf#102255) // Note: the transpose functionality is tested in ucalc "A1" _ustr, u"1" );"A2" _ustr, u"a" );"A3" _ustr, u"=A1" );// Add a note to A1 "A1" _ustr);"Text" , uno::Any(u"Note in A1" _ustr) } });".uno:InsertAnnotation" _ustr, aArgs);// Set A2 bold "A2" _ustr);".uno:Bold" _ustr, {});// Check preconditions "There should be a note on A1" , pDoc->HasNote(ScAddress(0 , 0 , 0 )));const ScPatternAttr* pPattern = pDoc->GetPattern(0 , 1 , 0 );"font should be bold" , WEIGHT_BOLD,"A1:A3" _ustr);".uno:Copy" _ustr, {});// Open a new document ".uno:PasteTransposed" _ustr, {});"1" _ustr, pDoc->GetString(0 , 0 , 0 )); // A1 1 .0 , pDoc->GetValue(0 , 0 , 0 )); // A1 "a" _ustr, pDoc->GetString(1 , 0 , 0 )); // B1 2 , 0 , 0 ); // C1 "=A1" _ustr, aFormula); // C1 "1" _ustr, pDoc->GetString(2 , 0 , 0 )); // C1 1 .0 , pDoc->GetValue(2 , 0 , 0 )); // C1 "There should be a note on A1" , pDoc->HasNote(ScAddress(0 , 0 , 0 )));"Note in A1" _ustr, pDoc->GetNote(ScAddress(0 , 0 , 0 ))->GetText());1 , 0 , 0 );"font should be bold" , WEIGHT_BOLD,// Test the call of .uno:PasteAsLink (tdf#90101) // Note: the paste as link functionality is tested in ucalc "A1" _ustr, u"1" );"A2" _ustr, u"a" );"A3" _ustr, u"=A1" );// Add a note to A1 "A1" _ustr);"Text" , uno::Any(u"Note in A1" _ustr) } });".uno:InsertAnnotation" _ustr, aArgs);// Set A2 bold "A2" _ustr);".uno:Bold" _ustr, {});// Check preconditions "There should be a note on A1" , pDoc->HasNote(ScAddress(0 , 0 , 0 )));const ScPatternAttr* pPattern = pDoc->GetPattern(0 , 1 , 0 );"font should be bold" , WEIGHT_BOLD,"A1:A3" _ustr);".uno:Copy" _ustr, {});"C1" _ustr);".uno:PasteAsLink" _ustr, {});2 , 0 , 0 );"=$Sheet1.$A$1" _ustr, aFormula); // C1 2 , 1 , 0 );"=$Sheet1.$A$2" _ustr, aFormula); // C2 2 , 2 , 0 );"=$Sheet1.$A$3" _ustr, aFormula); // C3 1 .0 , pDoc->GetValue(2 , 0 , 0 )); // C1 1 .0 , pDoc->GetValue(2 , 2 , 0 )); // C3 "There should be no note on C1" , !pDoc->HasNote(ScAddress(2 , 0 , 0 )));2 , 1 , 0 );"font should be normal (cell attributes should not be copied)" ,"A1:C1" _ustr, u"={1,2,3}" );"A2" _ustr, u"=LOOKUP(3; A1:C1; {1,2})" );// Without the fix in place, this test would have crashed here "#N/A" _ustr, pDoc->GetString(ScAddress(0 , 1 , 0 )));"A1:A5" _ustr, u"={6;4;2;5;3}" );"6" _ustr, pDoc->GetString(ScAddress(0 , 0 , 0 )));"4" _ustr, pDoc->GetString(ScAddress(0 , 1 , 0 )));"2" _ustr, pDoc->GetString(ScAddress(0 , 2 , 0 )));"5" _ustr, pDoc->GetString(ScAddress(0 , 3 , 0 )));"3" _ustr, pDoc->GetString(ScAddress(0 , 4 , 0 )));".uno:SortAscending" _ustr, {});// Without the fix in place, this test would have failed with // - Expected: 6 // - Actual : #REF! "6" _ustr, pDoc->GetString(ScAddress(0 , 0 , 0 )));"4" _ustr, pDoc->GetString(ScAddress(0 , 1 , 0 )));"2" _ustr, pDoc->GetString(ScAddress(0 , 2 , 0 )));"5" _ustr, pDoc->GetString(ScAddress(0 , 3 , 0 )));"3" _ustr, pDoc->GetString(ScAddress(0 , 4 , 0 )));".uno:SortDescending" _ustr, {});"6" _ustr, pDoc->GetString(ScAddress(0 , 0 , 0 )));"4" _ustr, pDoc->GetString(ScAddress(0 , 1 , 0 )));"2" _ustr, pDoc->GetString(ScAddress(0 , 2 , 0 )));"5" _ustr, pDoc->GetString(ScAddress(0 , 3 , 0 )));"3" _ustr, pDoc->GetString(ScAddress(0 , 4 , 0 )));"A1" );0 , awt::Key::RETURN );"A2" );0 , awt::Key::RETURN );"A1" );0 , awt::Key::RETURN );"B1" );0 , awt::Key::RETURN );"A1" );// Restore previous status "tdf90694.ods" );// Select row 30 to 60 "30:60" _ustr);// Without the fix in place, this test would have crashed here ".uno:DeleteRows" _ustr, {});"" _ustr, pDoc->GetString(ScAddress(0 , 29 , 0 )));"" _ustr, pDoc->GetString(ScAddress(0 , 59 , 0 )));".uno:Undo" _ustr, {});"#REF!" _ustr, pDoc->GetString(ScAddress(0 , 29 , 0 )));"#REF!" _ustr, pDoc->GetString(ScAddress(0 , 59 , 0 )));"tdf138710.ods" );".uno:SelectAll" _ustr, {});// Without the fix in place, this test would have crashed here ".uno:DeleteRows" _ustr, {});"" _ustr, pDoc->GetString(ScAddress(0 , 0 , 1 )));".uno:Undo" _ustr, {});"Total" _ustr, pDoc->GetString(ScAddress(0 , 0 , 1 )));".uno:DeleteRows" _ustr, {});"" _ustr, pDoc->GetString(ScAddress(0 , 0 , 1 )));".uno:Undo" _ustr, {});"Total" _ustr, pDoc->GetString(ScAddress(0 , 0 , 1 )));"tdf128914.ods" );6 .0 , pDoc->GetValue(ScAddress(3 , 1 , 0 )));"D2" _ustr);".uno:Copy" _ustr, {});"D3:D6" _ustr);".uno:Paste" _ustr, {});// Without the fix in place, this test would have failed with // - Expected: 24 // - Actual : 6 24 .0 , pDoc->GetValue(ScAddress(3 , 2 , 0 )));60 .0 , pDoc->GetValue(ScAddress(3 , 3 , 0 )));120 .0 , pDoc->GetValue(ScAddress(3 , 4 , 0 )));210 .0 , pDoc->GetValue(ScAddress(3 , 5 , 0 )));6 .0 , pDoc->GetValue(ScAddress(1 , 14 , 0 )));"B15" _ustr);".uno:Copy" _ustr, {});"C15:F15" _ustr);".uno:Paste" _ustr, {});24 .0 , pDoc->GetValue(ScAddress(2 , 14 , 0 )));60 .0 , pDoc->GetValue(ScAddress(3 , 14 , 0 )));120 .0 , pDoc->GetValue(ScAddress(4 , 14 , 0 )));210 .0 , pDoc->GetValue(ScAddress(5 , 14 , 0 )));"tdf108654.ods" );".uno:SelectAll" _ustr, {});// first .uno:SelectAll selects the range, second all (tdf#161641) ".uno:SelectAll" _ustr, {});".uno:Copy" _ustr, {});".uno:Paste" _ustr, {});3 , 126 , 1 );"=VLOOKUP(C127,#REF!,D$1,0)" _ustr, aFormula);".uno:Undo" _ustr, {});3 , 126 , 1 );"" _ustr, aFormula);static_cast <SCTAB>(2 ), pDoc->GetTableCount());".uno:Undo" _ustr, {});static_cast <SCTAB>(1 ), pDoc->GetTableCount());"A1" _ustr, u"=$Sheet1.A1" );"A1" _ustr);"0" _ustr, pDoc->GetString(ScAddress(0 , 0 , 1 )));".uno:ShowPrecedents" _ustr, {});// Without the fix in place, this test would have crashed here ".uno:Cut" _ustr, {});"" _ustr, pDoc->GetString(ScAddress(0 , 0 , 1 )));"A1" _ustr, u"=SUM($Sheet1.B1:C1)" );"0" _ustr, pDoc->GetString(ScAddress(0 , 0 , 0 )));"A1" _ustr);".uno:Copy" _ustr, {});"A2" _ustr);".uno:Paste" _ustr, {});"=SUM($Sheet1.B2:C2)" _ustr, pDoc->GetFormula(0 , 1 , 0 ));"A1" _ustr);".uno:Cut" _ustr, {});"A3" _ustr);".uno:Paste" _ustr, {});// Without the fix in place, this test would have failed with // - Expected: =SUM($Sheet1.B1:C1) // - Actual : =SUM($Sheet1.B1:$Sheet1.C1) "=SUM($Sheet1.B1:C1)" _ustr, pDoc->GetFormula(0 , 2 , 0 ));// Insert a note to cell A1 "A1" _ustr);"Text" , uno::Any(u"Note in A1" _ustr) } });".uno:InsertAnnotation" _ustr, aArgs);// Insert a formula to cell A2 "A2" _ustr, u"=1+1" );"2" _ustr, pDoc->GetString(ScAddress(0 , 1 , 0 )));// Copy content of A2 to A1 using paste special command as a formula (Flags F) "A2" _ustr);".uno:Copy" _ustr, {});"A1" _ustr);"Flags" , uno::Any(u"F" _ustr) },"FormulaCommand" , uno::Any(sal_uInt16(ScPasteFunc::ADD)) },"SkipEmptyCells" , uno::Any(false ) },"Transpose" , uno::Any(false ) },"AsLink" , uno::Any(false ) },"MoveMode" , uno::Any(sal_uInt16(InsCellCmd::INS_NONE)) } });".uno:InsertContents" _ustr, aArgs);// Check if string in cell A2 was copied to cell A1 "2" _ustr, pDoc->GetString(ScAddress(0 , 0 , 0 )));// Without the fix in place, there would be no note in cell A1 after using paste special "There should be a note on A1" , pDoc->HasNote(ScAddress(0 , 0 , 0 )));"Note in A1" _ustr, pDoc->GetNote(ScAddress(0 , 0 , 0 ))->GetText());// Disable replace cell warning bool bOldStatus = aInputOption.GetReplaceCellsWarn();false );// Insert test data and formulas to create a sample crash document "B1" _ustr, u"1" );"A2" _ustr, u"1" );"A3" _ustr, u"1" );"B2" _ustr, u"=B1-A2" );"B3" _ustr, u"=B2-A3" );// Copy content from B2 to B2 using paste special command as a number (Flags ????) "B2" _ustr);".uno:Copy" _ustr, {});"B2" _ustr);"Flags" , uno::Any(u"V" _ustr) },"FormulaCommand" , uno::Any(sal_uInt16(ScPasteFunc::NONE)) },"SkipEmptyCells" , uno::Any(false ) },"Transpose" , uno::Any(false ) },"AsLink" , uno::Any(false ) },"MoveMode" , uno::Any(sal_uInt16(InsCellCmd::INS_NONE)) } });// Without the fix in place, this test would have crashed here ".uno:InsertContents" _ustr, aArgs);"0" _ustr, pDoc->GetString(ScAddress(1 , 1 , 0 )));// Restore previous replace cell warning status "A1" _ustr, u"10" );// Copy content of A1 to B1 using Formula Add "A1" _ustr);".uno:Copy" _ustr, {});"B1" _ustr);"Flags" , uno::Any(u"SVD" _ustr) },"FormulaCommand" , uno::Any(sal_uInt16(ScPasteFunc::ADD)) },"SkipEmptyCells" , uno::Any(false ) },"Transpose" , uno::Any(false ) },"AsLink" , uno::Any(false ) },"MoveMode" , uno::Any(sal_uInt16(InsCellCmd::INS_NONE)) } });// Without the fix in place, this test would have crashed here ".uno:InsertContents" _ustr, aArgs);"10" _ustr, pDoc->GetString(ScAddress(1 , 0 , 0 )));"A1" _ustr, u"Test" );"A1" _ustr);".uno:Copy" _ustr, {});e("SelectedFormat" , uno::Any(static_cast <sal_uInt32>(SotClipboardFormatId::BITMAP)) } });// Without the fix in place, this test would have crashed ".uno:ClipboardFormatItems" _ustr, aPropertyValues);0 ),static_cast <sal_Int32>(1 ), xPage->getCount());".uno:SelectUnprotectedCells" _ustr, {});".uno:Copy" _ustr, {});e("SelectedFormat" , uno::Any(static_cast <sal_uInt32>(SotClipboardFormatId::BITMAP)) } });// Without the fix in place, this test would have crashed ".uno:ClipboardFormatItems" _ustr, aPropertyValues);0 ),static_cast <sal_Int32>(0 ), xPage->getCount());false );"A1:A5" _ustr);".uno:ToggleMergeCells" _ustr, {});"A6:A10" _ustr);".uno:ToggleMergeCells" _ustr, {});"B1" _ustr);"=" );"A1" _ustr);0 , KEY_DOWN | KEY_SHIFT);0 , KEY_DOWN | KEY_SHIFT);const OUString* pInput = pViewShell->GetEditString();"=A1:A10" _ustr, *pInput);0 , KEY_UP | KEY_SHIFT);0 , KEY_UP | KEY_SHIFT);const OUString* pInput = pViewShell->GetEditString();"=A1:A5" _ustr, *pInput);false );"A1:A5" _ustr);".uno:ToggleMergeCells" _ustr, {});"A6:A10" _ustr);".uno:ToggleMergeCells" _ustr, {});"B1" _ustr);"=" );0 , 0 );0 , 5 );0 , 6 );5 , aA1.Y() + 5 , 1 ,0 );5 , aA6.Y() + 5 , 1 , MOUSE_LEFT, 0 );5 , aA7.Y() + 5 , 1 , MOUSE_LEFT,0 );const OUString* pInput = pViewShell->GetEditString();"=A1:A10" _ustr, *pInput);// Test the fill handle drag and drop "A1" _ustr, u"1" );// Select cell A1 to show the handle "A1" _ustr);// B2 left top corner = A1 right bottom corner 1 , 1 );0 , 6 );1 , aB2.Y() - 1 , 1 ,0 );1 , MOUSE_LEFT, 0 );1 , MOUSE_LEFT, 0 );"1" _ustr, pDoc->GetString(ScAddress(0 , 0 , 0 )));"2" _ustr, pDoc->GetString(ScAddress(0 , 1 , 0 )));"3" _ustr, pDoc->GetString(ScAddress(0 , 2 , 0 )));"4" _ustr, pDoc->GetString(ScAddress(0 , 3 , 0 )));"5" _ustr, pDoc->GetString(ScAddress(0 , 4 , 0 )));"6" _ustr, pDoc->GetString(ScAddress(0 , 5 , 0 )));/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ Messung V0.5 in Prozent C=91 H=93 G=91
¤ Dauer der Verarbeitung: 0.33 Sekunden
¤ *© Formatika GbR, Deutschland
