AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Empresas Zona Horaria

Browse Source
This commit is contained in:
rakcsle
2023-10-09 11:54:42 -07:00
parent 2df7c3976c
commit f43b7759a8
649 changed files with 11445 additions and 11105 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
Contabilidad2/CatContaEjercicios.aspx.vb
View File

@@ -129,8 +129,8 @@ Partial Class Contabilidad2_CatContaEjercicios
Protected Sub LbGenerarPoliza_Click(sender As Object, e As EventArgs) Handles LbGenerarPoliza.Click
Dim ObjConta As New ClsContabilidad
Dim FechaI As String = $"01/01/{DateTime.Now.Year}"
Dim FechaF As String = $"{DateTime.DaysInMonth(DateTime.Now.Year, 12)}/12/{DateTime.Now.Year}"
Dim FechaI As String = $"01/01/{NowADS().Year}"
Dim FechaF As String = $"{DateTime.DaysInMonth(NowADS().Year, 12)}/12/{NowADS().Year}"
Dim CvePrePolizaCierre As Integer = -1
CvePrePolizaCierre = ObjConta.CierreEjercicio(UsuarioActual.CveEmpresa, Ejercicio, DdlCuentas.SelectedValue.ToEntero, FechaI, FechaF, UsuarioActual.CvePersonal)
If CvePrePolizaCierre > 0 Then