用于删除单行和多行注释和空格的正则表达式，提示除外

Question

如何通过删除单行和多行 cmets 和前导/尾随空格但不删除 Oracle 提示来提取 Plsql 代码？

实际上我想提取视图的 DDL 并将新列添加到视图中 并动态重建视图。但是有些视图非常复杂（大尺寸）并且有很多空格，单行 cmets，多行 cmets 和提示..

select text 
from All_views
where owner = 'Schema_name'
  and view_name = 'View1';

我最初想应用 Oracle 正则表达式，但它也删除了提示。

谁能指导我如何实现这一目标？

用户希望保留此评论行帖子，将新字段添加到视图中。 因为这对他们来说是非常重要的审计目的。

我的视图语法：

Select /*+LEADING  ACL VS TXN  ACT TTY SEC SECID SHR_UDF*/ 
                        TXN_ID,
                        /****  IF  YOU ADD COL CHECK OUT THE TEMP TABLE NAME****/
                        /****  IF  YOU ADD COL CHECK OUT THE TEMP1 TABLE NAME****/
                        /****  IF  YOU ADD COL CHECK OUT THE TEMP2 TABLE NAME****/
                        /****  IF  YOU ADD COL CHECK OUT THE TEMP3 TABLE NAME****/
                        /****  IF  YOU ADD COL CHECK OUT THE TEMP4 TABLE NAME****/
                        /****  IF  YOU ADD COL CHECK OUT THE TEMP5 TABLE NAME****/
                        /****  IF  YOU ADD COL CHECK OUT THE TEMP6 TABLE NAME****/
                        /****  IF  YOU ADD COL CHECK OUT THE TEMP7 TABLE NAME****/
                        /****  IF  YOU ADD COL CHECK OUT THE TEMP8 TABLENAME****/
                        /****SELECT * FROM  ALL_TAB_COLUMN****/
                        /****  wHERE COLUMN_NAME=COL2****/
                        /****  gROUP BY TABLE_NAME***/
                        /****  oRDER BY1****/
                        /* CHANGE  JIRA1234 STARTS*/
                        ACL.aCCOUNT_NUMBER,
                        /* CHANGE  JIRA1234 ENDS*/
                        TXN.  TXN_SALE_dATE,
                        TXN.TXN_iNVOICE_DATE,
                        TXN.  TXN_pUBLISH_DATE,
                        ACL.TXN_EXCH_DATE,
                        ACL.SALES_DATE,
                        ACL.pRICE_DATE,
                        --ACL.LAST_UPDATED,
                        TTY.TTY_TTY_TYPE_ID,
                        /* CHANGE  JIRA7890 STARTS*/
                        TXN.ACL_OPEM_ENTRY_NO,
                        /* CHANGE  JIRA7890 eNDS*/
                        FROM  SCHEMA.aCCOUNT_MASTER  ACL
                        JOIN  SCHEMA.TXN_MASTER TXN
                        ON ACL.BRANCH_CD=TXN.BRANCH_CD
                        AND ACL.aCCOUNT_NO=TXN.aCCOUNT_NO
                        JOIN SCHEMA.TXN_TYPE_MASTER  TTY
                        ON  TXN.TTY_TYPE_ID=TTY.TTY_TYPE_ID
                        AND  TTY.SCE_ID=TXN_SEC_ID';

提前致谢

Answer 1

您的问题不是很清楚，但我将尝试回答第一个问题“如何通过删除单行和多行 cmets 和前导/尾随空格但不删除 Oracle 提示来提取 Plsql 代码？”

我认为您使用正则表达式的方法是正确的，下面将删除所有 cmets 而不会删除提示。

select  regexp_replace('Create Or Replace Force view Schema_name.View1 as
                        Select /*+LEADING  ACL VS TXN  ACT TTY SEC SECID SHR_UDF*/ 
                        TXN_ID,
                        /****  IF  YOU ADD COL CHECK OUT THE TEMP TABLE NAME****/
                        /****  IF  YOU ADD COL CHECK OUT THE TEMP1 TABLE NAME****/
                        /****  IF  YOU ADD COL CHECK OUT THE TEMP2 TABLE NAME****/
                        /****  IF  YOU ADD COL CHECK OUT THE TEMP3 TABLE NAME****/
                        /****  IF  YOU ADD COL CHECK OUT THE TEMP4 TABLE NAME****/
                        /****  IF  YOU ADD COL CHECK OUT THE TEMP5 TABLE NAME****/
                        /****  IF  YOU ADD COL CHECK OUT THE TEMP6 TABLE NAME****/
                        /****  IF  YOU ADD COL CHECK OUT THE TEMP7 TABLE NAME****/
                        /****  IF  YOU ADD COL CHECK OUT THE TEMP8 TABLENAME****/
                        /****SELECT * FROM  ALL_TAB_COLUMN****/
                        /****  wHERE COLUMN_NAME=COL2****/
                        /****  gROUP BY TABLE_NAME***/
                        /****  oRDER BY1****/
                        /* CHANGE  JIRA1234 STARTS*/
                        ACL.aCCOUNT_NUMBER,
                        /* CHANGE  JIRA1234 ENDS*/
                        TXN.  TXN_SALE_dATE,
                        TXN.TXN_iNVOICE_DATE,
                        TXN.  TXN_pUBLISH_DATE,
                        ACL.TXN_EXCH_DATE,
                        ACL.SALES_DATE,
                        ACL.pRICE_DATE,
                        --ACL.LAST_UPDATED,
                        TTY.TTY_TTY_TYPE_ID,
                        /* CHANGE  JIRA7890 STARTS*/
                        TXN.ACL_OPEM_ENTRY_NO,
                        /* CHANGE  JIRA7890 eNDS*/
                        FROM  SCHEMA.aCCOUNT_MASTER  ACL
                        JOIN  SCHEMA.TXN_MASTER TXN
                        ON ACL.BRANCH_CD=TXN.BRANCH_CD
                        AND ACL.aCCOUNT_NO=TXN.aCCOUNT_NO
                        JOIN SCHEMA.TXN_TYPE_MASTER  TTY
                        ON  TXN.TTY_TYPE_ID=TTY.TTY_TYPE_ID
                        AND  TTY.SCE_ID=TXN_SEC_ID', '/\*\*.+\*\*/\s+|/\*\s.+\*/\s+|--.+\s+', '', 1, 0) from dual;

输出是

Create Or Replace Force view Schema_name.View1 
as 
Select /*+LEADING  ACL VS TXN  ACT TTY SEC SECID SHR_UDF*/ TXN_ID, 
ACL.aCCOUNT_NUMBER, 
TXN.  TXN_SALE_dATE, 
TXN.TXN_iNVOICE_DATE, 
TXN.  TXN_pUBLISH_DATE, 
ACL.TXN_EXCH_DATE, 
ACL.SALES_DATE, 
ACL.pRICE_DATE, 
TTY.TTY_TTY_TYPE_ID, 
TXN.ACL_OPEM_ENTRY_NO, 
FROM  SCHEMA.aCCOUNT_MASTER  ACL 
JOIN  SCHEMA.TXN_MASTER TXN 
ON ACL.BRANCH_CD=TXN.BRANCH_CD 
AND ACL.aCCOUNT_NO=TXN.aCCOUNT_NO 
JOIN SCHEMA.TXN_TYPE_MASTER  TTY 
ON  TXN.TTY_TYPE_ID=TTY.TTY_TYPE_ID 
AND  TTY.SCE_ID=TXN_SEC_ID