Gewusst wie: Erstellen eine COBOL-Copybook

Erstellt von IBM, ist der Copy-Befehl eine nette Abkürzung, die begann in der Skriptsprache COBOL und anderen Programmiersprachen angenommen. In COBOLT Code stellt im Wesentlichen ein weiteres Stück Code an anderer Stelle geschrieben. Der vorgestellte Code wird eine Copybook bezeichnet. Wenn Sie es ändern, erhalten überall, wo Sie eingeführt haben es automatisch die Änderung, den, die der Code kompiliert hat. Der Copy-Befehl macht es einfach andere COBOL-Datenstrukturen in Copybooks zu verwandeln, die andere Code-Strukturen schnell verweisen können.

Anweisungen

1 Öffnen Sie eine COBOL-Datei. Setzen Sie den Cursor, überall dort, wo Sie das Copybook eintreten möchten.

2 Typ:

">>Kopie _"

Beim Kompilieren der Datei initialisiert den Kopierbefehl.

3 Geben Sie den Namen der Code-Struktur, die Sie als eine Copybook verwenden möchten. Wenn Sie eine Klasse namens "class1" als eine Copybook verwenden möchten, würde Ihr Code beispielsweise bisher als angezeigt:

">>Kopie class1 __"

4 Typ "> |" die erste Zeile des Codes abschotten. Alle beim Initialisieren des COBOL-Anweisungen enden mit "> |." Alle Codezeilen enden mit "l." Drücken Sie "Enter" in die nächste Zeile zu gehen.

5 Typ "|_" und geben Sie dann eine "literal" um den Namen der das Copybook zu ersetzen. Ein Literal ist eine alphanumerische Zeichenfolge, die COBOL den Copy-Befehl ausgeführt werden muss. Wenn Ihr Schreibheft Name "Code-5" ist, könnte Ihr Literal "ES5." z.B.

6 Typ:

"|_ OF _|"

Diese Aussage bereitet den Codeleser für den Namen einer Bibliothek, wo die Codestruktur als eine Copybook verwendet werden gefunden wird. Nun geben Sie den Namen dieser Bibliothek. Wenn die Datenverbindungsbibliothek "Datalibrary" aufgerufen wird, würde der Code beispielsweise bisher als angezeigt:

Kopie Class1 __ > || Class1| |_ von __ Datalibrary _|

Am Ende dieses zweiten Codezeile mit > |

7 Fügen Sie ein anderes literal für die Bibliothek. Der Code würde jetzt wie folgt aussehen:

Kopie Class1 __ > || Class1| |_ OF Datalibrary _|| IN| |_datalibrary__|

8 Geben Sie in die funktionalen Operatoren für den Kopierbefehl. Sie sind der Name des den Copy-Befehl, dass du jetzt verwendest die Sie ausgleichen können, und das Literal wählten Sie früher für das Copybook. Der Code sieht nun folgendermaßen aus:

Kopie Class1 >|| Class1| |_ OF Datalibrary _|| IN| |_datalibrary__|< | Unterdrücken| <__ |_REPLACING__copycommand1BYclass1||

9 Speichern Sie die Datei mit der Endung COBOL, wie Cbl, .ccp, or.cob. Kompilieren Sie die Datei in ein COBOL-Compiler. Das Copybook wird nun genutzt.