Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- declare
- f UTL_FILE.FILE_TYPE;
- ldir varchar2(100) := 'DATA_PUMP_DIR';
- lfile varchar2(100) := 'writefile.sql';
- vtable m_code_tabletype := m_code_tabletype();
- BEGIN
- f := UTL_FILE.FOPEN(ldir,lfile,'R');
- IF UTL_FILE.IS_OPEN(f) THEN
- LOOP
- BEGIN
- UTL_FILE.GET_LINE(f,lfile);
- IF lfile IS NULL THEN
- EXIT;
- END IF;
- --do parsing
- -- col1, col2, ...
- vtable.extend;
- vtable(vtable.count) := m_code_object(col1, col2, ...);
- END;
- END LOOP;
- COMMIT;
- END IF;
- END;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement