Index: DOM/PM/impl/DataM/MATLangteksten.cls.xml =================================================================== diff -u -r65068 -r65270 --- DOM/PM/impl/DataM/MATLangteksten.cls.xml (.../MATLangteksten.cls.xml) (revision 65068) +++ DOM/PM/impl/DataM/MATLangteksten.cls.xml (.../MATLangteksten.cls.xml) (revision 65270) @@ -145,7 +145,25 @@ Set IngegevenLadeKenmerken.ZijWandType = ##class(DOM.PM.enu.LBXZijWandType).Free() } } ElseIf (IsMvxLade) { - Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.UnimplementedException).%New("GeefNodigeIngegevenLadeKenmerken voor MVX is nog niet geïmplementeerd")) + Set IngegevenLadeKenmerken = ##class(DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken).%New() + Set IngegevenLadeKenmerken.LadeDiepte = ..IngegevenKenmerken.GUIKenmerken.LadeDiepte + + Set UitsparingData.AantalUitsparingen = ..IngegevenKenmerken.UitsparingData.AantalUitsparingen + Set UitsparingData.RugDeelX = ..IngegevenKenmerken.UitsparingData.RugDeelBreedteX + Set UitsparingData.UitsparingZ1 = ..VoegToeLegeRugHoogtePiece(..IngegevenKenmerken.UitsparingData.UitsparingCodeZ1) // Lege RugHoogte toevoegen is nodig omdat we de LadeUitsparingHelper gebruiken + Set UitsparingData.RugDeelM = ..IngegevenKenmerken.UitsparingData.RugDeelBreedteM + Set UitsparingData.UitsparingZ2 = ..VoegToeLegeRugHoogtePiece(..IngegevenKenmerken.UitsparingData.UitsparingCodeZ2) + Set UitsparingData.RugDeelY = ..IngegevenKenmerken.UitsparingData.RugDeelBreedteY + + Set IngegevenLadeKenmerken.UitsparingData = UitsparingData + + If (..IngegevenKenmerken.LadeToepassing = ##class(DOM.PM.enu.MATLadeToepassing).SifonLade()) { + Set IngegevenLadeKenmerken.Toepassing = ##class(DOM.PM.enu.MVXToepassing).Sifon() + } + + If (..IngegevenKenmerken.LadeToepassing = ##class(DOM.PM.enu.MATLadeToepassing).SpoelbakLade()) { + Set IngegevenLadeKenmerken.Toepassing = ##class(DOM.PM.enu.MVXToepassing).Spoelbak() + } } ElseIf (IsTbxLade) { Set IngegevenLadeKenmerken = ##class(DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken).%New() Set IngegevenLadeKenmerken.LadeDiepte = ..IngegevenKenmerken.GUIKenmerken.LadeDiepte