Eliminar Cierre de Contabilidad
/*****************************************************************************
Deshacer el Cierre
=============================================================================*/
-- ============================================================================
-- Se genera una consulta donde se obtienen las cuentas de resultados que
-- no estan saldadas, asi como tambien el ejercicio que presenta el
-- descuadre. Este seria el primer paso detectar en donde esta el problema.
-- ------------------------------------
-- solo como apoyo pero no es necesario
use ctNoel_Caire
select sc.id, sc.IdCuenta, sc.Ejercicio, sc.Tipo, sc.Importes14,
c.Codigo, c.Nombre, e.Ejercicio
from SaldosCuentas sc
inner join Cuentas c
on sc.IdCuenta = c.Id
inner join Ejercicios e
on sc.Ejercicio = e.Id
where sc.Importes14 <> 0 and sc.Tipo = 1 and (c.Tipo = 'G' or c.Tipo = 'H')
order by sc.Ejercicio
-- PASO 1
-- ============================================================================
-- Conocer el folio de la pÛliza para eliminarla y conocer la cuenta de Capital
-- con la que se hizo el cierre del ejercicio
-- ------------------------------------
use ctNoel_Caire
declare @Ejercicio int
-- poner el ejercicio que se va a dejar como actual
set @Ejercicio = 2009
select e.ejercicio, c.codigo,c.nombre, p.id, p.ejercicio,p.periodo,p.tipopol,p.folio,p.clase from ejercicios e
inner join polizas p on e.idpolcierre = p.id
inner join cuentas c on e.idctacierre = c.id
where e.ejercicio = @Ejercicio
-- PASO 2
-- ============================================================================
-- Desasocia la poliza y la cuenta del Ejercicio y elimina el ˙ltimo ejercicio
-- y actualiza la tabla de parametros
-- ------------------------------------
use ctNoel_Caire
declare @Ejercicio int
set @Ejercicio = 2009
-- desasocia la poliza del ejercicio
update ejercicios set idCtacierre = 0, idpolcierre = 0 where ejercicio = @Ejercicio
-- borra el ˙tlimo ejercicio
delete from ejercicios where ejercicio = @Ejercicio + 2
-- actualiza parametros con el ejercicio a cerrar
update parametros set ejercicios = ejercicios - 1,
peractual = 12,
ejeractual = (select id from ejercicios where ejercicio = @Ejercicio)
-- PASO 3
--2. Entrar a la empresa y borrar la pÛliza de cierre, para localizarla r·pidamente buscarla
-- en el listado de pÛlizas con el ejercicio y el periodo de ajuste, aparece al final.
--3. Esperar unos minutos a que la afectaciÛn termine de recalcular saldos
--4. Reconstruir Saldos desde el primer periodo del ejercicio actual
--5. Cerrar el periodo 12
--6. Crear la pÛliza de cierre con la misma cuenta que tenÌa
--7. Cerrar de nuevo el ejercicio en cuestiÛn