Soporte conceptos de mercancia en compras (80,72)

2019-09-20 16:53:02 -07:00
parent 8b94203e4f
commit c0883cf9c1
1 changed files with 3 additions and 0 deletions
--- a/Compras/Compras.aspx.vb
+++ b/Compras/Compras.aspx.vb
@@ -4225,6 +4225,9 @@ Partial Class Compras_Compras
                                        If OCVinculada And Not (CveImportacion > 0 Or CveFlete > 0) Then
                                            CveConceptoContableAlmacen = DdlOCVinculaInv.SelectedValue.ToEntero
                                        End If
+                                        If UsuarioActual.CveEmpresa.Contiene(72, 80) Then
+                                            CveConceptoContableAlmacen = 205
+                                        End If
                                    Else
                                        CveConceptoContableAlmacen = 225
                                    End If