COBOL - Umwelt-Setup

Installieren von COBOL auf Windows / Linux

Es gibt viele Freie Mainframe-Emulator Verfügung für Windows welche sind verwendet, zu schreiben und lernen werden einfache COBOL-Programme.

Ein solcher Emulator ist Hercules, die kann leicht installiert auf Windows durch folgt ein paar einfache Schritte, wie unten angegeben:

Laden und installieren Sie die Hercules-Emulator, welche ist verfügbar von Herkules Hause Website : www.hercules-390.eu
Wenn Sie das Paket auf Windows-Rechner installiert haben, wird es werden schaffen einen Ordner wie C:\hercules\mvs\cobol.
Lauf Sie die Eingabeaufforderung (CMD) und erreichen das Verzeichnis C:. \ hercules \ mvs \ cobol auf CMD.

Hercules ist ein Open-Source-Software-Implementierung des Mainframe-System / 370 und ESA / 390-Architektur, die neben der neuesten 64-Bit-z / Architecture. Hercules läuft unter Linux, Windows, Solaris, FreeBSD und Mac OS X.

Ein Benutzer kann mit einem Mainframe-Server in einer Reihe von Möglichkeiten zu verbinden, wie ein Thin Client, dummy-Terminal, virtuellen Client-System (VCS) oder Virtual Desktop System (VDS). Jeder gültigen Benutzer wird gegeben eine login-ID zu eingeben in die Z / OS-Schnittstelle (TSO / E oder ISPF).

Kompilieren von COBOL-Programmen

In Ordnung zu auszuführen ein COBOL-Programm im Batch-Modus unter Verwendung von JCL , muss das Programm zu erstellen sind, und einen Lademodul ist mit allen Unterprogramme erstellt. Die JCL verwendet das Lademodul und nicht das eigentliche Programm zum Zeitpunkt der Ausführung. Die Last-Bibliotheken werden verkettet und an den zu JCL gegebenen Zeitpunkt der Ausführung mit JCLLIB oder STEPLIB.

Es gibt viele Mainframe-Compiler Dienstprogramme zur Verfügung, um ein COBOL-Programm zu kompilieren. Einige Unternehmen nutzen Corporate Change Management-Tools wie Endevor , die kompiliert und speichert jede Version des Programms. Dies ist nützlich bei der Verfolgung der Änderungen des Programms.

//COMPILE   JOB ,CLASS=6,MSGCLASS=X,NOTIFY=&SYSUID             
//*            
//STEP1     EXEC IGYCRCTL,PARM=RMODE,DYNAM,SSRANGE
//SYSIN     DD DSN=MYDATA.URMI.SOURCES(MYCOBB),DISP=SHR
//SYSLIB    DD DSN=MYDATA.URMI.COPYBOOK(MYCOPY),DISP=SHR
//SYSLMOD   DD DSN=MYDATA.URMI.LOAD(MYCOBB),DISP=SHR
//SYSPRINT  DD SYSOUT=*
//*

IGYCRCTL ist ein IBM COBOL-Compiler-Dienstprogramm. Die Compiler-Optionen werden mit dem PARM Parameter übergeben. In dem obigen Beispiel weist RMODE anweist den Compiler relativen Adressierungsmodus in dem Programm zu verwenden. Das COBOL-Programm wird mit dem SYSIN Parameter übergeben. Copybook ist die Bibliothek verwendet durch das Programm in SYSLIB.

Ausführen von COBOL-Programmen

Da unten ist ein JCL Beispiel, in dem das Programm MEINPROG wird mit der Eingabedatei MYDATA.URMI.INPUT ausgeführt und erzeugt zwei Ausgangsdateien auf der Spule geschrieben.

//COBBSTEP  JOB CLASS=6,NOTIFY=&SYSUID
//
//STEP10    EXEC PGM=MYPROG,PARM=ACCT5000
//STEPLIB   DD DSN=MYDATA.URMI.LOADLIB,DISP=SHR
//INPUT1    DD DSN=MYDATA.URMI.INPUT,DISP=SHR
//OUT1      DD SYSOUT=*
//OUT2      DD SYSOUT=*
//SYSIN     DD *
//CUST1     1000
//CUST2     1001
/*

Das Lademodul von MEINPROG ist gelegen in MYDATA.URMI.LOADLIB . Dies ist wichtig zu beachten, dass die oben JCL kann nur für eine Nicht-DB2 COBOL Modul verwendet werden.

Ausführen von COBOL-DB2-Programme

Für Betrieb einer DB2 COBOL-Programm, eine spezialisierte IBM-Dienstprogramm wird in der JCL und des Programms verwendet werden; DB2 Region und erforderlichen Parameter werden als Eingabe in das Programm übergeben.

Die Schritte, die für den Betrieb eines COBOL-DB2-Programm sind wie folgt:

Wenn ein COBOL-DB2-Programm kompiliert wird, eine DBRM (Datenbankmodul Request) wird zusammen mit dem Lademodul erstellt. Die DBRM enthält die SQL-Anweisungen der COBOL-Programme mit Syntax geprüft korrekt zu sein.
Die DBRM auf die DB2-Bereich (Umwelt), in dem die COBOL läuft gebunden. Dies kann mit dem IKJEFT01 Nützlichkeit in einer JCL erfolgen.
Nach der bind Schritt wird das COBOL-Programm mit DB2 IKJEFT01 (wieder) mit der Ladebibliothek und der Bibliothek DBRM als Eingabe für den JCL ausgeführt werden.

//STEP001  EXEC PGM=IKJEFT01
//*
//STEPLIB  DD DSN=MYDATA.URMI.DBRMLIB,DISP=SHR
//*
//input files
//output files
//SYSPRINT DD SYSOUT=*
//SYSABOUT DD SYSOUT=*
//SYSDBOUT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//DISPLAY  DD SYSOUT=*
//SYSOUT   DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//SYSTSIN  DD *

   DSN SYSTEM(SSID)
   RUN PROGRAM(MYCOBB) PLAN(PLANNAME) PARM(parameters to cobol program) -
   LIB('MYDATA.URMI.LOADLIB')
   END
/*

Im obigen Beispiel ist MYCOBB die COBOL-DB2-Programmlauf mit IKJEFT01. Bitte beachten Sie, dass der Name des Programms, DB2-Subsystem-ID (SSID), und DB2-Plan Namen werden im SYSTSIN DD-Anweisung übergeben. Die DBRM Bibliothek wird in der STEPLIB angegeben.

Versuchen Sie es Option Online

Sie wirklich nicht brauchen, um Ihre eigene Umgebung zu lernen Programmiersprache COBOL. Grund ist sehr einfach, haben wir bereits COBOL-Programmierumgebung online gewählt ist, so dass Sie zusammenstellen und alle verfügbaren Beispiele auszuführen online zur gleichen Zeit, wenn Sie tun, Ihre Theorie Arbeit werden kann. Dies gibt Ihnen Vertrauen, was du liest und das Ergebnis mit verschiedenen Optionen zu prüfen. Fühlen Sie sich frei, jede weise ändern und führen Sie es online..

Versuchen Sie folgendes Beispiel mit unseren Versuchen Sie es Option neben dem Code in unserer Webseite..

IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.

PROCEDURE DIVISION.
   DISPLAY 'Hello World'.
STOP RUN.

Wenn Sie kompilieren und führen Sie das obige Programm, es produziert das folgende Ergebnis:

Hello World

Für einige der in dieser Anleitung aufgeführten Beispiele, finden Sie einen Versuchen Sie es Option in unserer Website Code Auswahl an der rechten Ecke auf, die Sie in der Online-Compiler bringt. Also einfach davon Gebrauch machen und genießen Sie Ihren Lern. Probieren Sie es Option nur mit dem Code mit OpenCOBOL kompatibel funktionieren würde. Die Programme, die JCL erforderlich (Input-Datei Ausgabedatei oder Parameter) für die Ausführung nicht auf Tryit Option ausführen.