Merge branch 'master' of http://jperez@192.168.10.111:8383/SIG.git

2024-01-27 16:56:38 -07:00
parent 6e11f2463f c30862663e
commit 8df47e8509
14 changed files with 531 additions and 199 deletions
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -36112,6 +36112,8 @@ Partial Class Ventas
                Dim dRow As DataRow = objVenta.DtResultados.Rows(0)
                DdlMedico.SelectedValueExist(dRow("CveMedico").ToString.ToEntero)
                DdlProcedimiento.SelectedValueExist(dRow("CveProcedimiento").ToString.ToEntero)
+                TxtPaciente.Text = dRow("Paciente").ToString
+                TxtEpisodio.Text = dRow("Episodio").ToString
                SeEstaFActurandoVentaMedica = True
                CveTipoVenta = dRow("CveTipoVenta").ToString.ToEntero
                ChkRequiereTecnico_CheckedChanged(Nothing, Nothing)