Question

我有程序，在其中，我试图执行“插入”，但它正在发送该错误任何人都可以给我一个提示来解决这个错误吗？我试着阅读Oracle文档来弄清楚我错在哪里，但到目前为止我还没有找到任何可以帮助我的东西。

create or replace procedure read_file as  
  begin
     DECLARE 
        V1 VARCHAR2(200); 
        F1 UTL_FILE.FILE_TYPE; 
        emptylines number(10):=0;
        read_lines number(10):=0;
        alarm_counter number(10):=0;


     BEGIN 
     --deschidere fisier
        F1 := UTL_FILE.FOPEN('ONCIOIU','text.txt','R'); 
     --itinerare fiecare linie din fisierul text   
        Loop
        BEGIN
    UTL_FILE.GET_line(F1,V1); 

    read_lines := read_lines+1;
    dbms_output.put_line(V1);

    -- Determine the number of empty rows
    if V1 is null then
    emptylines :=emptylines+1;
    end if;

    -- Determine the number of alarms
    if emptylines =2 then
    alarm_counter :=alarm_counter+1;
    end if;
    insert into alarms (id)  values(alarm_counter)
    EXCEPTION WHEN No_Data_Found THEN EXIT; END;

        end loop;
         dbms_output.put_line(V1);
         dbms_output.put_line('Numar de linii citite '||read_lines);
         dbms_output.put_line('Numar de randuri goale '||emptylines);
         dbms_output.put_line('Numar de alarme '||alarm_counter);

      -- Close file  
        UTL_FILE.FCLOSE(F1); 
     END; 
     end;
     /

ORA-00933：SQL命令未正确结束：当我尝试执行INSERT

0 个答案: