Re: Viewing BLOB jpgs and gifs.

[Quoted] jason <jason_at_seahorseNOSPAM.demon.co.uk> wrote:

>>> PROCEDURE retr_img (id varchar2) as
>>> Lob_field BLOB;
>>> buffer RAW(32767);
>>> offset BINARY_INTEGER:=1;
>>> buffer_size NUMBER:=32767;
>>> BEGIN
>>> SELECT employee_image
>>> INTO lob_field
>>> FROM employee_table
>>> WHERE employee_id=id;

     while offset < length loop

        instead of

>>> LOOP

>>> DBMS_LOB.READ(lob_field,buffer_size,offset,buffer);
>>> htp.print(UTL_RAW.CAST_TO_VARCHAR2(buffer));
>>> offset:=offset+buffer_size;
>>> END LOOP;
>>>
>>> EXCEPTION
>>> WHEN NO_DATA_FOUND THEN
>>> null;
>>> END retr_img;
Received on Fri Nov 19 1999 - 00:33:03 CET