Index: WV.mac.rou
===================================================================
diff -u -r734 -r948
--- WV.mac.rou	(.../WV.mac.rou)	(revision 734)
+++ WV.mac.rou	(.../WV.mac.rou)	(revision 948)
@@ -982,10 +982,12 @@
 	Set iVTL=""
 	For  Set iVTL=$O(^Res.VertalingAbstractD(VTLGroep,iVTL)) Quit:(iVTL="")  Do
 	. Write !,iVTL_":"
-	. Quit:($$$Trim(iVTL)?1(1"<".E0.1">"))   ; VTL van Sleutel afzonderlijk behandelen 
-	. Quit:($$$Trim(iVTL)?1(1"{".E1"}"))     ; VTL van InfoSleutel afzonderlijk behandelen 
-	. Quit:($$$Trim(iVTL)="ZoneTp_ALLES")    ; VTL van ZoneTp_ALLES definitief laten staan 
-	. ;Quit:($$$Trim(iVTL)?1(1"GS_".E))       ; VTL van Groepsleutels voorlopig laten staan    - Temporary (10-09-2010 by WimV) 
+	. Quit:($$$Trim(iVTL)?1(1"<".E0.1">"))     ; VTL van Sleutel afzonderlijk behandelen 
+	. Quit:($$$Trim(iVTL)?1(1"{".E1"}"))       ; VTL van InfoSleutel afzonderlijk behandelen 
+	. Quit:($$$Trim(iVTL)="ZoneTp_ALLES")      ; VTL van ZoneTp_ALLES definitief laten staan 
+	. Quit:($$$Trim(iVTL)="ZoneTp_HogeLade")   ; VTL van ZoneTp_ALLES definitief laten staan 
+	. Quit:($$$Trim(iVTL)="ZoneTp_LageLade")   ; VTL van ZoneTp_ALLES definitief laten staan 
+	. ;Quit:($$$Trim(iVTL)?1(1"GS_".E))        ; VTL van Groepsleutels voorlopig laten staan    - Temporary (10-09-2010 by WimV) 
 	. 
 	. Set DDefFound=0
 	. ;For i=1:1:$LL(lbKenm) Set:($O(^Prod.Ken.DataIndexD(Groep,$LI(lbKenm,i),iVTL,""))'="") DDefFound=1  Quit:(DDefFound)