Langage de programmation - Cobol - Référence des instructions et des fonctions

USAGE	Usage
Cobol

Syntaxe

Paramètres

Nom	Description
IS	Ce paramètre permet d'indiquer explicitement le mode d'entreposage (format interne) d'un item de données dans la mémoire de l'ordinateur.
BINARY	Ce paramètre permet de désigner un entreposage en binaire entier, optimisé pour les calculs rapides ; équivalent à COMPUTATIONAL ou COMP.
COMP	Ce paramètre est une forme abrégée de COMPUTATIONAL, utilisée pour représenter les données numériques stockées en format binaire.
COMP-1	Ce paramètre désigne un stockage en virgule flottante simple précision ; il correspond généralement à un float dans d'autres langages.
COMP-2	Ce paramètre permet un stockage en virgule flottante double précision, utile pour les calculs scientifiques nécessitant plus de précision.
COMP-3	Ce paramètre spécifie un format de stockage en décimal compressé (packed decimal), optimisé pour les traitements comptables et financiers.
COMP-4	Ce paramètre est une extension propriétaire du mode binaire, utilisée selon les systèmes (peu standardisé).
COMP-5	Ce paramètre définit un stockage binaire sans limitation de taille ni d'alignement imposé par la norme COBOL ; dépend du système hôte.
COMP-6	Ce paramètre est peu courant et dépend du compilateur ; il représente un usage propriétaire ou spécialisé.
COMPUTATIONAL	Ce paramètre est synonyme de COMP ou BINARY, et indique que la donnée est utilisée pour des calculs avec stockage binaire.
COMPUTATIONAL-1	Ce paramètre équivaut à COMP-1, donc une représentation en virgule flottante simple précision.
COMPUTATIONAL-2	Ce paramètre est équivalent à COMP-2, pour la double précision en virgule flottante.
COMPUTATIONAL-3	Ce paramètre correspond à COMP-3, soit un stockage en décimal empaqueté.
COMPUTATIONAL-4	Ce paramètre est équivalent à COMP-4, utilisé dans certains environnements propriétaires.
COMPUTATIONAL-5	Ce paramètre est identique à COMP-5, soit un stockage binaire natif sans contrainte standardisée.
COMPUTATIONAL-6	Ce paramètre reflète le COMP-6 et peut correspondre à des usages particuliers définis par le compilateur ou le système d'exploitation.
DISPLAY	Ce paramètre indique que les données sont entreposées sous forme lisible par l'humain (texte ASCII ou EBCDIC), et utilisées pour l'affichage.
DISPLAY-1	Ce paramètre est utilisé pour des caractères en double octet, notamment pour les alphabets étendus comme le japonais (DBCS).
INDEX	Ce paramètre désigne un format réservé aux index internes de tableaux, utilisé uniquement avec OCCURS ... INDEXED BY.
PACKED-DECIMAL	Ce paramètre est un synonyme de COMP-3, désignant un format compacté pour les données numériques décimales.
POINTER	Ce paramètre indique que l'élément stocke une adresse mémoire, typiquement utilisée pour les procédures ou la gestion dynamique de la mémoire.

Description

Cette instruction permet d'indiquer le format d'un item de données dans l'entreposage de l'ordinateur.

Remarques

Le mot clef USAGE est essentiel pour optimiser l'espace mémoire et la performance des programmes COBOL. Il ne change pas la valeur logique de la donnée, mais précise la manière dont elle est physiquement stockée en mémoire, influençant ainsi la rapidité d'exécution et la compatibilité entre plateformes.
Les formats comme BINARY, COMP, et COMPUTATIONAL sont interchangeables selon les compilateurs, mais peuvent présenter des différences subtiles de représentation. Il est donc recommandé de bien comprendre le comportement du compilateur cible pour garantir la portabilité du code.
Le format COMP-3 (ou PACKED-DECIMAL) est très répandu dans les applications financières, car il offre un bon compromis entre précision décimale et économie de mémoire. Chaque chiffre est stocké sur quatre bits (demi-octet), permettant de compacter plusieurs chiffres dans un seul octet.
Les formats COMP-1 et COMP-2 sont réservés aux traitements scientifiques ou techniques qui nécessitent la gestion des nombres à virgule flottante. Ils sont peu utilisés dans les applications de gestion, car les traitements financiers exigent généralement des valeurs exactes et non arrondies.
Le format DISPLAY est le plus simple et le plus lisible, mais aussi le moins efficace en termes de performance. Il est surtout utile pour les données devant être lues ou affichées à l'écran, mais déconseillé pour les données manipulées dans des calculs intensifs.
USAGE POINTER permet de travailler avec des adresses mémoire, une fonctionnalité avancée utile dans des contextes modernes ou dans l'utilisation de bibliothèques externes. Ce type d'usage est rarement utilisé en COBOL classique, mais devient pertinent dans des environnements où COBOL interagit avec du code C ou des API systèmes.
Les formats COMPUTATIONAL-n sont des synonymes de COMP-n, mais ils sont plus explicites dans leur nom, ce qui peut améliorer la lisibilité du code. En revanche, tous les compilateurs ne les prennent pas en charge de la même manière, et leur usage peut réduire la portabilité entre plateformes COBOL.
Le mot clef INDEX dans USAGE INDEX est spécifique à la gestion des tableaux indexés et ne peut pas être utilisé comme une variable classique. Il sert exclusivement à manipuler des indices internes plus efficaces que les entiers simples dans les structures OCCURS, en facilitant des recherches plus rapides.

Dernière mise à jour : Jeudi, le 28 juillet 2011

Section courante

A propos

Section administrative du site

USAGE

Syntaxe

Paramètres

Description

Remarques