1/*************************************************************************
2 *
3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4 *
5 * Copyright 2000, 2010 Oracle and/or its affiliates.
6 *
7 * OpenOffice.org - a multi-platform office productivity suite
8 *
9 * This file is part of OpenOffice.org.
10 *
11 * OpenOffice.org is free software: you can redistribute it and/or modify
12 * it under the terms of the GNU Lesser General Public License version 3
13 * only, as published by the Free Software Foundation.
14 *
15 * OpenOffice.org is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18 * GNU Lesser General Public License version 3 for more details
19 * (a copy is included in the LICENSE file that accompanied this code).
20 *
21 * You should have received a copy of the GNU Lesser General Public License
22 * version 3 along with OpenOffice.org.  If not, see
23 * <http://www.openoffice.org/license.html>
24 * for a copy of the LGPLv3 License.
25 *
26 ************************************************************************/
27
28#ifndef __com_sun_star_script_vba_XVBACompatibility_idl__
29#define __com_sun_star_script_vba_XVBACompatibility_idl__
30
31#include <com/sun/star/frame/XModel.idl>
32#include <com/sun/star/script/vba/XVBAScriptListener.idl>
33
34//=============================================================================
35
36module com {  module sun {  module star {  module script { module vba {
37
38interface XVBACompatibility
39{
40    //-------------------------------------------------------------------------
41
42    [attribute] boolean VBACompatibilityMode;
43
44    //-------------------------------------------------------------------------
45
46    [attribute, readonly] long RunningVBAScripts;
47
48    //-------------------------------------------------------------------------
49
50    [oneway] void addVBAScriptListener( [in] XVBAScriptListener Listener );
51
52    //-------------------------------------------------------------------------
53
54    [oneway] void removeVBAScriptListener( [in] XVBAScriptListener Listener );
55
56    //-------------------------------------------------------------------------
57
58    void broadcastVBAScriptEvent( [in] long Identifier, [in] string ModuleName );
59
60    //-------------------------------------------------------------------------
61};
62
63}; }; }; }; };
64
65//=============================================================================
66
67#endif
68