From c29ab3bc1938bc615a861470d26f6caad2409e15 Mon Sep 17 00:00:00 2001 From: Jonathan Alexis Perez Morales Date: Wed, 13 Jul 2022 18:05:21 -0700 Subject: [PATCH] Cambio de nombre en dataset stimulsoft --- App_Code/ClsPaginas.vb | 21 ++++++++++++++++++++- 1 file changed, 20 insertions(+), 1 deletion(-) diff --git a/App_Code/ClsPaginas.vb b/App_Code/ClsPaginas.vb index f6d9bb605..618a4b02b 100644 --- a/App_Code/ClsPaginas.vb +++ b/App_Code/ClsPaginas.vb @@ -7884,7 +7884,26 @@ Public Class ClsPaginas Dim paramsArray As New JArray() For Each rds As ReportDataSource In DataSource - dataSourceArray.Add(New JObject(New JProperty("Nombre", rds.Name), New JProperty("Valor", JArray.Parse(JsonConvert.SerializeObject(rds.Value))))) + Dim Nombre As String = rds.Name + + If RutaReporte.Contains("Factura.mrt") Then + Select Case rds.Name + Case "DsOC" + Nombre = "DtDetalle" + Case "DataSet1" + Nombre = "DtTotales" + Case "DataSet2" + Nombre = "DtFirmas" + Case "DataSet3" + Nombre = "DtImpuestos" + Case "DataSet4" + Nombre = "DtDocumentosRelacionados" + Case "DataSet5" + Nombre = "DtNCVinculadas" + End Select + End If + + dataSourceArray.Add(New JObject(New JProperty("Nombre", Nombre), New JProperty("Valor", JArray.Parse(JsonConvert.SerializeObject(rds.Value))))) Next For Each param As ReportParameter In Parametros