Mise en forme du résultat d'une estimation de taille de base de données

Vous pouvez mettre en forme le résultat pour votre estimation de taille de base de données. Les sous-objets (par exemple les colonnes et les index) contenus dans une table affichés en décalé, et vous pouvez imprimer des informations supplémentaires après le total.

La syntaxe du résultat est la suivante :

[taille-objet][:compartiment]|[ObjectID][|libellé]

où :

taille-objet - représente la taille de l'objet.
compartiment - représente un nombre d'un chiffre, qui indique que la taille de l'objet doit être exclue de la taille totale de la base de données et doit être imprimée après le calcul de la taille de la base de données. Par exemple, vous pouvez décider d'inclure la taille des tables individuelles dans votre calcul de la taille de la base de données et d'imprimer les tailles des tablespaces hors du calcul.
ObjectID - n'est pas nécessaire pour les objets, tels que les tables, mais est requis pour les sous-objets, si vous souhaitez les imprimer dans la Liste de résultats.
libellé - toute chaîne identifiante appropriée, le plus souvent défini à ShortDescription, qui imprime le type et le nom de l'objet sélectionné.

Par exemple, dans le gestionnaire d'événement défini sur la métaclasse Table (ayant calculé et stocké la taille d'une table, la taille de toutes les colonnes de type LONG contenues dans la taille, ainsi que la taille de chaque index dans la table), nous créons un message variable pour imprimer cette information. Nous commençons par imprimer une ligne donnant la taille de la table :

message = CStr(TableSize) & "||" & objTable.ShortDescription & vbCrLf

Nous ajoutons ensuite une ligne qui imprime la taille totale de toutes les colonnes de type LONG de la table :

message = message & CStr(LongSize) & "||Colonnes de type LONG" & vbCrLf

Nous ajoutons ensuite une ligne qui imprime la taille de chaque index dans la table :

message = message & CStr(IndexSize) & "|" & objIndex.ObjectID & vbCrLf

Dans le gestionnaire d'événement défini sur la métaclasse Tablespace (en ayant calculé et stocké la taille d'un tablespace), nous créons un message variable pour imprimer cette information après avoir imprimé le calcul de la taille de base de données.

Nous commençons par remplacer l'introduction par défaut de ce second compartiment :

message = ":1||Des tables sont allouées aux tablespaces suivants :"

Nous ajoutons une ligne qui imprime la taille de chaque tablespace dans la table :

message = message + CStr(tablespaceSize) & ":1||" & objTablespace.ShortDescription

Le résultat se présente comme suit :

Estimation de la taille de la base de données "Sales"...

 Nombre    Taille estimée      Objet
-------    --------------      ------------------------------------

 10,000           6096 Ko      Table 'Invoices'
                                 Colonnes de type LONG (35 KB)
                                 Index 'customerFKeyIndex' (976 KB)
                                 Index 'descriptionIndex' (1976 KB)

	                       [...etc...]

 Des tables sont allouées aux tablespaces suivants :

           Taille estimée      Objet
           --------------      ------------------------------------
                  6096 Ko      Tablespace 'mainStorage'

	                       [...etc...]