method show_report report =
      store#clear ();
      report_header <- report.rep_header ;
      report_params <- report.rep_params ;
      List.iter self#insert_rep_desc report.rep_eles