Details

Grants

References

Dependencies

Code


NAME VALUE
OWNER CARTERAINVERSION_USER
OBJECT_NAME INSCLIENTE
SUBOBJECT_NAME null
OBJECT_ID 28309
DATA_OBJECT_ID null
OBJECT_TYPE TRIGGER
CREATED 11/06/15
LAST_DDL_TIME 11/06/15
TIMESTAMP 2015-06-11:22:56:09
STATUS VALID
TEMPORARY N
GENERATED N
SECONDARY N
NAMESPACE 3
EDITION_NAME null
PRIVILEGE GRANTEE GRANTABLE GRANTOR OBJECT_NAME
NAME OWNER TYPE OBJECT_ID STATUS TYPE_LINK
NAME OWNER TYPE OBJECT_ID STATUS TYPE_LINK
SEQ_CLIENTE CARTERAINVERSION_USER SEQUENCE 28304 VALID SEQUENCE
CLIENTE CARTERAINVERSION_USER TABLE 28256 VALID TABLE
UTILIDADES CARTERAINVERSION_USER PACKAGE 28292 VALID PACKAGE
TRIGGER insCliente  BEFORE INSERT OR UPDATE ON Cliente
FOR EACH ROW
DECLARE
   IsOK boolean;
BEGIN

IF Utilidades.ValidaNIFCIF(:new.NIF) = False THEN
	 RAISE_APPLICATION_ERROR (-20010, 'Error NIF');
END IF;

IF :new.ClienteId IS NULL THEN
	SELECT SEQ_Cliente.NEXTVAL INTO :NEW.ClienteId
	FROM DUAL;
END IF;

-- normalizar formato de los datos introducidos
  :NEW.Nombre := UPPER(TRIM(:new.Nombre));
  :NEW.NIF := UPPER(TRIM(:new.NIF));
  :NEW.Email := LOWER(TRIM(:new.Email));
  :NEW.EstaActivo := UPPER(TRIM(:new.EstaActivo));
END insCliente ;