Virgule avec et sans V

**beegees** · 10/01/2008, 14h05

Bonjour tout le monde,

Sauriez-vous m'expiquer la raison pour laquelle j'obtiens ceci :

000,0161

en faisant 40.3399 * 4

avec ce masque :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

77 RESULTAT PIC 9(3),9(4).

Si je mets

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

77 RESULTAT PIC 9(3)V,9(4).

j'obtiens alors 164,3569

Je ne comprens pas pourquoi on met les zéros à droite et le résultat à gauche de la virgule, ça aurait pu être l'inverse ?

Merci d'avance pour votre aide.

beegees

**HRS** · 10/01/2008, 14h38

En COBOL comme en mathématiques, c'est le "." qui traduit la
décimale et non la ","

Dans votre 1er cas, c'est comme si vous aviez décrit

9(7) donc perte des décimales => 0000161

avec insertion d'une "," après le 3ème chiffre

**Hédhili Jaïdane** · 10/01/2008, 14h46

Envoyé par HRS

En COBOL comme en mathématiques, c'est le "." qui traduit la décimale et non la ","

...

chez nos amis les anglo-saxons et par défaut. Pour les mathématiques et en notation anglo-saxone.

En complément, dans le 2è cas parce que tu précises la position du point décimal.

Pour faire bien, en notation latine, déclare DECIMAL-POINT IS COMMA et le tour est joué.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
77 RESULTAT PIC ZZ9,9(4).
COMPUTE RESULTAT ROUNDED = 40,3399 * 4

et tu obtiens 161,3596

**beegees** · 10/01/2008, 14h51

Bonjour,

Merci à vous deux pour vos réponses.

Sauriez-vous me dire comment j'ajoute une seconde ligne dans SPECIAL- NAMES ?

J'ai déjà

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

           CURRENCY IS "E".

et j'aimerais mettre :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

    DECIMAL-POINT IS COMMA.

J'obtiens des erreurs.

Est-il possible de mettre deux lignes dans SPECIAL-NAMES

Merci encore

beegees

**Hédhili Jaïdane** · 10/01/2008, 15h08

Envoyé par beegees

Bonjour,
...
Sauriez-vous me dire comment j'ajoute une seconde ligne dans SPECIAL- NAMES ?

Autant que tu veux séparées par des espaces (ou virgules) et un seul point à la fin.

Si ta première ligne ne commence pas sur la ligne de SPECIAL-NAMES pour certains compilateurs tu risques juste d'avoir un warning.