From 6a2d7efa3e3b9e645e6612b0dc25b82cd977420f Mon Sep 17 00:00:00 2001
From: Jonathan Alexis Perez Morales <jonathan.perez@adssistemas.mx>
Date: Thu, 11 May 2023 10:50:03 -0700
Subject: [PATCH] opcion para consumo interno

---
 Inventarios/EntradasSalidas.aspx.vb | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/Inventarios/EntradasSalidas.aspx.vb b/Inventarios/EntradasSalidas.aspx.vb
index 5c74dc695..7c5b0a4a4 100644
--- a/Inventarios/EntradasSalidas.aspx.vb
+++ b/Inventarios/EntradasSalidas.aspx.vb
@@ -1950,8 +1950,13 @@ Partial Class Inventarios_EntradasSalidas
                         End If
 
                         If Not ErrorMovInv Then
+                            Dim OpcionPrePoliza As Integer = -1
+                            'SI ES CONSUMO INTERNO
+                            If DdlConcepto.SelectedValue = "30" Then
+                                OpcionPrePoliza = 11
+                            End If
 
-                            If ObjConta.ValidacionPrePolizaCuadre(CvePrePoliza, -1) Then
+                            If ObjConta.ValidacionPrePolizaCuadre(CvePrePoliza, OpcionPrePoliza) Then
                                 If ObjConta.ValorPolizaDescuadre > 0 Then
                                     ErrorMovInv = True
                                     GuardaLogAD($"Inv/ES | Error:{ObjConta.MensajePolizaDescuadre} Diferencia:{ObjConta.ValorDiferencia} | CvePrePoliza:{CvePrePoliza}", "LogPrePolizas")