Cambio de nombre en dataset stimulsoft
This commit is contained in:
@@ -7884,7 +7884,26 @@ Public Class ClsPaginas
|
|||||||
Dim paramsArray As New JArray()
|
Dim paramsArray As New JArray()
|
||||||
|
|
||||||
For Each rds As ReportDataSource In DataSource
|
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
|
Next
|
||||||
|
|
||||||
For Each param As ReportParameter In Parametros
|
For Each param As ReportParameter In Parametros
|
||||||
|
|||||||
Reference in New Issue
Block a user