From 4896a32ae60b319f840d3a8ddfa7f123243b3455 Mon Sep 17 00:00:00 2001 From: rakcsle Date: Tue, 31 May 2022 16:20:28 -0700 Subject: [PATCH 01/26] Factura Empresa 13 4.0, RepMovimientosAuxiliarCatalogo --- .../RepMovimientosAuxiliaresCatalogo.aspx | 131 +++-------- Empresas/13/Formatos/Factura.rdlc | 205 +++++++++++++++++- 2 files changed, 226 insertions(+), 110 deletions(-) diff --git a/Contabilidad2/RepMovimientosAuxiliaresCatalogo.aspx b/Contabilidad2/RepMovimientosAuxiliaresCatalogo.aspx index 036079ba9..7cfa4539c 100644 --- a/Contabilidad2/RepMovimientosAuxiliaresCatalogo.aspx +++ b/Contabilidad2/RepMovimientosAuxiliaresCatalogo.aspx @@ -9,7 +9,16 @@ text-overflow: ellipsis; } - + table{ + border:none!important; + } + tr{ + border:none!important; + } + + td{ + border:none!important; + } @@ -128,21 +137,29 @@
-
+ <%--
" style="display: inline-block; margin-right: -20px; width: 150px;" /> " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> -
+
--%> - +
+ " style="display: inline-block; margin-right: -20px; width: 150px;" /> + " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> +
+ + + - + - +
@@ -166,7 +183,7 @@ <%-- --%> -
Cuenta Nombre
+
@@ -222,8 +239,7 @@ - - + @@ -238,101 +254,6 @@ diff --git a/Empresas/13/Formatos/Factura.rdlc b/Empresas/13/Formatos/Factura.rdlc index 4b7164339..902b37b90 100644 --- a/Empresas/13/Formatos/Factura.rdlc +++ b/Empresas/13/Formatos/Factura.rdlc @@ -194,7 +194,7 @@ 1.88777in 1.00929in 0.17222in - 4.18029in + 4.08654in 3 + + + + + + Textbox6 + + + + Black + + + + Black + + + White + 2pt + 2pt + 2pt + 2pt + + + + @@ -834,6 +883,43 @@ + + + + true + true + + + + + =Fields!ObjetoImpuesto.Value + + + + + + + ObjetoImpuesto + + + + #4f81bd + + 2pt + 2pt + 2pt + 2pt + + + + @@ -960,6 +1046,7 @@ + @@ -1858,7 +1945,7 @@ 2.03638in 3.58501in 0.18472in - 1.60457in + 1.51082in 23 + + + =Parameters!CFDIVersion.Value + + true + true + + + + + Regimen fiscal: + + + + + + + + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + true + + + + + =Parameters!RegimenFiscalCodigo.Value + + + + + + + + + + + + + + + 2pt + 2pt + 2pt + 2pt + + 16.79496cm @@ -1063,7 +1063,7 @@ 6.28717cm 0.44641cm 1.2353cm - 20.06999cm + 20.00305cm 4 - true @@ -2853,6 +2852,18 @@ true ReportParameter1 + + String + true + true + ReportParameter1 + + + String + true + true + ReportParameter1 + diff --git a/Empresas/119/Formatos/Factura.rdlc b/Empresas/119/Formatos/Factura.rdlc index cab74d0ae..7a5502e98 100644 --- a/Empresas/119/Formatos/Factura.rdlc +++ b/Empresas/119/Formatos/Factura.rdlc @@ -552,7 +552,7 @@ Start true - 7.78895in + 7.66395in 0.18226in 4.422in 7.87128in @@ -882,7 +882,7 @@ - Regimen fiscal: + Reg.fiscal: @@ -1150,7 +1150,7 @@ true - 3.57076in + 3.44576in 0.02339in 1.21305in 8.22763in @@ -1243,12 +1243,33 @@ + + + + + + + - - Regimen General de Ley Personas Morales - - - - - - - true @@ -2324,7 +2328,7 @@ - =iif(cdbl(Fields!ImporteIVA.Value) > 0, Fields!ImporteIVA.Value & "(" & cdbl(Fields!PorcentajeIVA.Value) * 100 & "%)","") + =iif(cdbl(Fields!ImporteIVA.Value) > 0, Format(Fields!ImporteIVA.Value,"###,###,###.00") & "(" & cdbl(Fields!PorcentajeIVA.Value) * 100 & "%)","") - 31.01581cm + 30.69831cm diff --git a/Empresas/119/Formatos/Remision.rdlc b/Empresas/119/Formatos/Remision.rdlc index 9837dce62..fbe07cd55 100644 --- a/Empresas/119/Formatos/Remision.rdlc +++ b/Empresas/119/Formatos/Remision.rdlc @@ -791,7 +791,6 @@ 2pt - true @@ -2334,6 +2333,18 @@ true ReportParameter1 + + String + true + true + ReportParameter1 + + + String + true + true + ReportParameter1 + diff --git a/Empresas/140/Formatos/Cotizacion.rdlc b/Empresas/140/Formatos/Cotizacion.rdlc index e6842a3a0..a1e70d57d 100644 --- a/Empresas/140/Formatos/Cotizacion.rdlc +++ b/Empresas/140/Formatos/Cotizacion.rdlc @@ -297,7 +297,7 @@ =Parameters!Serie.Value @@ -313,7 +313,7 @@ =Parameters!Folio.Value @@ -1214,7 +1214,6 @@ 2pt - true diff --git a/Empresas/140/Formatos/Factura.rdlc b/Empresas/140/Formatos/Factura.rdlc index 4f4fd52e8..38de1d8fd 100644 --- a/Empresas/140/Formatos/Factura.rdlc +++ b/Empresas/140/Formatos/Factura.rdlc @@ -646,7 +646,7 @@ =Parameters!Serie.Value @@ -670,7 +670,7 @@ =Parameters!Folio.Value diff --git a/Empresas/140/Formatos/Remision.rdlc b/Empresas/140/Formatos/Remision.rdlc index 3001212dd..052dfa688 100644 --- a/Empresas/140/Formatos/Remision.rdlc +++ b/Empresas/140/Formatos/Remision.rdlc @@ -446,7 +446,7 @@ =Parameters!Serie.Value @@ -462,7 +462,7 @@ =Parameters!Folio.Value diff --git a/Inventarios/CatUnidades.aspx.vb b/Inventarios/CatUnidades.aspx.vb index 38720e266..245342d76 100644 --- a/Inventarios/CatUnidades.aspx.vb +++ b/Inventarios/CatUnidades.aspx.vb @@ -231,11 +231,13 @@ Partial Class Inventarios_CatUnidades If Not ErrorPrceso Then GlobalDTInvCamiones(UsuarioActual.CveEmpresa) = Nothing CargaDatos() + RegistraScript(String.Format("$('#{0}').modal('hide');", "DivAgregarUnidad")) + UpDatos.Update() End If - UpDatos.Update() - RegistraScript(String.Format("$('#{0}').modal('hide');", "DivAgregarUnidad")) + + End Sub diff --git a/Inventarios/InventarioFisicoDetalle.aspx b/Inventarios/InventarioFisicoDetalle.aspx index b44053b71..ffd60da82 100644 --- a/Inventarios/InventarioFisicoDetalle.aspx +++ b/Inventarios/InventarioFisicoDetalle.aspx @@ -339,8 +339,18 @@
- + + + + + + + + + +
@@ -361,9 +371,11 @@
+ + - done_all Guardar + @@ -417,6 +429,15 @@ $('#GvIFD').parent().parent().children().first().css("position", "static"); } + function TamanioSerie(source, arguments) { + + if (arguments.Value.trim().length >= 6) { + arguments.IsValid = true; + } else { + arguments.IsValid = false; + } + + } diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb index 2ccbbfb38..56a9096ca 100644 --- a/Ventas/Ventas.aspx.vb +++ b/Ventas/Ventas.aspx.vb @@ -2160,6 +2160,37 @@ Partial Class Ventas ViewState("DtMercancias") = value End Set End Property + + + Private Property ClienteCodigoRegimenFiscal As String + Get + + If ViewState("ClienteCodigoRegimenFiscal") Is Nothing Then + ViewState("ClienteCodigoRegimenFiscal") = "" + End If + Return ViewState("ClienteCodigoRegimenFiscal").ToString + + End Get + Set(value As String) + ViewState("ClienteCodigoRegimenFiscal") = value + End Set + End Property + + + Private Property ClienteRegimenFiscal As String + Get + + If ViewState("ClienteRegimenFiscal") Is Nothing Then + ViewState("ClienteRegimenFiscal") = "" + End If + Return ViewState("ClienteRegimenFiscal").ToString + + End Get + Set(value As String) + ViewState("ClienteRegimenFiscal") = value + End Set + End Property + #End Region '#Region "AuxiliarConta" @@ -5990,6 +6021,9 @@ Partial Class Ventas TieneDiasVencidos = Boolean.Parse(ObjCliente.DtResultados.Rows(0)("TieneDiasVencidos").ToString()) DiasVencidosCliente = ObjCliente.DtResultados.Rows(0)("DiasVencidosCliente").ToString().ToEntero() + ClienteCodigoRegimenFiscal = ObjCliente.DtResultados.Rows(0)("CodigoRegimenFiscal").ToString() + ClienteRegimenFiscal = ObjCliente.DtResultados.Rows(0)("RegimenFiscal").ToString() + If EstatusCliente = False And Not DdlTipoComprobante.SelectedValue.Contiene("Cot", "DPe") And (CveVenta <= 0 Or EsCreaApartirDe) Then Alert("El Cliente seleccionado no esta activo", TipoMensaje.MsgAdvertencia) BtnEmitirImprimir.Visible = EstatusCliente @@ -9649,7 +9683,24 @@ Partial Class Ventas ObjFacturaDevolucion.Fecha = Now - ObjFacturaDevolucion.Version = "3.3" + + + If UsuarioActual.Empresa.Funcionalidad(350) = "1" Then + ObjFacturaDevolucion.Version = "4.0" + + If ObjFacturaDevolucion.Cliente Is Nothing Then + ObjFacturaDevolucion.Cliente = New Modelos.ClienteModel + End If + + ObjFacturaDevolucion.Cliente.CodigoRegimenFiscal = ClienteCodigoRegimenFiscal + ObjFacturaDevolucion.Cliente.RegimenFiscal = ClienteRegimenFiscal + Else + ObjFacturaDevolucion.Version = "3.3" + End If + + + + ObjFacturaDevolucion.CveMetodoPago33 = 1 ObjFacturaDevolucion.MetodoPago33 = "Pago en una sola exhibición" ObjFacturaDevolucion.ClaveMetodoPagoSAT = "PUE" @@ -9931,7 +9982,20 @@ Partial Class Ventas End If ObjFacturaBonificacion.Fecha = Now - ObjFacturaBonificacion.Version = "3.3" + + If UsuarioActual.Empresa.Funcionalidad(350) = "1" Then + ObjFacturaBonificacion.Version = "4.0" + + If ObjFacturaBonificacion.Cliente Is Nothing Then + ObjFacturaBonificacion.Cliente = New Modelos.ClienteModel + End If + + ObjFacturaBonificacion.Cliente.CodigoRegimenFiscal = ClienteCodigoRegimenFiscal + ObjFacturaBonificacion.Cliente.RegimenFiscal = ClienteRegimenFiscal + Else + ObjFacturaBonificacion.Version = "3.3" + End If + ObjFacturaBonificacion.CveMetodoPago33 = 1 ObjFacturaBonificacion.MetodoPago33 = "Pago en una sola exhibición" ObjFacturaBonificacion.ClaveMetodoPagoSAT = "PUE" @@ -10331,7 +10395,18 @@ Partial Class Ventas ObjFactura = New Modelos.Factura End If - ObjFactura.Version = "3.3" + If UsuarioActual.Empresa.Funcionalidad(350) = "1" Then + ObjFactura.Version = "4.0" + If ObjFactura.Cliente Is Nothing Then + ObjFactura.Cliente = New Modelos.ClienteModel + End If + + ObjFactura.Cliente.CodigoRegimenFiscal = ClienteCodigoRegimenFiscal + ObjFactura.Cliente.RegimenFiscal = ClienteRegimenFiscal + Else + ObjFactura.Version = "3.3" + End If + ObjFactura.CveUsuario = UsuarioActual.CveUsuario ObjFactura.CveEmpresa = UsuarioActual.CveEmpresa ObjFactura.TipoCambio = If(DdlMoneda.SelectedValue.ToEntero() = 1, 1, TxtTipoCambio.Text.Trim.ToDecimal) @@ -11106,7 +11181,19 @@ Partial Class Ventas ObjFacturaDevolucion.SerieFolioPadre = HdnFolioFiscalNC.Value.ToString() - ObjFacturaDevolucion.Version = "3.3" + If UsuarioActual.Empresa.Funcionalidad(350) = "1" Then + ObjFacturaDevolucion.Version = "4.0" + + If ObjFacturaDevolucion.Cliente Is Nothing Then + ObjFacturaDevolucion.Cliente = New Modelos.ClienteModel + End If + + ObjFacturaDevolucion.Cliente.CodigoRegimenFiscal = ClienteCodigoRegimenFiscal + ObjFacturaDevolucion.Cliente.RegimenFiscal = ClienteRegimenFiscal + Else + ObjFacturaDevolucion.Version = "3.3" + End If + ObjFacturaDevolucion.CveMetodoPago33 = DdlMetodoPago33.SelectedValue.ToEntero() ObjFacturaDevolucion.MetodoPago33 = If(DdlMetodoPago33.SelectedValue.ToEntero() > 0, DdlMetodoPago33.SelectedItem.Text, "") ObjFacturaDevolucion.ClaveMetodoPagoSAT = GlobalDTVtaMetodoPago.FiltroPrimeroValor("ClaveMetodoPagoSAT", $"CveMetodoPago = {DdlMetodoPago33.SelectedValue}") @@ -33365,7 +33452,20 @@ Partial Class Ventas ObjFacturaProntoPago.TipoDocto = "Egs" ObjFacturaProntoPago.Fecha = Now - ObjFacturaProntoPago.Version = "3.3" + + If UsuarioActual.Empresa.Funcionalidad(350) = "1" Then + ObjFacturaProntoPago.Version = "4.0" + + If ObjFacturaProntoPago.Cliente Is Nothing Then + ObjFacturaProntoPago.Cliente = New Modelos.ClienteModel + End If + + ObjFacturaProntoPago.Cliente.CodigoRegimenFiscal = ClienteCodigoRegimenFiscal + ObjFacturaProntoPago.Cliente.RegimenFiscal = ClienteRegimenFiscal + Else + ObjFacturaProntoPago.Version = "3.3" + End If + ObjFacturaProntoPago.CveMetodoPago33 = 1 ObjFacturaProntoPago.MetodoPago33 = "Pago en una sola exhibición" ObjFacturaProntoPago.ClaveMetodoPagoSAT = "PUE" From e731464ae1dc1fb367cb5b0f6d31bd66a76ca2ef Mon Sep 17 00:00:00 2001 From: rrene Date: Thu, 2 Jun 2022 11:54:49 -0700 Subject: [PATCH 10/26] --cambio --- Bancos/DepositosCaja.aspx.vb | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/Bancos/DepositosCaja.aspx.vb b/Bancos/DepositosCaja.aspx.vb index 6f5be6c6d..da1a486af 100644 --- a/Bancos/DepositosCaja.aspx.vb +++ b/Bancos/DepositosCaja.aspx.vb @@ -375,9 +375,11 @@ Partial Class Bancos_DepositosCaja Protected Sub GvFacturas_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GvFacturas.RowDataBound If e.Row.RowType = DataControlRowType.DataRow Then - If UsuarioActual.Empresa.Funcionalidad(531) = "1" AndAlso DdlTipoPago.SelectedValue.Contiene("11", "12", "-2") Then + If UsuarioActual.Empresa.Funcionalidad(531) = "1" Then e.Row.FCCheckBox("ChkFactura").Checked = True - e.Row.FCCheckBox("ChkFactura").Enabled = False + If DdlTipoPago.SelectedValue.Contiene("11", "12", "-2") Then + e.Row.FCCheckBox("ChkFactura").Enabled = False + End If End If @@ -388,7 +390,7 @@ Partial Class Bancos_DepositosCaja If e.Row.RowType = DataControlRowType.Header Then - If UsuarioActual.Empresa.Funcionalidad(531) = "1" Then + If UsuarioActual.Empresa.Funcionalidad(531) = "1" AndAlso DdlTipoPago.SelectedValue.Contiene("11", "12", "-2") Then RegistraScript("$('#C_GvFacturas_ChkSelector').attr('checked', true); $('#C_GvFacturas_ChkSelector').prop('disabled', 'disabled');") 'RegistraScript("$('#C_GvFacturas_ChkSelector').prop('disabled', 'disabled');") End If From b9022c55393bd03fecd4f64e58a6f66602b66ddf Mon Sep 17 00:00:00 2001 From: rakcsle Date: Thu, 2 Jun 2022 12:01:14 -0700 Subject: [PATCH 11/26] Depopsitos caja correcion el comisiones (suma js total ), 48 OC.rldc cambio de nombre --- Bancos/DepositosCaja.aspx.vb | 52 ++++++++++++++++++++++++++++-------- Empresas/48/Formatos/OC.rdlc | 11 +++++++- vwd.webinfo | 2 ++ 3 files changed, 53 insertions(+), 12 deletions(-) diff --git a/Bancos/DepositosCaja.aspx.vb b/Bancos/DepositosCaja.aspx.vb index 6f5be6c6d..a33f03cee 100644 --- a/Bancos/DepositosCaja.aspx.vb +++ b/Bancos/DepositosCaja.aspx.vb @@ -104,9 +104,14 @@ Partial Class Bancos_DepositosCaja If UsuarioActual.Empresa.Funcionalidad(531) = "1" Then + lblValorTotal.Text = ObjBancos.DtResultados.SUM("Importe").ToString("###,###,###.00") + RegistraScript($" ValorTotalSeleccionado = {ObjBancos.DtResultados.SUM("Importe")};") + End If + + ObjBancos.Dispose() @@ -372,23 +377,48 @@ Partial Class Bancos_DepositosCaja 'ObtenerTotalImporta() End Sub - Protected Sub GvFacturas_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GvFacturas.RowDataBound + Protected Sub GvFacturas_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GvFacturas.RowDataBound + 'If e.Row.RowType = DataControlRowType.DataRow Then + + ' If UsuarioActual.Empresa.Funcionalidad(531) = "1" AndAlso DdlTipoPago.SelectedValue.Contiene("11", "12", "-2") Then + ' e.Row.FCCheckBox("ChkFactura").Checked = True + ' e.Row.FCCheckBox("ChkFactura").Enabled = False + + ' End If + + ' e.Row.FCCheckBox("ChkFactura").Attributes.Add("onclick", String.Format("FnSuma(this,{0});", e.Row.DBCampo("Importe"))) + ' e.Row.FCCheckBox("ChkFactura").InputAttributes.Add("Value", e.Row.DBCampo("Importe")) + + 'End If + + 'If e.Row.RowType = DataControlRowType.Header Then + + ' If UsuarioActual.Empresa.Funcionalidad(531) = "1" Then + ' RegistraScript("$('#C_GvFacturas_ChkSelector').attr('checked', true); $('#C_GvFacturas_ChkSelector').prop('disabled', 'disabled');") + ' 'RegistraScript("$('#C_GvFacturas_ChkSelector').prop('disabled', 'disabled');") + ' End If + + 'End If + + If e.Row.RowType = DataControlRowType.DataRow Then - If UsuarioActual.Empresa.Funcionalidad(531) = "1" AndAlso DdlTipoPago.SelectedValue.Contiene("11", "12", "-2") Then + If UsuarioActual.Empresa.Funcionalidad(531) = "1" Then e.Row.FCCheckBox("ChkFactura").Checked = True - e.Row.FCCheckBox("ChkFactura").Enabled = False + If DdlTipoPago.SelectedValue.Contiene("11", "12", "-2") Then + e.Row.FCCheckBox("ChkFactura").Enabled = False + End If + + End If + + e.Row.FCCheckBox("ChkFactura").Attributes.Add("onclick", String.Format("FnSuma(this,{0});", e.Row.DBCampo("Importe"))) + e.Row.FCCheckBox("ChkFactura").InputAttributes.Add("Value", e.Row.DBCampo("Importe")) + + End If - End If - - e.Row.FCCheckBox("ChkFactura").Attributes.Add("onclick", String.Format("FnSuma(this,{0});", e.Row.DBCampo("Importe"))) - e.Row.FCCheckBox("ChkFactura").InputAttributes.Add("Value", e.Row.DBCampo("Importe")) - - End If - If e.Row.RowType = DataControlRowType.Header Then - If UsuarioActual.Empresa.Funcionalidad(531) = "1" Then + If UsuarioActual.Empresa.Funcionalidad(531) = "1" AndAlso DdlTipoPago.SelectedValue.Contiene("11", "12", "-2") Then RegistraScript("$('#C_GvFacturas_ChkSelector').attr('checked', true); $('#C_GvFacturas_ChkSelector').prop('disabled', 'disabled');") 'RegistraScript("$('#C_GvFacturas_ChkSelector').prop('disabled', 'disabled');") End If diff --git a/Empresas/48/Formatos/OC.rdlc b/Empresas/48/Formatos/OC.rdlc index d9cb161f1..898595d80 100644 --- a/Empresas/48/Formatos/OC.rdlc +++ b/Empresas/48/Formatos/OC.rdlc @@ -2717,11 +2717,20 @@ - Ing. Soraida Mesinas Reyes. + Ing. + + Ing. Hector Manuel Diaz Young + +