Index: vhTest/Mock/APPS/Halux/AAP/DnaCodeService.cls.xml
===================================================================
diff -u -r71890 -r74747
--- vhTest/Mock/APPS/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 71890)
+++ vhTest/Mock/APPS/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 74747)
@@ -28,6 +28,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefAantalVanProductOpPallet">
+<FormalSpec>ProdutNummer:%String,PalletCode:%String</FormalSpec>
+<ReturnType>%Integer</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefAantalVanProductOpPallet",ProdutNummer,PalletCode)
+]]></Implementation>
+</Method>
+
 <Method name="GeefDnaCodeViaToeleveringIdEnSequentieNummerEnProductNummerEnRecent">
 <FormalSpec>ToeleveringId:%String,SequentieNummer:%String,ProductNummer:%String</FormalSpec>
 <ReturnType>%String</ReturnType>
@@ -42,13 +49,41 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefDnaCodesViaBatchIdEnSequentienummer">
+<FormalSpec>BatchId:%String,Sequentienummer:%String</FormalSpec>
+<ReturnType>TECH.Iterator</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefDnaCodesViaBatchIdEnSequentienummer",BatchId,Sequentienummer)
+]]></Implementation>
+</Method>
+
+<Method name="GeefPalletKantABVoorProduct">
+<FormalSpec>ProductNummer:%String,PalletCode:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefPalletKantABVoorProduct",ProductNummer,PalletCode)
+]]></Implementation>
+</Method>
+
+<Method name="GeefProductieLijnVoorPallet">
+<FormalSpec>PalletCode:%String</FormalSpec>
+<ReturnType>%Integer</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefProductieLijnVoorPallet",PalletCode)
+]]></Implementation>
+</Method>
+
 <Method name="GeefVolgendeAfTeDrukkenDnaCode">
 <FormalSpec>ToeleveringID:%String,ProductID:%String,SequentieNummer:%String="",Herafdruk:%Boolean=$$$False,BatchId:%String="",IsKlantEtiketSpaceStep:%Boolean=$$$False</FormalSpec>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefVolgendeAfTeDrukkenDnaCode",ToeleveringID,ProductID,SequentieNummer,Herafdruk,BatchId,IsKlantEtiketSpaceStep)
 ]]></Implementation>
 </Method>
 
+<Method name="IsIngekortePalletCodeVanABPallet">
+<FormalSpec>PalletCode:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("IsIngekortePalletCodeVanABPallet",PalletCode)
+]]></Implementation>
+</Method>
+
 <Method name="MaakDnaCodesVoorBatch">
 <FormalSpec>Batch:APPS.Halux.common.impl.BatchImpl</FormalSpec>
 <ReturnType>%ListOfDataTypes</ReturnType>
@@ -69,8 +104,8 @@
 </Method>
 
 <Method name="VulInSequentieId">
-<FormalSpec>SequentieId:%String,BatchId:%String,ToeleveringId:%String,ToeleveringlijnId:%String</FormalSpec>
-<Implementation><![CDATA[	do ..VerwerkMethodCall("VulInSequentieId",SequentieId,BatchId,ToeleveringId,ToeleveringlijnId)
+<FormalSpec>SequentieId:%String,BatchId:%String,ToeleveringId:%String,ToeleveringlijnId:%String,ProductId:%String=""</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("VulInSequentieId",SequentieId,BatchId,ToeleveringId,ToeleveringlijnId,ProductId)
 ]]></Implementation>
 </Method>