Control data corporation 3300 User manual

COMPUTER

SYSTEMS

USASI

COBOL/

MASTER

REFERENCE

MANUAL

CONTROL

DATA

CORPORATION

60229400

REVISION

(2-6-69\

Original

printing.

Additional

copies

of

this

manual

may

be

obtained

from

the

nearest

Control

Data

Corporation

sales

office.

Pub.

No. 60229400

February

1969

:91969

Control

Data

Corporation

Printed

in

the

enited

States

of

America

RECORD

NOTES

Address

comments

concerning

this

manual

to:

Control

Data

Corporation

Software

Documentation

4201

North

Lexington

Avenue

St. Paul,

~,1innesota

55112

or

USE:'

Comment

Sheet

h

the

back

of

this

manual.

PREFACE

The

features

of USASI COBOL/MASTER

specified

in

ihis

manual

conform

to

the

United

States

of

America

Standards

Institute

(USASI)

COBOL

Standard.

The USASI

specifications

define a

Nucleus

for

internal

processing

and

eight

functional

processing

modules:

Table

Handling,

Sequential

Access,

Random

Access,

Random

Processing,

Sort,

Report

Writer,

Segmentation,

and

Library.

The

Nucleus

is

divided

into

two

levels,

low

and

high.

USASI

COBOL/MASTER

is

implemented

at

the

high

level

of

the

Nucleus.

Of

the

modules,

only

Random

Processing

and

Segmentation

are

not

implemented.

All

other

modules

are

implemented

at

the

high

level.

The

Report

Writer

module

can

be

omitted

from

the

COBOL

library.

USASI

COBOL/MASTER

runs

under

control

of

the

:MASTER

operating

system.

Additional

features

of COBOL

are

implemented

in

USASI COBOL/MASTER

to

facilitate

operating

and

to

support

system

interfaces.

The

inclusion

of COBOL

features

over

and

above

the

USASI

standard

is

not

prohibited

by

the

standard;

however,

an

installation

option

is

available

to

diagnose

all

non-

USASI

features

as

errors

at

compile

time.

The

Business

Data

Processing

Unit (3312)

must

be

present

to

compile

and

execute

USASI

COBOL/

MASTER

programs

on a CONTROL DATA® 3300

computer.

The CONTROL

DATA®

3500

computer

comes

equipped

with

the

Business

Data

Processing

hardware.

This

manual

is

organized

in

the

traditional

manner

of

Identification,

Environment,

Data,

and

Pro-

cedure

Divisions

with

the

exception

of

the

Report

Writer

and

Library

modules

which

are

described

in

separate

chapters.

60229400

iii

ACKNOWLEDGMENT

COBOL

is

an

industry

language

and

is

not

the

property

of

any

company

or

group

of

companies,

or

of

any

organization

or

group

of

organizations.

No

warranty,

expressed

or

implied,

is

made

by

any

contributor

or

by

the

COBOL

Committee

as

to

the

accuracy

and

functioning

of

the

programming

system

and

language.

Moreover,

no

responsibility

is

assumed

by

any

contributor,

or

by

the

committee,

in

connection

therewith.

Procedures

have

been

established

for

the

maintenance

of COBOL.

Inquiries

concerning

the

procedures

for

proposing

changes

should

be

directed

to

the

Executive

Committee

of

the

Conference

on

Data

System

s

Languages.

The

authors

and

copyright

holders

of

the

copyrighted

material

used

herein:

FLOW-IV1ATIe

(Trademark

of

Sperry

Rand

Corporation),

Programming

for

the

Univac

(R)

I

and

II,

Data

Automation

Systems

copyrighted

1958, 1959,

by

Sperry

Rand

Corporation

IBM

Commercial

Translator

Form

No. F

28-8013,

copyrighted

1959

by

IBM

FACT,

DSI 27A5260-2760,

copyrighted

1960

by

Minneapolis-Honeywell

have

specifically

authorized

the

use

of

this

material

in

whole

or

in

part,

in

the

COBOL

specifications.

Such

authorization

extends

to

the

reproduction

and

use

of COBOL

specifications

in

programming

manuals

or

similar

publications.

60229400 v

INTRODUCTION

TO

COBOL

COBOL (Common

Business

Oriented

Language)

is

a

programming

language

which

uses

English

terms

to

simplify

the

programming

of

business

data

processing

problems.

This

manual

presents

the

details

and

rules

for

writing

a

program

in

USASI

COBOL/MASTER

for

the

CONTROL DATA® 3300

and

3500

computers.

Familiarity

with

basic

COBOL

is

desirable,

but

not

essential.

This

introduction

con-

tains

a

brief

outline of

the

COBOL

language

elements,

program

structure

and

content.

Used

in

conjunction

with

the

rest

of

the

manual,

it

provides

the

new

user

with

an

introduction

to

the

funda-

mentals

of

COBOL

programming.

LANGUAGE ELEMENTS

The

COBOL

language

is

made

up

of

the

following

elements:

COBOL

reserved

words

User-defined

words

Literals

Level

numbers

Symbols

Pictures

The

user

composes

user-defined

words,

literals,

and

pictures

according

to

rules

that

govern

the

choice

and

arrangement

of

characters.

Within

the

limits

imposed

by

the

rules,

it

is

virtually

possible

to

compose

an

infinite

number

of

words,

literals,

and

pictures.

The

COBOL'

reserved

words,

symbols,

and

level

numbers

are

presented

in

fixed

sets

from

which

the

user

selects

what

he

needs.

He

cannot

invent

new

reserved

words,

symbols,

or

level

numbers

and

must

use

these

elements

according

to

the

rules

of

the

language.

The

sample

COBOL

source

program

entry

below

shows

all

six

elements:

f

level

number

,DATA-f

AME-l, PICTURE T

YjUE,

~

user-defined

~

picture

liter~Symbol

word

\

COBOL

reserved

words

60229400

vii

COBOL

Reserved

Words

Over

250

English

words

and

abbreviations

have

been

set

aside

as

COBOL

reserved

words.

(Appendix

C

contains

a

complete

list

of

these

reserved

words.)

Special

meanings

have

been

assigned

to

these

words;

the

user

•

Does

not

define

reserved

words

•

Cannot

change

the

meaning

of a

reserved

word

•

Cannot

add

words

to

the

reserved

word

list

•

Cannot

substitute

other

words

for

those

on

the

list

•

Must

not

alter

or

misspell

reserved

words

• May

use

reserved

words

only

for

specified

purposes

The

reserved

words

have

various

purposes

as

defined

in

the

reference

formats.

They

may

identify

program

units,such

as

SECTION,

PROCEDURE,

WORKING-STORAGE.

They

may

identify

parts

of

entries,

such

as

VALUE,

PICTURE,

USAGE.

They

may

specify

actions

like

WRITE,

PERFORM,

DIVIDE.

They

may

have

specific

functional

meanings

such

as

NEGATIVE, COMPUTATIONAL,

EQUAL.

As

figurative

constants,

they

can

represent

specific

data

values:

ZERO,

SPACES,

LOW-

V

ALUE.

(A

complete

list

of

figurative

constants

is

given

in

appendix

B.)

User-Defined

Words

The

user

must

supply

words

that

name

data

items,

data

conditions,

and

procedures.

These

words

have

no

preassigned

meaning,

but

they

must

be

defined

within

the

program

in

which

they

are

used.

The

formation

of

these

words

is

governed

by

the

following

rules:

• A

word

may

be

up

to

30

characters

long.

•

It

may

contain

letters

(A

through

Z),

digits

(0

through

9)

and

the

hyphen

(-).

•

Only

procedure

names

may

be

entirely

numeric;

all

other

words

must

contain

at

least

one

letter.

• A

word

may

neither

begin

nor

end

with

a

hyphen.

•

Spaces

(blanks)

must

not

appear

in

a

word.

•

It

must

not

be

spelled

exactly

like

a

reserved

word.

The

example

below

contains

user-defined

words

as

well

as

reserved

words

and

symbols.

ADD-DEDUCTIONS.

reserved

words

l\nD

'HOSP-INS~STATE-lNE~

TOT-DED

.

user-defined

words

viii

80229400

Appendix B

contains

a

detailed

description

of

the

formation

of

different

types

of

user-defined

words

such

as

data-names,

condition-names,

procedure-names,

and

so

forth.

Literals

are

a

special

case

of

user-defined

words.

They

are

actual

values

used

in

the

program

and

as

such

are

self-defining.

Literals

may

be

numeric

or

non-numeric.

A

numeric

literal

is

a

string

of

digits

that

may

include

a

plus

or

minus

sign,

and

a

decimal

point.

Its

value

is

the

quantity

represented

by

the

characters

in

the

literal.

Every

numeric

literal

is

classed

as

a

numeric

item.

A

non-numeric

literal

is

a

string

of one

to

120

characters

enclosed

in

quotation

marks

from

the

computer's

character

set

(appendix B).

It

may

contain

reserved

words

and

spaces

but

not

the

quotation

mark.

The

value

of a

non-numeric

literal

is

the

string

of

characters

excluding

the

quota-

tion

marks.

Non-numeric

literals

are

classed

as

alphanumeric

items.

Rules

governing

the

formation

of

literals

are

given

in

appendix

B.

The

following

examples

show

the

use

of

literals

in

an

entry:

DIVIDE

~TO

CONVERTED-TEMPl

GIVING

TEMP-2.

numeric

literal

77

HEADING-A

PICTURE

X(lO)

VALUE

IS

:'COBOL

~

Level

Numbers

non-numeric

literal

Level

numbers

(01

through

49,

66,

77,

and

88)

are

used

in

entries

that

assign

names

to

data

items

and

data

values.

They

deSignate

the

level

of

the

entries

relative

to

each

other.

Numbers

01

through

49

designate

the

hierarchy

of

data

entries

within

records.

01

is

always

assigned

to

the

record

itself;

02

through

49

are

assigned

to

items

within

the

record.

Level

numbers

need

not

be

consecutive

but

must

be

ordered

so

that

the

higher

the

number,

the

lower

the

entry

in

the

hierarchy.

Level

number

66

deSignates

an

entry

that

renames

a

previously

defined

entry.

It

is

always

used

with

the

reserved

word

RENAMES.

Level

number

77

deSignates

an

independent

data

item,

one

that

is

not

part

of a

record.

Level

number

88

is

used

with

entries

that

assign

condition

names

to

specific

values

a

data

item

may

assume.

60229400

ix

Whenever

a

level

number

is

used,

it

is

the

first

element

in

the

entry.

The

entries

below

show how

level

numbers

are

used:

£

77

ITEM-A

PICTURE:XX VALUE

Ol.

~

UPDATE-RECORD.

~

RECORD-ID.

p4.

CODE-NUMBER PICTURE X.

level>

_&.§ NEW-CODE VALUE

"A".

numbers

I

,88.

OLD-CODE VALUE

"B".

~

ACCOUNT-NUMBER PICTURE 999.

~

CUSTOMER-IDENTIFICATION.

6

RETAIL-ID

RENAMES CUSTOMER-IDENTIFICATION.

Symbols

are

special

characters

which

have

specific

meanings

for

the

compiler.

Symbols

are

used

in

punctuation,

as

operators

in

arithmetic

expressions,

as

relational

operators

in

conditions,

and

as

editing

symbols

in

pictures.

The

COBOL

Character

Set

in

appendix B

lists

all

the

symbols

available

to

the

COBOL

programmer.

Punctuation

rules

are

given

in

appendix

B,

the

rules

for

arithmetic

and

conditional

operators

in

chapter

4,

and

picture

symbols

in

chapter

3.

Pictures

describe

such

characteristics

of

data

items

as:

• Size of

item

•

Class

of

item:

numeric,

alphabetic,

or

alphanumeric

•

Whether

the

item

is

signed

•

Position

of

an

assumed

decimal

point

•

Editing

(deletion,

insertion,

or

replacement

of

characters)

to

be

performed

on

the

item

Each

picture

is

a

string

of

from

1

to

30

characters.

Pictures

are

composed

of

the

characters

listed

under

PICTURE

in

chapter

3.

In

general,

the

number

of

characters

defines

the

size

of

the

item

and

the

character

itself

defines

the

class:

X=alphanumeric,

9=numeric,

A=alphabetic.

A

picture

may

be

abbreviated

by

enclosing

an

integer

in

parentheses

to

show

the

size

immediately

after

the

character

defining

the

class.

For

instance,

X(20)

means

the

same

as

20

X's

in

a

row;

both

mean

that

the

item

consists

of

20

alphanumeric

characters.

x 60229400

The

word

PICTURE

or

the

words

PICTURE IS

or

the

abbreviation

PIC

always

precedes

the

picture

itself

in

an

entry.

Examples

of

pictures

in

entries:

02

FILLER

PICTURE

~

.

tu

02 STOCK-ITEM

PIC

~

pIC

res

PROGRAM STRUCTURE

A COBOL

source

program

is

composed

of

entries

organized

into

divisions,

sections,

and

paragraphs.

In

general,

a

division

is

made

up

of

sections,

and

a

section

is

made

up of

paragraphs.

Divisions

All COBOL

programs

consist

of

four

divisions

each

with

a

fixed

name:

IDENTIFICATION,

ENVIRONMENT, DATA,

and

PROCEDURE.

The

divisions

always

appear

in

that

order

in

a

program.

The beginning of

each

division

is

marked

by

a

division

header

entry

consisting

of

the

name

of

the

division

followed

by

the

word

DIVISION

and

a

period.

The

division

header

always

appears

on a

line

by

itself.

Sections

The

inclusion

of

sections

depends on

the

particular

division.

There

are

no

sections

in

the

Identification

Division.

The

Environment

and

Data

Divisions

always

have

sections

and

these

sections

have

fixed

names.

Sections

are

optional

in

the

Procedure

DiviSion,

and

when

sections

are

included,

the

section

names

are

supplied

by

the

user.

Each

section

is

identified

by

a

header

entry

consisting

of

the

section

name

followed

by

the

word

SECTION

and

a

period.

A

section

header

usually

appears

on a

line

by

itself.

Paragraphs

All

divisions

except

the

Data Division

contain

paragraphs.

Paragraph

names

in

the

Identification

and

Environment

Divisions

are

fixed.

In

the

Procedure

Division,

paragraph

names

are

user

defined.

Paragraphs

are

identified

by

header

entries

consisting

of a

name

followed

by

a

period

and

a

space.

A

paragraph

header

need

not

appear

on a

line

by

itself;

it

must

be

the

first

entry

on a

line,

but

may

befollowedonthe

same

line

by

one

or

more

entries

in

that

paragraph.

60229400

xi

Entries

An

entry

is

one

or

a

series

of

language

elements

terminated

by

a

period

and

a

space.

The

precise

sequence

of

elements

in

each

entry

is

dictated

by

the

format

rules

contained

in

this

manual.

Sample

Division

showing

structural

units

division

sections

PROGRAM CONTENTS

entries

c

C

L

C

c

[

ENVIRONMENT DIVISION.

CONFIGURATION SECTION.

SOURCE-COMPUTER.

3500.

OBJECT-COMPUTER.

3500.

INPUT-OUTPUT

SECTION.

FILE-CONTROL.

SELECT

OLD-MASTER-FILE

ASSIGN TO

TAPE

Ol.

SELECT

NEW-MASTER-FILE

ASSIGN TO

TAPE

02.

A COBOL

source

program

must

be

identified,

it

must

specify

linkage

between

the

computer

system

and

the

data

files

to

be

processed,

it

must

define

the

data

to

be

processed,

and

finally

it

must

specify

how

the

data

is

to

be

processed.

A COBOL

source

program

consists

of

the

information

required

to

perform

these

functions

organized

into

the

four

required

divisions.

Identification

Division

contains

the

information

that

identifies

the

program.

At

the

very

least,

this

division

states

the

program

name.

In

addition,

it

may

contain

the

date

the

program

was

written,

the

date

compiled,

the

author,

the

installation,

and

any

remarks

that

might

be

useful

to

someone

reading

the

program.

xii

60229400

Environment

Division

contains

information

about

the

equipment

used

to

compile

and

execute

the

pro-

gram.

Its

primary

function

is

to

assign

each

data

file

by

name

to

an

input-output

device

and

to

specify

any

special

input-output

techniques.

Data

Division

contains

a

full

description

of

the

data

to

be

processed

by

the

object

program.

In

the

File

Section,

it

describes

the

data

items

that

make

up

each

of

the

files

named

in

the

Environment

Division.

In

the

Working-Storage

section

it

describes

the

data

items

used

for

constants

and

for

data

developed

during

execution

of

the

program.

If

the

program

is

divided

into

subprograms,

the

Common-

Storage

Section

contains

deSCriptions of

data

common

to

more

than

one

subprogram.

The

Report

Section

contains

a

description

of

data

to

be

output

on a

printed

report

in

terms

of

the

format

in

which

it

will

be

presented.

Data Division

entries

show how

data

items

are

grouped

and

organized

into

files

and

records.

Data

names,

level

numbers,

pictures,

and

other

information

are

contained

in

these

entries.

Procedure

Division

specifies

the

actions

required

to

process

the

data

and

it

indicates

the

sequence

of

processing.

The

basic

functions

of

this

division

are

input-output,

arithmetic,

data

movement.

and

sequence

control.

In

addition,

it

provides

the

user

with

the

capability

to

sort

files,

search

tables,

and

write

reports.

REFERENCE

FORMATS

Each

COBOL

entry

is

described

in

terms

of a

reference

format.

Throughout

this

manual

a

format

is

shown

adjacent

to

information

defining

the

entry.

When

more

than

one

specific

arrangement

is

permitted,

the

format

is

separated

into

numbered

formats.

Notation Used

in

Reference

Formats

UPPER

CASE

UNDERLINED

UPPER

CASE

lower-case-words

level

numbers

[ ]

Brackets

60229400

words

are

COBOL

reserved

words.

They

must

be

spelled

correctly

including

any

hyphens

and

may

not

be

used

in

a

source

program

except

as

speCified

in

the

reference

formats.

words

are

required

when

the

format

in

which

they

appear

is

used.

They

define

the

action

of

the

compiler.

are

generic

terms

which

represent

the

words

or

symbols

supplied

by

the

user.

When

generic

terms

are

repeated

in

a

format,

a

number

or

letter

is

appended

to

the

term

for

identification.

are

one-

or

two-digit

numbers

that

precede

entries

in

the

Data

Division

to

indicate

the

hierarchy

level

of

entries.

enclose

optional

portions

of a

reference

format.

All

of

the

format

within

the

brackets

may

be

omitted

or

included

at

the

user's

option.

xiii

~f

Braces

.•.

Ellipses

enclose

two

or

more

vertically

stacked

items

in

a

reference

format

when only one of

the

enclosed

items

can

be

used.

immediately

following a

pair

of

brackets

or

braces

indicate

that

the

enclosed

material

can

be

repeated

at

the

user's

option.

Punctuation

symbols

(period,

comma,

semicolon)

shown

within

the

formats

are

required

unless

enclosed

in

brackets

and

specifically

noted

as

optional.

Notation

used

in

Examples

t

indicates

the

position

of

an

assumed

decimal

point

in

an

item.

+

A

plus

or

minus

sign

above

a

numeric

character

(n)

indicates

an

operational

sign

is

stored

xiv

in

combination

with

the

numeric

character.

Character

positions

in

storage

are

shown

by

boxes,

IA IB IC ID I

An

empty

box

means

an

unpredictable

result

.

.6.

indicates

a

space

(blank).

60229400

CONTENTS

CHAPTER

1

IDENTIFICA

TION DIVISION

1-1

l.1

Specification

of

Identification

Division

1-1

l.l.1

PROGRAM

-ID

Paragraph

1-2

l.1.

2

DATE-COMPILED

Paragraph

1-2

CHAPTER

2

ENVIRONMENT

DIVISION

2-1

2.1

Specification

of

Environment

Division

2-1

2.2

CONFIGURA

TION

SECTION

2-2

2.2.1

SOURCE

-COMPUTER

Paragraph

2-2

2.2.2

OBJECT-COMPUTER

Paragraph

2-2

2.2.3

SPECIAL-NAMES

Paragraph

2-3

2.3

INPUT-OUTPUT

SECTION

2-4

2.3.1

FILE-CONTROL

Paragraph

2-5

2.3.2

I-O-CONTROL

Paragraph

2-10

CHAPTER

3

DATA

DIVISION

3-1

3.1

Sections

3-1

3.1.1

FILE

SECTION

3-2

3.l.2

COMMON-STORAGE

SECTION

3-2

3.l.

3

WORKING-STORAGE

SECTION

3-3

3.1.4

REPORT

SECTION

3-3

3.2

Data

Division

Concepts

3-4

3.2.1

Entry

3-4

3.2.2

Item

3-5

3.2.3

Record

3-5

3.2.4

Level

Number

3-5

3.2.5

Data

Name

3-6

3.2.6

Initial

Value

3-6

3.2.7

Literal

3-6

3.2.8

Figurative

Constant

3-6

3.3

File

Description

Entry

3-7

3.4

Data

Description

Entry

3-9

60229400

xv

CHAPTER

4

xvi

3.5

Data

Division

Clauses

3.5.1

BLANK

WHEN

ZERO

3.5.2

BLOCK

CONTAINS

3.5.3

DATA

RECORDS

3.5.4

JUSTIFIED

3.5.5

LABEL

RECORDS

3.5.6

OCCURS

3.5.7

PICTURE

3.5.8

PICTURE

Edit

3.5.9

RECORD

CONTAINS

3.5.10

RECORDING

MODE

3.5.11

REDEFINES

3.5.12

RENAMES

3.5.13

SEQUENCED

ON

3.5.14

SYNCHRONIZED

3.5.15

USAGE

3.5.16

VALUE

PROCEDURE

DIVISION

4.

1

Specification

of

Procedure

Division

4.

1. 1

Declaratives

4.1.2

Statements

and

Sentences

4.

2

Arithmetic

Expressions

and

Statements

4.2.1

Expressions

4.

2.

2

Statements

4.

3

Conditions

4.

3.

1

Relation

Condition

4.3.2

4.3.3

4.3.4

4.3.5

4.3.6

4.3.7

4.3.8

Comparison

of

Numeric

Operands

Comparison

of

Nonnumeric

Operands

Comparisons

with

Index

Names/Index

Data

Items

Sign

Condition

Class

Condition

Condition-Name

Condition

Evaluation

Rules

4.4

Common

Options

in

Statements

4.4.1

ROUNDED

Option

4.4.2

SIZE

ERROR

Option

4.

3

CORRESPONDING

Option

4.

5

Table

Handling

4.5.1

Subscripts

4.

5. 2

Indexing

4.

5.

3

Search

Function

4.5.4

Restrictions

on

Indexing,

Subscripting

and

Qualification

-1:.

6

Debugging

Aid

3-11

3:-12

3-13

3-14

3-16

3-18

3-22

3-28

3-33

3-34

3-35

3-36

3-37

3-38

3-40

3-43

4-1

4-2

4-3

4-4

4-5

4-6

4-7

4-9

4-10

4-11

4-12

4-13

4-14

4-15

4-16

4-17

60229400

4.7

Procedure

Division

Statements

4-17

4.7.1

ACCEPT

4-17

4.7.2

ADD

4-18

4.7.3

ALTER

4-20

4.7.4

CLOSE

4-21

4.7.5

COMPUTE

4-23

4.7.6

DISPLAY

4-24

4.7.7

DIVIDE

4-25

4.7.8

ENTER

4-26

4.7.9

EXAMINE

4-29

4.7.10

EXIT

4-30

4.7.11

GO

TO

4-31

4.7.12

IF

4-32

4.7.13

MOVE

4-35

4.7.14

MULTIPLY

4-39

4.7.15

NOTE

4-40

4.7.16

OPEN

4-41

4.7.17

PERFORM

4-44

4.7.18

READ

4-51

4.7.19

RELEASE

4-53

4.7.20

RETURN

4-54

4.7.21

SEARCH

4-55

4.7.22

SEEK

4-61

4.7.23

SET

4-62

4.7.24

SORT

4-64

4.7.25

STOP

4-67

4.7.26

SUBTRACT

4-68

4.7.27

TRACE

4-70

4.7.28

USE

4-72

4.7.29

WRITE

4-74

CHAPTER

5

RE

PORT

WRITER

5-1

5.1

General.

Description

5-1

5.1.1

Control

Group/Control

Break

5-2

5.1.

2

Page

Break

5-2

5.1.

3

LINE

-COUNTER

5-3

5.1.

4

PAGE-COUNTER

5-4

5.2

Data

Division

Entry

Formats

5-4

5.2.1

F

He

Description

Entry

5-5

5.2.2

Report

Description

Entry

5-6

5.2.3

Report

Group

Description

Entry

5-7

60229400

xvii

5.3

Data

Division

Clauses

5-9

5.3.1

CODE

5-9

5.3.2

COLUMN NUMBER

5-10

5.3.3

CONTROL

5-11

5.3.4

GROUP

INDICATE

5-12

5.3.5

LINE

NUMBER

5-13

5.3.6

5-15

5.3.7

PAGE

LIMIT

5-16

5.3.8

RESET

5-19

5.3.9

SOURCE-SUM-VALUE

5-20

5.3.10

TYPE

5-23

5.4

Procedure

Division

Statements

5-26

5.4.1

GENERATE

5-26

5.4.2

INITIATE

5-28

5.4.3

TERMINATE

5-29

5.4.4

USE

BEFORE

RE

PORTING

5-30

5.5

Sample

Report

Writer

Program

5-31

CHAPTER

6 LIBRARY

6-1

6.1

COpy

Statement

6-1

6.2

Source

Library

Preparation

6-3

CHAPTER

7 SOURCE PROGRAM

PREPARATION

t

COMPILATION,

EXECUTION

7-1

7.1

Reference

Format

7-1

7.1.1

COBOL

Coding

Sheet

7-1

7.2

COBOL

Control

Cards

7-2

7.2.1

UCBL

Card

7-4

7.2.2

END PROGRAM

Card

7-4

7.2.3

FINIS

Card

7-5

7.2.4

ENDATA

Card

7-5

7.3

MASTER

Control

Cards

7-6

7.3.1

JOB

Card

7-6

7.3.2

SCHEDULE

Card

7-6

7.3.3

*DEF

Card

7-7

7.3.4

Task

Name

Cards

7-8

7.4

Outputs

from

Compilation

7-8

7.4.1

Source

Program

Listing

7-8

7.4.2

Error

Diagnostics

7-8

7.4.3

Symbolic

Listing

of

Object

Program

7-9

7.4.4

Object

Program

7-9

7.4.5

Data

Map

7-9

7.5

Rerun/Restart

Procedures

7-9

7.5.1

Rerun

7-9

7.5.2

Restart

7-10

xviii

6022!).100

APPENDIX

SECTION

APPENDIX

A

APPENDIX

B

APPENDIX

C

APPENDIX

D

APPENDIX

E

APPENDIX

F

APPENDIX

G

APPENDIX

H

APPENDIX

I

APPENDIX

J

60229400

7.6

Sample

COBOL

Decks

7.6.1

Compile

Only

7.6.2

COBOL

Source

Deck

7.6.3

7.6.4

7.6.5

7.6.6

Compile

and

Execute

Restart

Compile

and

Execute

SAMPLE

PROGRAM

COBOL

LANGUAGE

COBOL

RESERVED

WORD

LIST

COBOL

COLLATING

SEQUENCE

STANDARD

FILE

LABELS

FILE

BLOCKING

FORMATS

INPUT/OUTPUT

SUMMARY

TABLE

DIFFERENCES

BE1WEEN

MS

COBOL

AND USASI

COBOL

DIAGNOSTICS

ENTER

VERB

OBJECT

CODE

EXAMPLES

7-11

7-12

7-13

7-14

7-15

7-16

A-I

B-1

C-1

D-1

E-1

F-1

G-1

H-1

I-I

J-1

xix

1.1

SPECIFICATION OF

IDENTIFICATION

DIVISION

60229400

IDENTIFICATION DIVISON 1

The

Identification

Division

specifies

the

information

to

identify

the

source

program

and

the

output

from

compilation.

It

must

include

the

program

name,

and

may

also

include

the

date

the

program

was

written,

the

date

compiled,

and

so

forth.

Information

specified

in

this

division

is

included

in

the

listing

of

the

source

program,

but

only

the

PROGRAM

-ID

clause

affects

the

object

program.

IDENTIFICATION

DIVISION.

PROGRAM-ID.

program-name.

[AUTHOR.

comment-paragraph.]

[INSTALLATION.

comment-paragraph.]

[DATE-WillTTEN.

comment-paragraph.]

[DATE-COMPILED.

[comment-paragraph.]]

[SECURITY.

comment-paragraph.

]

[REMARKS.

comment-paragraph.]

The

header

IDENTIFICATION

DIVISION

begins

in

column

8

of

the

first

line

and

is

followed

by

a

period

and

a

space.

The

name

of

each

succeeding

para-

graph

is

specified

on

a

new

line;

each

begins

in

column

8

and

is

followed

by

a

period

and

a

space.

The

comment

paragraphs

are

any

combination

of

characters

from

the

COBOL

character

set

(appendix

B)

organized

to

con-

form

to

sentence

and

paragraph

structure.

Only

the

PROGRAM-ID

paragraph

is

required.

1-1

Control Data Corporation 3300 User manual

Popular Desktop manuals by other brands