DELETE FROM RELAT_ANALMOVI
GO

alter table RELAT_ANALMOVI
   add constraint PK_RELAT_ANALMOVI primary key (NRRELATANAL,IDSALDOESTAN,CDTIPORETIAN,IDENTRSAIDAN,CDTIPOOPERAN)
GO

DELETE FROM MOVILOTE
GO

alter table MOVILOTE
   add constraint FKEST00258LOTE
   foreign key (CDFILIAL,NRLOTEESTQ,NRSUBLOTE,CDPRODUTO)
   references LOTE (CDFILIAL,NRLOTEESTQ,NRSUBLOTE,CDPRODUTO)
GO

INSERT INTO LOTE
(CDFILIAL, NRLOTEESTQ, NRSUBLOTE, CDPRODUTO, IDSTATLOTE, DTENTRLOTE)
(SELECT DISTINCT CDFILIMOVI, NRLOTEESTQ, NRSUBLOTE, CDPRODMOVI, 'L', GETDATE()
 FROM ITLANCTOEST I
 WHERE NOT EXISTS(SELECT CDFILIAL
                  FROM LOTE
                  WHERE CDFILIAL   = I.CDFILIMOVI AND
                        NRLOTEESTQ = I.NRLOTEESTQ AND
                        NRSUBLOTE  = I.NRSUBLOTE  AND
                        CDPRODUTO  = I.CDPRODMOVI))
GO

INSERT INTO LOTE
(CDFILIAL, NRLOTEESTQ, NRSUBLOTE, CDPRODUTO, IDSTATLOTE, DTENTRLOTE)
(SELECT DISTINCT CDFILIAL, NRLOTEESTQ, NRSUBLOTE, CDPRODUTO, 'L', GETDATE()
 FROM POSESTDIA P
 WHERE NOT EXISTS(SELECT CDFILIAL
                  FROM LOTE
                  WHERE CDFILIAL   = P.CDFILIAL   AND
                        NRLOTEESTQ = P.NRLOTEESTQ AND
                        NRSUBLOTE  = P.NRSUBLOTE  AND
                        CDPRODUTO  = P.CDPRODUTO))
GO

INSERT INTO LOTE
(CDFILIAL, NRLOTEESTQ, NRSUBLOTE, CDPRODUTO, IDSTATLOTE, DTENTRLOTE)
(SELECT DISTINCT CDFILIAL, NRLOTEESTQ, NRSUBLOTE, CDPRODUTO, 'L', GETDATE()
 FROM POSESTATU P
 WHERE NOT EXISTS(SELECT CDFILIAL
                  FROM LOTE
                  WHERE CDFILIAL   = P.CDFILIAL   AND
                        NRLOTEESTQ = P.NRLOTEESTQ AND
                        NRSUBLOTE  = P.NRSUBLOTE  AND
                        CDPRODUTO  = P.CDPRODUTO))
GO

alter table POSESTDIA
   add constraint FKEST00261LOTE
   foreign key (CDFILIAL,NRLOTEESTQ,NRSUBLOTE,CDPRODUTO)
   references LOTE (CDFILIAL,NRLOTEESTQ,NRSUBLOTE,CDPRODUTO)
GO

alter table POSESTATU
   add constraint FKEST00272LOTE
   foreign key (CDFILIAL,NRLOTEESTQ,NRSUBLOTE,CDPRODUTO)
   references LOTE (CDFILIAL,NRLOTEESTQ,NRSUBLOTE,CDPRODUTO)
GO

alter table ITLANCTOEST
   add constraint FKEST00315LOTE
   foreign key (CDFILIMOVI,NRLOTEESTQ,NRSUBLOTE,CDPRODMOVI)
   references LOTE (CDFILIAL,NRLOTEESTQ,NRSUBLOTE,CDPRODUTO)
GO


