How and where should I create a parameter list

Question

Hi, I4m trying to create a parameter lists but I don4t know where and how.
I guess as a program unit but as function or procedure, sorry I4m new on this for that I4m finding this a bit difficult. Please, someone could help me to understand this:
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.
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;

Answer 1

Hi,
What you've pasted the code here is absolutely correct.
You'll have to write the code in Forms builder.
You can either paste the same code in a procedure & call that procedure
from button's When-Button-Pressed trigger or paste the code in
your button's When-Button-Pressed trigger like this :
DECLARE
pl_id ParamList;
BEGIN
** Check to see if the 'tmpdata' parameter list exists.
pl_id := Get_Parameter_List('tmpdata');
Run_Product(REPORTS, 'empreport', SYNCHRONOUS, RUNTIME,
FILESYSTEM, pl_id, NULL);
END;
However, don't write the code in a function as you will need to return some value from the function.
Thanks,
Mayur Shah
[email protected]