Index alphabétique des mots-clés COBOL

Sélectionnez une lettre pour afficher les mots-clés correspondants :

0-9 A B C D E F G H I J K L M N O P Q R S T U V W X Y Z Autres

Ce système d'index vous permet d'accéder rapidement aux définitions des mots-clés COBOL, classés par ordre alphabétique. Lorsque l'on débute en programmation, il est fréquent de rencontrer des notions inconnues. Grâce à cet index, il vous suffit de cliquer sur une lettre pour explorer les termes correspondants, sans avoir à faire défiler l’ensemble du cours. Cela vous fera gagner un temps précieux et rendra votre apprentissage plus fluide et plus efficace.

SUBTRACT : une instruction arithmétique pour la soustraction

En COBOL, l’instruction SUBTRACT est utilisée pour effectuer des soustractions entre des variables numériques ou des constantes. Elle permet de retrancher une ou plusieurs valeurs d’une ou plusieurs variables cibles.

Utilisation générale

Syntaxe simple :


SUBTRACT source FROM destination.
  

Cela signifie que la valeur de source est retranchée de celle de destination, et le résultat est stocké dans destination.

Exemple simple


01 A            PIC 9(3) VALUE 20.
01 B            PIC 9(3) VALUE 5.

SUBTRACT B FROM A.
  

Après cette instruction, A contiendra 15, car 20 - 5 = 15.

SUBTRACT avec GIVING

Pour conserver la valeur originale des variables, on peut utiliser la forme avec GIVING :


SUBTRACT A FROM B GIVING C.
  

Ici, le résultat de B - A est stocké dans C, sans modifier A ni B.

Exemple complet


IDENTIFICATION DIVISION.
PROGRAM-ID. SUBTRACT-EXEMPLE.

DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-TOTAL          PIC 9(4) VALUE 100.
01 WS-RETRAIT        PIC 9(4) VALUE 30.
01 WS-RESULTAT        PIC 9(4).

PROCEDURE DIVISION.
SUBTRACT WS-RETRAIT FROM WS-TOTAL GIVING WS-RESULTAT.
DISPLAY "Résultat : " WS-RESULTAT.
STOP RUN.
  

Ce programme soustrait WS-RETRAIT de WS-TOTAL, puis affiche le résultat dans WS-RESULTAT.

Remarques

  • Il est possible de soustraire plusieurs valeurs d’un seul coup :
    SUBTRACT A B FROM C.
  • Sans GIVING, la variable cible est modifiée directement.
  • Assurez-vous que la variable de destination est assez grande pour contenir le résultat.