Index: zTryout/WV/PM/Test.cls.xml
===================================================================
diff -u -r64779 -r64838
--- zTryout/WV/PM/Test.cls.xml	(.../Test.cls.xml)	(revision 64779)
+++ zTryout/WV/PM/Test.cls.xml	(.../Test.cls.xml)	(revision 64838)
@@ -4,6 +4,165 @@
 <IncludeCode>vhLib.Macro,Prod.Product</IncludeCode>
 <Super>TECH.RegisteredObject</Super>
 
+<Method name="HermaakTbxProducten">
+<Description>
+Do ##class(zTryout.WV.PM.Test).%New().HermaakTbxProducten()</Description>
+<Implementation><![CDATA[
+	#dim TbxIdFromAdmin As %String 
+	
+	Set TbxIdFromAdmin = "902823/624116"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	Set TbxIdFromAdmin = "1001254/694496"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	Set TbxIdFromAdmin = "1001397/694598"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	Set TbxIdFromAdmin = "602960/367814"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	Set TbxIdFromAdmin = "755898/503327"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	Set TbxIdFromAdmin = "868590/597023"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	Set TbxIdFromAdmin = "1567726/915110"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	Set TbxIdFromAdmin = "941125/654859"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	Set TbxIdFromAdmin = "418582/216583"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	Set TbxIdFromAdmin = "1154731/778621"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	Set TbxIdFromAdmin = "749774/497905"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	Set TbxIdFromAdmin = "500437/283084"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	Set TbxIdFromAdmin = "580416/348427"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	Set TbxIdFromAdmin = "576219/345146"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	Set TbxIdFromAdmin = "576115/345042"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	Set TbxIdFromAdmin = "576165/345092"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	Set TbxIdFromAdmin = "576127/345054"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	Set TbxIdFromAdmin = "595226/360935"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	Set TbxIdFromAdmin = "599536/364706"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	Set TbxIdFromAdmin = "338607/150068"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	Set TbxIdFromAdmin = "463751/252525"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	Set TbxIdFromAdmin = "549752/323320"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	Set TbxIdFromAdmin = "621459/383860"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	Set TbxIdFromAdmin = "379664/185942"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	Set TbxIdFromAdmin = "279788/104222"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	Set TbxIdFromAdmin = "622116/384435"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	Set TbxIdFromAdmin = "622264/384571"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	Set TbxIdFromAdmin = "567156/337230"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	Set TbxIdFromAdmin = "567174/337246"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	// Tandembox.Aansturing.Test002 
+	Set TbxIdFromAdmin = "995148/690561"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	// Tandembox.Aansturing.Test003 
+	Set TbxIdFromAdmin = "680059/435727"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	Set TbxIdFromAdmin = "1059487/728048"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	// Tandembox.Aansturing.Test004 
+	Set TbxIdFromAdmin = "1082052/741089"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	Set TbxIdFromAdmin = "902644/623968"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+ 
+	Set TbxIdFromAdmin = "1010883/697626"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+ 
+	Set TbxIdFromAdmin = "1044642/719274"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+ 
+	Set TbxIdFromAdmin = "1074469/737492"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	// Tandembox.Aansturing.Test005 
+	Set TbxIdFromAdmin = "1467737/885790"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+ 
+	Set TbxIdFromAdmin = "1154663/778572"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	// Tandembox.Aansturing.Test006 
+	Set TbxIdFromAdmin = "1082051/741088"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+ 
+	Set TbxIdFromAdmin = "491732/275913"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+ 
+	Set TbxIdFromAdmin = "865399/594221"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+ 
+	Set TbxIdFromAdmin = "491741/275920"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	// Tandembox.Aansturing.Test007 
+	Set TbxIdFromAdmin = "1304535/836133"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+	Set TbxIdFromAdmin = "1304540/836136"
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+
+ /*
+ 
+	Set TbxIdFromAdmin = ""
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+ 
+	Set TbxIdFromAdmin = ""
+	Do ..HermaakTbxProductVanGAData( $P(TbxIdFromAdmin,"/",2) , $$$True)
+ 
+ */
+]]></Implementation>
+</Method>
+
 <Method name="HermaakTbxProductVanGAData">
 <Description>
 d ##class(zTryout.WV.PM.Test).%New().HermaakTbxProductVanGAData(id,)</Description>