commit bfb1aa23457425707aaa80c342820a25468df937
author Julien Nabet <serval2412@yahoo.fr> Mon Feb 07 21:24:16 2022 +0100
committer Mike Kaganski <mike.kaganski@collabora.com> Thu Feb 10 09:32:19 2022 +0100
tree 49b4c0885d703c5c1838503efcb3829c04d02f22
parent 1a343e3168c6ac8acf3279307275727e588ddcb7

tdf#147262: CallByName() argument names does not match that of VBA

Change-Id: I3029b98abbe3b8facf01f0e50a7efdff545c2141
Reviewed-on: https://gerrit.libreoffice.org/c/core/+/129646
Reviewed-by: Julien Nabet <serval2412@yahoo.fr>
(cherry picked from commit a555aa25bd17781b2828e13ac81456a45387284d)
Reviewed-on: https://gerrit.libreoffice.org/c/core/+/129754
Tested-by: Jenkins
Reviewed-by: Mike Kaganski <mike.kaganski@collabora.com>

basic/source/runtime/methods1.cxx

diff --git a/basic/source/runtime/methods1.cxx b/basic/source/runtime/methods1.cxx
index 117e84d..7e2d0c7 100644
--- a/basic/source/runtime/methods1.cxx
+++ b/basic/source/runtime/methods1.cxx
@@ -120,7 +120,7 @@ void SbRtl_CallByName(StarBASIC *, SbxArray & rPar, bool)
        return;
    }

    // 2. parameter is ProcedureName
    // 2. parameter is ProcName
    OUString aNameStr = rPar.Get(2)->GetOUString();

    // 3. parameter is CallType

basic/source/runtime/stdobj.cxx

diff --git a/basic/source/runtime/stdobj.cxx b/basic/source/runtime/stdobj.cxx
index 4adda6e..dcbc0ec 100644
--- a/basic/source/runtime/stdobj.cxx
+++ b/basic/source/runtime/stdobj.cxx
@@ -141,7 +141,7 @@ constexpr Method aMethods[] = {

{ u"CallByName",                    SbxVARIANT,  3 | FUNCTION_,        SbRtl_CallByName           },
    arg(u"Object",        SbxOBJECT),
    arg(u"ProcedureName", SbxSTRING),
    arg(u"ProcName", SbxSTRING),
    arg(u"CallType",      SbxINTEGER),

{ u"CBool",                         SbxBOOL,     1 | FUNCTION_,        SbRtl_CBool                },