Index: BL/MB/UGLYPicking/Receptie.cls.xml =================================================================== diff -u -r38999 -r62001 --- BL/MB/UGLYPicking/Receptie.cls.xml (.../Receptie.cls.xml) (revision 38999) +++ BL/MB/UGLYPicking/Receptie.cls.xml (.../Receptie.cls.xml) (revision 62001) @@ -282,6 +282,34 @@ ]]> + +1 +ToelevNr:%String + + + + +1 +Korttekst:%String + + + 1 bfrRGID:%String,bfrVolgNr:%String @@ -2038,7 +2066,10 @@ ;Zijn er producten gevonden? Zoniet, sluit af. Quit:((ProdList="") || ($LL(ProdList)=0)) $LB(-3,"Er zijn producten gevonden voor toelevering '"_TLNr_"'.") - + + If ((..HeeftToeleveringEenSpaceStep(TLNr)) ) { + Set Answer=MApplication.MessageBox("WAARSCHUWING SPACE STEP:"_$$$CRLF_$$$CRLF_"Deze toelevering bevat 1 of meerdere SPACE STEP.") + } ;DISTINCT Productenlijst doorlopen en Qty's van toelevering toevoegen aan buffer New ProdLoop,Dossier,tmpPalletID,ErrorList,Status,InfoList Set tmpPalletID=PalletID