ARE |
Sont |
|---|---|
| Cobol | |
Syntaxe
| DATA RECORD ARE dataname1 [,dataname2[...]] |
|
FD filename [; BLOCK CONTAINS [integer1 TO] integer2 [RECORDS|CHARACTERS]] [; RECORD CONTAINS [integer3 TO] integer4 CHARACTERS] ; LABEL RECORD ARE (STANDARD|OMITTED) [; VALUE OF LABEL IS [literal1]] [; DATA RECORD ARE dataname1 [,dataname2]...]. |
| LABEL RECORD ARE (STANDARD|OMITTED) |
| REPORT ARE reportname1. |
| VALUES ARE literal1 [(THROUGH|THRU) literal2] |
Paramètres
| Nom | Description |
|---|---|
| dataname1, dataname2, ... | Ces paramètres font référence aux noms des enregistrements de données dans le fichier ou le rapport que l'on souhaite inclure dans la déclaration. Par exemple, dataname1 représente un enregistrement de données spécifique dans le fichier ou dans la section de gestion des rapports, et il peut y en avoir plusieurs séparés par des virgules. |
| filename | Ce paramètre permet d'indiquer un nom du fichier dans lequel les enregistrements de données sont définis. Ce fichier est souvent décrit dans la section FD (File Description) de la déclaration, et il contient les enregistrements auxquels on accède pour lire ou écrire des données. |
| integer1 TO integer2 | Ces paramètres définissent un intervalle de blocs dans la déclaration BLOCK CONTAINS, où integer1 et integer2 spécifient le nombre de blocs ou de caractères que le fichier contient par enregistrement. Cela permet de configurer la taille des enregistrements dans le fichier, selon les besoins de l'application. |
| integer3 TO integer4 | Ces paramètres permettent de définir un intervalle de caractères dans la déclaration RECORD CONTAINS. Ce paramètre permet de spécifier la taille de chaque enregistrement de données en termes de nombre de caractères qu'il contient. |
| STANDARD | Ce paramètre permet d'indiquer qu'une étiquette de fichier est présente et doit être prise en compte. |
| OMITTED | Ce paramètre permet d'indiquer qu'il n'y a pas d'étiquette ou que l'étiquette doit être ignorée lors du traitement du fichier ou du rapport. |
| literal1 (THROUGH|THRU) literal2 | Ce paramètre permet de définir un intervalle de valeurs pour un champ spécifique. Par exemple, literal1 THROUGH literal2 définit un intervalle entre deux valeurs littérales. Cela est souvent utilisé dans les déclarations VALUES ARE pour indiquer une plage de valeurs possibles pour un champ de données. |
| reportname1 | Ce paramètre permet d'indiquer le nom d'un rapport que l'on souhaite lier à un fichier ou une opération spécifique. Ce rapport peut contenir des données ou être utilisé pour générer des sorties à partir de certaines opérations effectuées dans le programme COBOL. |
Description
Cette instruction permet d'indiquer que l'instruction parent est inclus dans le contexte spécifié.
Remarques
- Flexibilité dans la gestion des fichiers : L'instruction ARE permet de lier des enregistrements de données à un fichier ou un rapport spécifique en COBOL. Cela offre une grande flexibilité dans la gestion des fichiers car elle permet de spécifier plusieurs enregistrements à inclure dans une structure de fichier, facilitant ainsi l'accès à des données complexes tout en maintenant une organisation claire et ordonnée.
- Utilisation de BLOCK CONTAINS pour gérer la taille des enregistrements : Le paramètre BLOCK CONTAINS avec les valeurs integer1 TO integer2 permet de spécifier la taille des blocs d'enregistrement dans le fichier. Cela est utile lorsque les enregistrements sont de tailles variables et qu'on souhaite s'assurer que chaque bloc contient un nombre spécifié de RECORDS ou de CHARACTERS, selon le besoin. Cela aide à optimiser la gestion de la mémoire et l'efficacité du traitement.
- Importance de la taille d'enregistrement avec RECORD CONTAINS : Le paramètre RECORD CONTAINS permet de définir un intervalle pour la taille de chaque enregistrement en termes de caractères. Par exemple, integer3 TO integer4 CHARACTERS spécifie un intervalle de taille pour l'enregistrement. Ce paramètre est crucial pour s'assurer que les données sont correctement alignées dans le fichier, et qu'aucune donnée ne déborde ou n'est mal interprétée lors du traitement.
- Traitement des étiquettes avec LABEL RECORD ARE : Le paramètre LABEL RECORD ARE permet de spécifier si le fichier ou le rapport contient une étiquette ou non. L'option STANDARD indique qu'une étiquette est présente et doit être prise en compte, tandis que OMITTED signifie qu'aucune étiquette n'est présente ou qu'elle doit être ignorée. Cela permet de gérer la structure des fichiers de manière flexible, surtout pour les fichiers où les en-têtes ou étiquettes sont optionnels.
- Lier un rapport à un fichier avec REPORT ARE : Le paramètre REPORT ARE reportname1 permet de lier un rapport à un fichier ou à une opération spécifique. Ce rapport peut être utilisé pour générer des sorties ou pour contenir des informations à propos des données traitées. Cette association entre un fichier de données et un rapport facilite la production de rapports détaillés à partir des données brutes traitées dans le programme COBOL.
- Définir des intervalles de valeurs avec VALUES ARE : Le paramètre VALUES ARE literal1 (THROUGH|THRU) literal2 est utilisé pour définir un intervalle de valeurs littérales dans le fichier ou rapport. Cela est souvent utilisé pour valider ou filtrer des données dans des applications financières ou commerciales. Par exemple, cela permet de spécifier des plages de valeurs valides pour des champs numériques ou des chaînes de caractères.
- Gestion des enregistrements multiples dans un fichier : En spécifiant plusieurs dataname dans l'instruction DATA RECORD ARE, COBOL permet de lier plusieurs enregistrements de données à un même fichier ou rapport. Cela permet de traiter des fichiers ou rapports complexes avec différentes sortes d'informations, en les associant à des noms d'enregistrements spécifiques, ce qui améliore l'organisation des données dans l'application.
- Simplification du traitement des fichiers complexes : L'utilisation de l'instruction ARE permet de simplifier le traitement des fichiers complexes en associant directement les enregistrements, les étiquettes et les valeurs dans un seul bloc de code. Cela rend la gestion des fichiers plus structurée et compréhensible, en particulier pour les projets où la logique de lecture/écriture est partagée entre plusieurs structures de données ou rapports.
Dernière mise à jour : Jeudi, le 28 juillet 2011