CICS - COBOL Grundlagen

CICS-Programme werden in Mainframes in COBOL-Sprache geschrieben. Wir werden darüber diskutieren, ein einfaches COBOL-CICS-Programm zu schreiben, es zu kompilieren und dann auszuführen.

CICS-Programm

Wir werden ein einfaches COBOL-CICS-Programm schreiben, das eine Meldung auf dem CICS-Ausgabebildschirm anzeigt. Dieses Programm soll die Schritte zur Ausführung eines COBOL-CICS-Programms demonstrieren. Im Folgenden finden Sie die Schritte zum Codieren eines einfachen Programms:

Schritt 1

Melden Sie sich bei Mainframes an und öffnen Sie eine TSO-Sitzung.

Schritt 2

Erstellen Sie eine neue PDS, in der wir unser Programm codieren.

Schritt 3

Erstellen Sie ein neues Mitglied in der PDS und codieren Sie das folgende Programm:

IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.
DATA DIVISION.
FILE SECTION.
WORKING-STORAGE SECTION.
01 WS-MESSAGE PIC X(40).
01 WS-LENGTH  PIC S9(4) COMP.
PROCEDURE DIVISION.
A000-MAIN-PARA.
   MOVE 'Hello World' TO WS-MESSAGE
   MOVE '+12' TO WS-LENGTH
   EXEC CICS SEND TEXT 
      FROM (WS-MESSAGE)
      LENGHT(WS-LENGTH)  
   END-EXEC
   EXEC CICS RETURN
   END-EXEC.

Schritt 4

Nachdem wir das Programm codiert haben, müssen wir es kompilieren. Wir können das Programm mit der folgenden JCL kompilieren -

//SAMPLE JOB(TESTJCL,XXXXXX),CLASS = A,MSGCLASS = C  
//CICSCOB  EXEC CICSCOB,                                                
//COPYLIB = ABC.XYZ.COPYLIB,                            
//LOADLIB = ABC.XYZ.LOADLIB 
//LIB        JCLLIB ORDER = CICSXXX.CICS.XXXPROC                
//CPLSTP     EXEC DFHEITVL                                
//TRN.SYSIN  DD DSN = ABC.XYZ.PDS(HELLO),DISP = SHR     
//LKED.SYSIN DD *                                        
   NAME HELLO(R)                                          
//

Schritt 5

Öffnen Sie eine CICS-Sitzung.

Schritt 6

Wir werden das Programm nun mit dem folgenden Befehl installieren:

CEMT SET PROG(HELLO) NEW.

Schritt 7

Führen Sie das Programm mit der zugehörigen Transaktions-ID aus. Die Transaktions-ID wird vom Administrator bereitgestellt. Es wird die folgende Ausgabe angezeigt -

Programmzusammenstellung

Das folgende Flussdiagramm zeigt die Schritte zum Kompilieren eines COBOL-CICS-Programms -

Übersetzer

Die Funktion eines Übersetzers besteht darin, in CICS-Befehlen nach Syntaxfehlern zu suchen. Es übersetzt sie in äquivalente COBOL-Anweisungen.

Compiler

Die Funktion eines Compilers besteht darin, die COBOL-Kopierbücher zu erweitern. Der Code wird kompiliert, nachdem der Quellcode auf Syntaxfehler überprüft wurde.

Verknüpfungseditor

Die Funktion eines Verknüpfungseditors besteht darin, verschiedene Objektmodule zu verknüpfen, um ein einzelnes Lademodul zu erstellen.