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

-- SMS. limitante de 5 partidas

Browse Source
This commit is contained in:
rrene
2024-05-18 07:09:36 -07:00
parent d8854d7956
commit 9e13c838ae
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
Inventarios/EntregaAlmacen.aspx.vb
View File

@@ -2095,12 +2095,12 @@ Partial Class Inventarios_EntregaAlmacen
'SI EL CLIENTE ES OPERADORA DE HOSPITALES ANGELES SOLO SE PUEDEN RECIBIR MAXIMO 5 'SI EL CLIENTE ES OPERADORA DE HOSPITALES ANGELES SOLO SE PUEDEN RECIBIR MAXIMO 5
If CveCliente = 819998 Then If CveCliente = 819998 Then
If NumRegistros > 5 Then If NumRegistros > 5 Then
Alert("Solo se pueden recibir maximo 5 partidas.", TipoMensaje.MsgAdvertencia) Alert("Solo se pueden recibir máximo 5 partidas.", TipoMensaje.MsgAdvertencia)
Exit Sub Exit Sub
End If End If
Else Else
If NumRegistros > 10 Then If NumRegistros > 10 Then
Alert("Solo se pueden recibir maximo 10 partidas.", TipoMensaje.MsgAdvertencia) Alert("Solo se pueden recibir máximo 10 partidas.", TipoMensaje.MsgAdvertencia)
Exit Sub Exit Sub
End If End If
End If End If
@@ -4337,7 +4337,7 @@ Partial Class Inventarios_EntregaAlmacen
End Sub End Sub
Private Sub RecargaporAlmacenes() Private Sub RecargaporAlmacenes()
If DdlAlmacen.SelectedValue <> "-1" AndAlso Not (UsuarioActual.Empresa.Funcionalidad(578) = "1") Then If DdlAlmacen.SelectedValue <> "-1" Then
CargaGvDatos() CargaGvDatos()
End If End If
End Sub End Sub