Paragraphe = bloc d'instructions

Attn : pas de paramètres !!

 

Ecrire un §

 

STOP RUN.

NOM-§.

.

 

Appeler un §

 

PROCEDURE DIVISION.

debut.

     

      PERFORM NOM-§

      END-PERFORM

     

STOP RUN.

 

L'instruction SELON

 

EVALUATE exp ALSO exp

WHEN exp ALSO exp

WHEN exp ALSO exp

      *> instructions pour val1 et val2

WHEN exp ALSO exp

      CONTINUE    *>  Û ne rien faire

WHEN OTHER

     

END-EVALUATE

 

exp peut être

·  une variable

·  un test

·  une valeur : TRUE, FALSE, ANY

·  un intervalle : borneInf THRU borneSup

 

Fonctions intrinsèques

 

Ex : COS, SIN, ANNUITY, …

CURRENT-DATE Þ donne la date actuelle

DATE-OF-INTEGER (integer) Þ convertit integer en date

NUMVAL (alphanum) Þ convertit alphanum en integer

MIN (val1,val2,…)

MAX (val1,val2,…)

MEAN (val1,val2,…) Þ fait la moyenne des valeurs

 

Appel d'une fonction

FUNCTION  NOM-FC° (…)