Llamar a un reporte desde Oracle forms

PROCEDURE nombre_procedure IS

plid paramlist;

the_param varchar2(15) := 'tmpdata';

BEGIN

plid := get_parameter_list(the_param);

/* check if 'tmpdata' exists */

IF NOT id_null(plid) THEN

destroy_parameter_list(plid);

END IF;

/* if it does destroy it */

plid := create_parameter_list(the_param);

/* create it afresh */

add_parameter(plid, 'P_PROVINCIA', TEXT_PARAMETER,To_char(:nombre_bloque.campo_bloque));

/* associate the param in the form with the param in the report */

add_Parameter(plid, 'PARAMFORM', TEXT_PARAMETER, 'YES');

/* to suppress the parameter form displaying */

run_product(REPORTS, /* product name */

'nombre_reporte.rep', /* Oracle Reports module */

SYNCHRONOUS, /* communication mode */

RUNTIME, /* execution mode */

FILESYSTEM, /* location of the Reports module */

plid, /* handle to the parameter list */

null

);

END;

En el lienzo creamos un botón, a este botón le asignamos un trigger inteligente when-button-pressed y digitamos el sigiente código:

nombre_procedure;

Listo.