INSERT INTO Sys_Relaciones (IdTabla,TablaForanea,CampoForaneo,BasedeDatos,NoValidar)
VALUES ('Companias','ConceptosCia','IdCia','DB',0)
INSERT INTO Sys_Relaciones (IdTabla,TablaForanea,CampoForaneo,BasedeDatos,NoValidar)
VALUES ('Companias','CtasCorrCia','IdCia','DB',0)
INSERT INTO Sys_Relaciones (IdTabla,TablaForanea,CampoForaneo,BasedeDatos,NoValidar)
VALUES ('Companias','AcuVentas','IdCia','DB',0)
INSERT INTO Sys_Relaciones (IdTabla,TablaForanea,CampoForaneo,BasedeDatos,NoValidar)
VALUES ('Terceros','AcuVentas','IdCliente','DB',0)
INSERT INTO Sys_Relaciones (IdTabla,TablaForanea,CampoForaneo,BasedeDatos,NoValidar)
VALUES ('Agencias','AcuVentas','IdAgencia','DB',0)
INSERT INTO Sys_Relaciones (IdTabla,TablaForanea,CampoForaneo,BasedeDatos,NoValidar)
VALUES ('ProdMcias','AcuVentas','CdProducto','DB',0)
GO
INSERT INTO AcuVentas ( nAnno, nMes, IdCia, IdCliente, IdAgencia, CdProducto, Cantidad, ValorTotal, NContrato, IdCiaCon)
SELECT YEAR(FECHA),MONTH(FECHA),idcia,K.idtercero,CASE cdagencia WHEN '' THEN '0' WHEN NULL THEN '0' ELSE  cdagencia END 
,K.idproducto,sum(salidas-entradas),sum((salidas-entradas)*vrprecio),0,'00'
FROM Trn_Kardex AS K  INNER JOIN ProdMcias AS P ON K.IdProducto=P.IdProducto
WHERE TipDoc IN  ('FCR','FC1','FC2','FC3','FC4','FC5','DFC','DF1','DF2','DF3','DF4','DF5')
AND NoVentas>0  AND Tanques<>0 AND EsProdBase=0
GROUP BY YEAR(FECHA),MONTH(FECHA),idcia,K.idtercero,cdagencia,K.idproducto
HAVING sum(salidas-entradas)<>0
GO
INSERT INTO CtasCorrCia (IdCta,IdCia)
SELECT IdCta,IdCiaDef FROM CtasCorrientes 
WHERE IdCiaDef<>'' AND IdCiaDef<>'00' AND IdCiaDef IS NOT NULL
GO