mark methods as stub where appropriate

Hopefully this will allow us to track methods we don't or can't implement ( although we let them actually exectute )

Change-Id: I53c74054ffea6cfa8e45aa4583f51c03f33991ee

vbahelper/source/msforms/vbabutton.cxx

@@ -71,15 +71,18 @@ sal_Bool SAL_CALL ScVbaButton::getCancel() throw (uno::RuntimeException)
 
 void SAL_CALL ScVbaButton::setCancel( sal_Bool /*bCancel*/ ) throw (uno::RuntimeException)
 {
+    // #STUB
 }
 
 sal_Bool SAL_CALL ScVbaButton::getDefault() throw (uno::RuntimeException)
 {
+    // #STUB
     return sal_False;
 }
 
 void SAL_CALL ScVbaButton::setDefault( sal_Bool /*bDefault*/ ) throw (uno::RuntimeException)
 {
+    // #STUB
 }
 
 sal_Int32 SAL_CALL ScVbaButton::getBackColor() throw (uno::RuntimeException)
@@ -99,6 +102,7 @@ sal_Int32 SAL_CALL ScVbaButton::getForeColor() throw (uno::RuntimeException)
 
 void SAL_CALL ScVbaButton::setForeColor( sal_Int32 /*nForeColor*/ ) throw (uno::RuntimeException)
 {
+    // #STUB
 }
 
 uno::Reference< msforms::XNewFont > SAL_CALL ScVbaButton::getFont() throw (uno::RuntimeException)

vbahelper/source/msforms/vbaframe.cxx

@@ -62,17 +62,20 @@ sal_Int32 SAL_CALL ScVbaFrame::getSpecialEffect() throw (uno::RuntimeException)
 
 ::sal_Int32 SAL_CALL ScVbaFrame::getForeColor() throw (::com::sun::star::uno::RuntimeException)
 {
+    // #STUB
     return 0;
 }
 
 void SAL_CALL ScVbaFrame::setForeColor( ::sal_Int32 /*_forecolor*/ ) throw (::com::sun::star::uno::RuntimeException)
 {
+    // #STUB
     return;
 }
 
 
 void SAL_CALL ScVbaFrame::setSpecialEffect( sal_Int32 /*nSpecialEffect*/ ) throw (uno::RuntimeException)
 {
+    // #STUB
 }
 
 sal_Int32 SAL_CALL ScVbaFrame::getBorderStyle() throw (uno::RuntimeException)
@@ -82,6 +85,7 @@ sal_Int32 SAL_CALL ScVbaFrame::getBorderStyle() throw (uno::RuntimeException)
 
 void SAL_CALL ScVbaFrame::setBorderStyle( sal_Int32 /*nBorderStyle*/ ) throw (uno::RuntimeException)
 {
+    // #STUB
 }
 
 uno::Reference< msforms::XNewFont > SAL_CALL ScVbaFrame::getFont() throw (uno::RuntimeException)

vbahelper/source/msforms/vbalabel.cxx

@@ -60,14 +60,14 @@ ScVbaLabel::setValue( const uno::Any& _value ) throw (::com::sun::star::uno::Run
 rtl::OUString SAL_CALL
 ScVbaLabel::getAccelerator() throw (css::uno::RuntimeException)
 {
-    //FIXME: seems not support?
+    // #STUB
     return rtl::OUString();
 }
 
 void SAL_CALL
 ScVbaLabel::setAccelerator( const rtl::OUString& /*_accelerator*/ ) throw (::com::sun::star::uno::RuntimeException)
 {
-    //FIXME: seems not support?
+    // #STUB
 }
 
 uno::Reference< msforms::XNewFont > SAL_CALL ScVbaLabel::getFont() throw (uno::RuntimeException)

vbahelper/source/msforms/vbapages.cxx

@@ -47,6 +47,7 @@ ScVbaPages::getServiceImplName()
 uno::Reference< container::XEnumeration > SAL_CALL
 ScVbaPages::createEnumeration() throw (uno::RuntimeException)
 {
+    // #STUB
     return uno::Reference< container::XEnumeration >();
 }
 

vbahelper/source/msforms/vbatextbox.cxx

@@ -122,6 +122,7 @@ sal_Int32 SAL_CALL ScVbaTextBox::getSpecialEffect() throw (uno::RuntimeException
 
 void SAL_CALL ScVbaTextBox::setSpecialEffect( sal_Int32 /*nSpecialEffect*/ ) throw (uno::RuntimeException)
 {
+    // #STUB
 }
 
 sal_Int32 SAL_CALL ScVbaTextBox::getBorderStyle() throw (uno::RuntimeException)
@@ -131,6 +132,7 @@ sal_Int32 SAL_CALL ScVbaTextBox::getBorderStyle() throw (uno::RuntimeException)
 
 void SAL_CALL ScVbaTextBox::setBorderStyle( sal_Int32 /*nBorderStyle*/ ) throw (uno::RuntimeException)
 {
+    // #STUB
 }
 
 sal_Int32 SAL_CALL ScVbaTextBox::getTextLength() throw (uno::RuntimeException)

vbahelper/source/msforms/vbatogglebutton.cxx

@@ -100,20 +100,24 @@ void SAL_CALL ScVbaToggleButton::setAutoSize( sal_Bool bAutoSize ) throw (uno::R
 
 sal_Bool SAL_CALL ScVbaToggleButton::getCancel() throw (uno::RuntimeException)
 {
+    // #STUB
     return sal_False;
 }
 
 void SAL_CALL ScVbaToggleButton::setCancel( sal_Bool /*bCancel*/ ) throw (uno::RuntimeException)
 {
+    // #STUB
 }
 
 sal_Bool SAL_CALL ScVbaToggleButton::getDefault() throw (uno::RuntimeException)
 {
+    // #STUB
     return sal_False;
 }
 
 void SAL_CALL ScVbaToggleButton::setDefault( sal_Bool /*bDefault*/ ) throw (uno::RuntimeException)
 {
+    // #STUB
 }
 
 sal_Int32 SAL_CALL ScVbaToggleButton::getBackColor() throw (uno::RuntimeException)
@@ -128,11 +132,13 @@ void SAL_CALL ScVbaToggleButton::setBackColor( sal_Int32 nBackColor ) throw (uno
 
 sal_Int32 SAL_CALL ScVbaToggleButton::getForeColor() throw (uno::RuntimeException)
 {
+    // #STUB
     return 0;
 }
 
 void SAL_CALL ScVbaToggleButton::setForeColor( sal_Int32 /*nForeColor*/ ) throw (uno::RuntimeException)
 {
+    // #STUB
 }
 
 uno::Reference< msforms::XNewFont > SAL_CALL ScVbaToggleButton::getFont() throw (uno::RuntimeException)

vbahelper/source/msforms/vbauserform.cxx

@@ -158,6 +158,7 @@ void SAL_CALL ScVbaUserForm::setVisible( sal_Bool bVisible ) throw (uno::Runtime
 void SAL_CALL
 ScVbaUserForm::RePaint(  ) throw (uno::RuntimeException)
 {
+    // #STUB
     // do nothing
 }
 

vbahelper/source/vbahelper/vbacommandbar.cxx

@@ -211,11 +211,13 @@ void SAL_CALL VbaDummyCommandBar::setName( const ::rtl::OUString& _name ) throw
 
 ::sal_Bool SAL_CALL VbaDummyCommandBar::getVisible() throw (uno::RuntimeException)
 {
+    // #STUB
     return sal_True;
 }
 
 void SAL_CALL VbaDummyCommandBar::setVisible( ::sal_Bool /*_visible*/ ) throw (uno::RuntimeException)
 {
+    // #STUB
 }
 
 ::sal_Bool SAL_CALL VbaDummyCommandBar::getEnabled() throw (uno::RuntimeException)
@@ -233,6 +235,7 @@ void SAL_CALL VbaDummyCommandBar::setEnabled( sal_Bool _enabled ) throw (uno::Ru
 void SAL_CALL VbaDummyCommandBar::Delete(  ) throw (script::BasicErrorException, uno::RuntimeException)
 {
     // no-op
+    // #STUB
 }
 
 uno::Any SAL_CALL VbaDummyCommandBar::Controls( const uno::Any& aIndex ) throw (script::BasicErrorException, uno::RuntimeException)

vbahelper/source/vbahelper/vbacommandbarcontrol.cxx

@@ -133,6 +133,7 @@ ScVbaCommandBarControl::setEnabled( sal_Bool _enabled ) throw (uno::RuntimeExcep
 ScVbaCommandBarControl::getBeginGroup() throw (css::uno::RuntimeException)
 {
     // TODO: need to check if the item before this item is of type 'separator'
+    //#STUB
     return sal_False;
 }
 

vbahelper/source/vbahelper/vbadialogsbase.cxx

@@ -24,13 +24,14 @@ using namespace ::com::sun::star;
 ::sal_Int32
 VbaDialogsBase::getCount() throw (uno::RuntimeException)
 {
-    //#TODO #FIXEME
+    //#STUB
     return 0;
 }
 
 uno::Any
 VbaDialogsBase::Item( const uno::Any& /* &aItem */) throw (uno::RuntimeException)
 {
+    //#STUB
     return uno::Any();
 }
 

vbahelper/source/vbahelper/vbalineformat.cxx

@@ -126,59 +126,74 @@ ScVbaLineFormat::setBeginArrowheadStyle( sal_Int32 _beginarrowheadstyle ) throw
 sal_Int32 SAL_CALL
 ScVbaLineFormat::getBeginArrowheadLength() throw (uno::RuntimeException)
 {
+    // #STUB
+    // force error
     throw uno::RuntimeException( rtl::OUString("Property 'EndArrowheadWidth' is not supported."), uno::Reference< uno::XInterface >() );
 }
 
 void SAL_CALL
 ScVbaLineFormat::setBeginArrowheadLength( sal_Int32 /*_beginarrowheadlength*/ ) throw (uno::RuntimeException)
 {
+    // #STUB
+    // force error
     throw uno::RuntimeException( rtl::OUString("Property 'EndArrowheadWidth' is not supported."), uno::Reference< uno::XInterface >() );
 }
 
 sal_Int32 SAL_CALL
 ScVbaLineFormat::getBeginArrowheadWidth() throw (uno::RuntimeException)
 {
+    // #STUB
+    // force error
     throw uno::RuntimeException( rtl::OUString("Property 'EndArrowheadWidth' is not supported."), uno::Reference< uno::XInterface >() );
 }
 
 void SAL_CALL
 ScVbaLineFormat::setBeginArrowheadWidth( sal_Int32 /*_beginarrowheadwidth*/ ) throw (uno::RuntimeException)
 {
+    // #STUB
+    // force error
     throw uno::RuntimeException( rtl::OUString("Property 'EndArrowheadWidth' is not supported."), uno::Reference< uno::XInterface >() );
 }
 
 sal_Int32 SAL_CALL
 ScVbaLineFormat::getEndArrowheadStylel() throw (uno::RuntimeException)
 {
+    // #STUB
     return 0;
 }
 
 void SAL_CALL
 ScVbaLineFormat::setEndArrowheadStylel( sal_Int32 /*_endarrowheadstylel*/ ) throw (uno::RuntimeException)
 {
+    // #STUB
 }
 
 sal_Int32 SAL_CALL
 ScVbaLineFormat::getEndArrowheadLength() throw (uno::RuntimeException)
 {
+    // #STUB
+    // force error
     throw uno::RuntimeException( rtl::OUString("Property 'EndArrowheadWidth' is not supported."), uno::Reference< uno::XInterface >() );
 }
 
 void SAL_CALL
 ScVbaLineFormat::setEndArrowheadLength( sal_Int32 /*_endarrowheadlength*/ ) throw (uno::RuntimeException)
 {
+    // #STUB
     throw uno::RuntimeException( rtl::OUString("Property 'EndArrowheadWidth' is not supported."), uno::Reference< uno::XInterface >() );
 }
 
 sal_Int32 SAL_CALL
 ScVbaLineFormat::getEndArrowheadWidth() throw (uno::RuntimeException)
 {
+    // #STUB
     throw uno::RuntimeException( rtl::OUString("Property 'EndArrowheadWidth' is not supported."), uno::Reference< uno::XInterface >() );
 }
 
 void SAL_CALL
 ScVbaLineFormat::setEndArrowheadWidth( sal_Int32 /*_endarrowheadwidth*/ ) throw (uno::RuntimeException)
 {
+    // #STUB
     throw uno::RuntimeException( rtl::OUString("Property 'EndArrowheadWidth' is not supported."), uno::Reference< uno::XInterface >() );
 }
 
@@ -269,6 +284,8 @@ ScVbaLineFormat::setStyle( sal_Int16 /*_style */) throw (uno::RuntimeException)
     //Therefore we do not set the LineStyle, because it maybe is already set
     //to Dashed or Single Line. Setting the 'Visible' or 'DashStyle' properties
     //will be done with the according methods.
+
+    // #STUB
 }
 
 sal_Int32 SAL_CALL

vbahelper/source/vbahelper/vbapictureformat.cxx

@@ -104,7 +104,6 @@ ScVbaPictureFormat::IncrementContrast( double increment ) throw (uno::RuntimeExc
 {
     double nContrast = getContrast();
     nContrast += increment;
-    //VBA, minz@cn.ibm.com.
     if( nContrast < 0 )
     {
         nContrast = 0.0;

vbahelper/source/vbahelper/vbashape.cxx

@@ -56,15 +56,6 @@ ScVbaShape::ScVbaShape( const uno::Reference< XHelperInterface >& xParent, const
 
 ScVbaShape::~ScVbaShape()
 {
-    // dtor must never ever throw
-    /*try
-    {
-        removeShapeListener();
-        removeShapesListener();
-    }
-    catch( uno::Exception& )
-    {
-    }*/
 }
 
 void SAL_CALL
@@ -268,6 +259,7 @@ ScVbaShape::setTop( double _top ) throw (uno::RuntimeException)
 sal_Bool SAL_CALL
 ScVbaShape::getVisible() throw (uno::RuntimeException)
 {
+    // #STUB
     //UNO Shapes are always visible
     return sal_True;
 }
@@ -275,6 +267,7 @@ ScVbaShape::getVisible() throw (uno::RuntimeException)
 void SAL_CALL
 ScVbaShape::setVisible( sal_Bool /*_visible*/ ) throw (uno::RuntimeException)
 {
+    // #STUB
     //UNO Shapes are always visible
 }
 
@@ -513,27 +506,27 @@ void SAL_CALL ScVbaShape::Copy() throw (uno::RuntimeException)
 sal_Bool SAL_CALL
 ScVbaShape::getLockAspectRatio() throw (uno::RuntimeException)
 {
-    // FIXME:
+    // #STUB
     return sal_False;
 }
 
 void SAL_CALL
 ScVbaShape::setLockAspectRatio( sal_Bool /*_lockaspectratio*/ ) throw (uno::RuntimeException)
 {
-    // FIXME:
+    // #STUB
 }
 
 sal_Bool SAL_CALL
 ScVbaShape::getLockAnchor() throw (uno::RuntimeException)
 {
-    // FIXME:
+    // #STUB
     return sal_True;
 }
 
 void SAL_CALL
 ScVbaShape::setLockAnchor( sal_Bool /*_lockanchor*/ ) throw (uno::RuntimeException)
 {
-    // FIXME:
+    // #STUB
 }
 
 sal_Int32 SAL_CALL