VB Code Snippet (in "Immediate" format) to set up for the external Event Trigger 2 (Trigger on 2 only):
set doc = CreateObject("QaDoc")
io = doc.OpenDocument("C:\Testing\~tEvents\Event API Test.4dc")
set ds = doc.GetDataSet("My DataSet")
ds.ExternalEventType(eOnlyTrigger2)
ds.ExternalEventScope(eEventPerSet)
ds.ExternalEventAttachmentType(eEventAttachmentPDF)
ds.ExternalEventNote("My event note for testing")
doc.SaveDocument()
doc.CloseDocument()