Discussion :

[piare1305]

Bonjour tout le monde,
Je reviens vers vous aujourd’hui pour demander la différence entre une déclaration Binary , COMP , COMP-3 , COMP-4, COMP-5

Je rencontre toujours des difficultés pour utiliser ces données, de mon côté je déclare toujours les données numériques sans les utiliser et je ne sais pas si c’est correct ou non

Merci d’avance pour votre aide.

Cordialement
Imane Koudi

[Luc Orient]

BINARY, COMP et COMP-4 sont synonymes. Il s'agit de données binaires qui peuvent occuper, selon la définition de la clause PICTURE, 2, 4 ou 8 octets. Elles peuvent être signées ou non signées.
On parle alors de " Binary items ".

COMP-5 est proche de cette dernière représentation avec une différence subtile. A savoir que la limite du nombre représenté n'est pas fonction de la clause PICTURE mais de la taille du nombre d'octets utilisés pour stocker la valeur.
On parle alors de " Native binary items ".

COMP-3 contient des données qui stockées en décimal condensé, c'est à dire que chaque chiffre de la clause PICTURE est stocké sur un demi octet, sauf pour le dernier octet qui contient un chiffre et le signe.
On parle alors de " Packed-decimal items ".

[Gurdil87]

Tout à fait d'accord avec l'excellent Luc Orient,

quelques précisions quant à l'usage,

le format étendu (avec ou sans la clause usage display) doit être réservé à l'externalisation des données (affichage, production d'état et lors d'échanges avec des systèmes ouverts) et ne doit jamais être utilisé pour des opérations arithmétiques car il est sous performant dans cette utilisation.

Les formats binaires sont tout spécialement utiles pour la manipulation des nombres entiers (Indices de boucles compteurs etc...) et dans ces cas plus performants que le comp-3. De mon expérience au delà d'une picture > à 9(9) le format binaire est moins performant que le format comp-3.
Attention à l'option de compilation TRUNC qui aura une influence sur la manière dont les nombres binaires seront manipulés par le compilateur.
Vous ne devez utiliser que 3 formats S9(4) S9(9) S9(18) ce pour avoir une donnée qui correspond toujours à sa réservation mémoire (Cf réponse de Luc Orient)

Le format comp-3 doit être utilisé pour tout calcul impliquant des nombres avec des décimales.

[escartefigue]

Le format comp-3 doit être utilisé pour tout calcul impliquant des nombres avec des décimales.

En n'oubliant pas la déclarative "DECIMAL POINT IS COMMA" pour éviter les soucis d'alignement des montants sur la décimale

J'avais mesuré il y a quelques années les écarts de performances en temps CPU avec des calculs identiques effectués sur des données de format étendu, packé et binaire sur plate forme Z/OS.
Le format le plus performant est le binaire, 8 fois moins gourmand en CPU que l'étendu, et 2,5 fois moins que le packé.
La présence ou non du signe n'a par contre que très peu d'influence sur les perfs (et ce bien que le signe soit ajouté si absent par l'OS avant calcul)

[el_slapper]

(.../...)J'avais mesuré il y a quelques années les écarts de performances en temps CPU avec des calculs identiques effectués sur des données de format étendu, packé et binaire sur plate forme Z/OS.
Le format le plus performant est le binaire, 8 fois moins gourmand en CPU que l'étendu, et 2,5 fois moins que le packé.(.../...)

Ceci dépend évidemment du type de processeur. Avec OpenCobol sur mon processeur intel perso, le binaire est 100 fois plus rapide que tout le reste. Et ça sera encore différent sur un AMD.....etc.

[escartefigue]

Certes, mais nous sommes ici sur un sujet Z/OS comme indiqué dans le titre et mes mesures, comme précisé dans ma réponse précédentes, étaient bien sur Z/OS

[Luc Orient]

En n'oubliant pas la déclarative "DECIMAL POINT IS COMMA" pour éviter les soucis d'alignement des montants sur la décimale

Non ce n'est pas exact. Il est parfaitement possible de gérer l'alignement sur la virgule pour les nombres décimaux sans avoir à utiliser cette clause. Cette dernière ne fait qu'inverser le rôle de la virgule et du point pour certaines parties du texte du programme.

DECIMAL-POINT IS COMMA clause
The DECIMAL-POINT IS COMMA clause exchanges the functions of the period
and the comma in PICTURE character-strings and in numeric literals

Source : Enterprise COBOL for z/OS - Language Reference - V6.1