Li piar codigo de prueba SMS - OS, poder hacer la cancelación de una OS/Pedido. cuando la OS no esté como finalizada.
This commit is contained in:
@@ -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
|
||||
|
||||
Reference in New Issue
Block a user