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

SMS Clienrtes Sucursales generar alamacenes empresas Medicas p con funcionalidad 404 en 30

Browse Source
This commit is contained in:
rakcsle
2024-01-02 19:24:41 -07:00
parent 5839f71bb2
commit cd84bd4fce
4 changed files with 200 additions and 91 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
Ventas/Ventas.aspx.vb
View File

@@ -3386,9 +3386,15 @@ Partial Class Ventas
End If
If CveVenta <= 0 AndAlso UsuarioActual.Empresa.Funcionalidad(578).ToEntero = 1 AndAlso Request("VM") IsNot Nothing AndAlso IsNumeric(Request("VM")) AndAlso Request("VM").ToEntero() = 1 Then
If CveVenta <= 0 AndAlso UsuarioActual.Empresa.Funcionalidad(578).ToEntero = 1 Then
EsVentaMedica = True
CargaTiposVenta()
If CveCliente > 0 Then
DdlClientesWS.txtValue.Value = CveCliente.ToString
DdlClientesWS.txtText.Value = LblCliente.Text
DdlClientesWS.SelectedValue = CveCliente.ToString
End If
End If
End If