Merge branch 'master' of http://jperez@adsistemasof.sytes.net:8383/SIG.git
This commit is contained in:
@@ -1424,8 +1424,14 @@ public partial class CRM_EmpresaCRM : ClsPaginas
|
||||
|
||||
int CveAcercamiento = -1;
|
||||
|
||||
CveAcercamiento = ObjCRM.AddAcercamiento(CveEmpresaCRM, CveContactoPrincipal, CveTipoProceso, CveEtapaProcesoActual, CveVendedor, CveMedioCaptacion, CveRechazoMotivo, CveProbabilidadAcercamiento,
|
||||
FechaApertura, NombreAcercamiento, Descripcion, Importe, Comision, Prioridad, UsuarioActual.CveEmpresa, CveUsuarioIng);
|
||||
if (ObjCRM.DtResultados.Rows.Count > 0)
|
||||
{
|
||||
CveAcercamiento = ObjCRM.AddAcercamiento(CveEmpresaCRM, CveContactoPrincipal, CveTipoProceso, CveEtapaProcesoActual, CveVendedor, CveMedioCaptacion, CveRechazoMotivo, CveProbabilidadAcercamiento,
|
||||
FechaApertura, NombreAcercamiento, Descripcion, Importe, Comision, Prioridad, UsuarioActual.CveEmpresa, CveUsuarioIng);
|
||||
}else
|
||||
{
|
||||
Alert("No tiene Etapa Proceso con el Tipo Proceso seleccionado",ModExtensiones.TipoMensaje.MsgAdvertencia);
|
||||
}
|
||||
|
||||
if (CveAcercamiento > 0)
|
||||
{
|
||||
|
||||
1000
Empresas/Grales/Formatos/EquiposGPS.rdlc
Normal file
1000
Empresas/Grales/Formatos/EquiposGPS.rdlc
Normal file
File diff suppressed because it is too large
Load Diff
File diff suppressed because it is too large
Load Diff
@@ -225,7 +225,7 @@ Partial Class Inicio
|
||||
Private Sub MuestraComprasPUE()
|
||||
Dim objCompras As New ClsCompras
|
||||
Dim FechaInicio As Date = Now.AddYears(-2)
|
||||
LblComprasPUE.Text = "Facturas apartir de " & FechaInicio.ToShortDateString
|
||||
LblComprasPUE.Text = "Facturas a partir de: " & FechaInicio.ToShortDateString
|
||||
If objCompras.GetPUESinPago(FechaInicio, Now, -1, -1, UsuarioActual.CveEmpresa, UsuarioActual.CveUsuario) Then
|
||||
If objCompras.DtResultados.Rows.Count > 0 Then
|
||||
GvCompPUE.DataSource = objCompras.DtResultados
|
||||
|
||||
@@ -146,6 +146,7 @@
|
||||
</div>
|
||||
<div class="caption uppercase" style="position: relative;">
|
||||
<i class="fa fa-info-circle"></i>Información del movimiento
|
||||
|
||||
</div>
|
||||
</div>
|
||||
<div class="portlet-body" <%= IIf(chkexpand.Checked = True, "", "style='display:none;'")%>>
|
||||
@@ -275,6 +276,7 @@
|
||||
<div class="row">
|
||||
<label class="col-md-1 truncate" style="width: 110px">
|
||||
Observaciones:
|
||||
|
||||
</label>
|
||||
<div class="col-md-5">
|
||||
<asp:TextBox ID="TxtObservaciones" TextMode="MultiLine" Rows="2" CssClass="form-control input-sm" runat="server" MaxLength="232"></asp:TextBox>
|
||||
@@ -331,6 +333,7 @@
|
||||
</div>
|
||||
<div class="caption uppercase" style="position: relative;">
|
||||
<i class="fa fa-info-circle"></i>Agregar Producto
|
||||
|
||||
</div>
|
||||
</div>
|
||||
<div class="portlet-body">
|
||||
@@ -405,12 +408,14 @@
|
||||
</div>
|
||||
<div class="caption uppercase" style="position: relative;">
|
||||
<i class="fa fa-info-circle"></i>Información de registro
|
||||
|
||||
</div>
|
||||
</div>
|
||||
<div class="portlet-body">
|
||||
<div class="row">
|
||||
<label class="col-md-3 truncate">
|
||||
Usuario:
|
||||
|
||||
</label>
|
||||
<div class="col-md-6">
|
||||
<asp:Label ID="LblUsuarioRegistro" runat="server"></asp:Label>
|
||||
@@ -420,6 +425,7 @@
|
||||
<div class="row" style="margin-top: 10px;">
|
||||
<label class="col-md-3 truncate">
|
||||
Fecha:
|
||||
|
||||
</label>
|
||||
<div class="col-md-6">
|
||||
<asp:Label ID="LblFechaRegistro" runat="server"></asp:Label>
|
||||
@@ -428,6 +434,7 @@
|
||||
<div class="row" style="margin-top: 10px;">
|
||||
<label class="col-md-3 truncate">
|
||||
Referencia:
|
||||
|
||||
</label>
|
||||
<div class="col-md-6">
|
||||
<asp:HyperLink ID="HplCompra" Target="_blank" runat="server" Visible="False" CssClass="Texto">Ver Compra</asp:HyperLink>
|
||||
@@ -440,6 +447,7 @@
|
||||
<div class="row" runat="server" id="RowConsignacion" visible="false" style="margin-top: 10px;">
|
||||
<label class="col-md-3 truncate">
|
||||
Consignación:
|
||||
|
||||
</label>
|
||||
<div class="col-md-6">
|
||||
<asp:HyperLink ID="HLConsignacion" Target="_blank" NavigateUrl="#" Text="" runat="server" />
|
||||
@@ -449,6 +457,7 @@
|
||||
<div class="row" runat="server" id="RowTipoCambio" visible="false" style="margin-top: 10px;">
|
||||
<label class="col-md-3 truncate">
|
||||
Tipo Cambio:
|
||||
|
||||
</label>
|
||||
<div class="col-md-6">
|
||||
<asp:Label Text="" ID="LbTipoCambio" runat="server" />
|
||||
@@ -457,6 +466,7 @@
|
||||
<div class="row" runat="server" id="RowMtoRel" visible="false" style="margin-top: 10px;">
|
||||
<label class="col-md-3 truncate">
|
||||
Mto. Rel.:
|
||||
|
||||
</label>
|
||||
<div class="col-md-6">
|
||||
<asp:HyperLink ID="lnkMtoRelaioando" CssClass="Texto" runat="server" Target="_blank">ver</asp:HyperLink>
|
||||
@@ -474,6 +484,7 @@
|
||||
</div>
|
||||
<div class="caption uppercase" style="position: relative;">
|
||||
<i class="fa fa-info-circle"></i>Tipo de Cambio
|
||||
|
||||
</div>
|
||||
</div>
|
||||
<div class="portlet-body">
|
||||
@@ -542,7 +553,7 @@
|
||||
<asp:UpdatePanel ID="UPDatos" runat="server" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
|
||||
<table border="0" cellpadding="0" class="Widthall grides" cellspacing="0">
|
||||
<%--<table border="0" cellpadding="0" class="Widthall grides" cellspacing="0">
|
||||
<tbody>
|
||||
<tr class="Titulos">
|
||||
<th style="width: 28px">#</th>
|
||||
@@ -551,10 +562,7 @@
|
||||
Producto </th>
|
||||
<th width="73px">U.M.</th>
|
||||
<th width="63px" id="tdPU" runat="server" visible="false">P.U.</th>
|
||||
<th width="63px" id="ThTotal" runat="server" visible="false">Total</th>
|
||||
<th width="63px" id="tdPUExtranjero" runat="server" visible="false">PU Extran</th>
|
||||
<th width="63px" id="tdCI" runat="server" visible="false">CI</th>
|
||||
<th width="63px" id="ThAF" runat="server" visible="false">Activo Fijo</th>
|
||||
<th style="width: 88px" runat="server" id="TrSerieLote2" visible="false">
|
||||
<asp:Label runat="server" ID="LblSerieLote" Visible="false">Serie - Lote</asp:Label></th>
|
||||
<th style="width: 88px" runat="server" id="TrLote2" visible="false">Lote</th>
|
||||
@@ -565,8 +573,8 @@
|
||||
</tr>
|
||||
<tr align="center">
|
||||
<td></td>
|
||||
<td>
|
||||
<asp:TextBox ID="txtCantidad" CssClass="form-control input-sm" Width="55px" MaxLength="15" runat="server" ValidationGroup="GprAgregaPS"></asp:TextBox>
|
||||
<td>--%>
|
||||
<%--<asp:TextBox ID="txtCantidad" CssClass="form-control input-sm" Width="55px" MaxLength="15" runat="server" ValidationGroup="GprAgregaPS"></asp:TextBox>
|
||||
<ajax:FilteredTextBoxExtender ID="SoloNumerosCantidad" runat="server" TargetControlID="txtCantidad" FilterType="Custom, Numbers" ValidChars="." />
|
||||
<asp:RequiredFieldValidator ID="RFVCantidad" runat="server" ControlToValidate="txtCantidad" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cantidad''</b> es necesario, por favor ingréselo." ValidationGroup="GprAgregaPS"></asp:RequiredFieldValidator>
|
||||
<ajax:ValidatorCalloutExtender ID="VCOCantidad1" runat="server" HighlightCssClass="vco" TargetControlID="RFVCantidad" Width="300px"></ajax:ValidatorCalloutExtender>
|
||||
@@ -576,11 +584,6 @@
|
||||
<td style="text-align: center;">
|
||||
<div class="psagregar">
|
||||
<div class="comboxes">
|
||||
<asp:DropDownList ID="DdlClasificacion" runat="server" AppendDataBoundItems="true" AutoPostBack="true" DataTextField="Clasificacion" DataValueField="CveClasificacion" Width="100%" Class="form-control input-sm select2me">
|
||||
<asp:ListItem Selected="True" Text="Seleccione la Clasificación (Todas)" Value="-1"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
<br />
|
||||
<ADS:Dropdownlost runat="server" ID="DdlProducto2" CssStyle="width: 100%;" CssClassDdl="select2me" DataTextField="PSCodigo" DataValueField="CvePS" />
|
||||
</div>
|
||||
</div>
|
||||
</td>
|
||||
@@ -594,7 +597,6 @@
|
||||
<ajax:FilteredTextBoxExtender ID="ftbe" runat="server" TargetControlID="txtPrecio" FilterType="Custom, Numbers" ValidChars="+-.," />
|
||||
</td>
|
||||
<td id="TdTotal" runat="server" visible="false"></td>
|
||||
<td id="tdPUExtranjero2" runat="server" visible="false"></td>
|
||||
<td id="tdCI2" runat="server" visible="false"></td>
|
||||
<td id="tdAF" runat="server" align="center" visible="false">
|
||||
<asp:UpdatePanel ID="UPPNumEcon" runat="server" UpdateMode="Conditional">
|
||||
@@ -619,12 +621,10 @@
|
||||
<asp:TextBox ID="TxtnLote" CssClass="form-control input-sm" runat="server" Width="80px" Visible="false"></asp:TextBox>
|
||||
</td>
|
||||
<td runat="server" id="TrBatch" visible="false">
|
||||
<asp:TextBox ID="TxtnBatch" CssClass="form-control input-sm" runat="server" Width="80px" Visible="false"></asp:TextBox>
|
||||
|
||||
</td>
|
||||
<td runat="server" id="TrSeccionAlmacen" visible="false">
|
||||
<asp:DropDownList ID="DdlSeccionAlmacen" DataTextField="Seccion" AppendDataBoundItems="true" DataValueField="CveSeccion" CssClass="select2me" Style="width: 95% !important" runat="server" CausesValidation="true">
|
||||
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
|
||||
</td>
|
||||
<td>
|
||||
<asp:TextBox ID="TxtObservacionesdetalle" CssClass="form-control input-sm" runat="server" MaxLength="200"></asp:TextBox>
|
||||
@@ -634,8 +634,13 @@
|
||||
</td>
|
||||
</tr>
|
||||
</tbody>
|
||||
</table>
|
||||
|
||||
</table>--%>
|
||||
<div class="row">
|
||||
<div class="col-md-12" align="Right">
|
||||
<asp:LinkButton ID="LkAgregar" runat="server" CssClass="btn btn-default" Text="Agregar Producto" />
|
||||
</div>
|
||||
</div>
|
||||
<br />
|
||||
<div class="row">
|
||||
<div class="col-md-12" align="right">
|
||||
<asp:Label ID="LbTotalMovimientos" Text="Total de Movimientos: 0" runat="server" />
|
||||
@@ -649,9 +654,21 @@
|
||||
<asp:Button ID="BtnVinculaAFEdit" ClientIDMode="Static" OnClick="BtnVinculaAFEdit_Click" Style="display: none;" runat="server" />
|
||||
<asp:HiddenField runat="server" ID="HdnCodAFEdit" Value="-1" ClientIDMode="Static" />
|
||||
|
||||
<asp:GridView ID="GvM" runat="server" GridLines="none" CssClass="tabla_correcto grides Widthall mysmallbtn" ShowHeader="False" EmptyDataText="Aún no hay registros." DataKeyNames="No,CveMovimientoDetalle,Cantidad" AutoGenerateColumns="False" AllowPaging="False" ShowFooter="True" ShowHeaderWhenEmpty="True">
|
||||
<asp:GridView ID="GvM" runat="server" GridLines="none" CssClass="tabla_correcto grides Widthall mysmallbtn" ShowHeader="True" EmptyDataText="Aún no hay registros."
|
||||
DataKeyNames="No,CveMovimientoDetalle,Cantidad,CvePS,CveUM,PU,Observaciones,CodigoPS,UnidadMedida,CveAF,SerieLote,CveSeccionAlmacen"
|
||||
AutoGenerateColumns="False" AllowPaging="False" ShowFooter="True" ShowHeaderWhenEmpty="True">
|
||||
<Columns>
|
||||
<asp:TemplateField HeaderText="" ItemStyle-Font-Size="6pt">
|
||||
<asp:TemplateField HeaderText="CveMovimientoDetalle" ItemStyle-Font-Size="6pt" Visible="false">
|
||||
<ItemTemplate>
|
||||
<asp:Literal ID="lbMovimientoDetalle" runat="server" Text='<%# Eval("CveMovimientoDetalle")%>'></asp:Literal>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="CvePS" ItemStyle-Font-Size="6pt" Visible="false">
|
||||
<ItemTemplate>
|
||||
<asp:Literal ID="lbCvePS" runat="server" Text='<%# Eval("CvePS")%>'></asp:Literal>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="#" ItemStyle-Font-Size="6pt">
|
||||
<EditItemTemplate>
|
||||
<asp:Literal ID="lbNo" runat="server" Text='<%# Eval("No")%>'></asp:Literal>
|
||||
</EditItemTemplate>
|
||||
@@ -791,7 +808,12 @@
|
||||
<asp:LinkButton data-toggle="tooltip" title="Sección Almacen" ID="LnkSeccionAlmacen" OnClick="LnkSeccionAlmacen_Click" CssClass="btn btn-circle btn-xs green" runat="server" Text="<i class='fa fa-pencil'></i>"></asp:LinkButton>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField>
|
||||
<asp:TemplateField ItemStyle-Width="20px">
|
||||
<ItemTemplate>
|
||||
<asp:LinkButton ID="ImgEd" runat="server" AlternateText="Editar" CausesValidation="False" OnClick="EditPS" CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-pencil'></i>" />
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField Visible="false">
|
||||
<EditItemTemplate>
|
||||
<center>
|
||||
<asp:LinkButton ID="imgU" runat="server" AlternateText="Actualizar" CausesValidation="True" CommandName="Update" CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-check'></i>" ValidationGroup="GrpGV" />
|
||||
@@ -799,7 +821,7 @@
|
||||
</center>
|
||||
</EditItemTemplate>
|
||||
<ItemTemplate>
|
||||
<asp:LinkButton ID="imgE" runat="server" AlternateText="Editar" CausesValidation="False" CommandName="Edit" CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-pencil'></i>" />
|
||||
<%--<asp:LinkButton ID="imgE" runat="server" AlternateText="Editar" CausesValidation="False" CommandName="Edit" CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-pencil'></i>" />--%>
|
||||
<asp:LinkButton ID="lnkRemove" runat="server" AlternateText="Eliminar" OnClick="DeleteRow" CommandArgument='<%# Eval("No")%>' CssClass="btn btn-circle btn-sm red" Text="<i class='icon-trash'></i>" data-toggle="confirmation" data-popout="true" data-original-title="¿Seguro que desea eliminar el concepto?" data-btn-ok-label="si" />
|
||||
<asp:LinkButton ID="lnkDividir" runat="server" AlternateText="Eliminar" OnClick="DividirRow" CommandArgument='<%# Eval("No")%>' Style="font-size: 9px" CssClass="btn btn-circle btn-sm red" Text="<i class='fas fa-chart-pie-alt'></i>" data-toggle="confirmation" data-popout="true" data-original-title="¿Seguro que desea dividir el concepto en unidades?" data-btn-ok-label="si" />
|
||||
</ItemTemplate>
|
||||
@@ -953,6 +975,7 @@
|
||||
<div class="row">
|
||||
<div class="col-md-5" style="text-align: right;">
|
||||
Cantidad
|
||||
|
||||
</div>
|
||||
<div class="col-md-7">
|
||||
<asp:TextBox ClientIDMode="Static" ID="TxtCantidadEspecial" Text="" runat="server"></asp:TextBox>
|
||||
@@ -1394,6 +1417,7 @@
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
</ContentTemplate>
|
||||
<Triggers>
|
||||
<asp:PostBackTrigger ControlID="LbDescargarExcelConceptos" />
|
||||
@@ -1487,6 +1511,112 @@
|
||||
</asp:UpdatePanel>
|
||||
</div>
|
||||
|
||||
<div id="ModalAgregar" class="modal ADS fade" role="dialog">
|
||||
<asp:UpdatePanel class="modal-dialog" runat="server" ID="UpAgregar" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
<div class="modal-content">
|
||||
<div class="modal-header ">
|
||||
<h4 class="modal-title">
|
||||
<asp:Literal ID="Literal3" Text="Detalles" runat="server"> </asp:Literal></h4>
|
||||
</div>
|
||||
<div class="modal-body">
|
||||
<div runat="server" id="divCantidad" class="form-group form-md-line-input input-iconright">
|
||||
<asp:TextBox ID="txtCantidad" CssClass="form-control input-sm" Width="50%" MaxLength="15" runat="server" ValidationGroup="GprAgregaPS"></asp:TextBox>
|
||||
<ajax:FilteredTextBoxExtender ID="SoloNumerosCantidad" runat="server" TargetControlID="txtCantidad" FilterType="Custom, Numbers" ValidChars="." />
|
||||
<asp:RequiredFieldValidator ID="RFVCantidad" runat="server" ControlToValidate="txtCantidad" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cantidad''</b> es necesario, por favor ingréselo." ValidationGroup="GprAgregaPS"></asp:RequiredFieldValidator>
|
||||
<ajax:ValidatorCalloutExtender ID="VCOCantidad1" runat="server" HighlightCssClass="vco" TargetControlID="RFVCantidad" Width="300px"></ajax:ValidatorCalloutExtender>
|
||||
<asp:CustomValidator ID="CVCantidad" runat="server" ClientValidationFunction="ValidaDecimal6digits" ControlToValidate="TxtCantidad" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cantidad''</b> no tiene el formato correcto (6 decimales). Por favor rectifique y vuelva a intentar." ValidateEmptyText="True" ValidationGroup="GprAgregaPS"></asp:CustomValidator>
|
||||
<ajax:ValidatorCalloutExtender ID="VCECantidad" runat="server" HighlightCssClass="vco" TargetControlID="CVCantidad" Width="300px"></ajax:ValidatorCalloutExtender>
|
||||
<label for="<%= txtCantidad.ClientID.ToString()%>">Cant</label>
|
||||
<br />
|
||||
</div>
|
||||
<div runat="server" id="divClasificacionProducto" class="form-group form-md-line-input input-iconright">
|
||||
<asp:DropDownList ID="DdlClasificacion" runat="server" AppendDataBoundItems="true" AutoPostBack="true" DataTextField="Clasificacion" DataValueField="CveClasificacion" Width="100%" Class="form-control input-sm select2me">
|
||||
<asp:ListItem Selected="True" Text="Seleccione la Clasificación (Todas)" Value="-1"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
<br />
|
||||
<ADS:Dropdownlost runat="server" ID="DdlProducto2" CssStyle="width: 100%;" CssClassDdl="select2me" DataTextField="PSCodigo" DataValueField="CvePS" />
|
||||
<label for="<%= DdlProducto2.ClientID.ToString()%>">Clasificación Producto</label>
|
||||
<br />
|
||||
</div>
|
||||
<div runat="server" id="divUnidadMedida" class="form-group form-md-line-input input-iconright">
|
||||
<asp:DropDownList ID="DdlUnidad" runat="server" Class="form-control input-sm select2me" Style="width: 100px !important;" DataTextField="UnidadMedida" DataValueField="CveUnidadMedida"></asp:DropDownList>
|
||||
<label for="<%= DdlUnidad.ClientID.ToString()%>">U.M.</label>
|
||||
<br />
|
||||
</div>
|
||||
<div runat="server" id="divPrecio" class="form-group form-md-line-input input-iconright" visible="false">
|
||||
<asp:TextBox ID="txtPrecio" CssClass="form-control input-sm" runat="server" Width="50%" Visible="false"></asp:TextBox>
|
||||
<label for="<%= txtPrecio.ClientID.ToString()%>">P.U.</label>
|
||||
<br />
|
||||
</div>
|
||||
<div runat="server" id="divSerieLote" class="form-group form-md-line-input input-iconright" visible="false">
|
||||
<asp:TextBox ID="TxtnSerieLote" CssClass="form-control input-sm" runat="server" Width="80px" Visible="false"></asp:TextBox>
|
||||
<asp:Button Text="" ID="BtnSerieAddNew" OnClick="BtnSerieAddNew_Click" Style="display: none" runat="server" />
|
||||
<label for="<%= TxtnSerieLote.ClientID.ToString()%>">Serie Lote</label>
|
||||
<br />
|
||||
</div>
|
||||
<div runat="server" id="divLote" class="form-group form-md-line-input input-iconright" visible="false">
|
||||
<asp:TextBox ID="TxtnLote" CssClass="form-control input-sm" runat="server" Width="80px" Visible="false"></asp:TextBox>
|
||||
<label for="<%= TxtnLote.ClientID.ToString()%>">Lote</label>
|
||||
<br />
|
||||
</div>
|
||||
<div runat="server" id="divBatch" class="form-group form-md-line-input input-iconright" visible="false">
|
||||
<asp:TextBox ID="TxtnBatch" CssClass="form-control input-sm" runat="server" Width="80px" Visible="false"></asp:TextBox>
|
||||
<label for="<%= TxtnBatch.ClientID.ToString()%>">Batch</label>
|
||||
<br />
|
||||
</div>
|
||||
<div runat="server" id="divSeccionAlmacen" class="form-group form-md-line-input input-iconright" visible="false">
|
||||
<asp:DropDownList ID="DdlSeccionAlmacen" DataTextField="Seccion" AppendDataBoundItems="true" DataValueField="CveSeccion" Class="form-control input-sm select2me" Style="width: 95% !important" runat="server" CausesValidation="true">
|
||||
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
<label for="<%= DdlSeccionAlmacen.ClientID.ToString()%>">Sección Almacén</label>
|
||||
</div>
|
||||
<br />
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:TextBox ID="TxtObservacionesdetalle" CssClass="form-control input-sm" runat="server" MaxLength="200"></asp:TextBox>
|
||||
<label for="<%= TxtObservacionesdetalle.ClientID.ToString()%>">Observaciones</label>
|
||||
<br />
|
||||
</div>
|
||||
|
||||
<div runat="server" id="tdPUExtranjero" class="form-group form-md-line-input input-iconright" visible="false">
|
||||
<label for="<%= tdPUExtranjero2.ClientID.ToString()%>">PU Extranjero</label>
|
||||
<label id="tdPUExtranjero2" runat="server" visible="false"></label>
|
||||
</div>
|
||||
|
||||
<div runat="server" id="tdCI" class="form-group form-md-line-input input-iconright" visible="false">
|
||||
<label id="tdCI2" runat="server" visible="false"></label>
|
||||
<label for="<%= tdCI2.ClientID.ToString()%>">CI</label>
|
||||
</div>
|
||||
|
||||
<div runat="server" id="ThAF" class="form-group form-md-line-input input-iconright" visible="false">
|
||||
<label for="tdAF">AF</label>
|
||||
<asp:Literal ID="tdAF" runat="server" Visible="false"></asp:Literal>
|
||||
<asp:UpdatePanel ID="UPPNumEcon" runat="server" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
<asp:Button Text="VinculaAF" Style="display: none;" OnClick="BtnVinculaAF_Click" ClientIDMode="Static" ID="BtnVinculaAF" runat="server" />
|
||||
<asp:HiddenField ID="HdnCveActivoFijo" Value="-1" runat="server" ClientIDMode="Static" />
|
||||
<asp:HiddenField ID="HdnCodigoAF" Value="-1" runat="server" ClientIDMode="Static" />
|
||||
|
||||
<asp:TextBox ID="LblCodigo" runat="server" Text="" onkeyup="EnterAF(event);" onblur="AFBlur();" ClientIDMode="Static" Width="40px"></asp:TextBox>
|
||||
<asp:HyperLink ID="HplMaq" runat="server" ClientIDMode="Static"><img alt="Activo Fijo" width="20px" height="20px" src="/Imagenes/Maquinaria.jpg" style="cursor:pointer;" onclick="AbrirVentana('/AF/PopUpBuscarAF.aspx?OPCION=OC',950,600,'N');"/></asp:HyperLink>
|
||||
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
</div>
|
||||
<div runat="server" id="ThTotal" class="form-group form-md-line-input input-iconright" visible="false">
|
||||
<label for="<%= TdTotal.ClientID.ToString()%>">Total</label>
|
||||
<asp:Literal ID="TdTotal" runat="server" Visible="false"></asp:Literal>
|
||||
</div>
|
||||
</div>
|
||||
<div class="modal-footer">
|
||||
<asp:LinkButton ID="LkAgregarDetalle" runat="server" CssClass="btn btn-primary" Text="Agregar"></asp:LinkButton>
|
||||
<button type="button" class="btn btn-default" data-dismiss="modal">Cancelar</button>
|
||||
</div>
|
||||
</div>
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
</div>
|
||||
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server">
|
||||
<script type="text/javascript">
|
||||
|
||||
@@ -5,6 +5,7 @@ Imports System.Data
|
||||
Imports Extensiones
|
||||
Imports System.IO
|
||||
Imports Microsoft.Reporting.WebForms
|
||||
Imports System.Math
|
||||
|
||||
'Imports DocumentFormat.OpenXml.Wordprocessing
|
||||
|
||||
@@ -260,6 +261,22 @@ Partial Class Inventarios_EntradasSalidas
|
||||
ViewState("DescripcionDetalladaEliminar") = value
|
||||
End Set
|
||||
End Property
|
||||
Public Property CveAFEdit() As Integer
|
||||
Get
|
||||
Return ViewState("CveAFEdit").ToString.ToEntero
|
||||
End Get
|
||||
Set(value As Integer)
|
||||
ViewState("CveAFEdit") = value
|
||||
End Set
|
||||
End Property
|
||||
Public Property CveMovimientoDetalleEdit() As Integer
|
||||
Get
|
||||
Return ViewState("CveMovimientoDetalleEdit").ToString.ToEntero
|
||||
End Get
|
||||
Set(value As Integer)
|
||||
ViewState("CveMovimientoDetalleEdit") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
#End Region
|
||||
|
||||
@@ -362,13 +379,14 @@ Partial Class Inventarios_EntradasSalidas
|
||||
End Function
|
||||
Private Sub ActivaPermisoSeccionAlmacen()
|
||||
GvM.Columns(12).Visible = UsuarioActual.Empresa.Funcionalidad(147) = "1"
|
||||
TrSeccionAlmacen.Visible = UsuarioActual.Empresa.Funcionalidad(147) = "1"
|
||||
TrSeccionAlmacen2.Visible = UsuarioActual.Empresa.Funcionalidad(147) = "1"
|
||||
'TrSeccionAlmacen.Visible = UsuarioActual.Empresa.Funcionalidad(147) = "1"
|
||||
'TrSeccionAlmacen2.Visible = UsuarioActual.Empresa.Funcionalidad(147) = "1"
|
||||
divSeccionAlmacen.Visible = UsuarioActual.Empresa.Funcionalidad(147) = "1"
|
||||
End Sub
|
||||
Private Sub PermisoVerImportes()
|
||||
Dim TienePermisoImportes As Boolean = UsuarioActual.TienePermisoProceso(201)
|
||||
tdPU.Visible = TienePermisoImportes
|
||||
tdTxtPU.Visible = TienePermisoImportes
|
||||
'tdPU.Visible = TienePermisoImportes
|
||||
'tdTxtPU.Visible = TienePermisoImportes
|
||||
GvM.Columns(4).Visible = TienePermisoImportes
|
||||
|
||||
ThTotal.Visible = TienePermisoImportes
|
||||
@@ -1138,9 +1156,18 @@ Partial Class Inventarios_EntradasSalidas
|
||||
Return Existencia
|
||||
End Function
|
||||
|
||||
Protected Sub btnAgregar_Click(sender As Object, e As EventArgs) Handles LbAgregar.Click
|
||||
AgregarPS()
|
||||
'Protected Sub btnAgregar_Click(sender As Object, e As EventArgs) Handles LbAgregar.Click
|
||||
' AgregarPS()
|
||||
'End Sub
|
||||
|
||||
Protected Sub btnAgregarDetalle_Click(sender As Object, e As EventArgs) Handles LkAgregarDetalle.Click
|
||||
If LkAgregarDetalle.Text = "Agregar" Then
|
||||
AgregarPS()
|
||||
Else
|
||||
ActualizarPS()
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Protected Sub BtnSerieAddNew_Click(sender As Object, e As EventArgs)
|
||||
AgregarPS()
|
||||
End Sub
|
||||
@@ -1192,7 +1219,7 @@ Partial Class Inventarios_EntradasSalidas
|
||||
If Valido AndAlso DdlConcepto.SelectedValue.Contiene({"3", "5", "7", "8", "11", "12", "13", "15", "16", "17", "20", "21", "30", "31"}) Then ' salida de almacen
|
||||
|
||||
Dim Existencia As Double = GetExistencias(CvePS, CveUM, UsuarioActual.CveEmpresa, DdlAlmacen.SelectedValue.ToEntero, If(SerieLote = "", "-1", SerieLote), If(Lote = "", "-1", Lote), If(Batch = "", "-1", Batch))
|
||||
LbAgregar.ToolTip = Existencia.ToString
|
||||
'LbAgregar.ToolTip = Existencia.ToString
|
||||
If Existencia - Cantidad - DtMovimientos.SUM("Cantidad", $"CvePS = {CvePS} AND CveUM = {CveUM} {If(SerieLote <> "", $" AND SerieLote = '{SerieLote}'", "")}") < 0 Then
|
||||
If Existencia <= 0 Then
|
||||
Alert("No hay existencia del producto", TipoMensaje.MsgAdvertencia)
|
||||
@@ -1319,7 +1346,10 @@ Partial Class Inventarios_EntradasSalidas
|
||||
End If
|
||||
ElseIf Dr("Estatus").ToString = "U" Then
|
||||
|
||||
If Not ObjInventario.UpdateMovimientoDetalle(Dr("Cantidad").ToString.ToDouble, Dr("CveUM").ToString.ToEntero, Dr("CvePS").ToString.ToEntero, ImporteConcepto, Dr("CveAF").ToString.ToEntero, Dr("CveMovimientoDetalle").ToString.ToEntero, Dr("CveSeccionAlmacen").ToString.ToEntero, Dr("SerieLote").ToString, Dr("Observaciones").ToString, CveUsuarioModifico:=UsuarioActual.CveUsuario) Then
|
||||
If Not ObjInventario.UpdateMovimientoDetalle(Dr("Cantidad").ToString.ToDouble, Dr("CveUM").ToString.ToEntero, Dr("CvePS").ToString.ToEntero,
|
||||
ImporteConcepto, Dr("CveAF").ToString.ToEntero, Dr("CveMovimientoDetalle").ToString.ToEntero,
|
||||
Dr("CveSeccionAlmacen").ToString.ToEntero, Dr("SerieLote").ToString, Dr("Observaciones").ToString,
|
||||
CveUsuarioModifico:=UsuarioActual.CveUsuario) Then
|
||||
Mensaje = "Error al Actualizar los movimientos"
|
||||
ErrorMovInv = True : Exit For
|
||||
End If
|
||||
@@ -2083,9 +2113,12 @@ Partial Class Inventarios_EntradasSalidas
|
||||
End Sub
|
||||
|
||||
Private Sub VisualizaPU(Opcion As Boolean)
|
||||
tdPU.Visible = Opcion
|
||||
tdTxtPU.Visible = Opcion
|
||||
'tdPU.Visible = Opcion
|
||||
'tdTxtPU.Visible = Opcion
|
||||
|
||||
txtPrecio.Visible = Opcion
|
||||
divPrecio.Visible = Opcion
|
||||
|
||||
GvM.Columns(4).Visible = Opcion
|
||||
|
||||
TdTotal.Visible = Opcion
|
||||
@@ -2098,7 +2131,7 @@ Partial Class Inventarios_EntradasSalidas
|
||||
GvM.Columns(6).Visible = Opcion
|
||||
End Sub
|
||||
Private Sub VisualizaAF(Opcion As Boolean)
|
||||
tdAF.Visible = Opcion
|
||||
'tdAF.Visible = Opcion
|
||||
ThAF.Visible = Opcion
|
||||
GvM.Columns(8).Visible = Opcion
|
||||
End Sub
|
||||
@@ -2143,29 +2176,38 @@ Partial Class Inventarios_EntradasSalidas
|
||||
End Sub
|
||||
Private Sub ElProductoChange()
|
||||
TxtnSerieLote.Visible = False
|
||||
divSerieLote.Visible = False
|
||||
|
||||
TxtnLote.Visible = False
|
||||
divLote.Visible = False
|
||||
TxtnBatch.Visible = False
|
||||
divBatch.Visible = False
|
||||
|
||||
EscondeColumnasGVM(DtMovimientos.FiltraParametros("Estatus <> 'E' "))
|
||||
|
||||
If DdlProducto2.SelectedValue.ToEntero > 0 Then
|
||||
Dim MetodoInventario As Integer = GlobalDTPS(UsuarioActual.CveEmpresa, DdlProducto2.SelectedValue.ToEntero).FiltroPrimeroValor("Inv_CveMetodoInventario", "").ToEntero ' ("Inv_CveMetodoInventario = 6", "PS")
|
||||
If MetodoInventario = 5 Then
|
||||
LblSerieLote.Visible = True
|
||||
|
||||
'LblSerieLote.Visible = True
|
||||
TxtnSerieLote.Visible = True
|
||||
TrSerieLote.Visible = True
|
||||
TrSerieLote2.Visible = True
|
||||
divSerieLote.Visible = True
|
||||
|
||||
'TrSerieLote.Visible = True
|
||||
'TrSerieLote2.Visible = True
|
||||
GvM.Columns(9).Visible = True
|
||||
End If
|
||||
If MetodoInventario = 6 Then
|
||||
TxtnLote.Visible = True
|
||||
TrLote.Visible = True
|
||||
TrLote2.Visible = True
|
||||
divLote.Visible = True
|
||||
'TrLote.Visible = True
|
||||
'TrLote2.Visible = True
|
||||
GvM.Columns(10).Visible = True
|
||||
|
||||
TxtnBatch.Visible = True
|
||||
TrBatch.Visible = True
|
||||
TrBatch2.Visible = True
|
||||
divBatch.Visible = True
|
||||
'TrBatch.Visible = True
|
||||
'TrBatch2.Visible = True
|
||||
GvM.Columns(11).Visible = True
|
||||
End If
|
||||
End If
|
||||
@@ -2184,27 +2226,26 @@ Partial Class Inventarios_EntradasSalidas
|
||||
GvM.DataBind()
|
||||
|
||||
EscondeColumnasGVM(DtTemp)
|
||||
UppGrid.Update()
|
||||
End Sub
|
||||
Private Sub EscondeColumnasGVM(DtTemp As DataTable)
|
||||
LblSerieLote.Visible = False
|
||||
'LblSerieLote.Visible = False
|
||||
TxtnSerieLote.Visible = False
|
||||
TrSerieLote.Visible = False
|
||||
TrSerieLote2.Visible = False
|
||||
divSerieLote.Visible = False
|
||||
|
||||
GvM.Columns(9).Visible = False
|
||||
'PERMISO SOLO PARA EDITAR SERIELOTE
|
||||
If UsuarioActual.TienePermisoProceso(245) Then
|
||||
GvM.Columns(9).Visible = True
|
||||
End If
|
||||
'TrSerieLote.Visible = False
|
||||
'TrSerieLote2.Visible = False
|
||||
|
||||
TxtnLote.Visible = False
|
||||
TrLote.Visible = False
|
||||
TrLote2.Visible = False
|
||||
divLote.Visible = False
|
||||
'TrLote.Visible = False
|
||||
'TrLote2.Visible = False
|
||||
GvM.Columns(10).Visible = False
|
||||
|
||||
TxtnBatch.Visible = False
|
||||
TrBatch.Visible = False
|
||||
TrBatch2.Visible = False
|
||||
divBatch.Visible = False
|
||||
'TrBatch.Visible = False
|
||||
'TrBatch2.Visible = False
|
||||
GvM.Columns(11).Visible = False
|
||||
|
||||
Dim TienePermisoImportes = UsuarioActual.TienePermisoProceso(201)
|
||||
@@ -2217,23 +2258,34 @@ Partial Class Inventarios_EntradasSalidas
|
||||
GvM.Columns(7).Visible = False
|
||||
|
||||
If DtTemp IsNot Nothing AndAlso DtTemp.Rows.Count > 0 Then
|
||||
GvM.Columns(9).Visible = False
|
||||
'PERMISO SOLO PARA EDITAR SERIELOTE
|
||||
If UsuarioActual.TienePermisoProceso(245) Then
|
||||
GvM.Columns(9).Visible = True
|
||||
End If
|
||||
Dim SerieLoteVal As Integer = DtTemp.FiltraParametros("LEN(SerieLote) > 0").Rows.Count()
|
||||
GvM.Columns(9).Visible = False
|
||||
If DtTemp.MAX("SerieLote").ToString <> "" Then
|
||||
LblSerieLote.Visible = True
|
||||
'LblSerieLote.Visible = True
|
||||
TxtnSerieLote.Visible = True
|
||||
TrSerieLote.Visible = True
|
||||
TrSerieLote2.Visible = True
|
||||
divSerieLote.Visible = True
|
||||
|
||||
'TrSerieLote.Visible = True
|
||||
'TrSerieLote2.Visible = True
|
||||
GvM.Columns(9).Visible = True
|
||||
End If
|
||||
|
||||
If DtTemp.MAX("Lote").ToString <> "" Then
|
||||
TxtnLote.Visible = True
|
||||
TrLote.Visible = True
|
||||
TrLote2.Visible = True
|
||||
divLote.Visible = True
|
||||
'TrLote.Visible = True
|
||||
'TrLote2.Visible = True
|
||||
GvM.Columns(10).Visible = True
|
||||
|
||||
TxtnBatch.Visible = True
|
||||
TrBatch.Visible = True
|
||||
TrBatch2.Visible = True
|
||||
divBatch.Visible = True
|
||||
'TrBatch.Visible = True
|
||||
'TrBatch2.Visible = True
|
||||
GvM.Columns(11).Visible = True
|
||||
End If
|
||||
|
||||
@@ -2320,34 +2372,34 @@ Partial Class Inventarios_EntradasSalidas
|
||||
If CveMovimiento > 0 Then
|
||||
'DEPENDE PERMISOS HABILITA
|
||||
e.Row.FCLinkButton("lnkRemove").Visible = PermiteEliminar()
|
||||
e.Row.FCLinkButton("imgE").Visible = PermiteGuardar()
|
||||
e.Row.FCLinkButton("imgEd").Visible = PermiteGuardar()
|
||||
|
||||
If e.Row.DBCampo("CountMovimientoEntradaDetalle").ToEntero > 0 Then
|
||||
TieneSalida = True
|
||||
e.Row.FCLinkButton("lnkRemove").Visible = False
|
||||
e.Row.FCLinkButton("imgE").Visible = False
|
||||
e.Row.FCLinkButton("imgEd").Visible = False
|
||||
End If
|
||||
|
||||
'SI TIENE PREPOLIZAS NO PUEDE EDITAR NI ELIMINAR
|
||||
If e.Row.DBCampo("TienePrePoliza").ToEntero > 0 Then
|
||||
e.Row.FCLinkButton("lnkRemove").Visible = False
|
||||
e.Row.FCLinkButton("imgE").Visible = False
|
||||
e.Row.FCLinkButton("imgEd").Visible = False
|
||||
End If
|
||||
|
||||
'APAGA TODO SI TIENE MOVIMIENTO RELACIONADO
|
||||
If TieneRelacionado > 0 Or CveMovimientoRelacionado > 0 Then
|
||||
e.Row.FCLinkButton("lnkRemove").Visible = False
|
||||
e.Row.FCLinkButton("imgE").Visible = False
|
||||
e.Row.FCLinkButton("imgEd").Visible = False
|
||||
End If
|
||||
|
||||
'PERMISO SOLO PARA EDITAR OBSERVACIONES
|
||||
If PermiteGuardarObservacionDetalle() Then
|
||||
e.Row.FCLinkButton("imgE").Visible = True
|
||||
e.Row.FCLinkButton("imgEd").Visible = True
|
||||
End If
|
||||
|
||||
'PERMISO SOLO PARA EDITAR SERIELOTE
|
||||
If UsuarioActual.TienePermisoProceso(245) Then
|
||||
e.Row.FCLinkButton("imgE").Visible = True
|
||||
e.Row.FCLinkButton("imgEd").Visible = True
|
||||
End If
|
||||
|
||||
If EsNuevoMov Then
|
||||
@@ -2363,8 +2415,8 @@ Partial Class Inventarios_EntradasSalidas
|
||||
End If
|
||||
|
||||
If DtSeccionAlmacen.FiltraParametros($"IndexSeccionAlmacen = {e.Row.RowIndex}").SUMD("CantidadSeccionAlmacen") > 0 Then
|
||||
e.Row.FCLinkButton("imgE").Visible = False
|
||||
e.Row.FCLinkButton("imgE").ToolTip = "Cuenta con sección almacen"
|
||||
e.Row.FCLinkButton("imgEd").Visible = False
|
||||
e.Row.FCLinkButton("imgEd").ToolTip = "Cuenta con sección almacen"
|
||||
e.Row.FCLinkButton("lnkRemove").Visible = False
|
||||
e.Row.FCLinkButton("lnkRemove").ToolTip = "Cuenta con sección almacen"
|
||||
e.Row.FCLinkButton("lnkDividir").Visible = False
|
||||
@@ -2375,7 +2427,50 @@ Partial Class Inventarios_EntradasSalidas
|
||||
End Sub
|
||||
Protected Sub GvM_RowEditing(sender As Object, e As GridViewEditEventArgs) Handles GvM.RowEditing
|
||||
GvM.EditIndex = e.NewEditIndex
|
||||
|
||||
Dim Gv As GridView = DirectCast(sender, GridView)
|
||||
Dim GvRow As GridViewRow = Gv.Rows(0)
|
||||
If CveMovimiento > 0 Then
|
||||
CveMovimientoDetalleEdit = GvRow.DataKey("CveMovimientoDetalle").ToEntero
|
||||
divCantidad.Visible = False
|
||||
divClasificacionProducto.Visible = False
|
||||
divUnidadMedida.Visible = False
|
||||
End If
|
||||
txtCantidad.Text = GvRow.DataKey("Cantidad").ToEntero().ToString
|
||||
DdlProducto2.SelectedValue = GvRow.DataKey("CvePS")
|
||||
DdlProducto2.SelectedText = GvRow.DataKey("CodigoPS")
|
||||
ElProductoChange()
|
||||
DdlUnidad.SelectedValue = GvRow.DataKey("CveUM")
|
||||
CveAFEdit = GvRow.DataKey("CveAF").ToEntero
|
||||
txtPrecio.Text = GvRow.DataKey("PU").ToDouble.FormatoNumero
|
||||
TxtnSerieLote.Text = GvRow.DataKey("SerieLote")
|
||||
TxtObservacionesdetalle.Text = GvRow.DataKey("Observaciones")
|
||||
DdlSeccionAlmacen.SelectedValueExist(GvRow.DataKey("CveSeccionAlmacen"))
|
||||
LkAgregarDetalle.Text = "Actualizar"
|
||||
UpAgregar.Update()
|
||||
RegistraScript("$('#ModalAgregar').modal()")
|
||||
CargaGVM(DtMovimientos.FiltraParametros("Estatus <> 'E' "))
|
||||
End Sub
|
||||
Protected Sub EditPS(sender As Object, e As EventArgs)
|
||||
Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow)
|
||||
If CveMovimiento > 0 Then
|
||||
CveMovimientoDetalleEdit = GvRow.DataKey("CveMovimientoDetalle").ToEntero
|
||||
divCantidad.Visible = False
|
||||
divClasificacionProducto.Visible = False
|
||||
divUnidadMedida.Visible = False
|
||||
End If
|
||||
txtCantidad.Text = GvRow.DataKey("Cantidad").ToEntero().ToString
|
||||
DdlProducto2.SelectedValue = GvRow.DataKey("CvePS")
|
||||
DdlProducto2.SelectedText = GvRow.DataKey("CodigoPS")
|
||||
ElProductoChange()
|
||||
DdlUnidad.SelectedValue = GvRow.DataKey("CveUM")
|
||||
CveAFEdit = GvRow.DataKey("CveAF").ToEntero
|
||||
txtPrecio.Text = GvRow.DataKey("PU").ToDouble.FormatoNumero
|
||||
TxtnSerieLote.Text = GvRow.DataKey("SerieLote")
|
||||
TxtObservacionesdetalle.Text = GvRow.DataKey("Observaciones")
|
||||
DdlSeccionAlmacen.SelectedValueExist(GvRow.DataKey("CveSeccionAlmacen"))
|
||||
LkAgregarDetalle.Text = "Actualizar"
|
||||
UpAgregar.Update()
|
||||
RegistraScript("$('#ModalAgregar').modal()")
|
||||
CargaGVM(DtMovimientos.FiltraParametros("Estatus <> 'E' "))
|
||||
End Sub
|
||||
Protected Sub GvM_RowCancelingEdit(sender As Object, e As GridViewCancelEditEventArgs) Handles GvM.RowCancelingEdit
|
||||
@@ -2591,7 +2686,7 @@ Partial Class Inventarios_EntradasSalidas
|
||||
LblCodigo.Text = HdnCodigoAF.Value
|
||||
End If
|
||||
|
||||
LbAgregar.Focus()
|
||||
'LbAgregar.Focus()
|
||||
|
||||
UPDatos.Update()
|
||||
End Sub
|
||||
@@ -4065,15 +4160,15 @@ Partial Class Inventarios_EntradasSalidas
|
||||
End If
|
||||
|
||||
If CantidadTotalSeccion > 0 Then
|
||||
GvM.Rows(IndexSeccionAlmacen).FCLinkButton("imgE").Visible = False
|
||||
GvM.Rows(IndexSeccionAlmacen).FCLinkButton("imgE").ToolTip = "Cuenta con sección almacen"
|
||||
GvM.Rows(IndexSeccionAlmacen).FCLinkButton("imgEd").Visible = False
|
||||
GvM.Rows(IndexSeccionAlmacen).FCLinkButton("imgEd").ToolTip = "Cuenta con sección almacen"
|
||||
GvM.Rows(IndexSeccionAlmacen).FCLinkButton("lnkRemove").Visible = False
|
||||
GvM.Rows(IndexSeccionAlmacen).FCLinkButton("lnkRemove").ToolTip = "Cuenta con sección almacen"
|
||||
GvM.Rows(IndexSeccionAlmacen).FCLinkButton("lnkDividir").Visible = False
|
||||
GvM.Rows(IndexSeccionAlmacen).FCLinkButton("lnkDividir").ToolTip = "Cuenta con sección almacen"
|
||||
Else
|
||||
GvM.Rows(IndexSeccionAlmacen).FCLinkButton("imgE").Visible = True
|
||||
GvM.Rows(IndexSeccionAlmacen).FCLinkButton("imgE").ToolTip = ""
|
||||
GvM.Rows(IndexSeccionAlmacen).FCLinkButton("imgEd").Visible = True
|
||||
GvM.Rows(IndexSeccionAlmacen).FCLinkButton("imgEd").ToolTip = ""
|
||||
GvM.Rows(IndexSeccionAlmacen).FCLinkButton("lnkRemove").Visible = True
|
||||
GvM.Rows(IndexSeccionAlmacen).FCLinkButton("lnkRemove").ToolTip = ""
|
||||
GvM.Rows(IndexSeccionAlmacen).FCLinkButton("lnkDividir").Visible = True
|
||||
@@ -4141,4 +4236,41 @@ Partial Class Inventarios_EntradasSalidas
|
||||
|
||||
#End Region
|
||||
|
||||
Protected Sub LkAgregar_Click() Handles LkAgregar.Click
|
||||
limpiarModalDetalle()
|
||||
UpAgregar.Update()
|
||||
RegistraScript("$('#ModalAgregar').modal()")
|
||||
End Sub
|
||||
|
||||
Private Sub ActualizarPS()
|
||||
Dim ObjInventario As New ClsInventarios
|
||||
If Not ObjInventario.UpdateMovimientoDetalle(txtCantidad.Text.ToDouble, DdlUnidad.ToEntero, DdlProducto2.SelectedValue.ToEntero, txtPrecio.Text.ToDouble, CveAFEdit,
|
||||
CveMovimientoDetalleEdit, DdlSeccionAlmacen.SelectedValue.ToEntero, TxtnSerieLote.Text, TxtObservacionesdetalle.Text,
|
||||
CveUsuarioModifico:=UsuarioActual.CveUsuario) Then
|
||||
Alert("Error al Actualizar los movimientos")
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub limpiarModalDetalle()
|
||||
|
||||
divCantidad.Visible = True
|
||||
divClasificacionProducto.Visible = True
|
||||
divUnidadMedida.Visible = True
|
||||
txtCantidad.Text = ""
|
||||
DdlProducto2.SelectedValue = "-1"
|
||||
DdlProducto2.SelectedText = ""
|
||||
ElProductoChange()
|
||||
txtPrecio.Text = ""
|
||||
TxtnSerieLote.Text = ""
|
||||
TxtObservacionesdetalle.Text = ""
|
||||
DdlSeccionAlmacen.SelectedValue = "-1"
|
||||
LkAgregarDetalle.Text = "Agregar"
|
||||
If DdlMonedaTC.SelectedValue.ToEntero = 2 Then
|
||||
VisualizaPUExtranjero(UsuarioActual.TienePermisoProceso(201))
|
||||
Else
|
||||
VisualizaPUExtranjero(False)
|
||||
End If
|
||||
|
||||
UpAgregar.Update()
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
@@ -160,8 +160,12 @@
|
||||
<asp:LinkButton ID="LnkReasignar" OnClick="LnkReasignar_Click" Visible="true" runat="server"><i class="fa fa-pencil"></i> Reasignar</asp:LinkButton></li>
|
||||
<li>
|
||||
<asp:LinkButton ID="LnkUpVinculo" OnClick="LnkUpVinculo_Click" Visible="false" runat="server"><i class="fa fa-pencil"></i> Agregar Vinculo</asp:LinkButton></li>
|
||||
|
||||
<li>
|
||||
<asp:LinkButton ID="LnkPDF" OnClick="LnkPDF_Click" runat="server"><i class="fa fa-file-pdf-o" style="font-weight:bold;"></i> PDF</asp:LinkButton></li>
|
||||
</ContentTemplate>
|
||||
<Triggers>
|
||||
<asp:PostBackTrigger ControlID="LnkPDF"/>
|
||||
</Triggers>
|
||||
</asp:UpdatePanel>
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content6" ContentPlaceHolderID="HA" runat="Server">
|
||||
|
||||
@@ -6,6 +6,8 @@ using System.Web;
|
||||
using System.Web.UI;
|
||||
using System.Web.UI.WebControls;
|
||||
using Extensiones;
|
||||
using System.IO;
|
||||
using Microsoft.Reporting.WebForms;
|
||||
|
||||
public partial class OI_TareaDetalle : ClsPaginas
|
||||
{
|
||||
@@ -47,6 +49,10 @@ public partial class OI_TareaDetalle : ClsPaginas
|
||||
public System.Data.DataTable CheckListNew { get { return ViewState["CheckListNew"] != null ? (System.Data.DataTable)ViewState["CheckListNew"] : null; } set { ViewState["CheckListNew"] = value; } }
|
||||
public int chklistitemindex { get { return ViewState["chklistitemindex"] != null ? ViewState["chklistitemindex"].ToString().ToEntero() : 0; } set { ViewState["chklistitemindex"] = value; } }
|
||||
|
||||
private string DeProp { get { return ViewState["DeProp"].ToString(); } set { ViewState["DeProp"] = value; } }
|
||||
private string ParaProp { get { return ViewState["ParaProp"].ToString(); } set { ViewState["ParaProp"] = value; } }
|
||||
private string CCProp { get { return ViewState["CCProp"].ToString(); } set { ViewState["CCProp"] = value; } }
|
||||
public System.Data.DataTable DtActividades { get { return ViewState["DtActividades"] != null ? (System.Data.DataTable)ViewState["DtActividades"] : null; } set { ViewState["DtActividades"] = value; } }
|
||||
#endregion
|
||||
protected void Page_Load(object sender, EventArgs e)
|
||||
{
|
||||
@@ -338,17 +344,20 @@ public partial class OI_TareaDetalle : ClsPaginas
|
||||
{
|
||||
chkpara.Checked = true;
|
||||
StrPara.AppendFormat("{3}<span class=\"linkCorreo\" data-toggle=\"tooltip\" title=\"{1}\">{2}\"{0}\"</span>", gvRow.DataKey("Nombre").ToString(), gvRow.DataKey("Correo").ToString(), palomitavisto, palomitasinver);
|
||||
ParaProp = gvRow.DataKey("Nombre").ToString();
|
||||
}
|
||||
if (CveUsuario == CveUsuarioDe)
|
||||
{
|
||||
chkCCpara.Checked = true;
|
||||
StrDeUser.AppendFormat("{3}<span class=\"linkCorreo\" data-toggle=\"tooltip\" title=\"{1}\">{2}\"{0}\"</span>", gvRow.DataKey("Nombre").ToString(), gvRow.DataKey("Correo").ToString(), palomitavisto, palomitasinver);
|
||||
DeProp = gvRow.DataKey("Nombre").ToString();
|
||||
}
|
||||
}
|
||||
else if (CveUsuario.Contiene(LCveUsuarioCCP.ToArray<int>()))
|
||||
{
|
||||
chkCCpara.Checked = true;
|
||||
StrCCPara.AppendFormat("{3}<span class=\"linkCorreo cssnowrap\" data-toggle=\"tooltip\" title=\"{1}\">{2}\"{0}\"</span>; ", gvRow.DataKey("Nombre").ToString(), gvRow.DataKey("Correo").ToString(), palomitavisto, palomitasinver);
|
||||
CCProp = gvRow.DataKey("Nombre").ToString();
|
||||
}
|
||||
}
|
||||
}
|
||||
@@ -822,6 +831,7 @@ public partial class OI_TareaDetalle : ClsPaginas
|
||||
if (ObjOI.GetEventosComentarios(RCveEvento))
|
||||
{
|
||||
GvActividades.DataSource = ObjOI.DtResultados;
|
||||
DtActividades = ObjOI.DtResultados;
|
||||
}
|
||||
GvActividades.DataBind();
|
||||
UpActividades.Update();
|
||||
@@ -1794,5 +1804,36 @@ public partial class OI_TareaDetalle : ClsPaginas
|
||||
{
|
||||
|
||||
}
|
||||
|
||||
protected void LnkPDF_Click(object sender, EventArgs e)
|
||||
{
|
||||
FileInfo Imagen = new FileInfo(String.Format("{0}/Logo.png", UsuarioActual.Empresa.Ruta));
|
||||
string logouri = String.Format("{0}://{1}:{2}/Empresas/{3}/Logo.png", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, UsuarioActual.CveEmpresa);
|
||||
|
||||
List<ReportParameter> param = new List<ReportParameter>();
|
||||
if (Imagen.Exists)
|
||||
{
|
||||
param.Add(new ReportParameter("Logo",logouri));
|
||||
}else
|
||||
{
|
||||
param.Add(new ReportParameter("Logo", ""));
|
||||
}
|
||||
param.Add(new ReportParameter("NombreEmpresa",UsuarioActual.Empresa.Empresa));
|
||||
param.Add(new ReportParameter("Asunto",TxtAsunto.Text));
|
||||
param.Add(new ReportParameter("Descripcion",TxtDescripcion.Text));
|
||||
param.Add(new ReportParameter("De",DeProp));
|
||||
param.Add(new ReportParameter("Para",ParaProp));
|
||||
param.Add(new ReportParameter("CCPara",CCProp));
|
||||
param.Add(new ReportParameter("FechaInicio",txtFechaI.Text));
|
||||
param.Add(new ReportParameter("FechaFin",txtFechaF.Text));
|
||||
param.Add(new ReportParameter("Prioridad",DdlPrioridad.SelectedItem.Text));
|
||||
param.Add(new ReportParameter("Tema",DdlTema.SelectedItem.Text));
|
||||
param.Add(new ReportParameter("Estatus",lblEstatus.Text));
|
||||
param.Add(new ReportParameter("FechaRegistro",TxtFechaIng.Text));
|
||||
param.Add(new ReportParameter("Registro",TxtUsuarioreg.Text));
|
||||
param.Add(new ReportParameter("UsuarioImprimio",UsuarioActual.Nombre));
|
||||
|
||||
ImprimirPDF("Empresas/Grales/Formatos/TareaDetalle.rdlc",DtActividades,param,"Tarea Detalle");
|
||||
}
|
||||
}
|
||||
|
||||
@@ -291,6 +291,17 @@
|
||||
</Triggers>
|
||||
</asp:UpdatePanel>
|
||||
|
||||
<asp:UpdatePanel runat="server" ID="UpReporteGpsExcel" RenderMode="Inline" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
<li>
|
||||
<asp:LinkButton ID="LnkReporteExcel" Visible="False" OnClick="GenerarReporteExcel" data-toggle="tooltip" data-placement="left" runat="server" Text="<i class='fa fa-file-excel-o'></i> Dispositivos GPS"></asp:LinkButton>
|
||||
</li>
|
||||
</ContentTemplate>
|
||||
<Triggers>
|
||||
<asp:PostBackTrigger ControlID="LnkReporteExcel" />
|
||||
</Triggers>
|
||||
</asp:UpdatePanel>
|
||||
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content2" ContentPlaceHolderID="E" runat="Server">
|
||||
<asp:Literal ID="LtlTitulo" runat="server" Text="Registro de Clientes"></asp:Literal> <asp:Literal ID="LtlCliente" runat="server"></asp:Literal>
|
||||
@@ -494,7 +505,7 @@
|
||||
<div class="form-group form-md-line-input">
|
||||
<asp:TextBox ID="TxtTelefonoOtro" CssClass="form-control" runat="server" MaxLength="150"></asp:TextBox>
|
||||
<ajax:MaskedEditExtender ID="MaskedEditExtender3" runat="server" TargetControlID="TxtTelefonoOtro" ClearMaskOnLostFocus="false" MaskType="None" Mask="(999) 999-9999" MessageValidatorTip="true" InputDirection="LeftToRight" ErrorTooltipEnabled="True"></ajax:MaskedEditExtender>
|
||||
<label for="<%= TxtTelefonoOtro.ClientID.ToString()%>">Telefono Otro: </label>
|
||||
<label for="<%= TxtTelefonoOtro.ClientID.ToString()%>">Teléfono Otro: </label>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
@@ -1348,7 +1359,7 @@
|
||||
<div class="portlet-body ">
|
||||
<div class="table-scrollable">
|
||||
|
||||
<asp:GridView ID="GvCot" GridLines="None" CssClass="table table-striped table-advance table-hover widthAll" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontraron Ventas en el Cliente" ToolTip="Listado de Historial de Ventas">
|
||||
<asp:GridView ID="GvCot" GridLines="None" CssClass="table table-striped table-advance table-hover widthAll" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontraron cotizaciones del Cliente" ToolTip="Listado de Historial de Ventas" Style="text-align: center; min-width: 783px; width: 100%;">
|
||||
<Columns>
|
||||
<asp:TemplateField>
|
||||
<HeaderTemplate>Cotización</HeaderTemplate>
|
||||
@@ -1477,7 +1488,7 @@
|
||||
<div class="row">
|
||||
<div class="col-md-6">
|
||||
<div class="form-group form-md-line-input">
|
||||
<asp:Label ID="LblDiasPago" runat="server" Text="Dias de pago:"></asp:Label>
|
||||
<asp:Label ID="LblDiasPago" runat="server" Text="Días de pago:"></asp:Label>
|
||||
<br />
|
||||
<label><b>L</b></label>
|
||||
|
||||
@@ -1511,7 +1522,7 @@
|
||||
<div class="col-md-6" style="margin-top: 10px;">
|
||||
<div class="form-group form-md-line-input">
|
||||
<asp:TextBox ID="TxtDiasEspecifico" runat="server" CssClass="form-control" Enabled="false"></asp:TextBox>
|
||||
<label for="<%= TxtDiasEspecifico.ClientID.ToString()%>">Dias específicos: </label>
|
||||
<label for="<%= TxtDiasEspecifico.ClientID.ToString()%>">Días específicos: </label>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
@@ -2051,7 +2062,7 @@
|
||||
</div>
|
||||
<div class="portlet-body">
|
||||
<div class="table-scrollable">
|
||||
<asp:GridView ID="GVAnticipos" runat="server" ClientIDMode="Static" AutoGenerateColumns="False" EmptyDataText="No se encontraron Anticipos del Cliente" ToolTip="Listado de Anticipos" CssClass="GVAnticipos table table-striped table-hover Widthall mysmallbtn" GridLines="None" DataKeyNames="ISTotal,Saldo,Total,CveIE,Folio,Tipo,CveVenta,CveConceptoContable">
|
||||
<asp:GridView ID="GVAnticipos" runat="server" ClientIDMode="Static" AutoGenerateColumns="False" EmptyDataText="No se encontraron Anticipos del Cliente" ToolTip="Listado de Anticipos" CssClass="GVAnticipos table table-striped table-hover Widthall mysmallbtn" GridLines="None" DataKeyNames="ISTotal,Saldo,Total,CveIE,Folio,Tipo,CveVenta,CveConceptoContable" Style="text-align: center; min-width: 783px; width: 100%;">
|
||||
<Columns>
|
||||
<asp:TemplateField HeaderText="Folio" ItemStyle-HorizontalAlign="Center">
|
||||
<ItemTemplate>
|
||||
@@ -2107,7 +2118,7 @@
|
||||
</div>
|
||||
<div class="portlet-body">
|
||||
<div class="table-scrollable">
|
||||
<asp:GridView ID="GVAnticiposHistorial" ClientIDMode="Static" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontraron Anticipos del Cliente Historial" ToolTip="Listado de Anticipos Historial" CssClass="GVAnticipos table table-striped table-hover Widthall" Style="text-align: center;" GridLines="None" DataKeyNames="ISTotal,Saldo,CveIE,Folio,Total,Tipo,CveVenta,CveConceptoContable">
|
||||
<asp:GridView ID="GVAnticiposHistorial" ClientIDMode="Static" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontró historial en los anticipos del cliente" ToolTip="Listado de Anticipos Historial" CssClass="GVAnticipos table table-striped table-hover Widthall" Style="text-align: center;" GridLines="None" DataKeyNames="ISTotal,Saldo,CveIE,Folio,Total,Tipo,CveVenta,CveConceptoContable">
|
||||
<Columns>
|
||||
<asp:TemplateField HeaderText="Folio" ItemStyle-HorizontalAlign="Center">
|
||||
<ItemTemplate>
|
||||
|
||||
@@ -18,7 +18,7 @@ Partial Class Clientes
|
||||
Private Opcion As Integer
|
||||
<PersistenceModeAttribute(PersistenceMode.InnerProperty)>
|
||||
Public ReadOnly Property RowStyle As TableItemStyle
|
||||
Protected ReadOnly Property CveCliente As Integer
|
||||
Private ReadOnly Property CveCliente As Integer
|
||||
Get
|
||||
Return ViewState("CveCliente").ToString.ToEntero
|
||||
End Get
|
||||
@@ -677,6 +677,7 @@ Partial Class Clientes
|
||||
TabOtros.Visible = False
|
||||
TabCuentasEquipos.Visible = True
|
||||
ReporteDispositivos.Visible = True
|
||||
LnkReporteExcel.Visible = True
|
||||
TabCuentasEquipos.HeaderText = "Equipos GPS"
|
||||
TabRH.Visible = False
|
||||
TabUsuarios.Visible = True
|
||||
@@ -848,6 +849,7 @@ Partial Class Clientes
|
||||
|
||||
'PERMISOS PAGINA
|
||||
If CveCliente > 0 Then
|
||||
LtlTareaNueva.Text = String.Format("<a class=""caption-subject bold font-green"" onclick=""OpenModalNewTareaUserControl(1,-1,{{CveCliente:{0}}});""> <i class=""fa fa-plus""'></i> Tarea</a>", CveCliente)
|
||||
BtnEliminar.Visible = PermiteEliminar()
|
||||
BtnGuardar.Visible = PermiteEditar()
|
||||
Else
|
||||
@@ -1699,9 +1701,9 @@ Partial Class Clientes
|
||||
|
||||
Return Retorno
|
||||
End Function
|
||||
Private Sub CargaHistorial(Optional SelectTop As Integer = 21, Optional CveClienteSucursal As Integer = -1, Optional TipoDocto As String = "-1")
|
||||
Private Sub CargaHistorial(Optional SelectTop As Integer = 21, Optional CveClienteSucursal As Integer = -1)
|
||||
Dim ObjClientes As New ClsClientes()
|
||||
If ObjClientes.GetHistorialVentas(CveCliente, SelectTop, CveClienteSucursal:=DdlSucursalCliente.SelectedValue.ToEntero, TipoDocto:=TipoDocto) Then
|
||||
If ObjClientes.GetHistorialVentas(CveCliente, SelectTop, CveClienteSucursal:=DdlSucursalCliente.SelectedValue.ToEntero) Then
|
||||
If ObjClientes.DtResultados.Rows.Count > 0 Then
|
||||
'Carga Generales
|
||||
LtlCantidad.Text = ObjClientes.DtResultados.Rows(0)("CountTotal").ToString.FormatoNumero(0)
|
||||
@@ -1895,12 +1897,13 @@ Partial Class Clientes
|
||||
|
||||
Protected Sub BtnVerMasVentas_Click(sender As Object, e As EventArgs)
|
||||
If BtnVerMasVentas.Text = "Ver Más" Then
|
||||
CargaHistorial(-1, TipoDocto:=RblTipo.SelectedValue)
|
||||
CargaHistorial(-1)
|
||||
BtnVerMasVentas.Text = "Ver Menos"
|
||||
Else
|
||||
CargaHistorial(21, TipoDocto:=RblTipo.SelectedValue)
|
||||
CargaHistorial(21)
|
||||
BtnVerMasVentas.Text = "Ver Más"
|
||||
End If
|
||||
RblTipo_SelectedIndexChanged(RblTipo, EventArgs.Empty)
|
||||
End Sub
|
||||
|
||||
Protected Sub BtnVerMasAnticipos_Click(sender As Object, e As EventArgs)
|
||||
@@ -3733,22 +3736,33 @@ Partial Class Clientes
|
||||
End Sub
|
||||
|
||||
Protected Sub GenerarReporte(sender As Object, e As EventArgs)
|
||||
GenerarRepCrystal()
|
||||
GenerarRepCrystal("PDF")
|
||||
End Sub
|
||||
Private Sub GenerarRepCrystal()
|
||||
Dim Archivo As New FileInfo(Server.MapPath("~/Empresas/Grales/Formatos/EquiposGPS.rpt"))
|
||||
Dim lista = New List(Of CrystalParametro)
|
||||
lista.Add(New CrystalParametro("NombreEmpresa", UsuarioActual.Empresa.Empresa))
|
||||
lista.Add(New CrystalParametro("NombreUsuario", UsuarioActual.Nombre))
|
||||
|
||||
Protected Sub GenerarReporteExcel(sender As Object, e As EventArgs)
|
||||
GenerarRepCrystal("Excel")
|
||||
End Sub
|
||||
|
||||
Private Sub GenerarRepCrystal(Formato As String)
|
||||
Dim Imagen As New System.IO.FileInfo(String.Format("{0}/Logo.png", UsuarioActual.Empresa.Ruta))
|
||||
Dim logouri = String.Format("{0}://{1}:{2}/Empresas/{3}/Logo.png", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, UsuarioActual.CveEmpresa)
|
||||
|
||||
Dim params As New List(Of ReportParameter)
|
||||
If Imagen.Exists Then
|
||||
params.Add(New ReportParameter("LogoPath", logouri))
|
||||
Else
|
||||
params.Add(New ReportParameter("LogoPath", ""))
|
||||
End If
|
||||
params.Add(New ReportParameter("NombreEmpresa", UsuarioActual.Empresa.Empresa))
|
||||
params.Add(New ReportParameter("NombreUsuario", UsuarioActual.Usuario))
|
||||
params.Add(New ReportParameter("UsuarioImprimio", UsuarioActual.Usuario))
|
||||
|
||||
Dim ObjGPS As New ClsGPS
|
||||
Dim tablaReporte As DataTable
|
||||
If ObjGPS.DispositivosGet(-1, Estatus, CveCliente) Then
|
||||
If ObjGPS.DispositivosGet(-1, DdlEstatusDispositivos.SelectedValue.ToEntero(), CveCliente) Then
|
||||
tablaReporte = ObjGPS.DtResultados
|
||||
Dim VistaFiltro As DataView = New DataView(tablaReporte)
|
||||
Dim reporteDatos As DataTable = VistaFiltro.ToTable("Selected", False, "TipoDispositivoDisplay", "Display", "Modelo", "Serie", "IMEI", "NumeroTelefono", "FechaIng")
|
||||
Dim file As Byte() = ImprimirPDFCrystal(Server.MapPath("~/Empresas/Grales/Formatos/EquiposGPS.rpt"), reporteDatos, lista)
|
||||
ImprimirbytesPDF(file)
|
||||
|
||||
ImprimirPDF("Empresas/Grales/Formatos/EquiposGPS.rdlc", tablaReporte, params, "Equipo GPS", Formato)
|
||||
Else
|
||||
Alert("No hay lista de dispositivos para imprimir")
|
||||
End If
|
||||
@@ -5427,7 +5441,26 @@ Partial Class Clientes
|
||||
|
||||
#Region "M E T O D O S "
|
||||
Protected Sub RblTipo_SelectedIndexChanged(sender As Object, e As EventArgs) Handles RblTipo.SelectedIndexChanged
|
||||
CargaHistorial(TipoDocto:=RblTipo.SelectedValue)
|
||||
If DTHistorialVentas IsNot Nothing AndAlso RblTipo.SelectedValue <> "-1" Then
|
||||
|
||||
Dim tmp As DataTable = DTHistorialVentas.FiltraParametros($"TipoDocto = '{RblTipo.SelectedValue}'")
|
||||
If tmp.Rows.Count > 0 Then
|
||||
Dim Totales As DataRow = tmp.NewRow
|
||||
Totales("SubTotal") = tmp.SUM("SubTotal")
|
||||
Totales("Total") = tmp.SUM("Total")
|
||||
Totales("Descuento") = tmp.SUM("Descuento")
|
||||
Totales("Amortizacion") = tmp.SUM("Amortizacion")
|
||||
Totales("MAX_Total") = tmp.MAX("MAX_Total")
|
||||
Totales("AVG_Total") = tmp.AVG("AVG_Total")
|
||||
Totales("MIN_Total") = tmp.MIN("MIN_Total")
|
||||
Totales("CountTotal") = tmp.COUNT("CountTotal")
|
||||
tmp.Rows.InsertAt(Totales, 0)
|
||||
End If
|
||||
GVHistorial.DataSource = tmp
|
||||
ElseIf DTHistorialVentas IsNot Nothing AndAlso RblTipo.SelectedValue = "-1" Then
|
||||
GVHistorial.DataSource = DTHistorialVentas
|
||||
End If
|
||||
GVHistorial.DataBind()
|
||||
End Sub
|
||||
Private Sub DdlSucursalCliente_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DdlSucursalCliente.SelectedIndexChanged
|
||||
CargaCotizaciones(CveClienteSucursal:=DdlSucursalCliente.SelectedValue.ToEntero) 'listo
|
||||
|
||||
Reference in New Issue
Block a user