Load Image From Directory to Database

 Load Image From Directory to Database

CREATE OR REPLACE PROCEDURE SMFIMAGES.LOAD_IMAGES(EMP number) IS
l_bfile bfile;
l_blob blob;
l_dest_offset integer := 1;
l_src_offset integer := 1;
l_lobmaxsize constant integer := DBMS_LOB.LOBMAXSIZE;
BEGIN
INSERT INTO CITIES (PIC_ID,CITY_NAME,CITY_IMAGE)
VALUES(emp,'test',EMPTY_BLOB())
RETURN CITY_IMAGE INTO l_blob;
l_bfile := bfilename('DB_IMG',emp||'.jpg');
dbms_lob.fileopen(l_bfile,dbms_lob.file_readonly);
dbms_lob.loadfromfile(l_blob,l_bfile,l_lobmaxsize,l_dest_offset,l_src_offset);
dbms_lob.fileclose(l_bfile);
--dbms_output.put_line('size of image is : '||dbms_lob.getlength(l_blob));
commit;
update hrimages set picture = l_blob where employee_id = emp;
delete from cities;
commit;
end;
/