28#include <com/sun/star/script/XDefaultProperty.hpp>
35class ErrObject :
public ::cppu::WeakImplHelper< vba::XErrObject,
36 script::XDefaultProperty >
48 virtual ::sal_Int32 SAL_CALL
getNumber()
override;
49 virtual void SAL_CALL
setNumber( ::sal_Int32 _number )
override;
51 virtual void SAL_CALL
setHelpContext( ::sal_Int32 _helpcontext )
override;
53 virtual void SAL_CALL
setHelpFile(
const OUString& _helpfile )
override;
55 virtual void SAL_CALL
setDescription(
const OUString& _description )
override;
56 virtual OUString SAL_CALL
getSource()
override;
57 virtual void SAL_CALL
setSource(
const OUString& _source )
override;
60 virtual void SAL_CALL
Clear( )
override;
165 throw uno::RuntimeException(
"Missing Required Parameter" );
176 , m_pErrObject( nullptr )
181 SetDfltProperty( uno::Reference< script::XDefaultProperty >(
m_xErr, uno::UNO_QUERY_THROW )->getDefaultPropertyName() ) ;
190uno::Reference< vba::XErrObject >
const &
203 std::scoped_lock aGuard(
aMutex);
SbxAppData & GetSbxData_Impl()
virtual void SAL_CALL setSource(const OUString &_source) override
void setData(const uno::Any &Number, const uno::Any &Source, const uno::Any &Description, const uno::Any &HelpFile, const uno::Any &HelpContext)
virtual OUString SAL_CALL getHelpFile() override
virtual OUString SAL_CALL getDescription() override
virtual void SAL_CALL setHelpContext(::sal_Int32 _helpcontext) override
virtual void SAL_CALL setDescription(const OUString &_description) override
virtual void SAL_CALL setHelpFile(const OUString &_helpfile) override
virtual ::sal_Int32 SAL_CALL getHelpContext() override
virtual void SAL_CALL Clear() override
virtual OUString SAL_CALL getDefaultPropertyName() override
virtual void SAL_CALL Raise(const uno::Any &Number, const uno::Any &Source, const uno::Any &Description, const uno::Any &HelpFile, const uno::Any &HelpContext) override
virtual OUString SAL_CALL getSource() override
virtual void SAL_CALL setNumber(::sal_Int32 _number) override
virtual ::sal_Int32 SAL_CALL getNumber() override
const OUString & GetErrorMsg() const
void ErrorVB(sal_Int32 nVBNumber, const OUString &rMsg)
void setErrorVB(sal_Int32 nVBNumber)
SbxErrObject(const OUString &aName_, const css::uno::Any &aUnoObj_)
void setNumberAndDescription(::sal_Int32 _number, const OUString &_description)
class ErrObject * m_pErrObject
static SbxVariableRef const & getErrObject()
css::uno::Reference< ooo::vba::XErrObject > m_xErr
virtual ~SbxErrObject() override
static css::uno::Reference< ooo::vba::XErrObject > const & getUnoErrObject()
void SetDfltProperty(const OUString &r)
SbxVariableRef m_aGlobErr