在sql 调试时，报错当前上下文中没有符号“regexp_instr（strFindinput，（right（strInput，len（strInput）-intValue））”

达梦实现

CREATE OR REPLACE FUNCTION dF_strPosition( "strInput" IN VARCHAR(100), "strFindinput" IN VARCHAR(2), "strSplit" IN VARCHAR(2)) RETURN VARCHAR(128) AS strVal varchar(200)=''; intValue int:=0; BEGIN set strInput=rtrim(ltrim(strInput)); ---去掉左右空格 while REGEXP_INSTR(strFindinput,(right(strInput,len(strInput)-intValue)))<>0 LOOP select REGEXP_INSTR(strFindinput,(right(strInput,len(strInput)-intValue)))+intValue into intValue; strVal :=strVal+cast(intValue as varchar(2))+strSplit; end loop; return strVal; END;

这样符合不，再根据需求改一下

CREATE OR REPLACE FUNCTION find_and_split(original_data VARCHAR, 
                                          search_number varchar, 
                                          delimiter     CHAR)
    RETURN VARCHAR AS position varchar;
    result VARCHAR ;
    BEGIN
        set original_data=rtrim(ltrim(original_data)); ---去掉左右空格
        FOR position IN 1..LENGTH(original_data) 
        LOOP
            IF SUBSTRING(original_data FROM position FOR 1) = search_number THEN
                result := result || position || delimiter;
            END IF;
        END LOOP;
        IF LENGTH(result) > 0 THEN
            result := SUBSTRING(result FROM 1 FOR LENGTH(result) - 1);
        END IF;
        RETURN result;
    END;
 
 
 SELECT find_and_split(' 3f3a3@13', 3, ',');