Index: APPS/EDI/common/impl/LegacyConverter/EdiNaarLegacy.cls.xml
===================================================================
diff -u -r65917 -r66238
--- APPS/EDI/common/impl/LegacyConverter/EdiNaarLegacy.cls.xml	(.../EdiNaarLegacy.cls.xml)	(revision 65917)
+++ APPS/EDI/common/impl/LegacyConverter/EdiNaarLegacy.cls.xml	(.../EdiNaarLegacy.cls.xml)	(revision 66238)
@@ -72,6 +72,9 @@
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
 	#dim LadeKleur As Prod.GAMeta.BT.TBLadeKleur = ##class(Prod.GAMeta.BT.TBLadeKleur).OpenViaItemCode(TBXProduct.ItemKL,TBXProduct.ItemDC,1)
+	If $$$Not($IsObject(LadeKleur)) {
+		Do ##class(TECH.Exceptions.InvalidInputException).Throw("Fout bij opvragen LadeKleur. Kon geen object openen voor Ladekleur='"_TBXProduct.ItemKL_"' en DesignCode='"_TBXProduct.ItemDC_"'.")
+	}
 	Set TBXProduct.ItemDS = LadeKleur.BepaalDesignID(TBXProduct.ItemDC)
 ]]></Implementation>
 </Method>
@@ -167,17 +170,17 @@
 <Private>1</Private>
 <Implementation><![CDATA[
 	#dim Uittrekbaarheid As %String = ##class(DOM.PM.enu.TBXUittrekbaarheid).Volledig()
-	#dim LadeDesign As %String = ..GeefLadeDesign(Product.LadeKleur)
+	#dim LadeDesign As %String = ..GeefLadeDesign(Product.LadeKleur, Product.DesignCode)
 	
 	Set TBXProduct.ItemLT = ..TBXLadeCodeBepaler.BepaalLadeCode(Product.Klasse, Product.ZijkantHoogte, Product.LadeHoogte, Product.IsBinnenlade, Uittrekbaarheid, LadeDesign)
 ]]></Implementation>
 </Method>
 
 <Method name="GeefLadeDesign">
-<FormalSpec>LadeKleur:%String</FormalSpec>
+<FormalSpec>LadeKleur:%String,DesignCodeId:%String</FormalSpec>
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit $Case(LadeKleur, "BZ":"ZA", "SW":"WA", "MG":"GA", "IN":"IA", :"")
+<Implementation><![CDATA[	Quit $Case(LadeKleur, "BZ":"ZA", "SW":"WA", "MG":$$$If(DesignCodeId="MA","GMA","GA"), "IN":"IA", "OG":"OMT", :"")
 ]]></Implementation>
 </Method>