var
     context String
     filter String
     helpForm Form
endVar
context = active.fieldName
helpForm.openAsDialog("help.fsl", WinStyleHidden)
helpForm.Help_Picture.switchIndex("TopicOrder")
switch
     case context = "Payment Method" or context = "Terms" :
          filter = context
     case context = "Stock No" or context = "Selling Price"
or
               context = "Qty" :
          filter = "Items Ordered"
     otherwise :
          filter = "Welcome"
endSwitch
helpForm.Help_Picture.setFilter(filter, filter)
helpForm.show()
sndPlaySound("c:\\pdoxwin\\working\\" +
StrVal(helpForm.Sound_File), 1)
if filter = "Welcome" then
     helpForm.TopicsButton.pushButton()
endIf