do form forms\sotpkbxd with curbatchsos.csono, 'PREPARE_BATCH',thisform.erpkeylookupBatchNo.Erptxtgen1.value if messagebox('Skip to next Sales Order?',4+32,'Label System') = 6 set step on skip in curbatchsos if eof('curbatchsos') messagebox('No more Sales Orders to Process',0,'Label System') go top in curbatchsos else thisform.CallClick() *this.Click() endif endif thisform.Refresh()