Index: DOM/VKP/impl/DataM/DataMOrder.cls.xml =================================================================== diff -u -r48505 -r48523 --- DOM/VKP/impl/DataM/DataMOrder.cls.xml (.../DataMOrder.cls.xml) (revision 48505) +++ DOM/VKP/impl/DataM/DataMOrder.cls.xml (.../DataMOrder.cls.xml) (revision 48523) @@ -333,8 +333,24 @@ Do ..AfleverAdresData.ZetPiece(23, Afleveradres.GeefVolmacht()) If ($$$HasLength(Afleveradres.GeefAxLeveradresId()) && (##class(DOM.DomeinContext).Instance().GeefProjectSettingsAPI().IsActiefAxLeverancierId())){ - Do ..AfleverAdresData.ZetPiece(29, Afleveradres.GeefAxLeveradresId()) + Do ..AfleverAdresData.ZetPiece(29, Afleveradres.GeefAxLeveradresId()) Do ..AfleverAdresData.ZetPiece(1, "") + #dim KlantLeveradres As DOM.VKP.LeverAdres + If ##class(DOM.VKP.impl.LeverAdresRepository).%New().BestaatViaAXLeverAdresId(Afleveradres.GeefAxLeveradresId()) { + Set KlantLeveradres = ##class(DOM.VKP.impl.LeverAdresRepository).%New().GeefViaAXLeverAdresId(Afleveradres.GeefAxLeveradresId()) + Do ..AfleverAdresData.ZetPiece(2, KlantLeveradres.GeefNaam()) + Do ..AfleverAdresData.ZetPiece(3, KlantLeveradres.GeefToenaam()) + Do ..AfleverAdresData.ZetPiece(4, KlantLeveradres.GeefAanspreking()) + Do ..AfleverAdresData.ZetPiece(5, KlantLeveradres.GeefStraat()) + Do ..AfleverAdresData.ZetPiece(6, KlantLeveradres.GeefPostcode()) + Do ..AfleverAdresData.ZetPiece(7, KlantLeveradres.GeefGemeente()) + Do ..AfleverAdresData.ZetPiece(8, KlantLeveradres.GeefLand().GeefID()) + Do ..AfleverAdresData.ZetPiece(9, KlantLeveradres.GeefTaal()) + Do ..AfleverAdresData.ZetPiece(24, KlantLeveradres.GeefOpmerking1()) + Do ..AfleverAdresData.ZetPiece(25, KlantLeveradres.GeefOpmerking2()) + Do ..AfleverAdresData.ZetPiece(26, KlantLeveradres.GeefVerzendingWijze()) + Do ..AfleverAdresData.ZetPiece(23, KlantLeveradres.GeefVolmacht()) + } } } Else {