Index: APPS/Halux/PPS/Activiteit/impl/common/dto/ProductieUitvoeringInfo.cls.xml =================================================================== diff -u -r63069 -r69900 --- APPS/Halux/PPS/Activiteit/impl/common/dto/ProductieUitvoeringInfo.cls.xml (.../ProductieUitvoeringInfo.cls.xml) (revision 63069) +++ APPS/Halux/PPS/Activiteit/impl/common/dto/ProductieUitvoeringInfo.cls.xml (.../ProductieUitvoeringInfo.cls.xml) (revision 69900) @@ -97,6 +97,10 @@ %String + +%Boolean + + %Library.CacheStorage ProductieUitvoeringInfoDefaultData @@ -171,6 +175,9 @@ InschuifElementInfo + +IsMyLegra + Index: APPS/Halux/PPS/Activiteit/impl/LBX/LBXLadePersen/InfoBepaler.cls.xml =================================================================== diff -u -r67555 -r69900 --- APPS/Halux/PPS/Activiteit/impl/LBX/LBXLadePersen/InfoBepaler.cls.xml (.../InfoBepaler.cls.xml) (revision 67555) +++ APPS/Halux/PPS/Activiteit/impl/LBX/LBXLadePersen/InfoBepaler.cls.xml (.../InfoBepaler.cls.xml) (revision 69900) @@ -83,6 +83,10 @@ } Set Info = ..GeefInfoMetMelding(Info, FreeString) } + If (IngegevenKenmerken.ZijWandType = ##class(DOM.PM.enu.LBXZijWandType).Design()) { + #dim MyLegraString As TECH.String = "MyLegra" + Set Info = ..GeefInfoMetMelding(Info, FreeString) + } If ..IngegevenKenmerkenAPI.HeeftGekoppeldeMat(IngegevenKenmerken){ #dim MatKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.MATKenmerken = ..IngegevenKenmerkenAPI.GeefGekoppeldeKenmerken(IngegevenKenmerken,##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).MatX()) Set Info = ..GeefInfoMetMelding(Info, "Mat:"_..MatFormatter.GeefKorteNotatie(MatKenmerken.Materiaal,MatKenmerken.Kleur)) Index: APPS/Halux/Docs/impl/ZaagEtiketBuilder.cls.xml =================================================================== diff -u -r59479 -r69900 --- APPS/Halux/Docs/impl/ZaagEtiketBuilder.cls.xml (.../ZaagEtiketBuilder.cls.xml) (revision 59479) +++ APPS/Halux/Docs/impl/ZaagEtiketBuilder.cls.xml (.../ZaagEtiketBuilder.cls.xml) (revision 69900) @@ -64,7 +64,8 @@ %String 0) UitvoeringInfo.DwarsverdelingInfo = "DWARSV:" _IngegevenKenmerken.AantalDwarsverdelingen } + If (IngegevenKenmerken.ZijWandType = ##class(DOM.PM.enu.LBXZijWandType).Design()) { + Set UitvoeringInfo.IsMyLegra = $$$True + } + If SequentieItemItem.%Extends(##class(APPS.Halux.common.VHOSSProductieSequentieItem).%ClassName(1)) { #dim VHossItem As APPS.Halux.common.VHOSSProductieSequentieItem = SequentieItemItem Set UitvoeringInfo.VHossInfo = ##class(APPS.Halux.common.impl.VHossService).%New().GeefVHossInfo(VHossItem.VHOSSID, VHossItem.ZijVlakID, VHossItem.SlotID)