-- cambio a unificación función validaciónprepolizas
This commit is contained in:
@@ -1487,7 +1487,7 @@ Partial Class Inventarios_RecepcionUsados
|
||||
Correcto = False
|
||||
End If
|
||||
|
||||
If ObjConta.ValidacionPrePolizaCuadre(CvePrePoliza, -1) Then
|
||||
If ObjConta.ValidacionesPrePoliza(CvePrePoliza, UsuarioActual, Opcion:=-1) Then
|
||||
If ObjConta.ValorPolizaDescuadre > 0 Then
|
||||
GuardaLogAD($"Inventarios/RecepcionUsados-PPCompOC | Error:{ObjConta.MensajePolizaDescuadre} Diferencia:{ObjConta.ValorDiferencia} | CvePrePoliza:{CvePrePoliza}", "LogPrePolizas")
|
||||
Correcto = False
|
||||
@@ -3286,9 +3286,9 @@ Partial Class Inventarios_RecepcionUsados
|
||||
Dim CargoActual As Double = 0
|
||||
|
||||
Dim Row As DataRow = Nothing
|
||||
Dim EsNuevo As Boolean = true
|
||||
Dim EsNuevo As Boolean = True
|
||||
|
||||
Dim RowsAjustes = TmpDTAjustes.Select($"ConsecutivoVenta = {ConsecutivoVenta}")
|
||||
Dim RowsAjustes As DataRow() = TmpDTAjustes.Select($"ConsecutivoVenta = {ConsecutivoVenta}")
|
||||
|
||||
If RowsAjustes IsNot Nothing AndAlso RowsAjustes.Length > 0 Then
|
||||
Row = RowsAjustes(0)
|
||||
|
||||
Reference in New Issue
Block a user