SMS - 2024.01.23 correcion actualziar episodio y paciente

2024-01-25 18:28:16 -07:00
parent a0a820d94c
commit 2e377cbb26
2 changed files with 13 additions and 4 deletions
--- a/OS/OrdenesServicios.aspx.vb
+++ b/OS/OrdenesServicios.aspx.vb
@@ -3271,14 +3271,21 @@ Partial Class OS_OrdenesServicios
                End If

                If ProcesoOK Then
-
-                    If Not ObjOS.UpdateVentaOS(Respuesta.CveVenta, CveOS) Then
+                    If Not ObjOS.UpdateVentaOS(Respuesta.CveVenta, CveOS, TxtPacienteModal.Text.Trim, TxtEpisodioModal.Text.Trim) Then
                        ProcesoOK = False
                    End If
-
                End If


+
+
+            End If
+        End If
+
+
+        If ProcesoOK Then
+            If Not ObjOS.UpdateVentaOS(-1, CveOS, TxtPacienteModal.Text.Trim, TxtEpisodioModal.Text.Trim) Then
+                ProcesoOK = False
            End If
        End If