iTS 1.0+)

SCREEN COBOL Source Program

Compaq NonStop™ Pathway/iTS SCREEN COBOL Reference Manual—426750-001

2-11

Tandem Standard Reference Format

Lines in Tandem standard reference format are not fixed length; they can have up to 132

characters. Lines longer than 132 characters are truncated; trailing blanks are ignored.

For each line, Margin R is set to follow the last nonblank character in the line, regardless

of the Margin R location in any previous line.

Trailing blanks from a previous line and initial blanks on a continuation line are ignored.

Figure 2-1

shows the Tandem standard reference format.

•

Division, section, and paragraph headers must begin in Area A. The first sentence

of a paragraph can begin on the same line as the paragraph header, provided at least

one space follows the period terminator of the paragraph name.

•

In general, SCREEN COBOL ignores the distinction between Area A and Area B.

The lexical elements of a source program can occur anywhere between Margin A

and Margin B.

•

Level numbers 01 and 77 must begin in Area A.

•

Level numbers 02-49, 66, and 88 can begin in either Area A or Area B.

•

Area A of a continuation line should always be left blank.

•

An * or / in the indicator field indicates a comment; a - indicates continuation;

a ? indicates a compiler command line. If any other character appears in the

indicator field, the last character in the preceding line is assumed to be followed by a

space.

ANSI Standard Reference Format

Each line in ANSI standard reference format has 80 characters. The SCREEN COBOL

compiler assures this by truncating lines over 80 characters, or adding blanks to fill out

short lines.

A literal string that exceeds one line must fill the line on which it begins; otherwise, any

trailing blanks before the continued characters are included as part of the literal.

The sequence number area (1 through 6) assigns a number to each line of code or labels

a line with any combination of ASCII characters.

Figure 2-1. Tandem Standard Reference Format

008CDT .CDD

Area A Area BIndicator

Field

1 2 3 4 5 6 7 8 9 10 ... 132

Margin R