كود عكس النص (FUNCTION)

[MTSHAJALI]

 

السلام عليكم ورحمة الله وبركاته

 

رجعنالكم بعد سنوات طويلة من الغياب وبنتمنى الجميع يكون بالف صحة وعافية

 

الكود الموجود في الاسفل حاص بعكس اي نص فه فواصل

 

CREATE OR REPLACE function ERP.reverse_string_seg(p_string varchar2) return varchar2 is
    v_string_parameter  varchar2(4000) := p_string;
    v_string_1          varchar2(4000);
    v_string_2          varchar2(4000);
    v_symbole           varchar2(4000);
    v_last_string       varchar2(4000);
    v_index             number;
begin
    dbms_output.put_line('v_string_parameter='||v_string_parameter);
    
    select  regexp_instr(v_string_parameter, '\D')
    into    v_index
    from    dual;
    
    dbms_output.put_line('v_index='||v_index);
    v_string_1  := substr(v_string_parameter, v_index + 1 );
    dbms_output.put_line('v_string_1='||v_string_1);
    v_string_2  := substr(v_string_parameter, 1, v_index - 1 );
    dbms_output.put_line('v_string_2='||v_string_2);
    
    select  regexp_replace(v_string_parameter, '\d')
    into    v_symbole
    from    dual;
        
    v_last_string   := v_string_1 ||v_symbole|| v_string_2;
    return (v_last_string);
end;