DECLARE
   vrepid                        report_object;
   vrep                           VARCHAR2 (100);
   -- 09/08/2004 DJMartin Add WEB style report.
   v_show_document       VARCHAR2 (2000) := '/reports/rwservlet?';
   v_connect                  VARCHAR2 (30)   := 'connectionName';
   v_report_server         VARCHAR2 (30)   := reportsenv_pkg.f_report_server;
BEGIN
   IF GET_APPLICATION_PROPERTY (user_interface) = 'WEB'
   THEN
      v_show_document := v_show_document
         || v_connect
         -- Report server
         || '&server='
         || v_report_server
         -- Report name
         || '&report=gnrAgenda'
         -- Reports parameters
         || '&destype=CACHE'
         || '&desformat=PDF';
      web.show_document (v_show_document);
   ELSE
      vrepid := FIND_REPORT_OBJECT ('REPORT1');
      vrep := RUN_REPORT_OBJECT (vrepid);
      web.show_document
                (   'http://address:port/reports/rwservlet/getjobid'
                 || SUBSTR (vrep, INSTR (vrep, '_', -1) + 1)
                 || '?'
                 || 'server=repserver90',
                 '_blank'
                );
   END IF;
END;

Rep_url:='http://127.0.0.1:8888/reports/rwservlet?destype=cache&desformat=HTMLCSS&report=emp.rdf&userid=hr/hr@orcl&paramform=no';