-- mejora en contabilizaión E13, E83

2022-12-28 16:40:40 -07:00
parent 8ab3b0943c
commit 6d947f74c1
3 changed files with 19 additions and 8 deletions
--- a/Compras/Compras.aspx.vb
+++ b/Compras/Compras.aspx.vb
@@ -6954,6 +6954,8 @@ Partial Class Compras_Compras
                                                        Case 5 'Proveedores
                                                            If CveTipoConcepto = 2 Then ConceptoContable = 305 'cuando es acreedor
                                                            Dim UsaComplementaria As Boolean = True
+
+                                                            If UsuarioActual.CveEmpresa.Contiene(13, 83) Then UsaComplementaria = False
                                                            If tipoCambioActual <> 1 Then
                                                                Select Case ConceptoContable
                                                                    Case 5