modal regreso sin transparencias

This commit is contained in:
rakcsle
2024-03-10 11:09:07 -07:00
parent 23f7d10c12
commit 85f3eb5522
4 changed files with 29 additions and 6 deletions

View File

@@ -68,8 +68,7 @@ Partial Class UserControl_AddMedico
Private Sub UserControl_AddMedico_Load(sender As Object, e As EventArgs) Handles Me.Load
If Not Page.IsPostBack Then
CargaCombos()
CargaCombosMedicoClientesucursal()
End If
End Sub
@@ -138,6 +137,9 @@ Partial Class UserControl_AddMedico
Public Sub LimpiarControles()
CargaCombos()
CargaCombosMedicoClientesucursal()
CveMedico = -1
CrearDTMedicosClientesSucursales()
CveMedicoClienteSucursal = -1
@@ -197,6 +199,9 @@ Partial Class UserControl_AddMedico
Public Sub PreparaEdicion(CveMedicoEditar As Integer, Nombre As String, APaterno As String, AMaterno As String, CedulaProfecional As String, FechaNacimiento As Date, Notas As String, Estatus As Boolean,
Mail As String, Telefono As String, Celular As String, CveMedicoEspecialidad As Integer, CveMedicoSubEspecialidad As Integer, FechaIng As DateTime, Usuario As String, CveVendedor As Integer)
CargaCombos()
CargaCombosMedicoClientesucursal()
CveMedico = CveMedicoEditar
TxtNombre.Text = Nombre
TxtAPaterno.Text = APaterno