某些编译器允许使用自由格式,但是我使用的大多数(IBM)都需要固定。它们具有区域A和区域B,它们在第72列结束。如果需要使用长文字,则必须使用延续。连字符必须出现在第7列中,否则会出现编译器错误。这直接出自GNUCobol手册,但与IBM相同。
IDENTIFICATION DIVISION.
PROGRAM-ID. LONGLIT.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 LONG-LITERAL-VALUE-DEMO PIC X(60) VALUE "This is a long l
- "ong literal that
- " must be continu
- "ed.".
PROCEDURE DIVISION.
DISPLAY LONG-LITERAL-VALUE-DEMO
STOP RUN
.