From 9acc09485c6106fbd16033b1ed822ff337af1693 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Wed, 13 Dec 2023 19:40:10 -0700
Subject: [PATCH] option explciit

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

diff --git a/Acarreos/CatChoferes.aspx.vb b/Acarreos/CatChoferes.aspx.vb
index 00136404a..7477f601e 100644
--- a/Acarreos/CatChoferes.aspx.vb
+++ b/Acarreos/CatChoferes.aspx.vb
@@ -69,7 +69,7 @@ Partial Class Acarreos_CatChoferes
         'Else
 
         Dim ObjAcar As New ClsAcarreos
-        Dim Estatus = 0
+        Dim Estatus As Integer = 0
         If ChkEstatus.Checked Then Estatus = 1
 
         If HdnModalidad.Value = "A" Then