Index: UI/MB/UGLYPicking/dlgReceptieSel.cls.xml
===================================================================
diff -u -r30409 -r30418
--- UI/MB/UGLYPicking/dlgReceptieSel.cls.xml	(.../dlgReceptieSel.cls.xml)	(revision 30409)
+++ UI/MB/UGLYPicking/dlgReceptieSel.cls.xml	(.../dlgReceptieSel.cls.xml)	(revision 30418)
@@ -1173,7 +1173,7 @@
  Set IsNewBuffer = (..cbbBuffer.Items.GetObjects(..cbbBuffer.ItemIndex)'=..#ciDetail)
  Set ReceptieGroepID = ..GetSelectedRGID()
  If (IsNewBuffer) && (ReceptieGroepID="TB") Do
- . Set IsGeldigeID = ($L(..txtPalletVast.Text) > 3) && ($E(..txtPalletVast.Text,1,3)?1(1"TBX",1"TBP",1"SFS"))
+ . Set IsGeldigeID = ($L(..txtPalletVast.Text) > 3) && ($$$UCase($E(..txtPalletVast.Text,1,3))?1(1"TBX",1"TBP",1"SFS"))
 
  Quit IsGeldigeID
 ]]></Implementation>