Add a dummy implementation of WordBasic.AppMaximize()

Change-Id: I4606e5a3717c3717d105dd2e63c9fd7d2e1abf83

oovbaapi/ooo/vba/word/XWordBasic.idl

@@ -38,6 +38,8 @@ interface XWordBasic
                                   [in] any SQLStatement1,
                                   [in] any OpenExclusive,
                                   [in] any SubType );
+
+    long AppMaximize( [in] string WindowName, [in] any State );
 };
 
 }; }; };

sw/source/ui/vba/vbaapplication.cxx

@@ -109,6 +109,7 @@ public:
                                                   const css::uno::Any& WritePasswordTemplate, const css::uno::Any& Connection,
                                                   const css::uno::Any& SQLStatement, const css::uno::Any& SQLStatement1,
                                                   const css::uno::Any& OpenExclusive, const css::uno::Any& SubType) override;
+    virtual sal_Int32 SAL_CALL AppMaximize( const OUString& WindowName, const css::uno::Any& State ) override;
 };
 
 SwVbaApplication::SwVbaApplication( uno::Reference<uno::XComponentContext >& xContext ):
@@ -638,4 +639,13 @@ SwWordBasic::MailMergeOpenDataSource( const OUString& Name, const css::uno::Any&
                                                                 OpenExclusive, SubType );
 }
 
+sal_Int32 SAL_CALL
+SwWordBasic::AppMaximize( const OUString& WindowName, const css::uno::Any& State )
+{
+    SAL_INFO("sw.vba", "WordBasic.AppMaximize( WindowName:=" << WindowName << ", State:=" << State);
+
+    // FIXME: Implement if necessary
+    return 0;
+}
+
 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */