drop table t1;
create table t1(c1 varchar2(1));
alter system flush buffer_cache;
alter system flush shared_pool;
alter system switch logfile;
set timing on;
insert into t1 (select 'a' from dual connect by level < 1000000);
commit;
update t1 set c1='b';
commit;
delete from t1;
commit;

create table tab_beingman_varchar2_size_1
(
    pk_id integer
  , name varchar2(4000)
)
/

create table tab_beingman_varchar2_size_2
(
    pk_id integer
  , name varchar2(4)
)
/

create or replace package pkg_beingman_varchar2_size is

   type t_name_array_4000 is record (name tab_beingman_varchar2_size_1.name%type);
   type a_name_array_4000 is table of t_name_array_4000 index by binary_integer;

   type t_name_array_4 is record (name tab_beingman_varchar2_size_2.name%type);
   type a_name_array_4 is table of t_name_array_4 index by binary_integer;

   procedure p1;

end;
/

create or replace package body pkg_beingman_varchar2_size is

   procedure p1 is
      a_name_array_4000_v a_name_array_4000;
      a_name_array_4_v a_name_array_4;
   begin
      for r1 in (
                  select pk_id i,name
                  from tab_beingman_varchar2_size_1
                  where rownum <= 1000
                ) loop
         a_name_array_4000_v(r1.i).name := r1.name;
      end loop;

      for r2 in (
                  select pk_id i,name
                  from tab_beingman_varchar2_size_2
                  where rownum <= 1000
                ) loop
         a_name_array_4_v(r2.i).name := r2.name;
      end loop;
   end;

end;
/

13:37:58 SQL> delete from plan_table;

31 rows deleted.

Elapsed: 00:00:00.06
13:38:43 SQL> explain plan for
13:38:43   2  select /*+ ordered */ *
13:38:43   3  from tab_beingman_varchar2_size_1 a
13:38:43   4      ,tab_beingman_varchar2_size_2 b
13:38:43   5  where a.pk_id = b.pk_id
13:38:43   6  /

Explained.

Elapsed: 00:00:00.06
13:38:43 SQL> @showplan9i

PLAN_TABLE_OUTPUT
---------------------------------------------------------------------------------------------------

--------------------------------------------------------------------------------------
| Id  | Operation            |  Name                         | Rows  | Bytes | Cost  |
--------------------------------------------------------------------------------------
|   0 | SELECT STATEMENT     |                               |   164 |   325K|     7 |
|*  1 |  HASH JOIN           |                               |   164 |   325K|     7 |
|   2 |   TABLE ACCESS FULL  | TAB_BEINGMAN_VARCHAR2_SIZE_1  |   164 |   322K|     2 |
|   3 |   TABLE ACCESS FULL  | TAB_BEINGMAN_VARCHAR2_SIZE_2  |   164 |  2788 |     2 |
--------------------------------------------------------------------------------------

Predicate Information (identified by operation id):
---------------------------------------------------

   1 - access("A"."PK_ID"="B"."PK_ID")

Note: cpu costing is off

16 rows selected.

Elapsed: 00:00:00.20
13:38:43 SQL> delete from plan_table;

4 rows deleted.

Elapsed: 00:00:00.06
13:38:50 SQL> explain plan for
13:38:50   2  select /*+ ordered */ *
13:38:50   3  from tab_beingman_varchar2_size_2 b
13:38:50   4      ,tab_beingman_varchar2_size_1 a
13:38:50   5  where a.pk_id = b.pk_id
13:38:50   6  /

Explained.

Elapsed: 00:00:00.06
13:38:50 SQL> @showplan9i

PLAN_TABLE_OUTPUT
---------------------------------------------------------------------------------------------------

--------------------------------------------------------------------------------------
| Id  | Operation            |  Name                         | Rows  | Bytes | Cost  |
--------------------------------------------------------------------------------------
|   0 | SELECT STATEMENT     |                               |   164 |   325K|     5 |
|*  1 |  HASH JOIN           |                               |   164 |   325K|     5 |
|   2 |   TABLE ACCESS FULL  | TAB_BEINGMAN_VARCHAR2_SIZE_2  |   164 |  2788 |     2 |
|   3 |   TABLE ACCESS FULL  | TAB_BEINGMAN_VARCHAR2_SIZE_1  |   164 |   322K|     2 |
--------------------------------------------------------------------------------------

Predicate Information (identified by operation id):
---------------------------------------------------

   1 - access("A"."PK_ID"="B"."PK_ID")

Note: cpu costing is off

16 rows selected.

v1 varchar2(30) := 'abc';

v1 varchar2(255) := 'abc';

v1 varchar2(257) := 'abc';