在gbase数据库写一个存储过程，查找某个存储过程用到的所有源表

以下是一个示例存储过程，它接受一个参数 @proc_name，表示要查找的存储过程的名称。该存储过程将返回一个结果集，其中包含该存储过程使用的所有源表的名称。

CREATE PROCEDURE find_tables_used_by_proc
    @proc_name VARCHAR(100)
AS
BEGIN
    SET NOCOUNT ON;

    -- 创建一个临时表，用于存储所有源表的名称
    CREATE TABLE #tables_used (table_name VARCHAR(100));

    -- 查询存储过程的定义，并将其存储在一个变量中
    DECLARE @proc_definition NVARCHAR(MAX);
    SELECT @proc_definition = OBJECT_DEFINITION(OBJECT_ID(@proc_name));

    -- 使用正则表达式查找存储过程中所有引用的表
    DECLARE @pattern NVARCHAR(100) = N'\bFROM\s+(\w+)\b';
    DECLARE @match_index INT = 1;
    DECLARE @match NVARCHAR(100);
    WHILE @match_index > 0
    BEGIN
        SET @match = NULL;
        SET @match_index = PATINDEX(@pattern, @proc_definition);
        IF @match_index > 0
        BEGIN
            SET @proc_definition = STUFF(@proc_definition, @match_index, LEN(@match), '');
            SET @match = SUBSTRING(@proc_definition, @match_index + 5, PATINDEX('%[^a-zA-Z0-9_]%', @proc_definition + 'X', @match_index + 6) - @match_index - 5);
            INSERT INTO #tables_used (table_name) VALUES (@match);
        END;
    END;

    -- 查询结果集中所有不重复的表名
    SELECT DISTINCT table_name FROM #tables_used;

    -- 删除临时表
    DROP TABLE #tables_used;
END;

要使用该存储过程，只需将要查找的存储过程的名称作为参数传递给它，如下所示：

EXEC find_tables_used_by_proc 'my_proc_name';