- activar recepción OC en dólares

This commit is contained in:
2024-02-07 18:56:17 -07:00
parent 79ddf896ff
commit e4fa79d45c

View File

@@ -3329,8 +3329,7 @@ Partial Class Inventarios_RecepcionAlmacen
Dim CveConceptoContableCosto As Integer = -1 Dim CveConceptoContableCosto As Integer = -1
Dim CveConceptoContableCostoME As Integer = -1 Dim CveConceptoContableCostoME As Integer = -1
Dim CveConceptoContableCostoComplementaria As Integer = -1 Dim CveConceptoContableCostoComplementaria As Integer = -1
Dim UsaComplementariaFleteImportaciones As Boolean = False Dim UsaComplementariaFleteImportaciones As Boolean = True
If UsuarioActual.CveEmpresa = 119 Then UsaComplementariaFleteImportaciones = False
If DtCostos.Rows.Count > 0 Then If DtCostos.Rows.Count > 0 Then
If CveCompraSurtir > 0 Then If CveCompraSurtir > 0 Then
@@ -3358,7 +3357,7 @@ Partial Class Inventarios_RecepcionAlmacen
CveConceptoContableCostoME = 228 CveConceptoContableCostoME = 228
CveConceptoContableCostoComplementaria = 229 CveConceptoContableCostoComplementaria = 229
If UsuarioActual.CveEmpresa = 119 Then UsaComplementariaFleteImportaciones = True UsaComplementariaFleteImportaciones = True
Else Else
ErrorMovInv = True ErrorMovInv = True