Oracle - igualar el contenido de una columna, en otra columna, pero de otra tabla

SELECT (substr ('PUN_26_AL_REA  P',1,

INSTR( 'PUN_26_AL_REA  P',' ')-1)) AS PRUEBA

FROM DUAL;

declare

    cursor c_cur

    is

    select pointname from desde_ap;

    v_cur c_cur%ROWTYPE;

    --v_convert INTEGER;

    BEGIN

    v_sql:= ''

        OPEN C_CUR;

            loop

            FETCH C_CUR INTO V_CUR;

            EXIT WHEN c_cur%NOTFOUND;

                select (substr ('|| v_cur ||',1,

                INSTR( '|| v_cur ||',' ')-1)) FROM dual;

            end loop;

            DBMS_OUTPUT.PUT_LINE(v_cur.pointname);

        close c_cur;

    end;

Function Split (p_cadena     in varchar2,

                p_simbolo    in char,

                p_ocurrencia in number default 1) return varchar2 Is

--

v_txt     varchar2(200);

v_pos_ini integer := 0;

v_pos_fi  integer;

--

Begin

  -- Funcion que separa cadenas de texto (p_cadena) por el simbolo p_simbolo

  -- Devuelve la ocurrencia p_ocurrencia, Devuelve null si la ocurrencia no existe

  -- Devuelve el simbolo p_simbolo si no hay ningun caracter entre dos

  --ocurrencias de p_simbolo

  if p_ocurrencia > 1 then

    v_pos_ini := instr (str1 => p_cadena,

                        str2 => p_simbolo,

                        pos  => 1,

                        nth  => p_ocurrencia - 1);

  end if;

  --

  v_pos_fi := instr (str1 => p_cadena,       -- test string

                     str2 => p_simbolo,      -- string to locate

                     pos  => 1,              -- position

                     nth  => p_ocurrencia);  -- occurrence number

  --

  if v_pos_ini = v_pos_fi then

    if p_ocurrencia = 1 then

      v_txt := substr (str1 => p_cadena, pos => 1);

    end if;

  elsif v_pos_ini > v_pos_fi then

    v_txt := substr (str1 => p_cadena, pos => v_pos_ini + 1);

  elsif v_pos_fi = v_pos_ini + 1 then

    v_txt := p_simbolo;

  else

    v_txt := substr (str1 => p_cadena, pos => v_pos_ini + 1,

                     len  => (v_pos_fi - v_pos_ini) - 1);

  end if;

  --

  return v_txt;

End Split;