Index: BL/MB/UGLYPicking/OrderReservatie.cls.xml
===================================================================
diff -u -r66391 -r66501
--- BL/MB/UGLYPicking/OrderReservatie.cls.xml	(.../OrderReservatie.cls.xml)	(revision 66391)
+++ BL/MB/UGLYPicking/OrderReservatie.cls.xml	(.../OrderReservatie.cls.xml)	(revision 66501)
@@ -702,10 +702,10 @@
  . . Set LadeType = ##class(DOM.DomeinContext).Instance().GeefProductTypeAPI().GeefProduktType(ProdLoop)
  . . Set LadeTypes = ##class(DOM.PM.enu.ProductType.AutoComplete).%New()
  . . Set GeenLade = $$$Not( ##class(TECH.StringUtils).Equals(LadeType,LadeTypes.Tandembox,LadeTypes.Legrabox,LadeTypes.TAORbox,LadeTypes.Merivobox))
- . . If GeenLade || $$$Not(##class(TECH.StringUtils).Equals($Piece($Get(^ORDW("D",ConsNr)),"\",1),"25868","24315","23112","6780")) ;geen fallback voor KVIK,DKG,De Decker JB
+ . . If GeenLade || $$$Not(##class(TECH.StringUtils).Equals($Piece($Get(^ORDW("D",ConsNr)),"\",1),"25868","24315","23112","6780")) Do   ;geen fallback voor KVIK,DKG,De Decker JB
  . . . $$$WriteToLog("################### reservatie niet gelukt met info uit EWPAL, fallback hier nodig ########################")
  . . . Set tmpStatus=..FStartReservePallets(ConsNr,Magazijn,ProdLoop,AantalTePicken,ZeroPalletID) ; om fallback te activeren, laatste parameter laten defaulten.
- . . else
+ . . else  Do   
  . . . $$$WriteToLog("################### reservatie niet gelukt met info uit EWPAL,produkt is maatwerk en geen fallback voor KVIK,DKG, De Decker JB ########################")
  . . If tmpStatus'="" Do    //Indien '="" is er een fout opgetreden
  . . .  $$$WriteToLog("################### fallback ook mislukt ########################")
@@ -718,7 +718,7 @@
  . . .  If ..VerwittigingNodig(ProdLoop) Do
  . . .  . $$$WriteToLog("########## Verwittiging verstuurd potentieel verkeerde pallet gepicked bij fallback. oudste pallet is geselecteerd. ###############")
  . . .  . Do ##class(vhLib.Logger).%New("UglyPicking").ErrorMail("OrderReservatie","Orderreservatie voor consolidatie "_ConsNr _ " is gelukt, maar potentieel met de verkeerde paletten. Vraag aan RDL of NRA om te verifieren.")
- . . .  else
+ . . .  else  Do
  . . .  . $$$WriteToLog("Fallback ok, en geen recente andere palletten met zelfde product uit andere toeleveringen")
  . . .  Do ##class(Flow.OrderWMS.PalletReservatie).SetReservationIsDone(ConsNr,Magazijn,ProdLoop,1)   //Reservation=OK
  . Else  Do