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

Browse Source
This commit is contained in:
JORGE LUIS CAUDILLO ESPARZA
2020-07-02 17:47:27 -07:00
parent 4ed018bb4d
commit 5cda2592ec
5 changed files with 333 additions and 184 deletions
Download Patch File Download Diff File Expand all files Collapse all files

50
AF/AF.aspx
View File

@@ -1362,7 +1362,55 @@
</asp:UpdatePanel>
</ContentTemplate>
</ajax:TabPanel>
<ajax:TabPanel ID="TabOrdenesdeServicio" Visible="false" runat="server" HeaderText="Ordenes de Servicio">
<ContentTemplate>
<asp:GridView ID="GVOrdenesdeServicio" runat="server" GridLines="None" CssClass="table table-hover table-striped ScrollAD Widthall" AutoGenerateColumns="False" data-height="400">
<Columns>
<asp:TemplateField HeaderText="Folio">
<ItemTemplate>
<asp:Label runat="server" Text='<%# Eval("Folio")%>'> </asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Fecha">
<ItemTemplate>
<asp:Label runat="server" Text='<%# Eval("Fecha", "{0:dd/MM/yyyy}")%>'> </asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Obra">
<ItemTemplate>
<asp:Label runat="server" Text='<%# Eval("Obra")%>'> </asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Tipo de Servicio">
<ItemTemplate>
<asp:Label runat="server" Text='<%# Eval("TipodeServicio")%>'> </asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Servicio">
<ItemTemplate>
<asp:Label runat="server" Text='<%# Eval("Servicio")%>'> </asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Estatus">
<ItemTemplate>
<asp:Label runat="server" Text='<%# Eval("Estatus")%>'> </asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Duración">
<ItemTemplate>
<asp:Label runat="server" Text='<%# Eval("Duracion")%>'> </asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Atendió">
<ItemTemplate>
<asp:Label runat="server" Text='<%# Eval("Atendio")%>'> </asp:Label>
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>
</ContentTemplate>
</ajax:TabPanel>
<ajax:TabPanel ID="TabGPS" HeaderText="GPS" runat="server" Visible="false">
<ContentTemplate>
<ajax:TabContainer ID="TabGPSContenido" runat="server" Width="100%">

58
AF/AF.aspx.vb
View File

@@ -284,8 +284,64 @@ Partial Class AF_AF
End If
CargaAFInv()
cargaOrdenesdeservicio()
End If
End Sub
Private Sub cargaOrdenesdeservicio()
Dim dt As New DataTable()
dt.Columns.Add("Folio", GetType(String))
dt.Columns.Add("Fecha", GetType(Date))
dt.Columns.Add("Obra", GetType(String))
dt.Columns.Add("TipodeServicio", GetType(String))
dt.Columns.Add("Servicio", GetType(String))
dt.Columns.Add("Estatus", GetType(String))
dt.Columns.Add("Duracion", GetType(String))
dt.Columns.Add("Atendio", GetType(String))
Dim dr As DataRow = dt.NewRow()
dr("Folio") = "101"
dr("Fecha") = "2019/08/23"
dr("Obra") = "Ganaderos"
dr("TipodeServicio") = "Preventivo"
dr("Servicio") = "100 Hrs"
dr("Estatus") = "Terminada"
dr("Duracion") = "5 Hrs"
dr("Atendio") = "Juan perez"
dt.Rows.Add(dr)
dr = dt.NewRow()
dr("Folio") = "190"
dr("Fecha") = "2019/09/30"
dr("Obra") = "Ganaderos"
dr("TipodeServicio") = "Preventivo"
dr("Servicio") = "200 Hrs"
dr("Estatus") = "Terminada"
dr("Duracion") = "5 hrs"
dr("Atendio") = "Ernesto Lopez"
dt.Rows.Add(dr)
dr = dt.NewRow()
dr("Folio") = "501"
dr("Fecha") = "2019/11/30"
dr("Obra") = "Vildósola"
dr("TipodeServicio") = "Preventivo"
dr("Servicio") = "400 Hrs"
dr("Estatus") = "Terminada"
dr("Duracion") = "8 hrs"
dr("Atendio") = "Juan perez"
dt.Rows.Add(dr)
dr = dt.NewRow()
dr("Folio") = "505"
dr("Fecha") = "2019/12/14"
dr("Obra") = "Vildósola"
dr("TipodeServicio") = "Correctivo"
dr("Servicio") = "Rep. Mayor motor"
dr("Estatus") = "En proceso"
dr("Duracion") = "ND"
dr("Atendio") = "Juan perez"
dt.Rows.Add(dr)
GVOrdenesdeServicio.DataSource = dt
GVOrdenesdeServicio.DataBind()
End Sub
Private Sub CargaFechaGPS()
TxtFechaIH.Text = $"01/{DateTime.Now.ToString("MM")}/{DateTime.Now.Year} 00:00"
TxtFechaFH.Text = $"{DateTime.Now.ToString("dd/MM/yyyy")} 23:59"
@@ -476,7 +532,7 @@ Partial Class AF_AF
Private Sub CargaAFInv()
If UsuarioActual.Empresa.UsaInventarios AndAlso CveActivoFijo <= 0 Then
HLAFInv.Visible = True
HLAFInv.Visible= True
Dim StrAlmacenes As String = "CveTipoAlmacen IN (1,2)"
DdlAFInvAlmacen.DataSource = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, CveEmpresaActual, -1).FiltraParametros(StrAlmacenes)