filtro por nombre de la cuenta contable

This commit is contained in:
2021-06-09 19:04:52 -07:00
parent 2a44207088
commit 0753e3ae3d

View File

@@ -3225,7 +3225,7 @@ Public Class ClsContabilidad
#Region " CUENTAS "
Public Function GetCuentas(CveCuenta As Integer, Codigo As String, Afectable As Integer, CveEmpresa As Integer, Optional RowNum As Integer = 100000, Optional CvePadre As Integer = -1) As Boolean ', Codigo As String, Nombre As String, CveClasificacionCuenta As Integer, TipoCuenta As Integer, Afectable As Integer, Estatus As Integer, CveEmpresa As Integer) As Boolean
Public Function GetCuentas(CveCuenta As Integer, Codigo As String, Afectable As Integer, CveEmpresa As Integer, Optional RowNum As Integer = 100000, Optional CvePadre As Integer = -1, Optional Nombre As String = "-1") As Boolean ', Codigo As String, Nombre As String, CveClasificacionCuenta As Integer, TipoCuenta As Integer, Afectable As Integer, Estatus As Integer, CveEmpresa As Integer) As Boolean
Dim Retorno = False
DataAdapter("PA_Conta_CuentasGet")
@@ -3234,6 +3234,7 @@ Public Class ClsContabilidad
.Add("@Codigo", SqlDbType.VarChar).Value = Codigo
.Add("@Afectable", SqlDbType.VarChar).Value = Afectable
.Add("@CveEmpresa", SqlDbType.VarChar).Value = CveEmpresa
.Add("@Nombre", SqlDbType.VarChar).Value = Nombre
.Add("@RowNum", SqlDbType.VarChar).Value = RowNum
.Add("@CvePadre", SqlDbType.Int).Value = CvePadre
End With