Index: vhTest/Fake/DOM/PM/Maatwerk/IngegevenKenmerkenTypeAPI.cls.xml
===================================================================
diff -u -r29059 -r57936
--- vhTest/Fake/DOM/PM/Maatwerk/IngegevenKenmerkenTypeAPI.cls.xml (.../IngegevenKenmerkenTypeAPI.cls.xml) (revision 29059)
+++ vhTest/Fake/DOM/PM/Maatwerk/IngegevenKenmerkenTypeAPI.cls.xml (.../IngegevenKenmerkenTypeAPI.cls.xml) (revision 57936)
@@ -32,6 +32,13 @@
+
+
+IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken
+%Boolean
+
+
Index: APPS/Halux/PPS/Activiteit/impl/LBX/LBXLadePersen/InfoBepaler.cls.xml
===================================================================
diff -u -r57209 -r57936
--- APPS/Halux/PPS/Activiteit/impl/LBX/LBXLadePersen/InfoBepaler.cls.xml (.../InfoBepaler.cls.xml) (revision 57209)
+++ APPS/Halux/PPS/Activiteit/impl/LBX/LBXLadePersen/InfoBepaler.cls.xml (.../InfoBepaler.cls.xml) (revision 57936)
@@ -56,6 +56,9 @@
If ..IngegevenKenmerkenTypeAPI.IsSifonlade(IngegevenKenmerken) {
Set Info = ..GeefInfoMetMelding(Info,"SIFON")
}
+ If ..IngegevenKenmerkenTypeAPI.IsSmalleLade(IngegevenKenmerken) {
+ Set Info = ..GeefInfoMetMelding(Info,"SMAL")
+ }
if ..MeldSynchronisatiestang(IngegevenKenmerken, HalffabItemsBoom) {
Set Info = ..GeefInfoMetMelding(Info,"SYNCST")
}
Index: APPS/Halux/PPS/Activiteit/impl/LBX/LBXLadePersen.cls.xml
===================================================================
diff -u -r30711 -r57936
--- APPS/Halux/PPS/Activiteit/impl/LBX/LBXLadePersen.cls.xml (.../LBXLadePersen.cls.xml) (revision 30711)
+++ APPS/Halux/PPS/Activiteit/impl/LBX/LBXLadePersen.cls.xml (.../LBXLadePersen.cls.xml) (revision 57936)
@@ -93,7 +93,7 @@
#dim IngegevenKenmerkenTypeAPI As DOM.PM.Maatwerk.IngegevenKenmerkenTypeAPI = DomeinContext.GeefIngegevenKenmerkenTypeAPI()
- If IngegevenKenmerkenTypeAPI.IsSpoelbaklade(IngegevenKenmerken) || IngegevenKenmerkenTypeAPI.IsSifonlade(IngegevenKenmerken) {
+ If IngegevenKenmerkenTypeAPI.IsSpoelbaklade(IngegevenKenmerken) || IngegevenKenmerkenTypeAPI.IsSifonlade(IngegevenKenmerken) || IngegevenKenmerkenTypeAPI.IsSmalleLade(IngegevenKenmerken) {
Set UitvoeringInfo.Breedte = ##class(APPS.ApplicatieContext).Instance().GeefProductieAPI().GeefNietTePersenBreedteBepaler().BepaalNietTePersenBreedte()*10
Set UitvoeringInfo.GeperstStatus = ##class(APPS.Halux.PPS.Activiteit.impl.common.enu.LadePersStatus).NietTePersen()
}
Index: vhUnitTest/APPS/Halux/PPS/Activiteit/impl/LBX/LBXLadePersen/InfoBepaler/GeefInfo1/Test.cls.xml
===================================================================
diff -u -r57209 -r57936
--- vhUnitTest/APPS/Halux/PPS/Activiteit/impl/LBX/LBXLadePersen/InfoBepaler/GeefInfo1/Test.cls.xml (.../Test.cls.xml) (revision 57209)
+++ vhUnitTest/APPS/Halux/PPS/Activiteit/impl/LBX/LBXLadePersen/InfoBepaler/GeefInfo1/Test.cls.xml (.../Test.cls.xml) (revision 57936)
@@ -17,6 +17,7 @@
Set ..IngegevenKenmerkenTypeAPI = ##class(vhTest.Mock.DOM.PM.Maatwerk.IngegevenKenmerkenTypeAPI).%New()
Do ..IngegevenKenmerkenTypeAPI.IndienMethodCall("IsSpoelbaklade", ..IngegevenKenmerken).DanReturn($$$True)
Do ..IngegevenKenmerkenTypeAPI.IndienMethodCall("IsSifonlade", ..IngegevenKenmerken).DanReturn($$$False)
+ Do ..IngegevenKenmerkenTypeAPI.IndienMethodCall("IsSmalleLade", ..IngegevenKenmerken).DanReturn($$$False)
Do ..AssertInfo("R:SPOELBAK")
]]>
@@ -27,11 +28,23 @@
Set ..IngegevenKenmerkenTypeAPI = ##class(vhTest.Mock.DOM.PM.Maatwerk.IngegevenKenmerkenTypeAPI).%New()
Do ..IngegevenKenmerkenTypeAPI.IndienMethodCall("IsSpoelbaklade", ..IngegevenKenmerken).DanReturn($$$False)
Do ..IngegevenKenmerkenTypeAPI.IndienMethodCall("IsSifonlade", ..IngegevenKenmerken).DanReturn($$$True)
+ Do ..IngegevenKenmerkenTypeAPI.IndienMethodCall("IsSmalleLade", ..IngegevenKenmerken).DanReturn($$$False)
Do ..AssertInfo("R:SIFON")
]]>
+
+
+
+