Index: BL/MB/UGLYPicking/OrderReservatie.cls.xml =================================================================== diff -u -r65857 -r65865 --- BL/MB/UGLYPicking/OrderReservatie.cls.xml (.../OrderReservatie.cls.xml) (revision 65857) +++ BL/MB/UGLYPicking/OrderReservatie.cls.xml (.../OrderReservatie.cls.xml) (revision 65865) @@ -751,7 +751,7 @@ . Set ZeroPalletID=$LI(ZeroPallets(ProdLoop),$$$tmpZeroPalletID) . Set tmpStatus=..FStartReservePallets(ConsNr,Magazijn,ProdLoop,AantalTePicken,ZeroPalletID,ConsolidatiePalletten) . If tmpStatus'="" Do //Indien '="" is er een fout opgetreden - . . If $$$Not(##class(TECH.StringUtils).Contains($Piece($Get(^ORDW("D",ConsNr)),"\",1),"25868","24315","23112","6780")) ;geen fallback voor KVIK,DKG,De Decker JB + . . If $$$Not(##class(TECH.StringUtils).Equals($Piece($Get(^ORDW("D",ConsNr)),"\",1),"25868","24315","23112","6780")) ;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