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

.

Browse Source
This commit is contained in:
rrene
2023-02-28 17:18:59 -07:00
parent dbfbf285a0 1de5cd9f96
commit 98cccccebc
24 changed files with 1048 additions and 681 deletions
Download Patch File Download Diff File Expand all files Collapse all files

27
App_Code/ClsGPS.vb
View File

@@ -531,10 +531,27 @@ Public Class ClsGPS
OnError("Ocurrió un error al obtener las coordenadas del equipo.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo()) OnError("Ocurrió un error al obtener las coordenadas del equipo.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try End Try
Return Retorno
End Function
Public Function DispositivoComentarioupdate(CveDispositivo As Integer, comentario As String, CveUsuario As Integer) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_GPS_DispositivoComentarioupdate")
With SqlAdapter.SelectCommand.Parameters
.Add("@CveDispositivo", SqlDbType.Int).Value = CveDispositivo
.Add("@Comentarios", SqlDbType.VarChar).Value = comentario
.Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
End With
Try
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception
OnError("Ocurrió un error al obtener las coordenadas del equipo.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return Retorno Return Retorno
End Function End Function
Public Function UltimaPosicionEquipoGet(CveDispositivos As String, CveCliente As Integer) As Boolean Public Function UltimaPosicionEquipoGet(CveDispositivos As String, CveCliente As Integer) As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_GPS_UltimaPosicionTGet") DataAdapter("PA_GPS_UltimaPosicionTGet")
@@ -3072,7 +3089,7 @@ Public Class ClsGPS
#Region "Dispositivos" #Region "Dispositivos"
Public Function DispositivoAdd(TipoDispositivo As Integer, NumTelefono As String, CveModelo As Integer, CveProveedorComunicacionCuenta As Integer, CveCliente As Integer, IMEI As String, Serie As String, CveEstatus As Integer, SerieVehiculo As String, ColorVehiculo As String, Public Function DispositivoAdd(TipoDispositivo As Integer, NumTelefono As String, CveModelo As Integer, CveProveedorComunicacionCuenta As Integer, CveCliente As Integer, IMEI As String, Serie As String, CveEstatus As Integer, SerieVehiculo As String, ColorVehiculo As String,
NombreVehiculo As String, NoEconomico As String, devID As String, devPort As Integer, ModeloVehiculo As String, AñoVehiculo As String, ClaseVehiculo As String, PlacasVehiculo As String, LimiteVelocidad As Boolean, VelocidadMaxima As Double, NombreVehiculo As String, NoEconomico As String, devID As String, devPort As Integer, ModeloVehiculo As String, AñoVehiculo As String, ClaseVehiculo As String, PlacasVehiculo As String, LimiteVelocidad As Boolean, VelocidadMaxima As Double,
DetallesVehiculo As String, Rendimiento As Double, Icono As String, ColorTrazo As String, CveUsuario As Integer) As Boolean DetallesVehiculo As String, Rendimiento As Double, Icono As String, ColorTrazo As String, CveUsuario As Integer, AsignadoEn As String) As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_GPS_DispositivosAdd") DataAdapter("PA_GPS_DispositivosAdd")
With SqlAdapter.SelectCommand.Parameters With SqlAdapter.SelectCommand.Parameters
@@ -3102,6 +3119,7 @@ Public Class ClsGPS
.Add("@Icono", SqlDbType.VarChar).Value = Icono .Add("@Icono", SqlDbType.VarChar).Value = Icono
.Add("@ColorTrazo", SqlDbType.VarChar).Value = ColorTrazo .Add("@ColorTrazo", SqlDbType.VarChar).Value = ColorTrazo
.Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
.Add("@AsignadoEn", SqlDbType.VarChar).Value = AsignadoEn
End With End With
@@ -3283,7 +3301,7 @@ Public Class ClsGPS
Public Function DispositivosUpdate(TipoDispositivo As Integer, NumTelefono As String, CveDispositivo As Integer, CveModelo As Integer, CveProveedorComunicacionCuenta As Integer, CveCliente As Integer, IMEI As String, Serie As String, CveEstatus As Integer, Public Function DispositivosUpdate(TipoDispositivo As Integer, NumTelefono As String, CveDispositivo As Integer, CveModelo As Integer, CveProveedorComunicacionCuenta As Integer, CveCliente As Integer, IMEI As String, Serie As String, CveEstatus As Integer,
SerieVehiculo As String, ColorVehiculo As String, NombreVehiculo As String, NoEconomico As String, devID As String, devPort As Integer, ModeloVehiculo As String, AñoVehiculo As String, ClaseVehiculo As String, PlacasVehiculo As String, LimiteVelocidad As Boolean, VelocidadMaxima As Double, SerieVehiculo As String, ColorVehiculo As String, NombreVehiculo As String, NoEconomico As String, devID As String, devPort As Integer, ModeloVehiculo As String, AñoVehiculo As String, ClaseVehiculo As String, PlacasVehiculo As String, LimiteVelocidad As Boolean, VelocidadMaxima As Double,
DetallesVehiculo As String, Rendimiento As Double, Icono As String, ColorTrazo As String, CveUsuario As Integer) As Boolean DetallesVehiculo As String, Rendimiento As Double, Icono As String, ColorTrazo As String, CveUsuario As Integer, AsignadoEn As String) As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_GPS_DispositivosUpdate") DataAdapter("PA_GPS_DispositivosUpdate")
With SqlAdapter.SelectCommand.Parameters With SqlAdapter.SelectCommand.Parameters
@@ -3313,6 +3331,7 @@ Public Class ClsGPS
.Add("@Icono", SqlDbType.VarChar).Value = Icono .Add("@Icono", SqlDbType.VarChar).Value = Icono
.Add("@ColorTrazo", SqlDbType.VarChar).Value = ColorTrazo .Add("@ColorTrazo", SqlDbType.VarChar).Value = ColorTrazo
.Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
.Add("@AsignadoEn", SqlDbType.VarChar).Value = AsignadoEn
End With End With
Try Try
SqlAdapter.Fill(Data) SqlAdapter.Fill(Data)

34
App_Code/modExtensiones.vb
View File

@@ -2397,11 +2397,39 @@ Namespace Extensiones
excel.Worksheets.AddCopy(NombreTabla, worksheetDTExtra) excel.Worksheets.AddCopy(NombreTabla, worksheetDTExtra)
excel.Worksheets(0).Name = Titulo excel.Worksheets(0).Name = Titulo
End If End If
Dim indexRow As Integer = 8
Dim indexRowGV As Integer = 0
Dim cssClassRow As String = ""
For indexRow = 8 To worksheet.Rows.Count - 4
Try
cssClassRow = GridView.Rows(indexRowGV).CssClass.Trim()
Select Case cssClassRow
Case "SubTotales2"
worksheet.Cells.GetSubrangeRelative(indexRow - 1, 0, celdasConTexto.LastColumnIndex + 1, 1).Style.FillPattern.SetSolid(System.Drawing.ColorTranslator.FromHtml("#c0c0c0"))
worksheet.Cells.GetSubrangeRelative(indexRow - 1, 0, celdasConTexto.LastColumnIndex + 1, 1).Style.Font.Weight = 1000
worksheet.Cells.GetSubrangeRelative(indexRow - 1, 0, celdasConTexto.LastColumnIndex + 1, 1).Style.Font.Color = System.Drawing.ColorTranslator.FromHtml("#000077")
Case "SubTotales"
worksheet.Cells.GetSubrangeRelative(indexRow - 1, 0, celdasConTexto.LastColumnIndex + 1, 1).Style.FillPattern.SetSolid(System.Drawing.ColorTranslator.FromHtml("#dddddd"))
worksheet.Cells.GetSubrangeRelative(indexRow - 1, 0, celdasConTexto.LastColumnIndex + 1, 1).Style.Font.Weight = 1000
worksheet.Cells.GetSubrangeRelative(indexRow - 1, 0, celdasConTexto.LastColumnIndex + 1, 1).Style.Font.Color = System.Drawing.ColorTranslator.FromHtml("#67809F")
Case Else
End Select
Catch ex As Exception
End Try
indexRowGV += 1
Next
End If End If
excel.Save(HttpContext.Current.Response, $"{NombreArchivoXLSx}.xlsx") excel.Save(HttpContext.Current.Response, $"{NombreArchivoXLSx}.xlsx")

BIN
Bin/GoPdf.dll Normal file
View File

Binary file not shown.

105
CGame/CatEmpaque.aspx
View File

@@ -3,9 +3,30 @@
<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server"> <asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
</asp:Content> </asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server"> <asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
<style>
.ocultar {
display: none;
}
.page-bar .page-breadcrumb{
display: none !important;
}
.portlet-title .font-green, .portlet-title .font-green a {
color: #3598dc !important;
}
.GvEmpaque th {
text-align: left !important;
}
.GvEmpaque th.centerclass {
text-align: center !important;
}
</style>
</asp:Content> </asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server"> <asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server">
Catalogo de Empaques Catalogo de Empaque Destino
</asp:Content> </asp:Content>
<asp:Content ID="Content4" ContentPlaceHolderID="HB" runat="Server"> <asp:Content ID="Content4" ContentPlaceHolderID="HB" runat="Server">
</asp:Content> </asp:Content>
@@ -15,67 +36,87 @@
<asp:UpdatePanel ID="UpAcciones" runat="server" UpdateMode="Conditional"> <asp:UpdatePanel ID="UpAcciones" runat="server" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<li> <li>
<asp:LinkButton ID="LnkAgregarTiposEtiqueta" OnClick="LnkAgregarTipo_Click" runat="server"><i class="fa fa-plus"></i>Agregar Empaque</asp:LinkButton></li> <asp:LinkButton ID="LnkAgregarTiposEtiqueta" OnClick="LnkAgregarTipo_Click" runat="server"><i class="fa fa-plus"></i>Agregar</asp:LinkButton></li>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
</asp:Content> </asp:Content>
<asp:Content ID="Content7" ContentPlaceHolderID="C" runat="Server"> <asp:Content ID="Content7" ContentPlaceHolderID="C" runat="Server">
<asp:UpdatePanel ID="upDatosTipo" runat="server" UpdateMode="Conditional"> <asp:UpdatePanel ID="upDatosTipo" runat="server" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<div class="row" style="margin-right: 10px; margin-top: 18px;" align="right"> <div class="portlet light bordered" style="margin-bottom: 0px; padding: 0px;" id="form_wizard_1">
<div class="portlet-title">
<div class="caption font-green">
<i class="icon-pin font-green"></i>
<span class="caption-subject font-green bold uppercase">Información
<asp:Literal ID="LtlPeriodoseleccionado" runat="server"></asp:Literal></span>
</div>
<div class="tools">
<a href="javascript:;" class="collapse" data-original-title="" title=""></a>
<%--<a href="javascript:;" class="fullscreen" data-original-title="" title=""></a>--%>
</div>
<div class="actions">
<div class="btn-group">
</div>
</div>
<div style="float: right;">
<input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvEmpaque.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" /> <input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvEmpaque.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvEmpaque.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a> <a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvEmpaque.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
</div>
<asp:GridView ID="GvEmpaque" runat="server" GridLines="None" CssClass="table table-hover table-striped ScrollAD mysmallbtn" Width="100%" data-sort="true" AutoGenerateColumns="False"
</div>
</div>
<div class="portlet-body form">
<asp:GridView ID="GvEmpaque" runat="server" GridLines="None" CssClass="table table-hover table-striped GvEmpaque ScrollAD mysmallbtn" Width="100%" data-sort="true" AutoGenerateColumns="False"
DataKeyNames="CveEmpaque,Empaque,Estatus,FechaIng,CveUsuario,Usuario,CveEmpresa,Empresa,CostoXTonelada,CostoPreEnfriado,Lleno,Sencillo,TermoLleno,TermoSencillo"> DataKeyNames="CveEmpaque,Empaque,Estatus,FechaIng,CveUsuario,Usuario,CveEmpresa,Empresa,CostoXTonelada,CostoPreEnfriado,Lleno,Sencillo,TermoLleno,TermoSencillo">
<Columns> <Columns>
<asp:TemplateField HeaderText="Empaque" ItemStyle-HorizontalAlign="Left"> <asp:TemplateField HeaderText="Empaque" ItemStyle-HorizontalAlign="Left" Visible="true">
<ItemTemplate> <ItemTemplate>
<asp:Label ID="lbltipoEtiqueta" runat="server" Text='<%# Eval("Empaque")%>'> </asp:Label> <asp:Label ID="lbltipoEtiqueta" runat="server" Text='<%# Eval("Empaque")%>'> </asp:Label>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField HeaderText="Costo X Tonelada" ItemStyle-HorizontalAlign="Right"> <asp:TemplateField HeaderText="Costo X Tonelada" ItemStyle-HorizontalAlign="Right" Visible="false">
<ItemTemplate> <ItemTemplate>
<asp:Label ID="LblCostoXTonelada" runat="server" Text='<%# Eval("CostoXTonelada")%>'> </asp:Label> <asp:Label ID="LblCostoXTonelada" runat="server" Text='<%# Eval("CostoXTonelada")%>'> </asp:Label>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField HeaderText="Costo PreEnfriado" ItemStyle-HorizontalAlign="Right"> <asp:TemplateField HeaderText="Costo PreEnfriado" ItemStyle-HorizontalAlign="Right" Visible="false">
<ItemTemplate> <ItemTemplate>
<asp:Label ID="LblCostoPreEnfriado" runat="server" Text='<%# Eval("CostoPreEnfriado")%>'> </asp:Label> <asp:Label ID="LblCostoPreEnfriado" runat="server" Text='<%# Eval("CostoPreEnfriado")%>'> </asp:Label>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField HeaderText="Full" ItemStyle-HorizontalAlign="Right"> <asp:TemplateField HeaderText="Full" ItemStyle-HorizontalAlign="Right" Visible="false">
<ItemTemplate> <ItemTemplate>
<asp:Label ID="LblFull" runat="server" Text='<%# Eval("Lleno")%>'> </asp:Label> <asp:Label ID="LblFull" runat="server" Text='<%# Eval("Lleno")%>'> </asp:Label>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField HeaderText="Sencillo" ItemStyle-HorizontalAlign="Right"> <asp:TemplateField HeaderText="Sencillo" ItemStyle-HorizontalAlign="Right" Visible="false">
<ItemTemplate> <ItemTemplate>
<asp:Label ID="LblSencillo" runat="server" Text='<%# Eval("Sencillo")%>'> </asp:Label> <asp:Label ID="LblSencillo" runat="server" Text='<%# Eval("Sencillo")%>'> </asp:Label>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField HeaderText="TermoFull" ItemStyle-HorizontalAlign="Right"> <asp:TemplateField HeaderText="TermoFull" ItemStyle-HorizontalAlign="Right" Visible="false">
<ItemTemplate> <ItemTemplate>
<asp:Label ID="LblTermoFull" runat="server" Text='<%# Eval("TermoLleno")%>'> </asp:Label> <asp:Label ID="LblTermoFull" runat="server" Text='<%# Eval("TermoLleno")%>'> </asp:Label>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField HeaderText="TermoSencillo" ItemStyle-HorizontalAlign="Right"> <asp:TemplateField HeaderText="TermoSencillo" ItemStyle-HorizontalAlign="Right" Visible="false">
<ItemTemplate> <ItemTemplate>
<asp:Label ID="LblTermoSencillo" runat="server" Text='<%# Eval("TermoSencillo")%>'> </asp:Label> <asp:Label ID="LblTermoSencillo" runat="server" Text='<%# Eval("TermoSencillo")%>'> </asp:Label>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField HeaderText="Estatus" ItemStyle-HorizontalAlign="Center"> <asp:TemplateField HeaderText="Estatus" ItemStyle-Width="100px" >
<ItemTemplate> <ItemTemplate>
<asp:Label ID="lblestatus" runat="server" Text='<%# Eval("Estatus")%>'> </asp:Label> <asp:Label ID="lblestatus" runat="server" Text='<%# Eval("Estatus")%>'> </asp:Label>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:BoundField DataField="FechaIng" ItemStyle-Width="15%" HeaderText="Fecha de Ingreso" ItemStyle-HorizontalAlign="Center" DataFormatString="{0:d}" /> <asp:BoundField DataField="FechaIng" ItemStyle-CssClass="centerclass" ItemStyle-Width="100px" HeaderText="Fecha de Ingreso" ItemStyle-HorizontalAlign="Center" DataFormatString="{0:d}" />
<asp:TemplateField HeaderText="Usuario" ItemStyle-HorizontalAlign="Left"> <asp:TemplateField HeaderText="Usuario" ItemStyle-Width="200px" ItemStyle-HorizontalAlign="Left">
<ItemTemplate> <ItemTemplate>
<asp:Label ID="lblusuario" runat="server" Text='<%# Eval("Usuario")%>'> </asp:Label> <asp:Label ID="lblusuario" runat="server" Text='<%# Eval("Usuario")%>'> </asp:Label>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Center" ItemStyle-Width="15%" HeaderText="Comandos"> <asp:TemplateField ItemStyle-HorizontalAlign="Center" ItemStyle-Width="100px" HeaderText="Comandos">
<ItemTemplate> <ItemTemplate>
<asp:LinkButton data-toggle="tooltip" title="Editar" ID="LnkEditar" OnClick="LnkEditarTipo_Click" CssClass="btn btn-circle btn-sm green" runat="server" Text="<i class='fa fa-pencil'></i>"></asp:LinkButton> <asp:LinkButton data-toggle="tooltip" title="Editar" ID="LnkEditar" OnClick="LnkEditarTipo_Click" CssClass="btn btn-circle btn-sm green" runat="server" Text="<i class='fa fa-pencil'></i>"></asp:LinkButton>
<asp:LinkButton ID="imgD" runat="server" OnClick="LnkEliminarTipo_Click" CssClass="btn btn-circle btn-sm red" Text="<i class='icon-trash'></i>" data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea eliminar el TiposEtiqueta?" data-btn-ok-label="si" /> <asp:LinkButton ID="imgD" runat="server" OnClick="LnkEliminarTipo_Click" CssClass="btn btn-circle btn-sm red" Text="<i class='icon-trash'></i>" data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea eliminar el TiposEtiqueta?" data-btn-ok-label="si" />
@@ -83,6 +124,8 @@
</asp:TemplateField> </asp:TemplateField>
</Columns> </Columns>
</asp:GridView> </asp:GridView>
</div></div>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
<div id="DModalTiposEtiqueta" class="modal ADS fade" role="dialog"> <div id="DModalTiposEtiqueta" class="modal ADS fade" role="dialog">
@@ -98,46 +141,46 @@
<asp:TextBox ID="TxtEmpaque" CssClass="form-control" runat="server"></asp:TextBox> <asp:TextBox ID="TxtEmpaque" CssClass="form-control" runat="server"></asp:TextBox>
<asp:RequiredFieldValidator ID="RfvEmpaque" runat="server" ControlToValidate="TxtEmpaque" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Tipo Etiqueta''</b> es necesario, por favor ingréselo." ValidationGroup="VGMEmpaque"></asp:RequiredFieldValidator> <asp:RequiredFieldValidator ID="RfvEmpaque" runat="server" ControlToValidate="TxtEmpaque" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Tipo Etiqueta''</b> es necesario, por favor ingréselo." ValidationGroup="VGMEmpaque"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VcoEmpaque" runat="server" HighlightCssClass="vco" TargetControlID="RfvEmpaque"></ajax:ValidatorCalloutExtender> <ajax:ValidatorCalloutExtender ID="VcoEmpaque" runat="server" HighlightCssClass="vco" TargetControlID="RfvEmpaque"></ajax:ValidatorCalloutExtender>
<label for="<%= TxtEmpaque.ClientID.ToString()%>">Empaque:</label> <label for="<%= TxtEmpaque.ClientID.ToString()%>">Empaque Destino:</label>
</div> </div>
<div class="form-group form-md-line-input input-iconright"> <div class="form-group form-md-line-input input-iconright ocultar">
<asp:TextBox ID="TxtCostoXTonelada" CssClass="form-control" runat="server"></asp:TextBox> <asp:TextBox ID="TxtCostoXTonelada" CssClass="form-control" runat="server"></asp:TextBox>
<%-- <asp:RequiredFieldValidator ID="RFVCostoXTonelada" runat="server" ControlToValidate="TxtCostoXTonelada" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Costo X Tonelada''</b> es necesario, por favor ingréselo." ValidationGroup="VGMEmpaque"></asp:RequiredFieldValidator> <%-- <asp:RequiredFieldValidator ID="RFVCostoXTonelada" runat="server" ControlToValidate="TxtCostoXTonelada" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Costo X Tonelada''</b> es necesario, por favor ingréselo." ValidationGroup="VGMEmpaque"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VCECostoXTonelada" runat="server" HighlightCssClass="vco" TargetControlID="RFVCostoXTonelada"></ajax:ValidatorCalloutExtender>--%> <ajax:ValidatorCalloutExtender ID="VCECostoXTonelada" runat="server" HighlightCssClass="vco" TargetControlID="RFVCostoXTonelada"></ajax:ValidatorCalloutExtender>--%>
<ajax:FilteredTextBoxExtender ID="FIETCostoXToneladae" TargetControlID="TxtCostoXTonelada" FilterType="Numbers,Custom" ValidChars="." runat="server" /> <ajax:FilteredTextBoxExtender ID="FIETCostoXToneladae" TargetControlID="TxtCostoXTonelada" FilterType="Numbers,Custom" ValidChars="." runat="server" />
<label for="<%= TxtCostoXTonelada.ClientID.ToString()%>">CostoXTonelada:</label> <label for="<%= TxtCostoXTonelada.ClientID.ToString()%>">CostoXTonelada:</label>
</div> </div>
<div class="form-group form-md-line-input input-iconright"> <div class="form-group form-md-line-input input-iconright ocultar">
<asp:TextBox ID="TxtCostoPreEnfriado" CssClass="form-control" runat="server"></asp:TextBox> <asp:TextBox ID="TxtCostoPreEnfriado" CssClass="form-control" runat="server"></asp:TextBox>
<%-- <asp:RequiredFieldValidator ID="RFVViaje" runat="server" ControlToValidate="TxtViaje" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Viaje''</b> es necesario, por favor ingréselo." ValidationGroup="VGMEmpaque"></asp:RequiredFieldValidator> <%-- <asp:RequiredFieldValidator ID="RFVViaje" runat="server" ControlToValidate="TxtViaje" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Viaje''</b> es necesario, por favor ingréselo." ValidationGroup="VGMEmpaque"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VCEViaje" runat="server" HighlightCssClass="vco" TargetControlID="RFVViaje"></ajax:ValidatorCalloutExtender>--%> <ajax:ValidatorCalloutExtender ID="VCEViaje" runat="server" HighlightCssClass="vco" TargetControlID="RFVViaje"></ajax:ValidatorCalloutExtender>--%>
<ajax:FilteredTextBoxExtender ID="FTBECostoPreEnfriado" TargetControlID="TxtCostoPreEnfriado" FilterType="Numbers,Custom" ValidChars="." runat="server" /> <ajax:FilteredTextBoxExtender ID="FTBECostoPreEnfriado" TargetControlID="TxtCostoPreEnfriado" FilterType="Numbers,Custom" ValidChars="." runat="server" />
<label for="<%= TxtCostoPreEnfriado.ClientID.ToString()%>">CostoPreEnfriado:</label> <label for="<%= TxtCostoPreEnfriado.ClientID.ToString()%>">CostoPreEnfriado:</label>
</div> </div>
<div class="form-group form-md-line-input input-iconright"> <div class="form-group form-md-line-input input-iconright ocultar">
<asp:TextBox ID="TxtFull" CssClass="form-control" runat="server"></asp:TextBox> <asp:TextBox ID="TxtFull" CssClass="form-control" runat="server"></asp:TextBox>
<%-- <asp:RequiredFieldValidator ID="RFVFull" runat="server" ControlToValidate="TxtFull" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Full''</b> es necesario, por favor ingréselo." ValidationGroup="VGMEmpaque"></asp:RequiredFieldValidator> <%-- <asp:RequiredFieldValidator ID="RFVFull" runat="server" ControlToValidate="TxtFull" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Full''</b> es necesario, por favor ingréselo." ValidationGroup="VGMEmpaque"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VCEFull" runat="server" HighlightCssClass="vco" TargetControlID="RFVFull"></ajax:ValidatorCalloutExtender>--%> <ajax:ValidatorCalloutExtender ID="VCEFull" runat="server" HighlightCssClass="vco" TargetControlID="RFVFull"></ajax:ValidatorCalloutExtender>--%>
<ajax:FilteredTextBoxExtender ID="FTBEFull" TargetControlID="TxtFull" FilterType="Numbers,Custom" ValidChars="." runat="server" /> <ajax:FilteredTextBoxExtender ID="FTBEFull" TargetControlID="TxtFull" FilterType="Numbers,Custom" ValidChars="." runat="server" />
<label for="<%= TxtFull.ClientID.ToString()%>">Full:</label> <label for="<%= TxtFull.ClientID.ToString()%>">Full:</label>
</div> </div>
<div class="form-group form-md-line-input input-iconright"> <div class="form-group form-md-line-input input-iconright ocultar">
<asp:TextBox ID="TxtSencillo" CssClass="form-control" runat="server"></asp:TextBox> <asp:TextBox ID="TxtSencillo" CssClass="form-control" runat="server"></asp:TextBox>
<%-- <asp:RequiredFieldValidator ID="RequiredFieldValidator2" runat="server" ControlToValidate="TxtViaje" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Viaje''</b> es necesario, por favor ingréselo." ValidationGroup="VGMEmpaque"></asp:RequiredFieldValidator> <%-- <asp:RequiredFieldValidator ID="RequiredFieldValidator2" runat="server" ControlToValidate="TxtViaje" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Viaje''</b> es necesario, por favor ingréselo." ValidationGroup="VGMEmpaque"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender2" runat="server" HighlightCssClass="vco" TargetControlID="RFVViaje"></ajax:ValidatorCalloutExtender>--%> <ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender2" runat="server" HighlightCssClass="vco" TargetControlID="RFVViaje"></ajax:ValidatorCalloutExtender>--%>
<ajax:FilteredTextBoxExtender ID="FTBESencillo" TargetControlID="TxtSencillo" FilterType="Numbers,Custom" ValidChars="." runat="server" /> <ajax:FilteredTextBoxExtender ID="FTBESencillo" TargetControlID="TxtSencillo" FilterType="Numbers,Custom" ValidChars="." runat="server" />
<label for="<%= TxtSencillo.ClientID.ToString()%>">Sencillo:</label> <label for="<%= TxtSencillo.ClientID.ToString()%>">Sencillo:</label>
</div> </div>
<div class="form-group form-md-line-input input-iconright"> <div class="form-group form-md-line-input input-iconright ocultar">
<asp:TextBox ID="TxtTermoFull" CssClass="form-control" runat="server"></asp:TextBox> <asp:TextBox ID="TxtTermoFull" CssClass="form-control" runat="server"></asp:TextBox>
<%-- <asp:RequiredFieldValidator ID="RequiredFieldValidator3" runat="server" ControlToValidate="TxtViaje" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Viaje''</b> es necesario, por favor ingréselo." ValidationGroup="VGMEmpaque"></asp:RequiredFieldValidator> <%-- <asp:RequiredFieldValidator ID="RequiredFieldValidator3" runat="server" ControlToValidate="TxtViaje" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Viaje''</b> es necesario, por favor ingréselo." ValidationGroup="VGMEmpaque"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender3" runat="server" HighlightCssClass="vco" TargetControlID="RFVViaje"></ajax:ValidatorCalloutExtender>--%> <ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender3" runat="server" HighlightCssClass="vco" TargetControlID="RFVViaje"></ajax:ValidatorCalloutExtender>--%>
<ajax:FilteredTextBoxExtender ID="FTBETermoFull" TargetControlID="TxtTermoFull" FilterType="Numbers,Custom" ValidChars="." runat="server" /> <ajax:FilteredTextBoxExtender ID="FTBETermoFull" TargetControlID="TxtTermoFull" FilterType="Numbers,Custom" ValidChars="." runat="server" />
<label for="<%= TxtTermoFull.ClientID.ToString()%>">TermoFull:</label> <label for="<%= TxtTermoFull.ClientID.ToString()%>">TermoFull:</label>
</div> </div>
<div class="form-group form-md-line-input input-iconright"> <div class="form-group form-md-line-input input-iconright ocultar">
<asp:TextBox ID="TxtTermoSencillo" CssClass="form-control" runat="server"></asp:TextBox> <asp:TextBox ID="TxtTermoSencillo" CssClass="form-control" runat="server"></asp:TextBox>
<%-- <asp:RequiredFieldValidator ID="RequiredFieldValidator4" runat="server" ControlToValidate="TxtViaje" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Viaje''</b> es necesario, por favor ingréselo." ValidationGroup="VGMEmpaque"></asp:RequiredFieldValidator> <%-- <asp:RequiredFieldValidator ID="RequiredFieldValidator4" runat="server" ControlToValidate="TxtViaje" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Viaje''</b> es necesario, por favor ingréselo." ValidationGroup="VGMEmpaque"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender4" runat="server" HighlightCssClass="vco" TargetControlID="RFVViaje"></ajax:ValidatorCalloutExtender>--%> <ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender4" runat="server" HighlightCssClass="vco" TargetControlID="RFVViaje"></ajax:ValidatorCalloutExtender>--%>
<ajax:FilteredTextBoxExtender ID="FTBETermoSencillo" TargetControlID="TxtTermoSencillo" FilterType="Numbers,Custom" ValidChars="." runat="server" /> <ajax:FilteredTextBoxExtender ID="FTBETermoSencillo" TargetControlID="TxtTermoSencillo" FilterType="Numbers,Custom" ValidChars="." runat="server" />
<label for="<%= TxtTermoSencillo.ClientID.ToString()%>">TermoSencillo:</label> <label for="<%= TxtTermoSencillo.ClientID.ToString()%>">TermoSencillo:</label>

10
CGame/CatEmpaque.aspx.VB
View File

@@ -1,12 +1,6 @@
Option Strict On Option Strict On
Imports System.Data Imports System.Data
Imports System.Collections.Generic Imports System.Collections.Generic
Imports System.Linq
Imports System.Web
Imports System.Web.UI.WebControls
Imports Extensiones
Partial Class CATTiposEtiqueta
Imports System.Linq Imports System.Linq
Imports System.Web Imports System.Web
Imports System.Web.UI.WebControls Imports System.Web.UI.WebControls
@@ -28,9 +22,9 @@
End Property End Property

69
CGame/CatHuerta.aspx
View File

@@ -3,9 +3,18 @@
<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server"> <asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
</asp:Content> </asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server"> <asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
<style>
.ocultar {
display: none;
}
.page-bar .page-breadcrumb{
display: none !important;
}
</style>
</asp:Content> </asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server"> <asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server">
Catalogo de Huerta Catalogo de Productor
</asp:Content> </asp:Content>
<asp:Content ID="Content4" ContentPlaceHolderID="HB" runat="Server"> <asp:Content ID="Content4" ContentPlaceHolderID="HB" runat="Server">
</asp:Content> </asp:Content>
@@ -15,17 +24,37 @@
<asp:UpdatePanel ID="UpAcciones" runat="server" UpdateMode="Conditional"> <asp:UpdatePanel ID="UpAcciones" runat="server" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<li> <li>
<asp:LinkButton ID="LnkAgregarHuerta" OnClick="LnkAgregarHuer_Click" runat="server"><i class="fa fa-plus"></i>Agregar Huerta</asp:LinkButton></li> <asp:LinkButton ID="LnkAgregarHuerta" OnClick="LnkAgregarHuer_Click" runat="server"><i class="fa fa-plus"></i>Agregar</asp:LinkButton></li>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
</asp:Content> </asp:Content>
<asp:Content ID="Content7" ContentPlaceHolderID="C" runat="Server"> <asp:Content ID="Content7" ContentPlaceHolderID="C" runat="Server">
<asp:UpdatePanel ID="upDatosHuer" runat="server" UpdateMode="Conditional"> <asp:UpdatePanel ID="upDatosHuer" runat="server" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<div class="row" style="margin-right: 10px; margin-top: 18px;" align="right">
<div class="portlet light" style="margin-bottom: 0px; padding: 0px;" id="form_wizard_1">
<div class="portlet-title">
<div class="caption ">
<i class="fa fa-bookmark font-green"></i>
<span class="caption-subject font-green bold uppercase">Información
<asp:Literal ID="LtlPeriodoseleccionado" runat="server"></asp:Literal></span>
</div>
<div class="tools">
<a href="javascript:;" class="collapse" data-original-title="" title=""></a>
<%--<a href="javascript:;" class="fullscreen" data-original-title="" title=""></a>--%>
</div>
<div class="actions">
<div class="btn-group">
</div>
</div>
<div style="float: right;">
<input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GVHuerta.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" /> <input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GVHuerta.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GVHuerta.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a> <a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GVHuerta.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
</div>
</div>
</div>
<div class="portlet-body form">
<asp:GridView ID="GVHuerta" runat="server" GridLines="None" CssClass="table table-hover table-striped ScrollAD mysmallbtn" Width="100%" data-sort="true" AutoGenerateColumns="False" <asp:GridView ID="GVHuerta" runat="server" GridLines="None" CssClass="table table-hover table-striped ScrollAD mysmallbtn" Width="100%" data-sort="true" AutoGenerateColumns="False"
DataKeyNames="CveHuerta,Huerta,CveProveedor,RazonSocial,FechaIng,Estatus,CveUsuario,Usuario,CveEmpresa,Empresa,TipoCobro,Importe,CostoXTonelada" OnRowDataBound="GvHuerta_RowDataBound"> DataKeyNames="CveHuerta,Huerta,CveProveedor,RazonSocial,FechaIng,Estatus,CveUsuario,Usuario,CveEmpresa,Empresa,TipoCobro,Importe,CostoXTonelada" OnRowDataBound="GvHuerta_RowDataBound">
<Columns> <Columns>
@@ -34,27 +63,27 @@
<asp:Label ID="lblhuerta" runat="server" Text='<%# Eval("Huerta")%>'> </asp:Label> <asp:Label ID="lblhuerta" runat="server" Text='<%# Eval("Huerta")%>'> </asp:Label>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField HeaderText="Proveedor" ItemStyle-HorizontalAlign="Left"> <asp:TemplateField HeaderText="Proveedor" ItemStyle-HorizontalAlign="Left" Visible="false">
<ItemTemplate> <ItemTemplate>
<asp:Label ID="lblrazonsocial" runat="server" Text='<%# Eval("RazonSocial")%>'> </asp:Label> <asp:Label ID="lblrazonsocial" runat="server" Text='<%# Eval("RazonSocial")%>'> </asp:Label>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField HeaderText="Tipo Cobro" ItemStyle-HorizontalAlign="Left"> <asp:TemplateField HeaderText="Tipo Cobro" ItemStyle-HorizontalAlign="Left" Visible="false">
<ItemTemplate> <ItemTemplate>
<asp:Label ID="LblTipoCobro" runat="server" Text='<%# Eval("TipoCobro")%>'> </asp:Label> <asp:Label ID="LblTipoCobro" runat="server" Text='<%# Eval("TipoCobro")%>'> </asp:Label>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField HeaderText="Importe" ItemStyle-HorizontalAlign="Right"> <asp:TemplateField HeaderText="Importe" ItemStyle-HorizontalAlign="Right" Visible="false">
<ItemTemplate> <ItemTemplate>
<asp:Label ID="LblImporte" runat="server" Text='<%# Eval("Importe")%>'> </asp:Label> <asp:Label ID="LblImporte" runat="server" Text='<%# Eval("Importe")%>'> </asp:Label>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField HeaderText="Costo X Tonelada E.M.P." ItemStyle-HorizontalAlign="Right"> <asp:TemplateField HeaderText="Costo X Tonelada E.M.P." ItemStyle-HorizontalAlign="Right" Visible="false">
<ItemTemplate> <ItemTemplate>
<asp:Label ID="LblCostoXTonelada" runat="server" Text='<%# Eval("CostoXTonelada")%>'> </asp:Label> <asp:Label ID="LblCostoXTonelada" runat="server" Text='<%# Eval("CostoXTonelada")%>'> </asp:Label>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:BoundField DataField="FechaIng" ItemStyle-Width="15%" HeaderText="Fecha de Ingreso" ItemStyle-HorizontalAlign="Center" DataFormatString="{0:d}" /> <asp:BoundField DataField="FechaIng" ItemStyle-Width="15%" HeaderText="Fecha de Ingreso" ItemStyle-HorizontalAlign="Center" DataFormatString="{0:d}" />
<asp:TemplateField HeaderText="Estatus" ItemStyle-HorizontalAlign="Center"> <asp:TemplateField HeaderText="Estatus" ItemStyle-HorizontalAlign="Center">
<ItemTemplate> <ItemTemplate>
<asp:Label ID="lblestatus" runat="server" Text='<%# Eval("Estatus")%>'> </asp:Label> <asp:Label ID="lblestatus" runat="server" Text='<%# Eval("Estatus")%>'> </asp:Label>
@@ -72,7 +101,7 @@
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
</Columns> </Columns>
</asp:GridView> </asp:GridView></div></div>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
<div id="DModalHuerta" class="modal ADS fade" role="dialog"> <div id="DModalHuerta" class="modal ADS fade" role="dialog">
@@ -81,20 +110,20 @@
<div class="modal-content"> <div class="modal-content">
<div class="modal-header "> <div class="modal-header ">
<h4 class="modal-title"> <h4 class="modal-title">
<asp:Literal ID="ltlHuertitulo" runat="server" Text="Huerta"></asp:Literal></h4> <asp:Literal ID="ltlHuertitulo" runat="server" Text="Productor"></asp:Literal></h4>
</div> </div>
<div class="modal-body"> <div class="modal-body">
<div class="form-group form-md-line-input input-iconright"> <div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtHuerhuerta" CssClass="form-control" runat="server"></asp:TextBox> <asp:TextBox ID="TxtHuerhuerta" CssClass="form-control" runat="server"></asp:TextBox>
<asp:RequiredFieldValidator ID="RfvHuerhuerta" runat="server" ControlToValidate="TxtHuerhuerta" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Huerta''</b> es necesario, por favor ingréselo." ValidationGroup="VGMHuer"></asp:RequiredFieldValidator> <asp:RequiredFieldValidator ID="RfvHuerhuerta" runat="server" ControlToValidate="TxtHuerhuerta" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Huerta''</b> es necesario, por favor ingréselo." ValidationGroup="VGMHuer"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VcoHuerhuerta" runat="server" HighlightCssClass="vco" TargetControlID="RfvHuerhuerta"></ajax:ValidatorCalloutExtender> <ajax:ValidatorCalloutExtender ID="VcoHuerhuerta" runat="server" HighlightCssClass="vco" TargetControlID="RfvHuerhuerta"></ajax:ValidatorCalloutExtender>
<label for="<%= TxtHuerhuerta.ClientID.ToString()%>">Huerta:</label> <label for="<%= TxtHuerhuerta.ClientID.ToString()%>">Productor:</label>
</div> </div>
<div class="form-group form-md-line-input input-iconright"> <div class="form-group form-md-line-input input-iconright ocultar">
<asp:DropDownList ID="DdlProveedor" CssClass="form-control select2me " runat="server" DataTextField="RazonSocial" AppendDataBoundItems="true" DataValueField="CveProveedor" Style="width: 100%"></asp:DropDownList> <asp:DropDownList ID="DdlProveedor" CssClass="form-control select2me " runat="server" DataTextField="RazonSocial" AppendDataBoundItems="true" DataValueField="CveProveedor" Style="width: 100%"></asp:DropDownList>
<label for="<%= DdlProveedor.ClientID.ToString()%>">Proveedor:</label> <label for="<%= DdlProveedor.ClientID.ToString()%>">Proveedor:</label>
</div> </div>
<div class="form-group form-md-line-input input-iconright"> <div class="form-group form-md-line-input input-iconright ocultar">
<asp:DropDownList ID="DdlTipoCobro" CssClass="form-control select2me" runat="server" AppendDataBoundItems="true" Style="width: 100%"> <asp:DropDownList ID="DdlTipoCobro" CssClass="form-control select2me" runat="server" AppendDataBoundItems="true" Style="width: 100%">
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem> <asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
<asp:ListItem Text="Costo X Tonelada" Value="1"></asp:ListItem> <asp:ListItem Text="Costo X Tonelada" Value="1"></asp:ListItem>
@@ -102,17 +131,17 @@
</asp:DropDownList> </asp:DropDownList>
<label for="<%= DdlTipoCobro.ClientID.ToString()%>">Tipo de Cobro Flete Huerta Empaque:</label> <label for="<%= DdlTipoCobro.ClientID.ToString()%>">Tipo de Cobro Flete Huerta Empaque:</label>
</div> </div>
<div class="form-group form-md-line-input input-iconright"> <div class="form-group form-md-line-input input-iconright ocultar">
<asp:TextBox ID="TxtImporte" CssClass="form-control" runat="server"></asp:TextBox> <asp:TextBox ID="TxtImporte" CssClass="form-control" runat="server"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVImporte" runat="server" ControlToValidate="TxtImporte" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Importe''</b> es necesario, por favor ingréselo." ValidationGroup="VGMHuer"></asp:RequiredFieldValidator> <%--<asp:RequiredFieldValidator ID="RFVImporte" runat="server" ControlToValidate="TxtImporte" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Importe''</b> es necesario, por favor ingréselo." ValidationGroup="VGMHuer"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VCEImporte" runat="server" HighlightCssClass="vco" TargetControlID="RFVImporte"></ajax:ValidatorCalloutExtender> <ajax:ValidatorCalloutExtender ID="VCEImporte" runat="server" HighlightCssClass="vco" TargetControlID="RFVImporte"></ajax:ValidatorCalloutExtender>--%>
<ajax:FilteredTextBoxExtender ID="FIETTImporte" TargetControlID="TxtImporte" FilterType="Numbers,Custom" ValidChars="." runat="server" /> <ajax:FilteredTextBoxExtender ID="FIETTImporte" TargetControlID="TxtImporte" FilterType="Numbers,Custom" ValidChars="." runat="server" />
<label for="<%= TxtImporte.ClientID.ToString()%>">Importe:</label> <label for="<%= TxtImporte.ClientID.ToString()%>">Importe:</label>
</div> </div>
<div class="form-group form-md-line-input input-iconright"> <div class="form-group form-md-line-input input-iconright ocultar">
<asp:TextBox ID="TxtCostoXTonelada" CssClass="form-control" runat="server"></asp:TextBox> <asp:TextBox ID="TxtCostoXTonelada" CssClass="form-control" runat="server"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVCostoXTonelada" runat="server" ControlToValidate="TxtCostoXTonelada" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Costo X Tonelada E.M.P.''</b> es necesario, por favor ingréselo." ValidationGroup="VGMHuer"></asp:RequiredFieldValidator> <%--<asp:RequiredFieldValidator ID="RFVCostoXTonelada" runat="server" ControlToValidate="TxtCostoXTonelada" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Costo X Tonelada E.M.P.''</b> es necesario, por favor ingréselo." ValidationGroup="VGMHuer"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VCECostoXTonelada" runat="server" HighlightCssClass="vco" TargetControlID="RFVCostoXTonelada"></ajax:ValidatorCalloutExtender> <ajax:ValidatorCalloutExtender ID="VCECostoXTonelada" runat="server" HighlightCssClass="vco" TargetControlID="RFVCostoXTonelada"></ajax:ValidatorCalloutExtender>--%>
<ajax:FilteredTextBoxExtender ID="FTBECostoXTonelada" TargetControlID="TxtCostoXTonelada" FilterType="Numbers,Custom" ValidChars="." runat="server" /> <ajax:FilteredTextBoxExtender ID="FTBECostoXTonelada" TargetControlID="TxtCostoXTonelada" FilterType="Numbers,Custom" ValidChars="." runat="server" />
<label for="<%= TxtCostoXTonelada.ClientID.ToString()%>">Costo X Tonelada E.M.P.:</label> <label for="<%= TxtCostoXTonelada.ClientID.ToString()%>">Costo X Tonelada E.M.P.:</label>
</div> </div>

14
CGame/CatHuerta.aspx.cs
View File

@@ -8,13 +8,21 @@
public partial class CATHuerta :ClsPaginas public partial class CATHuerta :ClsPaginas
{ {
#region Propiedades
private int CveHuerta
{
get{return (ViewState["CveHuerta"] == null) ? 0 : Convert.ToInt32(ViewState["CveHuerta"]);}
set{ViewState["CveHuerta"] =value;}
}
#endregion
protected void Page_Load(object sender, EventArgs e) protected void Page_Load(object sender, EventArgs e)
{ {
if (!IsPostBack){ if (!IsPostBack){
CargaProveedor(); CargaProveedor();
set{ViewState["CveHuerta"] =value;} CargaHuerta();
} }
} }
protected void CargaHuerta() protected void CargaHuerta()
{ {

102
CGame/CatProductos.aspx
View File

@@ -3,6 +3,23 @@
<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server"> <asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
</asp:Content> </asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server"> <asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
<style>
.page-bar .page-breadcrumb {
display: none !important;
}
.GVProductos th {
text-align: left !important;
}
.GVProductos th.centerclass {
text-align: center !important;
}
.portlet-title .font-green, .portlet-title .font-green a {
color: #3598dc !important;
}
</style>
</asp:Content> </asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server"> <asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server">
Catalogo de Frutos Catalogo de Frutos
@@ -15,40 +32,69 @@
<asp:UpdatePanel ID="UpAcciones" runat="server" UpdateMode="Conditional"> <asp:UpdatePanel ID="UpAcciones" runat="server" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<li> <li>
<asp:LinkButton ID="LnkAgregarProductos" OnClick="LnkAgregarProd_Click" runat="server"><i class="fa fa-plus"></i>Agregar Producto</asp:LinkButton></li> <asp:LinkButton ID="LnkAgregarProductos" OnClick="LnkAgregarProd_Click" runat="server"><i class="fa fa-plus"></i>Agregar </asp:LinkButton></li>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
</asp:Content> </asp:Content>
<asp:Content ID="Content7" ContentPlaceHolderID="C" runat="Server"> <asp:Content ID="Content7" ContentPlaceHolderID="C" runat="Server">
<asp:UpdatePanel ID="upDatosProd" runat="server" UpdateMode="Conditional"> <asp:UpdatePanel ID="upDatosProd" runat="server" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<asp:GridView ID="GVProductos" runat="server" OnRowDataBound="GVProductos_RowDataBound" GridLines="None" CssClass="table table-hover table-striped ScrollAD mysmallbtn" data-sort="true" Width="100%" AutoGenerateColumns="False"
DataKeyNames="CvePS,PS,FechaIng,Estatus,CveUsuario,Usuario,CveEmpresa,Empresa"> <div class="portlet light portlet bordered " style="margin-bottom: 0px; padding: 0px;" id="form_wizard_1">
<Columns> <div class="portlet-title">
<asp:TemplateField HeaderText="Fruto" ItemStyle-HorizontalAlign="Left"> <div class="caption font-green">
<ItemTemplate> <i class="icon-pin font-green"></i>
<asp:Label ID="lblpS" runat="server" Text='<%# Eval("PS")%>'> </asp:Label> <span class="caption-subject font-green bold uppercase">Información
</ItemTemplate> <asp:Literal ID="LtlPeriodoseleccionado" runat="server"></asp:Literal></span>
</asp:TemplateField> </div>
<asp:TemplateField HeaderText="Estatus" ItemStyle-HorizontalAlign="Center">
<ItemTemplate> <div class="tools">
<asp:Label ID="lblestatus" runat="server" Text='<%# Eval("Estatus")%>'> </asp:Label> <a href="javascript:;" class="collapse" data-original-title="" title=""></a>
</ItemTemplate> <%--<a href="javascript:;" class="fullscreen" data-original-title="" title=""></a>--%>
</asp:TemplateField> </div>
<asp:BoundField DataField="FechaIng" ItemStyle-Width="15%" HeaderText="Fecha de Ingreso" ItemStyle-HorizontalAlign="Center" DataFormatString="{0:d}" /> <div class="actions">
<asp:TemplateField HeaderText="Usuario" ItemStyle-HorizontalAlign="Left"> <div class="btn-group">
<ItemTemplate> </div>
<asp:Label ID="lblusuario" runat="server" Text='<%# Eval("Usuario")%>'> </asp:Label> </div>
</ItemTemplate>
</asp:TemplateField> <div style="float: right;">
<asp:TemplateField ItemStyle-HorizontalAlign="Center" ItemStyle-Width="15%" HeaderText="Comandos"> <input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GVProductos.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
<ItemTemplate> <a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GVProductos.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
<asp:LinkButton data-toggle="tooltip" title="Editar" ID="LnkEditar" OnClick="LnkEditarProd_Click" CssClass="btn btn-circle btn-sm green" runat="server" Text="<i class='fa fa-pencil'></i>"></asp:LinkButton>
<asp:LinkButton ID="imgD" runat="server" OnClick="LnkEliminarProd_Click" CssClass="btn btn-circle btn-sm red" Text="<i class='icon-trash'></i>" data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea eliminar el Productos?" data-btn-ok-label="si" />
</ItemTemplate> </div>
</asp:TemplateField> </div>
</Columns> <div class="portlet-body form">
</asp:GridView>
<asp:GridView ID="GVProductos" runat="server" OnRowDataBound="GVProductos_RowDataBound" GridLines="None" CssClass="table GVProductos table-hover table-striped ScrollAD mysmallbtn" data-sort="true" Width="100%" AutoGenerateColumns="False"
DataKeyNames="CvePS,PS,FechaIng,Estatus,CveUsuario,Usuario,CveEmpresa,Empresa">
<Columns>
<asp:TemplateField HeaderText="Fruto" ItemStyle-HorizontalAlign="Left">
<ItemTemplate>
<asp:Label ID="lblpS" runat="server" Text='<%# Eval("PS")%>'> </asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Estatus" ItemStyle-Width="100px" >
<ItemTemplate>
<asp:Label ID="lblestatus" runat="server" Text='<%# Eval("Estatus")%>'> </asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:BoundField DataField="FechaIng" HeaderStyle-CssClass="centerclass" ItemStyle-Width="100px" HeaderText="Fecha de Ingreso" ItemStyle-HorizontalAlign="Center" DataFormatString="{0:d}" />
<asp:TemplateField HeaderText="Usuario" ItemStyle-HorizontalAlign="Left" ItemStyle-Width="200px">
<ItemTemplate>
<asp:Label ID="lblusuario" runat="server" Text='<%# Eval("Usuario")%>'> </asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Center" ItemStyle-Width="100px" HeaderText="Comandos">
<ItemTemplate>
<asp:LinkButton data-toggle="tooltip" title="Editar" ID="LnkEditar" OnClick="LnkEditarProd_Click" CssClass="btn btn-circle btn-sm green" runat="server" Text="<i class='fa fa-pencil'></i>"></asp:LinkButton>
<asp:LinkButton ID="imgD" runat="server" OnClick="LnkEliminarProd_Click" CssClass="btn btn-circle btn-sm red" Text="<i class='icon-trash'></i>" data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea eliminar el Productos?" data-btn-ok-label="si" />
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>
</div>
</div>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
<div id="DModalProductos" class="modal ADS fade" role="dialog"> <div id="DModalProductos" class="modal ADS fade" role="dialog">

113
CGame/CatTipoMaduracion.aspx
View File

@@ -3,6 +3,23 @@
<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server"> <asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
</asp:Content> </asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server"> <asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
<style>
.page-bar .page-breadcrumb {
display: none !important;
}
.portlet-title .font-green, .portlet-title .font-green a {
color: #3598dc !important;
}
.GVCGame_TipoMaduracion th {
text-align: left !important;
}
.GVCGame_TipoMaduracion th.centerclass {
text-align: center !important;
}
</style>
</asp:Content> </asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server"> <asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server">
Catálogo de Variedad Catálogo de Variedad
@@ -13,7 +30,7 @@
<asp:UpdatePanel ID="UpAcciones" runat="server" UpdateMode="Conditional"> <asp:UpdatePanel ID="UpAcciones" runat="server" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<li> <li>
<asp:LinkButton ID="LnkAgregarCGame_TipoMaduracion" OnClick="LnkAgregarCGam_Click" runat="server"><i class="fa fa-plus"></i> Agregar Tipo de Maduración</asp:LinkButton></li> <asp:LinkButton ID="LnkAgregarCGame_TipoMaduracion" OnClick="LnkAgregarCGam_Click" runat="server"><i class="fa fa-plus"></i> Agregar</asp:LinkButton></li>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
</asp:Content> </asp:Content>
@@ -23,38 +40,66 @@
<asp:UpdatePanel ID="upDatosCGam" runat="server" UpdateMode="Conditional"> <asp:UpdatePanel ID="upDatosCGam" runat="server" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<div class="row" style="margin-right: 10px; margin-top: 18px;" align="right">
<input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GVCGame_TipoMaduracion.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" /> <div class="portlet light bordered" style="margin-bottom: 0px; padding: 0px;" id="form_wizard_1">
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GVCGame_TipoMaduracion.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a> <div class="portlet-title">
<div class="caption font-green">
<i class="icon-pin font-green"></i>
<span class="caption-subject font-green bold uppercase">Información
<asp:Literal ID="LtlPeriodoseleccionado" runat="server"></asp:Literal></span>
</div>
<div class="tools">
<a href="javascript:;" class="collapse" data-original-title="" title=""></a>
<%--<a href="javascript:;" class="fullscreen" data-original-title="" title=""></a>--%>
</div>
<div class="actions">
<div class="btn-group">
</div>
</div>
<div style="float: right;">
<input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GVCGame_TipoMaduracion.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GVCGame_TipoMaduracion.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
</div>
</div>
<div class="portlet-body form">
<asp:GridView ID="GVCGame_TipoMaduracion" EmptyDataText="No hay tipos de maduración registrados." runat="server" GridLines="None"
CssClass="table table-hover table-striped ScrollAD GVCGame_TipoMaduracion mysmallbtn" Width="100%" data-sort="true" AutoGenerateColumns="False"
DataKeyNames="CveTipoMaduracion,TipoMaduracion,Estatus,FechaIng,CveUsuario,Usuario,CveEmpresa,Empresa,CvePS">
<Columns>
<asp:TemplateField HeaderText="Variedad" ItemStyle-HorizontalAlign="Left">
<ItemTemplate>
<asp:Label ID="lblcliente" runat="server" Text='<%# Eval("TipoMaduracion")%>'> </asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Producto" ItemStyle-HorizontalAlign="Left">
<ItemTemplate>
<asp:Label ID="LblPS" runat="server" Text='<%# Eval("PS")%>'> </asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Estatus" ItemStyle-Width="100px" >
<ItemTemplate>
<asp:Label ID="lblestatus" runat="server" Text='<%# If(CBool(Eval("Estatus")), "Activo", "Inactivo")%>'> </asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:BoundField HeaderText="Fecha Ingreso" ItemStyle-CssClass="centerclass" ItemStyle-Width="100px" ItemStyle-HorizontalAlign="Center" DataField="FechaIng" DataFormatString="{0:dd/MM/yyyy}" />
<asp:TemplateField HeaderText="Usuario" ItemStyle-HorizontalAlign="Left" ItemStyle-Width="200px">
<ItemTemplate>
<asp:Label ID="lblusuario" runat="server" Text='<%# Eval("Usuario")%>'> </asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Center" ItemStyle-Width="100px" HeaderText="Comandos">
<ItemTemplate>
<asp:LinkButton data-toggle="tooltip" title="Editar" ID="LnkEditar" OnClick="LnkEditarCGam_Click" CssClass="btn btn-circle btn-sm green" runat="server" Text="<i class='fa fa-pencil'></i>"></asp:LinkButton>
<asp:LinkButton ID="imgD" runat="server" OnClick="LnkEliminarCGam_Click" CssClass="btn btn-circle btn-sm red" Text="<i class='icon-trash'></i>" data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea eliminar el tipo de maduracion?" data-btn-ok-label="si" />
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>
</div>
</div> </div>
<asp:GridView ID="GVCGame_TipoMaduracion" EmptyDataText="No hay tipos de maduración registrados." runat="server" GridLines="None"
CssClass="table table-hover table-striped ScrollAD mysmallbtn" Width="100%" data-sort="true" AutoGenerateColumns="False"
DataKeyNames="CveTipoMaduracion,TipoMaduracion,Estatus,FechaIng,CveUsuario,Usuario,CveEmpresa,Empresa,CvePS">
<Columns>
<asp:TemplateField HeaderText="Variedad" ItemStyle-HorizontalAlign="Left">
<ItemTemplate>
<asp:Label ID="lblcliente" runat="server" Text='<%# Eval("TipoMaduracion")%>'> </asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Producto" ItemStyle-HorizontalAlign="Left">
<ItemTemplate>
<asp:Label ID="LblPS" runat="server" Text='<%# Eval("PS")%>'> </asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Estatus" ItemStyle-HorizontalAlign="Center">
<ItemTemplate>
<asp:Label ID="lblestatus" runat="server" Text='<%# If(CBool(Eval("Estatus")), "Activo", "Inactivo")%>'> </asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:BoundField HeaderText="Fecha Ingreso" ItemStyle-HorizontalAlign="Center" DataField="FechaIng" DataFormatString="{0:dd/MM/yyyy}" />
<asp:TemplateField ItemStyle-HorizontalAlign="Center" ItemStyle-Width="15%" HeaderText="Comandos">
<ItemTemplate>
<asp:LinkButton data-toggle="tooltip" title="Editar" ID="LnkEditar" OnClick="LnkEditarCGam_Click" CssClass="btn btn-circle btn-sm green" runat="server" Text="<i class='fa fa-pencil'></i>"></asp:LinkButton>
<asp:LinkButton ID="imgD" runat="server" OnClick="LnkEliminarCGam_Click" CssClass="btn btn-circle btn-sm red" Text="<i class='icon-trash'></i>" data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea eliminar el tipo de maduracion?" data-btn-ok-label="si" />
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
<div id="DModalCGame_TipoMaduracion" class="modal ADS fade" role="dialog"> <div id="DModalCGame_TipoMaduracion" class="modal ADS fade" role="dialog">
@@ -64,7 +109,7 @@
<div class="modal-header "> <div class="modal-header ">
<h4 class="modal-title"> <h4 class="modal-title">
<asp:Literal ID="ltlCGamtitulo" Text="Agregar Tipo Maduracion" runat="server"> </asp:Literal></h4> <asp:Literal ID="ltlCGamtitulo" Text="Agregar Variedad" runat="server"> </asp:Literal></h4>
</div> </div>
<div class="modal-body"> <div class="modal-body">
<div class="form-group form-md-line-input input-iconright"> <div class="form-group form-md-line-input input-iconright">
@@ -75,7 +120,7 @@
</div> </div>
<div class="form-group form-md-line-input input-iconright"> <div class="form-group form-md-line-input input-iconright">
<asp:DropDownList ID="DdlPS" CssClass="form-control select2me " runat="server" DataTextField="PS" DataValueField="CvePS" Style="width: 50%"></asp:DropDownList> <asp:DropDownList ID="DdlPS" CssClass="form-control select2me " runat="server" DataTextField="PS" DataValueField="CvePS" Style="width: 50%"></asp:DropDownList>
<label for="<%= DdlPS.ClientID.ToString()%>">Producto:</label> <label for="<%= DdlPS.ClientID.ToString()%>">Fruto:</label>
</div> </div>
<div class="form-group form-md-line-input input-iconright" id="DivEstatus" runat="server"> <div class="form-group form-md-line-input input-iconright" id="DivEstatus" runat="server">
<label for="<%= ChkCGamestatus.ClientID.ToString()%>">Estatus:</label> <label for="<%= ChkCGamestatus.ClientID.ToString()%>">Estatus:</label>

4
CGame/CatTipoMaduracion.aspx.vb
View File

@@ -79,7 +79,7 @@ Partial Class CGame_CatTipoMaduracion
UPModalCGam.Update() UPModalCGam.Update()
End Sub End Sub
Protected Sub LnkEditarCGam_Click(sender As Object, e As EventArgs) Protected Sub LnkEditarCGam_Click(sender As Object, e As EventArgs)
ltlCGamtitulo.Text = "Editar Tipo de Maduración" ltlCGamtitulo.Text = "Editar Variedad"
LimpiaCGame_TipoMaduracion() LimpiaCGame_TipoMaduracion()
divEstatus.Visible = True divEstatus.Visible = True
Dim gvRow As GridViewRow = DirectCast((DirectCast(sender, LinkButton)).NamingContainer, GridViewRow) Dim gvRow As GridViewRow = DirectCast((DirectCast(sender, LinkButton)).NamingContainer, GridViewRow)
@@ -100,7 +100,7 @@ Partial Class CGame_CatTipoMaduracion
End Sub End Sub
Protected Sub LnkAgregarCGam_Click(sender As Object, e As EventArgs) Protected Sub LnkAgregarCGam_Click(sender As Object, e As EventArgs)
divEstatus.Visible = False divEstatus.Visible = False
ltlCGamtitulo.Text = "Agregar Tipo de Maduración" ltlCGamtitulo.Text = "Agregar Variedad"
RegistraScript("$('#DModalCGame_TipoMaduracion').modal('show')") RegistraScript("$('#DModalCGame_TipoMaduracion').modal('show')")
LimpiaCGame_TipoMaduracion() LimpiaCGame_TipoMaduracion()
BtnCGamADD.Visible = True BtnCGamADD.Visible = True

268
Compras/eFacturas.aspx.vb
View File

@@ -4247,132 +4247,172 @@ Partial Class Compras_eFacturas
Protected Sub LnkRegenerarPdfnew_Click(sender As Object, e As EventArgs) Protected Sub LnkRegenerarPdfnew_Click(sender As Object, e As EventArgs)
Dim gvrow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow) Dim gvrow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow)
Dim objxml As XmlSatCFDI = XmlSatCFDI.readXML(String.Format("{0}{1}\{2}", Destino, gvrow.DataKey("RFCDe"), gvrow.DataKey("XML"))) Dim objxml As XmlSatCFDI = XmlSatCFDI.readXML(String.Format("{0}{1}\{2}", Destino, gvrow.DataKey("RFCDe"), gvrow.DataKey("XML")))
If Not IsNothing(objxml) Then
Dim rutaReporte As String = String.Format("{0}{1}", ModExtensiones.DirectorioBaseEmpresas, "\Empresas\Grales\Formatos\CFDIV3.rdlc")
If Not IsNothing(objxml.complemento.Pagos) Then Dim XmlRutaArchivo As String = File.ReadAllText(String.Format("{0}{1}\{2}", Destino, gvrow.DataKey("RFCDe"), gvrow.DataKey("XML")))
rutaReporte = String.Format("{0}{1}", ModExtensiones.DirectorioBaseEmpresas, "\Empresas\Grales\Formatos\CFDIV3Pago.rdlc") Dim PDFRutaArchivo As String = String.Format("{0}{1}\{2}", Destino, gvrow.DataKey("RFCDe"), gvrow.DataKey("PDF"))
Dim RutaRDLC = String.Format("{0}{1}", DirectorioBaseEmpresas, "Empresas\Grales\Formatos\ReciboDePagoGOPDF.rdlc")
'ModExtensiones.GuardaLog(" '--------PDF GenGoPdf Inicia ")
Dim Respuesta As Boolean = False
Dim Inicio As DateTime = DateTime.Now
Dim goPdf As GoPdf.GoPdf = New GoPdf.GoPdf()
Dim logotipo As Byte() = Nothing
Try
Dim result = goPdf.ExportarPdf(XmlRutaArchivo, logotipo, "", RutaRDLC, New GoPdf.Modelos.DatosAdicionales() With {
.DomicilioReceptor = ""
})
Dim Fin As DateTime = DateTime.Now
If result IsNot Nothing Then
File.WriteAllBytes(PDFRutaArchivo, result)
Respuesta = True
Alert($"PDF Generado")
Else
Alert($"PDF Error se genero nulo", TipoMensaje.MsgAdvertencia)
End If End If
Dim NombreArchivo As String = String.Format("{0}{1}\{2}", Destino, gvrow.DataKey("RFCDe"), gvrow.DataKey("PDF"))
Catch ex As Exception
Alert($"PDF Error {ex.Message} -- > {ex.StackTrace}", TipoMensaje.MsgAdvertencia)
End Try
Alert("PDF Finaliza", TipoMensaje.MsgAdvertencia)
Dim QR As ClbNegBICFDv3_2.ClsNegCBBGenerar = New ClbNegBICFDv3_2.ClsNegCBBGenerar()
Dim cQr As Byte() = QR.GenerarCBBBytes(objxml.emisor.Rfc, objxml.receptor.Rfc, If(IsNothing(objxml.complemento.Pagos), objxml.comprobante.Total, objxml.complemento.Pagos.Monto), objxml.complemento.UUID)
Dim parametros As List(Of ReportParameter) = New List(Of ReportParameter)()
parametros.Add(New ReportParameter("comprobante_Certificado", objxml.comprobante.Certificado))
parametros.Add(New ReportParameter("comprobante_CondicionesDePago", objxml.comprobante.CondicionesDePago))
parametros.Add(New ReportParameter("comprobante_Confirmacion", objxml.comprobante.Confirmacion))
parametros.Add(New ReportParameter("comprobante_Fecha", objxml.comprobante.Fecha))
parametros.Add(New ReportParameter("comprobante_Serie", objxml.comprobante.Serie))
parametros.Add(New ReportParameter("comprobante_Folio", objxml.comprobante.Folio))
parametros.Add(New ReportParameter("comprobante_Descuento", objxml.comprobante.Descuento.ToString("N2")))
parametros.Add(New ReportParameter("comprobante_SubTotal", objxml.comprobante.SubTotal.ToString("N2")))
parametros.Add(New ReportParameter("comprobante_Total", objxml.comprobante.Total.ToString("N2")))
parametros.Add(New ReportParameter("comprobante_Version", objxml.comprobante.Version))
parametros.Add(New ReportParameter("comprobante_TipoDeComprobante", objxml.comprobante.TipoDeComprobanteTexto))
parametros.Add(New ReportParameter("comprobante_FormaPago", objxml.comprobante.FormaPagoTexto))
parametros.Add(New ReportParameter("comprobante_LugarExpedicion", objxml.comprobante.LugarExpedicion))
parametros.Add(New ReportParameter("comprobante_NoCertificado", objxml.comprobante.NoCertificado))
parametros.Add(New ReportParameter("comprobante_Sello", objxml.comprobante.Sello))
parametros.Add(New ReportParameter("comprobante_Moneda", objxml.comprobante.Moneda))
parametros.Add(New ReportParameter("comprobante_TipoCambio", objxml.comprobante.TipoCambio.ToString("N2")))
parametros.Add(New ReportParameter("comprobante_MetodoPago", objxml.comprobante.MetodoPagoTexto))
parametros.Add(New ReportParameter("emisor_Rfc", objxml.emisor.Rfc))
parametros.Add(New ReportParameter("emisor_Nombre", objxml.emisor.Nombre))
parametros.Add(New ReportParameter("emisor_RegimenFiscal", objxml.emisor.RegimenFiscalTexto))
parametros.Add(New ReportParameter("receptor_Rfc", objxml.receptor.Rfc))
parametros.Add(New ReportParameter("receptor_Nombre", objxml.receptor.Nombre))
parametros.Add(New ReportParameter("receptor_NumRegIdTrib", objxml.receptor.NumRegIdTrib))
parametros.Add(New ReportParameter("receptor_ResidenciaFiscal", objxml.receptor.ResidenciaFiscal))
parametros.Add(New ReportParameter("receptor_UsoCFDI", objxml.receptor.UsoCFDITexto))
parametros.Add(New ReportParameter("complemento_FechaTimbrado", objxml.complemento.FechaTimbrado))
parametros.Add(New ReportParameter("complemento_NoCertificadoSAT", objxml.complemento.NoCertificadoSAT))
parametros.Add(New ReportParameter("complemento_RfcProvCertif", objxml.complemento.RfcProvCertif))
parametros.Add(New ReportParameter("complemento_SelloCFD", objxml.complemento.SelloCFD))
parametros.Add(New ReportParameter("complemento_SelloSAT", objxml.complemento.SelloSAT))
parametros.Add(New ReportParameter("complemento_UUID", objxml.complemento.UUID))
parametros.Add(New ReportParameter("complemento_CadenaOriginal", objxml.complemento.CadenaOriginal))
If Not IsNothing(objxml.complemento.Pagos) Then
parametros.Add(New ReportParameter("CPFechaPago", objxml.complemento.Pagos.FechaPago))
parametros.Add(New ReportParameter("CPFormaDePagoP", objxml.complemento.Pagos.FormaDePagoP))
parametros.Add(New ReportParameter("CPFormaDePagoPText", objxml.complemento.Pagos.FormaDePagoPText))
parametros.Add(New ReportParameter("CPMonedaP", objxml.complemento.Pagos.MonedaP))
parametros.Add(New ReportParameter("CPMonto", objxml.complemento.Pagos.Monto.ToString()))
parametros.Add(New ReportParameter("CPTipoCambioP", objxml.complemento.Pagos.TipoCambioP.ToString()))
parametros.Add(New ReportParameter("CPNumOperacion", objxml.complemento.Pagos.NumOperacion))
parametros.Add(New ReportParameter("CPNomBancoOrdExt", objxml.complemento.Pagos.NomBancoOrdExt))
parametros.Add(New ReportParameter("CPRfcEmisorCtaOrd", objxml.complemento.Pagos.RfcEmisorCtaOrd))
parametros.Add(New ReportParameter("CPCtaOrdenante", objxml.complemento.Pagos.CtaOrdenante))
parametros.Add(New ReportParameter("CPRfcEmisorCtaBen", objxml.complemento.Pagos.RfcEmisorCtaBen))
parametros.Add(New ReportParameter("CPCtaBeneficiario", objxml.complemento.Pagos.CtaBeneficiario))
End If
Using MR As ReportViewer = New ReportViewer()
Dim rdsTotales As ReportDataSource = New ReportDataSource()
Dim ltotales As List(Of utilValores) = New List(Of utilValores)()
ltotales.Add(New utilValores("Subtotal", objxml.comprobante.SubTotal.ToString("N2")))
If objxml.comprobante.Descuento > 0 Then 'If Not IsNothing(objxml) Then
ltotales.Add(New utilValores("Descuento", objxml.comprobante.Descuento.ToString("N2"))) ' Dim rutaReporte As String = String.Format("{0}{1}", ModExtensiones.DirectorioBaseEmpresas, "\Empresas\Grales\Formatos\CFDIV3.rdlc")
End If ' If Not IsNothing(objxml.complemento.Pagos) Then
' rutaReporte = String.Format("{0}{1}", ModExtensiones.DirectorioBaseEmpresas, "\Empresas\Grales\Formatos\CFDIV3Pago.rdlc")
' End If
' Dim NombreArchivo As String = String.Format("{0}{1}\{2}", Destino, gvrow.DataKey("RFCDe"), gvrow.DataKey("PDF"))
For Each item As CFDIImpuesto In objxml.Impuestos
If item.Importe > 0 Then ' Dim QR As ClbNegBICFDv3_2.ClsNegCBBGenerar = New ClbNegBICFDv3_2.ClsNegCBBGenerar()
Dim TasaOCuota As Decimal = 0 ' Dim cQr As Byte() = QR.GenerarCBBBytes(objxml.emisor.Rfc, objxml.receptor.Rfc, If(IsNothing(objxml.complemento.Pagos), objxml.comprobante.Total, objxml.complemento.Pagos.Monto), objxml.complemento.UUID)
Decimal.TryParse(item.TasaOCuota, TasaOCuota) ' Dim parametros As List(Of ReportParameter) = New List(Of ReportParameter)()
ltotales.Add(New utilValores($"Impuestos {item.Tipo} {item.ImpuestoTexto} {(If(item.TipoFactor = "Tasa", (TasaOCuota * 100).ToString("N4"), item.TasaOCuota))} {(If(item.TipoFactor = "Tasa", "%", ""))}", item.Importe.ToString("N2"))) ' parametros.Add(New ReportParameter("comprobante_Certificado", objxml.comprobante.Certificado))
End If ' parametros.Add(New ReportParameter("comprobante_CondicionesDePago", objxml.comprobante.CondicionesDePago))
Next ' parametros.Add(New ReportParameter("comprobante_Confirmacion", objxml.comprobante.Confirmacion))
' parametros.Add(New ReportParameter("comprobante_Fecha", objxml.comprobante.Fecha))
' parametros.Add(New ReportParameter("comprobante_Serie", objxml.comprobante.Serie))
' parametros.Add(New ReportParameter("comprobante_Folio", objxml.comprobante.Folio))
' parametros.Add(New ReportParameter("comprobante_Descuento", objxml.comprobante.Descuento.ToString("N2")))
' parametros.Add(New ReportParameter("comprobante_SubTotal", objxml.comprobante.SubTotal.ToString("N2")))
' parametros.Add(New ReportParameter("comprobante_Total", objxml.comprobante.Total.ToString("N2")))
' parametros.Add(New ReportParameter("comprobante_Version", objxml.comprobante.Version))
' parametros.Add(New ReportParameter("comprobante_TipoDeComprobante", objxml.comprobante.TipoDeComprobanteTexto))
' parametros.Add(New ReportParameter("comprobante_FormaPago", objxml.comprobante.FormaPagoTexto))
' parametros.Add(New ReportParameter("comprobante_LugarExpedicion", objxml.comprobante.LugarExpedicion))
' parametros.Add(New ReportParameter("comprobante_NoCertificado", objxml.comprobante.NoCertificado))
' parametros.Add(New ReportParameter("comprobante_Sello", objxml.comprobante.Sello))
' parametros.Add(New ReportParameter("comprobante_Moneda", objxml.comprobante.Moneda))
' parametros.Add(New ReportParameter("comprobante_TipoCambio", objxml.comprobante.TipoCambio.ToString("N2")))
' parametros.Add(New ReportParameter("comprobante_MetodoPago", objxml.comprobante.MetodoPagoTexto))
' parametros.Add(New ReportParameter("emisor_Rfc", objxml.emisor.Rfc))
' parametros.Add(New ReportParameter("emisor_Nombre", objxml.emisor.Nombre))
' parametros.Add(New ReportParameter("emisor_RegimenFiscal", objxml.emisor.RegimenFiscalTexto))
' parametros.Add(New ReportParameter("receptor_Rfc", objxml.receptor.Rfc))
' parametros.Add(New ReportParameter("receptor_Nombre", objxml.receptor.Nombre))
' parametros.Add(New ReportParameter("receptor_NumRegIdTrib", objxml.receptor.NumRegIdTrib))
' parametros.Add(New ReportParameter("receptor_ResidenciaFiscal", objxml.receptor.ResidenciaFiscal))
' parametros.Add(New ReportParameter("receptor_UsoCFDI", objxml.receptor.UsoCFDITexto))
' parametros.Add(New ReportParameter("complemento_FechaTimbrado", objxml.complemento.FechaTimbrado))
' parametros.Add(New ReportParameter("complemento_NoCertificadoSAT", objxml.complemento.NoCertificadoSAT))
' parametros.Add(New ReportParameter("complemento_RfcProvCertif", objxml.complemento.RfcProvCertif))
' parametros.Add(New ReportParameter("complemento_SelloCFD", objxml.complemento.SelloCFD))
' parametros.Add(New ReportParameter("complemento_SelloSAT", objxml.complemento.SelloSAT))
' parametros.Add(New ReportParameter("complemento_UUID", objxml.complemento.UUID))
' parametros.Add(New ReportParameter("complemento_CadenaOriginal", objxml.complemento.CadenaOriginal))
' If Not IsNothing(objxml.complemento.Pagos) Then
' parametros.Add(New ReportParameter("CPFechaPago", objxml.complemento.Pagos.FechaPago))
' parametros.Add(New ReportParameter("CPFormaDePagoP", objxml.complemento.Pagos.FormaDePagoP))
' parametros.Add(New ReportParameter("CPFormaDePagoPText", objxml.complemento.Pagos.FormaDePagoPText))
' parametros.Add(New ReportParameter("CPMonedaP", objxml.complemento.Pagos.MonedaP))
' parametros.Add(New ReportParameter("CPMonto", objxml.complemento.Pagos.Monto.ToString()))
' parametros.Add(New ReportParameter("CPTipoCambioP", objxml.complemento.Pagos.TipoCambioP.ToString()))
' parametros.Add(New ReportParameter("CPNumOperacion", objxml.complemento.Pagos.NumOperacion))
' parametros.Add(New ReportParameter("CPNomBancoOrdExt", objxml.complemento.Pagos.NomBancoOrdExt))
' parametros.Add(New ReportParameter("CPRfcEmisorCtaOrd", objxml.complemento.Pagos.RfcEmisorCtaOrd))
' parametros.Add(New ReportParameter("CPCtaOrdenante", objxml.complemento.Pagos.CtaOrdenante))
' parametros.Add(New ReportParameter("CPRfcEmisorCtaBen", objxml.complemento.Pagos.RfcEmisorCtaBen))
' parametros.Add(New ReportParameter("CPCtaBeneficiario", objxml.complemento.Pagos.CtaBeneficiario))
ltotales.Add(New utilValores("Total", objxml.comprobante.Total.ToString("N2"))) ' End If
rdsTotales.Name = "dsTotales" ' Using MR As ReportViewer = New ReportViewer()
rdsTotales.Value = ltotales ' Dim rdsTotales As ReportDataSource = New ReportDataSource()
MR.LocalReport.DataSources.Add(rdsTotales) ' Dim ltotales As List(Of utilValores) = New List(Of utilValores)()
Dim rds2 As ReportDataSource = New ReportDataSource() ' ltotales.Add(New utilValores("Subtotal", objxml.comprobante.SubTotal.ToString("N2")))
Dim limagenes As List(Of utilImage) = New List(Of utilImage)()
limagenes.Add(New utilImage(cQr))
rds2.Name = "dsImagenes"
rds2.Value = limagenes
MR.LocalReport.DataSources.Add(rds2)
Dim rdsrelacionados As ReportDataSource = New ReportDataSource()
rdsrelacionados.Name = "dsRelacionados"
rdsrelacionados.Value = objxml.cFDIRelacionados
MR.LocalReport.DataSources.Add(rdsrelacionados)
Dim rds1 As ReportDataSource = New ReportDataSource()
rds1.Name = "dsConceptos"
rds1.Value = objxml.GetConceptosforpdf()
MR.LocalReport.DataSources.Add(rds1)
If Not IsNothing(objxml.complemento.Pagos) Then ' If objxml.comprobante.Descuento > 0 Then
' ltotales.Add(New utilValores("Descuento", objxml.comprobante.Descuento.ToString("N2")))
' End If
Dim rdsp As ReportDataSource = New ReportDataSource() ' For Each item As CFDIImpuesto In objxml.Impuestos
rdsp.Name = "dsPagos"
rdsp.Value = objxml.complemento.Pagos.doctosRelacionados ' If item.Importe > 0 Then
MR.LocalReport.DataSources.Add(rdsp) ' Dim TasaOCuota As Decimal = 0
End If ' Decimal.TryParse(item.TasaOCuota, TasaOCuota)
' ltotales.Add(New utilValores($"Impuestos {item.Tipo} {item.ImpuestoTexto} {(If(item.TipoFactor = "Tasa", (TasaOCuota * 100).ToString("N4"), item.TasaOCuota))} {(If(item.TipoFactor = "Tasa", "%", ""))}", item.Importe.ToString("N2")))
' End If
' Next
' ltotales.Add(New utilValores("Total", objxml.comprobante.Total.ToString("N2")))
' rdsTotales.Name = "dsTotales"
' rdsTotales.Value = ltotales
' MR.LocalReport.DataSources.Add(rdsTotales)
' Dim rds2 As ReportDataSource = New ReportDataSource()
' Dim limagenes As List(Of utilImage) = New List(Of utilImage)()
' limagenes.Add(New utilImage(cQr))
' rds2.Name = "dsImagenes"
' rds2.Value = limagenes
' MR.LocalReport.DataSources.Add(rds2)
' Dim rdsrelacionados As ReportDataSource = New ReportDataSource()
' rdsrelacionados.Name = "dsRelacionados"
' rdsrelacionados.Value = objxml.cFDIRelacionados
' MR.LocalReport.DataSources.Add(rdsrelacionados)
' Dim rds1 As ReportDataSource = New ReportDataSource()
' rds1.Name = "dsConceptos"
' rds1.Value = objxml.GetConceptosforpdf()
' MR.LocalReport.DataSources.Add(rds1)
' If Not IsNothing(objxml.complemento.Pagos) Then
' Dim rdsp As ReportDataSource = New ReportDataSource()
' rdsp.Name = "dsPagos"
' rdsp.Value = objxml.complemento.Pagos.doctosRelacionados
' MR.LocalReport.DataSources.Add(rdsp)
' End If
' MR.LocalReport.ReportPath = rutaReporte
' MR.ProcessingMode = ProcessingMode.Local
' MR.LocalReport.EnableExternalImages = True
' MR.LocalReport.SetParameters(parametros)
' MR.LocalReport.Refresh()
' Dim warnings As Warning() = Nothing
' Dim streamids As String() = Nothing
' Dim mimeType As String = Nothing
' Dim encoding As String = Nothing
' Dim extension As String = Nothing
' Dim bytes As Byte() = Nothing
' bytes = MR.LocalReport.Render("PDF", Nothing, mimeType, encoding, extension, streamids, warnings)
' Using fs As FileStream = New FileStream(NombreArchivo, FileMode.Create)
' fs.Write(bytes, 0, bytes.Length)
' fs.Close()
' End Using
' End Using
' Alert("PDF Generado!")
'Else
' Alert("no se pudo procesar el archivo xml")
'End If
MR.LocalReport.ReportPath = rutaReporte
MR.ProcessingMode = ProcessingMode.Local
MR.LocalReport.EnableExternalImages = True
MR.LocalReport.SetParameters(parametros)
MR.LocalReport.Refresh()
Dim warnings As Warning() = Nothing
Dim streamids As String() = Nothing
Dim mimeType As String = Nothing
Dim encoding As String = Nothing
Dim extension As String = Nothing
Dim bytes As Byte() = Nothing
bytes = MR.LocalReport.Render("PDF", Nothing, mimeType, encoding, extension, streamids, warnings)
Using fs As FileStream = New FileStream(NombreArchivo, FileMode.Create)
fs.Write(bytes, 0, bytes.Length)
fs.Close()
End Using
End Using
Alert("PDF Generado!")
Else
Alert("no se pudo procesar el archivo xml")
End If
End Sub End Sub
Private Sub VinculacionMasivaComplementos() Private Sub VinculacionMasivaComplementos()

12
Empresas/132/Formatos/Cotizacion.rdlc
View File

@@ -2399,6 +2399,18 @@ Celular: </Value>
<AllowBlank>true</AllowBlank> <AllowBlank>true</AllowBlank>
<Prompt>ReportParameter1</Prompt> <Prompt>ReportParameter1</Prompt>
</ReportParameter> </ReportParameter>
<ReportParameter Name="CFDIVersion">
<DataType>String</DataType>
<Nullable>true</Nullable>
<AllowBlank>true</AllowBlank>
<Prompt>ReportParameter1</Prompt>
</ReportParameter>
<ReportParameter Name="RegimenFiscalCodigo">
<DataType>String</DataType>
<Nullable>true</Nullable>
<AllowBlank>true</AllowBlank>
<Prompt>ReportParameter1</Prompt>
</ReportParameter>
</ReportParameters> </ReportParameters>
<EmbeddedImages> <EmbeddedImages>
<EmbeddedImage Name="VISTAPREVIA22"> <EmbeddedImage Name="VISTAPREVIA22">

4
GPS/WizardDispositivos.aspx
View File

@@ -237,6 +237,10 @@
<asp:TextBox ID="TxtPlacas" runat="server" CssClass="form-control" MaxLength="50" CausesValidation="true"></asp:TextBox> <asp:TextBox ID="TxtPlacas" runat="server" CssClass="form-control" MaxLength="50" CausesValidation="true"></asp:TextBox>
<asp:Label runat="server" Text="Placas Vehículo:" AssociatedControlID="TxtPlacas"></asp:Label> <asp:Label runat="server" Text="Placas Vehículo:" AssociatedControlID="TxtPlacas"></asp:Label>
</div> </div>
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtAsignadoEn" runat="server" CssClass="form-control" MaxLength="50" CausesValidation="true"></asp:TextBox>
<asp:Label runat="server" Text="Asignación en:" AssociatedControlID="TxtAsignadoEn"></asp:Label>
</div>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
</div> </div>

6
GPS/WizardDispositivos.aspx.cs
View File

@@ -232,6 +232,7 @@ public partial class GPS_WizardDispositivos : ClsPaginas
TxtModeloV.Text = drow["ModeloVehiculo"].ToString(); TxtModeloV.Text = drow["ModeloVehiculo"].ToString();
TxtAñoV.Text = drow["AñoVehiculo"].ToString(); TxtAñoV.Text = drow["AñoVehiculo"].ToString();
TxtPlacas.Text = drow["PlacasVehiculo"].ToString(); TxtPlacas.Text = drow["PlacasVehiculo"].ToString();
TxtAsignadoEn.Text = drow["AsignadoEn"].ToString();
ChkTipoLinea.Checked = drow["CveProveedorComunicacionCuenta"].ToString().ToEntero() <= 0; ChkTipoLinea.Checked = drow["CveProveedorComunicacionCuenta"].ToString().ToEntero() <= 0;
} }
@@ -346,6 +347,7 @@ public partial class GPS_WizardDispositivos : ClsPaginas
string AñoV = TxtAñoV.Text; string AñoV = TxtAñoV.Text;
string ClaseVehiculo = "";//TxtClaseVehiculo.Text; string ClaseVehiculo = "";//TxtClaseVehiculo.Text;
string Placas = TxtPlacas.Text; string Placas = TxtPlacas.Text;
string AsignadoEn = TxtAsignadoEn.Text;
bool LimiteVelocidad = false; bool LimiteVelocidad = false;
double LimiteVelocidadV = 0;//chkLimiteVelocidad.Checked ? TxtLimiteVelocidad.Text.ToDouble : 0 double LimiteVelocidadV = 0;//chkLimiteVelocidad.Checked ? TxtLimiteVelocidad.Text.ToDouble : 0
string Detalles = "";//TxtDetalles.Text; string Detalles = "";//TxtDetalles.Text;
@@ -365,12 +367,12 @@ public partial class GPS_WizardDispositivos : ClsPaginas
if (CveDispositivo > 0) if (CveDispositivo > 0)
{ {
continuar = ObjGPS.DispositivosUpdate(TipoDispositivo,NumTelefono, CveDispositivo, modelo, LineaTelefonica, CveCliente, IMEI, Serie, 1, SerieV, ColorV, NombreV, NoEconomico, DevId, puerto, continuar = ObjGPS.DispositivosUpdate(TipoDispositivo,NumTelefono, CveDispositivo, modelo, LineaTelefonica, CveCliente, IMEI, Serie, 1, SerieV, ColorV, NombreV, NoEconomico, DevId, puerto,
ModeloV, AñoV, ClaseVehiculo, Placas, LimiteVelocidad, LimiteVelocidadV, Detalles, Rendimiento, icono, Color,UsuarioActual.CveUsuario); ModeloV, AñoV, ClaseVehiculo, Placas, LimiteVelocidad, LimiteVelocidadV, Detalles, Rendimiento, icono, Color,UsuarioActual.CveUsuario, AsignadoEn);
} }
else else
{ {
continuar = ObjGPS.DispositivoAdd(TipoDispositivo, NumTelefono, modelo, LineaTelefonica, CveCliente, IMEI, Serie, 1, SerieV, ColorV, NombreV, NoEconomico, DevId, puerto, continuar = ObjGPS.DispositivoAdd(TipoDispositivo, NumTelefono, modelo, LineaTelefonica, CveCliente, IMEI, Serie, 1, SerieV, ColorV, NombreV, NoEconomico, DevId, puerto,
ModeloV, AñoV, ClaseVehiculo, Placas, LimiteVelocidad, LimiteVelocidadV, Detalles, Rendimiento, icono, Color, UsuarioActual.CveUsuario); ModeloV, AñoV, ClaseVehiculo, Placas, LimiteVelocidad, LimiteVelocidadV, Detalles, Rendimiento, icono, Color, UsuarioActual.CveUsuario, AsignadoEn);
CveDispositivo = ObjGPS.CveDispositivo; CveDispositivo = ObjGPS.CveDispositivo;
} }
if (continuar) if (continuar)

4
Inventarios/EntregaAlmacen.aspx.vb
View File

@@ -636,9 +636,7 @@ Partial Class Inventarios_EntregaAlmacen
'filtra los Almacenes de domicilio 'filtra los Almacenes de domicilio
If DtDatos.Rows(0)("ServicioDomicilio").ToString() = "True" Then If DtDatos.Rows(0)("ServicioDomicilio").ToString() = "True" Then
StrAlmacenes = String.Format("{0} AND Almacen like '%Domicilio%' ", StrAlmacenes) StrAlmacenes = "CveTipoAlmacen = 29"
Else
StrAlmacenes = String.Format("{0} AND NOT (Almacen like '%Domicilio%') ", StrAlmacenes)
End If End If
trObsGral.Visible = drE("Observaciones").ToString() <> "" trObsGral.Visible = drE("Observaciones").ToString() <> ""

9
Inventarios/RecepcionUsados.aspx.vb
View File

@@ -3368,6 +3368,8 @@ Partial Class Inventarios_RecepcionUsados
End Sub End Sub
Protected Sub BtnAgregarProductoAjuste_Click(sender As Object, e As EventArgs) Protected Sub BtnAgregarProductoAjuste_Click(sender As Object, e As EventArgs)
Dim ErrorAjuste As Boolean = False
Dim CvePS As Integer = DdlPSAjuste.SelectedValue.ToEntero Dim CvePS As Integer = DdlPSAjuste.SelectedValue.ToEntero
Dim FolioGarantia As MFolioGarantiaMensaje = ValidaFolioGarantia(CvePS, DdlFolioGarantia.SelectedValue.ToEntero()) Dim FolioGarantia As MFolioGarantiaMensaje = ValidaFolioGarantia(CvePS, DdlFolioGarantia.SelectedValue.ToEntero())
@@ -3418,15 +3420,20 @@ Partial Class Inventarios_RecepcionUsados
"", "-1", "-1", "-1", "", "", -1, "", "", CveTamaño) "", "-1", "-1", "-1", "", "", -1, "", "", CveTamaño)
End If End If
Else Else
ErrorAjuste = True
Alert("No se pudo cargar el producto", TipoMensaje.MsgError) Alert("No se pudo cargar el producto", TipoMensaje.MsgError)
End If End If
Catch ex As Exception Catch ex As Exception
ErrorAjuste = True
OnError("Ocurrió un error al agregar el producto", ex) OnError("Ocurrió un error al agregar el producto", ex)
End Try End Try
ObjPS.Dispose() ObjPS.Dispose()
GuardaAjuste() If Not ErrorAjuste Then
GuardaAjuste()
End If
'If TmpDTPolizaVirtual Is Nothing Then 'If TmpDTPolizaVirtual Is Nothing Then
' CreaDTmpDTPolizaVirtual() ' CreaDTmpDTPolizaVirtual()

14
Nomina/Nomina.aspx.cs
View File

@@ -2888,7 +2888,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
DataRow drow = dtempleados.FiltroPrimero(string.Format("CvePersonal = {0}", SRCvePersonal)); DataRow drow = dtempleados.FiltroPrimero(string.Format("CvePersonal = {0}", SRCvePersonal));
TxtCCSysSalarioMinimo.Text = ""; TxtCCSysSalarioMinimo.Text = "";
TxtCCSysUMA.Text = "$96.22"; //TxtCCSysUMA.Text = "$96.22";
if (drow != null) if (drow != null)
{ {
TxtCCSysSalarioMinimo.Text = string.Format("${0:N2}", drow["SalarioMinimo"]); TxtCCSysSalarioMinimo.Text = string.Format("${0:N2}", drow["SalarioMinimo"]);
@@ -2984,6 +2984,18 @@ public partial class Nomina_Nomina2 : ClsPaginas
if (drow != null) if (drow != null)
{ {
decimal UMA = 96.22M; decimal UMA = 96.22M;
using (ClsClaseBase objbase = new ClsClaseBase())
{
if (objbase.runQuerystr($"SELECT Valor UMA FROM [dbo].[RH_TablasValores] WHERE Tipo =1 AND CveEmpresa ={UsuarioActual.CveEmpresa} AND Fecha<'{DateTime.Now:yyyy/MM/dd}' ORDER BY Fecha DESC"))
{
if (objbase.DtResultados.Rows.Count > 0)
{
UMA = objbase.DtResultados.Rows[0]["UMA"].ToString().ToDecimal();
}
}
}
TxtCCSysUMA.Text = $"{UMA:N2}";
decimal HorasDobles = drow["HorasDobles"].ToString().ToDecimal(); decimal HorasDobles = drow["HorasDobles"].ToString().ToDecimal();
decimal HorasTriples = drow["HorasTriples"].ToString().ToDecimal(); decimal HorasTriples = drow["HorasTriples"].ToString().ToDecimal();
decimal ImporteHora = drow["SalarioDiario"].ToString().ToDecimal() / 8; decimal ImporteHora = drow["SalarioDiario"].ToString().ToDecimal() / 8;

50
PortalGPS/InicioGPS.aspx
View File

@@ -128,6 +128,43 @@
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
</div>--%> </div>--%>
</ContentTemplate>
</asp:UpdatePanel>
</div>
</div>
<div id="divComentarios" class="modal ADS fade" role="dialog">
<div class="modal-dialog">
<asp:UpdatePanel ID="UpdatePanel1" class="modal-content rowpadding" tabindex="-1" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<div class="modal-header">
<button type="button" class="close" data-dismiss="modal" aria-label="Close">
<span aria-hidden="true">&times;</span>
</button>
<h4 class="modal-title" id="myModalLabelComenta">Comentarios para vehículo: </h4>
</div>
<div class="modal-body">
<asp:UpdatePanel ID="UpdatePanel2" UpdateMode="Conditional" runat="server">
<ContentTemplate>
<asp:Button runat="server" ID="BtnCargaComentarios" Style="display: none" />
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtComentarios" runat="server" Text="--" TextMode="MultiLine" Rows="4" CausesValidation="True" CssClass="form-control"></asp:TextBox>
<asp:Label runat="server" Text="Comentario: " style="padding-bottom: 92px;" AssociatedControlID="TxtComentarios"></asp:Label>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</div>
<div class="modal-footer">
<asp:UpdatePanel ID="UpdatePanel3" UpdateMode="Conditional" runat="server">
<ContentTemplate>
<button id="BtnModalBancosLayoutCerrar" type="button" class="btn btn-default" data-dismiss="modal">Cerrar</button>
<asp:Button Text="Guardar" ID="BtnGuardarComentario" OnClick="BtnGuardarComentario_Click" CssClass="btn btn-primary" ValidationGroup="grpEditarcomentario" runat="server" />
</ContentTemplate>
</asp:UpdatePanel>
</div> </div>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
@@ -245,6 +282,17 @@
$("#divComandos").modal() $("#divComandos").modal()
$("#C_BtnCargaComandos").click() $("#C_BtnCargaComandos").click()
}
function EditarComentario(Vehiculo, Comentario, CveDispositivo) {
$("#HdnCveDipositivo").val(CveDispositivo)
// if (open) { FNShowDiv(); }
$("#myModalLabelComenta").text("Comentarios para vehículo: " + Vehiculo)
closeLastOpenedInfoWindow();
$("#divComentarios").modal();
$("#C_TxtComentarios").val(Comentario)
$("#C_BtnCargaComentarios").click()
} }
function ControlLabels(controlDiv, map) { function ControlLabels(controlDiv, map) {
@@ -337,7 +385,7 @@
}); });
} }
} }
</script> </script>
<script src="<%= String.Format("https://maps.googleapis.com/maps/api/js?key={0}&libraries=drawing&libraries=places", Extensiones.GOOGLE_MAPS_API_KEY) %>"></script> <script src="<%= String.Format("https://maps.googleapis.com/maps/api/js?key={0}&libraries=drawing&libraries=places", Extensiones.GOOGLE_MAPS_API_KEY) %>"></script>

24
PortalGPS/InicioGPS.aspx.vb
View File

@@ -229,23 +229,37 @@ Partial Class GPS_PruebaMaster
Public Function InfoWindowCombustible(Header As String, ExtraBody As String, CveDispositivo As Integer, row As DataRow, Optional PermisoComandos As Boolean = True) As String Public Function InfoWindowCombustible(Header As String, ExtraBody As String, CveDispositivo As Integer, row As DataRow, Optional PermisoComandos As Boolean = True) As String
Dim SBuilder As New StringBuilder Dim SBuilder As New StringBuilder
SBuilder.Clear() SBuilder.Clear()
SBuilder.Append($"<div>") SBuilder.Append($"<div class=\'row\'><div class=\'col-md-6\'>")
SBuilder.Append($"<div><h5><a target=\'_blank\' href=\'/GPS/Vehiculos.aspx?CveDispositivo={CveDispositivo}\'><b>{Header}</b></a></h5></div>") SBuilder.Append($"<div><h5><a target=\'_blank\' href=\'/GPS/Vehiculos.aspx?CveDispositivo={CveDispositivo}\'><b>{Header}</b></a></h5></div>")
SBuilder.Append($"<div><table>") SBuilder.Append($"<div><table>")
SBuilder.Append($"<tr><td>Fecha : {row("FechaTrama")} </td></tr>") SBuilder.Append($"<tr><td>Fecha : {row("FechaTrama")} </td></tr>")
SBuilder.Append($"<tr><td>Conductor : {row("Conductor").ToString}</td></tr>") SBuilder.Append($"<tr><td>Conductor : {row("Conductor")}</td></tr>")
SBuilder.Append($"<tr><td>Combustible : {IfNull(row("Combustible"), "NO DISPONIBLE", $"{row("Combustible").ToString.FormatoNumero} lts").ToString}</td></tr>") SBuilder.Append($"<tr><td>Combustible : {IfNull(row("Combustible"), "NO DISPONIBLE", $"{row("Combustible").ToString.FormatoNumero} lts").ToString}</td></tr>")
If row("SPD").ToString <> "-1" Then If row("SPD").ToString <> "-1" Then
SBuilder.Append($"<tr><td>Velocidad : {row("SPD").ToString} KM/H </td></tr>") SBuilder.Append($"<tr><td>Velocidad : {row("SPD")} KM/H </td></tr>")
End If End If
If ExtraBody <> "" AndAlso ExtraBody <> "-1" Then If ExtraBody <> "" AndAlso ExtraBody <> "-1" Then
SBuilder.Append(ExtraBody) SBuilder.Append(ExtraBody)
End If End If
If PermisoComandos Then If PermisoComandos Then
SBuilder.Append($"<tr><td><a href=""javascript:;"" onclick=""CargaComandos(\'{row("Vehiculo").ToString}\',{CveDispositivo});"">Comandos</a></td></tr>") SBuilder.Append($"<tr><td><a href=""javascript:;"" onclick=""CargaComandos(\'{row("Vehiculo")}\',{CveDispositivo});"">Comandos</a></td></tr>")
End If End If
SBuilder.AppendFormat("<tr><td><a target=\'_blank\' href=\'https://www.google.com/maps/search/{0},{1}/\'>Ver en google maps</a></td></tr>", row("Lat").ToString, row("Lng").ToString) SBuilder.AppendFormat("<tr><td><a target=\'_blank\' href=\'https://www.google.com/maps/search/{0},{1}/\'>Ver en google maps</a></td></tr>", row("Lat").ToString, row("Lng").ToString)
SBuilder.Append($"</table></div><div></div></div>") SBuilder.Append("</table></div><div></div></div><div class=\'col-md-6\'>")
SBuilder.Append("Comentario:<br />")
SBuilder.Append($"{row("Comentarios")}<br /><a href=""javascript:;"" onclick=""EditarComentario(\'{row("Vehiculo")}\',\'{row("Comentarios")}\',{CveDispositivo});"">Editar</a>")
SBuilder.Append("</div></div>")
Return SBuilder.ToString Return SBuilder.ToString
End Function End Function
Protected Sub BtnGuardarComentario_Click(sender As Object, e As EventArgs)
Dim CveDispositivo As Integer = HdnCveDipositivo.Value.ToEntero()
Dim comentario As String = TxtComentarios.Text
Using objgps As New ClsGPS
objgps.DispositivoComentarioupdate(CveDispositivo, comentario, UsuarioActual.CveUsuario)
RegistraScript("$(""#divComentarios"").modal('hide');")
End Using
BtnCargar_Click(Nothing, Nothing)
End Sub
End Class End Class

824
Ventas/Clientes.aspx.vb
View File

File diff suppressed because it is too large Load Diff

3
Ventas/RepLineasAdicionales.aspx
View File

@@ -131,8 +131,7 @@
<asp:HyperLinkField DataTextField="Agrupador" HeaderText="Agrupador" /> <asp:HyperLinkField DataTextField="Agrupador" HeaderText="Agrupador" />
<asp:BoundField DataField="LineaAdicional" HeaderText="PO" /> <asp:BoundField DataField="LineaAdicional" HeaderText="PO" />
<asp:BoundField DataField="Importe" HeaderText="Importe PO" DataFormatString="{0:n}" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataField="Importe" HeaderText="Importe PO" DataFormatString="{0:n}" ItemStyle-HorizontalAlign="Right" />
<asp:BoundField DataField="Abreviatura" HeaderText="Mon" /> <asp:BoundField DataField="Abreviatura" HeaderText="Mon" />
<asp:HyperLinkField DataTextField="SerieFolio" DataNavigateUrlFields="CveVenta" DataNavigateUrlFormatString="/Ventas/Ventas.aspx?CveVenta={0}" HeaderText="Serie Folio" /> <asp:HyperLinkField DataTextField="SerieFolio" DataNavigateUrlFields="CveVenta" DataNavigateUrlFormatString="/Ventas/Ventas.aspx?CveVenta={0}" HeaderText="Serie Folio" />
<asp:BoundField DataField="Saldo" HeaderText="Saldo" DataFormatString="{0:n}" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataField="Saldo" HeaderText="Saldo" DataFormatString="{0:n}" ItemStyle-HorizontalAlign="Right" />
<asp:BoundField DataField="DiasVencimiento" HeaderText="D.Plazo" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataField="DiasVencimiento" HeaderText="D.Plazo" ItemStyle-HorizontalAlign="Right" />

29
Ventas/RepLineasAdicionales.aspx.cs
View File

@@ -3,6 +3,16 @@ using System.Collections.Generic;
using Extensiones; using Extensiones;
using System.Data; using System.Data;
using static Extensiones.ModExtensiones; using static Extensiones.ModExtensiones;
using System.Collections.Generic;
using System.IO;
using ListItem = System.Web.UI.WebControls.ListItem;
using System.Web.UI;
using Microsoft.AspNet.SignalR;
using System.Activities.Expressions;
using System.EnterpriseServices.Internal;
using iTextSharp.text.pdf;
using GemBox.Spreadsheet;
using System.Linq;
using System.Text.RegularExpressions; using System.Text.RegularExpressions;
using System.Web; using System.Web;
using AjaxControlToolkit; using AjaxControlToolkit;
@@ -309,15 +319,18 @@ public partial class Ventas_RepLineasAdicionales : ClsPaginas
protected void LnkDescargaExcel_Click(object sender, EventArgs e) protected void LnkDescargaExcel_Click(object sender, EventArgs e)
{ {
if(TipoLinea == 1)
{ {
GridView gvTemp = GvLineasAdicionales; GridView gvTemp = GvLineasAdicionales;
//gvTemp.ExportToExcelX("RepLineasAdicionales" + DateTime.Now.ToShortDateString()); //gvTemp.ExportToExcelX("RepLineasAdicionales" + DateTime.Now.ToShortDateString());
gvTemp.ExportToExcelGembox("RepLineasAdicionales", UsuarioActual, "Rep Lineas Adicionales", AnchoImagen: 150); gvTemp.ExportToExcelGembox("RepLineasAdicionales", UsuarioActual, "Rep Lineas Adicionales", AnchoImagen: 150);
} }
else if(TipoLinea == 2) else if(TipoLinea == 2)
{ {
GridView gvTemp = GvLAPO;
gvTemp.Columns[12].Visible = false;
//gvTemp.ExportToExcelX("ReportePO" + DateTime.Now.ToShortDateString()); //gvTemp.ExportToExcelX("ReportePO" + DateTime.Now.ToShortDateString());
gvTemp.ExportToExcelGembox( "ReportePO", UsuarioActual, "Reporte PO ", AnchoImagen:150); gvTemp.ExportToExcelGembox( "ReportePO", UsuarioActual, "Reporte PO ", AnchoImagen:150);
} }
@@ -409,4 +422,10 @@ public partial class Ventas_RepLineasAdicionales : ClsPaginas
objVentas.Dispose(); objVentas.Dispose();
if (!errorCambioEstatus) if (!errorCambioEstatus)
{ {
CargaDatos();
}
}
}
public override void VerifyRenderingInServerForm(Control control ) { }

2
Ventas/Ventas.aspx
View File

@@ -2596,7 +2596,7 @@
<asp:BoundField DataField="CodigoPS" HeaderText="Producto ó Servicio" /> <asp:BoundField DataField="CodigoPS" HeaderText="Producto ó Servicio" />
<asp:TemplateField HeaderText="Valor Unitario"> <asp:TemplateField HeaderText="Valor Unitario">
<ItemTemplate> <ItemTemplate>
<asp:TextBox ID="TxtValorUnitario" runat="server" Text='<%# Eval("PU", "{0:N2}") %>' Width="60px"></asp:TextBox> <asp:TextBox ID="TxtValorUnitario" runat="server" Text='<%# Eval("PU") %>' Width="60px"></asp:TextBox>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:BoundField DataField="ClaveSATFraccionArancelariaDescripcion" HeaderText="Fracción Arancelaria" /> <asp:BoundField DataField="ClaveSATFraccionArancelariaDescripcion" HeaderText="Fracción Arancelaria" />

2
Ventas/Ventas.aspx.vb
View File

@@ -8921,7 +8921,7 @@ Partial Class Ventas
Exit Sub Exit Sub
End If End If
If DdlLineaAdicional.SelectedValue.ToEntero() > 0 AndAlso Not DdlTipoComprobante.SelectedValue.Contiene("Ing", "Rem") Then If DdlLineaAdicional.SelectedValue.ToEntero() > 0 AndAlso Not DdlTipoComprobante.SelectedValue.Contiene("Ing", "Rem", "Egs", "Dev") Then
Alert("No se puede seleccionar una linea adicional de crédito si no se genera una remisón.", TipoMensaje.MsgAdvertencia) Alert("No se puede seleccionar una linea adicional de crédito si no se genera una remisón.", TipoMensaje.MsgAdvertencia)
Exit Sub Exit Sub
End If End If