Index: FLOWORD7.mac.rou
===================================================================
diff -u -r72622 -r72633
--- FLOWORD7.mac.rou	(.../FLOWORD7.mac.rou)	(revision 72622)
+++ FLOWORD7.mac.rou	(.../FLOWORD7.mac.rou)	(revision 72633)
@@ -260,7 +260,7 @@
  
 GetVerzWFromSubMag(WVSubMag)
 	New VerzendW
-	Set VerzendW="TH"_WVSubMag
+	Set VerzendW="TH"_$S(WVSubMag?1N:WVSubMag,WVSubMag?1(1"A",1"B",1"C",1"D",1"E",1"F",1"G",1"L",1"M",1"N",1"O",1"P",1"R",1"S",1"T",1"U",1"V",1"Y",1"W"):WVSubMag,1:"")
 	Quit VerzendW
  
  ; Maximum lijnen per order (default 99)