Index: APPS/TBXWeb/Utils.cls.xml
===================================================================
diff -u -r823 -r824
--- APPS/TBXWeb/Utils.cls.xml	(.../Utils.cls.xml)	(revision 823)
+++ APPS/TBXWeb/Utils.cls.xml	(.../Utils.cls.xml)	(revision 824)
@@ -109,6 +109,20 @@
 ]]></Implementation>
 </Method>
 
+<Method name="IsTiponUitgefaseerd">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>WSOrderLijn:WS.TBX.EM.OrderLijn</FormalSpec>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[
+	Set IsTiponUitgefaseerd = $$$False
+	If (WSOrderLijn.ItemBM = "T") {
+		Set IsTiponUitgefaseerd = $$$Not(##class(TECH.StringUtils).Equals(WSOrderLijn.ItemLD, 270,300,350,400,450,550,600,650))   ; zijn uitgefaseerd : LD = 500 
+	}
+	Quit IsTiponUitgefaseerd
+]]></Implementation>
+</Method>
+
 <Method name="GeefKlantnummerVanHandel">
 <ClassMethod>1</ClassMethod>
 <FormalSpec>WSOrderID:%String</FormalSpec>