Pass parameter to another report

Hello
I am using report 10g, I want to call another report from within the report, but my problem is that i want to pass the parameter like custid from the running report as a parameter to the second report.
Please help me
Thanks
Hardip

Hardip,
on teh web you use a hyperlink in Oracle Reports that calls the next Report via a relative URL addressing. Check teh Reports documentation about hyperlink items.
Frank

Similar Messages

  • Pass parameter to another block

    I try to pass parameter to another block. but i have error message.
    error:PL/SQL: ORA-00904: "C1DATA_REF"."c": invalid identifier.
    Would you help me?
    ___________________________+++my code+++
    CREATE OR REPLACE PROCEDURE GETID
    (a IN TEST.COUNTRY%TYPE,
    b IN TEST.STATE%TYPE) AS
    V_ID TEST2.c%TYPE;
    CURSOR C1_DATA IS
    SELECT a,b,c FROM TESTSURVEYUNITS WHERE COUNTRY=a
    AND STATE=b ;
    BEGIN
    BEGIN
    FOR C1DATA_REF IN C1_DATA LOOP
    DBMS_OUTPUT.PUT_LINE ('SVU_ID IS:' || C1DATA_REF.c);
    END LOOP;
    END;
    BEGIN
    SELECT e,f,g,c FROM TEST2 WHERE SVU_ID=C1DATA_REF.c;
    DBMS_OUTPUT.PUT_LINE('PART 2'||C1DATA_REF.c||C1DATA_REF.e);
    END;
    END;

    Here it is reformatted. The SELECT statement in the second block won't work because there is no INTO clause and also because the cursor for loop in the previous block is out of scope. The loop has fetched all of its rows and has completed. What are you trying to do with the second select statement?
    CREATE OR REPLACE
    PROCEDURE GETID (a IN TEST.COUNTRY%TYPE
                    ,b IN TEST.STATE%TYPE) AS
    V_ID TEST2.c%TYPE;
    CURSOR C1_DATA IS
    SELECT a,b,c
    FROM   TESTSURVEYUNITS
    WHERE  COUNTRY=a
    AND    STATE=b ;
    BEGIN
       BEGIN
          FOR C1DATA_REF IN C1_DATA LOOP
             DBMS_OUTPUT.PUT_LINE ('SVU_ID IS:' || C1DATA_REF.c);
          END LOOP;
       END;
       BEGIN
          SELECT e,f,g,c
          FROM   TEST2
          WHERE  SVU_ID=C1DATA_REF.c;
          DBMS_OUTPUT.PUT_LINE('PART 2'||C1DATA_REF.c||C1DATA_REF.e);
       END;
    END;

  • Pass parameter to ssrs report in performance point webpart from textbox text

    How to pass parameter to ssrs report  in performance point webpart from textbox text
    Please help me to solve this ...
    Bikky Kumar

    Edit your SharePoint page and add new text filter web part.
    Then pass the text filter value to your performance point report using connections. Your report should include at least one parameter to get the value. More over you can set default value in text filter.

  • In Drill through report pass hyperlink value as parameter to another report using ssrs 2008 R2

    Hi All,
    I have one drill through SSRS report in which if I click one hyperlink in the summmary report it should be passed as parameter for detail report, like this....
    Summary:
    AccountType
    A1
    A2
    If I click A1 then that should be passed as parameter to detail report and display A1 data in detail report
    If I click A2 then that should be passed as parameter to detail report and display A2 data in detail report.
    Please give me some ideas or expression code to achieve this in using SSRS 2008R2. Its very urgent.
    Thanks,
    RH
    sql

    Thanks the folowing is my source data for the parameter I am including to the drill through
    SELECT DISTINCT
    case
    when EA_STATUS in ('E4', 'U4', 'P5', '02', '03', '04','B2','B3','B4','12')
    then CAST('Project' AS VARCHAR(15))
    else CAST('Non-Project' AS VARCHAR(15))
    end as EA_PROJECT_GROUP_DESC
    FROM TEAMS.FMPROD_V_EA
    As you can see it has only 2 values.So how do you suggest I wirte the expression to include in the report.
    The name of the parameter I will be using is EAProjectGroup.but below is the error I am getting trying to run the report
    rsMissingFieldInDataSet] The dataset Trends contains a definition for the Field EA_PROJECT_GROUP_DESC. This field is missing from the returned result set from the data source.
    [rsErrorReadingDataSetField] The dataset Trends contains a definition for the Field EA_PROJECT_GROUP_DESC. The data extension returned an error during reading the field. There is no data for the field at position 45.
    Preview complete -- 0 errors, 72 warnings
    what does the position 45 mean?

  • How to pass parameter form one report to another and run it. No web page

    Using Crystal Reports XI, Win XP pro SP2.  I have main report I want to set a field as a hyperlink when user clicks on it I want to pass the value of that filed as an input to another report and run it . Note that this is not a Web page (no HTTP://). It is not what is described on article 1212 849.

    You can remove the field value and right click on the on demand subreport and go to format subreport and in sureport tab-->use on demand subreport caption X+2 and place the field value in it.
    Regards,
    Raghavendra

  • Forms Personalization - How to pass parameter to a Report

    Hi All,
    I am trying to run a report from a menu entry in the AP Invoice entry form. For this I have done the necessary steps of creating the menu entry and am assigning the values for the 2 parameters to a global variable and then launching SRS form.
    In SRS form created an action to assign the global variable value to work_order.parameters. I can invoke the SRS OK except that my 2 parameter values appear concatenated in the first parameter itself and are not getting assigned to each of them seperately.
    my global variable assignment is as follows :
    =${item.inv_sum_folder.vendor_name.value}||'.'||${item.inv_sum_folder.vendor_site_code.value}
    and my work_order.parameters value assignment is as follows :
    =select nvl(${global.kmg_invalid_po_gv.value}, ${item.work_order.parameters.value}) from dual
    Any ideas why this is not working ?
    Thanks in advance.
    Shankar

    Hi Prudhvi,
    Thanks for reply.
    I have actually seen it work for another report 'Supplier Payment Listing' (there are a few ppt presentations of this on the internet, can dig it out if reqd)
    The Select of the Single Query is assigned using INTO to the output variables. Just as you can use these output variables anywhere in the message you can also use them as parameters to pass to a concurrent prorgam or a function.
    However, when I try to mimick what i saw with above report for my custom report it somehow cannot distinguish between the parameters and treats them as 1 parameter value.
    I believe the parameters need to be seperated by a period(.) when assigning to global variables.
    Thanks
    Shankar

  • Help Needed in passing parameter to cryst report

    Hello everyone, I am trying to create a report for a single record and as such am trying to pass parameters to a crystal report but I am not sure exactly how to do this. This is my own method that I am employeeing. I do not want to create a data table and put all the info I need in there and then base a report off of it. I do not want to deal with loops and arrays right now. I just want to pass for example parameter JuvenileID = 1 to my crystal report, then create a command under the database expert and set the parameter for my command to the parameter I passed my crystal report. How would I go about in doing this? I am using VS 2010 C#. This is a windows application. I have a dataentry form that is already populated with the info needed for the report. I just need to pass all the controls.text values to the report and populate it that way.

    I'm not sure if I fully understand the issue, but since you have all the data you need in a data entry form that is already populated, why don't you simple create an ADO .NET Dataset and pass that to the report? Much easier to implement, faster execution with the small amount of data you have and less code.
    Dataset sample app is here:
    https://wiki.sdn.sap.com/wiki/display/BOBJ/CrystalReportsfor.NETSDK+Samples
    More info on datasets is here:
    [1511438 - How to use datasets to pass data to crystal reports|http://www.sdn.sap.com/irj/servlet/prt/portal/prtroot/com.sap.km.cm.docs/oss_notes_boj/sdn_oss_boj_bi/sap(bD1lbiZjPTAwMQ==)/bc/bsp/spn/scn_bosap/notes%7B6163636573733d36393736354636443646363436353344333933393338323636393736354637333631373036453646373436353733354636453735364436323635373233443330333033303331333533313331333433333338%7D.do].
    - Ludek

  • Passing Parameter to Crystal Report

    Hi Experts,
    I have created and designed a Report in Crystal Report 2005. I am displaying the report in SAP B1 using Win Form . Here I want to pass 2 parameters to Report ---@FromDate and @ToDate . I have coded to pass these two parameters this way :
    Dim RptDoc As New ReportDocument
            Dim ParamValue As String = String.Empty
            Dim crtableLogoninfos As New CrystalDecisions.Shared.TableLogOnInfos
            Dim crtableLogoninfo As New CrystalDecisions.Shared.TableLogOnInfo
            Dim crConnectionInfo As New CrystalDecisions.Shared.ConnectionInfo
            Dim CrTables As CrystalDecisions.CrystalReports.Engine.Tables
            Dim CrTable As CrystalDecisions.CrystalReports.Engine.Table
            Try
                RptDoc.Load(Application.StartupPath() & "\" & ReportName & ".rpt")
                RptDoc.SetParameterValue("@FromDate", "01/01/2008")
                RptDoc.SetParameterValue("@ToDate", "12/31/2008")
                Dim oForm_ReportViewer As Frm_ReportViewer = New Frm_ReportViewer()
                oForm_ReportViewer.CRViewer.ReportSource = RptDoc
                With crConnectionInfo
                    .ServerName = oCompany.Server  '"(local)"
                    .DatabaseName = oCompany.CompanyDB '"SBODemoIn"
                    .UserID = oCompany.DbUserName
                    .Password = "manager@123" 'oCompany.DbPassword
                 End With
                 CrTables = RptDoc.Database.Tables
                'Loop through each table in the report and apply the
                'LogonInfo information
                For Each CrTable In CrTables
                    crtableLogoninfo = CrTable.LogOnInfo
                    crtableLogoninfo.ConnectionInfo = crConnectionInfo
                    CrTable.ApplyLogOnInfo(crtableLogoninfo)
                Next
               oForm_ReportViewer.Text = frmTitle
                oForm_ReportViewer.WindowState = FormWindowState.Maximized
                oForm_ReportViewer.ShowDialog()
            Catch Ex As Exception
                MessageBox.Show(Ex.ToString)
            End Try
      But When I view the report in B1 , it throws an Exception "Report or Procedure expects parameter @FromDate which is not    supplied. "
    Please help me where I am making mistake , what could be the cause of this exception..
    Thanks and Regards,
    Pooja Singh.

    Hi Pooja Singh,
    You have only set Dim ParamValue As String = String.Empty.  Where are two parameter @FromDate and @ToDate?
    SetParameterValue will only work if you have defined the parameters already and the parameters have the right format.
    You may check this thread:
    Re: Crystal report open instead of PLD with same form reference.
    Thanks,
    Gordon

  • Passing Parameter from Main report to SQL command-based subreport

    I am trying to cut down the run time of my reports and have recently figured out how to write SQL commands to limit the data by filtering prior to being pulled into the reports.  However, many of my reports rely on multiple sub reports, which can cause a dramatic 'drag' on the report.
    I am trying to filter the SQL command used in my sub report by passing the group parameter, which is selected by the user in the main report, to the sub report's SQL command.  Without this parameter, the sub report has to sort through a lot more data than it would with this parameter, making the run time extremely slow.
    Any suggestions on how I can accomplish this?
    Thanks for any help you can provide,
    Marlene Allen
    Crystal Reports Developer
    Crystal Reports Professional;
    Product Type: Full;
    Product Version 11.5

    Hi Marlene,
    I don't believe you can pass a CR parameter to a Command object.
    I suggest replacing all of the Command Objects with a Stored Procedure so all of the data filtering is done server side. DB servers are much more proficient at collecting the data and filtering than CR will ever be. It will also allow you to replace subreports to also speed up your report processing. All depends on your layout of course but something to look at.
    Thank you
    Don

  • How to pass parameter to a report for Operator 'LIKE'

    I need to pass a parameter to a report for "LIKE" operator. the parameter for "equal to or is in" operator is 'eq':
    'https://secure-ausomxfts.crmondemand.com/OnDemand/user/analytics/saw.dll?Go&Path=/shared/Company_AFTA-D78SR_Shared_Folder/Work Order Asset Lookup&Options=r&Action=Navigate&P0=2&P1=eq&P2=Account.TEXT_61&P3=&p4=
    What would 'p1' value for 'LIKE' operator?
    Thanks

    Hi, Hope the below helps
    neq - Not equal to or not in
    lt - Less than
    gt - Greater than
    ge - Greater than or equal to
    le - Less than or equal to
    bwith - Begins with
    ewith - Ends with
    cany - Contains any (of the values in &P3)
    call - Contains all (of the values in &P3)
    like - Is like (Type %25 rather than the % wildcard)
    top - In the top n (&P3 contains 1+n, where n is the number of top items)
    bottom - In the bottom n (&P3 contains 1+n, where n is the number of bottom
    items)
    bet - Between (&P3 must have two values)
    null - Is null (&P3 must be 0 or omitted)
    nnul - Is not null (&P3 must be 0 or omitted)
    Venky CRMIT

  • Most urgent:::: passing parameter list  to reports containing record groups

    hi
    can any one help me , i am getting frm-41214 when i pass a paramter list containing record group as data parameter to run_report_object as parameter, calling report from forms 10g, but when i dont pass the parameter list the report runs displaying no data(as it should do), otherwise it dont run and display the frm-41214
    zulfiqar

    Hi!
    To suppress Oracle Reports native Parameter Form just add:
    add_parameter( pl_id, 'pARAMform', text_parameter, 'NO' );
    Andrew Velichko
    Brainbench MVP for Oracle Developer 2000 http://www.brainbench.com
    null

  • Pass parameter to another page and stay on same page?

    Greeting EveryBody,,,
    as u can see from the subject
    im trying to pass parameter from one page to another but i want to stay on the original page???
    can be done or not? and how?
    examples are welcomed
    thanx in advance
    best regards
    carlito

    i have three pages displayed all by <frameset>
    and i want to pass parameter from one page to another without going to any page!!! i.e. staying on the main page
    hope it clear now....
    best wishes

  • Passing parameter from WEBI report to xcelsius

    hi
    i transfered the parameter from WEBI report (3.1 sp2) table using a link to a gauhe from xcelsius
    i can see the parameter the right number in the gauge value but the problem is that the pin does not move

    How are you connecting your report to Xcelsius? Live Office or QAAWS?

  • Pass parameter to a report link

    HI,
    This is what I am trying to do:
    I want to create a report with 2 parameters - FromDate and ToDate.
    The report link will be something like this - http://xyx.com/report1FromDate=1jan2012&ToDate=31jan2012
    What I want is the users to change the date range in this URL and the report should automatically filter out the date selected. Is this possible? Has anyone does this before?
    So when the user runs this report and wants to run for some other date, they will just modify the URL and the report will run for Feb as an example shown below:
    http://xyx.com/report1FromDate=1feb2012&ToDate=29Feb2012
    Edited by: 920645 on Mar 21, 2012 11:21 AM

    It's not what you're doing wrong, but there is more right you can do.
    In the Report, on the Customization Form Display Options Tab, make sure "Make Public" is checked for your Bind Parameter (:CNTRYLOC).
    In the Page Properties, on the Parameters Tab, Add a Page parameter for CNTRYLOC. (I usually use the same name for the Page Parameter as the Report's Bind Parm. Warning: These parameters are CASE-SENSITIVE in places.)
    Still on the Page Properties Parameters Tab, Expand the list of Portlets at the bottom and map your Portlet Parameter to the Page parameter you just made.
    Hope that helps!

  • Problem passing parameter to crystal report subreport from *.aspx page

    Background:
    I am developing a .NET web application using Visual Studio 2005. The code behind is in VB.net. One of my asp.net pages calls a report, which is invoked when the user clicks a Print button. I have developed this report using the Crystal Reports software that is bundled with Visual Studio 2005. I am passing one parameter from the asp.net page (utilizing the VB.net code-behind on the Print button) to the Crystal report. The report consists of a main report and 5 subreports. Both the main report and the subreports use the same parameter. Both the main report and the subreports are bound to stored procedures, each of which require a parameter.
    Problem:
    For some reason, the parameter is not being passed from the asp.net page to the report. I am receiving the following error: "CrystalDecisions.CrystalReports.Engine.ParameterField.CurrentValueException: Missing Parameter Values." However, when I remove the subreports, the parameter gets passed, and the report is invoked with no problem.
    I have read in other forums that there may be an issue with the Crystal Reports software that is causing this problem. I have downloaded and run the suggested hotfix, but the problem remains unresolved. I have tried changing the linking of my main report to the subreport, but that doesn't help either. It is possible that I am doing something wrong with the linking, as this is the first time I have developed a report with Crystal Reports. I need a workaround or definitive solution. Below is the aspx code used to call the report:
    Imports System
    Imports System.Collections.Specialized
    Imports System.Collections.ObjectModel
    Imports System.Collections
    Imports System.Text
    Imports System.Configuration
    Imports System.Data.SqlClient
    Imports System.Data
    Imports System.Data.SqlClient.SqlDataAdapter
    Imports System.Web.Configuration
    Imports Crystaldecisions.crystalreports.engine
    Imports Crystaldecisions.reportsource
    Imports Crystaldecisions.shared
    Partial Class OACIS_Award_or_Deny_BudgetSummary_PrintRpt
    Inherits System.Web.UI.Page
    Dim paramFields As ParameterFieldDefinitions
    Dim paramField As ParameterFieldDefinition
    Dim paramValue As ParameterValues
    Dim paramDiscreteValue As New ParameterDiscreteValue
    Public Shared idCase, nameRpt As String
    Private PrintRpt As ReportDocument
    Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    Try
    idCase = Request.QueryString("id")
    nameRpt = Request.QueryString("prtName")
    Dim config As Configuration = WebConfigurationManager.OpenWebConfiguration("~/")
    Dim settings As AppSettingsSection = DirectCast(config.GetSection("appSettings"), AppSettingsSection)
    Dim file As String = settings.File
    Dim dSource, iCatalog, userIs, passUser, appString As String
    dSource = Nothing
    iCatalog = Nothing
    userIs = Nothing
    passUser = Nothing
    appString = config.ConnectionStrings.ConnectionStrings("OacisConn").ToString()
    Dim AppArray() As String = Split(appString, ";")
    Dim arrayLgth As Integer = AppArray.Length
    Dim i As Integer
    For i = 0 To arrayLgth - 1
    Dim pairIs() As String = Split(AppArray(i), "=")
    Dim firstItem As String = pairIs(0)
    Dim secondItem As String = pairIs(1)
    If firstItem = "Data Source" Then : dSource = secondItem : End If
    If firstItem = "Initial Catalog" Then : iCatalog = secondItem : End If
    If firstItem = "UID" Then : userIs = secondItem : End If
    If firstItem = "PWD" Then : passUser = secondItem : End If
    Next
    Dim crReportDocument As ReportDocument
    Dim crExportOptions As ExportOptions
    Dim crDiskFileDestinationOptions As DiskFileDestinationOptions
    Dim crconnectioninfo As ConnectionInfo
    Dim crDatabase As Database
    Dim crtables As Tables
    Dim crtable As Table
    Dim crtablelogoninfo As TableLogOnInfo
    Dim Fname As String
    Dim Prtname As String
    Dim FPath As String
    Dim crSection As Section
    Dim crReportObject As ReportObject
    Dim crSubreportObject As SubreportObject
    Dim subRepDoc As New ReportDocument
    FPath = Server.MapPath("") + "\"
    Dim rptIs As String = nameRpt
    crReportDocument = New ReportDocument
    Prtname = FPath
    Prtname = Prtname + rptIs
    crReportDocument.Load(Prtname)
    Fname = "C:\WINDOWS\TEMP\" & Session.SessionID.ToString & ".pdf"
    crconnectioninfo = New ConnectionInfo
    crconnectioninfo.ServerName = dSource
    crconnectioninfo.DatabaseName = iCatalog
    crconnectioninfo.UserID = userIs
    crconnectioninfo.Password = passUser
    crDatabase = crReportDocument.Database
    crtables = crDatabase.Tables
    For Each crtable In crtables
    Try
    crtablelogoninfo = crtable.LogOnInfo
    crtablelogoninfo.ConnectionInfo = crconnectioninfo
    crtable.ApplyLogOnInfo(crtablelogoninfo)
    crtable.SetDataSource(Prtname)
    crtablelogoninfo.ConnectionInfo.DatabaseName = iCatalog
    crtablelogoninfo.ConnectionInfo.UserID = userIs
    crtablelogoninfo.ConnectionInfo.Password = passUser
    crtable.ApplyLogOnInfo(crtablelogoninfo)
    crtable.Location = iCatalog + ".dbo." + crtable.Name
    Catch ex As Exception
    Response.Write(ex)
    Exit Sub
    End Try
    Next crtable
    For Each crSection In crReportDocument.ReportDefinition.Sections
    For Each crReportObject In crSection.ReportObjects
    If crReportObject.Kind = ReportObjectKind.SubreportObject Then
    crSubreportObject = CType(crReportObject, SubreportObject)
    subRepDoc = crSubreportObject.OpenSubreport(crSubreportObject.SubreportName)
    For Each crtable In subRepDoc.Database.Tables
    Try
    crtablelogoninfo = crtable.LogOnInfo
    crtablelogoninfo.ConnectionInfo = crconnectioninfo
    crtable.ApplyLogOnInfo(crtablelogoninfo)
    crtable.SetDataSource(Prtname)
    crtablelogoninfo.ConnectionInfo.DatabaseName = iCatalog
    crtablelogoninfo.ConnectionInfo.UserID = userIs
    crtablelogoninfo.ConnectionInfo.Password = passUser
    crtable.ApplyLogOnInfo(crtablelogoninfo)
    crtable.Location = iCatalog + ".dbo." + crtable.Name
    Catch ex As Exception
    End Try
    Next
    End If
    Next
    Next
    crDiskFileDestinationOptions = New DiskFileDestinationOptions()
    crDiskFileDestinationOptions.DiskFileName = Fname
    crExportOptions = crReportDocument.ExportOptions
    With crExportOptions
    .DestinationOptions = crDiskFileDestinationOptions
    .ExportDestinationType = ExportDestinationType.DiskFile
    .ExportFormatType = ExportFormatType.PortableDocFormat
    End With
    Dim parIDCase As ParameterValues = New ParameterValues
    Dim disIDCase As ParameterDiscreteValue = New ParameterDiscreteValue
    disIDCase.Value = idCase
    parIDCase.Add(disIDCase)
    crReportDocument.DataDefinition.ParameterFields("@ID_CASE_NMBR").ApplyCurrentValues(parIDCase)
    crReportDocument.Export()
    Response.ClearContent()
    Response.ClearHeaders()
    Response.ContentType = "application/pdf"
    Response.WriteFile(Fname)
    Response.Flush()
    Response.Close()
    System.IO.File.Delete(Fname)
    Catch ex As Exception
    lblMessage.Visible = True
    lblMessage.Text = "Error Load
    " & Convert.ToString(ex)
    End Try
    End Sub
    End Class
    Your help is greatly appreciated!

    Thanks for your help!
    I've now gotten past the "missing parameter values" error, and the report renders fine in the report viewer.  However, I've encounted another problem.  The data in my main report displays correctly, but the data in my subreport does not display.  Of course, when I view the report in the designer, both the main report and subreport display correctly.  What am I doing wrong?  Below is my vb.net code:
            Try
                idCase = Request.QueryString("id")
                nameRpt = Request.QueryString("prtName")
                Dim config As Configuration = WebConfigurationManager.OpenWebConfiguration("~/")
                Dim settings As AppSettingsSection = DirectCast(config.GetSection("appSettings"), AppSettingsSection)
                Dim file As String = settings.File
                Dim dSource, iCatalog, userIs, passUser, appString As String
                dSource = Nothing
                iCatalog = Nothing
                userIs = Nothing
                passUser = Nothing
                appString = config.ConnectionStrings.ConnectionStrings("OacisConn").ToString()
                Dim AppArray() As String = Split(appString, ";")
                Dim arrayLgth As Integer = AppArray.Length
                Dim i As Integer
                For i = 0 To arrayLgth - 1
                    Dim pairIs() As String = Split(AppArray(i), "=")
                    Dim firstItem As String = pairIs(0)
                    Dim secondItem As String = pairIs(1)
                    If firstItem = "Data Source" Then : dSource = secondItem : End If
                    If firstItem = "Initial Catalog" Then : iCatalog = secondItem : End If
                    If firstItem = "UID" Then : userIs = secondItem : End If
                    If firstItem = "PWD" Then : passUser = secondItem : End If
                Next
                Dim crReportDocument As ReportDocument
                Dim crExportOptions As ExportOptions
                Dim crDiskFileDestinationOptions As DiskFileDestinationOptions
                Dim crconnectioninfo As ConnectionInfo
                Dim crDatabase As Database
                Dim crtables As Tables
                Dim crtable As Table
                Dim crtablelogoninfo As TableLogOnInfo
                Dim Fname As String
                Dim Prtname As String
                Dim FPath As String
                Dim crSection As Section
                Dim crReportObject As ReportObject
                Dim crSubreportObject As SubreportObject
                Dim subRepDoc As New ReportDocument
                FPath = Server.MapPath("") + "\"
                Dim rptIs As String = nameRpt
                crReportDocument = New ReportDocument
                Prtname = FPath
                Prtname = Prtname + rptIs
                crReportDocument.Load(Prtname)
                Fname = "C:\WINDOWS\TEMP\" & Session.SessionID.ToString & ".pdf"
                crconnectioninfo = New ConnectionInfo
                crconnectioninfo.ServerName = dSource
                crconnectioninfo.DatabaseName = iCatalog
                crconnectioninfo.UserID = userIs
                crconnectioninfo.Password = passUser
                crDatabase = crReportDocument.Database
                crtables = crDatabase.Tables
                For Each crtable In crtables
                    Try
                        crtablelogoninfo = crtable.LogOnInfo
                        crtablelogoninfo.ConnectionInfo = crconnectioninfo
                        crtable.ApplyLogOnInfo(crtablelogoninfo)
                        crtable.SetDataSource(Prtname)
                        crtablelogoninfo.ConnectionInfo.DatabaseName = iCatalog
                        crtablelogoninfo.ConnectionInfo.UserID = userIs
                        crtablelogoninfo.ConnectionInfo.Password = passUser
                        crtable.ApplyLogOnInfo(crtablelogoninfo)
                        crtable.Location = iCatalog + ".dbo." + crtable.Name
                    Catch ex As Exception
                        Response.Write(ex)
                        Exit Sub
                    End Try
                Next crtable
                For Each crSection In crReportDocument.ReportDefinition.Sections
                    For Each crReportObject In crSection.ReportObjects
                        If crReportObject.Kind = ReportObjectKind.SubreportObject Then
                            crSubreportObject = CType(crReportObject, SubreportObject)
                            subRepDoc = crSubreportObject.OpenSubreport(crSubreportObject.SubreportName)
                            For Each crtable In subRepDoc.Database.Tables
                                Try
                                    crtablelogoninfo = crtable.LogOnInfo
                                    crtablelogoninfo.ConnectionInfo = crconnectioninfo
                                    crtable.ApplyLogOnInfo(crtablelogoninfo)
                                    crtable.SetDataSource(Prtname)
                                    crtablelogoninfo.ConnectionInfo.DatabaseName = iCatalog
                                    crtablelogoninfo.ConnectionInfo.UserID = userIs
                                    crtablelogoninfo.ConnectionInfo.Password = passUser
                                    crtable.ApplyLogOnInfo(crtablelogoninfo)
                                    crtable.Location = iCatalog + ".dbo." + crtable.Name
                                Catch ex As Exception
                                End Try
                            Next
                        End If
                    Next
                Next
                crDiskFileDestinationOptions = New DiskFileDestinationOptions()
                crDiskFileDestinationOptions.DiskFileName = Fname
                crExportOptions = crReportDocument.ExportOptions
                With crExportOptions
                    .DestinationOptions = crDiskFileDestinationOptions
                    .ExportDestinationType = ExportDestinationType.DiskFile
                    .ExportFormatType = ExportFormatType.PortableDocFormat
                End With
                crReportDocument.SetParameterValue("@ID_CASE_NMBR", idCase)
                crReportDocument.SetParameterValue("@ID_CASE_NMBR", idCase, "MemberName")
                crReportDocument.Export()
                Response.ClearContent()
                Response.ClearHeaders()
                Response.ContentType = "application/pdf"
                Response.WriteFile(Fname)
                Response.Flush()
                Response.Close()
                System.IO.File.Delete(Fname)
            Catch ex As Exception
                lblMessage.Visible = True
                lblMessage.Text = "Error Load<br>" & Convert.ToString(ex)
            End Try
    Edited by: LaShandra Knox on Sep 17, 2008 7:59 PM

Maybe you are looking for

  • Fail to deploy ear file to AS10g

    Hi friends, I use Jdev10g to generate ear file and dcmctl to deploy to AS10g. Something must have been wrong but I couldn't work it out. Really need your help. --info: Project:"Master Detail page using ADF" http://www.oracle.com/technology/sample_cod

  • Why do i have to log on to my network every time i start to use my macbook pro.

    I just started using a time capsule and every thing is working fine on my pc that is hooked to the network but every time I open my macbook pro I have to choose my network to join it.  Any suggestions? Also can the time capsule be used as a storage d

  • Library File in User Folder Invisible?

    Is there a way to change this folder to being visible? I turned off invisible files, and it showed up, then made an alias for it so I can still access with invisible files turned on, but is there a way to change the default of this folder to being vi

  • Increasing the size of an application

    On my MacBook Air, I find the default font size to be too small in many applications for my imperfect eyesight. Some applications support 'zoom' (eg, Safari), other applications support font-size changes (eg, Mail), and of course I can simply reduce

  • No bill received in my mail box, after buying an iPad Air in New York

    I bought an iPad Air in Soho ,last thursday, and the bill was supposed to be sent to my mail box and nothing has been received. Could you please tell me How to do to get it? Thanks