Hi, I have the following function that returns the action (INSERT-UPDATE-DELETE) that triggers the “Before record action” event, I would need a function that returns the action for the “After record action” event.
How could I do?
Thank you
https://forum.openoffice.org/en/forum/viewtopic.php?t=87752
Function before_Record_Action(e) As Boolean
'oMRI = CreateUnoService( "mytools.Mri" )
' oMri.inspect(e)
With com.sun.star.sdb.RowChangeAction
if e.Action = .INSERT then
sWord = "insert"
elseif e.Action = .UPDATE then
sWord = "update"
elseif e.Action = .DELETE then
REM there is a built-in warning message
before_Record_Action = True
exit function
endif
End With
iAnswer = Msgbox("Are you sure you want to "& sWord &" this record?", 36, "Confirmation")
before_Record_Action = (iAnswer = 6)
End Function