Index: BL/Flow/Cons/TransportFlow.cls.xml
===================================================================
diff -u -r29059 -r50562
--- BL/Flow/Cons/TransportFlow.cls.xml (.../TransportFlow.cls.xml) (revision 29059)
+++ BL/Flow/Cons/TransportFlow.cls.xml (.../TransportFlow.cls.xml) (revision 50562)
@@ -310,7 +310,7 @@
. . Set Adres=$P($O(Transporten("")),"||",2)
. Set:Adres="" Adres=BONNr
. Quit:##class(BL.Flow.Cons.TransportData).ShowKennisAnker($P(^KU1(BONNr,"F"),D))="ANNULEER"
- . If Obj.Transporteur=5036 Do ; ABX
+ . If ((Obj.Transporteur=5036)||(Obj.Transporteur=6612)) Do ; ABX
. . Set Bons("BON",BONNr)=""
. . Do SELBON^TRANSP($NAME(Bons))
. . Quit:$D(Bons("ANUL"))
@@ -766,8 +766,6 @@
^BL.Flow.Cons.TransportFlowI
^BL.Flow.Cons.TransportFlowS
-listnode
-
%%CLASSNAME