Некоторые компиляторы допускают свободный формат, но большинство, которые я использовал (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
.