codeunit 50006 ClesenTestRunnerCodeUnit { Subtype = TestRunner; TestIsolation = Disabled; trigger OnRun() begin ClesenTestPageCodeUnit.Run(); end; var ClesenTestPageCodeUnit: codeunit ClesenTestPageCodeUnit; }
codeunit 50000 ClesenTestPageCodeUnit { Subtype = Test; [Test] procedure TestCustCard() var CustCard: TestPage "Customer Card"; begin CustCard.OpenNew(); with CustCard do begin Name.SetValue('Mark Test Co2'); OK.Invoke(); end; end; }