Index: APPS/Halux/PPS/Document/impl/common/OnderdelenPicking.cls.xml =================================================================== diff -u -r70842 -r70845 --- APPS/Halux/PPS/Document/impl/common/OnderdelenPicking.cls.xml (.../OnderdelenPicking.cls.xml) (revision 70842) +++ APPS/Halux/PPS/Document/impl/common/OnderdelenPicking.cls.xml (.../OnderdelenPicking.cls.xml) (revision 70845) @@ -388,17 +388,15 @@ Set RolOmschrijving = Product.HFV.GeefOmschrijving() Set TeGebruikenProductId = Product.HFV.GeefProductID() If (##class(TECH.StringUtils).Contains(RolOmschrijving,"(uit V1 ladezijkant)")) { - Set LadeHoogte = $Extract(Product.HFV.GeefKorttekst(), 5, 5) - If $$$Not(LadeHoogte = "N") { - Set RolOmschrijving = $Piece(RolOmschrijving, "(", 1) //deel tussen haakjes wegdoen - - Set LadeKleur = $Extract(Product.HFV.GeefKorttekst(), 23, 26) - Set KlantID = $Piece(##class(DOM.DomeinContext).Instance().GeefToeleveringAPI().GeefToelevering(Product.HFV.GeefToeleveringID()).GeefKlantID(), "K||",2) - If (##class(TECH.StringUtils).Contains(RolOmschrijving,"buitenkant")) { - Set TeGebruikenProductId = ..GeefAfdekkapBuiten(Variant, LadeKleur, KlantID) - } Else { - Set TeGebruikenProductId = ..GeefAfdekkapBinnen(Variant, LadeHoogte, LadeKleur, KlantID) - } + Set LadeHoogte = $Extract(Product.HFV.GeefKorttekst(), 5, 5) + Set RolOmschrijving = $Piece(RolOmschrijving, "(", 1) //deel tussen haakjes wegdoen + + Set LadeKleur = $Extract(Product.HFV.GeefKorttekst(), 23, 26) + Set KlantID = $Piece(##class(DOM.DomeinContext).Instance().GeefToeleveringAPI().GeefToelevering(Product.HFV.GeefToeleveringID()).GeefKlantID(), "K||",2) + If (##class(TECH.StringUtils).Contains(RolOmschrijving,"buitenkant")) { + Set TeGebruikenProductId = ..GeefAfdekkapBuiten(Variant, LadeKleur, KlantID) + } Else { + Set TeGebruikenProductId = ..GeefAfdekkapBinnen(Variant, LadeHoogte, LadeKleur, KlantID) } } Set Product.HFV.Aantal = Product.HFV.Aantal