From be822b9ab4d10f106875800805cfdccbcc0c1cd2 Mon Sep 17 00:00:00 2001 From: rakcsle Date: Mon, 19 Aug 2024 16:55:40 -0700 Subject: [PATCH] =?UTF-8?q?Li=20piar=20codigo=20de=20prueba=20=20SMS=20-?= =?UTF-8?q?=20OS,=20poder=20hacer=20la=20cancelaci=C3=B3n=20de=20una=20OS/?= =?UTF-8?q?Pedido.=20cuando=20la=20OS=20no=20est=C3=A9=20como=20finalizada?= =?UTF-8?q?.?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- App_Code/Modelos.vb | 14 -------------- 1 file changed, 14 deletions(-) diff --git a/App_Code/Modelos.vb b/App_Code/Modelos.vb index 74e044cef..5bc220c03 100644 --- a/App_Code/Modelos.vb +++ b/App_Code/Modelos.vb @@ -6556,21 +6556,7 @@ Namespace Modelos End If End If - If Not ErrorCancelar AndAlso UsuarioActual.Empresa.Funcionalidad(578) = "1" AndAlso ObjFactura.TipoDocto = "Ped" Then - If Not RealizarDevolucionAlmacen.Contiene(1, 2) AndAlso TieneAlmacen Then - If Not ObjInventario.ActualizarEsDevolucionVenta(ObjFactura.CveVenta, 1, AplicaDevolucionCompleta:=True) Then - ErrorCancelar = True - MensajeError = "No se pudo actualizar el estatus de almacen del pedido" - End If - End If - End If - 'If RealizarDevolucionAlmacen = 2 AndAlso TieneAlmacen Then - ' If Not ObjInventario.ActualizarEsDevolucionVenta(ObjFactura.CveVenta, 1, AplicaDevolucionCompleta:=True) Then - ' ErrorCancelar = True - ' MensajeError = "No se pudo actualizar el estatus de almacen del pedido" - ' End If - 'End If 'CANCELA CONTRATOS If Not ErrorCancelar Then