Bài học theo mô-đun (1/2)
Đoạn văn và THỰC HIỆN
Trong COBOL, tính mô-đun và cấu trúc logic của mã bên trong PROCEDURE DIVISION không xảy ra thông qua các hàm hoặc phương thức mà thông qua Đoạn và câu lệnh PERFORM.
Xác định đoạn văn
Đoạn văn là phần mã được gắn nhãn bắt đầu bằng tên ở cột 8 (Khu vực A) kết thúc bằng dấu chấm ., theo sau là chuỗi hướng dẫn ở cột 12 (Khu vực B).
DISPLAY-MESSAGE.
DISPLAY "This is a paragraph!".Các đoạn văn cho phép chia các chương trình có khả năng rất dài thành các khối có thể tái sử dụng và tự ghi tài liệu.
Thực thi các đoạn văn với PERFORM
Câu lệnh PERFORM gọi và thực thi một đoạn văn, sau đó trả lại quyền điều khiển cho lệnh ngay sau câu lệnh PERFORM.
PROCEDURE DIVISION.
MAIN-PROCEDURE.
DISPLAY "Starting program...".
PERFORM PROCESS-DATA.
DISPLAY "Ending program.".
STOP RUN.
PROCESS-DATA.
DISPLAY "Processing data in memory...".Trong danh sách trên:
DISPLAYbên trongMAIN-PROCEDUREđược thực thi.PERFORM PROCESS-DATAthực thi các nhánh cho đoạnPROCESS-DATA.- Sau khi đoạn
PROCESS-DATAkết thúc, quá trình thực thi sẽ quay trở lạiMAIN-PROCEDUREđể in "Kết thúc chương trình". và ngừng sử dụngSTOP RUN..
Hãy tự mình thử
Xác định một đoạn có tên DISPLAY-TOTAL in 'TOTAL IS DONE' bằng DISPLAY và gọi nó trong MAIN-PROCEDURE bằng cách sử dụng PERFORM trước khi dừng chương trình.
Hiển thị gợi ý
Viết THỰC HIỆN HIỂN THỊ-TỔNG. ở cột 12 và bên dưới khối THỦ TỤC CHÍNH khai báo TỔNG HIỂN THỊ. đoạn ở cột 8.
Giải pháp khả dụng sau 3 lần thử
Gọi hai đoạn văn một cách tuần tự, đầu tiên là INITIALIZE-DATA và sau đó là PROCESS-DATA, trong khối MAIN-PROCEDURE.
Hiển thị gợi ý
Chèn hai câu lệnh PERFORM theo thứ tự tuần tự ở cột 12.
Giải pháp khả dụng sau 3 lần thử