如何取出表名？ 搞了一上午，没搞定

kelvin

在一个SQL文件中取出所有相关的表名，sql非常复杂，带不定层的嵌套语句。

写了个这样的，但遇到嵌套的就不正常，哪位大侠指导一下！

1. 
   
2. 
   
3. sed -n -e '
   
4. /[Pp]rompt/ d
   
5. /^$/ d
   
6. s/^[ \t]\{1,\}//g
   
7. s/[ \t]\{1,\}$//g
   
8. s/--.*//g
   
9. /^\/\*/ d
   
10. /^\*/ d
    
11. /^\\\*/ d
    
12. s/[\(\)]/ /g
    
13. s/[\n]/\t/g
    
14. /[Ii]nsert/ s/[Ii]nsert [Ii]nto\(.*\)/\1/p
    
15. /[Ff]rom/ s/[Ff]rom \(.*\) [Ww]here/\1/p
    
16. /[Ff]rom/ s/[Ff]rom \(.*\) [Mm]inus/\1/p
    
17. /[Uu]date/ s/[Uu]pdate \(.*\) [Ss]et/\1/p
    
18. ' sqlfile
    
19. 
    

复制代码

$ cat sqlfile
.....
.....
Insert Into Asset_Classifications_Dc025_St
         (Asst_Id,
          Audit_Skeleton_Ind,
          Audit_Valid_From_Date,
          Audit_Valid_To_Date,
          Legal_Entity_Code,
          Id,
          Rac_Id,
          Rtp_Code_Archived_By,
          Rtp_Code_Created_By,
          Effective_From,
          Effective_To,
          Ract_Code,
          Rac_Code)
         Select Distinct
                ac.Asst_Id,
                Nvl(ac.Audit_Skeleton_Ind, 'N'),
                ac.Audit_Valid_From_Date,
                To_Date('9999-12-31', 'yyyy-mm-dd'),
                ac.Booking_Center,
                ac.Id,
                Decode(Rac.Code, 'PUT',  (Select b.ID From ASSET_CLASS_DC025_TEMP_USE b Where b.CODE = '029' and b.LEGAL_ENTITY_CODE = ac.BOOKING_CENTER),
                                 'CALL', (Select b.ID From ASSET_CLASS_DC025_TEMP_USE b Where b.CODE = '030' and b.LEGAL_ENTITY_CODE = ac.BOOKING_CENTER),
                                 ac.Rac_ID),
                ac.Rtp_Code_Archived_By,
                ac.Rtp_Code_Created_By,
                ac.Audit_Valid_From_Date,
                Decode(ac.Audit_Current_Ind,
                       'Y',
                       To_Date('9999-12-31', 'YYYY-MM-DD'),
                       ac.Audit_Valid_To_Date),
                Case When (In_Dc_Recon_Ind = 'Y' and Ract.Code in ('FXOPT', 'MH', 'OPTYPE')) Then 'SECTYPE' Else Ract.Code End,
                Decode(Rac.Code, 'PUT', '029', 'CALL', '030', Rac.Code)
           From Asset_Classifications_V131 Ac,
           (Select code, booking_center, id, ract_id
                   From (Select code, booking_center, id, ract_id,
                                Row_Number() Over(Partition By booking_center, id Order By code) Rn
                           From Ref_Asset_Classifications_V131
                          Where Audit_Current_Ind = 'Y')
                  Where Rn = 1) rac,
           (Select code, booking_center, id
                   From (Select code, booking_center, id,
                                Row_Number() Over(Partition By booking_center, id Order By code) Rn
                           From Ref_Asset_Class_Type_V131
                          Where Audit_Current_Ind = 'Y')
                  Where Rn = 1) ract
          Where ac.booking_center = rac.booking_center(+)
          and rac.booking_center = ract.booking_center(+)
          and ac.rac_id = rac.id(+)
          and rac.ract_id = ract.id (+)
          and NOT EXISTS
              (select 1
                 from Ref_Asset_Classifications_V131 rac, Ref_Asset_Class_Type_V131 ract
                where rac.ract_id            = ract.id
                  and rac.audit_current_ind  = 'Y'
                  and ract.audit_current_ind = 'Y'
                  AND ract.code              = 'SYMBOL'
                  and rac.id                 = ac.rac_id)
          and ac.Audit_Valid_From_Date <>
                Nvl(ac.Audit_Valid_To_Date,
                    To_Date('9999-12-31', 'YYYY-MM-DD'))
            And ((In_Dc_Recon_Ind = 'N' And
                ac.Audit_Valid_From_Date <= In_Rpt_Date And
                Nvl(ac.Audit_Valid_To_Date,
                      To_Date('9999-12-31', 'YYYY-MM-DD')) > In_Rpt_Date) Or
                (In_Dc_Recon_Ind = 'Y'));

      Commit;
......
.....

waker

没看懂

grep -io '[^ ]*Asset_Class[^ ]*'  file
不行么？

dangk

其实看不太懂sed
不过觉得似乎主要问题在于找规律，而不是书写命令

比如，似乎所有含有_Asset_的都是表名...

dangk

hehe,写了一半干了些其它事情，结果waker大虾已经发贴了：）

webyuhang

楼主的意思是，表里有嵌套，不完全符合Asset_Class模式吧。1！！

woodie

特征抓准了，正则表达式写好了很多问题会变得很容易解决。上面waker兄的代码就是个很好的例子。下面给出的仍然是一个偷懒的办法：

1. perl -ne 'print "$1\n" if (/(?:Insert Into|From) (\w+)/ig)'

复制代码

只要Insert into 和表名同行，且From和表名同行
就可以。
如果不同行，就还得改改。
上面perl代码等价于GNU grep的：

1. grep -Po '(?i)(?<=insert into )\w+|(?<=from )\w+'

复制代码

[ 本帖最后由 woodie 于 2006-9-8 18:28 编辑 ]