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

RepCxc, RepCxp , Periodo, clientes, provedeedores dropdown lost

Browse Source
This commit is contained in:
rakcsle
2022-04-19 08:37:39 -07:00
parent 837db51595
commit c2b2c8a6ea
9 changed files with 126 additions and 30 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
App_Code/ClsContPAQi.vb
View File

@@ -1162,6 +1162,8 @@ Public Class ClsContPAQi
StrSQL.AppendLine("")
StrSQL.AppendLine(" BEGIN TRY")
StrSQL.AppendLine("")
StrSQL.AppendLine(" SET ARITHABORT ON; ")
StrSQL.AppendLine("")
StrSQL.AppendLine(" CREATE TABLE #TablaContable (")
StrSQL.AppendLine(" Id INT,")
StrSQL.AppendLine(" IdPoliza INT,")

4
Ashx/SIGWeb.ashx
View File

@@ -761,6 +761,8 @@ Public Class SIGWeb : Implements IHttpHandler, IRequiresSessionState
Dim EsDistribuidor As Integer = IfNull(context.Request("esdistribuidor"), "-1").ToString.ToEntero
Dim cveclienteclasificacion = IfNull(context.Request("cveclienteclasificacion"), "-1").ToString.ToEntero
Dim usuario As Usuario = UsuarioActual(context)
Dim CveEmpresa As String
If IsNothing(usuario) Then
@@ -772,7 +774,7 @@ Public Class SIGWeb : Implements IHttpHandler, IRequiresSessionState
'sino existe, recarga los datos
If context.Application(AppNombre) Is Nothing Then
Dim ObjClientes As New ClsClientes
If ObjClientes.GetClientes(-1, "-1", "-1", "-1", "-1", "-1", "-1", -1, CveEmpresa, Estatus:=-1) Then
If ObjClientes.GetClientes(-1, "-1", "-1", "-1", "-1", "-1", "-1", -1, CveEmpresa, Estatus:=-1, CveClienteClasificacion:=cveclienteclasificacion) Then
context.Application(AppNombre) = ObjClientes.DtResultados
End If
ObjClientes.Dispose()

41
Compras/Compras.aspx.vb
View File

@@ -3381,6 +3381,47 @@ Partial Class Compras_Compras
DdlRetIVAConcepto.SelectedValueExist("2") ' flete pf
DdlRetIVAConcepto.SelectedValueExist("3") ' fletes pm
DdlRetISRConcepto.SelectedValueExist("1") ' honorarios
ElseIf ObjProveedor.DIOTCveTipoOperacion = 0 Then
If CveFactura > 0 Then
If RetIVAOriginal > 0 Then
Dim CalRetIVAPor As Decimal = (RetIVAOriginal * 1 / SubTotal2Original).RoundAD(6).ToDecimal
If (CalRetIVAPor).RoundAD(6) = 0.106667 Then
DdlRetIVAConcepto.SelectedValueExist("1") '10.66 servicios profecionales
End If
If (CalRetIVAPor).RoundAD(2) = 0.04 Then '4 Fletes
If RFCProv.Length = 13 Then
DdlRetIVAConcepto.SelectedValueExist("2")
Else
DdlRetIVAConcepto.SelectedValueExist("3")
End If
End If
End If
If RetISROriginal > 0 Then
Dim CalRetISRPor As Decimal = (RetISROriginal * 1 / SubTotal2Original).RoundAD(5).ToDecimal
If (CalRetISRPor).RoundAD(1) = 0.1 Then '10 Sercviios profecionales
DdlRetISRConcepto.SelectedValueExist("1")
End If
If (CalRetISRPor).RoundAD(4) = 0.0125 Then '1.25 Recico regimen simplificado confianza
DdlRetISRConcepto.SelectedValueExist("3")
End If
End If
End If
End If
LbAgregar.Enabled = True

4
Compras/RepCxPPeriodo.aspx
View File

@@ -48,9 +48,7 @@
<div class="row text-size-12">
<div class="col-md-1"><span>Proveedor: </span></div>
<div class="col-md-1">
<asp:DropDownList ID="DdlProveedor" runat="server" CssClass="select2me" AppendDataBoundItems="true" DataTextField="RazonSocial" DataValueField="CveProveedor" Width="100%">
<asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
</asp:DropDownList>
<ADS:Dropdownlost ID="DdlProveedor" runat="server" CssStyle="width: 100%; selected2me" Width="100%" DataTextField="RazonSocial" DataValueField="CveProveedor" ></ADS:Dropdownlost>
</div>
<div class="col-md-1"><span>Clasificación:</span></div>
<div class="col-md-1">

31
Compras/RepCxPPeriodo.aspx.cs
View File

@@ -44,8 +44,28 @@ public partial class Compras_RepCxPPeriodo : ClsPaginas
TipoCambio = 1;
TCEspecifico = -1;
DdlProveedor.DataSource = get_GlobalDTCompProveedores(UsuarioActual.CveEmpresa);
DdlProveedor.DataBind();
//DdlProveedor.DataSource = get_GlobalDTCompProveedores(UsuarioActual.CveEmpresa);
//DdlProveedor.DataBind();
if (UsuarioActual.Empresa.Funcionalidad(105) == "1") {
DdlProveedor.setEsWebService(true);
DdlProveedor.Attributes.Add("data-metodo", "getproveedores");
DdlProveedor.SelectedText = "Todos";
DdlProveedor.SelectedValue = "-1";
}
else {
DdlProveedor.setEsWebService(false);
DdlProveedor.ddl.DataSource = get_GlobalDTCompProveedores(UsuarioActual.CveEmpresa);
DdlProveedor.ddl.DataBind();
DdlProveedor.ddl.Items.Insert(0, new ListItem("Todos", "-1"));
}
DdlUsuarioResponsable.DataSource = GlobalDTUsuarioResponsable.FiltraParametros($"CveEmpresa = {UsuarioActual.CveEmpresa}").FiltraParametros("ProveedoresResponsables > 0");
DdlUsuarioResponsable.DataBind();
@@ -72,8 +92,11 @@ public partial class Compras_RepCxPPeriodo : ClsPaginas
{
if (RblTipoCambio.SelectedValue.ToEntero() == 3 && TxtEspecifico.Text != "") { TCEspecifico = TxtEspecifico.Text.ToDouble(); } else { TCEspecifico = -1; }
int CveProveedor = DdlProveedor.SelectedValue.ToEntero() > 0 ? DdlProveedor.SelectedValue.ToEntero() : -1;
ClsMovimientos ObjMov = new ClsMovimientos();
if (ObjMov.GetCxPPeriodo(DdlProveedor.SelectedValue.ToEntero(),DdlSubProyecto.SelectedValue.ToEntero(),DdlProveedoresClasificaciones.SelectedValue.ToEntero(),
if (ObjMov.GetCxPPeriodo(CveProveedor, DdlSubProyecto.SelectedValue.ToEntero(),DdlProveedoresClasificaciones.SelectedValue.ToEntero(),
DdlUsuarioResponsable.SelectedValue.ToEntero(),DdlUsuarioRegistro.SelectedValue.ToEntero(),DdlEstatusCompra.SelectedValue.ToEntero(),UsuarioActual.CveEmpresa,
DdlGrupo.SelectedValue.ToEntero(),DdlSubProyecto.SelectedValue.ToEntero(),TipoCambio,TCEspecifico,txtCorteA.Text.ToDate(),UsuarioActual.CveUsuario,DdlTipoProveedor.SelectedValue.ToEntero()))
{
@@ -234,7 +257,7 @@ public partial class Compras_RepCxPPeriodo : ClsPaginas
if (DdlGrupo.SelectedValue != "-1")
StrFiltro.AppendFormat("&emsp;<b>Grupo</b>: {0}", DdlGrupo.SelectedItem.Text);
if (DdlProveedor.SelectedValue != "-1")
StrFiltro.AppendFormat("&emsp;<b>Proveedor</b>: {0}", DdlProveedor.SelectedItem.Text);
StrFiltro.AppendFormat("&emsp;<b>Proveedor</b>: {0}", DdlProveedor.ddl.SelectedItem.Text);
if (DdlProveedoresClasificaciones.SelectedValue != "-1")
StrFiltro.AppendFormat("&emsp;<b>Clasificación Proveedor</b>: {0}", DdlProveedoresClasificaciones.SelectedItem.Text);
if (DdlTipoProveedor.SelectedValue != "-1")

3
CxC/RepCxCPeriodo.aspx
View File

@@ -117,7 +117,8 @@
<asp:ListItem Selected="True" Value="Rem" Text="Remisión"></asp:ListItem>
<asp:ListItem Selected="True" Value="Ant" Text="Anticipos"></asp:ListItem>
<asp:ListItem Selected="True" Value="Egs" Text="Egresos"></asp:ListItem>
<asp:ListItem Selected="True" Value="Dev" Text="Devolución"></asp:ListItem>
<asp:ListItem Selected="True" Value="IxC" Text="Ingresos X Comp"></asp:ListItem>
<asp:ListItem Selected="True" Value="Dev" Text="Devolución"></asp:ListItem>
</asp:ListBox>
</div>
<div class="col-md-1 truncate">

35
CxC/RepCxCPeriodo.aspx.cs
View File

@@ -39,13 +39,18 @@ public partial class CxC_RepCxCPeriodo : ClsPaginas
}
}
private void InicializaValores()
{
TipoCambio = 1;
TCEspecifico = -1;
//CargaClientes
if (UsuarioActual.CveEmpresa == 119) {
if (UsuarioActual.Empresa.Funcionalidad(105) == "1")
{
DdlClientesWS.setEsWebService(true);
}
else
@@ -93,8 +98,11 @@ public partial class CxC_RepCxCPeriodo : ClsPaginas
if (RblTipoCambio.SelectedValue.ToEntero() == 3 && TxtEspecifico.Text != "") { TCEspecifico = TxtEspecifico.Text.ToDouble(); } else { TCEspecifico = -1; }
int CveCliente = DdlClientesWS.SelectedValue.ToEntero() > 0 ? DdlClientesWS.SelectedValue.ToEntero() : -1;
ClsMovimientos ObjMov = new ClsMovimientos();
if (ObjMov.GetCxCPeriodo(DdlClientesWS.SelectedValue.ToEntero(),DdlSubProyecto.SelectedValue.ToEntero(),DdlVendedor.SelectedValue.ToEntero(),DdlUsuario.SelectedValue.ToEntero(),
if (ObjMov.GetCxCPeriodo(CveCliente, DdlSubProyecto.SelectedValue.ToEntero(),DdlVendedor.SelectedValue.ToEntero(),DdlUsuario.SelectedValue.ToEntero(),
-1,"-1",UsuarioActual.CveEmpresa,DdlGrupo.SelectedValue.ToEntero(),DdlResponsable.SelectedValue.ToEntero(),TipoCambio,TCEspecifico, TipoDocto,txtCorteA.Text.ToDate(),
DdlEstatusCliente.SelectedValue.ToEntero(), UsuarioActual.CveUsuario, DdlCobranzaEstatus.SelectedValue.ToEntero(), DdlClienteClasificacion.SelectedValue.ToEntero())){
GvDatos.DataSource = ObjMov.DtResultados;
@@ -107,13 +115,34 @@ public partial class CxC_RepCxCPeriodo : ClsPaginas
private void CargaClientes()
{
if (UsuarioActual.CveEmpresa != 119)
if (UsuarioActual.Empresa.Funcionalidad(105) == "1")
{
DdlClientesWS.setEsWebService(true);
if( DdlClienteClasificacion.SelectedValue.ToEntero() > 0)
{
DdlClientesWS.ddlWS.Attributes.Add("data-cveclienteclasificacion", DdlClienteClasificacion.SelectedValue);
DdlClientesWS.txtValue.Value = "";
DdlClientesWS.txtText.Value = "";
}
else
{
DdlClientesWS.ddlWS.Attributes.Add("data-cveclienteclasificacion", "-1");
}
}
else
{
DdlClientesWS.ddl.Items.Clear();
DdlClientesWS.DataSource = get_GlobalDTCliente(UsuarioActual.CveEmpresa, -1).FiltraParametros($"CveClienteClasificacion = {DdlClienteClasificacion.SelectedValue.ToEntero()} OR {DdlClienteClasificacion.SelectedValue.ToEntero()} = -1");
DdlClientesWS.DataBind();
DdlClientesWS.ddl.Items.Insert(0, new ListItem("Todos", "-1"));
}
UPFiltros.Update();
}
protected void DdlClienteClasificacion_SelectedIndexChanged(object sender, EventArgs e)

32
Inventarios/CartaPorteManual.aspx
View File

@@ -169,17 +169,15 @@
<div class="row">
<asp:Label runat="server" ID="LblSubProyecto" CssClass="col-md-3"></asp:Label>
<asp:Label runat="server" ID="LblSubProyecto" CssClass="col-md-2"></asp:Label>
<div class="col-md-9" style="padding-left: 5px;">
<asp:DropDownList runat="server" ID="DdlSubProyecto" CssClass="select2me" Width="100%" DataTextField="SubProyecto" DataValueField="CveSubProyecto"></asp:DropDownList>
<asp:RequiredFieldValidator ID="RfvDdlSubProyecto" runat="server" InitialValue="-1" ControlToValidate="DdlSubProyecto" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
</div>
</div>
<div class="row">
<label class="col-md-3">Fecha:</label>
<label class="col-md-2">Fecha:</label>
<div class="col-md-3" style="padding-left: 5px;">
<div class="input-group input-sm input-small date date-picker" data-date-format="dd/mm/yyyy">
<asp:TextBox ID="TxtFecha" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="10" ValidationGroup="GrpGuardar" Width="100px" ClientIDMode="Static"></asp:TextBox>
@@ -202,7 +200,7 @@
</div>
<div class="row rowpadding" id="divEmitir" runat="server">
<label class="col-md-3">Emitir:</label>
<label class="col-md-2">Emitir:</label>
<div class="col-md-9">
<table>
<tr>
@@ -216,32 +214,32 @@
</div>
</div>
<div class="row rowpadding">
<label class="col-md-3">Chofer:</label>
<div class="col-md-8">
<label class="col-md-2">Chofer:</label>
<div class="col-md-6">
<asp:DropDownList ID="DdlChofer" runat="server" DataTextField="ChoferLicencia" DataValueField="CveChofer" OnSelectedIndexChanged="DldChofer_SelectedIndexChanged" AutoPostBack="true" CssClass="form-control input-sm select2me" Width="100%"></asp:DropDownList>
<asp:RequiredFieldValidator ID="RfvDdlChofer" runat="server" Enabled="false" ControlToValidate="DdlChofer" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Chofer''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VceDdlChofer" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlChofer" Width="350px"></ajax:ValidatorCalloutExtender>
</div>
<div class="col-md-1">
<div class="col-md-1" style="text-align:left!important">
<asp:LinkButton ID="LnkAgregarChofer" runat="server" CssClass="btn btn-primary btn-sm" Text="+" CommandArgument="Agregar Chofer" />
</div>
</div>
<div class="row rowpadding">
<label class="col-md-3">Unidad:</label>
<div class="col-md-8">
<label class="col-md-2">Unidad:</label>
<div class="col-md-6">
<asp:DropDownList runat="server" ID="DdlUnidadCamion" AutoPostBack="true" Width="100%" AppendDataBoundItems="true" CssClass="form-control input-sm select2me" DataValueField="CveCamion" DataTextField="CamionPlaca" OnSelectedIndexChanged="DdlUnidadCamionActivoFijo_SelectedIndexChanged" ></asp:DropDownList>
<asp:RequiredFieldValidator ID="RfvDdlUnidadCamion" runat="server" Enabled="false" ControlToValidate="DdlUnidadCamion" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Unidad''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VceDdlUnidadCamion" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlUnidadCamion" Width="350px"></ajax:ValidatorCalloutExtender>
</div>
<div class="col-md-1">
<div class="col-md-1" style="text-align:left!important">
<asp:LinkButton ID="LnkAgregarUnidad" runat="server" CssClass="btn btn-primary btn-sm" Text="+" CommandArgument="Agregar Unidad" />
</div>
</div>
<div class="row rowpadding" runat="server" id="DvConfiguracionVeiculo" visible="false">
<label class="col-md-3">Configuración:</label>
<div class="col-md-9">
<label class="col-md-2">Configuración:</label>
<div class="col-md-6">
<%--<asp:DropDownList runat="server" ID="DropDownList1" AutoPostBack="true" Width="100%" AppendDataBoundItems="true" CssClass="form-control input-sm select2me" DataValueField="CveActivoFijo" DataTextField="CodigoDescripcion"></asp:DropDownList>--%>
<asp:DropDownList ID="DdlConfigAuto" CssClass="form-control input-sm select2me" Width="100%" runat="server" AppendDataBoundItems="true" AutoPostBack="true" OnSelectedIndexChanged="DdlConfigAuto_SelectedIndexChanged" CausesValidation="true" DataTextField="ClaveConfigAutoTransporteDescripcion" DataValueField="CveConfigAutoTransporte" Style="padding: 0px">
</asp:DropDownList>
@@ -251,16 +249,16 @@
</div>
<div class="row rowpadding" runat="server" id="DvRemolque1" visible="false">
<label class="col-md-3">Remolque 1:</label>
<div class="col-md-9">
<label class="col-md-6">Remolque 1:</label>
<div class="col-md-6">
<asp:DropDownList runat="server" ID="DdlRemolque1" AutoPostBack="true" Width="100%" AppendDataBoundItems="true" CssClass="form-control input-sm select2me" DataValueField="CveCamion" DataTextField="CamionPlaca" OnSelectedIndexChanged="DdlRemolque1_SelectedIndexChanged"></asp:DropDownList>
</div>
</div>
<div class="row rowpadding" runat="server" id="DvRemolque2" visible="false">
<label class="col-md-3">Remolque 2:</label>
<div class="col-md-9">
<label class="col-md-2">Remolque 2:</label>
<div class="col-md-6">
<asp:DropDownList runat="server" ID="DdlRemolque2" AutoPostBack="true" Width="100%" CssClass="form-control input-sm select2me" DataValueField="CveCamion" DataTextField="CamionPlaca" ></asp:DropDownList>
</div>
</div>

4
Scripts/custom.js
View File

@@ -1215,7 +1215,9 @@ function setwebservice(idDdlWS, idhdValue, idhdText, btn) {
ColTexto: (!(DdlWS.data('coltexto')) || DdlWS.data('coltexto') == '') ? 'NC' : DdlWS.data('coltexto'),
aplicaparaventa: (!(DdlWS.data('aplicaparaventa')) || DdlWS.data('aplicaparaventa') == '') ? -1 : DdlWS.data('aplicaparaventa'),
cvemarca: (!(DdlWS.data('cvemarca')) || DdlWS.data('cvemarca') == '') ? -1 : DdlWS.data('cvemarca'),
esdistribuidor: (!(DdlWS.data('esdistribuidor')) || DdlWS.data('esdistribuidor') == '') ? -1 : DdlWS.data('esdistribuidor')
esdistribuidor: (!(DdlWS.data('esdistribuidor')) || DdlWS.data('esdistribuidor') == '') ? -1 : DdlWS.data('esdistribuidor'),
cveclienteclasificacion: (!(DdlWS.data('cveclienteclasificacion')) || DdlWS.data('cveclienteclasificacion') == '') ? -1 : DdlWS.data('cveclienteclasificacion')
//Metodo: metodo
};