konto usunięte
Temat: Procedura archiwizaji plików - oracle
Hejmacie może jakiś przykład procedury pakowania plików płaskich "wyplutych" wcześniej do odpowiedniej lokalizacji na serwerze. Mam juz cos takiego ale wali komunikatem, "koniec pliku w kanale komunikacyjnym"
CREATE OR REPLACE procedure LGETL.z_lgetl_zip
is
kml UTL_FILE.FILE_TYPE;
kmz UTL_FILE.FILE_TYPE;
strbufferdd raw(4000);
begin
kml:=UTL_FILE.FOPEN('LGETL_DIR','z_20101021.txt','R',32767);
utl_file.get_raw(kml, strbufferdd,9999999);
strbufferdd:=UTL_COMPRESS.lz_compress (strbufferdd,6);
kmz:=UTL_FILE.FOPEN('LGETL_DIR','z_20101021.zip','w',32767);
Utl_File.Put_Raw (kmz,strbufferdd );
utl_file.fclose(kml);
utl_file.fclose(kmz);
end;
/