concepto 13,29 cargados negativos

2019-09-05 16:10:51 -07:00
parent b880ac4c63
commit af10cca9f8
1 changed files with 2 additions and 0 deletions
--- a/Inventarios/EntradasSalidas.aspx.vb
+++ b/Inventarios/EntradasSalidas.aspx.vb
@@ -1530,6 +1530,8 @@ Partial Class Inventarios_EntradasSalidas
                                    End If
                                Case 13, 29
                                    CveConceptoContable = 69
+                                    TipoMovtoAlmacen = False
+                                    tValorInventario = -tValorInventario
                                    Dim drr As DataRow = GlobalDTClasificaciones(UsuarioActual.CveEmpresa).FiltroPrimero("")
                                    If drr IsNot Nothing Then
                                        CveClasificacion = drr("CveClasificacion").ToString.ToEntero