Index: DOM/PM/Maatwerk/Calc/HF/enu/TAORRol/Verwerker.cls.xml =================================================================== diff -u -r61426 -r65991 --- DOM/PM/Maatwerk/Calc/HF/enu/TAORRol/Verwerker.cls.xml (.../Verwerker.cls.xml) (revision 61426) +++ DOM/PM/Maatwerk/Calc/HF/enu/TAORRol/Verwerker.cls.xml (.../Verwerker.cls.xml) (revision 65991) @@ -47,6 +47,8 @@ Do ..VerwerkKantenBand() } ElseIf TAORRol = "Koppeling" { Do ..VerwerkKoppeling() + } ElseIf TAORRol = "KoppelingAdapter" { + Do ..VerwerkKoppelingAdapter() } ElseIf TAORRol = "KoppelingSchroef" { Do ..VerwerkKoppelingSchroef() } ElseIf TAORRol = "LadeZijkant" { @@ -206,6 +208,12 @@ + +1 +1 + + + 1 1 Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOR/BuilderHFv002.cls.xml =================================================================== diff -u -r57434 -r65991 --- DOM/PM/Maatwerk/Calc/HF/impl/TAOR/BuilderHFv002.cls.xml (.../BuilderHFv002.cls.xml) (revision 57434) +++ DOM/PM/Maatwerk/Calc/HF/impl/TAOR/BuilderHFv002.cls.xml (.../BuilderHFv002.cls.xml) (revision 65991) @@ -22,6 +22,7 @@ Do ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.Generated.HFGlijderv000).%New(##this) Do ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFKoppelingv001).%New(##this) Do ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFKoppelingSchroefv000).%New(##this) + Do ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFKoppelingAdapterv000).%New(##this) Do ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFFrontBevestigingv001).%New(##this) Do ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFFrontBevestigingSchroefv001).%New(##this) Do ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFRugWandHouderv001).%New(##this) Index: DOM/PM/Maatwerk/Calc/HF/enu/TAORRol/AutoComplete.cls.xml =================================================================== diff -u -r61426 -r65991 --- DOM/PM/Maatwerk/Calc/HF/enu/TAORRol/AutoComplete.cls.xml (.../AutoComplete.cls.xml) (revision 61426) +++ DOM/PM/Maatwerk/Calc/HF/enu/TAORRol/AutoComplete.cls.xml (.../AutoComplete.cls.xml) (revision 65991) @@ -128,6 +128,13 @@ 1 + +%String +"KoppelingAdapter" +1 +1 + + %String "KoppelingSchroef" Index: vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/ProductieRoute/Koppeling/Test.cls.xml =================================================================== diff -u -r58725 -r65991 --- vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/ProductieRoute/Koppeling/Test.cls.xml (.../Test.cls.xml) (revision 58725) +++ vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/ProductieRoute/Koppeling/Test.cls.xml (.../Test.cls.xml) (revision 65991) @@ -86,6 +86,43 @@ ]]> + + + + + + + + + + + + 1 DOM.PM.Maatwerk.Calc.HF.IHalffabItemBuilder Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFKoppelingv001.cls.xml =================================================================== diff -u -r58818 -r65991 --- DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFKoppelingv001.cls.xml (.../HFKoppelingv001.cls.xml) (revision 58818) +++ DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFKoppelingv001.cls.xml (.../HFKoppelingv001.cls.xml) (revision 65991) @@ -29,10 +29,11 @@ If (IngegevenKenmerken.KoppelingType = ..Enum.KoppelingType.Schroef) { Set HalffabItem.ProductieRoute = ..GeefProductieRouteVoorKoppelingTypeSchroef(IngegevenKenmerken) - } ElseIf (IngegevenKenmerken.KoppelingType = ..Enum.KoppelingType.Drevel) { - Set HalffabItem.ProductieRoute = ..GeefProductieRouteVoorKoppelingTypeDrevel(IngegevenKenmerken) + } ElseIf ((IngegevenKenmerken.KoppelingType = ..Enum.KoppelingType.Drevel) || (IngegevenKenmerken.KoppelingType = ..Enum.KoppelingType.Movento)) { + Set HalffabItem.ProductieRoute = ..GeefProductieRouteVoorKoppelingTypeDrevelEnMovento(IngegevenKenmerken) } - If (IngegevenKenmerken.IsBinnenlade) && ((IngegevenKenmerken.VerpakkingType = ..Enum.VerpakkingType.V1) || (IngegevenKenmerken.VerpakkingType = ..Enum.VerpakkingType.Probox)){ + + If ((IngegevenKenmerken.IsBinnenlade) && ..IngegevenKenmerkenTypeApi.IsGemonteerdeLade(IngegevenKenmerken)){ Set HalffabItem.OpnemenInEindproduct = $$$True Set HalffabItem.BuilderBepaaltOpnemenInEindproduct = $$$True } @@ -58,7 +59,7 @@ ]]> - + IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken 1 TECH.String Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel.cls.xml =================================================================== diff -u -r54614 -r65991 --- APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel.cls.xml (.../TaorboxModel.cls.xml) (revision 54614) +++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel.cls.xml (.../TaorboxModel.cls.xml) (revision 65991) @@ -123,6 +123,7 @@ Do ..VoegToeRol(##class(APPS.PM.Maatwerk.MaatwerkModel.Modellen.TaorboxModel.Rollen.BodemOndersteuningSchroef).%New($this).GeefRol()) Do ..VoegToeRol(##class(APPS.PM.Maatwerk.MaatwerkModel.Modellen.TaorboxModel.Rollen.FrontBevestigingSchroef).%New($this).GeefRol()) Do ..VoegToeRol(##class(APPS.PM.Maatwerk.MaatwerkModel.Modellen.TaorboxModel.Rollen.KoppelingSchroef).%New($this).GeefRol()) + Do ..VoegToeRol(##class(APPS.PM.Maatwerk.MaatwerkModel.Modellen.TaorboxModel.Rollen.KoppelingAdapter).%New($this).GeefRol()) Do ..VoegToeRol(##class(APPS.PM.Maatwerk.MaatwerkModel.Modellen.TaorboxModel.Rollen.DiepteVerstellingSchroef).%New($this).GeefRol()) Do ..VoegToeRol(##class(APPS.PM.Maatwerk.MaatwerkModel.Modellen.TaorboxModel.Rollen.RugWandHouder).%New($this).GeefRol()) ; andere volgorde dan in BuilderHFv001 Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/Generated/HFKoppelingAdapterv000.cls.xml =================================================================== diff -u --- DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/Generated/HFKoppelingAdapterv000.cls.xml (revision 0) +++ DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/Generated/HFKoppelingAdapterv000.cls.xml (revision 65991) @@ -0,0 +1,54 @@ + + + + +Gegenereerde klasse via APPS.PM.Maatwerk.MaatwerkModel.impl.ModelUtils +1 +DOM.PM.Maatwerk.TAX.impl.Base,DOM.PM.Maatwerk.Calc.HF.IHalffabItemBuilder + + +SamengesteldHalffabItemBuilder:DOM.PM.Maatwerk.Calc.HF.ISamengesteldHalffabItemBuilder +1 +1 +%Status + + + + +1 +DOM.PM.Maatwerk.Calc.HF.IHalffabListToItemProcessor + + + + +IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext +1 +%Boolean + + + + + + + + + +IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext +%ListOfObjects +ELEMENTTYPE="DOM.PM.Maatwerk.Calc.HF.Halffab" + + + + + + Index: DOM/PM/Maatwerk/Calc/HF/enu/TAORRol.cls.xml =================================================================== diff -u -r61426 -r65991 --- DOM/PM/Maatwerk/Calc/HF/enu/TAORRol.cls.xml (.../TAORRol.cls.xml) (revision 61426) +++ DOM/PM/Maatwerk/Calc/HF/enu/TAORRol.cls.xml (.../TAORRol.cls.xml) (revision 65991) @@ -8,11 +8,11 @@ DOM.PM.Maatwerk.Calc.HF.enu.HalffabRol -;ZijkantLinks;ZijkantRechts;LadeZijkant;Bodem;Rug;Front;Glijder;Koppeling;FrontBevestiging;RugWandHouderSchroef;GeleiderBevestigingSchroeven;BodemOndersteuningSchroef;FrontBevestigingSchroef;KoppelingSchroef;RugWandHouder;Tipon;Zijstabilisering;DiepteVerstelling;BodemOndersteuning;Verpakking;Opvullijst;TiponSynchronisatieTandwiel;TiponSynchronisatieStang;TiponBlumotionSetEenhedenEnMeenemers;TiponBlumotionSynchronisatieAdapter;TiponBlumotionSynchronisatieStang;BodemPlaat;RugPlaat;FrontPlaat;ZijkantPlaat;FrontEindkap;AfdekkapBoven;KantenBand;ZijkantBestukking;ZijkantBestukkingVooraan;ZijkantBevestigingVeer;HulsInsteekpenGeleider;SetSchroeven;DiepteVerstellingSchroef;ZijkantLogo;PalletKartonvulstuk +;ZijkantLinks;ZijkantRechts;LadeZijkant;Bodem;Rug;Front;Glijder;Koppeling;FrontBevestiging;RugWandHouderSchroef;GeleiderBevestigingSchroeven;BodemOndersteuningSchroef;FrontBevestigingSchroef;KoppelingSchroef;RugWandHouder;Tipon;Zijstabilisering;DiepteVerstelling;BodemOndersteuning;Verpakking;Opvullijst;TiponSynchronisatieTandwiel;TiponSynchronisatieStang;TiponBlumotionSetEenhedenEnMeenemers;TiponBlumotionSynchronisatieAdapter;TiponBlumotionSynchronisatieStang;BodemPlaat;RugPlaat;FrontPlaat;ZijkantPlaat;FrontEindkap;AfdekkapBoven;KantenBand;ZijkantBestukking;ZijkantBestukkingVooraan;ZijkantBevestigingVeer;HulsInsteekpenGeleider;SetSchroeven;DiepteVerstellingSchroef;ZijkantLogo;PalletKartonvulstuk;KoppelingAdapter -;ZijkantLinks;ZijkantRechts;LadeZijkant;Bodem;Rug;Front;Glijder;Koppeling;FrontBevestiging;RugWandHouderSchroef;GeleiderBevestigingSchroeven;BodemOndersteuningSchroef;FrontBevestigingSchroef;KoppelingSchroef;RugWandHouder;Tipon;Zijstabilisering;DiepteVerstelling;BodemOndersteuning;Verpakking;Opvullijst;TiponSynchronisatieTandwiel;TiponSynchronisatieStang;TiponBlumotionSetEenhedenEnMeenemers;TiponBlumotionSynchronisatieAdapter;TiponBlumotionSynchronisatieStang;BodemPlaat;RugPlaat;FrontPlaat;ZijkantPlaat;FrontEindkap;AfdekkapBoven;KantenBand;ZijkantBestukking;ZijkantBestukkingVooraan;ZijkantBevestigingVeer;HulsInsteekpenGeleider;SetSchroeven;DiepteVerstellingSchroef;ZijkantLogo;PalletKartonvulstuk +;ZijkantLinks;ZijkantRechts;LadeZijkant;Bodem;Rug;Front;Glijder;Koppeling;FrontBevestiging;RugWandHouderSchroef;GeleiderBevestigingSchroeven;BodemOndersteuningSchroef;FrontBevestigingSchroef;KoppelingSchroef;RugWandHouder;Tipon;Zijstabilisering;DiepteVerstelling;BodemOndersteuning;Verpakking;Opvullijst;TiponSynchronisatieTandwiel;TiponSynchronisatieStang;TiponBlumotionSetEenhedenEnMeenemers;TiponBlumotionSynchronisatieAdapter;TiponBlumotionSynchronisatieStang;BodemPlaat;RugPlaat;FrontPlaat;ZijkantPlaat;FrontEindkap;AfdekkapBoven;KantenBand;ZijkantBestukking;ZijkantBestukkingVooraan;ZijkantBevestigingVeer;HulsInsteekpenGeleider;SetSchroeven;DiepteVerstellingSchroef;ZijkantLogo;PalletKartonvulstuk;KoppelingAdapter @@ -310,6 +310,13 @@ + + +1 +DOM.PM.Maatwerk.Calc.HF.enu.TAORRol + + Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/KoppelingAdapter.cls.xml =================================================================== diff -u --- APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/KoppelingAdapter.cls.xml (revision 0) +++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/KoppelingAdapter.cls.xml (revision 65991) @@ -0,0 +1,43 @@ + + + +APPS.PM.Maatwerk.MaatwerkModel.Modellen.TaorboxModel.Rol + + +%String +3184609 + + + +APPS.PM.Maatwerk.MaatwerkModel.dto.Rol + + + + +1 +APPS.PM.Maatwerk.MaatwerkModel.dto.RolConditie + + + + + + Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFKoppelingAdapterv000.cls.xml =================================================================== diff -u --- DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFKoppelingAdapterv000.cls.xml (revision 0) +++ DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFKoppelingAdapterv000.cls.xml (revision 65991) @@ -0,0 +1,58 @@ + + + +DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.Generated.HFKoppelingAdapterv000 + + +SamengesteldHalffabItemBuilder:DOM.PM.Maatwerk.Calc.HF.ISamengesteldHalffabItemBuilder +1 +1 +%Status + + + + + + + + + +IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext +1 +%Boolean + + + + +IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken +1 +%Boolean + + + + +Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext +1 +%Boolean + 0) +]]> + + + + +