DELETE FROM consolida1 WHERE CODSUCURSAL = '358' AND (DVDIAOPE LIKE '%/00/2026' OR DDDIAOPE LIKE '%/00/2026');
UPDATE consolida1 SET DEVALPAR  = DEVALUNI*DECANTIDAD WHERE DEVALPAR = 0 AND PERIODODOC = '002026' AND DECODBOD='358';
UPDATE consolida1 SET DEVALBASE = DEVALTOTAL*DEVALIVA WHERE DEVALBASE = 0 AND PERIODODOC = '002026' AND DECODBOD='358';
UPDATE consolida1 SET DEVALIVA  = DEVALTOTAL-DEVALBASE WHERE PERIODODOC = '002026' AND DECODBOD='358';
UPDATE consolida1 SET VRBASEDOC = TOTALDOC-VRIVADOC WHERE VRBASEDOC = 0 AND VRIVADOC = 0 AND PERIODODOC = '002026' AND DECODBOD='358';
