How to get this space away?

[Laurent <daemon2@internet.lu>]

Hi

My little program is slowly generating something which looks like the communication file I need.

The only problem is that if the values I use are of the type integer I get a leading space I don't want/need. I have no idea where it comes from or how to get rid of it in this case.

Standart Integer_IO would be Width=>0 and problem solved but here?

rtAST-N237|rr 12345678|t1 1|o1strpne|ra|a1am|a3<=2|a4+| 
                     ^-------------^

The function which generates this string:

   --------------
   -- To_BCI --
   --------------
   function To_BCI (Item : Carte) return V_String.Bounded_String is
      V_Antibiotiques : V_String.Bounded_String;
      V_Carte         : V_String.Bounded_String;
      V_Germe         : V_String.Bounded_String;
      use V_String;
   begin

-- generates the |rr 12345678 par; Lot is a Positive
      V_Carte := ((+"|ta|rt") & (+Item.Code_SIL) & (+"|rr") & (+Item.Lot'Img)); 

-- generates the |t1 1|o1strpne part
      V_Germe := Germes.IO.To_BCI (Item.Germe); 
      V_String.Append(Source => V_Carte,New_Item => V_Germe);

      for Counter in 1 .. Item.Anti_Counter loop
         V_Antibiotiques := Antibiotiques.IO.To_BCI (Item.Antibiotiques (Counter));
         V_String.Append (Source   => V_Carte, New_Item => V_Antibiotiques);
      end loop;
      return V_Carte;
   end To_BCI;

Thanks

Laurent