Index: OBJTimpl/WMSOrder/PrintKlantEtiket.cls.xml
===================================================================
diff -u -r72127 -r72129
--- OBJTimpl/WMSOrder/PrintKlantEtiket.cls.xml	(.../PrintKlantEtiket.cls.xml)	(revision 72127)
+++ OBJTimpl/WMSOrder/PrintKlantEtiket.cls.xml	(.../PrintKlantEtiket.cls.xml)	(revision 72129)
@@ -60,7 +60,11 @@
 		#dim PickerUserId = ..PickerUserIdOphaler.GeefUserIdPickerVanLPN(SubLPN.ConsNr,SubLPN.SubLPNID)
 		Do ..StoreLPN(SubLPN.ConsNr,KlantEtiketRequestMOP.Vertrekplaats,SubLPN.SubLPNID, PickerUserId)
 		#dim VanTot as %String = SubLPN.Positie
-		Set:($Length(VanTot," , ")>1) VanTot = $Piece($Piece(VanTot," , "),".",2) _ "->" _ $Piece($Piece(VanTot," , ",$Length(VanTot," , ")),".",2)
+		If ($Length(VanTot," , ") > 1) {
+			Set VanTot = $Piece($Piece(VanTot," , "),".",2) _ " -> " _ $Piece($Piece(VanTot," , ",$Length(VanTot," , ")),".",2)
+		} else {
+			Set VanTot = $Piece($Piece(VanTot," , "),".",2)
+		}
 		#dim PositieOpKar as %String = KlantEtiketRequestMOP.TopLPN.TopLPNID _ "#"_VanTot
 		Do EXTERN^FLOWBON4($e($TR(SubLPN.ConsNr,"b"),5,10), ..ConverteerVertrekplaats(KlantEtiketRequestMOP.Vertrekplaats),SubLPN.SubLPNID,PickerUserId,PositieOpKar)
 	}