DECLARE
PICNO VARCHAR2(100);
BEGIN
PICNO := GET_FILE_NAME(FILE_FILTER=> 'JPG FILES (*.JPG)|*.JPG|'
||'BITMAP FILES (*.BMP)|*.BMP|');
IF PICNO IS NOT NULL THEN
READ_IMAGE_FILE(PICNO, 'ANY', 'PHOTOS');
END IF;
END;