Event Trigger 2 (External Event)

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.ExternalEventAttachmentType(eEventAttachmentPDF)

ds.ExternalEventNote("My event note for testing")

doc.SaveDocument()

doc.CloseDocument()