Index: APPS/VKP/VerzendWijze/DueOutProductieBepaler.cls.xml =================================================================== diff -u -r72495 -r75010 --- APPS/VKP/VerzendWijze/DueOutProductieBepaler.cls.xml (.../DueOutProductieBepaler.cls.xml) (revision 72495) +++ APPS/VKP/VerzendWijze/DueOutProductieBepaler.cls.xml (.../DueOutProductieBepaler.cls.xml) (revision 75010) @@ -58,14 +58,15 @@ #dim DueOutProductieTime As %Time = "" #dim Categorie As APPS.Halux.common.enu.Categorie = ..GeefCategorie(ProductNummer) #dim IsKlantOIC As %Boolean = (KlantNummer = ..LegacyPartijAPI.GeefKlantNummerVoorPartijID(##class(DOM.VKP.enu.Klant).OIC())) + #dim IsKlantHMPC As %Boolean = (KlantNummer = ..LegacyPartijAPI.GeefKlantNummerVoorPartijID(##class(DOM.VKP.enu.Klant).HMPC())) If (Categorie = ##class(APPS.Halux.common.enu.Categorie).Mat()) { Set DueOutProductieTime = ..DueOutProductieBepaler.GeefDueOutProductieTime(ProductieDatum) } Else { #dim Klant As DOM.VKP.VanHoeckeKlant = ..VerkoopAPI.GeefKlant(..LegacyPartijAPI.GeefKlantPartijID(KlantNummer)) #dim KlantOrderInstellingen As DOM.VKP.KlantOrderInstellingen = Klant.GeefKlantOrderInstellingen() - If IsKlantOIC { + If (IsKlantOIC || IsKlantHMPC) { Set DueOutProductieTime = $$INTTIME^vhLib.DataTypes("09:00") } ElseIf ..IsPersonalityVoorWegwerppallet(Klant, OrderID) { Set DueOutProductieTime = $$INTTIME^vhLib.DataTypes("16:00")