SQL Loader (how to cut data header)

Question

Hi there,
[oracle 11g]
I got the following text file:
mod; DD.MM.YYYY; HH:MM:SS; aligned
src; "ptv "; "15.04.2012"; "10:47:49"
chs; "ISO8859-1"
ver; "V1.0"
ifv; "V1.0"
dve; "V1.0"
fft; "LIO"
tbl; MENGE_FGR
atr; BASIS_VERSION; FGR_NR; FGR_TEXT
frm; num[9.0]; num[5.0]; char[40]
rec;        122;     8; "VVZ"   
rec;        123;     18; "VHZ"
rec;        124;     13; "VTZ"    Now I am interested in the column TBL and ATR and follwing rawdata
Do you see a way to automatically create the table MENGE_FR with columns BASIS_VERSION; FGR_NR;FGR_TEST and column types num, num, char and insert the raw data below?
PS:OK, this is mysql ...so I need to convert this first to sql. So you should see num as number.
Thx in advance Thorsten
Edited by: Thorsten on 16.05.2013 07:30
Edited by: Thorsten on 16.05.2013 07:32

Answer 1

There are various ways that you could do this. I have demonstrated one method below. I created a table with two columns, then used SQL*Loader to load the data from the text file into those two columns. Skipping the header rows is optional. You could also use an external table instead, if the text file is on your server, not your client. I then used some PL/SQL to create and execute "create table" and "insert" statements. This is just some starter code. You will need to make modifications to handle other data types and such that were not in the example that you provided, but it should give you the general idea.
SCOTT@orcl_11gR2> host type text_file.dat
mod; DD.MM.YYYY; HH:MM:SS; aligned
src; "ptv "; "15.04.2012"; "10:47:49"
chs; "ISO8859-1"
ver; "V1.0"
ifv; "V1.0"
dve; "V1.0"
fft; "LIO"
tbl; MENGE_FGR
atr; BASIS_VERSION; FGR_NR; FGR_TEXT
frm; num[9.0]; num[5.0]; char[40]
rec;        122;     8; "VVZ"
rec;        123;     18; "VHZ"
rec;        124;     13; "VTZ"
SCOTT@orcl_11gR2> host type test.ctl
options(skip=7)
load data
infile text_file.dat
into table tbl
(col1 terminated by ';',
col2 terminated by x'0a')
SCOTT@orcl_11gR2> create table tbl
  2    (col1  varchar2(4),
  3     col2  varchar2(60))
  4  /
Table created.
SCOTT@orcl_11gR2> host sqlldr scott/tiger control=test.ctl log=test.log
SQL*Loader: Release 11.2.0.1.0 - Production on Thu May 16 13:44:24 2013
Copyright (c) 1982, 2009, Oracle and/or its affiliates.  All rights reserved.
Commit point reached - logical record count 6
SCOTT@orcl_11gR2> select * from tbl
  2  /
COL1 COL2
tbl   MENGE_FGR
atr   BASIS_VERSION; FGR_NR; FGR_TEXT
frm   num[9.0]; num[5.0]; char[40]
rec          122;     8; "VVZ"
rec          123;     18; "VHZ"
rec          124;     13; "VTZ"
6 rows selected.
SCOTT@orcl_11gR2> declare
  2    v_tab   varchar2(30);
  3    v_atr   varchar2(32767);
  4    v_frm   varchar2(32767);
  5    v_sql   varchar2(32767);
  6    v_cols  number;
  7    v_next  varchar2(32767);
  8  begin
  9    select col2 into v_tab from tbl where col1 = 'tbl';
10    select col2 || ';' into v_atr from tbl where col1 = 'atr';
11    select col2 || ';' into v_frm from tbl where col1 = 'frm';
12    v_sql := 'CREATE TABLE ' || v_tab || ' (';
13    select regexp_count (col2, ';') + 1 into v_cols from tbl where col1 = 'atr';
14    for i in 1 .. v_cols loop
15      v_sql := v_sql || substr (v_atr, 1, instr (v_atr, ';') - 1) || ' ';
16      v_next := substr (v_frm, 1, instr (v_frm, ';') - 1);
17      v_next := replace (v_next, '[', '(');
18      v_next := replace (v_next, ']', ')');
19      v_next := replace (v_next, '.', ',');
20      v_next := replace (v_next, 'num', 'number');
21      v_next := replace (v_next, 'char', 'varchar2');
22      v_sql := v_sql || v_next || ',';
23      v_atr := substr (v_atr, instr (v_atr, ';') + 1);
24      v_frm := substr (v_frm, instr (v_frm, ';') + 1);
25    end loop;
26    v_sql := rtrim (v_sql, ',') || ')';
27    dbms_output.put_line (v_sql);
28    execute immediate v_sql;
29    for r in (select col2 from tbl where col1 = 'rec') loop
30      v_sql := 'INSERT INTO ' || v_tab || ' VALUES (''';
31      v_sql := v_sql || replace (replace (r.col2, ';', ''','''), '"', '');
32      v_sql := v_sql || ''')';
33      dbms_output.put_line (v_sql);
34      execute immediate v_sql;
35    end loop;
36  end;
37  /
CREATE TABLE  MENGE_FGR ( BASIS_VERSION  number(9,0), FGR_NR  number(5,0),
FGR_TEXT  varchar2(40))
INSERT INTO  MENGE_FGR VALUES ('        122','     8',' VVZ')
INSERT INTO  MENGE_FGR VALUES ('        123','     18',' VHZ')
INSERT INTO  MENGE_FGR VALUES ('        124','     13',' VTZ')
PL/SQL procedure successfully completed.
SCOTT@orcl_11gR2> describe menge_fgr
Name                                      Null?    Type
BASIS_VERSION                                      NUMBER(9)
FGR_NR                                             NUMBER(5)
FGR_TEXT                                           VARCHAR2(40)
SCOTT@orcl_11gR2> select * from menge_fgr
  2  /
BASIS_VERSION     FGR_NR FGR_TEXT
          122          8  VVZ
          123         18  VHZ
          124         13  VTZ
3 rows selected.