From 04fe439b053f2d361e74975a4b66cd359980976e Mon Sep 17 00:00:00 2001 From: Zdeněk Crhonek Date: Wed, 1 Mar 2017 23:18:37 +0100 Subject: add test for own basic function Change-Id: I9c42195c7338300964e111e2a3fbc8d61cac6186 Reviewed-on: https://gerrit.libreoffice.org/34770 Tested-by: Jenkins Reviewed-by: Zdenek Crhonek --- sc/qa/unit/data/functions/fods/own_function.fods | 4865 ++++++++++++++++++++++ 1 file changed, 4865 insertions(+) create mode 100644 sc/qa/unit/data/functions/fods/own_function.fods (limited to 'sc') diff --git a/sc/qa/unit/data/functions/fods/own_function.fods b/sc/qa/unit/data/functions/fods/own_function.fods new file mode 100644 index 000000000000..4a6198e9ebe2 --- /dev/null +++ b/sc/qa/unit/data/functions/fods/own_function.fods @@ -0,0 +1,4865 @@ + + + + 2017-03-01T23:17:33.235475443P0D1LibreOfficeDev/5.4.0.0.alpha0$Linux_X86_64 LibreOffice_project/36de6c50684c8241969a2064d30aff41e0bc5d97 + + + 0 + 0 + 21431 + 4459 + + + view1 + + + 2 + 8 + 0 + 0 + 0 + 0 + 2 + 0 + 0 + 0 + 0 + 0 + 100 + 60 + true + false + + + 4 + 8 + 0 + 0 + 0 + 0 + 2 + 0 + 0 + 0 + 0 + 0 + 100 + 60 + true + false + + + Sheet2 + 1241 + 0 + 100 + 60 + false + true + true + true + 12632256 + true + true + true + true + true + false + false + 1270 + 1270 + 1 + 1 + true + false + + + + + 7 + false + false + true + true + false + false + false + 1270 + 1270 + true + true + true + true + true + false + 12632256 + false + Lexmark-E352dn + + + cs + CZ + + + + + + de + DE + + + + + + en + US + + + + + + nl + NL + + + + + + true + true + 3 + 1 + true + 1 + true + lgH+/0xleG1hcmstRTM1MmRuAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQ1VQUzpMZXhtYXJrLUUzNTJkbgAAAAAAAAAAAAAAAAAWAAMAtwAAAAAAAAAIAFZUAAAkbQAASm9iRGF0YSAxCnByaW50ZXI9TGV4bWFyay1FMzUyZG4Kb3JpZW50YXRpb249UG9ydHJhaXQKY29waWVzPTEKY29sbGF0ZT1mYWxzZQptYXJnaW5kYWp1c3RtZW50PTAsMCwwLDAKY29sb3JkZXB0aD0yNApwc2xldmVsPTAKcGRmZGV2aWNlPTEKY29sb3JkZXZpY2U9MApQUERDb250ZXhEYXRhClBhZ2VTaXplOkxldHRlcgAAEgBDT01QQVRfRFVQTEVYX01PREUPAER1cGxleE1vZGU6Ok9mZg== + false + 0 + + + + + + + + REM ***** BASIC ***** + +REM case SbxINTEGER: +REM case SbxLONG: +REM case SbxSINGLE: +REM case SbxDOUBLE: +REM case SbxCURRENCY: +REM case SbxDATE: +REM case SbxUSHORT: +REM case SbxULONG: +REM case SbxINT: +REM case SbxUINT: +REM case SbxSALINT64: +REM case SbxSALUINT64: +REM case SbxDECIMAL: +REM case SbxBOOL: + +Function TestFuncCurr() As Currency + Dim Result As Currency + Result = 5.50 + TestFuncCurr = Result +End Function + +Function TestFuncInt() As integer + Dim Result As integer + Result = 5.50 + TestFuncInt = Result +End Function + +Function TestFuncLong() As long + Dim Result As Long + Result = 5.50 + TestFuncLong = Result +End Function + +Function TestFuncSingle() As Single + Dim Result As Single + Result = 5.50 + TestFuncSingle = Result +End Function + +Function TestFuncDouble() As double + Dim Result As Double + Result = 5.50 + TestFuncDouble = Result +End Function + + +Function TestFuncDate() As date + Dim Result As Date + Result = 5590 + TestFuncDate = Result +End Function + +Function TestFuncBool() As boolean + Dim Result As boolean + Result = 1 + TestFuncBool = Result +End Function + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + - + + + + + + + + + + + + + ( + + ) + + + + - + + + + + + + + + + + + + + + + + + + + + + + - + + + + + + + + + + + + - + + + + + + + + + + + + + - + + + + + + + + + + + + + - + + + + + + + £ + + + + - + £ + + + + + £ + + + + - + £ + + + + + £ + + + + + - + £ + + + + + £ + + + + + - + £ + + + + + £ + + + + + - + £ + + + + + + + + + ( + + ) + + + + + + + + ( + + ) + + + + £ + + + + + - + £ + + + + + + £ + + + + + - + £ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + - + + + + + + + + + + + - + + + + + + + + + + / + + / + + + + + + + / + + / + + + + + + + + + + - + + + + + + + + + + + - + + + + + + + + + + + - + + + + + + + + + + - + + + + + + + + + + + - + + + + + + + + + - + + + + + + + + + - + + + + + + + + - + + + + + + + + + - + + + + + + + + + + - + + + + + + + - + + + + + + + + + + + + + + + - + + + + + + + - Kč + + + + + + + + + + + + + + + - + + + + + + + - + + + + + + + + + + + + + + + + + - + + + + + + + - + + + + + + + + + + + + + : + + + + + : + + : + + + + + : + + + + + + + Yes + + + Yes + + + No + + + + + True + + + True + + + False + + + + + On + + + On + + + Off + + + + + ¥€ + + + + + + + + + ( + + + + + + ) + + + + + + + + + + - + + + + + + + $ + + + + + + ($ + + ) + + + + + + + + - + + + + + + + + + + + - + + + + + + + + + + + + + + - + + + + + + + + + + + - + + + + + + + + + + - + + + + + - + + + + + + + + + + + + + + - + + + + + - € + + + + + + + + + + + + + + - + + + + + - + + + + + + + + + + + + + + + + - + + + + + - + + + + + + + + + + + + + + + $ + + + + + ($ + + ) + + + + $ + + + + + + ($ + + ) + + + + $ + + + + + ($ + + ) + + + + + + + + + + ( + + ) + + + + - + + + + + + + + + + $ + + + + + + $ + + ( + + ) + + + $ + + - + + + + + + + + + + $ + + + + + + $ + + ( + + ) + + + $ + + - + + + + + + + + + + + + + + + + + + + ( + + + + ) + + + + \ + + + + \- + + + + + \ + + + + + \- + + + + + \ + + + + \- + + + + + \ + + + + + \- + + + + + \ + + + + + + \ + + - + + + + + \ + + - + + + + + + + + + + + + + + + + - + + + + + + - + + + + + + + + + + \ + + + + + + \ + + - + + + + + \ + + - + + + + + + + + + + + + + + + + + + - + + + + + + - + + + + + + + + + + + + + + + + - + + + + + + + + + + + - + + + + + + + + + + - + + + + + + + + + + + - + + + + + + + + + $ + + + + + $( + + ) + + + $- + + + + + + + + + + + + + + ( + + ) + + + - + + + + + + + + + + $ + + + + + $( + + ) + + + $- + + + + + + + + + + + + + + + + ( + + ) + + + - + + + + + + + + + + + + + % + + + + % + + + + % + + + + % + + + + % + + + + % + + + + % + + + + % + + + + % + + + + % + + + + + + + + + - + + + + + + + + + + + + + - + + + + + + + + + + + + + - + + + + + + + + + + + + + - + + + + + + + + + + + + + - + + + + + + + + + + + + + - + + + + + + + + + + + + + - + + + + + + + + + + + + + - + + + + + + + + + + + + + - + + + + + + + + + + + + + - + + + + + + + + + + + + + - + + + + + + + + + + + + + - + + + + + + + + + + + + + - + + + + + + + + + + + + + - + + + + + + + + + + + + + - + + + + + + + + + + + % + + + + % + + + + % + + + + % + + + + % + + + + % + + + + + + $ + + + + + ( + $ + + ) + + + + + % + + + + % + + + + - + + % + + + + + + + + - + + + + + + - + + - + + + + £ + + + + + - + £ + + + + + £ + + + + + - + £ + + + + + + % + + + + - + + % + + + + + DM + + + - + + DM + + + + + DM + + + + - + + DM + + + + + DM + + + - + + DM + + + + + DM + + + + - + + DM + + + + + + + + + - + + + + + + + - + + + + + + + + + + + + DM + + + - + + + DM + + + + - DM + + + + + + + + + + + + + + + - + + + + + + + - + + + + + + + + + + + + + + DM + + + - + + + DM + + + + - + + DM + + + + + + + + + + Ouch! - + + - Error detected! + + + + - Result=0 - No Errordetection + + + + / + + / + + + + + / + + / + + + + + + + + + + + + + £ + + + + + + + + + £ + + + + + + + + + + £ + + + + + + + + + £ + + + + + + + + + + + + + + + - + + + + + + + - + + + + + + + + + + £ + + + + + + + + + + + + £ + + - + + + + + + + + + + + + + + + - + + + + + + + - + + + + + + + + + + + + £ + + + + + + + + + + + + £ + + - + + + + + + + + + + + + + + + + + - + + + + + + + + DM + + + - + + + DM + + + + + + DM + + + - + + + DM + + + + + + DM + + + + - + + + DM + + + + + + DM + + + + - + + + DM + + + + + + DM + + + + - + + + DM + + + + + + + + + + + + + - + + + + + tan + + aa + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + - + + + + + + + + + + + + + + + + + + + + + + + + + + + + - + + + + + + + : + + : + + + + + + + : + + : + + + + + + + + + + - + + + + + + + + + + + + + - + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + ( + + ) + + + + + - + + + + + + + + + + + $ + + + + + + $ + + ( + + ) + + + $ + + - + + + + + + + + + + + + + + + + + + + ( + + ) + + + + + - + + + + + + + + + + + + + $ + + + + + + $ + + ( + + ) + + + $ + + - + + + + + + + + + + + + + + + + + + + + ( + + + + ) + + + + + ok + + + + ERR! + + + + + + + + + + - + + + + + + + + - + + + + + + + + + + + + + + + + + - + + + + + + + + - Kč + + + + + + + + + + + + + + + + + - + + + + + + + + - + + + + + + + + + + + + + + + + + + + - + + + + + + + + - + + + + + + + + + + + + + ¥€ + + + + + + + + + ( + + + + + + ) + + + + + / + + / + + + + + - + + - + + + + + - + + + + + - + + + + + : + + + + + + + : + + : + + + + + + + : + + + + + : + + : + + + + + / + + / + + + + : + + + + + + + + + ( + + ) + + + + + + + + + ( + + ) + + + + + + + + + ( + + + ) + + + + + + + + + + ( + + + ) + + + + + + + + + ( + + + ) + + + + + + + + + + ( + + + ) + + + + + - + + + + + : + + : + + + + + : + + + + + + + + ( + + ) + + + + + + + + % + + + + + + + + + + + + ( + + ) + + + + - + + + + + + + + + + + + + + + + + + ( + + ) + + + + + - + + + + + + + + + + + + + + + + ( + + ) + + + + - + + + + + + + + + + + + + + + + + + + + ( + + ) + + + + + - + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + . + + + + + + + . + + + + + + + + + + : + + + + + + + : + + : + + + + + + + . + + . + + + + : + + + + + + + + - + + + + + + + + + + + - + + + + + + + + + + - + + + + + + + + + + + - + + + + + + + + + + - + + + + + + + + + + + - + + + + + + + + + + - + + + + + + + + + + + - + + + + + + + : + + : + + + + + : + + + + + + + + + + + + + + - + + + + + + + + + + + + - + + + + + + + + + + + - + + + + + + + + + + + + - + + + + + - + + - + + + + + - + + - + + + + + - + + + + + - + + + + + : + + + + + + + : + + : + + + + + + + : + + + + + : + + : + + + + + - + + - + + + + : + + + + + + + + + - + + + + + + + + + + - + + + + + + + + + - + + + + + + + + + + - + + + + + + + + + + + - + + + + - + + + + + + + + + + + + + + + + + + + - + + + + + - + + + + + + + + + + + + + + + + + - + + + + - + + + + + + + + + + + + + + + + + + + + + - + + + + + - + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + ??? + + + + Page 1 + + + + + + + ??? (???) + + + 00/00/0000, 00:00:00 + + + + + Page 1 / 99 + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + Own function in basic + + + + + + + + + Result + + + TRUE + + + + + + + + + Sheet + + + Result + + + Description + + + + + 1 + + + TRUE + + + Simple own function in basic + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + Function + + + Expected + + + Correct + + + FunctionString + + + Comment + + + + + + + + + + + + + + + + + + 5.5 + + + 5.5 + + + TRUE + + + =TESTFUNCCURR() + + + + + + + + + + + + + + + + + + + + 6.00000000000000E+000 + + + 6 + + + TRUE + + + =TESTFUNCINT() + + + + + + + + + + + + + + + + + + + + 6 + + + 6 + + + TRUE + + + =TESTFUNCLONG() + + + + + + + + + + + + + + + + + + + 5.5 + + + 5.5 + + + TRUE + + + =TESTFUNCSINGLE() + + + + + + + + + + + + + + + + + + + 5.50000000000000E+000 + + + 5.5 + + + TRUE + + + =TESTFUNCDOUBLE() + + + + + + + + + + + + + + + + + + + + 5.59000000000000E+003 + + + 5590 + + + TRUE + + + = TESTFUNCDATE() + + + + + + + + + + + + + + + + + + + + 1.00000000000000E+000 + + + 1 + + + TRUE + + + =TESTFUNCBOOL() + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + \ No newline at end of file -- cgit