running a report from a trigger on a developer 2000 button

[Guest_imported]

Hi

im trying to run a report from a trigger of a button on developer 2000 button on the event when button pressed. I want to get a value from a text box on the Form and pass it to the report query in the WHERE clause of the select statement. im not able to pass this parameter. kindly help me as soon as possible

 

[Guest_imported]

here u go:
DECLARE
P1 PARAMLIST;
BEGIN
P1:=GET_PARAMETER_LIST('MY_LIST');
IF NOT Id_Null(P1) THEN
Destroy_ParamEter_List(P1);
END IF;
P1:=CREATE_PARAMETER_LIST('MY_LIST');

Add_paramEter(p1,'assdate',TEXT_PARAMETER,:block1.my_para));
Add_paramEter(p1,'PARAMFORM',TEXT_PARAMETER,'NO');
run_product(REPORTS,'all_problems_bydate',SYNCHRONOUS,RUNTIME,FILESYSTEM,p1,NULL);
END;