diff --git a/OS/Asignaciones.aspx b/OS/Asignaciones.aspx index ab915fb3e..4682fa2da 100644 --- a/OS/Asignaciones.aspx +++ b/OS/Asignaciones.aspx @@ -199,15 +199,16 @@ - + - - - + + + - - + + + diff --git a/OS/Asignaciones.aspx.vb b/OS/Asignaciones.aspx.vb index aafbc61a0..27dd8d20a 100644 --- a/OS/Asignaciones.aspx.vb +++ b/OS/Asignaciones.aspx.vb @@ -1,8 +1,7 @@ Option Explicit On Option Strict On -Imports System.Data -Imports System.Data.Entity.Core.Metadata.Edm +Imports System.Data Imports Extensiones Imports Microsoft.Reporting.WebForms Imports MKB.TimePicker @@ -70,16 +69,12 @@ Partial Class OS_Asignaciones BtnAsignar.Visible = False End If End If - ObjEstatusPermisos.Dispose() - - - - + ObjEstatusPermisos.Dispose() End If RegistraScript(" $('#GvNA tr').each(function() { - $(this).find('td:eq(6) input').each(function() { + $(this).find('td:eq(7) input').each(function() { if($(this).val()!=':'){ $(this).attr('style', 'width: 20px;'); }else{ @@ -99,16 +94,15 @@ Partial Class OS_Asignaciones GvNA.Columns(6).Visible = False GvNA.Columns(7).Visible = True - GvNA.Columns(8).Visible = True - GvNA.Columns(11).Visible = True - + GvNA.Columns(8).Visible = True + GvNA.Columns(9).Visible = True + GvNA.Columns(12).Visible = True GvNA.Columns(2).HeaderText = "Hospital" - GvNA.Columns(9).HeaderText = "Fecha Cirugía" - GvNA.Columns(10).HeaderText = "Hora Cirugía" + GvNA.Columns(10).HeaderText = "Fecha Cirugía" + GvNA.Columns(11).HeaderText = "Hora Cirugía" End If - End Sub #Region "C A R G A S " @@ -558,8 +552,7 @@ Partial Class OS_Asignaciones e.Row.FindControl("TimeSelector").Visible = True End If - If UsuarioActual.Empresa.Funcionalidad(578).ToEntero = 1 Then - + If UsuarioActual.Empresa.Funcionalidad(578) = "1" Then Dim FechaCita = e.Row.DataKey("FechaCitaOS").ToDateTime e.Row.FCTextBox("FechaOS").Text = FechaCita.ToString("dd/MM/yyyy") e.Row.FCTextBox("FechaOS").Visible = True @@ -569,13 +562,10 @@ Partial Class OS_Asignaciones Dim TMSelector = DirectCast(e.Row.FindControl("TimeSelector"), TimeSelector) TMSelector.Date = FechaCita - e.Row.Cells(9).Attributes.Add("data-order", e.Row.DBCampo("FechaCitaOS").ToDate.Ticks.ToString) - e.Row.Cells(10).Attributes.Add("data-order", e.Row.DBCampo("FechaCitaOS").ToDate.ToString("HHmm")) + e.Row.Cells(10).Attributes.Add("data-order", e.Row.DBCampo("FechaCitaOS").ToDate.Ticks.ToString) + e.Row.Cells(11).Attributes.Add("data-order", e.Row.DBCampo("FechaCitaOS").ToDate.ToString("HHmm")) End If - - - End If UpOS.Update()