Index: APPS/VKP/Maatwerk/LadeRegistratie/impl/IDataOphaler.cls.xml
===================================================================
diff -u -r69579 -r71851
--- APPS/VKP/Maatwerk/LadeRegistratie/impl/IDataOphaler.cls.xml	(.../IDataOphaler.cls.xml)	(revision 69579)
+++ APPS/VKP/Maatwerk/LadeRegistratie/impl/IDataOphaler.cls.xml	(.../IDataOphaler.cls.xml)	(revision 71851)
@@ -215,7 +215,7 @@
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
-	Set:DossierCode?1(1"T",1"H",1"L")2.5E1N DossierCode=$E(DossierCode,2,$L(DossierCode)-1) ; Strip eerste letter (=familie) en laatste letter (=checkdigit)
+	Set:DossierCode?1(1"T",1"H",1"L",1"A")2.5E1N DossierCode=$E(DossierCode,2,$L(DossierCode)-1) ; Strip eerste letter (=familie) en laatste letter (=checkdigit)
 	Set pxCriteria=..InitCriteria(DossierCode)
 	Set blSearch=##class(BL.Prod.Search).%New()
 	Do blSearch.SearchIndex(pxCriteria,.Y)
Index: WSimpl/Halux/AAP/AfdrukService/EtiketAfdrukkenHelper.cls.xml
===================================================================
diff -u -r66459 -r71851
--- WSimpl/Halux/AAP/AfdrukService/EtiketAfdrukkenHelper.cls.xml	(.../EtiketAfdrukkenHelper.cls.xml)	(revision 66459)
+++ WSimpl/Halux/AAP/AfdrukService/EtiketAfdrukkenHelper.cls.xml	(.../EtiketAfdrukkenHelper.cls.xml)	(revision 71851)
@@ -121,6 +121,7 @@
 <Implementation><![CDATA[
 	Quit:(Werkpost="TAO")||(Werkpost="TAX") "Halux_TaorMontage"
 	Quit:(Werkpost="P1") "Halux_LadeAfw_BWK"
+	Quit:(Werkpost="MP4") "Halux_LadeAfw_BWK"
 	
 	#dim Productielijn As %String
 	Set Productielijn = ..VertaalWerkpostNaarResource(Werkpost)