From 77345d687b76f9b073ee9f419f4f8bfffb26a9c9 Mon Sep 17 00:00:00 2001 From: Jonathan Alexis Perez Morales Date: Mon, 14 Oct 2019 16:49:29 -0700 Subject: [PATCH] DATOS PARA DESCUENTO --- App_Code/ClsPaginas.vb | 10 ++++++---- Empresas/Grales/Formatos/OC.rdlc | 20 ++++++++++---------- 2 files changed, 16 insertions(+), 14 deletions(-) diff --git a/App_Code/ClsPaginas.vb b/App_Code/ClsPaginas.vb index 39e5d6f62..d7a1a565b 100644 --- a/App_Code/ClsPaginas.vb +++ b/App_Code/ClsPaginas.vb @@ -6698,10 +6698,12 @@ Public Class ClsPaginas 'If EmpresaActual = 48 Then ' nombreautorizo = "Lic. LUIS JORGE CONTRERAS LANDGRAVE" 'End If - + Dim Archivo As New System.IO.FileInfo(String.Format("{0}Formatos\OC.rdlc", EmpresaActual.Ruta)) + If Not Archivo.Exists OrElse EmpresaActual.CveEmpresa.Contiene(4, 145, 7, 11, 12, 72, 80, 122, 126) Then + params.Add(New ReportParameter("Descuento", DtDetalle.SUM("Descuento").ToString.FormatoNumero(2))) + End If 'DATOS PARA DESCUENTO If EmpresaActual.CveEmpresa.Contiene(4, 145, 7, 11, 12, 72, 80, 122, 126) Then 'EMPRESAS QUE YA TIENEN EL AJUSTE EN EL FORMATO - params.Add(New ReportParameter("Descuento", DtDetalle.SUM("Descuento").ToString.FormatoNumero(2))) params.Add(New ReportParameter("SubTotal", ObjOC.SubTotal.ToString)) params.Add(New ReportParameter("SubTotal2", DtDetalle.SUM("Total").ToString)) Else @@ -6768,8 +6770,8 @@ Public Class ClsPaginas Dim FirmaSol As New System.IO.FileInfo(String.Format("{0}Firmas\{1}.png", EmpresaActual.Ruta, CveUsuarioSol)) params.Add(New ReportParameter("FirmaSolicito", If(FirmaSol.Exists, New Uri(Server.MapPath(String.Format("~/Empresas/{0}/Firmas/{1}.png", EmpresaActual.CveEmpresa, CveUsuarioSol))).AbsoluteUri, ""))) Dim FirmaAut As New System.IO.FileInfo(String.Format("{0}Firmas\{1}.png", EmpresaActual.Ruta, CveUsuarioAut)) - params.Add(New ReportParameter("FirmaAutorizo", If(FirmaAut.Exists, New Uri(Server.MapPath(String.Format("~/Empresas/{0}/Firmas/{1}.png", EmpresaActual.CveEmpresa, CveUsuarioAut))).AbsoluteUri, ""))) - Dim Archivo As New System.IO.FileInfo(String.Format("{0}Formatos\OC.rdlc", EmpresaActual.Ruta)) + params.Add(New ReportParameter("FirmaAutorizo", If(FirmaAut.Exists, New Uri(Server.MapPath(String.Format("~/Empresas/{0}/Firmas/{1}.png", EmpresaActual.CveEmpresa, CveUsuarioAut))).AbsoluteUri, ""))) + If Archivo.Exists Then bytes = StreamPDF(String.Format("{0}Formatos\OC.rdlc", EmpresaActual.Ruta), DtDetalle, params, $"OC_{ObjOC.Folio.ToString}", RDSName:="DsOC", MR:=MR) Else diff --git a/Empresas/Grales/Formatos/OC.rdlc b/Empresas/Grales/Formatos/OC.rdlc index 6ffde63c2..0d6424443 100644 --- a/Empresas/Grales/Formatos/OC.rdlc +++ b/Empresas/Grales/Formatos/OC.rdlc @@ -1325,7 +1325,7 @@ Textbox46 - 6.29975cm + 6.74425cm 0.20457cm 0.45183cm 15.92855cm @@ -2347,7 +2347,7 @@ Textbox12 - 8.49815cm + 8.9744cm 3.07712cm 0.44478cm 5.83844cm @@ -2383,7 +2383,7 @@ Textbox12 - 8.94293cm + 9.41918cm 3.07712cm 0.4095cm 5.83844cm @@ -2423,7 +2423,7 @@ Textbox12 - 9.38771cm + 9.86396cm 3.07712cm 0.44478cm 5.83844cm @@ -2459,7 +2459,7 @@ Textbox12 - 8.49815cm + 8.9744cm 11.4732cm 0.44478cm 5.83844cm @@ -2495,7 +2495,7 @@ Textbox12 - 8.94293cm + 9.41918cm 11.4732cm 0.4095cm 5.83844cm @@ -2535,7 +2535,7 @@ Textbox12 - 9.38771cm + 9.86396cm 11.4732cm 0.44478cm 5.83844cm @@ -2555,7 +2555,7 @@ External =Parameters!FirmaAutorizo.Value Fit - 6.92797cm + 7.40422cm 12.49243cm 3.5cm 3.5cm @@ -2573,7 +2573,7 @@ External =Parameters!FirmaSolicito.Value Fit - 6.92797cm + 7.40422cm 4.23541cm 3.5cm 3.5cm @@ -2815,7 +2815,7 @@ - 4.12223in + 4.55973in