Yurttas/PL/DBL/oracle/F/02/SPJ/Parts-ins.sp
Jump to navigation
Jump to search
1/*
2REM
3REM Partsins.sp
4REM
5*/
6
7CREATE OR REPLACE
8PROCEDURE Parts-Ins IS
9
10 in_file UTL_FILE.FILE_TYPE;
11
12 line_buff VARCHAR2(255);
13
14BEGIN
15
16 in_file := UTL_FILE.FOPEN('/user/scratch4/',
17 'Parts-Data.txt',
18 'R');
19
20 LOOP
21 UTL_FILE.GET_LINE(in_file, line_buff);
22 DBMS_OUTPUT.PUT_LINE(line_buff);
23 END LOOP;
24
25 UTL_FILE.FCLOSE(in_file);
26
27END Parts-Ins;
28/