Index: BL/MB/UGLYPicking/OrderReservatie.cls.xml
===================================================================
diff -u -r66390 -r66499
--- BL/MB/UGLYPicking/OrderReservatie.cls.xml	(.../OrderReservatie.cls.xml)	(revision 66390)
+++ BL/MB/UGLYPicking/OrderReservatie.cls.xml	(.../OrderReservatie.cls.xml)	(revision 66499)
@@ -753,10 +753,10 @@
  . Set tmpStatus=..FStartReservePallets(ConsNr,Magazijn,ProdLoop,AantalTePicken,ZeroPalletID,ConsolidatiePalletten)
  . If tmpStatus'="" Do    //Indien '="" is er een fout opgetreden
  . . Set GeenMaatwerk = $$$Not(##class(TECH.StringUtils).Equals($$PRODGRP^PRODUKT(ProdLoop),"TBX","LBX","TA.B","MVX"))
- . . If GeenMaatwerk || $$$Not(##class(TECH.StringUtils).Equals($Piece($Get(^ORDW("D",ConsNr)),"\",1),"25868","24315","23112","6780")) ;geen fallback voor KVIK,DKG,De Decker JB
+ . . If GeenMaatwerk || $$$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 (nvt voor KVIK) ########################")
@@ -769,7 +769,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