dbo.contratos

CREATE TABLE dbo.contratos (
  contrato smallint NOT NULL,
  nombre_contrato varchar(100) NULL,
  fecha_vigencia smalldatetime NULL,
  fecha_vencimiento smalldatetime NULL,
  cliente int NULL,
  detalle_contrato text NULL,
  PRIMARY KEY NONCLUSTERED (contrato) WITH (FILLFACTOR = 90)
)
ON [PRIMARY]
TEXTIMAGE_ON [PRIMARY]
GO

SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO
CREATE OR ALTER trigger dbo.tD_contratos on dbo.contratos for DELETE as
/* ERwin Builtin Mon Oct 01 10:32:44 2007 */
/* DELETE trigger on contratos */
begin
  declare  @errno   int,
           @errmsg  varchar(255)
    /* ERwin Builtin Mon Oct 01 10:32:44 2007 */
    /* contratos R/256 informes ON PARENT DELETE SET NULL */
    /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="contratos"
        CHILD_OWNER="", CHILD_TABLE="informes"
        P2C_VERB_PHRASE="R/256", C2P_VERB_PHRASE="", 
        FK_CONSTRAINT="R_256", FK_COLUMNS="contrato" */
    update informes
      set
        /* %SetFK(informes,NULL) */
        informes.contrato = NULL
      from informes,deleted
      where
        /* %JoinFKPK(informes,deleted," = "," and") */
        informes.contrato = deleted.contrato

    /* ERwin Builtin Mon Oct 01 10:32:44 2007 */
    /* contratos R/255 contratos_informes ON PARENT DELETE RESTRICT */
    /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="contratos"
        CHILD_OWNER="", CHILD_TABLE="contratos_informes"
        P2C_VERB_PHRASE="R/255", C2P_VERB_PHRASE="", 
        FK_CONSTRAINT="R_255", FK_COLUMNS="contrato" */
    if exists (
      select * from deleted,contratos_informes
      where
        /*  %JoinFKPK(contratos_informes,deleted," = "," and") */
        contratos_informes.contrato = deleted.contrato
    )
    begin
      select @errno  = 30001,
             @errmsg = 'Cannot DELETE contratos because contratos_informes exists.'
      goto error
    end


    /* ERwin Builtin Mon Oct 01 10:32:44 2007 */
    return
error:
    raiserror (@errmsg,@errno,1) 
    rollback transaction
end

GO
CREATE OR ALTER trigger dbo.tI_contratos on dbo.contratos for INSERT as
/* ERwin Builtin Mon Oct 01 10:32:44 2007 */
/* INSERT trigger on contratos */
begin
  declare  @numrows int,
           @nullcnt int,
           @validcnt int,
           @errno   int,
           @errmsg  varchar(255)

  select @numrows = @@rowcount
  /* ERwin Builtin Mon Oct 01 10:32:44 2007 */
  /* clientes R/254 contratos ON CHILD INSERT SET NULL */
  /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="clientes"
      CHILD_OWNER="", CHILD_TABLE="contratos"
      P2C_VERB_PHRASE="R/254", C2P_VERB_PHRASE="", 
      FK_CONSTRAINT="R_254", FK_COLUMNS="cliente" */
  if
    /* %ChildFK(" or",update) */
    update(cliente)
  begin
    update contratos
      set
        /* %SetFK(contratos,NULL) */
        contratos.cliente = NULL
      from contratos,inserted
      where
        /* %JoinPKPK(contratos,inserted," = "," and") */
  contratos.contrato = inserted.contrato and
   
        not exists (
          select * from clientes
          where
            /* %JoinFKPK(inserted,clientes," = "," and") */
            inserted.cliente = clientes.cliente
        )
  end


  /* ERwin Builtin Mon Oct 01 10:32:44 2007 */
  return
error:
    raiserror (@errmsg,@errno,1) 
    rollback transaction
end

GO
CREATE OR ALTER trigger dbo.tU_contratos on dbo.contratos for UPDATE as
/* ERwin Builtin Mon Oct 01 10:32:44 2007 */
/* UPDATE trigger on contratos */
begin
  declare  @numrows int,
           @nullcnt int,
           @validcnt int,
           @inscontrato smallint,
           @errno   int,
           @errmsg  varchar(255)

  select @numrows = @@rowcount
  /* ERwin Builtin Mon Oct 01 10:32:44 2007 */
  /* contratos R/256 informes ON PARENT UPDATE SET NULL */
  /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="contratos"
      CHILD_OWNER="", CHILD_TABLE="informes"
      P2C_VERB_PHRASE="R/256", C2P_VERB_PHRASE="", 
      FK_CONSTRAINT="R_256", FK_COLUMNS="contrato" */
  if
    /* %ParentPK(" or",update) */
    update(contrato)
  begin
    update informes
      set
        /* %SetFK(informes,NULL) */
        informes.contrato = NULL
      from informes,deleted
      where
        /* %JoinFKPK(informes,deleted," = "," and") */
        informes.contrato = deleted.contrato
  end

  /* ERwin Builtin Mon Oct 01 10:32:44 2007 */
  /* contratos R/255 contratos_informes ON PARENT UPDATE RESTRICT */
  /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="contratos"
      CHILD_OWNER="", CHILD_TABLE="contratos_informes"
      P2C_VERB_PHRASE="R/255", C2P_VERB_PHRASE="", 
      FK_CONSTRAINT="R_255", FK_COLUMNS="contrato" */
  if
    /* %ParentPK(" or",update) */
    update(contrato)
  begin
    if exists (
      select * from deleted,contratos_informes
      where
        /*  %JoinFKPK(contratos_informes,deleted," = "," and") */
        contratos_informes.contrato = deleted.contrato
    )
    begin
      select @errno  = 30005,
             @errmsg = 'Cannot UPDATE contratos because contratos_informes exists.'
      goto error
    end
  end

  /* ERwin Builtin Mon Oct 01 10:32:44 2007 */
  /* clientes R/254 contratos ON CHILD UPDATE SET NULL */
  /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="clientes"
      CHILD_OWNER="", CHILD_TABLE="contratos"
      P2C_VERB_PHRASE="R/254", C2P_VERB_PHRASE="", 
      FK_CONSTRAINT="R_254", FK_COLUMNS="cliente" */
  if
    /* %ChildFK(" or",update) */
    update(cliente)
  begin
    update contratos
      set
        /* %SetFK(contratos,NULL) */
        contratos.cliente = NULL
      from contratos,inserted
      where
        /* %JoinPKPK(contratos,inserted," = "," and") */
  contratos.contrato = inserted.contrato and
   
        not exists (
          select * from clientes
          where
            /* %JoinFKPK(inserted,clientes," = "," and") */
            inserted.cliente = clientes.cliente
        )
  end


  /* ERwin Builtin Mon Oct 01 10:32:44 2007 */
  return
error:
    raiserror (@errmsg,@errno,1) 
    rollback transaction
end

GO

ALTER TABLE dbo.contratos WITH NOCHECK
  ADD CONSTRAINT FK__contratos__clien__5812160E FOREIGN KEY (cliente) REFERENCES dbo.clientes (cliente)
GO