Index: WS/TAPI/Router.cls.xml
===================================================================
diff -u -r31560 -r32282
--- WS/TAPI/Router.cls.xml	(.../Router.cls.xml)	(revision 31560)
+++ WS/TAPI/Router.cls.xml	(.../Router.cls.xml)	(revision 32282)
@@ -40,31 +40,38 @@
 <Implementation><![CDATA[
 	Kill ^TAPI("POOL")
 	Set ^TAPI("POOL")="Pool niet editeren maar wel de init routine d ##class(WS.TAPI.Router).InitPool()"
+	// Pool OV (1) 
 	Do SetPool("NBR","NBR;BBE;KCO","","")
-	Do SetPool("WDA","WDA;KCO;NBR","","")
-	Do SetPool("KCO","KCO;WDA;NBR","","")
-	Do SetPool("AB","AB;CGI;GPI","","")
-	Do SetPool("BBE","BBE;KCO;NBR","","")
-	Do SetPool("NWU","NWU;BDA;NSL","","")
-	Do SetPool("CGI","CGI;GPI;AB","","")
-	Do SetPool("DDS","DDS;NSL;NWU","","")
-	Do SetPool("NSL","NSL;NWU;BDA","","")
-	Do SetPool("GPI","GPI;AB;CGI","","")
-	Do SetPool("BDA","BDA;NSL;NWU","","")
+	Do SetPool("BBE","BBE;WDA;KCO","","")
+	Do SetPool("KCO","KCO;WDA;BBE","","")
+	Do SetPool("WDA","WDA;KCO;BBE","","")
+	// Pool OV (2) 
+	Do SetPool("BDA","BDA;NWU;NSL","","")
+	Do SetPool("NWU","NWU;NSL;HMO","","")
+	Do SetPool("NSL","NSL;HMO;BDA","","")
+	Do SetPool("HMO","HMO;BDA;NWU","","")
+	// Pool OV (3) 
+	Do SetPool("AB","AB;ACO;CGI","","")	
+	Do SetPool("ACO","ACO;CGI;PHO","","")
+	Do SetPool("CGI","CGI;PHO;AB","","")
+	Do SetPool("PHO","PHO;AB;ACO","","")
+	// Pool CONS 
+	Do SetPool("DDS","DDS;YDA;DDA","","")
 
 	Kill ^TAPI("DI")
-	Do DirInkies("037601904","WDA")
-	Do DirInkies("037601905","NBR") 
-	Do DirInkies("037601908","AB") 
-	Do DirInkies("037601913","JME") 
-	Do DirInkies("037601914","BBE") 
-	Do DirInkies("037601907","CGI") 
-	Do DirInkies("037601936","BDA") 
-	Do DirInkies("037601934","NSL")
+	Do DirInkies("037601905","NBR")
+	Do DirInkies("037601914","BBE")
 	Do DirInkies("037787108","KCO")
+	Do DirInkies("037601904","WDA")
+	Do DirInkies("037601936","BDA")
 	Do DirInkies("037601937","NWU")
-	Do DirInkies("037787112","GPI")
-	Do DirInkies("037787103","DDS")
+	Do DirInkies("037601934","NSL")
+	Do DirInkies("037787107","HMO")
+	Do DirInkies("037601908","AB")
+  	Do DirInkies("037787105","ACO")
+	Do DirInkies("037601907","CGI")
+	Do DirInkies("037787112","PHO")
+	Do DirInkies("037601913","JME")
 	
 	Quit
 DirInkies(Tel,VerantW)