en el when button presed de un boton
DECLARE
pl_id ParamList;
pl_name VARCHAR2(12) := 'tmp_lista2';
BEGIN
pl_id := Get_Parameter_List(pl_name);
IF Not (Id_Null(pl_id)) THEN
Destroy_Parameter_List(pl_id);
END IF;
pl_id := Create_Parameter_List(pl_name);
IF Id_Null(pl_id) THEN
Msg_Alert('Error creando la lista de parametros: ' || pl_name,
'E',
True);
RAISE Form_Trigger_Failure;
END IF;
If :BLOQUE.CAMPO is not null then
Add_Parameter(PL_ID, 'P_NOMBRE_PARAMETRO', Text_Parameter, :Valor);
call_form('NOMBRE_FORMA', NO_HIDE, NO_REPLACE, NO_QUERY_ONLY, pl_id);
End If;
End;