Index: AXimpl/Utils.cls.xml =================================================================== diff -u -r44856 -r44858 --- AXimpl/Utils.cls.xml (.../Utils.cls.xml) (revision 44856) +++ AXimpl/Utils.cls.xml (.../Utils.cls.xml) (revision 44858) @@ -168,28 +168,23 @@ #dim LeverancierNummer As %String = Product.Basis.LeverancierNummer #dim DefaultOrderType As %String = ..ConvertDefaultOrderType(Firma,Product) - If Firma = ##class(AXimpl.InterneFirmaInitialen).VanHoeckeNv() { + If Firma = ##class(AXimpl.InterneFirmaInitialen).VanHoeckeNv(){ If (DefaultOrderType = "Productie") { Set PrimaryVendorId = "06051" - } - ElseIf ((LinkType = "HH") || (LinkType = "HHZ")) { + } ElseIf ((LinkType = "HH") || (LinkType = "HHZ")){ Set PrimaryVendorId = "06332" - } - Else { + } Else { Set PrimaryVendorId = ##class(TECH.StringUtils).AddLeadingChar(LeverancierNummer,"0",5) } - } ElseIf Firma = ##class(AXimpl.InterneFirmaInitialen).HaluxNv() { - If ((LinkType '= "HH") && (LinkType '= "HHZ")) { + } ElseIf Firma = ##class(AXimpl.InterneFirmaInitialen).HaluxNv(){ + If ((LinkType '= "HH") && (LinkType '= "HHZ")){ Set PrimaryVendorId = "05497" - } - ElseIf (DefaultOrderType = "Productie") { + } ElseIf (DefaultOrderType = "Productie"){ Set PrimaryVendorId = "" - } - Else { + } Else { Set LeverancierNummer = ..ConvertorLeveranciersnummerVanHoeckeNaarHalux.ConvertorLeveranciersnummerVanHoeckeNaarHalux(LeverancierNummer) Set PrimaryVendorId = ##class(TECH.StringUtils).AddLeadingChar(LeverancierNummer,"0",5) - } - } Else { + }} Else { Write !,"Geef als parameter ofwel VHBE, ofwel HLX mee!" }