AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

- columna tipo de venta

Browse Source
This commit is contained in:
rrene
2024-06-19 23:58:38 -07:00
parent f26512765b
commit 2f18962697
2 changed files with 18 additions and 27 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
OS/Asignaciones.aspx
View File

@@ -199,15 +199,16 @@
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:HyperLinkField DataTextField="Folio" HeaderText="Folio" ControlStyle-CssClass="Texto" DataNavigateUrlFormatString="/OS/OrdenesServicios.aspx?CveOS={0}" DataNavigateUrlFields="CveOS" /> <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="Nombre" HeaderText="Cliente" />
<asp:BoundField DataField="SubProyecto" HeaderText="SubProyecto" ItemStyle-HorizontalAlign="Left" /> <asp:BoundField DataField="SubProyecto" HeaderText="SubProyecto" />
<asp:BoundField DataField="Concepto" HeaderText="Concepto" ItemStyle-HorizontalAlign="Left" /> <asp:BoundField DataField="Concepto" HeaderText="Concepto" />
<asp:BoundField DataField="EstatusOrdenServicio" HeaderText="Estatus" ItemStyle-HorizontalAlign="Left" /> <asp:BoundField DataField="EstatusOrdenServicio" HeaderText="Estatus" />
<asp:BoundField DataField="FechaIng" HeaderText="Fecha Ingreso" DataFormatString="{0:d}" ItemStyle-Width="130px" /> <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="TipoVenta" HeaderText="Tipo Venta" />
<asp:BoundField DataField="Procedimiento" HeaderText="Procedimiento" ItemStyle-HorizontalAlign="Left" Visible="false" /> <asp:BoundField DataField="Medico" HeaderText="Médico" Visible="false" />
<asp:BoundField DataField="Procedimiento" HeaderText="Procedimiento" Visible="false" />
<asp:TemplateField ItemStyle-Width="120px" HeaderText="Fecha Servicio"> <asp:TemplateField ItemStyle-Width="120px" HeaderText="Fecha Servicio">
<ItemTemplate> <ItemTemplate>

26
OS/Asignaciones.aspx.vb
View File

@@ -2,7 +2,6 @@
Option Strict On Option Strict On
Imports System.Data Imports System.Data
Imports System.Data.Entity.Core.Metadata.Edm
Imports Extensiones Imports Extensiones
Imports Microsoft.Reporting.WebForms Imports Microsoft.Reporting.WebForms
Imports MKB.TimePicker Imports MKB.TimePicker
@@ -71,15 +70,11 @@ Partial Class OS_Asignaciones
End If End If
End If End If
ObjEstatusPermisos.Dispose() ObjEstatusPermisos.Dispose()
End If End If
RegistraScript(" RegistraScript("
$('#GvNA tr').each(function() { $('#GvNA tr').each(function() {
$(this).find('td:eq(6) input').each(function() { $(this).find('td:eq(7) input').each(function() {
if($(this).val()!=':'){ if($(this).val()!=':'){
$(this).attr('style', 'width: 20px;'); $(this).attr('style', 'width: 20px;');
}else{ }else{
@@ -100,15 +95,14 @@ Partial Class OS_Asignaciones
GvNA.Columns(7).Visible = True GvNA.Columns(7).Visible = True
GvNA.Columns(8).Visible = True GvNA.Columns(8).Visible = True
GvNA.Columns(11).Visible = True GvNA.Columns(9).Visible = True
GvNA.Columns(12).Visible = True
GvNA.Columns(2).HeaderText = "Hospital" GvNA.Columns(2).HeaderText = "Hospital"
GvNA.Columns(9).HeaderText = "Fecha Cirugía" GvNA.Columns(10).HeaderText = "Fecha Cirugía"
GvNA.Columns(10).HeaderText = "Hora Cirugía" GvNA.Columns(11).HeaderText = "Hora Cirugía"
End If End If
End Sub End Sub
#Region "C A R G A S " #Region "C A R G A S "
@@ -558,8 +552,7 @@ Partial Class OS_Asignaciones
e.Row.FindControl("TimeSelector").Visible = True e.Row.FindControl("TimeSelector").Visible = True
End If End If
If UsuarioActual.Empresa.Funcionalidad(578).ToEntero = 1 Then If UsuarioActual.Empresa.Funcionalidad(578) = "1" Then
Dim FechaCita = e.Row.DataKey("FechaCitaOS").ToDateTime Dim FechaCita = e.Row.DataKey("FechaCitaOS").ToDateTime
e.Row.FCTextBox("FechaOS").Text = FechaCita.ToString("dd/MM/yyyy") e.Row.FCTextBox("FechaOS").Text = FechaCita.ToString("dd/MM/yyyy")
e.Row.FCTextBox("FechaOS").Visible = True e.Row.FCTextBox("FechaOS").Visible = True
@@ -569,13 +562,10 @@ Partial Class OS_Asignaciones
Dim TMSelector = DirectCast(e.Row.FindControl("TimeSelector"), TimeSelector) Dim TMSelector = DirectCast(e.Row.FindControl("TimeSelector"), TimeSelector)
TMSelector.Date = FechaCita 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.Ticks.ToString)
e.Row.Cells(10).Attributes.Add("data-order", e.Row.DBCampo("FechaCitaOS").ToDate.ToString("HHmm")) e.Row.Cells(11).Attributes.Add("data-order", e.Row.DBCampo("FechaCitaOS").ToDate.ToString("HHmm"))
End If End If
End If End If
UpOS.Update() UpOS.Update()