>thisform.txtLocate.Refresh >STORE ALLTRIM(UPPER(thisform.txtlocate.Value)) TO m.locatesw >STORE LEN(m.locatesw) TO m.leftnum >SELECT fac_mas >IF m.locatesw == "" > messagebox('Please enter in an operator name or part of the operator name.', 16, 'BLANK ENTRY!') >ELSE > LOCATE FOR UPPER(LEFT(operator, m.leftnum)) = m.locatesw > IF FOUND() > rec = RECNO() > IF (rec <= RECCOUNT()) > IF (rec >= 1) > MESSAGEBOX(rec) > > thisform.cmdback.enabled = .t. > thisform.cmdbeg.enabled = .t. > thisform.cmdforward.enabled = .t. > thisform.cmdend.enabled = .t. > > IF (rec == 1) > thisform.cmdback.enabled = .f. > thisform.cmdbeg.enabled = .f. > ENDIF > > IF (rec == RECCOUNT()) > thisform.cmdforward.enabled = .f. > thisform.cmdend.enabled = .f. > ENDIF > mp = RECNO()- 1 > num = ((RECNO() * -1) + 1) > SKIP num > thisform.txtcount.value = rec > SKIP mp > thisform.refresh > thisform.txtlocate.Value = " " > ELSE > messagebox('Invalid Record Number.', 64, 'REC UNDER') > thisform.txtcount.value = Recno() > thisform.txttotal.value = Reccount() > > IF (recno() == 1) > thisform.cmdback.enabled = .f. > thisform.cmdbeg.enabled = .f. > ENDIF > > IF (recno() == RECCOUNT()) > thisform.cmdforward.enabled = .f. > thisform.cmdend.enabled = .f. > ENDIF > ENDIF > ENDIF > ELSE > MESSAGEBOX('Operator was not found!',16,'WAIT!') > thisform.txtlocate.value = " " > GO TOP > thisform.txtcount.value = Recno() > thisform.txttotal.value = Reccount() > thisform.cmdback.enabled = .f. > thisform.cmdbeg.enabled = .f. > thisform.refresh > ENDIF >ENDIF > >Ron,