SMS - 2024.02.02

OS/Asignaciones.aspx

@@ -200,10 +200,15 @@
                                         </asp:TemplateField>
                                         <asp:HyperLinkField DataTextField="Folio" HeaderText="Folio" ControlStyle-CssClass="Texto" DataNavigateUrlFormatString="/OS/OrdenesServicios.aspx?CveOS={0}" DataNavigateUrlFields="CveOS" />
                                         <asp:BoundField DataField="Nombre" HeaderText="Cliente" ItemStyle-HorizontalAlign="Left" />
+                                        
                                         <asp:BoundField DataField="SubProyecto" HeaderText="SubProyecto" ItemStyle-HorizontalAlign="Left" />
                                         <asp:BoundField DataField="Concepto" HeaderText="Concepto" ItemStyle-HorizontalAlign="Left" />
                                         <asp:BoundField DataField="EstatusOrdenServicio" HeaderText="Estatus" ItemStyle-HorizontalAlign="Left" />
                                         <asp:BoundField DataField="FechaIng" HeaderText="Fecha Ingreso" DataFormatString="{0:d}" ItemStyle-Width="130px" />
+
+                                        <asp:BoundField DataField="Medico" HeaderText="Médico" ItemStyle-HorizontalAlign="Left" Visible="false" />
+                                        <asp:BoundField DataField="Procedimiento" HeaderText="Procedimiento" ItemStyle-HorizontalAlign="Left" Visible="false" />
+
                                         <asp:TemplateField ItemStyle-Width="120px" HeaderText="Fecha Servicio">                                            
                                             <ItemTemplate>
                                                 <asp:Literal ID="LtlFechaServicio" runat="server" Visible="false" Text='<%# Eval("FechaCita", "{0:d}")%>'> ></asp:Literal>

OS/Asignaciones.aspx.vb

@@ -40,16 +40,13 @@ Partial Class OS_Asignaciones
 #End Region
     Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load
         If Not IsPostBack Then
+            GvNA_ConfiguraColumnas()
             CargaEstatusOS()
             'CargaUsuarios()
             CargaClientes()
             CargaSubProyecto()
 
-            If UsuarioActual.Empresa.Funcionalidad(578) = "1" Then
-                GvNA.Columns(2).HeaderText = "Hospital"
-                GvNA.Columns(7).HeaderText = "Fecha Cirugía"
-                GvNA.Columns(8).HeaderText = "Hora Cirugía"
-            End If
+
 
             If UsuarioActual.TienePermisoProceso(171) Then
                 CargaOrdenesServiciosAsignadasXPersona()
@@ -75,6 +72,9 @@ Partial Class OS_Asignaciones
             End If
             ObjEstatusPermisos.Dispose()
 
+
+
+
         End If
 
         RegistraScript("
@@ -90,6 +90,26 @@ Partial Class OS_Asignaciones
         ")
     End Sub
 
+    Private Sub GvNA_ConfiguraColumnas()
+
+        If UsuarioActual.Empresa.Funcionalidad(578).ToEntero = 1 Then
+            GvNA.Columns(3).Visible = False
+            GvNA.Columns(4).Visible = False
+            GvNA.Columns(5).Visible = False
+            GvNA.Columns(6).Visible = False
+
+            GvNA.Columns(7).Visible = True
+            GvNA.Columns(8).Visible = True
+
+
+            GvNA.Columns(2).HeaderText = "Hospital"
+            GvNA.Columns(9).HeaderText = "Fecha Cirugía"
+            GvNA.Columns(10).HeaderText = "Hora Cirugía"
+        End If
+
+
+    End Sub
+
 #Region "C A R G A S "
     Private Sub CargaSubProyecto()
         DdlSubProyecto.Items.Clear()
@@ -184,7 +204,7 @@ Partial Class OS_Asignaciones
         Dim TecnicosResultado As New DataTable
 
         If ObjOS.GetSubProyectosEstatusInicial(-1, 3, UsuarioActual.CveEmpresa) Then
-            TecnicosSubProyectos = ObjOS.DtResultados
+            TecnicosSubProyectos = ObjOS.DtResultados.FiltraParametros(" Estatus = 'True' ")
         End If
 
         If DtOSSubProyectos IsNot Nothing Then

OS/OrdenesServicios.aspx

@@ -1308,9 +1308,7 @@
 
                             <div class="col-md-4">
                                 <div class="form-group form-md-line-input input-iconright" runat="server" visible="false" id="DvTxtFolioRemisionModal">
-                                    <asp:TextBox ID="TxtFolioRemisionModal" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="20"></asp:TextBox>
-                                    <asp:RequiredFieldValidator ID="RfvTxtFolioRemisionModal" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtFolioRemisionModal"
-                                        ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Folio''</b> es necesario, por favor ingréselo." ValidationGroup="GrpMaterialUtilizado"></asp:RequiredFieldValidator>
+                                    <asp:TextBox ID="TxtFolioRemisionModal" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="20"></asp:TextBox>                                    
                                     <label for="<%= TxtFolioRemisionModal.ClientID.ToString()%>">Folio:</label>
                                 </div>
                             </div>