asgianción de valor nothing, para evitar warning
This commit is contained in:
@@ -381,7 +381,7 @@ CveCuenta:=DdlCuentas.SelectedValue.ToEntero) Then
|
|||||||
If UsuarioActual.Empresa.TipoContabilizacion = 0 Then
|
If UsuarioActual.Empresa.TipoContabilizacion = 0 Then
|
||||||
'busco en la cuenta contable, lo que tenga asignado
|
'busco en la cuenta contable, lo que tenga asignado
|
||||||
Dim Con As New ClsContabilidad
|
Dim Con As New ClsContabilidad
|
||||||
Dim dtt As DataTable
|
Dim dtt As DataTable = Nothing
|
||||||
If Con.GetCuentas(-1, "-1", -1, UsuarioActual.CveEmpresa) Then
|
If Con.GetCuentas(-1, "-1", -1, UsuarioActual.CveEmpresa) Then
|
||||||
dtt = Con.DtResultados
|
dtt = Con.DtResultados
|
||||||
End If
|
End If
|
||||||
|
|||||||
Reference in New Issue
Block a user