Index: AXimpl/Crm/CustomerAddressOut/Converter/AddressUpsertConverter.cls.xml =================================================================== diff -u -r48505 -r55701 --- AXimpl/Crm/CustomerAddressOut/Converter/AddressUpsertConverter.cls.xml (.../AddressUpsertConverter.cls.xml) (revision 48505) +++ AXimpl/Crm/CustomerAddressOut/Converter/AddressUpsertConverter.cls.xml (.../AddressUpsertConverter.cls.xml) (revision 55701) @@ -58,7 +58,13 @@ Set ..Address.Postcode = ..Formatter.FormatPostcode(Adres.GeefPostcode(),..Address.LandCodeISO3) Set ..Address.Plaats = Adres.GeefGemeente() Set ..Address.Telefoon = Adres.GeefTelefoon() - Set ..Address.Verzendwijze = $$SHOW^KLVERZW(,,,Adres.GeefVerzendingWijze()) + + // Geen conversie verzendwijze? KCA + // Deze conversie wijkt af en hanteert een ander formaat, anders dan alle andere die ADINTOAX gebruiken. + #dim VerzendWijze As %String = Adres.GeefVerzendingWijze() + Set VerzendWijze = $Replace(VerzendWijze,"GL4","DI1") + Set ..Address.Verzendwijze = $$SHOW^KLVERZW(,,,VerzendWijze) + Set ..Address.BezoekAdres = $$$False Set ..Address.FacturatieAdres = $$$False Set ..Address.LeveringAdres = $$$False