Index: WSimpl/Halux/AAP/DnaCodeService.cls.xml =================================================================== diff -u -r73854 -r74433 --- WSimpl/Halux/AAP/DnaCodeService.cls.xml (.../DnaCodeService.cls.xml) (revision 73854) +++ WSimpl/Halux/AAP/DnaCodeService.cls.xml (.../DnaCodeService.cls.xml) (revision 74433) @@ -388,7 +388,9 @@ Do ..DnaCodeRepository.Bewaar(DnaCode) #dim MesFaseActief As %Integer = 1 - If (..MESService.IsActiefVoorMes(DnaCode.Lijn, MesFaseActief)) { + #dim ProductTypeAPI As DOM.PM.ProductTypeAPI = ##class(DOM.DomeinContext).Instance().GeefProductTypeAPI() + #dim CategorTLM As %Boolean = ((ProductTypeAPI.IsLegraboxProduct(DnaCode.ProductNummer) || ProductTypeAPI.IsMerivoboxProduct(DnaCode.ProductNummer) || ProductTypeAPI.IsTandemboxProduct(DnaCode.ProductNummer))) + If (..MESService.IsActiefVoorMes(DnaCode.Lijn, MesFaseActief) && CategorTLM) { #dim IsDnaCodeVoorSpaceStep As %Boolean = ..DnaCodeHelper.IsSpaceStepGeneriekProduct(DnaCode, DnaCode.ProductNummer) If $$$Not(IsDnaCodeVoorSpaceStep) { Do ..DocumentGenerator.GenereerDocumentVoorObjective(DnaCode.DnaCode)