AF Documentos, AF fecha iamgen, Correciones eFacturas solicitudes pdf sobre escritura

2025-05-22 11:06:18 -07:00
parent 5ae6f45095
commit 423d8fd60d
9 changed files with 655 additions and 40 deletions
--- a/Bancos/CuentasBancariasDetalle.aspx.vb
+++ b/Bancos/CuentasBancariasDetalle.aspx.vb
@@ -164,11 +164,10 @@ Partial Class Bancos_CuentasBancariasDetalle
                If DdlTipoCuenta.SelectedValue.ToEntero = 1 Then 'Caja Chica
                    IdPadre = UsuarioActual.Empresa.Funcionalidad(218).ToEntero
                Else
-                    Dim tesstr = UsuarioActual.Empresa.Funcionalidad(209)
                    IdPadre = UsuarioActual.Empresa.Funcionalidad(209).ToEntero
                End If

-                If IdPadre = 0 Then IdPadre = -1
+                If IdPadre = 0 Then IdPadre = 1

                If Conta.GetCuentasRecursiva(IdPadre, 1) Then
                    dt = Conta.DtResultados