Este es el sitio web histórico de la documentación de 4D. La documentación se está trasladando progresivamente a developer.4d.com

Inicio

 
4D v20 R7
DELETE RECORD

DELETE RECORD 


 

DELETE RECORD {( tabla )} 
Parámetro Tipo   Descripción
tabla  Tabla in Tabla de la cual borrar el registro actual, o Tabla por defecto, si se omite

DELETE RECORD borra el registro actual de tabla en el proceso. Si no hay registro actual para tabla en el proceso, DELETE RECORD no tiene efecto. En un formulario, puede crear un botón Borrar registro y asignarle la acción automática correspondiente, en lugar de utilizar este comando.

Notas:

  • si el registro actual es descargado de la memoria antes de la llamada a DELETE RECORD (por ejemplo en respuesta a un UNLOAD RECORD), la selección actual de tabla está vacía después de la eliminación.
  • el comando DELETE RECORD no hace nada cuando la tabla está en modo READ ONLY, independientemente de si el registro a borrar está bloqueado o no.

La eliminación de registros es una operación permanente y no puede deshacerse (excepto cuando se ejecuta durante una transacción, ver Utilización de transacciones).

Si se borra un registro, el número del registro se reutilizará cuando se creen nuevos registros. No utilice el número del registro como identificador del registro si su base permite la eliminación de registros.

Ejemplo  

El siguiente ejemplo borra un registro de un empleado. El código pregunta al usuario el número del empleado a borrar, busca el registro correspondiente y lo borra:

 vBuscar:=Request("Número del empleado a borrar:") ` Obtiene un número de identificación del empleado
 If(OK=1)
    QUERY([Empleado];[Empleado]ID =vBuscar) ` Buscar el empleado
    DELETE RECORD([Empleado]` Borrar el empleado
 End if



Ver también 

Locked
Triggers

 
PROPIEDADES 

Producto: 4D
Tema: Registros
Número 58

El comando cambia el registro actualThis command can be run in preemptive processes

 
CONTENIDO DE LA PÁGINA 
 
HISTORIA 

Modificado: 4D 2004

 
ARTICLE USAGE

Manual de lenguaje 4D ( 4D v20 R7)