A QUESTION ABOUT evaluation of two-dimensional Associative Arrays

Hello
This is Robin.
I'm learning about the package of Enterprisedb.
I wrote a package like:CREATE OR REPLACE PACKAGE BODY pkg_test_d2IS
TYPE t_d2_tab IS TABLE OF integer INDEX BY integer;TYPE t_d2_arr IS TABLE OF t_d2_tab INDEX BY integer;
v_D2_Value t_d2_arr;v_D2_Max integer DEFAULT 0;
PROCEDURE xxx(INOUT xxxx) ISBEGIN  ...  cnt := 1;  LOOP   cnt := cnt + 1;  IF XXX
   v_D2_Value(v_D2_Max)(cnt) := 0;   END IF;   ....     
But it can not be excused.I modified v_D2_Value(v_D2_Max)(cnt)  to v_D2_Value[v_D2_Max][cnt].So it can be load in to database.When the package be excused,an error occured.
I need a way to give a value to the variable v_D2_Value  directly,which like v_D2_Value(v_D2_Max)(cnt) := 0  .
Could you give me some advice please?
 
Best Regards