CICS - COBOL Temelleri
CICS programları, Mainframes'da COBOL dilinde yazılmıştır. Basit bir COBOL-CICS programı yazmak, onu derlemek ve sonra yürütmek hakkında konuşacağız.
CICS Programı
CICS çıktı ekranında bazı mesajlar görüntüleyen basit bir COBOL-CICS programı yazacağız. Bu program, bir COBOL-CICS programının yürütülmesinde yer alan adımları göstermektir. Basit bir programı kodlamanın adımları aşağıdadır -
Aşama 1
Mainframes'a giriş yapın ve bir TSO Oturumu açın.
Adım 2
Programımızı kodlayacağımız yeni bir PDS oluşturun.
Aşama 3
PDS içinde yeni bir üye oluşturun ve aşağıdaki programı kodlayın -
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.
4. adım
Programı kodladıktan sonra onu derlememiz gerekiyor. Programı aşağıdaki JCL'yi kullanarak derleyebiliriz -
//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)
//
Adım 5
Bir CICS oturumu açın.
6. Adım
Şimdi programı aşağıdaki komutu kullanarak kuracağız -
CEMT SET PROG(HELLO) NEW.
7. Adım
İlişkili işlem kimliğini kullanarak programı çalıştırın. İşlem kimliği, Yönetici tarafından sağlanır. Aşağıdaki çıktıyı gösterecektir -
Program Derlemesi
Aşağıdaki akış şeması, bir COBOL-CICS programını derlerken kullanılan adımları göstermektedir -
Çevirmen
Bir çevirmenin işlevi, CICS komutlarındaki sözdizimi hatalarını kontrol etmektir. Bunları eşdeğer COBOL ifadelerine çevirir.
Derleyici
Bir derleyicinin işlevi, COBOL kopya kitaplarını genişletmektir. Sözdizimi hataları için kaynak kodunu kontrol ettikten sonra kodu derler.
Bağlantı Düzenleyici
Bir Bağlantı Düzenleyicinin işlevi, tek bir yük modülü oluşturmak için farklı nesne modüllerini birbirine bağlamaktır.