Como hago para que el botón grabar no me repita un código
estoy usando este código y funciona
m_ok=.t.
IF m_ok
IF NOT USED("artículos")
USE artículos IN 1
ENDIF
SELECT artículos
IF!FOUND()
DO WHILE !FLOCK()
ENDDO
APPEND Blank
replace código With opciones.código
UNLOCK
ENDIF
DO WHILE !LOCK()
ENDDO
replace nombre With opciones.nombre
replace descripción with opciones.descripción
replace cantidad with opciones.cantidad
replace costo with opciones.costo
UNLOCK
ENDIF
thisform.m_codigo.value=""
thisform.m_nombre.value=""
thisform.m_descripcion.value=""
thisform.m_cantidad.value=""
thisform.m_costo.value=""
WAIT WINDOW TIMEOUT 1 AT _SCREEN.TOP+8.25,_SCREEN.LEFT+4 " la información fue procesada correctamente"
thisform.m_codigo.SetFocus()
Bueno dale una mirada estos fuentes que te guiara bastante para trabajar en modo multiusuario sin muchas complicaciones y también considera si hay otro usuario que esta registrando un cliente al mismo tiempo lastima que no termine el video explicativo de este form pero estudiando los fuentes podrás ubicarte. La idea principal es antes de guardar el código revisar en la tabla si hay el código repetido.
Se le artículos
set order to código
seek thisform.txtcodigo.value
if found()
messagebox('cod repetido')
else
repla ...
La tabla debe estar indexada por el código
