source/text/sbasic/shared/03/lib_tools.xhp |  892 ++++++++++++++++++-----------
 1 file changed, 564 insertions(+), 328 deletions(-)

New commits:
commit 4c0b3129e36d461f4d93ba924075cf6ec3e7ded1
Author:     Olivier Hallot <olivier.hal...@libreoffice.org>
AuthorDate: Wed Dec 5 19:07:55 2018 -0200
Commit:     Olivier Hallot <olivier.hal...@libreoffice.org>
CommitDate: Wed Dec 5 22:12:30 2018 +0100

    Refactor BASIC code layout
    
    Change-Id: Ica3743e859f244a2344e0b51848460c5c4f3ead6
    Reviewed-on: https://gerrit.libreoffice.org/64651
    Tested-by: Jenkins
    Reviewed-by: Olivier Hallot <olivier.hal...@libreoffice.org>

diff --git a/source/text/sbasic/shared/03/lib_tools.xhp 
b/source/text/sbasic/shared/03/lib_tools.xhp
index a6480cc4e..716e29cc3 100644
--- a/source/text/sbasic/shared/03/lib_tools.xhp
+++ b/source/text/sbasic/shared/03/lib_tools.xhp
@@ -51,7 +51,9 @@
                     <paragraph id="par_id711529001004857" role="bascode" 
xml-lang="en-US" localize="false">ActivateReadOnlyFlag</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id251529001003857" role="bascode" 
xml-lang="en-US" localize="false">Sub ActivateReadOnlyFlag()</paragraph>
+                    <bascode>
+                        <paragraph id="par_id251529001003857" role="bascode" 
xml-lang="en-US" localize="false">Sub ActivateReadOnlyFlag()</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -59,7 +61,9 @@
                     <paragraph id="par_id71529001663903" role="bascode" 
xml-lang="en-US" localize="false">DeactivateReadOnlyFlag</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id951529001706210" role="bascode" 
xml-lang="en-US" localize="false">Sub DeactivateReadOnlyFlag(</paragraph>
+                    <bascode>
+                        <paragraph id="par_id951529001706210" role="bascode" 
xml-lang="en-US" localize="false">Sub DeactivateReadOnlyFlag()</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -67,7 +71,9 @@
                     <paragraph id="par_id421529001727178" role="bascode" 
xml-lang="en-US" localize="false">SetBasicReadOnlyFlag</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id771529001755355" role="bascode" 
xml-lang="en-US" localize="false">Sub SetBasicReadOnlyFlag(bReadOnly as 
Boolean)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id771529001755355" role="bascode" 
xml-lang="en-US" localize="false">Sub SetBasicReadOnlyFlag(bReadOnly as 
Boolean)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -75,7 +81,9 @@
                     <paragraph id="par_id651529001954868" role="bascode" 
xml-lang="en-US" localize="false">WritedbgInfo</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id581529001865055" role="bascode" 
xml-lang="en-US" localize="false">Sub WritedbgInfo(LocObject as 
Object)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id581529001865055" role="bascode" 
xml-lang="en-US" localize="false">Sub WritedbgInfo(LocObject as 
Object)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -83,7 +91,9 @@
                     <paragraph id="par_id841529001994821" role="bascode" 
xml-lang="en-US" localize="false">WriteDbgString</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id171529002013434" role="bascode" 
xml-lang="en-US" localize="false">Sub WriteDbgString(LocString as 
string)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id171529002013434" role="bascode" 
xml-lang="en-US" localize="false">Sub WriteDbgString(LocString as 
string)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -91,7 +101,9 @@
                     <paragraph id="par_id741529002099962" role="bascode" 
xml-lang="en-US" localize="false">ShowArray</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id261529002118559" role="bascode" 
xml-lang="en-US" localize="false">Sub ShowArray(LocArray())</paragraph>
+                    <bascode>
+                        <paragraph id="par_id261529002118559" role="bascode" 
xml-lang="en-US" localize="false">Sub ShowArray(LocArray())</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -99,7 +111,9 @@
                     <paragraph id="par_id321529002327444" role="bascode" 
xml-lang="en-US" localize="false">ShowPropertyValues</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id501529002327444" role="bascode" 
xml-lang="en-US" localize="false">Sub ShowPropertyValues(oLocObject as 
Object)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id501529002327444" role="bascode" 
xml-lang="en-US" localize="false">Sub ShowPropertyValues(oLocObject as 
Object)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -107,7 +121,9 @@
                     <paragraph id="par_id451529002368600" role="bascode" 
xml-lang="en-US" localize="false">ShowNameValuePair</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id321529002368600" role="bascode" 
xml-lang="en-US" localize="false">Sub ShowNameValuePair(Pair())</paragraph>
+                    <bascode>
+                        <paragraph id="par_id321529002368600" role="bascode" 
xml-lang="en-US" localize="false">Sub ShowNameValuePair(Pair())</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -117,9 +133,11 @@
                 <tablecell>
                     <paragraph role="tablecontent" id="par_id111529003255859" 
xml-lang="en-US" localize="false">&apos; Retrieves all the Elements of 
aSequence of an object, with the</paragraph>
                     <paragraph role="tablecontent" id="par_id41529003238747" 
xml-lang="en-US" localize="false">&apos; possibility to define a filter(sfilter 
&lt;&gt; "")</paragraph>
-                    <paragraph role="bascode" id="par_id41529003225918" 
xml-lang="en-US" localize="false">Sub ShowElementNames(</paragraph>
-                    <paragraph role="bascode" id="par_id321529005373289" 
xml-lang="en-US" localize="false">oLocElements() as Object,</paragraph>
-                    <paragraph role="bascode" id="par_id1001529005296415" 
xml-lang="en-US" localize="false">Optional sFiltername as String)</paragraph>
+                    <bascode>
+                        <paragraph role="bascode" id="par_id41529003225918" 
xml-lang="en-US" localize="false">Sub ShowElementNames(</paragraph>
+                        <paragraph role="bascode" id="par_id321529005373289" 
xml-lang="en-US" localize="false">oLocElements() as Object,</paragraph>
+                        <paragraph role="bascode" id="par_id1001529005296415" 
xml-lang="en-US" localize="false">Optional sFiltername as String)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -129,9 +147,11 @@
                 <tablecell>
                     <paragraph id="par_id851529003295045" role="tablecontent" 
xml-lang="en-US" localize="false">&apos; Retrieves all the supported 
servicenames of an object, with the </paragraph>
                     <paragraph role="tablecontent" id="par_id301529003401893" 
xml-lang="en-US" localize="false">&apos; possibility to define a filter(sfilter 
&lt;&gt; "")</paragraph>
-                    <paragraph role="bascode" id="par_id801529003393056" 
xml-lang="en-US" localize="false">Sub ShowSupportedServiceNames(</paragraph>
-                    <paragraph role="bascode" id="par_id101529005392934" 
xml-lang="en-US" localize="false">oLocObject as Object,</paragraph>
-                    <paragraph role="bascode" id="par_id661529005271095" 
xml-lang="en-US" localize="false">Optional sFilterName as String)</paragraph>
+                    <bascode>
+                        <paragraph role="bascode" id="par_id801529003393056" 
xml-lang="en-US" localize="false">Sub ShowSupportedServiceNames(</paragraph>
+                        <paragraph role="bascode" id="par_id101529005392934" 
xml-lang="en-US" localize="false">oLocObject as Object,</paragraph>
+                        <paragraph role="bascode" id="par_id661529005271095" 
xml-lang="en-US" localize="false">Optional sFilterName as String)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -141,9 +161,11 @@
                 <tablecell>
                     <paragraph role="tablecontent" id="par_id401529003494638" 
xml-lang="en-US" localize="false">&apos; Retrieves all the available 
Servicenames of an object, with the</paragraph>
                     <paragraph role="tablecontent" id="par_id801529003504707" 
xml-lang="en-US" localize="false">&apos; possibility to define a filter(sfilter 
&lt;&gt; "")</paragraph>
-                    <paragraph role="bascode" id="par_id981529005231465" 
xml-lang="en-US" localize="false">Sub ShowAvailableServiceNames(</paragraph>
-                    <paragraph role="bascode" id="par_id251529005237648" 
xml-lang="en-US" localize="false">oLocObject as Object, </paragraph>
-                    <paragraph role="bascode" id="par_id721529005247098" 
xml-lang="en-US" localize="false">Optional sFilterName as String)</paragraph>
+                    <bascode>
+                        <paragraph role="bascode" id="par_id981529005231465" 
xml-lang="en-US" localize="false">Sub ShowAvailableServiceNames(</paragraph>
+                        <paragraph role="bascode" id="par_id251529005237648" 
xml-lang="en-US" localize="false">oLocObject as Object, </paragraph>
+                        <paragraph role="bascode" id="par_id721529005247098" 
xml-lang="en-US" localize="false">Optional sFilterName as String)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -151,7 +173,9 @@
                     <paragraph id="par_id591529003562090" role="bascode" 
xml-lang="en-US" localize="false">ShowCommands</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id791529003562091" role="bascode" 
xml-lang="en-US" localize="false">Sub ShowCommands(oLocObject as 
Object)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id791529003562091" role="bascode" 
xml-lang="en-US" localize="false">Sub ShowCommands(oLocObject as 
Object)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -159,7 +183,9 @@
                     <paragraph id="par_id881529003602892" role="bascode" 
xml-lang="en-US" localize="false">ProtectCurrentSheets</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id531529003602892" role="bascode" 
xml-lang="en-US" localize="false">Sub ProtectCurrentSheets()</paragraph>
+                    <bascode>
+                        <paragraph id="par_id531529003602892" role="bascode" 
xml-lang="en-US" localize="false">Sub ProtectCurrentSheets()</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -167,7 +193,9 @@
                     <paragraph id="par_id691529003635074" role="bascode" 
xml-lang="en-US" localize="false">FillDocument</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id371529003635074" role="bascode" 
xml-lang="en-US" localize="false">Sub FillDocument()</paragraph>
+                    <bascode>
+                        <paragraph id="par_id371529003635074" role="bascode" 
xml-lang="en-US" localize="false">Sub FillDocument()</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
         </table>
@@ -200,11 +228,13 @@
                     <paragraph id="par_id801529006604779" role="bascode" 
xml-lang="en-US" localize="false">RegisterNewDataSource</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph role="bascode" id="par_id851529006689297" 
xml-lang="en-US" localize="false">Function RegisterNewDataSource(</paragraph>
-                    <paragraph role="bascode" id="par_id471529006695330" 
xml-lang="en-US" localize="false">DSName as  String, </paragraph>
-                    <paragraph role="bascode" id="par_id671529006700462" 
xml-lang="en-US" localize="false">PropertyList(), </paragraph>
-                    <paragraph role="bascode" id="par_id821529006705849" 
xml-lang="en-US" localize="false">Optional DriverProperties() </paragraph>
-                    <paragraph role="bascode" id="par_id321529061768930" 
xml-lang="en-US" localize="false">as New 
com.sun.star.beans.PropertyValue)</paragraph>
+                    <bascode>
+                        <paragraph role="bascode" id="par_id851529006689297" 
xml-lang="en-US" localize="false">Function RegisterNewDataSource(</paragraph>
+                        <paragraph role="bascode" id="par_id471529006695330" 
xml-lang="en-US" localize="false">DSName as  String, </paragraph>
+                        <paragraph role="bascode" id="par_id671529006700462" 
xml-lang="en-US" localize="false">PropertyList(), </paragraph>
+                        <paragraph role="bascode" id="par_id821529006705849" 
xml-lang="en-US" localize="false">Optional DriverProperties() </paragraph>
+                        <paragraph role="bascode" id="par_id321529061768930" 
xml-lang="en-US" localize="false">as New 
com.sun.star.beans.PropertyValue)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -212,13 +242,15 @@
                     <paragraph id="par_id501529006725521" role="bascode" 
xml-lang="en-US" localize="false">ConnecttoDatabase</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph role="bascode" id="par_id771529006782954" 
xml-lang="en-US" localize="false">Function ConnecttoDatabase(</paragraph>
-                    <paragraph role="bascode" id="par_id31529006789644" 
xml-lang="en-US" localize="false">DSName as String, </paragraph>
-                    <paragraph role="bascode" id="par_id421529006794640" 
xml-lang="en-US" localize="false">UserID as String, </paragraph>
-                    <paragraph role="bascode" id="par_id381529006799623" 
xml-lang="en-US" localize="false">Password as String, </paragraph>
-                    <paragraph role="bascode" id="par_id641529006805066" 
xml-lang="en-US" localize="false">Optional Propertylist(), </paragraph>
-                    <paragraph role="bascode" id="par_id201529006810077" 
xml-lang="en-US" localize="false">Optional DriverProperties() </paragraph>
-                    <paragraph role="bascode" id="par_id11529061810188" 
xml-lang="en-US" localize="false">as New 
com.sun.star.beans.PropertyValue)</paragraph>
+                    <bascode>
+                        <paragraph role="bascode" id="par_id771529006782954" 
xml-lang="en-US" localize="false">Function ConnecttoDatabase(</paragraph>
+                        <paragraph role="bascode" id="par_id31529006789644" 
xml-lang="en-US" localize="false">DSName as String, </paragraph>
+                        <paragraph role="bascode" id="par_id421529006794640" 
xml-lang="en-US" localize="false">UserID as String, </paragraph>
+                        <paragraph role="bascode" id="par_id381529006799623" 
xml-lang="en-US" localize="false">Password as String, </paragraph>
+                        <paragraph role="bascode" id="par_id641529006805066" 
xml-lang="en-US" localize="false">Optional Propertylist(), </paragraph>
+                        <paragraph role="bascode" id="par_id201529006810077" 
xml-lang="en-US" localize="false">Optional DriverProperties() </paragraph>
+                        <paragraph role="bascode" id="par_id11529061810188" 
xml-lang="en-US" localize="false">as New 
com.sun.star.beans.PropertyValue)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -226,8 +258,10 @@
                     <paragraph id="par_id411529006832985" role="bascode" 
xml-lang="en-US" localize="false">GetStarOfficeLocale</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id451529006832985" role="bascode" 
xml-lang="en-US" localize="false">Function GetStarOfficeLocale() </paragraph>
-                    <paragraph role="bascode" id="par_id761529061825013" 
xml-lang="en-US" localize="false">as New com.sun.star.lang.Locale</paragraph>
+                    <bascode>
+                        <paragraph id="par_id451529006832985" role="bascode" 
xml-lang="en-US" localize="false">Function GetStarOfficeLocale() </paragraph>
+                        <paragraph role="bascode" id="par_id761529061825013" 
xml-lang="en-US" localize="false">as New com.sun.star.lang.Locale</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -235,9 +269,11 @@
                     <paragraph id="par_id361529006902547" role="bascode" 
xml-lang="en-US" localize="false">GetRegistryKeyContent</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph role="bascode" id="par_id391529006938605" 
xml-lang="en-US" localize="false">Function GetRegistryKeyContent(</paragraph>
-                    <paragraph role="bascode" id="par_id881529006944515" 
xml-lang="en-US" localize="false">sKeyName as string, </paragraph>
-                    <paragraph role="bascode" id="par_id711529006950283" 
xml-lang="en-US" localize="false">Optional bforUpdate as Boolean)</paragraph>
+                    <bascode>
+                        <paragraph role="bascode" id="par_id391529006938605" 
xml-lang="en-US" localize="false">Function GetRegistryKeyContent(</paragraph>
+                        <paragraph role="bascode" id="par_id881529006944515" 
xml-lang="en-US" localize="false">sKeyName as string, </paragraph>
+                        <paragraph role="bascode" id="par_id711529006950283" 
xml-lang="en-US" localize="false">Optional bforUpdate as Boolean)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -245,7 +281,9 @@
                     <paragraph id="par_id851529006965105" role="bascode" 
xml-lang="en-US" localize="false">GetProductname</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id451529006965105" role="bascode" 
xml-lang="en-US" localize="false">Function GetProductname() as 
String</paragraph>
+                    <bascode>
+                        <paragraph id="par_id451529006965105" role="bascode" 
xml-lang="en-US" localize="false">Function GetProductname() as 
String</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -254,10 +292,12 @@
                 </tablecell>
                 <tablecell>
                     <paragraph role="tablecontent" id="par_id821529007072253" 
localize="false" xml-lang="en-US">&apos; Opens a Document, checks beforehand, 
whether it has to be loaded or whether it is already on the desktop. If the 
parameter bDisposable is set to False then then returned document should not be 
disposed afterwards, because it is already opened.</paragraph>
-                    <paragraph role="bascode" id="par_id991529007104165" 
xml-lang="en-US" localize="false">Function OpenDocument(</paragraph>
-                    <paragraph role="bascode" id="par_id191529007110562" 
xml-lang="en-US" localize="false">DocPath as String, </paragraph>
-                    <paragraph role="bascode" id="par_id851529007118783" 
xml-lang="en-US" localize="false">Args(), </paragraph>
-                    <paragraph role="bascode" id="par_id691529007123485" 
xml-lang="en-US" localize="false">Optional bDisposable as Boolean)</paragraph>
+                    <bascode>
+                        <paragraph role="bascode" id="par_id991529007104165" 
xml-lang="en-US" localize="false">Function OpenDocument(</paragraph>
+                        <paragraph role="bascode" id="par_id191529007110562" 
xml-lang="en-US" localize="false">DocPath as String, </paragraph>
+                        <paragraph role="bascode" id="par_id851529007118783" 
xml-lang="en-US" localize="false">Args(), </paragraph>
+                        <paragraph role="bascode" id="par_id691529007123485" 
xml-lang="en-US" localize="false">Optional bDisposable as Boolean)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -265,7 +305,9 @@
                     <paragraph id="par_id481529007130534" role="bascode" 
xml-lang="en-US" localize="false">TaskonDesktop</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id911529007130534" role="bascode" 
xml-lang="en-US" localize="false">Function TaskonDesktop(DocPath as String) as 
Boolean</paragraph>
+                    <bascode>
+                        <paragraph id="par_id911529007130534" role="bascode" 
xml-lang="en-US" localize="false">Function TaskonDesktop(DocPath as String) as 
Boolean</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -274,7 +316,9 @@
                 </tablecell>
                 <tablecell>
                     <paragraph role="tablecontent" id="par_id81529007245965" 
localize="false" xml-lang="en-US">&apos; Retrieves a FileName out of a 
StarOffice-Document</paragraph>
-                    <paragraph role="bascode" id="par_id881529007259806" 
xml-lang="en-US" localize="false">Function RetrieveFileName(LocDoc as 
Object)</paragraph>
+                    <bascode>
+                        <paragraph role="bascode" id="par_id881529007259806" 
xml-lang="en-US" localize="false">Function RetrieveFileName(LocDoc as 
Object)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -283,10 +327,12 @@
                 </tablecell>
                 <tablecell>
                     <paragraph role="tablecontent" localize="false" 
id="par_id801529007338550" xml-lang="en-US">&apos; Gets a special configured 
PathSetting</paragraph>
-                    <paragraph role="bascode" id="par_id971529007353940" 
xml-lang="en-US" localize="false">Function GetPathSettings(</paragraph>
-                    <paragraph role="bascode" id="par_id401529007360579" 
xml-lang="en-US" localize="false">sPathType as String,</paragraph>
-                    <paragraph role="bascode" id="par_id741529007366892" 
xml-lang="en-US" localize="false">Optional bshowall as Boolean, </paragraph>
-                    <paragraph role="bascode" id="par_id841529007371792" 
xml-lang="en-US" localize="false">Optional ListIndex as integer) as 
String</paragraph>
+                    <bascode>
+                        <paragraph role="bascode" id="par_id971529007353940" 
xml-lang="en-US" localize="false">Function GetPathSettings(</paragraph>
+                        <paragraph role="bascode" id="par_id401529007360579" 
xml-lang="en-US" localize="false">sPathType as String,</paragraph>
+                        <paragraph role="bascode" id="par_id741529007366892" 
xml-lang="en-US" localize="false">Optional bshowall as Boolean, </paragraph>
+                        <paragraph role="bascode" id="par_id841529007371792" 
xml-lang="en-US" localize="false">Optional ListIndex as integer) as 
String</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -295,9 +341,11 @@
                 </tablecell>
                 <tablecell>
                     <paragraph role="tablecontent" id="par_id761529007616982" 
localize="false" xml-lang="en-US">&apos; Gets the fully qualified path to a 
subdirectory of the Template Directory, e. g. with the parameter 
"wizard/bitmap"  The parameter must be passed over in Url-scription. The 
return-Value is in Urlscription</paragraph>
-                    <paragraph role="bascode" id="par_id981529007639916" 
xml-lang="en-US" localize="false">Function GetOfficeSubPath(</paragraph>
-                    <paragraph role="bascode" id="par_id21529007645780" 
xml-lang="en-US" localize="false">sOfficePath as String, </paragraph>
-                    <paragraph role="bascode" id="par_id201529007651880" 
xml-lang="en-US" localize="false">ByVal sSubDir as String)</paragraph>
+                    <bascode>
+                        <paragraph role="bascode" id="par_id981529007639916" 
xml-lang="en-US" localize="false">Function GetOfficeSubPath(</paragraph>
+                        <paragraph role="bascode" id="par_id21529007645780" 
xml-lang="en-US" localize="false">sOfficePath as String, </paragraph>
+                        <paragraph role="bascode" id="par_id201529007651880" 
xml-lang="en-US" localize="false">ByVal sSubDir as String)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -305,7 +353,9 @@
                     <paragraph id="par_id591529007658281" role="bascode" 
xml-lang="en-US" localize="false">ShowNoOfficePathError</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id511529007658281" role="bascode" 
xml-lang="en-US" localize="false">Sub ShowNoOfficePathError() </paragraph>
+                    <bascode>
+                        <paragraph id="par_id511529007658281" role="bascode" 
xml-lang="en-US" localize="false">Sub ShowNoOfficePathError() </paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -313,9 +363,11 @@
                     <paragraph id="par_id431529007692356" role="bascode" 
xml-lang="en-US" localize="false">InitResources</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id991529007692356" role="bascode" 
xml-lang="en-US" localize="false">Function InitResources(</paragraph>
-                    <paragraph role="bascode" id="par_id651529007767824" 
xml-lang="en-US" localize="false">Description, </paragraph>
-                    <paragraph role="bascode" id="par_id401529007773380" 
xml-lang="en-US" localize="false">ShortDescription as String) as 
boolean</paragraph>
+                    <bascode>
+                        <paragraph id="par_id991529007692356" role="bascode" 
xml-lang="en-US" localize="false">Function InitResources(</paragraph>
+                        <paragraph role="bascode" id="par_id651529007767824" 
xml-lang="en-US" localize="false">Description, </paragraph>
+                        <paragraph role="bascode" id="par_id401529007773380" 
xml-lang="en-US" localize="false">ShortDescription as String) as 
boolean</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -323,7 +375,9 @@
                     <paragraph id="par_id611529007790857" role="bascode" 
xml-lang="en-US" localize="false">GetResText</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id331529007790857" role="bascode" 
xml-lang="en-US" localize="false">Function GetResText( nID as integer ) As 
string</paragraph>
+                    <bascode>
+                        <paragraph id="par_id331529007790857" role="bascode" 
xml-lang="en-US" localize="false">Function GetResText( nID as integer ) As 
string</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -331,9 +385,11 @@
                     <paragraph id="par_id971529007839780" role="bascode" 
xml-lang="en-US" localize="false">CutPathView</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph role="bascode" id="par_id91529007882196" 
xml-lang="en-US" localize="false">Function CutPathView(</paragraph>
-                    <paragraph role="bascode" id="par_id211529007888525" 
xml-lang="en-US" localize="false">sDocUrl as String, </paragraph>
-                    <paragraph role="bascode" id="par_id361529007894202" 
xml-lang="en-US" localize="false">Optional PathLen as Integer)</paragraph>
+                    <bascode>
+                        <paragraph role="bascode" id="par_id91529007882196" 
xml-lang="en-US" localize="false">Function CutPathView(</paragraph>
+                        <paragraph role="bascode" id="par_id211529007888525" 
xml-lang="en-US" localize="false">sDocUrl as String, </paragraph>
+                        <paragraph role="bascode" id="par_id361529007894202" 
xml-lang="en-US" localize="false">Optional PathLen as Integer)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -342,9 +398,11 @@
                 </tablecell>
                 <tablecell>
                     <paragraph role="tablecontent" id="par_id311529007997114" 
localize="false" xml-lang="en-US">&apos; Deletes the content of all cells that 
are softformatted according to the &apos;InputStyleName&apos;</paragraph>
-                    <paragraph role="bascode" id="par_id111529008013953" 
xml-lang="en-US" localize="false">Sub DeleteInputCells(</paragraph>
-                    <paragraph role="bascode" id="par_id731529008019208" 
xml-lang="en-US" localize="false">oSheet as Object, </paragraph>
-                    <paragraph role="bascode" id="par_id881529008025944" 
xml-lang="en-US" localize="false">InputStyleName as String)</paragraph>
+                    <bascode>
+                        <paragraph role="bascode" id="par_id111529008013953" 
xml-lang="en-US" localize="false">Sub DeleteInputCells(</paragraph>
+                        <paragraph role="bascode" id="par_id731529008019208" 
xml-lang="en-US" localize="false">oSheet as Object, </paragraph>
+                        <paragraph role="bascode" id="par_id881529008025944" 
xml-lang="en-US" localize="false">InputStyleName as String)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -353,11 +411,13 @@
                 </tablecell>
                 <tablecell>
                     <paragraph role="tablecontent" id="par_id261529008090521" 
xml-lang="en-US" localize="false">&apos; Inserts a certain String to all cells 
of a Range that ist passed over either as an object or as the 
RangeName</paragraph>
-                    <paragraph role="bascode" id="par_id231529008110214" 
xml-lang="en-US" localize="false">Sub ChangeValueofRange(</paragraph>
-                    <paragraph role="bascode" id="par_id401529008116727" 
xml-lang="en-US" localize="false">oSheet as Object, </paragraph>
-                    <paragraph role="bascode" id="par_id211529008122524" 
xml-lang="en-US" localize="false">Range, </paragraph>
-                    <paragraph role="bascode" id="par_id91529008128202" 
xml-lang="en-US" localize="false">ReplaceValue, </paragraph>
-                    <paragraph role="bascode" id="par_id671529008133554" 
xml-lang="en-US" localize="false">Optional StyleName as String)</paragraph>
+                    <bascode>
+                        <paragraph role="bascode" id="par_id231529008110214" 
xml-lang="en-US" localize="false">Sub ChangeValueofRange(</paragraph>
+                        <paragraph role="bascode" id="par_id401529008116727" 
xml-lang="en-US" localize="false">oSheet as Object, </paragraph>
+                        <paragraph role="bascode" id="par_id211529008122524" 
xml-lang="en-US" localize="false">Range, </paragraph>
+                        <paragraph role="bascode" id="par_id91529008128202" 
xml-lang="en-US" localize="false">ReplaceValue, </paragraph>
+                        <paragraph role="bascode" id="par_id671529008133554" 
xml-lang="en-US" localize="false">Optional StyleName as String)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -365,9 +425,11 @@
                     <paragraph id="par_id061420180547275154" role="bascode" 
localize="false" xml-lang="en-US">ReplaceRangeValues</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061420180547275639" role="bascode" 
localize="false" xml-lang="en-US">Sub ReplaceRangeValues(</paragraph>
-                    <paragraph id="par_id061420180547279527" role="bascode" 
localize="false" xml-lang="en-US">oRange as Object, </paragraph>
-                    <paragraph id="par_id061420180547277" role="bascode" 
localize="false" xml-lang="en-US">ReplaceValue)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180547275639" 
role="bascode" localize="false" xml-lang="en-US">Sub 
ReplaceRangeValues(</paragraph>
+                        <paragraph id="par_id061420180547279527" 
role="bascode" localize="false" xml-lang="en-US">oRange as Object, </paragraph>
+                        <paragraph id="par_id061420180547277" role="bascode" 
localize="false" xml-lang="en-US">ReplaceValue)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -376,9 +438,11 @@
                 </tablecell>
                 <tablecell>
                     <paragraph id="par_id061420180547271480" 
role="tablecontent" xml-lang="en-US" localize="false">' Returns the Value of 
the first cell of a Range</paragraph>
-                    <paragraph id="par_id061420180547275293" role="bascode" 
localize="false" xml-lang="en-US">Function GetValueofCellbyName(</paragraph>
-                    <paragraph id="par_id061420180547274365" role="bascode" 
localize="false" xml-lang="en-US">oSheet as Object, </paragraph>
-                    <paragraph id="par_id061420180547272143" role="bascode" 
localize="false" xml-lang="en-US">sCellName as String)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180547275293" 
role="bascode" localize="false" xml-lang="en-US">Function 
GetValueofCellbyName(</paragraph>
+                        <paragraph id="par_id061420180547274365" 
role="bascode" localize="false" xml-lang="en-US">oSheet as Object, </paragraph>
+                        <paragraph id="par_id061420180547272143" 
role="bascode" localize="false" xml-lang="en-US">sCellName as 
String)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -386,9 +450,11 @@
                     <paragraph id="par_id061420180547273177" role="bascode" 
localize="false" xml-lang="en-US">DuplicateRow</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061420180547278695" role="bascode" 
localize="false" xml-lang="en-US">Function DuplicateRow(</paragraph>
-                    <paragraph id="par_id061420180547271430" role="bascode" 
localize="false" xml-lang="en-US">oSheet as Object, </paragraph>
-                    <paragraph id="par_id061420180547271882" role="bascode" 
localize="false" xml-lang="en-US">RangeName as String)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180547278695" 
role="bascode" localize="false" xml-lang="en-US">Function 
DuplicateRow(</paragraph>
+                        <paragraph id="par_id061420180547271430" 
role="bascode" localize="false" xml-lang="en-US">oSheet as Object, </paragraph>
+                        <paragraph id="par_id061420180547271882" 
role="bascode" localize="false" xml-lang="en-US">RangeName as 
String)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -397,9 +463,11 @@
                 </tablecell>
                 <tablecell>
                     <paragraph id="par_id061420180547275159" 
role="tablecontent" xml-lang="en-US" localize="false">' Returns the String of 
the first cell of a Range</paragraph>
-                    <paragraph id="par_id061420180547277611" role="bascode" 
localize="false" xml-lang="en-US">Function GetStringofCellbyName(</paragraph>
-                    <paragraph id="par_id061420180547271853" role="bascode" 
localize="false" xml-lang="en-US">oSheet as Object, </paragraph>
-                    <paragraph id="par_id061420180547277036" role="bascode" 
localize="false" xml-lang="en-US">sCellName as String)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180547277611" 
role="bascode" localize="false" xml-lang="en-US">Function 
GetStringofCellbyName(</paragraph>
+                        <paragraph id="par_id061420180547271853" 
role="bascode" localize="false" xml-lang="en-US">oSheet as Object, </paragraph>
+                        <paragraph id="par_id061420180547277036" 
role="bascode" localize="false" xml-lang="en-US">sCellName as 
String)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -408,9 +476,11 @@
                 </tablecell>
                 <tablecell>
                     <paragraph id="par_id061420180547271588" 
role="tablecontent" xml-lang="en-US" localize="false">' Returns a named 
Cell</paragraph>
-                    <paragraph id="par_id061420180547278497" role="bascode" 
localize="false" xml-lang="en-US">Function GetCellByName(</paragraph>
-                    <paragraph id="par_id061420180547284593" role="bascode" 
localize="false" xml-lang="en-US">oSheet as Object, </paragraph>
-                    <paragraph id="par_id061420180547285667" role="bascode" 
localize="false" xml-lang="en-US">sCellName as String) as Object</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180547278497" 
role="bascode" localize="false" xml-lang="en-US">Function 
GetCellByName(</paragraph>
+                        <paragraph id="par_id061420180547284593" 
role="bascode" localize="false" xml-lang="en-US">oSheet as Object, </paragraph>
+                        <paragraph id="par_id061420180547285667" 
role="bascode" localize="false" xml-lang="en-US">sCellName as String) as 
Object</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -419,9 +489,11 @@
                 </tablecell>
                 <tablecell>
                     <paragraph id="par_id061420180547288384" 
role="tablecontent" xml-lang="en-US" localize="false">' Changes the numeric 
Value of a cell by transmitting the String of the numeric Value</paragraph>
-                    <paragraph id="par_id061420180547287291" role="bascode" 
localize="false" xml-lang="en-US">Sub ChangeCellValue(</paragraph>
-                    <paragraph id="par_id061420180547287421" role="bascode" 
localize="false" xml-lang="en-US">oCell as Object, </paragraph>
-                    <paragraph id="par_id061420180547283866" role="bascode" 
localize="false" xml-lang="en-US">ValueString as String)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180547287291" 
role="bascode" localize="false" xml-lang="en-US">Sub 
ChangeCellValue(</paragraph>
+                        <paragraph id="par_id061420180547287421" 
role="bascode" localize="false" xml-lang="en-US">oCell as Object, </paragraph>
+                        <paragraph id="par_id061420180547283866" 
role="bascode" localize="false" xml-lang="en-US">ValueString as 
String)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -429,7 +501,9 @@
                     <paragraph id="par_id061420180547283259" role="bascode" 
localize="false" xml-lang="en-US">GetDocumentType</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061420180547286797" role="bascode" 
localize="false" xml-lang="en-US">Function 
GetDocumentType(oDocument)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180547286797" 
role="bascode" localize="false" xml-lang="en-US">Function 
GetDocumentType(oDocument)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -437,9 +511,11 @@
                     <paragraph id="par_id061420180547288146" role="bascode" 
localize="false" xml-lang="en-US">GetNumberFormatType</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061420180547285276" role="bascode" 
localize="false" xml-lang="en-US">Function GetNumberFormatType(</paragraph>
-                    <paragraph id="par_id061420180547282526" role="bascode" 
localize="false" xml-lang="en-US">oDocFormats, </paragraph>
-                    <paragraph id="par_id061420180547285804" role="bascode" 
localize="false" xml-lang="en-US">oFormatObject as Object) as 
Integer</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180547285276" 
role="bascode" localize="false" xml-lang="en-US">Function 
GetNumberFormatType(</paragraph>
+                        <paragraph id="par_id061420180547282526" 
role="bascode" localize="false" xml-lang="en-US">oDocFormats, </paragraph>
+                        <paragraph id="par_id061420180547285804" 
role="bascode" localize="false" xml-lang="en-US">oFormatObject as Object) as 
Integer</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -447,7 +523,9 @@
                     <paragraph id="par_id061420180547282335" role="bascode" 
localize="false" xml-lang="en-US">ProtectSheets</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061420180547283563" role="bascode" 
localize="false" xml-lang="en-US">Sub ProtectSheets(Optional oSheets as 
Object)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180547283563" 
role="bascode" localize="false" xml-lang="en-US">Sub ProtectSheets(Optional 
oSheets as Object)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -455,7 +533,9 @@
                     <paragraph id="par_id061420180547285130" role="bascode" 
localize="false" xml-lang="en-US">UnprotectSheets</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061420180547289761" role="bascode" 
localize="false" xml-lang="en-US">Sub UnprotectSheets(Optional oSheets as 
Object)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180547289761" 
role="bascode" localize="false" xml-lang="en-US">Sub UnprotectSheets(Optional 
oSheets as Object)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -463,9 +543,11 @@
                     <paragraph id="par_id061420180547284142" role="bascode" 
localize="false" xml-lang="en-US">GetRowIndex</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061420180547284432" role="bascode" 
localize="false" xml-lang="en-US">Function GetRowIndex(</paragraph>
-                    <paragraph id="par_id061420180547284492" role="bascode" 
localize="false" xml-lang="en-US">oSheet as Object, </paragraph>
-                    <paragraph id="par_id061420180547288316" role="bascode" 
localize="false" xml-lang="en-US">RowName as String)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180547284432" 
role="bascode" localize="false" xml-lang="en-US">Function 
GetRowIndex(</paragraph>
+                        <paragraph id="par_id061420180547284492" 
role="bascode" localize="false" xml-lang="en-US">oSheet as Object, </paragraph>
+                        <paragraph id="par_id061420180547288316" 
role="bascode" localize="false" xml-lang="en-US">RowName as String)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -473,9 +555,11 @@
                     <paragraph id="par_id061420180547284556" role="bascode" 
localize="false" xml-lang="en-US">GetColumnIndex</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061420180547285812" role="bascode" 
localize="false" xml-lang="en-US">Function GetColumnIndex(</paragraph>
-                    <paragraph id="par_id061420180547287653" role="bascode" 
localize="false" xml-lang="en-US">oSheet as Object, </paragraph>
-                    <paragraph id="par_id061420180547285010" role="bascode" 
localize="false" xml-lang="en-US">ColName as String)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180547285812" 
role="bascode" localize="false" xml-lang="en-US">Function 
GetColumnIndex(</paragraph>
+                        <paragraph id="par_id061420180547287653" 
role="bascode" localize="false" xml-lang="en-US">oSheet as Object, </paragraph>
+                        <paragraph id="par_id061420180547285010" 
role="bascode" localize="false" xml-lang="en-US">ColName as String)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -483,11 +567,13 @@
                     <paragraph id="par_id061420180547285141" role="bascode" 
localize="false" xml-lang="en-US">CopySheetbyName</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061420180547284524" role="bascode" 
localize="false" xml-lang="en-US">Function CopySheetbyName(</paragraph>
-                    <paragraph id="par_id061420180547286144" role="bascode" 
localize="false" xml-lang="en-US">oSheets as Object, </paragraph>
-                    <paragraph id="par_id061420180547289148" role="bascode" 
localize="false" xml-lang="en-US">OldName as String, </paragraph>
-                    <paragraph id="par_id061420180547287225" role="bascode" 
localize="false" xml-lang="en-US">NewName as String, </paragraph>
-                    <paragraph id="par_id061420180547299943" role="bascode" 
localize="false" xml-lang="en-US">DestPos as Integer) as Object</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180547284524" 
role="bascode" localize="false" xml-lang="en-US">Function 
CopySheetbyName(</paragraph>
+                        <paragraph id="par_id061420180547286144" 
role="bascode" localize="false" xml-lang="en-US">oSheets as Object, </paragraph>
+                        <paragraph id="par_id061420180547289148" 
role="bascode" localize="false" xml-lang="en-US">OldName as String, </paragraph>
+                        <paragraph id="par_id061420180547287225" 
role="bascode" localize="false" xml-lang="en-US">NewName as String, </paragraph>
+                        <paragraph id="par_id061420180547299943" 
role="bascode" localize="false" xml-lang="en-US">DestPos as Integer) as 
Object</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -496,7 +582,9 @@
                 </tablecell>
                 <tablecell>
                     <paragraph id="par_id061420180547292068" 
role="tablecontent" xml-lang="en-US" localize="false">' Dis-or enables a Window 
and adjusts the mousepointer accordingly</paragraph>
-                    <paragraph id="par_id061420180547296555" role="bascode" 
localize="false" xml-lang="en-US">Sub ToggleWindow(bDoEnable as 
Boolean)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180547296555" 
role="bascode" localize="false" xml-lang="en-US">Sub ToggleWindow(bDoEnable as 
Boolean)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -504,10 +592,12 @@
                     <paragraph id="par_id061420180547294361" role="bascode" 
localize="false" xml-lang="en-US">CheckNewSheetname</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061420180547292565" role="bascode" 
localize="false" xml-lang="en-US">Function CheckNewSheetname(</paragraph>
-                    <paragraph id="par_id061420180547293242" role="bascode" 
localize="false" xml-lang="en-US">oSheets as Object, </paragraph>
-                    <paragraph id="par_id061420180547297240" role="bascode" 
localize="false" xml-lang="en-US">Sheetname as String, </paragraph>
-                    <paragraph id="par_id061420180547294328" role="bascode" 
localize="false" xml-lang="en-US">Optional oLocale) as String</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180547292565" 
role="bascode" localize="false" xml-lang="en-US">Function 
CheckNewSheetname(</paragraph>
+                        <paragraph id="par_id061420180547293242" 
role="bascode" localize="false" xml-lang="en-US">oSheets as Object, </paragraph>
+                        <paragraph id="par_id061420180547297240" 
role="bascode" localize="false" xml-lang="en-US">Sheetname as String, 
</paragraph>
+                        <paragraph id="par_id061420180547294328" 
role="bascode" localize="false" xml-lang="en-US">Optional oLocale) as 
String</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -515,9 +605,11 @@
                     <paragraph id="par_id061420180547298278" role="bascode" 
localize="false" xml-lang="en-US">AddNewSheetName</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061420180547299974" role="bascode" 
localize="false" xml-lang="en-US">Sub AddNewSheetName(</paragraph>
-                    <paragraph id="par_id061420180547292009" role="bascode" 
localize="false" xml-lang="en-US">oSheets as Object, </paragraph>
-                    <paragraph id="par_id061420180547293223" role="bascode" 
localize="false" xml-lang="en-US">ByVal SheetName as String)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180547299974" 
role="bascode" localize="false" xml-lang="en-US">Sub 
AddNewSheetName(</paragraph>
+                        <paragraph id="par_id061420180547292009" 
role="bascode" localize="false" xml-lang="en-US">oSheets as Object, </paragraph>
+                        <paragraph id="par_id061420180547293223" 
role="bascode" localize="false" xml-lang="en-US">ByVal SheetName as 
String)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -525,7 +617,9 @@
                     <paragraph id="par_id061420180547293964" role="bascode" 
localize="false" xml-lang="en-US">GetSheetIndex</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id06142018054729713" role="bascode" 
localize="false" xml-lang="en-US">Function GetSheetIndex(oSheets, sName) as 
Integer</paragraph>
+                    <bascode>
+                        <paragraph id="par_id06142018054729713" role="bascode" 
localize="false" xml-lang="en-US">Function GetSheetIndex(oSheets, sName) as 
Integer</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -533,7 +627,9 @@
                     <paragraph id="par_id061420180547298034" role="bascode" 
localize="false" xml-lang="en-US">GetLastUsedRow</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061420180547299520" role="bascode" 
localize="false" xml-lang="en-US">Function GetLastUsedRow(oSheet as Object) as 
Integer</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180547299520" 
role="bascode" localize="false" xml-lang="en-US">Function GetLastUsedRow(oSheet 
as Object) as Integer</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -542,10 +638,12 @@
                 </tablecell>
                 <tablecell>
                     <paragraph id="par_id061420180547295117" 
role="tablecontent" xml-lang="en-US" localize="false">' Note To set a one lined 
frame you have to set the inner width to 0 In the API all Units that refer to 
pt-Heights are "1/100mm" The convert factor from 1pt to 1/100 mm is 
approximately 35 </paragraph>
-                    <paragraph id="par_id061420180547295225" role="bascode" 
localize="false" xml-lang="en-US">Function ModifyBorderLineWidth(</paragraph>
-                    <paragraph id="par_id061420180547292084" role="bascode" 
localize="false" xml-lang="en-US">ByVal oStyleBorder, </paragraph>
-                    <paragraph id="par_id061420180547292560" role="bascode" 
localize="false" xml-lang="en-US">iInnerLineWidth as Integer, </paragraph>
-                    <paragraph id="par_id061420180547295476" role="bascode" 
localize="false" xml-lang="en-US">iOuterLineWidth as Integer)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180547295225" 
role="bascode" localize="false" xml-lang="en-US">Function 
ModifyBorderLineWidth(</paragraph>
+                        <paragraph id="par_id061420180547292084" 
role="bascode" localize="false" xml-lang="en-US">ByVal oStyleBorder, 
</paragraph>
+                        <paragraph id="par_id061420180547292560" 
role="bascode" localize="false" xml-lang="en-US">iInnerLineWidth as Integer, 
</paragraph>
+                        <paragraph id="par_id061420180547295476" 
role="bascode" localize="false" xml-lang="en-US">iOuterLineWidth as 
Integer)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -553,10 +651,12 @@
                     <paragraph id="par_id06142018054729303" role="bascode" 
localize="false" xml-lang="en-US">AttachBasicMacroToEvent</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061420180547296417" role="bascode" 
localize="false" xml-lang="en-US">Sub AttachBasicMacroToEvent(</paragraph>
-                    <paragraph id="par_id061420180547292774" role="bascode" 
localize="false" xml-lang="en-US">oDocument as Object, </paragraph>
-                    <paragraph id="par_id061420180547291074" role="bascode" 
localize="false" xml-lang="en-US">EventName as String, </paragraph>
-                    <paragraph id="par_id061420180547293426" role="bascode" 
localize="false" xml-lang="en-US">SubPath as String)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180547296417" 
role="bascode" localize="false" xml-lang="en-US">Sub 
AttachBasicMacroToEvent(</paragraph>
+                        <paragraph id="par_id061420180547292774" 
role="bascode" localize="false" xml-lang="en-US">oDocument as Object, 
</paragraph>
+                        <paragraph id="par_id061420180547291074" 
role="bascode" localize="false" xml-lang="en-US">EventName as String, 
</paragraph>
+                        <paragraph id="par_id061420180547293426" 
role="bascode" localize="false" xml-lang="en-US">SubPath as String)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -564,10 +664,12 @@
                     <paragraph id="par_id061420180547308735" role="bascode" 
localize="false" xml-lang="en-US">ModifyPropertyValue</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061420180547306755" role="bascode" 
localize="false" xml-lang="en-US">Function ModifyPropertyValue(</paragraph>
-                    <paragraph id="par_id061420180547304617" role="bascode" 
localize="false" xml-lang="en-US">oContent() as New 
com.sun.star.beans.PropertyValue, </paragraph>
-                    <paragraph id="par_id061420180547301558" role="bascode" 
localize="false" xml-lang="en-US">TargetProperties() </paragraph>
-                    <paragraph role="bascode" id="par_id941529062083471" 
xml-lang="en-US" localize="false">as New 
com.sun.star.beans.PropertyValue)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180547306755" 
role="bascode" localize="false" xml-lang="en-US">Function 
ModifyPropertyValue(</paragraph>
+                        <paragraph id="par_id061420180547304617" 
role="bascode" localize="false" xml-lang="en-US">oContent() as New 
com.sun.star.beans.PropertyValue, </paragraph>
+                        <paragraph id="par_id061420180547301558" 
role="bascode" localize="false" xml-lang="en-US">TargetProperties() </paragraph>
+                        <paragraph role="bascode" id="par_id941529062083471" 
xml-lang="en-US" localize="false">as New 
com.sun.star.beans.PropertyValue)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -575,10 +677,12 @@
                     <paragraph id="par_id06142018054730528" role="bascode" 
localize="false" xml-lang="en-US">GetPropertyValueIndex</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061420180547304668" role="bascode" 
localize="false" xml-lang="en-US">Function GetPropertyValueIndex(</paragraph>
-                    <paragraph id="par_id061420180547302428" role="bascode" 
localize="false" xml-lang="en-US">SearchName as String, </paragraph>
-                    <paragraph id="par_id061420180547306561" role="bascode" 
localize="false" xml-lang="en-US">TargetProperties() </paragraph>
-                    <paragraph role="bascode" id="par_id971529062111510" 
xml-lang="en-US" localize="false">as New com.sun.star.beans.PropertyValue ) as 
Integer</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180547304668" 
role="bascode" localize="false" xml-lang="en-US">Function 
GetPropertyValueIndex(</paragraph>
+                        <paragraph id="par_id061420180547302428" 
role="bascode" localize="false" xml-lang="en-US">SearchName as String, 
</paragraph>
+                        <paragraph id="par_id061420180547306561" 
role="bascode" localize="false" xml-lang="en-US">TargetProperties() </paragraph>
+                        <paragraph role="bascode" id="par_id971529062111510" 
xml-lang="en-US" localize="false">as New com.sun.star.beans.PropertyValue ) as 
Integer</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -586,7 +690,9 @@
                     <paragraph id="par_id061420180547305379" role="bascode" 
localize="false" xml-lang="en-US">DispatchSlot</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061420180547302087" role="bascode" 
localize="false" xml-lang="en-US">Sub DispatchSlot(SlotID as 
Integer)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180547302087" 
role="bascode" localize="false" xml-lang="en-US">Sub DispatchSlot(SlotID as 
Integer)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -595,7 +701,9 @@
                 </tablecell>
                 <tablecell>
                     <paragraph id="par_id061420180547306757" 
role="tablecontent" xml-lang="en-US" localize="false">'returns the type of the 
office application FatOffice = 0, WebTop = 1 This routine has to be changed if 
the Product Name is being changed! </paragraph>
-                    <paragraph id="par_id061420180547302561" role="bascode" 
localize="false" xml-lang="en-US">Function IsFatOffice() As Boolean</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180547302561" 
role="bascode" localize="false" xml-lang="en-US">Function IsFatOffice() As 
Boolean</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -603,9 +711,11 @@
                     <paragraph id="par_id06142018054730408" role="bascode" 
localize="false" xml-lang="en-US">GetLocale</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061420180547306751" role="bascode" 
localize="false" xml-lang="en-US">Function GetLocale(</paragraph>
-                    <paragraph id="par_id061420180547302792" role="bascode" 
localize="false" xml-lang="en-US">sLanguage as String, </paragraph>
-                    <paragraph id="par_id061420180547307976" role="bascode" 
localize="false" xml-lang="en-US">sCountry as String)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180547306751" 
role="bascode" localize="false" xml-lang="en-US">Function GetLocale(</paragraph>
+                        <paragraph id="par_id061420180547302792" 
role="bascode" localize="false" xml-lang="en-US">sLanguage as String, 
</paragraph>
+                        <paragraph id="par_id061420180547307976" 
role="bascode" localize="false" xml-lang="en-US">sCountry as String)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -613,7 +723,9 @@
                     <paragraph id="par_id061420180547305357" role="bascode" 
localize="false" xml-lang="en-US">ToggleDesignMode</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061420180547301559" role="bascode" 
localize="false" xml-lang="en-US">Sub ToggleDesignMode(oDocument as 
Object)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180547301559" 
role="bascode" localize="false" xml-lang="en-US">Sub ToggleDesignMode(oDocument 
as Object)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -621,7 +733,9 @@
                     <paragraph id="par_id061420180547301521" role="bascode" 
localize="false" xml-lang="en-US">isHighContrast</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061420180547302307" role="bascode" 
localize="false" xml-lang="en-US">Function isHighContrast(oPeer as 
Object)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180547302307" 
role="bascode" localize="false" xml-lang="en-US">Function isHighContrast(oPeer 
as Object)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -629,9 +743,11 @@
                     <paragraph id="par_id061420180547302524" role="bascode" 
localize="false" xml-lang="en-US">CreateNewDocument</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061420180547302408" role="bascode" 
localize="false" xml-lang="en-US">Function CreateNewDocument(</paragraph>
-                    <paragraph id="par_id061420180547306406" role="bascode" 
localize="false" xml-lang="en-US">sType as String, </paragraph>
-                    <paragraph id="par_id061420180547302638" role="bascode" 
localize="false" xml-lang="en-US">Optional sAddMsg as String) as 
Object</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180547302408" 
role="bascode" localize="false" xml-lang="en-US">Function 
CreateNewDocument(</paragraph>
+                        <paragraph id="par_id061420180547306406" 
role="bascode" localize="false" xml-lang="en-US">sType as String, </paragraph>
+                        <paragraph id="par_id061420180547302638" 
role="bascode" localize="false" xml-lang="en-US">Optional sAddMsg as String) as 
Object</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -640,7 +756,9 @@
                 </tablecell>
                 <tablecell>
                     <paragraph id="par_id061420180547308844" 
role="tablecontent" localize="false" xml-lang="en-US">' This Sub has been used 
in order to ensure that after disposing a document from the backing window it 
is returned to the backing window, so the office won't be closed</paragraph>
-                    <paragraph id="par_id061420180547301077" role="bascode" 
localize="false" xml-lang="en-US">Sub DisposeDocument(oDocument as 
Object)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180547301077" 
role="bascode" localize="false" xml-lang="en-US">Sub DisposeDocument(oDocument 
as Object)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -649,8 +767,10 @@
                 </tablecell>
                 <tablecell>
                     <paragraph id="par_id061420180547311590" 
role="tablecontent" xml-lang="en-US" localize="false">'Function to calculate if 
the year is a leap year</paragraph>
-                    <paragraph id="par_id061420180547311314" role="bascode" 
localize="false" xml-lang="en-US">Function CalIsLeapYear(</paragraph>
-                    <paragraph role="bascode" id="par_id401529062200648" 
xml-lang="en-US" localize="false">ByVal iYear as Integer) as Boolean</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180547311314" 
role="bascode" localize="false" xml-lang="en-US">Function 
CalIsLeapYear(</paragraph>
+                        <paragraph role="bascode" id="par_id401529062200648" 
xml-lang="en-US" localize="false">ByVal iYear as Integer) as Boolean</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
         </table>
@@ -679,9 +799,11 @@
                     <paragraph id="par_id061520180728405899" 
role="tablecontent" localize="false" xml-lang="en-US">' Parameters:</paragraph>
                     <paragraph id="par_id061520180728401929" 
role="tablecontent" localize="false" xml-lang="en-US">' The 'oContainer' is the 
Document or a specific sheet of a Calc - Document</paragraph>
                     <paragraph id="par_id061520180728406561" 
role="tablecontent" localize="false" xml-lang="en-US">' 'CName' is the Name of 
the Control</paragraph>
-                    <paragraph id="par_id061520180728403658" role="bascode" 
localize="false" xml-lang="en-US">Function GetControlShape(</paragraph>
-                    <paragraph role="bascode" id="par_id731529060754496" 
xml-lang="en-US" localize="false">oContainer as Object,</paragraph>
-                    <paragraph role="bascode" id="par_id571529060764136" 
xml-lang="en-US" localize="false">CName as String)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061520180728403658" 
role="bascode" localize="false" xml-lang="en-US">Function 
GetControlShape(</paragraph>
+                        <paragraph role="bascode" id="par_id731529060754496" 
xml-lang="en-US" localize="false">oContainer as Object,</paragraph>
+                        <paragraph role="bascode" id="par_id571529060764136" 
xml-lang="en-US" localize="false">CName as String)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -694,10 +816,12 @@
                     <paragraph id="par_id061520180728407354" 
role="tablecontent" localize="false" xml-lang="en-US">' The 'oContainer' is the 
Document or a specific sheet of a Calc - Document</paragraph>
                     <paragraph id="par_id061520180728407546" 
role="tablecontent" localize="false" xml-lang="en-US">' The 'oController' is 
always directly attached to the Document</paragraph>
                     <paragraph id="par_id061520180728401894" 
role="tablecontent" localize="false" xml-lang="en-US">' 'CName' is the Name of 
the Control</paragraph>
-                    <paragraph id="par_id061520180728405914" role="bascode" 
localize="false" xml-lang="en-US">Function getControlView(</paragraph>
-                    <paragraph role="bascode" id="par_id431529060800677" 
xml-lang="en-US" localize="false">oContainer , </paragraph>
-                    <paragraph role="bascode" id="par_id471529060805433" 
xml-lang="en-US" localize="false">oController as Object, </paragraph>
-                    <paragraph role="bascode" id="par_id501529060820866" 
xml-lang="en-US" localize="false">CName as String) as Object</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061520180728405914" 
role="bascode" localize="false" xml-lang="en-US">Function 
getControlView(</paragraph>
+                        <paragraph role="bascode" id="par_id431529060800677" 
xml-lang="en-US" localize="false">oContainer , </paragraph>
+                        <paragraph role="bascode" id="par_id471529060805433" 
xml-lang="en-US" localize="false">oController as Object, </paragraph>
+                        <paragraph role="bascode" id="par_id501529060820866" 
xml-lang="en-US" localize="false">CName as String) as Object</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -708,9 +832,11 @@
                     <paragraph id="par_id061520180728406445" 
role="tablecontent" localize="false" xml-lang="en-US">' Parameters:</paragraph>
                     <paragraph id="par_id061520180728405024" 
role="tablecontent" localize="false" xml-lang="en-US">' The 'oContainer' is the 
Document or a specific sheet of a Calc - Document</paragraph>
                     <paragraph id="par_id061520180728403834" 
role="tablecontent" localize="false" xml-lang="en-US">' 'CName' is the Name of 
the Control</paragraph>
-                    <paragraph id="par_id061520180728406007" role="bascode" 
localize="false" xml-lang="en-US">Function DisposeControl(</paragraph>
-                    <paragraph role="bascode" id="par_id161529060860526" 
xml-lang="en-US" localize="false">oContainer as Object, </paragraph>
-                    <paragraph role="bascode" id="par_id311529060865820" 
xml-lang="en-US" localize="false">CName as String) as Boolean</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061520180728406007" 
role="bascode" localize="false" xml-lang="en-US">Function 
DisposeControl(</paragraph>
+                        <paragraph role="bascode" id="par_id161529060860526" 
xml-lang="en-US" localize="false">oContainer as Object, </paragraph>
+                        <paragraph role="bascode" id="par_id311529060865820" 
xml-lang="en-US" localize="false">CName as String) as Boolean</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -721,9 +847,11 @@
                     <paragraph id="par_id061520180728404727" 
role="tablecontent" localize="false" xml-lang="en-US">' Returns a sequence of a 
group of controls like option buttons or checkboxes</paragraph>
                     <paragraph id="par_id061520180728404702" 
role="tablecontent" localize="false" xml-lang="en-US">' The 'oContainer' is the 
Document or a specific sheet of a Calc - Document</paragraph>
                     <paragraph id="par_id061520180728402498" 
role="tablecontent" localize="false" xml-lang="en-US">' 'sGroupName' is the 
Name of the Controlgroup</paragraph>
-                    <paragraph id="par_id061520180728405097" role="bascode" 
localize="false" xml-lang="en-US">Function GetControlGroupModel(</paragraph>
-                    <paragraph role="bascode" id="par_id271529060883844" 
xml-lang="en-US" localize="false">oContainer as Object, </paragraph>
-                    <paragraph role="bascode" id="par_id131529060888366" 
xml-lang="en-US" localize="false">sGroupName as String )</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061520180728405097" 
role="bascode" localize="false" xml-lang="en-US">Function 
GetControlGroupModel(</paragraph>
+                        <paragraph role="bascode" id="par_id271529060883844" 
xml-lang="en-US" localize="false">oContainer as Object, </paragraph>
+                        <paragraph role="bascode" id="par_id131529060888366" 
xml-lang="en-US" localize="false">sGroupName as String )</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -733,8 +861,10 @@
                 <tablecell>
                     <paragraph id="par_id06152018072840427" 
role="tablecontent" localize="false" xml-lang="en-US">' Returns the 
Referencevalue of a group of e.g. option buttons or check boxes</paragraph>
                     <paragraph id="par_id061520180728401645" 
role="tablecontent" localize="false" xml-lang="en-US">' 'oControlGroup' is a 
sequence of the Control objects</paragraph>
-                    <paragraph id="par_id061520180728405216" role="bascode" 
localize="false" xml-lang="en-US">Function GetRefValue(</paragraph>
-                    <paragraph role="bascode" id="par_id311529060906785" 
xml-lang="en-US" localize="false">oControlGroup() as Object)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061520180728405216" 
role="bascode" localize="false" xml-lang="en-US">Function 
GetRefValue(</paragraph>
+                        <paragraph role="bascode" id="par_id311529060906785" 
xml-lang="en-US" localize="false">oControlGroup() as Object)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -742,9 +872,11 @@
                     <paragraph id="par_id06152018072841458" role="bascode" 
localize="false" xml-lang="en-US">GetRefValueOfControlGroup</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061520180728415365" role="bascode" 
localize="false" xml-lang="en-US">Function 
GetRefValueOfControlGroup(</paragraph>
-                    <paragraph id="par_id061520180728416461" role="bascode" 
localize="false" xml-lang="en-US">oContainer as Object, </paragraph>
-                    <paragraph id="par_id061520180728413768" role="bascode" 
localize="false" xml-lang="en-US">GroupName as String)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061520180728415365" 
role="bascode" localize="false" xml-lang="en-US">Function 
GetRefValueOfControlGroup(</paragraph>
+                        <paragraph id="par_id061520180728416461" 
role="bascode" localize="false" xml-lang="en-US">oContainer as Object, 
</paragraph>
+                        <paragraph id="par_id061520180728413768" 
role="bascode" localize="false" xml-lang="en-US">GroupName as 
String)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -752,9 +884,11 @@
                     <paragraph id="par_id061520180728416653" role="bascode" 
localize="false" xml-lang="en-US">GetOptionGroupValue</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061520180728411484" role="bascode" 
localize="false" xml-lang="en-US">Function GetOptionGroupValue(</paragraph>
-                    <paragraph id="par_id061520180728412653" role="bascode" 
localize="false" xml-lang="en-US">oContainer as Object, </paragraph>
-                    <paragraph id="par_id061520180728413045" role="bascode" 
localize="false" xml-lang="en-US">OptGroupName as String) as Boolean</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061520180728411484" 
role="bascode" localize="false" xml-lang="en-US">Function 
GetOptionGroupValue(</paragraph>
+                        <paragraph id="par_id061520180728412653" 
role="bascode" localize="false" xml-lang="en-US">oContainer as Object, 
</paragraph>
+                        <paragraph id="par_id061520180728413045" 
role="bascode" localize="false" xml-lang="en-US">OptGroupName as String) as 
Boolean</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -762,11 +896,13 @@
                     <paragraph id="par_id061520180728419761" role="bascode" 
localize="false" xml-lang="en-US">WriteOptValueToCell</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061520180728414297" role="bascode" 
localize="false" xml-lang="en-US">Function WriteOptValueToCell(</paragraph>
-                    <paragraph id="par_id061520180728414871" role="bascode" 
localize="false" xml-lang="en-US">oSheet as Object, </paragraph>
-                    <paragraph id="par_id061520180728416273" role="bascode" 
localize="false" xml-lang="en-US">OptGroupName as String, </paragraph>
-                    <paragraph id="par_id061520180728411892" role="bascode" 
localize="false" xml-lang="en-US">iCol as Integer, </paragraph>
-                    <paragraph id="par_id061520180728411133" role="bascode" 
localize="false" xml-lang="en-US">iRow as Integer) as Boolean</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061520180728414297" 
role="bascode" localize="false" xml-lang="en-US">Function 
WriteOptValueToCell(</paragraph>
+                        <paragraph id="par_id061520180728414871" 
role="bascode" localize="false" xml-lang="en-US">oSheet as Object, </paragraph>
+                        <paragraph id="par_id061520180728416273" 
role="bascode" localize="false" xml-lang="en-US">OptGroupName as String, 
</paragraph>
+                        <paragraph id="par_id061520180728411892" 
role="bascode" localize="false" xml-lang="en-US">iCol as Integer, </paragraph>
+                        <paragraph id="par_id061520180728411133" 
role="bascode" localize="false" xml-lang="en-US">iRow as Integer) as 
Boolean</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -774,10 +910,12 @@
                     <paragraph id="par_id061520180728411084" role="bascode" 
localize="false" xml-lang="en-US">LoadDialog</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061520180728416215" role="bascode" 
localize="false" xml-lang="en-US">Function LoadDialog(</paragraph>
-                    <paragraph id="par_id061520180728415374" role="bascode" 
localize="false" xml-lang="en-US">Libname as String, </paragraph>
-                    <paragraph id="par_id061520180728411337" role="bascode" 
localize="false" xml-lang="en-US">DialogName as String, </paragraph>
-                    <paragraph id="par_id061520180728412212" role="bascode" 
localize="false" xml-lang="en-US">Optional oLibContainer)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061520180728416215" 
role="bascode" localize="false" xml-lang="en-US">Function 
LoadDialog(</paragraph>
+                        <paragraph id="par_id061520180728415374" 
role="bascode" localize="false" xml-lang="en-US">Libname as String, </paragraph>
+                        <paragraph id="par_id061520180728411337" 
role="bascode" localize="false" xml-lang="en-US">DialogName as String, 
</paragraph>
+                        <paragraph id="par_id061520180728412212" 
role="bascode" localize="false" xml-lang="en-US">Optional 
oLibContainer)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -785,7 +923,9 @@
                     <paragraph id="par_id061520180728417528" role="bascode" 
localize="false" xml-lang="en-US">GetFolderName</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061520180728414273" role="bascode" 
localize="false" xml-lang="en-US">Sub GetFolderName(oRefModel as 
Object)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061520180728414273" 
role="bascode" localize="false" xml-lang="en-US">Sub GetFolderName(oRefModel as 
Object)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -793,9 +933,11 @@
                     <paragraph id="par_id061520180728412942" role="bascode" 
localize="false" xml-lang="en-US">GetFileName</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061520180728416696" role="bascode" 
localize="false" xml-lang="en-US">Sub GetFileName(</paragraph>
-                    <paragraph id="par_id061520180728417082" role="bascode" 
localize="false" xml-lang="en-US">oRefModel as Object, </paragraph>
-                    <paragraph id="par_id061520180728418718" role="bascode" 
localize="false" xml-lang="en-US">Filternames())</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061520180728416696" 
role="bascode" localize="false" xml-lang="en-US">Sub GetFileName(</paragraph>
+                        <paragraph id="par_id061520180728417082" 
role="bascode" localize="false" xml-lang="en-US">oRefModel as Object, 
</paragraph>
+                        <paragraph id="par_id061520180728418718" 
role="bascode" localize="false" xml-lang="en-US">Filternames())</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -803,12 +945,14 @@
                     <paragraph id="par_id061520180728414394" role="bascode" 
localize="false" xml-lang="en-US">StoreDocument</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061520180728415594" role="bascode" 
localize="false" xml-lang="en-US">Function StoreDocument(</paragraph>
-                    <paragraph id="par_id061520180728417685" role="bascode" 
localize="false" xml-lang="en-US">oDocument as Object, </paragraph>
-                    <paragraph id="par_id061520180728416184" role="bascode" 
localize="false" xml-lang="en-US">FilterNames() as String, </paragraph>
-                    <paragraph id="par_id061520180728414290" role="bascode" 
localize="false" xml-lang="en-US">DefaultName as String, </paragraph>
-                    <paragraph id="par_id061520180728419279" role="bascode" 
localize="false" xml-lang="en-US">DisplayDirectory as String, </paragraph>
-                    <paragraph id="par_id061520180728421914" role="bascode" 
localize="false" xml-lang="en-US">Optional iAddProcedure as Integer) as 
String</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061520180728415594" 
role="bascode" localize="false" xml-lang="en-US">Function 
StoreDocument(</paragraph>
+                        <paragraph id="par_id061520180728417685" 
role="bascode" localize="false" xml-lang="en-US">oDocument as Object, 
</paragraph>
+                        <paragraph id="par_id061520180728416184" 
role="bascode" localize="false" xml-lang="en-US">FilterNames() as String, 
</paragraph>
+                        <paragraph id="par_id061520180728414290" 
role="bascode" localize="false" xml-lang="en-US">DefaultName as String, 
</paragraph>
+                        <paragraph id="par_id061520180728419279" 
role="bascode" localize="false" xml-lang="en-US">DisplayDirectory as String, 
</paragraph>
+                        <paragraph id="par_id061520180728421914" 
role="bascode" localize="false" xml-lang="en-US">Optional iAddProcedure as 
Integer) as String</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -816,9 +960,11 @@
                     <paragraph id="par_id061520180728424363" role="bascode" 
localize="false" xml-lang="en-US">AddFiltersToDialog</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061520180728429017" role="bascode" 
localize="false" xml-lang="en-US">Sub AddFiltersToDialog(</paragraph>
-                    <paragraph id="par_id061520180728424454" role="bascode" 
localize="false" xml-lang="en-US">FilterNames() as String, </paragraph>
-                    <paragraph id="par_id061520180728422747" role="bascode" 
localize="false" xml-lang="en-US">oDialog as Object)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061520180728429017" 
role="bascode" localize="false" xml-lang="en-US">Sub 
AddFiltersToDialog(</paragraph>
+                        <paragraph id="par_id061520180728424454" 
role="bascode" localize="false" xml-lang="en-US">FilterNames() as String, 
</paragraph>
+                        <paragraph id="par_id061520180728422747" 
role="bascode" localize="false" xml-lang="en-US">oDialog as Object)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -826,9 +972,11 @@
                     <paragraph id="par_id061520180728422388" role="bascode" 
localize="false" xml-lang="en-US">SwitchMousePointer</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id0615201807284277" role="bascode" 
localize="false" xml-lang="en-US">Sub SwitchMousePointer(</paragraph>
-                    <paragraph id="par_id061520180728421877" role="bascode" 
localize="false" xml-lang="en-US">oWindowPeer as Object, </paragraph>
-                    <paragraph id="par_id061520180728429500" role="bascode" 
localize="false" xml-lang="en-US">bDoEnable as Boolean)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id0615201807284277" role="bascode" 
localize="false" xml-lang="en-US">Sub SwitchMousePointer(</paragraph>
+                        <paragraph id="par_id061520180728421877" 
role="bascode" localize="false" xml-lang="en-US">oWindowPeer as Object, 
</paragraph>
+                        <paragraph id="par_id061520180728429500" 
role="bascode" localize="false" xml-lang="en-US">bDoEnable as 
Boolean)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -836,9 +984,11 @@
                     <paragraph id="par_id061520180728428854" role="bascode" 
localize="false" xml-lang="en-US">ShowOverwriteAllDialog</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061520180728427224" role="bascode" 
localize="false" xml-lang="en-US">Sub ShowOverwriteAllDialog(</paragraph>
-                    <paragraph id="par_id06152018072842792" role="bascode" 
localize="false" xml-lang="en-US">FilePath as String, </paragraph>
-                    <paragraph id="par_id061520180728429393" role="bascode" 
localize="false" xml-lang="en-US">sTitle as String)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061520180728427224" 
role="bascode" localize="false" xml-lang="en-US">Sub 
ShowOverwriteAllDialog(</paragraph>
+                        <paragraph id="par_id06152018072842792" role="bascode" 
localize="false" xml-lang="en-US">FilePath as String, </paragraph>
+                        <paragraph id="par_id061520180728429393" 
role="bascode" localize="false" xml-lang="en-US">sTitle as String)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -846,7 +996,9 @@
                     <paragraph id="par_id061520180728429649" role="bascode" 
localize="false" xml-lang="en-US">SetOVERWRITEToQuery</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061520180728429597" role="bascode" 
localize="false" xml-lang="en-US">Sub SetOVERWRITEToQuery()</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061520180728429597" 
role="bascode" localize="false" xml-lang="en-US">Sub 
SetOVERWRITEToQuery()</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -854,7 +1006,9 @@
                     <paragraph id="par_id061520180728428255" role="bascode" 
localize="false" xml-lang="en-US">SetOVERWRITEToAlways</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061520180728424733" role="bascode" 
localize="false" xml-lang="en-US">Sub SetOVERWRITEToAlways()</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061520180728424733" 
role="bascode" localize="false" xml-lang="en-US">Sub 
SetOVERWRITEToAlways()</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -862,7 +1016,9 @@
                     <paragraph id="par_id06152018072842702" role="bascode" 
localize="false" xml-lang="en-US">SetOVERWRITEToNever</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061520180728429250" role="bascode" 
localize="false" xml-lang="en-US">Sub SetOVERWRITEToNever()</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061520180728429250" 
role="bascode" localize="false" xml-lang="en-US">Sub 
SetOVERWRITEToNever()</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
         </table>
@@ -887,9 +1043,11 @@
                     <paragraph id="par_id061420180708276674" role="bascode" 
localize="false" xml-lang="en-US">ElimChar</paragraph>
                 </tablecell>
                 <tablecell>
-                    <paragraph id="par_id061420180708276186" role="bascode" 
localize="false" xml-lang="en-US">Function ElimChar(</paragraph>
-                    <paragraph role="bascode" id="par_id551529060984480" 
xml-lang="en-US" localize="false">ByVal BigString as String, </paragraph>
-                    <paragraph role="bascode" id="par_id871529060990727" 
xml-lang="en-US" localize="false">ElimArray() as String)</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180708276186" 
role="bascode" localize="false" xml-lang="en-US">Function ElimChar(</paragraph>
+                        <paragraph role="bascode" id="par_id551529060984480" 
xml-lang="en-US" localize="false">ByVal BigString as String, </paragraph>
+                        <paragraph role="bascode" id="par_id871529060990727" 
xml-lang="en-US" localize="false">ElimArray() as String)</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -898,9 +1056,11 @@
                 </tablecell>
                 <tablecell>
                     <paragraph id="par_id061420180708275363" 
role="tablecontent" localize="false" xml-lang="en-US">' Deletes out of a String 
'BigString' a possible Partstring 'CompString'</paragraph>
-                    <paragraph id="par_id061420180708303146" role="bascode" 
localize="false" xml-lang="en-US">Function DeleteStr(</paragraph>
-                    <paragraph id="par_id061420180708306296" role="bascode" 
localize="false" xml-lang="en-US">ByVal BigString,</paragraph>
-                    <paragraph id="par_id061420180708301803" role="bascode" 
localize="false" xml-lang="en-US">CompString as String) as String</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180708303146" 
role="bascode" localize="false" xml-lang="en-US">Function DeleteStr(</paragraph>
+                        <paragraph id="par_id061420180708306296" 
role="bascode" localize="false" xml-lang="en-US">ByVal BigString,</paragraph>
+                        <paragraph id="par_id061420180708301803" 
role="bascode" localize="false" xml-lang="en-US">CompString as String) as 
String</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -909,11 +1069,13 @@
                 </tablecell>
                 <tablecell>
                     <paragraph id="par_id061420180708308479" 
role="tablecontent" localize="false" xml-lang="en-US">' Finds a PartString, 
that is framed by the Strings 'Prestring' and 'PostString'</paragraph>
-                    <paragraph id="par_id061420180708305815" role="bascode" 
localize="false" xml-lang="en-US">Function FindPartString(</paragraph>
-                    <paragraph id="par_id061420180708307045" role="bascode" 
localize="false" xml-lang="en-US">BigString, </paragraph>
-                    <paragraph id="par_id061420180708308079" role="bascode" 
localize="false" xml-lang="en-US">PreString, </paragraph>
-                    <paragraph id="par_id061420180708302996" role="bascode" 
localize="false" xml-lang="en-US">PostString as String, </paragraph>
-                    <paragraph id="par_id061420180708308715" role="bascode" 
localize="false" xml-lang="en-US">SearchPos as Integer) as String</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180708305815" 
role="bascode" localize="false" xml-lang="en-US">Function 
FindPartString(</paragraph>
+                        <paragraph id="par_id061420180708307045" 
role="bascode" localize="false" xml-lang="en-US">BigString, </paragraph>
+                        <paragraph id="par_id061420180708308079" 
role="bascode" localize="false" xml-lang="en-US">PreString, </paragraph>
+                        <paragraph id="par_id061420180708302996" 
role="bascode" localize="false" xml-lang="en-US">PostString as String, 
</paragraph>
+                        <paragraph id="par_id061420180708308715" 
role="bascode" localize="false" xml-lang="en-US">SearchPos as Integer) as 
String</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -923,10 +1085,12 @@
                 <tablecell>
                     <paragraph id="par_id061420180708302715" 
role="tablecontent" localize="false" xml-lang="en-US">' Note iCompare = 0 
(Binary comparison)</paragraph>
                     <paragraph id="par_id06142018070830615" 
role="tablecontent" localize="false" xml-lang="en-US">'  iCompare = 1 (Text 
comparison)</paragraph>
-                    <paragraph id="par_id061420180708303506" role="bascode" 
localize="false" xml-lang="en-US">Function PartStringInArray(</paragraph>
-                    <paragraph id="par_id06142018070830513" role="bascode" 
localize="false" xml-lang="en-US">BigArray(), </paragraph>
-                    <paragraph id="par_id06142018070830983" role="bascode" 
localize="false" xml-lang="en-US">SearchString as String, </paragraph>
-                    <paragraph id="par_id061420180708309182" role="bascode" 
localize="false" xml-lang="en-US">iCompare as Integer) as Integer</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180708303506" 
role="bascode" localize="false" xml-lang="en-US">Function 
PartStringInArray(</paragraph>
+                        <paragraph id="par_id06142018070830513" role="bascode" 
localize="false" xml-lang="en-US">BigArray(), </paragraph>
+                        <paragraph id="par_id06142018070830983" role="bascode" 
localize="false" xml-lang="en-US">SearchString as String, </paragraph>
+                        <paragraph id="par_id061420180708309182" 
role="bascode" localize="false" xml-lang="en-US">iCompare as Integer) as 
Integer</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -936,9 +1100,11 @@
                 <tablecell>
                     <paragraph id="par_id061420180708304034" 
role="tablecontent" localize="false" xml-lang="en-US">' Deletes the String 
'SmallString' out of the String 'BigString'</paragraph>
                     <paragraph id="par_id06142018070830656" 
role="tablecontent" localize="false" xml-lang="en-US">' in case SmallString's 
Position in BigString is right at the end</paragraph>
-                    <paragraph id="par_id061420180708301129" role="bascode" 
localize="false" xml-lang="en-US">Function RtrimStr(</paragraph>
-                    <paragraph id="par_id061420180708311705" role="bascode" 
localize="false" xml-lang="en-US">ByVal BigString, </paragraph>
-                    <paragraph id="par_id061420180708312600" role="bascode" 
localize="false" xml-lang="en-US">SmallString as String) as String</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180708301129" 
role="bascode" localize="false" xml-lang="en-US">Function RtrimStr(</paragraph>
+                        <paragraph id="par_id061420180708311705" 
role="bascode" localize="false" xml-lang="en-US">ByVal BigString, </paragraph>
+                        <paragraph id="par_id061420180708312600" 
role="bascode" localize="false" xml-lang="en-US">SmallString as String) as 
String</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -948,9 +1114,11 @@
                 <tablecell>
                     <paragraph id="par_id061420180708318862" 
role="tablecontent" localize="false" xml-lang="en-US">' Deletes the Char 
'CompChar' out of the String 'BigString'</paragraph>
                     <paragraph id="par_id061420180708319364" 
role="tablecontent" localize="false" xml-lang="en-US">' in case CompChar's 
Position in BigString is right at the beginning</paragraph>
-                    <paragraph id="par_id061420180708313231" role="bascode" 
localize="false" xml-lang="en-US">Function LTRimChar(</paragraph>
-                    <paragraph id="par_id061420180708311887" role="bascode" 
localize="false" xml-lang="en-US">ByVal BigString as String,</paragraph>
-                    <paragraph id="par_id061420180708313838" role="bascode" 
localize="false" xml-lang="en-US">CompChar as String) as String</paragraph>
+                    <bascode>
+                        <paragraph id="par_id061420180708313231" 
role="bascode" localize="false" xml-lang="en-US">Function LTRimChar(</paragraph>
+                        <paragraph id="par_id061420180708311887" 
role="bascode" localize="false" xml-lang="en-US">ByVal BigString as 
String,</paragraph>
+                        <paragraph id="par_id061420180708313838" 
role="bascode" localize="false" xml-lang="en-US">CompChar as String) as 
String</paragraph>
+                    </bascode>
                 </tablecell>
             </tablerow>
             <tablerow>
@@ -962,10 +1130,12 @@
                     <paragraph id="par_id061420180708316680" 
role="tablecontent" localize="false" xml-lang="en-US">' The fields of the Array 
are separated by the parameter 'Separator', that is contained</paragraph>

... etc. - the rest is truncated
_______________________________________________
Libreoffice-commits mailing list
libreoffice-comm...@lists.freedesktop.org
https://lists.freedesktop.org/mailman/listinfo/libreoffice-commits

Reply via email to