diff --git a/App_Code/ClsContPAQi.vb b/App_Code/ClsContPAQi.vb index 5a6526ea1..4899c1242 100644 --- a/App_Code/ClsContPAQi.vb +++ b/App_Code/ClsContPAQi.vb @@ -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,") diff --git a/Ashx/SIGWeb.ashx b/Ashx/SIGWeb.ashx index 248704414..6a595d10c 100644 --- a/Ashx/SIGWeb.ashx +++ b/Ashx/SIGWeb.ashx @@ -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() diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb index caed3305f..29d33ff6d 100644 --- a/Compras/Compras.aspx.vb +++ b/Compras/Compras.aspx.vb @@ -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 diff --git a/Compras/RepCxPPeriodo.aspx b/Compras/RepCxPPeriodo.aspx index 397894da3..1584d2160 100644 --- a/Compras/RepCxPPeriodo.aspx +++ b/Compras/RepCxPPeriodo.aspx @@ -48,9 +48,7 @@
Proveedor:
- - - +
Clasificación:
diff --git a/Compras/RepCxPPeriodo.aspx.cs b/Compras/RepCxPPeriodo.aspx.cs index 5b9f2a458..9c884dae5 100644 --- a/Compras/RepCxPPeriodo.aspx.cs +++ b/Compras/RepCxPPeriodo.aspx.cs @@ -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(" Grupo: {0}", DdlGrupo.SelectedItem.Text); if (DdlProveedor.SelectedValue != "-1") - StrFiltro.AppendFormat(" Proveedor: {0}", DdlProveedor.SelectedItem.Text); + StrFiltro.AppendFormat(" Proveedor: {0}", DdlProveedor.ddl.SelectedItem.Text); if (DdlProveedoresClasificaciones.SelectedValue != "-1") StrFiltro.AppendFormat(" Clasificación Proveedor: {0}", DdlProveedoresClasificaciones.SelectedItem.Text); if (DdlTipoProveedor.SelectedValue != "-1") diff --git a/CxC/RepCxCPeriodo.aspx b/CxC/RepCxCPeriodo.aspx index e210ecc1b..a7089fb86 100644 --- a/CxC/RepCxCPeriodo.aspx +++ b/CxC/RepCxCPeriodo.aspx @@ -117,7 +117,8 @@ - + +
diff --git a/CxC/RepCxCPeriodo.aspx.cs b/CxC/RepCxCPeriodo.aspx.cs index 35de41dd3..d0d2003d1 100644 --- a/CxC/RepCxCPeriodo.aspx.cs +++ b/CxC/RepCxCPeriodo.aspx.cs @@ -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) diff --git a/Inventarios/CartaPorteManual.aspx b/Inventarios/CartaPorteManual.aspx index 23c4eb614..fc0b9f4de 100644 --- a/Inventarios/CartaPorteManual.aspx +++ b/Inventarios/CartaPorteManual.aspx @@ -169,17 +169,15 @@ - -
- +
- +
@@ -202,7 +200,7 @@
- +
@@ -216,32 +214,32 @@
- -
+ +
-
+
- -
+ +
-
+
- -
+ +
<%----%> @@ -251,16 +249,16 @@
- -
+ +
- -
+ +
diff --git a/Scripts/custom.js b/Scripts/custom.js index d08183fbc..f9e624f82 100644 --- a/Scripts/custom.js +++ b/Scripts/custom.js @@ -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 };