Cambiar texto de no recibido

This commit is contained in:
2019-08-23 09:04:14 -07:00
parent 3a92f20d7c
commit 665d8533aa

View File

@@ -300,8 +300,8 @@ Partial Class RepNotasSinAlmacen
Dim ObjCompras As New ClsCompras
Dim ObjEventos As New ClsOIEventos
If ObjCompras.UpdateEstatusAlmacenDetalle(CveCompraDetalle, 1) Then
If ObjEventos.AddEventoBitacora(String.Format("Se cambio el estatus de almacen del producto/servicio: {0} a 'No Recibir'", PS), "", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveCompra:=CveCompra) Then
Alert("El producto se desmarco correctamente.")
If ObjEventos.AddEventoBitacora(String.Format("El producto: {0} se marcó como no recibirlo", PS), "", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveCompra:=CveCompra) Then
Alert("El producto se marcó como 'no recibirlo' correctamente.")
End If
End If
ObjCompras.Dispose()