AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Soporte Editar Remision

Browse Source
This commit is contained in:
Raul Pimienta
2019-08-30 14:52:02 -07:00
parent 1e0c619ee4
commit 4b89f2c59b
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
Ventas/Ventas.aspx.vb
View File

@@ -15762,7 +15762,7 @@ Partial Class Ventas
If UsuarioActual.CveEmpresa.Contiene(126) Then If UsuarioActual.CveEmpresa.Contiene(126) Then
If CveVenta > 0 And DdlOrdenProduccion.SelectedValue.ToEntero > 0 Then If CveVenta > 0 And DdlOrdenProduccion.SelectedValue.ToEntero > 0 Then
If Not ObjCGame.UpdateOrdenProduccionVenta(DdlOrdenProduccion.SelectedValue.ToEntero(), CveVenta) Then If Not ObjCGame.UpdateOrdenProduccionVenta(DdlOrdenProduccion.SelectedValue.ToEntero(), CveVenta) Then
ErrorList.Add("Ocurrió un error al actualizar la orden de producción") OcurrioError = True
End If End If
End If End If
End If End If
@@ -15772,7 +15772,7 @@ Partial Class Ventas
If ObjConta.ValorPolizaDescuadre > 0 Then If ObjConta.ValorPolizaDescuadre > 0 Then
If ObjConta.ValorPolizaDescuadre = 2 Then If ObjConta.ValorPolizaDescuadre = 2 Then
OcurrioError = True OcurrioError = True
ErrorList.Add(ObjConta.MensajePolizaDescuadre) Alert(ObjConta.MensajePolizaDescuadre, TipoMensaje.MsgError)
End If End If
End If End If
End If End If