DATOS PARA DESCUENTO

This commit is contained in:
2019-10-14 16:49:29 -07:00
parent e3fa5b67a5
commit 77345d687b
2 changed files with 16 additions and 14 deletions

View File

@@ -6698,10 +6698,12 @@ Public Class ClsPaginas
'If EmpresaActual = 48 Then 'If EmpresaActual = 48 Then
' nombreautorizo = "Lic. LUIS JORGE CONTRERAS LANDGRAVE" ' nombreautorizo = "Lic. LUIS JORGE CONTRERAS LANDGRAVE"
'End If '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 '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 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("SubTotal", ObjOC.SubTotal.ToString))
params.Add(New ReportParameter("SubTotal2", DtDetalle.SUM("Total").ToString)) params.Add(New ReportParameter("SubTotal2", DtDetalle.SUM("Total").ToString))
Else Else
@@ -6768,8 +6770,8 @@ Public Class ClsPaginas
Dim FirmaSol As New System.IO.FileInfo(String.Format("{0}Firmas\{1}.png", EmpresaActual.Ruta, CveUsuarioSol)) 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, ""))) 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)) 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, ""))) 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))
If Archivo.Exists Then If Archivo.Exists Then
bytes = StreamPDF(String.Format("{0}Formatos\OC.rdlc", EmpresaActual.Ruta), DtDetalle, params, $"OC_{ObjOC.Folio.ToString}", RDSName:="DsOC", MR:=MR) bytes = StreamPDF(String.Format("{0}Formatos\OC.rdlc", EmpresaActual.Ruta), DtDetalle, params, $"OC_{ObjOC.Folio.ToString}", RDSName:="DsOC", MR:=MR)
Else Else

View File

@@ -1325,7 +1325,7 @@
</Paragraph> </Paragraph>
</Paragraphs> </Paragraphs>
<rd:DefaultName>Textbox46</rd:DefaultName> <rd:DefaultName>Textbox46</rd:DefaultName>
<Top>6.29975cm</Top> <Top>6.74425cm</Top>
<Left>0.20457cm</Left> <Left>0.20457cm</Left>
<Height>0.45183cm</Height> <Height>0.45183cm</Height>
<Width>15.92855cm</Width> <Width>15.92855cm</Width>
@@ -2347,7 +2347,7 @@
</Paragraph> </Paragraph>
</Paragraphs> </Paragraphs>
<rd:DefaultName>Textbox12</rd:DefaultName> <rd:DefaultName>Textbox12</rd:DefaultName>
<Top>8.49815cm</Top> <Top>8.9744cm</Top>
<Left>3.07712cm</Left> <Left>3.07712cm</Left>
<Height>0.44478cm</Height> <Height>0.44478cm</Height>
<Width>5.83844cm</Width> <Width>5.83844cm</Width>
@@ -2383,7 +2383,7 @@
</Paragraph> </Paragraph>
</Paragraphs> </Paragraphs>
<rd:DefaultName>Textbox12</rd:DefaultName> <rd:DefaultName>Textbox12</rd:DefaultName>
<Top>8.94293cm</Top> <Top>9.41918cm</Top>
<Left>3.07712cm</Left> <Left>3.07712cm</Left>
<Height>0.4095cm</Height> <Height>0.4095cm</Height>
<Width>5.83844cm</Width> <Width>5.83844cm</Width>
@@ -2423,7 +2423,7 @@
</Paragraph> </Paragraph>
</Paragraphs> </Paragraphs>
<rd:DefaultName>Textbox12</rd:DefaultName> <rd:DefaultName>Textbox12</rd:DefaultName>
<Top>9.38771cm</Top> <Top>9.86396cm</Top>
<Left>3.07712cm</Left> <Left>3.07712cm</Left>
<Height>0.44478cm</Height> <Height>0.44478cm</Height>
<Width>5.83844cm</Width> <Width>5.83844cm</Width>
@@ -2459,7 +2459,7 @@
</Paragraph> </Paragraph>
</Paragraphs> </Paragraphs>
<rd:DefaultName>Textbox12</rd:DefaultName> <rd:DefaultName>Textbox12</rd:DefaultName>
<Top>8.49815cm</Top> <Top>8.9744cm</Top>
<Left>11.4732cm</Left> <Left>11.4732cm</Left>
<Height>0.44478cm</Height> <Height>0.44478cm</Height>
<Width>5.83844cm</Width> <Width>5.83844cm</Width>
@@ -2495,7 +2495,7 @@
</Paragraph> </Paragraph>
</Paragraphs> </Paragraphs>
<rd:DefaultName>Textbox12</rd:DefaultName> <rd:DefaultName>Textbox12</rd:DefaultName>
<Top>8.94293cm</Top> <Top>9.41918cm</Top>
<Left>11.4732cm</Left> <Left>11.4732cm</Left>
<Height>0.4095cm</Height> <Height>0.4095cm</Height>
<Width>5.83844cm</Width> <Width>5.83844cm</Width>
@@ -2535,7 +2535,7 @@
</Paragraph> </Paragraph>
</Paragraphs> </Paragraphs>
<rd:DefaultName>Textbox12</rd:DefaultName> <rd:DefaultName>Textbox12</rd:DefaultName>
<Top>9.38771cm</Top> <Top>9.86396cm</Top>
<Left>11.4732cm</Left> <Left>11.4732cm</Left>
<Height>0.44478cm</Height> <Height>0.44478cm</Height>
<Width>5.83844cm</Width> <Width>5.83844cm</Width>
@@ -2555,7 +2555,7 @@
<Source>External</Source> <Source>External</Source>
<Value>=Parameters!FirmaAutorizo.Value</Value> <Value>=Parameters!FirmaAutorizo.Value</Value>
<Sizing>Fit</Sizing> <Sizing>Fit</Sizing>
<Top>6.92797cm</Top> <Top>7.40422cm</Top>
<Left>12.49243cm</Left> <Left>12.49243cm</Left>
<Height>3.5cm</Height> <Height>3.5cm</Height>
<Width>3.5cm</Width> <Width>3.5cm</Width>
@@ -2573,7 +2573,7 @@
<Source>External</Source> <Source>External</Source>
<Value>=Parameters!FirmaSolicito.Value</Value> <Value>=Parameters!FirmaSolicito.Value</Value>
<Sizing>Fit</Sizing> <Sizing>Fit</Sizing>
<Top>6.92797cm</Top> <Top>7.40422cm</Top>
<Left>4.23541cm</Left> <Left>4.23541cm</Left>
<Height>3.5cm</Height> <Height>3.5cm</Height>
<Width>3.5cm</Width> <Width>3.5cm</Width>
@@ -2815,7 +2815,7 @@
</Style> </Style>
</Textbox> </Textbox>
</ReportItems> </ReportItems>
<Height>4.12223in</Height> <Height>4.55973in</Height>
<Style /> <Style />
</Body> </Body>
<Width>8.07504in</Width> <Width>8.07504in</Width>