PROCEDURE |
Procédure |
| Cobol |
Syntaxe
|
PROCEDURE DIVISION [USING dataname1 [,dataname2]...].
|
Paramètres
| Nom |
Description |
| USING |
Ce paramètre permet d'indiquer que des données sont transmises au programme ou au sous-programme via des arguments. Il sert à établir un lien entre le programme appelant et le programme appelé. |
| dataname1 |
Ce paramètre permet de spécifier le premier nom de donnée reçu par la procédure. Ce nom fait référence à une variable définie dans la section LINKAGE du sous-programme. |
| dataname2 |
Ce paramètre permet d'ajouter d'autres données en plus de la première, transmises au sous-programme. Chaque nom correspond à un argument formel utilisé dans la procédure. |
Description
Cette instruction permet de spécifier la divisions sous-programmes (procédure).
Remarques
- L'instruction PROCEDURE DIVISION constitue le point d'entrée logique du traitement dans un programme COBOL. C'est dans cette division que l'on décrit l'enchaînement des
opérations à exécuter. Elle joue un rôle central dans la structuration d'un programme, en distinguant clairement le code opérationnel des définitions de données.
- L'option USING permet de rendre un sous-programme plus souple et réutilisable. Grâce à ce mot clef, un même module peut recevoir des données différentes selon le
contexte d'appel, sans modifier sa structure interne. Cela renforce l'encapsulation et la modularité du code COBOL.
- Les identifiants dataname1, dataname2,..., doivent correspondre aux variables décrites dans la section LINKAGE, et non dans la WORKING-STORAGE. Cela reflète le fait que
ces variables sont "liées" dynamiquement au moment de l'appel du sous-programme, plutôt que statiquement définies.
- Une PROCEDURE DIVISION sans USING indique que le programme ne reçoit aucun paramètre externe. Cela peut convenir pour des programmes autonomes, mais limite la
réutilisabilité. Dès qu'un programme doit agir en fonction de données d'entrée, l'utilisation de USING devient essentielle.
- La liste des noms de données après USING doit respecter strictement l'ordre et les types définis dans le programme appelant. En cas de discordance, des erreurs à
l'exécution peuvent survenir, car COBOL ne vérifie pas toujours les correspondances de type à la compilation.
- Lorsqu'un programme principal appelle un sous-programme en COBOL, il transmet les paramètres dans le même ordre que celui déclaré dans la PROCEDURE DIVISION du
sous-programme. Il est donc crucial de bien documenter les interfaces pour éviter les inversions ou incohérences.
- L'usage de PROCEDURE DIVISION USING est fréquent dans les programmes en environnement transactionnel ou dans les appels entre modules d'un système plus vaste. Cela
permet une architecture en couches, où les traitements métiers sont découplés de l'interface utilisateur ou d'entreposage.
- La clarté de la PROCEDURE DIVISION favorise la maintenance et l'évolution du programme. En décomposant les traitements en paragraphes et en sections bien identifiées,
COBOL permet une lecture linéaire et structurée, ce qui est particulièrement utile dans les systèmes complexes et anciens.
Dernière mise à jour : Jeudi, le 28 juillet 2011