Ouvrir un fichier COBOL. Réglez votre curseur là où vous souhaitez entrer dans le cahier.
Type:
"gt; gt;COPY _"
Cette initialise la commande de copie lorsque le fichier est compilé.
Tapez le nom de la structure de code que vous souhaitez utiliser comme un cahier. Par exemple, si vous souhaitez utiliser une classe appelée "class1" comme un cahier, votre code jusqu'ici apparaîtrait comme:
"gt; gt;COPY class1 __"
Type " gt; | " pour fermer cette première ligne de code. Toutes les déclarations COBOL initialisation se terminent par "gt; |." Toutes les lignes de fin de code avec "l." Presse "Entrer" pour aller à la ligne suivante.
Type " | _" puis tapez un "littéral" à remplacer le nom de l'cahier. Un littéral est une chaîne alphanumérique qui COBOL a besoin pour exécuter la commande de copie. Par exemple, si votre nom de cahier est "Code-5," votre littérale pourrait être "Code5."
Type:
"| _ D' _ |"
Cette déclaration prépare le lecteur de code pour le nom d'une bibliothèque où la structure de code pour être utilisé comme un cahier se trouve. Maintenant, tapez le nom de cette bibliothèque. Par exemple, si la bibliothèque de données est appelée "datalibrary," votre code serait jusqu'ici apparaître comme:
COPY class1 __gt; |
|class1| | _ D' __ datalibrary _ |
Terminez cette deuxième ligne de code gt; |
Ajouter un autre littéral pour la bibliothèque. Votre code serait maintenant ressembler à ceci:
COPY class1 __gt; |
|class1| | _ D' datalibrary _ |
|EN| | _datalibrary__|
Tapez les opérateurs fonctionnels pour la commande de copie. Ils sont le nom de la commande de copie que vous utilisez actuellement, que vous pouvez faire, et le littéral que vous avez choisi plus tôt pour le cahier. Le code ressemble maintenant à ceci:
COPY class1 gt; |
|class1| | _ D' datalibrary _ |
|EN| | _datalibrary__|
lt; |SUPPRESS| lt;__ | _REPLACING__copycommand1PARclass1||
Enregistrez votre fichier avec une extension de fichier COBOL, comme CBL, .ccp, or.cob. Compiler le fichier dans un compilateur COBOL. Le cahier est maintenant utilisé.