- activar recepción OC en dólares
This commit is contained in:
@@ -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
|
||||||
|
|||||||
Reference in New Issue
Block a user