Need Value of enum type not position.

[dallex@erols.com (Daniel Allex)]

With the following declaration:
 
   type Hov_Mode_Type is 
         (INVALID,  
          OFF,      
          INITIATE, 
          AUTO); 
   for Hov_Mode_Type use(
      INVALID  => 7, 
      OFF      => 8, 
      INITIATE => 9, 
      AUTO     => 10);

I can get the position 
   Ada.Text_IO.Put_Line(Integer'Image(Hov_Mode_Type'Pos(I)));
Which returns 0,1,2, or 3.  What I want is the value of 7,8,9,10.  I
can't get 'val to work.  need some help.