w ##class(TCHUI.Dlg.TSelectKlant).Select("Select klant","Onbelangrijk",,"M",15) 1 TCHUI.TForm ========================================================================================================================== PROPERTIES . ========================================================================================================================== TCHUI.TAction TCHUI.TAction TCHUI.TAction TCHUI.TKader TCHUI.TLabel TCHUI.TLabel TCHUI.TButton TCHUI.TButton TCHUI.TButton TCHUI.TButton TCHUI.TPopup TCHUI.TEdit TCHUI.TLijst TCHUI.TDataSetList %Integer 1 %Integer 2 %Integer 3 %Integer 4 %Integer 5 . ! $ P S ========================================================================================================================== METHODs . ========================================================================================================================== 1 %String pmSearchViaKey:%String ========================================================================================================================== EVENTs . ========================================================================================================================== Sender:TCHUI.TControlBasis Als er slechts 1 product in de dataset zit wordt het product teruggegeven anders leeg DataSet Sender:TCHUI.TControlBasis