Syntaxe
|
ACCEPT identifier1 FROM mnemonicname1
|
|
ACCEPT identifier1 FROM environmentname
|
|
ACCEPT identifier1 FROM DATE|DAY|DAY-OF-WEEK|TIME
|
Paramètres
| Nom |
Description |
| identifier1 |
Ce paramètre permet d'indiquer l'identificateur recevant les données. |
| mnemonicname1 |
Ce paramètre permet d'indiquer l'entrée de périphérique. |
| environmentname |
Ce paramètre permet d'indiquer la source de données d'entrée. |
Description
Cette instruction permet d'entrée des données à partir du clavier ou du système d'exploitation.
Remarques
- L'instruction ACCEPT permet de lire des données à partir de plusieurs sources : Elle peut être utilisée pour capturer une entrée manuelle via
le clavier, mais aussi pour lire des informations système comme la date, l'heure ou d'autres constantes d'environnement. Cela rend la commande très polyvalente.
- Quand ACCEPT est utilisé avec FROM DATE, elle permet d'obtenir la date du jour : Ce comportement est utile pour l'horodatage automatique des rapports
ou pour générer des journaux. Il n'est pas nécessaire que l'utilisateur saisisse quoi que ce soit dans ce cas.
- Avec l'option FROM TIME, on peut récupérer l'heure courante au moment de l'exécution : Cela permet, par exemple, de noter précisément l'heure d'exécution
d'une transaction ou d'un programme. L'information peut être stockée dans un champ de type PIC 9(6).
- Lorsqu'on utilise mnemonicname, l'entrée peut venir d'un périphérique particulier : Ce périphérique est défini dans la section SPECIAL-NAMES du
programme COBOL. Cela permet de rediriger les entrées vers des unités personnalisées comme des lecteurs de badge, ports série,...
- ACCEPT peut aussi recevoir des données d'une source d'environnement définie : Cela permet de récupérer des variables système, des chemins ou autres
valeurs définies par l'environnement d'exécution. C'est très pratique dans des environnements complexes ou automatisés.
- Le champ cible identifier1 doit être bien défini dans la WORKING-STORAGE : La taille et le format de ce champ doivent correspondre à la donnée attendue.
Par exemple, une date sous forme DATE renverra un format YYYYMMDD, nécessitant un champ PIC 9(8).
- L'instruction ACCEPT est souvent utilisée dans des applications interactives : Elle permet de poser des questions à l'utilisateur et d'entreposer sa
réponse. Cela la rend utile pour créer des interfaces simples sans passer par des écrans graphiques.
- Il est important de gérer les cas d'erreur ou de saisie incorrecte : Même si ACCEPT ne propose pas nativement de gestion d'erreur, le programme
COBOL peut effectuer une validation après réception. Il est donc fréquent d'enchaîner avec un IF ou un EVALUATE pour contrôler la donnée saisie.
Dernière mise à jour : Jeudi, le 28 juillet 2011