--Valida no agregar garantias sin precio

This commit is contained in:
2024-03-21 00:11:33 -07:00
parent 6ca0b02ee7
commit d9d43f516e

View File

@@ -3372,6 +3372,12 @@ Partial Class Inventarios_RecepcionUsados
Alert("Ya existe un consecutivo vigente en este folio", TipoMensaje.MsgAdvertencia)
Exit Sub
End If
If TxtPUFactura.Text.ToDecimal() <= 0 Then
Alert("El P.U. debe ser mayor a 0", TipoMensaje.MsgAdvertencia)
Exit Sub
End If
Dim IdConsecutivo As Integer = -1
Dim ObjPS As New ClsProductosServicios
Try