From 2fba088f103a574f2a5a10be5206a3fb3956d201 Mon Sep 17 00:00:00 2001 From: MLopez Date: Mon, 14 Nov 2022 10:21:39 -0700 Subject: [PATCH 01/28] =?UTF-8?q?Rep=20Solicitudes=20Ingreso=20SAT:=20Form?= =?UTF-8?q?ato=20GV=20Mes=20Moneda=20-=20Se=20agrupan=20y=20resaltan=20las?= =?UTF-8?q?=20columnas=20correctamente=20=20=20Se=20actualiz=C3=B3=20PA=5F?= =?UTF-8?q?SAT=5FSolicitudTimbreIngresosRep=20en=20SIG=5FResp=5FMLR=20-=20?= =?UTF-8?q?Se=20hizo=20un=20poco=20m=C3=A1s=20ancha=20la=20vista=20de=20la?= =?UTF-8?q?=20tabla?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- SAT/SolicitudesIngresoSat.aspx | 6 +++--- SAT/SolicitudesIngresoSat.aspx.cs | 6 +++--- 2 files changed, 6 insertions(+), 6 deletions(-) diff --git a/SAT/SolicitudesIngresoSat.aspx b/SAT/SolicitudesIngresoSat.aspx index ec6724f78..985d35420 100644 --- a/SAT/SolicitudesIngresoSat.aspx +++ b/SAT/SolicitudesIngresoSat.aspx @@ -312,17 +312,17 @@
-
+
" style="display: inline-block; width: 150px;" /> " style="margin-top: -3px; margin-left: -13px;" class="btn btn-circle btn-sm label-info">
-
+
+ DataKeyNames="Fecha"> diff --git a/SAT/SolicitudesIngresoSat.aspx.cs b/SAT/SolicitudesIngresoSat.aspx.cs index 50e4be719..4e9d4ba09 100644 --- a/SAT/SolicitudesIngresoSat.aspx.cs +++ b/SAT/SolicitudesIngresoSat.aspx.cs @@ -396,11 +396,11 @@ public partial class SAT_SolicitudesIngresoSat : ClsPaginas { if(e.Row.RowType == DataControlRowType.DataRow) { - if(e.Row.DataKey("Mes").ToString() == "") + if(e.Row.DataKey("Fecha") == "") { - e.Row.Cells[0].Text = "Total"; + // e.Row.Cells[0].Text = "Total"; e.Row.Attributes.Add("class", "Totales"); - + } } } From 61346042d977dff2333a17cf8625e4f22e5f34ef Mon Sep 17 00:00:00 2001 From: MLopez Date: Mon, 14 Nov 2022 10:29:16 -0700 Subject: [PATCH 02/28] Eliminar variables desusadas en solucion para que compile en debug Arreglar typo en RepComprasAFDetalle.aspx.vb --- Bancos/DepositoTerminal.aspx.vb | 12 ++++++------ Compras/RepComprasAFDetalle.aspx.vb | 2 +- 2 files changed, 7 insertions(+), 7 deletions(-) diff --git a/Bancos/DepositoTerminal.aspx.vb b/Bancos/DepositoTerminal.aspx.vb index d1c1b01fc..1a4095086 100644 --- a/Bancos/DepositoTerminal.aspx.vb +++ b/Bancos/DepositoTerminal.aspx.vb @@ -142,8 +142,8 @@ Partial Class Bancos_DepositoTerminal IdCuentaBancaria = 0 IdCuentaBancariaComplementaria = 0 - CveCuentaBancaria = 0 - CveCuentaBancariaComplementaria = 0 + 'CveCuentaBancaria = 0 + 'CveCuentaBancariaComplementaria = 0 End If If UsuarioActual.Empresa.Funcionalidad(505) <> "1" Then @@ -259,7 +259,7 @@ Partial Class Bancos_DepositoTerminal ViewState("IdCtaContRetISR") = ObjCliente.IdCtaContRetISR IdCuentaBancaria = 0 - CveCuentaBancaria = 0 + 'CveCuentaBancaria = 0 End If If gvr.DataKey("CveMoneda").ToEntero = 2 Then @@ -436,14 +436,14 @@ Partial Class Bancos_DepositoTerminal Next If IdCuentaBancariaComplementaria > 0 Then - If Not ObjContabilidad.AddPrePolizasDetalle(NuevaCvePrePoliza, False, TxtImporte.Text.ToDecimal, "", 30, "", TxtFecha.Text.ToDate, IdCuentaBancaria, -1, CveIE, -1, -1, -1, -1, ImporteMX:=TxtImporte.Text.ToDecimal, CveCuenta:=CveCuentaBancaria) Then + If Not ObjContabilidad.AddPrePolizasDetalle(NuevaCvePrePoliza, False, TxtImporte.Text.ToDecimal, "", 30, "", TxtFecha.Text.ToDate, IdCuentaBancaria, -1, CveIE, -1, -1, -1, -1, ImporteMX:=TxtImporte.Text.ToDecimal) Then MsgError = "No se pudo insertar la póliza" End If - If Not ObjContabilidad.AddPrePolizasDetalle(NuevaCvePrePoliza, False, TxtImporte.Text.ToDecimal, "", 30, "", TxtFecha.Text.ToDate, IdCuentaBancariaComplementaria, -1, CveIE, -1, -1, -1, -1, ImporteMX:=TxtImporte.Text.ToDecimal, CveCuenta:=CveCuentaBancariaComplementaria) Then + If Not ObjContabilidad.AddPrePolizasDetalle(NuevaCvePrePoliza, False, TxtImporte.Text.ToDecimal, "", 30, "", TxtFecha.Text.ToDate, IdCuentaBancariaComplementaria, -1, CveIE, -1, -1, -1, -1, ImporteMX:=TxtImporte.Text.ToDecimal) Then MsgError = "No se pudo insertar la póliza" End If Else - If Not ObjContabilidad.AddPrePolizasDetalle(NuevaCvePrePoliza, False, TxtImporte.Text.ToDecimal, "", 30, "", TxtFecha.Text.ToDate, IdCuentaBancaria, -1, CveIE, -1, -1, -1, -1, ImporteMX:=TxtImporte.Text.ToDecimal, CveCuenta:=CveCuentaBancaria) Then + If Not ObjContabilidad.AddPrePolizasDetalle(NuevaCvePrePoliza, False, TxtImporte.Text.ToDecimal, "", 30, "", TxtFecha.Text.ToDate, IdCuentaBancaria, -1, CveIE, -1, -1, -1, -1, ImporteMX:=TxtImporte.Text.ToDecimal) Then MsgError = "No se pudo insertar la póliza" End If End If diff --git a/Compras/RepComprasAFDetalle.aspx.vb b/Compras/RepComprasAFDetalle.aspx.vb index f63896887..38b0e8adc 100644 --- a/Compras/RepComprasAFDetalle.aspx.vb +++ b/Compras/RepComprasAFDetalle.aspx.vb @@ -392,7 +392,7 @@ Partial Class Compras_RepComprasAFDetalle params.Add(New ReportParameter("FechaImpresion", Now.ToDateTime.ToShortDateString)) If Imagen.Exists Then - pparams.Add(New ReportParameter("LogoPath", $"file://{Imagen.FullName}")) + params.Add(New ReportParameter("LogoPath", $"file://{Imagen.FullName}")) Else params.Add(New ReportParameter("LogoPath", "")) End If From 2ec1e363823e96131b4757405d09a9527c5c56a6 Mon Sep 17 00:00:00 2001 From: MLopez Date: Mon, 14 Nov 2022 12:40:13 -0700 Subject: [PATCH 03/28] =?UTF-8?q?RH=20Formatos,=20agregar=20nuevas=20etiqu?= =?UTF-8?q?etas=20Empresa=20-=20Se=20agregan=20etiquetas=20de:=20{EmpresaN?= =?UTF-8?q?ombre}=20{EmpresaDireccion}=20{EmpresaCiudad}=20{EmpresaRFC}=20?= =?UTF-8?q?{EmpresaRepresentante}=20=20=20Se=20agrega=20a=20lista=20de=20s?= =?UTF-8?q?ustituci=C3=B3n=20de=20etiquetas=20en=20ClsRH.vb=20=20=20Se=20a?= =?UTF-8?q?grega=20a=20info=20modal=20Etiquetas=20-=20Se=20divide=20en=204?= =?UTF-8?q?=20columnas=20el=20info=20modal=20Etiquetas?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- App_Code/ClsRH.vb | 13 ++++---- RH/CatDocumentos.aspx | 73 +++++++++++++++++++++++-------------------- 2 files changed, 46 insertions(+), 40 deletions(-) diff --git a/App_Code/ClsRH.vb b/App_Code/ClsRH.vb index b5c42d4a8..d07254317 100644 --- a/App_Code/ClsRH.vb +++ b/App_Code/ClsRH.vb @@ -7089,15 +7089,16 @@ chkAplicaVacacion As Boolean, chkAplicaIncapacidad As Boolean, chkAplicaRetardo End If ListaTagsDocumentost.Add(New TagsDocumentos("{Sexo}", DtResultados(0)("Genero").ToString)) - ListaTagsDocumentost.Add(New TagsDocumentos("{NombreEmpresa}", DtResultados(0)("Empresa").ToString)) - Dim SalarioDiarioTag As String = DtResultados(0)("SalarioDiario").ToString.ToDouble.Texto2Letras() - ListaTagsDocumentost.Add(New TagsDocumentos("{Sueldo}", DtResultados(0)("SalarioDiario").ToString.ToDouble.ToString("###,###,###.00"))) ListaTagsDocumentost.Add(New TagsDocumentos("{SueldoLetra}", SalarioDiarioTag)) - ListaTagsDocumentost.Add(New TagsDocumentos("{Nacionalidad}", DtResultados(0)("ClaveSATPaisDescripcion").ToString)) - - + ListaTagsDocumentost.Add(New TagsDocumentos("{Nacionalidad}", DtResultados(0)("ClaveSATPaisDescripcion").ToString)) + + ListaTagsDocumentost.Add(New TagsDocumentos("{EmpresaNombre}", DtResultados(0)("Empresa").ToString)) + ListaTagsDocumentost.Add(New TagsDocumentos("{EmpresaDireccion}", DtResultados(0)("EmpresaDireccion").ToString)) + ListaTagsDocumentost.Add(New TagsDocumentos("{EmpresaCiudad}", DtResultados(0)("EmpresaCiudad").ToString)) + ListaTagsDocumentost.Add(New TagsDocumentos("{EmpresaRFC}", DtResultados(0)("EmpresaRFC").ToString)) + ListaTagsDocumentost.Add(New TagsDocumentos("{EmpresaRepresentante}", DtResultados(0)("EmpresaRepresentante").ToString)) End If diff --git a/RH/CatDocumentos.aspx b/RH/CatDocumentos.aspx index ff6cb37ec..daa2bf274 100644 --- a/RH/CatDocumentos.aspx +++ b/RH/CatDocumentos.aspx @@ -372,23 +372,22 @@