From 5516cd2bc6d335fd0e52a9453147e1e0c8395960 Mon Sep 17 00:00:00 2001 From: HECTOR RODRIGUEZ Date: Wed, 31 Mar 2021 12:03:31 -0700 Subject: [PATCH 1/3] Cambios para ContaSIG - Saldos Iniciales Cuentas --- General/SaldosIniciales.aspx.vb | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/General/SaldosIniciales.aspx.vb b/General/SaldosIniciales.aspx.vb index 3a88f8496..f37302c1c 100644 --- a/General/SaldosIniciales.aspx.vb +++ b/General/SaldosIniciales.aspx.vb @@ -1981,7 +1981,7 @@ Partial Class General_SaldosIniciales Dim CvePrePoliza As Integer = 0 Dim Cuenta As String = "" Dim Reporte As New StringBuilder - + Dim SubProTemp As DataTable = GlobalDTSubProyectos(-1, -1, CveEmpresa:=UsuarioActual.CveEmpresa) CvePrePoliza = ObjConta.AddPrePolizas("SI", 1, 0, 0, 1, Now.ToDate, "Saldos Iniciales", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) For Each Row As DataRow In dt.Rows @@ -1994,12 +1994,14 @@ Partial Class General_SaldosIniciales Dim CveSubProyecto As Integer = -1 Dim TipoMovto As Boolean = If(Row("Cargo").ToString.ToDecimal <> 0, False, True) Dim YaExiste As Boolean = False + Dim DataTemp As DataTable Dim SubP As String = Row("SubProyecto").ToString If SubP <> "" Then - CveSubProyecto = GlobalDTSubProyectos(-1, -1, CveEmpresa:=UsuarioActual.CveEmpresa, Estatus:=-1).FiltroPrimeroValor("CveSubProyecto", "").ToEntero + DataTemp = SubProTemp.FiltraParametros(String.Format("SubProyecto = '{0}'", SubP)) + CveSubProyecto = DataTemp.FiltroPrimeroValor("CveSubProyecto", "").ToEntero End If - + Cuenta = Cuenta.Replace(" ", "") If ObjConta.GetCuentas(-1, Cuenta.Replace("-", ""), 1, UsuarioActual.CveEmpresa) Then If ObjConta.DtResultados.Rows.Count > 0 Then IdCuenta = ObjConta.DtResultados().FiltroPrimeroValor("CveCuenta").ToEntero From 92497c455d7baca20765e2d8c0c6dc3e70073bf6 Mon Sep 17 00:00:00 2001 From: HECTOR RODRIGUEZ Date: Wed, 31 Mar 2021 12:04:27 -0700 Subject: [PATCH 2/3] Validar Fechas --- OI/RepTareas.aspx | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/OI/RepTareas.aspx b/OI/RepTareas.aspx index bf1d9f034..c0b51ef60 100644 --- a/OI/RepTareas.aspx +++ b/OI/RepTareas.aspx @@ -60,19 +60,19 @@ Estatus: - + Tema: - + - + From 6efd4cd923536fc5694c6a2a3687865919152921 Mon Sep 17 00:00:00 2001 From: HECTOR RODRIGUEZ Date: Wed, 31 Mar 2021 12:04:51 -0700 Subject: [PATCH 3/3] Cambios en reporte y forma de mostrar la informacion --- .../Grales/Formatos/RepTraspasoAlmacen.rdlc | 376 ++++++++++++++++-- Inventarios/RepTraspasoAlmacen.aspx | 11 +- Inventarios/RepTraspasoAlmacen.aspx.vb | 19 +- 3 files changed, 342 insertions(+), 64 deletions(-) diff --git a/Empresas/Grales/Formatos/RepTraspasoAlmacen.rdlc b/Empresas/Grales/Formatos/RepTraspasoAlmacen.rdlc index a5526206a..90d52fea7 100644 --- a/Empresas/Grales/Formatos/RepTraspasoAlmacen.rdlc +++ b/Empresas/Grales/Formatos/RepTraspasoAlmacen.rdlc @@ -80,28 +80,93 @@ - 3.57404cm + 1.23101cm - 2.36927cm + 1.98488cm - 2.15604cm + 1.51446cm - 12.63354cm + 3.83319cm - 1.57396cm + 6.041cm - 1.8105cm + 2.20896cm + + + 2.31165cm + + + 2.50891cm + + + 2.5778cm - 0.4148cm + 0.52063cm + + + + true + true + + + + + Folio + + + + + + + Textbox27 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + Silver + 2pt + 2pt + 2pt + 2pt + + + + @@ -113,6 +178,7 @@ Disponible @@ -168,6 +234,7 @@ Unidad @@ -223,6 +290,7 @@ Código @@ -278,6 +346,7 @@ Producto @@ -331,8 +400,9 @@ - SerieLote + Valor @@ -379,15 +449,16 @@ - + true true - Valor + Alm. Origen @@ -397,7 +468,119 @@ - Textbox6 + Textbox11 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + Silver + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Alm. Destino + + + + + + + Textbox21 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + Silver + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Responsable + + + + + + + Textbox14 + + + + + =IIf(Fields!PS.Value = "", "#9cacc1", "NoColor") + 2pt + 2pt + 2pt + 2pt + + + + @@ -446,9 +663,9 @@ - =IIf(Fields!PS.Value = "", IIf(Fields!FolioSalida.Value > 0,"Folio: " & Fields!FolioSalida.Value,"Total General"), Fields!Cantidad.Value) + =Fields!Cantidad.Value @@ -552,9 +769,9 @@ - =IIf(Fields!PS.Value = "", IIf(Fields!FolioSalida.Value > 0,"Almacén Origen: " & Fields!Almacen.Value & " Almacén Destino: " & Fields!AlmacenDestino.Value & " Responsable: " & Fields!Recibio.Value,""), Fields!PS.Value) + =Fields!PS.Value @@ -579,26 +796,27 @@ - + true true - =Fields!SerieLote.Value + =Fields!Valor.Value - SerieLote + Valor1 @@ -614,27 +832,99 @@ - + true true - =Fields!Valor.Value + =Fields!Almacen.Value - Valor + Almacen + + + =IIf(Fields!PS.Value = "", "#9cacc1", "NoColor") + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Fields!AlmacenDestino.Value + + + + + + + AlmacenDestino + + + =IIf(Fields!PS.Value = "", "#9cacc1", "NoColor") + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Fields!Recibio.Value + + + + + + + Recibio @@ -658,11 +948,10 @@ - - - true - - + + + + @@ -683,8 +972,8 @@ DataSet1 0.17639cm 0.24474cm - 0.90897cm - 24.11735cm + 1.0148cm + 24.21186cm @@ -695,7 +984,7 @@ 0.67394in @@ -770,7 +1059,7 @@ Textbox2 1.07625cm 0.52945cm - 22.55159cm + 24.4566cm 1