20#include <config_features.h>
31 const OUString& rStorageName )
37 StreamMode::READWRITE | StreamMode::NOCREATE | StreamMode::SHARE_DENYALL ) );
38 if( xVBAStg.
is() && !xVBAStg->GetError() )
43#if HAVE_FEATURE_SCRIPTING
50 xSrc->CopyTo( xDst.
get() );
52 ErrCode nError = xDst->GetError();
54 nError = xSrc->GetError();
56 xRoot->SetError( nError );
69 StreamMode::READ | StreamMode::NOCREATE | StreamMode::SHARE_DENYALL ));
70 return ( xVBAStg.
is() && !xVBAStg->GetError() )
77 return "_MS_VBA_Macros";
bool IsBasicModified() const
BasicManager * GetBasicManager() const
css::uno::Reference< css::embed::XStorage > const & GetStorage()
static SotStorage * OpenOLEStorage(css::uno::Reference< css::embed::XStorage > const &xStorage, OUString const &rEleName, StreamMode=StreamMode::STD_READWRITE)
tools::SvRef< SotStorage > xRoot
ErrCode SaveOrDelMSVBAStorage(bool bSaveInto, const OUString &rStorageName)
static OUString GetMSBasicStorageName()
static ErrCode GetSaveWarningOfMSVBAStorage(SfxObjectShell &rDocS)
Shape IDs per cluster in DGG atom.
#define ERRCODE_SVX_MODIFIED_VBASIC_STORAGE
#define ERRCODE_SVX_VBASIC_STORAGE_EXIST