# XLIB_JASPERREPORTS_IMG

## Package Specification

```sql
PACKAGE XLIB_JASPERREPORTS_IMG AS
/*
$Id: xlib_jasperreports_img.pks 71 2017-10-15 16:25:51Z dietmar.aust $
*/
----------------------------------------------------------------------------
-- get_image: retrieves a report image from the server
----------------------------------------------------------------------------
   PROCEDURE get_image (p_url in varchar2, p_image IN VARCHAR2);

   procedure test;


END XLIB_JASPERREPORTS_IMG;```

## Package Body

```sql
package body xlib_jasperreports_img as
/*
$Id: xlib_jasperreports_img.pkb 71 2017-10-15 16:25:51Z dietmar.aust $
*/
   m_module       constant varchar2 (100) := $$plsql_unit;


----------------------------------------------------------------------------
-- get_image: retrieves a report image from the server
----------------------------------------------------------------------------
   procedure get_image (p_url in varchar2, p_image in varchar2)
   is
      l_url         varchar2 (32767);
      l_proc   VARCHAR2 (100)   := m_module || '.GET_IMAGE';
   begin

      -------------------------------------------------------
      -- construct URL
      -------------------------------------------------------
      l_url := p_url;
      -- use image servlet
      l_url := l_url || '_image?image=' || p_image;
      -- use images directory /report_tmp/
      --l_url := l_url || '_tmp/' || p_image;

      -------------------------------------------------------
      -- call J2EE server
      -------------------------------------------------------
      xlog(l_proc, l_url);
      xlib_http.display_url_raw (p_url => l_url);

   end;

procedure test
is
begin
  htp.p('test');
end;


END XLIB_JASPERREPORTS_IMG;```