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>
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;