From 4233fc138625d7a0e487d2b73a6b2d7ff7719db6 Mon Sep 17 00:00:00 2001
From: Oscar Irigoyen <rakcsle@outlook.com>
Date: Fri, 9 Dec 2022 11:50:55 -0700
Subject: [PATCH] =?UTF-8?q?Compras=20correcci=C3=B3n=20reembolsos=20se=20e?=
 =?UTF-8?q?stabanc=20ontabilizando?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 Compras/Compras.aspx.vb | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)

diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb
index 6030b0aba..530384c8e 100644
--- a/Compras/Compras.aspx.vb
+++ b/Compras/Compras.aspx.vb
@@ -12303,6 +12303,24 @@ Partial Class Compras_Compras
 
     Protected Sub BtnContado_Click(sender As Object, e As EventArgs)
         TxtRembolsoNumero.Text = TxtNumeroReembolso.Text
+
+        If RBLContado.SelectedValue.ToEntero = 6 Then ' Caja chica
+            DdlFuncionarioEmpleado.SelectedValueExist(-1)
+            TxtDocumentoImporteFE.Text = ""
+            TextBox3.Text = ""
+            ViewState("CvePersonal") = -1
+        End If
+
+        If RBLContado.SelectedValue.ToEntero = 2 Then ' viaticos personal
+            DdlTipoTransaccionCaja.SelectedValueExist(-1)
+            DdlCuentaCajaChicaReembolso.SelectedValueExist(-1)
+            DdlCuentaCaja.SelectedValueExist(-1)
+            TxtDocumentoFolioCaja.Text = ""
+            TxtDocumentoImporteCaja.Text = ""
+            TxtDocumentoObservacionesCaja.Text = ""
+            ViewState("CveCajaChica") = -1
+        End If
+
         RegistraScript(String.Format("$('#{0}').modal('hide');", "DivContadoModal"))
     End Sub