Index: APPS/Halux/PPS/Activiteit/impl/MVX/MVXLadePersen/InfoBepaler.cls.xml
===================================================================
diff -u -r67538 -r67553
--- APPS/Halux/PPS/Activiteit/impl/MVX/MVXLadePersen/InfoBepaler.cls.xml	(.../InfoBepaler.cls.xml)	(revision 67538)
+++ APPS/Halux/PPS/Activiteit/impl/MVX/MVXLadePersen/InfoBepaler.cls.xml	(.../InfoBepaler.cls.xml)	(revision 67553)
@@ -65,9 +65,9 @@
 	If ..IngegevenKenmerkenTypeAPI.IsSmalleLade(IngegevenKenmerken) {
 		Set Info = ..GeefInfoMetMelding(Info,"SMAL")
 	}
-	if ..VermeldSynchronisatiestang(IngegevenKenmerken, HalffabItemsBoom) {
+	if ..MoetInfoSynchronisatiestangVermelden(IngegevenKenmerken, HalffabItemsBoom) {
 		Set Info = ..GeefInfoMetMelding(Info,"SYNCST")
-	} ElseIf ..VermeldTiponBlumotionVoorSmalleLades(IngegevenKenmerken) {
+	} ElseIf ..MoetInfoTiponBlumotionVoorSmalleLadesVermelden(IngegevenKenmerken) {
 		Set Info = ..GeefInfoMetMelding(Info,"TOBS MONT")
 	}
 	Quit Info
@@ -88,7 +88,11 @@
 	}
 	
 	If (IngegevenKenmerken.ZijwandType = ##class(DOM.PM.enu.MVXZijWandType).RelingEnInschuifElement() && $$$Not(HalffabItemsBoom.BevatRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).InschuifElementZijkant()))) {
-			Set Info = ..GeefInfoMetMelding(Info, "ZI")
+		Set Info = ..GeefInfoMetMelding(Info, "ZI")
+	} ElseIf (..MoetInfoBoxcapVermelden(IngegevenKenmerken, HalffabItemsBoom)) {
+		Set Info = ..GeefInfoMetMelding(Info, "BCap")
+	} ElseIf (..MoetInfoBoxcoverVermelden(IngegevenKenmerken, HalffabItemsBoom)) {
+		Set Info = ..GeefInfoMetMelding(Info, "BCov")
 	}
 	
 	If ..IngegevenKenmerkenAPI.HeeftGekoppeldeMat(IngegevenKenmerken){
@@ -100,7 +104,7 @@
 		Set Info = ..GeefInfoMetMelding(Info, "DWV:"_IngegevenKenmerken.AantalDwarsverdelingen)
 	}
 	
-	If ..VermeldZijstabiliseringstang(IngegevenKenmerken) {
+	If ..MoetInfoZijstabiliseringstangVermelden(IngegevenKenmerken) {
 		Set Info = ..GeefInfoMetMelding(Info,"ZIJSTB")
 	}
 	
@@ -116,36 +120,62 @@
 ]]></Implementation>
 </Method>
 
-<Method name="VermeldSynchronisatiestang">
+<Method name="MoetInfoSynchronisatiestangVermelden">
 <FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken,HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom</FormalSpec>
 <Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[
-	#dim MeldSynchronisatiestang As %Boolean = $$$Not(IngegevenKenmerken.VerpakkingType = ##class(DOM.PM.enu.MVXVerpakkingType).V1())
-	Set MeldSynchronisatiestang = (MeldSynchronisatiestang && ..HeeftHalffabItemVoorStang(HalffabItemsBoom))
-	Quit MeldSynchronisatiestang
+	#dim MoetInfoVermelden As %Boolean = $$$Not(IngegevenKenmerken.VerpakkingType = ##class(DOM.PM.enu.MVXVerpakkingType).V1())
+	Set MoetInfoVermelden = (MoetInfoVermelden && ..HeeftHalffabItemVoorStang(HalffabItemsBoom))
+	Quit MoetInfoVermelden
 ]]></Implementation>
 </Method>
 
-<Method name="VermeldZijstabiliseringstang">
+<Method name="MoetInfoZijstabiliseringstangVermelden">
 <FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken</FormalSpec>
 <Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[
-	#dim MeldZijstabiliseringstang As %Boolean = $$$Not(IngegevenKenmerken.VerpakkingType = ##class(DOM.PM.enu.MVXVerpakkingType).V1())
-	Set MeldZijstabiliseringstang = (MeldZijstabiliseringstang && IngegevenKenmerken.HeeftZijstabilisering)
-	Quit MeldZijstabiliseringstang
+	#dim MoetInfoVermelden As %Boolean = $$$Not(IngegevenKenmerken.VerpakkingType = ##class(DOM.PM.enu.MVXVerpakkingType).V1())
+	Set MoetInfoVermelden = (MoetInfoVermelden && IngegevenKenmerken.HeeftZijstabilisering)
+	Quit MoetInfoVermelden
 ]]></Implementation>
 </Method>
 
-<Method name="VermeldTiponBlumotionVoorSmalleLades">
+<Method name="MoetInfoBoxcapVermelden">
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken,HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[
+	#dim MoetInfoVermelden As %Boolean = (IngegevenKenmerken.ZijwandType = ##class(DOM.PM.enu.MVXZijWandType).Boxcap())
+	Set MoetInfoVermelden = (MoetInfoVermelden && (IngegevenKenmerken.ProductieWijze = ##class(DOM.PM.enu.MVXProductieWijze).Volledig()))
+	Set MoetInfoVermelden = (MoetInfoVermelden && (IngegevenKenmerken.IsBinnenlade = $$$True))
+	Set MoetInfoVermelden = (MoetInfoVermelden && HalffabItemsBoom.BevatRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Boxcap()))
+	Quit MoetInfoVermelden
+]]></Implementation>
+</Method>
+
+<Method name="MoetInfoBoxcoverVermelden">
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken,HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[
+	#dim MoetInfoVermelden As %Boolean = (IngegevenKenmerken.ZijwandType = ##class(DOM.PM.enu.MVXZijWandType).Boxcover())
+	Set MoetInfoVermelden = (MoetInfoVermelden && (IngegevenKenmerken.ProductieWijze = ##class(DOM.PM.enu.MVXProductieWijze).Volledig()))
+	Set MoetInfoVermelden = (MoetInfoVermelden && (IngegevenKenmerken.IsBinnenlade = $$$True))
+	Set MoetInfoVermelden = (MoetInfoVermelden && HalffabItemsBoom.BevatRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).BoxcoverVoor()) && HalffabItemsBoom.BevatRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).BoxcoverAchter()))
+	Quit MoetInfoVermelden
+]]></Implementation>
+</Method>
+
+<Method name="MoetInfoTiponBlumotionVoorSmalleLadesVermelden">
 <FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken</FormalSpec>
 <Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[
-	#dim MeldTiponBlumotionVoorSmalleLades As %Boolean = (IngegevenKenmerken.GeleiderTechnologie = ##class(DOM.PM.enu.MVXGeleiderTechnologie).TIPONBLUMOTION())
-	Set MeldTiponBlumotionVoorSmalleLades = (MeldTiponBlumotionVoorSmalleLades && (IngegevenKenmerken.InterneBreedte < 360))
-	Quit MeldTiponBlumotionVoorSmalleLades
+	#dim MoetInfoVermelden As %Boolean = (IngegevenKenmerken.GeleiderTechnologie = ##class(DOM.PM.enu.MVXGeleiderTechnologie).TIPONBLUMOTION())
+	Set MoetInfoVermelden = (MoetInfoVermelden && (IngegevenKenmerken.InterneBreedte < 360))
+	Quit MoetInfoVermelden
 ]]></Implementation>
 </Method>