From 3e1d63f239276c5e1f9d0e6fb0df33c0b911765a Mon Sep 17 00:00:00 2001
From: rakcsle <rakcsle.rakcsle@gmail.com>
Date: Tue, 19 Dec 2023 17:03:30 -0700
Subject: [PATCH] Ventas ajustes viauales ventas medicas, Entradas salidas
 comportamientos modal agregar PS

---
 Inventarios/EntradasSalidas.aspx.vb |  2 ++
 Ventas/Ventas.aspx                  | 10 ++++----
 Ventas/Ventas.aspx.vb               | 36 ++++++++++++++++++++++++++---
 3 files changed, 40 insertions(+), 8 deletions(-)

diff --git a/Inventarios/EntradasSalidas.aspx.vb b/Inventarios/EntradasSalidas.aspx.vb
index 2f9b592ca..7f461c930 100644
--- a/Inventarios/EntradasSalidas.aspx.vb
+++ b/Inventarios/EntradasSalidas.aspx.vb
@@ -2483,6 +2483,8 @@ Partial Class Inventarios_EntradasSalidas
 
         divSerie.Visible = False
         divLote.Visible = False
+        divSeccionAlmacen.Visible = False
+        divCaducidad.Visible = False
 
         EscondeColumnasGVM(DtMovimientos.FiltraParametros("Estatus <> 'E' "))
 
diff --git a/Ventas/Ventas.aspx b/Ventas/Ventas.aspx
index bfbafcff9..6300a2d77 100644
--- a/Ventas/Ventas.aspx
+++ b/Ventas/Ventas.aspx
@@ -584,13 +584,13 @@
                                     <b>Requiere Técnico:</b>
                                 </td>
                                 <td runat="server" id="TdRequiereTecnico2" visible="false">
-                                    <asp:CheckBox ID="ChkRequiereTecnico" runat="server"  data-size="small" CssClass="make-switchsd" OnCheckedChanged="ChkRequiereTecnico_CheckedChanged" AutoPostBack="true" />
+                                    <asp:CheckBox ID="ChkRequiereTecnico" runat="server"   CssClass="chksino"  OnCheckedChanged="ChkRequiereTecnico_CheckedChanged" AutoPostBack="true" Text="Requiere Técnico:" />
                                 </td>
                                 <td  runat="server" id="TdFechaOS1" visible ="false">
                                     <b>Fecha de Cirugia:</b>
                                 </td>
                                 <td runat="server" id="TdFechaOS2" visible ="false"> 
-                                    <asp:TextBox ID="TxtFechaOS" type="datetime-local" runat="server" data-size="small" CssClass="make-switchsd"   CausesValidation="true" Style="width: 130px" step="1"></asp:TextBox>
+                                    <asp:TextBox ID="TxtFechaOS" type="datetime-local" runat="server"  CssClass="make-switchsd"   CausesValidation="true" Style="width: 130px" step="1"></asp:TextBox>
                                 </td>                                
                             </tr>
 
@@ -8465,16 +8465,16 @@
                             <div class="row">
                                 <div class="form-group col-md-6 form-md-line-input input-iconright ">
                                     <asp:Label runat="server" Style="width: 90%; color: #888888;" AssociatedControlID="DdlMedicoModal">Requiere Técnico:</asp:Label>
-                                    <asp:CheckBox ID="ChkRequiereTecnicoModal" data-size="small" CssClass="make-switchsd" runat="server" OnCheckedChanged="ChkRequiereTecnicoModal_CheckedChanged" AutoPostBack="true" />
+                                    <asp:CheckBox ID="ChkRequiereTecnicoModal" CssClass="chksino" runat="server" OnCheckedChanged="ChkRequiereTecnicoModal_CheckedChanged" AutoPostBack="true" Text="Requiere Técnico" />
                                 </div>
                                 <div class="form-group col-md-6 form-md-line-input input-iconright " runat="server" id="DvModalRequiereOSFecha" visible="false">
-                                    <asp:Label runat="server" Style="width: 90%; color: #888888;" AssociatedControlID="TxtFechaModal">Fecha De Orden:</asp:Label>
+                                    <asp:Label runat="server" Style="width: 90%; color: #888888;" AssociatedControlID="TxtFechaModal">Fecha de Cirugia:</asp:Label>
                                     <asp:TextBox ID="TxtFechaModal" type="datetime-local" runat="server" CssClass="form-control" CausesValidation="true" Style="width: 100%" step="1"></asp:TextBox>
                                 </div>
                             </div>
                         </div>
                         
-                        <div class="row">                                
+                        <div class="row" runat="server" id="DVGvProductosProcedimiento" visible="false">                                
                             <div class="col-md-12">
                                  Productos utilizados en el procedimiento
                                  <asp:GridView ID="GvProductosProcedimiento" runat="server" CssClass="table table-hover table-striped ScrollAD mysmallbtn" data-sort="true" AutoGenerateColumns="False" Width="100%" 
diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index 9abe03094..19e9fb02a 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -2599,9 +2599,13 @@ Partial Class Ventas
             CargaCuentasTerminal()
             'CargaDdlNCPS()
             CargarCamiones()
-            CargaMedicos()
-            CargaProcedimientos()
-            CargaDdlClientes()
+
+            If UsuarioActual.Empresa.Funcionalidad(578) = "1" Then
+                CargaMedicos()
+                CargaProcedimientos()
+                CargaDdlClientes()
+            End If
+
 
 
 
@@ -5829,6 +5833,23 @@ Partial Class Ventas
             UpEstatus.Update()
             Retorno = True
 
+            If UsuarioActual.Empresa.Funcionalidad(578) = "1" Then
+
+                If DbRowVenta("CveMedico").ToString.ToEntero > 0 Then
+                    TrObsMedico1.Visible = True
+                    TrObsMedico2.Visible = True
+                    TrObsProcedimiento1.Visible = True
+                    TrObsProcedimiento2.Visible = True
+
+                    DdlMedicoObservaciones.SelectedValueExist(DbRowVenta("CveMedico").ToString)
+                    DdlProcedimientoObservaciones.SelectedValueExist(DbRowVenta("CveProcedimiento").ToString)
+
+                End If
+
+            End If
+
+
+
         End If
         Return Retorno
     End Function
@@ -7785,6 +7806,10 @@ Partial Class Ventas
 
         DdlProcedimientoModal.DataSource = GlobalDTProcedimientos(UsuarioActual.CveEmpresa).FiltraParametros("Estatus = 'True' ")
         DdlProcedimientoModal.DataBind()
+
+        DdlProcedimientoObservaciones.DataSource = GlobalDTProcedimientos(UsuarioActual.CveEmpresa)
+        DdlProcedimientoObservaciones.DataBind()
+
     End Sub
 
     Private Sub CargaMedicos()
@@ -7794,6 +7819,9 @@ Partial Class Ventas
         DdlMedicoModal.DataSource = GlobalDTMedicos(UsuarioActual.CveEmpresa).FiltraParametros("Estatus = 'True' ")
         DdlMedicoModal.DataBind()
 
+        DdlMedicoObservaciones.DataSource = GlobalDTMedicos(UsuarioActual.CveEmpresa)
+        DdlMedicoObservaciones.DataBind()
+
     End Sub
 
     Private Sub CargaDdlClientes()
@@ -36007,6 +36035,7 @@ Partial Class Ventas
 
         GvProductosProcedimiento.DataSource = Nothing
         GvProductosProcedimiento.DataBind()
+        DVGvProductosProcedimiento.Visible = False
 
         UpDvModalTipoVenta.Update()
 
@@ -36131,6 +36160,7 @@ Partial Class Ventas
         End If
 
         GvProductosProcedimiento.DataBind()
+        DVGvProductosProcedimiento.Visible = True
 
         UpDvModalTipoVenta.Update()