Import query - please

Question

Hi there,
I am using Oracle 9.2 and I need to import a .txt file in the database.
I have just tried to make it simple: the table "Test_Table" has only one column, "Name". The 'test_doc2.txt' conatins names in this form:
Simon
Peter
JohnThe import works with the package below:
CREATE OR REPLACE PACKAGE BODY Import_Pkg IS
  PROCEDURE Import_Test IS
    Vfile    Utl_File.File_Type;
    Vnewline VARCHAR2(200);
  BEGIN
    Vfile := Utl_File.Fopen('TEST_DIRECTORY', 'test_doc2.txt', 'R');
    IF Utl_File.Is_Open(Vfile)
    THEN
      LOOP
        BEGIN
          Utl_File.Get_Line(Vfile, Vnewline);
          IF Vnewline IS NULL
          THEN
            EXIT;
          END IF;
          INSERT INTO Test_Table (name) VALUES (Vnewline);
        EXCEPTION
          WHEN No_Data_Found THEN
            EXIT;
        END;
      END LOOP;
      COMMIT;
    END IF;
    Utl_File.Fclose(Vfile);
  END;
END Import_Pkg ;and my table gets populated:
NAME
Simon
Peter
JohnI have file 'test_doc3.txt' with records delimited by tabs:
Simon  33
John    44
Peter   55I need to load this file into a table "Test_Table2" which has columns "Name" and "Age".
No matter what I tried, I cannot get the above package to do it with the tab limited file...
As the file to load will have to be loaded from an FTP server where it gets dumped into, it was suggested to use xutl_ftp to do the whole operation.
Unfortunately, I am not a sysadmin and I cannot install the package onto Oracle.
Can someone please help?
Thanks

Answer 1

Can someone please help with this as I cannot use the sqlloader either and I am really stuck.
A function found on the internet should do the trick apparently, but I can not get it to work:
FUNCTION Split(v_Str IN OUT VARCHAR2) RETURN l_Data IS
     p_Delim VARCHAR2(9);
    l_n     NUMBER;
  BEGIN
    LOOP
      l_n := Instr(v_Str, p_Delim);
      EXIT WHEN(Nvl(l_n, 0) = 0);
      v_Names_Ages.EXTEND;
      v_Names_Ages(v_Names_Ages.COUNT) := Ltrim(Rtrim(Substr(v_Str,
                                                             1,
                                                             l_n - 1)));
      v_Str := Substr(v_Str, l_n + Length(p_Delim));
    END LOOP;
    RETURN v_Names_Ages;
  END Split;What am I doing wrong, please?
Thanks