This commit is contained in:
Oscar Irigoyen
2022-09-29 06:29:02 -07:00
6 changed files with 724 additions and 676 deletions

View File

@@ -8591,19 +8591,18 @@ Partial Class Compras_Compras
End If
End If
'VALIDA IMPORTES
If CveFactura > 0 Then 'SI NO VIENE DE FACTURA/XML NO VALIDA TOTALES
If Not ValidaTotalesGuardar() Then
Exit Sub
End If
End If
If DdlRembolsoCajaChica.SelectedValue.ToEntero() > 0 AndAlso DdlRembolsoPersonal.SelectedValue.ToEntero() > 0 Then
Alert("No se puede tener seleccionada una 'Caja Chica' y 'Personal/Empleado' a la vez", TipoMensaje.MsgAdvertencia)
Exit Sub
End If
For Each Row As DataRow In TmpDT.Rows
If Row("CveSubProyecto").ToString.ToEntero <= 0 Then
Alert("No se ha completado la asignacion de proyectos en la compra. ", TipoMensaje.MsgAdvertencia)
@@ -11968,13 +11967,15 @@ Partial Class Compras_Compras
Protected Sub RblRembolso_SelectedIndexChanged(sender As Object, e As EventArgs)
TrRembolsoCajaChica.Visible = False
TrRembolsoPersonal.Visible = False
DdlRembolsoCajaChica.SelectedValueExist("-1")
DdlRembolsoPersonal.SelectedValueExist("-1")
DdlRembolsoCajaChica.SelectedValueExistInsert("-1", "Seleccione")
DdlRembolsoPersonal.SelectedValueExistInsert("-1", "Seleccione")
If RblRembolso.SelectedValue.ToEntero = 1 Then
TrRembolsoPersonal.Visible = True
ElseIf RblRembolso.SelectedValue.ToEntero = 2 Then
TrRembolsoCajaChica.Visible = True
End If
UPCondicionesPago.Update()
End Sub
#End Region

View File

@@ -358,8 +358,8 @@
<div class="col-md-2">
<asp:DropDownList ID="DdlTieneLineaAdicional" runat="server" AppendDataBoundItems="true" Class="table-group-action-input form-control input-inline input-small input-sm select2me">
<asp:ListItem Selected="True" Text="Todas" Value="-1"></asp:ListItem>
<asp:ListItem Text="Si" Value="1"></asp:ListItem>
<asp:ListItem Text="No" Value="0"></asp:ListItem>
<asp:ListItem Text="Solo lineas adicionales" Value="1"></asp:ListItem>
<asp:ListItem Text="Sin lineas adicionales" Value="0"></asp:ListItem>
</asp:DropDownList>
</div>
</div>

View File

@@ -14,9 +14,9 @@
text-overflow: ellipsis;
}
.select2 .select2-selection__rendered{
line-height:1;
color:#111;
.select2 .select2-selection__rendered {
line-height: 1;
color: #111;
}
.select2 .select2-selection--multiple {
@@ -82,6 +82,7 @@
<div class="row">
<div class="col-md-1 truncate">
Cliente:
</div>
<div class="col-md-2" id="DivClientes" runat="server">
<ADS:Dropdownlost CssClassDdl="select2me" ID="DdlClientesWS" Width="100%" data-metodo="getcliente" runat="server" DataTextField="NombreComercial" DataValueField="CveCliente" CssStyle="width: 100%;"></ADS:Dropdownlost>
@@ -96,6 +97,7 @@
<div class="col-md-1 truncate">
Sucursal:
</div>
<div class="col-md-2 ">
<asp:DropDownList ID="DdlSubProyecto" runat="server" AppendDataBoundItems="true" DataTextField="SubProyecto" DataValueField="CveSubProyecto" CssClass="form-control input-small input-sm select2me" Width="100%">
@@ -104,6 +106,7 @@
</div>
<div class="col-md-1 truncate">
Grupo:
</div>
<div class="col-md-2 truncate">
<asp:DropDownList ID="DdlGrupo" runat="server" CssClass="form-control input-small input-sm select2me" Style="max-width: 100px">
@@ -128,6 +131,7 @@
<div class="row">
<div class="col-md-1 truncate">
Vendedor:
</div>
<div class="col-md-2 ">
<asp:DropDownList ID="DdlVendedor" runat="server" AppendDataBoundItems="true" DataTextField="Vendedor" DataValueField="CveVendedor" CssClass="form-control input-small input-sm select2me" Width="100%">
@@ -136,6 +140,7 @@
</div>
<div class="col-md-1 truncate" title="Fecha Inicio Documento" data-toggle="tooltip" data-placement="top">
Fecha Inicio Docto:
</div>
<div class="col-md-2">
<div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 100px !important; padding: 0px;">
@@ -153,6 +158,7 @@
</div>
<div class="col-md-1 truncate" title="Fecha Fin Documento" data-toggle="tooltip" data-placement="top">
Fecha Fin Docto:
</div>
<div class="col-md-2">
<div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 100px !important; padding: 0px;">
@@ -173,6 +179,7 @@
<div class="row">
<div class="col-md-1 truncate">
Registró:
</div>
<div class="col-md-2 ">
<asp:DropDownList ID="DdlUsuario" runat="server" AppendDataBoundItems="true" DataTextField="Usuario" DataValueField="CveUsuario" CssClass="form-control input-small input-sm select2me" Width="100%">
@@ -181,6 +188,7 @@
</div>
<div class="col-md-1 truncate">
Responsable:
</div>
<div class="col-md-2 ">
<asp:DropDownList ID="DdlResponsable" runat="server" AppendDataBoundItems="true" DataTextField="Usuario" DataValueField="CveUsuario" CssClass="form-control input-small input-sm select2me" Width="100%">
@@ -190,6 +198,7 @@
<div class="col-md-1 truncate">
Tipo Docto:
</div>
<div class="col-md-2 ">
<asp:ListBox ID="DdlTipoDocto" SelectionMode="Multiple" CssClass="form-control ddlFiltros input-sm select2me Widthall" Style="width: 100%;" runat="server">
@@ -210,6 +219,7 @@
<div class="col-md-1 truncate">
Estatus Cobranza:
</div>
<div class="col-md-2">
<asp:DropDownList ID="DdlCobranzaEstatusFiltro" AppendDataBoundItems="true" DataValueField="CveCobranzaEstatus" DataTextField="CobranzaEstatus" runat="server" CssClass="form-control select2me">
@@ -224,6 +234,7 @@
<div class="row">
<div class="col-md-1 truncate" data-toggle="tooltip" title="Fecha Vencimiento Inicial">
Fecha Venc. Inicial:
</div>
<div class="col-md-2">
<div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 100px !important; padding: 0px;">
@@ -241,6 +252,7 @@
</div>
<div class="col-md-1 truncate" data-toggle="tooltip" title="Fecha Vencimiento Final">
Fecha Venc. Final:
</div>
<div class="col-md-2">
<div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 100px !important; padding: 0px;">
@@ -259,6 +271,7 @@
<div class="col-md-1 truncate">
Corte A:
</div>
<div class="col-md-2">
@@ -277,8 +290,9 @@
</div>
<div class="col-md-1 truncate">
<div class="col-md-1 truncate">
Estatus Cliente:
</div>
<div class="col-md-2">
<asp:DropDownList ID="DdlEstatusCliente" runat="server" AppendDataBoundItems="true" CssClass="form-control input-small input-sm select2me" Width="100%">
@@ -291,9 +305,10 @@
</div>
<div class="row">
<div class="col-md-1 truncate" title="Clasificación Cliente" data-toggle="tooltip" data-placement="top" >
<div class="row">
<div class="col-md-1 truncate" title="Clasificación Cliente" data-toggle="tooltip" data-placement="top">
Clasificación Cliente:
</div>
<div class="col-md-2">
<asp:DropDownList ID="DdlClienteClasificacion" AutoPostBack="true" OnSelectedIndexChanged="DdlClienteClasificacion_SelectedIndexChanged" runat="server" AppendDataBoundItems="true" CssClass="form-control input-small input-sm select2me" Width="100%" DataTextField="ClienteClasificacion" DataValueField="CveClienteClasificacion"></asp:DropDownList>
@@ -302,6 +317,7 @@
<div class="col-md-1 truncate" title="Tipo Cliente:" data-toggle="tooltip" data-placement="top">
Tipo Cliente:
</div>
<div class="col-md-2">
@@ -314,22 +330,23 @@
<div class="col-md-2">
<asp:CheckBox ID="ChkAnticipos" runat="server" Text="Incluye Anticipos" TextAlign="Left" Checked="true" Visible="false" />
</div>
</div>
<div class="row">
<div class="col-md-1 truncate" title="Tipo Cliente:" data-toggle="tooltip" data-placement="top">
Linea Adicional:
</div>
<div class="col-md-2">
<asp:DropDownList ID="DdlTieneLineaAdicional" runat="server" AppendDataBoundItems="true" Class="table-group-action-input form-control input-inline input-small input-sm select2me">
<asp:ListItem Selected="True" Text="Todas" Value="-1"></asp:ListItem>
<asp:ListItem Text="Si" Value="1"></asp:ListItem>
<asp:ListItem Text="No" Value="0"></asp:ListItem>
</asp:DropDownList>
</div>
</div>
</div>
<div class="row">
<div class="col-md-1 truncate" title="Tipo Cliente:" data-toggle="tooltip" data-placement="top">
Linea Adicional:
</div>
<div class="col-md-2">
<asp:DropDownList ID="DdlTieneLineaAdicional" runat="server" AppendDataBoundItems="true" Class="table-group-action-input form-control input-inline input-small input-sm select2me">
<asp:ListItem Selected="True" Text="Todas" Value="-1"></asp:ListItem>
<asp:ListItem Text="Solo lineas adicionales" Value="1"></asp:ListItem>
<asp:ListItem Text="Sin lineas adicionales" Value="0"></asp:ListItem>
</asp:DropDownList>
</div>
</div>
</div>
</div>
@@ -337,7 +354,7 @@
</asp:UpdatePanel>
<asp:UpdatePanel ID="UpCartera" runat="server" UpdateMode="Conditional">
<asp:UpdatePanel ID="UpCartera" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<div class="row">
<div class="col-md-6" runat="server" id="DVCartera" visible="false">
@@ -349,7 +366,7 @@
<asp:BoundField HeaderText="Rango Días" DataField="Rango" ItemStyle-Width="80px" />
<asp:BoundField HeaderText="Importe" DataField="Saldo" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-Width="150px" />
<asp:BoundField HeaderText="%" DataField="Porcentaje" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-Width="80px" />
<asp:BoundField HeaderText="Objetivo" DataField="Objetivo" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-Width="80px" />
<asp:BoundField HeaderText="Objetivo" DataField="Objetivo" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-Width="80px" />
</Columns>
</asp:GridView>
</div>
@@ -361,10 +378,10 @@
<asp:UpdatePanel ID="UpCobranza" UpdateMode="Conditional" runat="server">
<ContentTemplate>
<div class="row">
<div class="col-md-12" style="text-align:right">
<div class="col-md-12" style="text-align: right">
<input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvDatos.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvDatos.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
<input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvDatos.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvDatos.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
</div>
<div class="col-md-offset-8" style="width: 300px;">
@@ -480,7 +497,7 @@
<asp:BoundField HeaderText="RetISR" DataField="RetISR" DataFormatString="{0:N2}" Visible="false" ItemStyle-HorizontalAlign="Right" />
<asp:BoundField HeaderText="Total" DataField="Total" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" />
<asp:BoundField HeaderText="Saldo" DataField="Saldo" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" />
<asp:BoundField HeaderText="Mon" DataField="Moneda"/>
<asp:BoundField HeaderText="Mon" DataField="Moneda" />
<asp:BoundField HeaderText="Sucursal Venta" DataField="SubProyecto" DataFormatString="{0}" />
<asp:BoundField HeaderText="Fecha Venc." DataField="FechaVencimiento" DataFormatString="{0:d}" ItemStyle-HorizontalAlign="Center" />
<asp:BoundField HeaderText="Días Venc." DataField="DiasVencidos" DataFormatString="{0:N0}" ItemStyle-HorizontalAlign="Right" />
@@ -621,7 +638,6 @@
<td style="text-align: left;">
<asp:CheckBox ID="ChkCuentaContableReferencia" runat="server" Text="&nbsp;CuentaContableReferencia" Visible="False" /></td>
<td style="text-align: left;">
</tr>
<tr>
<td style="text-align: left;">
@@ -629,11 +645,12 @@
<td style="text-align: left;">
<asp:CheckBox ID="ChkSeTimbro" runat="server" Text="&nbsp;Se Timbró" /></td>
<td style="text-align: left;">
<asp:CheckBox ID="ChkFechaCobranza" runat="server" Text="&nbsp;Fecha Cobranza" Checked="true" /> </td>
<asp:CheckBox ID="ChkFechaCobranza" runat="server" Text="&nbsp;Fecha Cobranza" Checked="true" />
</td>
<td style="text-align: left;">
<asp:CheckBox ID="ChkDiasTranscurridos" runat="server" Text="&nbsp;Días Transcurridos" /></td>
</tr>
<tr>
<tr>
<td style="text-align: left;">
<asp:CheckBox ID="ChkHorario" runat="server" Text="&nbsp;Horario" Checked="false" /></td>
<td style="text-align: left;">
@@ -641,7 +658,7 @@
<td style="text-align: left;">
<asp:CheckBox ID="ChkFechaEjecucion" runat="server" Text="&nbsp;Fecha Ejecución" /></td>
<td style="text-align: left;">
<asp:CheckBox ID="ChkTC" runat="server" Text="&nbsp;Tipo Cambio" /></td>
<asp:CheckBox ID="ChkTC" runat="server" Text="&nbsp;Tipo Cambio" /></td>
</tr>
@@ -683,7 +700,8 @@
<div class="row" style="margin-left: 10px;" runat="server" id="LiEspecifico" visible="false">
Especifico:
<asp:TextBox ID="TxtEspecifico" runat="server" Width="55px" />
<asp:TextBox ID="TxtEspecifico" runat="server" Width="55px" />
</div>
</ContentTemplate>
</asp:UpdatePanel>

View File

@@ -2037,7 +2037,13 @@ Partial Class Inventarios_RecepcionUsados
End Sub
Private Sub CambiaCliente(Optional CargaSucursales As Boolean = True, Optional CargaFacturas As Boolean = True)
If DdlClientes.SelectedValue.ToEntero > 0 Then
Me.EsDistribuidor = CBool(GlobalDTCliente(UsuarioActual.CveEmpresa, CveCliente:=DdlClientes.SelectedValue.ToEntero(), Estatus:=-1).FiltroPrimeroValor("EsDistribuidor", ""))
Dim strDistribuidor = GlobalDTCliente(UsuarioActual.CveEmpresa, CveCliente:=DdlClientes.SelectedValue.ToEntero(), Estatus:=-1).FiltroPrimeroValor("EsDistribuidor", "")
If String.IsNullOrEmpty(strDistribuidor) Then
strDistribuidor = "False"
End If
Me.EsDistribuidor = CBool(strDistribuidor)
If CargaSucursales Then
DivClienteSucursal.Visible = False
DdlClientesSucursales.Items.Clear()

View File

@@ -1818,6 +1818,29 @@ Partial Class PV
imgCalendario.Enabled = True
End Sub
Private Sub BtnPermisoEditarRemision_Click(sender As Object, e As EventArgs) Handles BtnPermisoEditarRemision.Click
Dim TieneInventario As Boolean = False
Dim TieneErrorInv As Boolean = False
Using ObjInv As New ClsInventarios
If ObjInv.GetInv_Mov(Me.CveVenta, UsuarioActual.CveEmpresa) Then
If ObjInv.DtResultados.Rows.Count > 0 Then
TieneInventario = True
End If
Else
TieneErrorInv = True
End If
End Using
If TieneInventario Then
Alert("La remisión no se puede editar porque ya tiene un movimiento de almacen.", TipoMensaje.MsgAdvertencia)
Exit Sub
End If
If TieneErrorInv Then
Alert("No se pudo comprobar el inventario de la remisión", TipoMensaje.MsgError)
Exit Sub
End If
HabilitarEdicion()
BtnPermisoEditarRemision.Visible = False
BtnEditarRemision.Visible = True

View File

@@ -18071,7 +18071,7 @@ Partial Class Ventas
End Sub
Private Sub CalculaLineasAdicionales()
If DdlTipoComprobante.SelectedValue = "Ing" AndAlso UsuarioActual.Empresa.Funcionalidad(705) = "1" Then
If DdlTipoComprobante.SelectedValue.Contiene("Ing", "Rem") AndAlso UsuarioActual.Empresa.Funcionalidad(705) = "1" Then
DdlLineaAdicional.DataSource = Nothing
Using ObjVentas As New ClsVentas