Re: Oracle Form calls Oracle Report

From: David <snapkad_at_post.cz>
Date: Tue, 6 Feb 2001 15:30:10 +0100
Message-ID: <3a800bdb_at_news.cvut.cz>


Example from FORMS help

/*

  • Built-in: RUN_PRODUCT
  • Example: Call a Report Builder report, passing the
  • data in record group 'EMP_RECS' to substitute
  • for the report's query named 'EMP_QUERY'.
  • Presumes the Emp_Recs record group already
  • exists and has the same column/data type
  • structure as the report's Emp_Query query. */ PROCEDURE Run_Emp_Report IS pl_id ParamList; BEGIN /*
    • Check to see if the 'tmpdata' parameter list exists. */ pl_id := Get_Parameter_List('tmpdata'); /*
    • If it does, then delete it before we create it again in
    • case it contains parameters that are not useful for our
    • purposes here. */ IF NOT Id_Null(pl_id) THEN Destroy_Parameter_List( pl_id ); END IF; /*
    • Create the 'tmpdata' parameter list afresh. */ pl_id := Create_Parameter_List('tmpdata'); /*
    • Add a data parameter to this parameter list that will
    • establish the relationship between the named query
    • 'EMP_QUERY' in the report, and the record group named
    • 'EMP_RECS' in the form. */ Add_Parameter(pl_id,'EMP_QUERY',DATA_PARAMETER,'EMP_RECS'); /* **Pass a Parameter into PARAMFORM so that a parameter dialog will not appear **for the parameters being passing in. */

  Add_Parameter(pl_id, 'PARAMFORM', TEXT_PARAMETER, 'NO');   /*

  • Run the report synchronously, passing the parameter list */ Run_Product(REPORTS, 'empreport', SYNCHRONOUS, RUNTIME, FILESYSTEM, pl_id, NULL); END;
Received on Tue Feb 06 2001 - 15:30:10 CET

Original text of this message