For example, consider the data-driven test case FindTest, which takes a record of type SEARCHINFO as a parameter:
type SEARCHINFO is record STRING sText // Text to type in document window STRING sPos // Starting position of search STRING sPattern // String to look for BOOLEAN bCase // Case-sensitive or not STRING sDirection // Direction of search STRING sExpected // The expected match testcase FindTest (SEARCHINFO Data) TextEditor.File.New.Pick () DocumentWindow.Document.TypeKeys (Data.sText + Data.sPos) TextEditor.Search.Find.Pick () Find.FindWhat.SetText (Data.sPattern) Find.CaseSensitive.SetState (Data.bCase) Find.Direction.Select (Data.sDirection) Find.FindNext.Click () Find.Cancel.Click () DocumentWindow.Document.VerifySelText ({Data.sExpected}) TextEditor.File.Close.Pick () MessageBox.No.Click ()
The following test plan is associated with the FindTest test case. The testcase statement occurs at the Find dialog group description level, so that each of the test descriptions in the group can call the test case and pass a unique set of data to the test case:
Testplan FindTest.pln Find dialog script: findtest.t testcase: FindTest . . . .