Тук давам пример за запазване на BLOB данни като файл в PL/SQL. BLOB данни можете да ги получите от таблицата с колона BLOB или можете да ги получите от файл на диска.
Пример за PL/SQL функция за запазване на BLOB като файл
Процедурата по-долу приема следните три аргумента:
- Име на обект на директория на Oracle (като i_dir).
- Запазване като име на файл (като i_file).
- BLOB данни (като i_blob).
CREATE OR REPLACE PROCEDURE blob_to_file (i_dir IN VARCHAR2, i_file IN VARCHAR2, i_blob IN BLOB) AS l_file UTL_FILE.file_type; l_buffer RAW (32767); l_amount BINARY_INTEGER := 32767; l_pos INTEGER := 1; l_blob_len INTEGER; BEGIN l_blob_len := DBMS_LOB.getlength (i_blob); l_file := UTL_FILE.fopen (i_dir, i_file, 'WB', 32767); WHILE l_pos < l_blob_len LOOP DBMS_LOB.read (i_blob, l_amount, l_pos, l_buffer); UTL_FILE.put_raw (l_file, l_buffer, TRUE); l_pos := l_pos + l_amount; END LOOP; UTL_FILE.fclose (l_file); EXCEPTION WHEN OTHERS THEN IF UTL_FILE.is_open (l_file) THEN UTL_FILE.fclose (l_file); END IF; RAISE; END blob_to_file;
Тест
Следващият PL/SQL блок ще извика горната процедура, като предаде обекта на директорията на Oracle, името на файла и BLOB данни. За BLOB данните използвам функцията GET_BLOB, за която дадох пример в предишната си публикация в блога:Вземете BLOB от файл в PL/SQL. В случая по-долу той ще получи BLOB данните от файл myfile.jpg от местоположение MY_DIR и ще ги запише във файл abc.jpg в местоположение IMG_DIR.
DECLARE f_blob BLOB; BEGIN /* check the above mentioned link for get_blob function example */ f_blob := get_blob ('MY_DIR', 'myfile.jpg'); /* now pass the blob to blob_to_file procedure to save it as a file */ blob_to_file ('IMG_DIR', 'abc.jpg', f_blob); END;
Сега можете да проверите местоположението на директорията IMG_DIR за файла, създаден чрез BLOB.
Вижте също:
- Как да създадем обект на директория на Oracle?
- Научете как да извлечете BLOB данни от Oracle Table с помощта на Toad