vhLib.Macro,TECH.Error 1 APPS.OV.impl.AanvraagChecker,%RegisteredObject 1 1 %String 1 %List 1 %String 1 ..#MaxWerkDagenNietVerwerkt { Set TabelArray($Increment(cntRows))=$$LCVTSimple^vhLib( $LB(FlowOfferte.ID, FlowOfferte.Klant.Nummer, FlowOfferte.Klant.Naam, " " , DagenNietVerwerkt, $$FormatDateTime^vhLib("dd-mm-yyyy hh:nn:ss",SubmitTS), "", FlowOfferte.Oorsprong) ,$$$TAB) } } Else { Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.GeneralErrorException).%New("Ongeldige status voor NietVerwerkteAanvragen (status="_FlowOfferte.Status_")")) } } If cntRows>0 { Set TabelArray(0)=$$LCVTSimple^vhLib( $LB("EDI nr.", "KlantNr", "KlantNaam", " ", "#Dagen", "Verzonden op", " ", "Oorsprong"), $$$TAB) } Quit ]]> 1 %ListOfDataTypes '62092,0') ORDER BY CreatieTijdStip, ID" Quit ..GeefLijstOrderIDs(SQLQuery,lbSQLParams) ]]>