如何将模板名称添加到 libreoffice writer 的状态栏？

Question

. Answers to this question are eligible for a +50 reputation bounty. shantanuo is looking for an .

Here is a line from the file statusbar.xml from \share\config\soffice.cfg\modules\swriter\statusbar

<statusbar:statusbaritem xlink:href=".uno:PageStyleName" statusbar:align="left" statusbar:autosize="true" statusbar:width="79"/>

I copied the file to user directory: \config\soffice.cfg\modules\swriter\statusbar

I just need to display Template Name from document properties. for eg ThisComponent.getDocumentProperties().TemplateName

But adding this line does not work as expected. It creates a width of 79 pixels but does not show template name.

<statusbar:statusbaritem xlink:href=".uno:ThisComponent.getDocumentProperties().TemplateName" statusbar:align="left" statusbar:autosize="true" statusbar:width="79"/>

The purpose is to show current document's template name in status bar just like style name.

---

Update:

I got this code from "Useful Macro Information For OpenOffice.org By Andrew Pitonyak". It is working as expected. But it does not show any other items on status bar. I need TemplateName next to style name.

Function ProgressBar
  ProgressBar = ThisComponent.CurrentController.StatusIndicator
End Function

Sub StatusText()
  Dim sInformation 
  Dim iLen as Integer
  Dim iRest As Integer
  sInformation = ThisComponent.getDocumentProperties().TemplateName
  iLen=Len(sInformation)
  iRest=350-iLen
  ProgressBar.start(sInformation+SPACE(iRest),0)
End Sub

Answer 1

Those are UNO dispatcher commands, not Basic code. It looks like there are only a few that would work, such as .uno:CharFontName or .uno:FrameName . Most UNO commands perform an action rather than getting information.

At https://forum.openoffice.org/en/forum/viewtopic.php?t=10104 , there is Basic macro code to set the status indicator:

ThisComponent.CurrentController.StatusIndicator.Start(vStatusBarText,0)

If it's possible to call a macro from statusbar.xml, then the syntax would be like this:

xlink:href="vnd.sun.star.script:pythonSamples|TableSample.py$createTable?language=Python&location=share" \
xlink:type="simple"

EDIT :

Here is a Basic call example, from https://ask.libreoffice.org/t/how-to-translate-the-toolbar-into-multiple-languages/42404 :

xlink:href="vnd.sun.star.script:Standard.Module6.gerer_cadre_image1?language=Basic&location=application"