Types

   subtype T_Nbr_Type is Natural range 0..Max_Types;
   type T_Info_Type is
      record
         Nom        : Unbounded_String;
         Parametre  : Boolean := False;
         Nbr_Objets : Natural := 1;
      end record;

   type T_Tab_Types is array(T_Nbr_Type) of T_Info_Type;
   type T_Type is
      record
         Nbr_Types : T_Nbr_Type := 0;
         Tab_Type  : T_Tab_Types;
      end record;

Les types représentent ceux présents dans l'interface (partie visible) de la spécification du paquetage. Attention l'ensemble des données présentent dans la partie ``Private'' du paquetage et plus particulièrement les types ne sont pas extrait car il ne présente aucun intérêt dans la construction d'un fichier de test du paquetage.
Dans la suite de ce document nous appellerons ``objet'' ces types qui sont donc visible à l'utilisation du paquetage.
Lors de la création du fichier de test, il est alors possible de spécifier le nombre d'objets de ce type que l'on désire. Les particularités de ces objets seront d'être des variables globales dans le programme de test. Ce qui permettra pour chaque appel de sous-programme contenant l'un de ces types de spécifier avec lequel on veut travailler.