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()