Index: vhUnitTest/APPS/VisiDot/impl/BuildQueue.cls.xml
===================================================================
diff -u -r1717 -r1791
--- vhUnitTest/APPS/VisiDot/impl/BuildQueue.cls.xml	(.../BuildQueue.cls.xml)	(revision 1717)
+++ vhUnitTest/APPS/VisiDot/impl/BuildQueue.cls.xml	(.../BuildQueue.cls.xml)	(revision 1791)
@@ -6,11 +6,11 @@
 <Super>%RegisteredObject</Super>
 <ClassDefinitionError>0</ClassDefinitionError>
 
-<Parameter name="QueueList">
+<Property name="QueueList">
 <Description>
 format PRNr;Aantal;VHOSS.Zijkant</Description>
-<Default>418581;3;1.1\418582;2;1.1\418588;4;1.1\418589;4;1.1\418609;5;1.1\418703;2;1.1\418704;1;1.1\418715;4;1.1\427384;5;2.1\427390;20;2.1\427394;1;2.1\427470;14;2.2\427478;2;2.2\460765;2;2.2</Default>
-</Parameter>
+<Type>%String</Type>
+</Property>
 
 <Property name="BatchID">
 <Type>%Integer</Type>
@@ -46,6 +46,7 @@
 </Property>
 
 <Method name="Initialize">
+<FormalSpec>BatchID:%Integer,SlotLabel:%Integer,TOENr:%Integer,KLNr:%Integer,SequenceNr:%Integer,QueueList:%String</FormalSpec>
 <Implementation><![CDATA[
 
 	Set ..BatchID=99999
@@ -54,13 +55,14 @@
 	Set ..TOENr=234567
 	Set ..KLNr=1239
 	Set ..SequenceNr=0
+	Set ..QueueList = QueueList
 	Do ..DeleteBatch()
 ]]></Implementation>
 </Method>
 
 <Method name="BuildBatch">
 <Implementation><![CDATA[
-	Set QueueList=..#QueueList
+	Set QueueList=..QueueList
 	For I=1:1:$L(QueueList,"\") 
 	{
 		Set PRNr=$P($P(QueueList,"\",I),";",1)