Index: APPS/EDI/common/impl/LegacyConverter/LegacyNaarEdi.cls.xml =================================================================== diff -u -r39328 -r39402 --- APPS/EDI/common/impl/LegacyConverter/LegacyNaarEdi.cls.xml (.../LegacyNaarEdi.cls.xml) (revision 39328) +++ APPS/EDI/common/impl/LegacyConverter/LegacyNaarEdi.cls.xml (.../LegacyNaarEdi.cls.xml) (revision 39402) @@ -86,16 +86,13 @@ If Product.ItemOPVL = "L" { Set TBXProduct.HeeftOpvullijstLinks = $$$True Set TBXProduct.HeeftOpvullijstRechts = $$$False - } - If Product.ItemOPVL = "R" { + } ElseIf Product.ItemOPVL = "R" { Set TBXProduct.HeeftOpvullijstLinks = $$$False Set TBXProduct.HeeftOpvullijstRechts = $$$True - } - If Product.ItemOPVL = "L+R" { + } ElseIf Product.ItemOPVL = "L+R" { Set TBXProduct.HeeftOpvullijstLinks = $$$True Set TBXProduct.HeeftOpvullijstRechts = $$$True - } - If Product.ItemOPVL = "" { + } ElseIf Product.ItemOPVL = "" { Set TBXProduct.HeeftOpvullijstLinks = $$$False Set TBXProduct.HeeftOpvullijstRechts = $$$False } @@ -110,12 +107,10 @@ If ##class(TECH.StringUtils).Equals(Product.ItemFS,"A","") { Set TBXProduct.FrontOndersteuningAantal = "" Set TBXProduct.FrontOndersteuningType = ##class(DOM.PM.enu.TBXFrontOndersteuningType).Auto() - } - If Product.ItemFS = "HS" { + } ElseIf Product.ItemFS = "HS" { Set TBXProduct.FrontOndersteuningAantal = "" Set TBXProduct.FrontOndersteuningType = ##class(DOM.PM.enu.TBXFrontOndersteuningType).FrontSteunMetSchroeven() - } - If ##class(TECH.StringUtils).Equals(Product.ItemFS, 1,2,3){ + } ElseIf ##class(TECH.StringUtils).Equals(Product.ItemFS, 1,2,3){ Set TBXProduct.FrontOndersteuningAantal = Product.ItemFS Set TBXProduct.FrontOndersteuningType = ##class(DOM.PM.enu.TBXFrontOndersteuningType).FrontStabilisator() } @@ -130,23 +125,19 @@ Set TBXProduct.ZijwandVerhogingMateriaal = ##class(DOM.PM.enu.TBXZijwandVerhogingMateriaal).Glas() Set TBXProduct.ZijwandVerhogingKleur = ##class(DOM.PM.enu.TBXZijwandVerhogingKleur).FloatHelder8mm() Set TBXProduct.ZijwandVerhogingType = "DesignElement" - } - If Product.ItemKV = "FZ8"{ + } ElseIf Product.ItemKV = "FZ8"{ Set TBXProduct.ZijwandVerhogingMateriaal = ##class(DOM.PM.enu.TBXZijwandVerhogingMateriaal).Glas() Set TBXProduct.ZijwandVerhogingKleur = ##class(DOM.PM.enu.TBXZijwandVerhogingKleur).FloatGezuurd8mm() Set TBXProduct.ZijwandVerhogingType = "DesignElement" - } - If Product.ItemKV = "ALU.MG"{ + } ElseIf Product.ItemKV = "ALU.MG"{ Set TBXProduct.ZijwandVerhogingMateriaal = ##class(DOM.PM.enu.TBXZijwandVerhogingMateriaal).Aluminium() Set TBXProduct.ZijwandVerhogingKleur = ##class(DOM.PM.enu.TBXZijwandVerhogingKleur).MetallicGrijs() Set TBXProduct.ZijwandVerhogingType = "DesignElement" - } - If Product.ItemKV = "ALU.BZ"{ + } ElseIf Product.ItemKV = "ALU.BZ"{ Set TBXProduct.ZijwandVerhogingMateriaal = ##class(DOM.PM.enu.TBXZijwandVerhogingMateriaal).Aluminium() Set TBXProduct.ZijwandVerhogingKleur = ##class(DOM.PM.enu.TBXZijwandVerhogingKleur).TerraZwart() Set TBXProduct.ZijwandVerhogingType = "DesignElement" - } - If Product.ItemKV = "ALU.SW"{ + } ElseIf Product.ItemKV = "ALU.SW"{ Set TBXProduct.ZijwandVerhogingMateriaal = ##class(DOM.PM.enu.TBXZijwandVerhogingMateriaal).Aluminium() Set TBXProduct.ZijwandVerhogingKleur = ##class(DOM.PM.enu.TBXZijwandVerhogingKleur).ZijdeWit() Set TBXProduct.ZijwandVerhogingType = "DesignElement" @@ -189,23 +180,19 @@ Set TBXProduct.MatKleur = ##class(DOM.PM.enu.MATKleur).ZwartAntislip() Set TBXProduct.MatMateriaal = ##class(DOM.PM.enu.MATMateriaal).Antislip() Set TBXProduct.HeeftMat = $$$True - } - If Product.ItemASM = "ZW.AF" { + } ElseIf Product.ItemASM = "ZW.AF" { Set TBXProduct.MatKleur = ##class(DOM.PM.enu.MATKleur).AntiSlipFiberZwart() Set TBXProduct.MatMateriaal = ##class(DOM.PM.enu.MATMateriaal).AntislipFiber() Set TBXProduct.HeeftMat = $$$True - } - If Product.ItemASM = "WI.AF" { + } ElseIf Product.ItemASM = "WI.AF" { Set TBXProduct.MatKleur = ##class(DOM.PM.enu.MATKleur).AntiSlipFiberWit() Set TBXProduct.MatMateriaal = ##class(DOM.PM.enu.MATMateriaal).AntislipFiber() Set TBXProduct.HeeftMat = $$$True - } - If Product.ItemASM = "G" { + } ElseIf Product.ItemASM = "G" { Set TBXProduct.MatKleur = ##class(DOM.PM.enu.MATKleur).Antraciet() Set TBXProduct.MatMateriaal = ##class(DOM.PM.enu.MATMateriaal).Antislip() Set TBXProduct.HeeftMat = $$$True - } - If Product.ItemASM = "" { + } ElseIf Product.ItemASM = "" { Set TBXProduct.MatKleur = "" Set TBXProduct.MatMateriaal = "" Set TBXProduct.HeeftMat = $$$False @@ -219,11 +206,9 @@