diff options
-rw-r--r-- | wizards/source/tools/Debug.xba | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/wizards/source/tools/Debug.xba b/wizards/source/tools/Debug.xba index 41d296d3fdb6..2f1653071b60 100644 --- a/wizards/source/tools/Debug.xba +++ b/wizards/source/tools/Debug.xba @@ -226,4 +226,11 @@ Dim bDoProtect as Boolean End If End If End Sub + + +Sub FillDocument() + oMyReport = createUNOService("com.sun.star.wizards.report.CallReportWizard") + oMyReport.trigger("fill") +End Sub + </script:module>
\ No newline at end of file |