From 3797695bea2e60e01133a59ae917d87f53037f9b Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Mon, 22 Feb 2021 11:08:20 -0700
Subject: [PATCH] =?UTF-8?q?asgianci=C3=B3n=20de=20valor=20nothing,=20para?=
 =?UTF-8?q?=20evitar=20warning?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 Contabilidad/PlantillasPolizasDetalle.aspx.vb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Contabilidad/PlantillasPolizasDetalle.aspx.vb b/Contabilidad/PlantillasPolizasDetalle.aspx.vb
index 7449e664d..c80bca90a 100644
--- a/Contabilidad/PlantillasPolizasDetalle.aspx.vb
+++ b/Contabilidad/PlantillasPolizasDetalle.aspx.vb
@@ -381,7 +381,7 @@ CveCuenta:=DdlCuentas.SelectedValue.ToEntero) Then
         If UsuarioActual.Empresa.TipoContabilizacion = 0 Then
             'busco en la cuenta contable, lo que tenga asignado 
             Dim Con As New ClsContabilidad
-            Dim dtt As DataTable
+            Dim dtt As DataTable = Nothing
             If Con.GetCuentas(-1, "-1", -1, UsuarioActual.CveEmpresa) Then
                 dtt = Con.DtResultados
             End If