Problem with Arrays

I have written a procedure and iam also able to compile it, but while running this procedure iam getting an error that v_return_array is undefined.
I have a table with 2 name columns. I need to compare the columns and keep only the rows where atleast 2 words in the name match.
example "David Smith"  & "David John Smith" is a match
while "David Smith" & "David Plunket" is not a match

The procedure i have written is below :

CREATE OR REPLACE PROCEDURE name_match
      IS
      
            i PLS_INTEGER := 1;
            j PLS_INTEGER := 1;
            v_word_match PLS_INTEGER;
            v_match_count PLS_INTEGER := 0;
            v_next_position PLS_INTEGER;
            v_enclosed BOOLEAN;
            p_delimiter VARCHAR2(1) := ' ';
            p_encloser VARCHAR2(10) := NULL;
            TYPE VARCHAR2_TT IS TABLE OF VARCHAR2(50);
            v_return_array VARCHAR2_TT := VARCHAR2_TT();
            v_text VARCHAR2(2000);
BEGIN

      INSERT INTO tmp_table
      SELECT * FROM source_table;

      DELETE from source_table;

      --CURSOR for name matching

      DECLARE CURSOR name_match is
            SELECT
                  primarykey,
                  target_name,
                  target_dob,
                  target_gender,
                  source_dob,
                  source_gender,
                  source_name
            FROM
                  tmp_table;

      BEGIN
      FOR name_rec IN name_match LOOP

      v_text := LTRIM(RTRIM(name_rec.target_name,p_delimiter),p_delimiter);


      --LOOP to split the target name
            WHILE v_text IS NOT NULL LOOP
                  v_return_array.EXTEND;

                  -- Check whether (remaining) text starts with an encloser (e.g. doublequote):
                  v_enclosed := SUBSTR(v_text ,1,1) = p_encloser;

                  IF v_enclosed THEN
                        v_text := RTRIM(SUBSTR(v_text,2));
                        v_next_position := INSTR(v_text,p_encloser);
                  ELSE
                        v_next_position := INSTR(v_text,p_delimiter);
                  END IF;

                  IF v_next_position = 0 THEN
                        -- No more delimiters found, so return remaining text
                        -- (first strip off any spaces and enclosing quotes)
                        v_return_array(i) := RTRIM(v_text, p_encloser||' ');
                        EXIT;
                  ELSE
                        -- Use the portion of the text up to the next delimiter or encloser:
                        -- ('v_next_position' has already been worked out)
                        v_return_array(i) := RTRIM(SUBSTR(v_text,1,v_next_position -1));
                        v_text := RTRIM(SUBSTR(v_text,v_next_position +1));

                        IF v_enclosed THEN
                              -- Deal with closing quote by stripping one more character:
                              v_text := RTRIM(SUBSTR(v_text,2));
                        END IF;
                  END IF;

                  i := i + 1;
            END LOOP;

      --LOOP to check if each word in the target name is found in the source name

            FOR  j in 1..i LOOP

                  -- SELECT v_word_match into length(replace(name_rec.source_name, v_return_array(j), v_return_array(j)||'~')) - length(name_rec.source_name) from dual;


                  IF v_word_match > 0 Then

                        v_match_count := v_match_count + 1;

                  END IF;

            END LOOP;

            IF v_match_count > 1 then

               v_match_count := 0;

               INSERT INTO source_table
               values(name_rec.primarykey,
               name_rec.target_name, name_rec.target_dob, name_rec.target_gender,
               name_rec.source_dob, name_rec.source_gender, name_rec.source_name);

            END IF;

            v_match_count := 0;
            i := 0;
      --      v_return_array.EMPTY;
      END LOOP;

END;

END;
/

Iam very new to oracle, pls help.