Set BL=##class(BL.Derde.Klant.Main).%New() s Q=BL.Zoek(1051) f d Q.Next(.Ok) q:('Ok) w Ok,! m Data=Q.Data zw Data BL.Derde.Derde 1 %RegisteredObject 60312,57599.728465 59994,36389.731496 0 SELECT Nummer, Naam, Woonplaats FROM Derde_Klant.Klant WHERE Naam %STARTSWITH ? WHERE Nummer = ? WHERE PostNummer %STARTSWITH ? WHERE WoonPlaats %STARTSWITH ? WHERE StraatNrBus %STARTSWITH ? AND (isnull(KodeCommercieelAktief,0)=0) ORDER BY Naam Criteria : BeginLetters of DerdeNr of Postkode ZoekType : Leeg = DerdeNaam of DerdeNr : "W" = Woonplaats : "P" = Postkode : "S" = Straat 1 Criteria:%String,ZoekType:%String,InclNonAktief:%Boolean %XML.DataSet Criteria:%String,ZoekType:%String,InclNonAktief:%Boolean %String 1 Status,Object