From 749bfa96b58080ca54c8b745b9014f20397c8bc5 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Wed, 22 Mar 2023 19:05:30 -0700
Subject: [PATCH] corregir warning

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

diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb
index 6bd9eb977..074431106 100644
--- a/Compras/Compras.aspx.vb
+++ b/Compras/Compras.aspx.vb
@@ -9350,7 +9350,7 @@ Partial Class Compras_Compras
 
                                 Dim CvePersonal As Integer = 0
                                 If Cont < GvPersonal.Rows.Count Then CvePersonal = GvPersonal.Rows(Cont).FCDropDownList("DdlPersonalGv").SelectedValue.ToEntero
-                                Dim Referencia As String
+                                Dim Referencia As String = ""
                                 If Cont < GvPersonal.Rows.Count Then Referencia = GvPersonal.Rows(Cont).FCTextBox("TxtReferencia").Text
 
                                 Cont = Cont + 1