Index: UI/MB/UGLYPicking/dlgReceptieSel.cls.xml =================================================================== diff -u -r6562 -r8302 --- UI/MB/UGLYPicking/dlgReceptieSel.cls.xml (.../dlgReceptieSel.cls.xml) (revision 6562) +++ UI/MB/UGLYPicking/dlgReceptieSel.cls.xml (.../dlgReceptieSel.cls.xml) (revision 8302) @@ -788,10 +788,12 @@ Set IsNewBuffer=(..cbbBuffer.Items.GetObjects(..cbbBuffer.ItemIndex)'=..#ciDetail) ;Defaults voor interface achterhalen afh v IsNewBuffer - New DefaultLocatie,DefaultPallet,LocatieVast,PalletVast,RGID,EarlyQuit + New DefaultLocatie,DefaultPallet,LocatieVast,PalletVast,RGID,EarlyQuit,IsTandemboxBuffer Set RGID=..GetSelectedRGID() + Set IsTandemboxBuffer=(..cbbBuffer.SelectedGetKey()="TB") Set ..btnSelect.Visible="True" + Set ..rbPalletViaProduct.Enabled="True" If ..rSpecialBufferHandling(RGID,1) Do Quit . Set ..gbPallet.Visible="False" @@ -828,6 +830,12 @@ Quit:(EarlyQuit) + ; TANDEMBOX receptie mag niet scannen via Product + If IsTandemboxBuffer { + Set ..rbPalletViaProduct.Enabled="False" + Set:(DefaultPallet="VP") DefaultPallet="ITS" + } + ;Daadwerkelijke aanpassing van de interface ;DEFAULT PALLET If DefaultPallet="V" Do