CICS - Kiến thức cơ bản về COBOL

Các chương trình CICS được viết bằng ngôn ngữ COBOL trong Mainframe. Chúng ta sẽ thảo luận về việc viết một chương trình COBOL-CICS đơn giản, biên dịch nó và sau đó thực thi nó.

Chương trình CICS

Chúng tôi sẽ viết một chương trình COBOL-CICS đơn giản hiển thị một số thông báo trên màn hình đầu ra CICS. Chương trình này là để chứng minh các bước liên quan đến việc thực hiện một chương trình COBOL-CICS. Sau đây là các bước để viết mã một chương trình đơn giản -

Bước 1

Đăng nhập vào Máy tính lớn và mở Phiên TSO.

Bước 2

Tạo một PDS mới trong đó chúng tôi sẽ mã hóa chương trình của mình.

Bước 3

Tạo một thành viên mới bên trong PDS và viết mã chương trình sau:

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.

Bước 4

Sau khi mã hóa chương trình, chúng ta cần phải biên dịch nó. Chúng ta có thể biên dịch chương trình bằng cách sử dụng JCL sau:

//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)                                          
//

Bước 5

Mở một phiên CICS.

Bước 6

Bây giờ chúng ta sẽ cài đặt chương trình bằng lệnh sau:

CEMT SET PROG(HELLO) NEW.

Bước 7

Thực thi chương trình bằng id giao dịch được liên kết. Id giao dịch được cung cấp bởi Quản trị viên. Nó sẽ hiển thị kết quả sau:

Biên soạn chương trình

Lưu đồ sau đây cho thấy các bước được sử dụng để biên dịch một chương trình COBOL-CICS -

Người phiên dịch

Chức năng của trình dịch là kiểm tra lỗi cú pháp trong các lệnh CICS. Nó chuyển chúng thành các câu lệnh COBOL tương đương.

Trình biên dịch

Chức năng của trình biên dịch là mở rộng các sách sao chép COBOL. Nó biên dịch mã sau khi kiểm tra mã nguồn để tìm lỗi cú pháp.

Trình chỉnh sửa liên kết

Chức năng của Trình soạn thảo liên kết là liên kết các mô-đun đối tượng khác nhau để tạo một mô-đun tải duy nhất.