CimEMEvent.ActionID (property, read)

Syntax Event.ActionID
Description String. Returns the Action ID that is a running the script.
Example 
Sub Main()
   Dim event as CimEMEvent
   Set event = CimGetEMEvent()
   PointSet "LAST_ACTION_ID", event.ActionID
End Sub