summaryrefslogtreecommitdiff
path: root/wizards
diff options
context:
space:
mode:
authorJean-Pierre Ledure <jp@ledure.be>2023-08-21 15:01:53 +0200
committerJean-Pierre Ledure <jp@ledure.be>2023-08-21 17:33:29 +0200
commit84bc3ffcf5c570f044843125552589456b07f5a1 (patch)
tree45f3bbb4174f4fd5f6a19bb0e48e25e6d89c0bfd /wizards
parent19281c62b5e315da422318dbc9d4ba619a6eeab5 (diff)
ScriptForge - fix tdf#156836 Abort on MoveFirst()
The incident occurs when a move (last(), first(), next()) within the form's resultset is done from a Basic script immediately after the opening of the document containing the form. The insertion of a Wait 1 statement prevents the occurrence of the incident by interrupting very shortly the Basic process. Change-Id: I5e798db6e3f9ffaeeef38fb9badd008cbb190d1f Reviewed-on: https://gerrit.libreoffice.org/c/core/+/155897 Reviewed-by: Jean-Pierre Ledure <jp@ledure.be> Tested-by: Jenkins
Diffstat (limited to 'wizards')
-rw-r--r--wizards/source/sfdatabases/SF_Database.xba3
-rw-r--r--wizards/source/sfdocuments/SF_Base.xba3
2 files changed, 6 insertions, 0 deletions
diff --git a/wizards/source/sfdatabases/SF_Database.xba b/wizards/source/sfdatabases/SF_Database.xba
index f93cf55d74c0..109d4c57d909 100644
--- a/wizards/source/sfdatabases/SF_Database.xba
+++ b/wizards/source/sfdatabases/SF_Database.xba
@@ -455,6 +455,9 @@ Try:
Set oOpen = ScriptForge.SF_Services.CreateScriptService(&quot;SFDocuments.FormDocument&quot;, oNewForm)
+ &apos; Prevent desynchonization when using .last(), .next() etc immediately after component loading. Bug #156836
+ Wait 1
+
Finally:
Set OpenFormDocument = oOpen
ScriptForge.SF_Utils._ExitFunction(cstThisSub)
diff --git a/wizards/source/sfdocuments/SF_Base.xba b/wizards/source/sfdocuments/SF_Base.xba
index efc8bfeb148c..af1ebc1e4930 100644
--- a/wizards/source/sfdocuments/SF_Base.xba
+++ b/wizards/source/sfdocuments/SF_Base.xba
@@ -505,6 +505,9 @@ Try:
Set oOpen = ScriptForge.SF_Services.CreateScriptService(&quot;SFDocuments.FormDocument&quot;, oNewForm)
+ &apos; Prevent desynchonization when using .last(), .next() etc immediately after component loading. Bug #156836
+ Wait 1
+
Finally:
Set OpenFormDocument = oOpen
ScriptForge.SF_Utils._ExitFunction(cstThisSub)