Michael Coughlan
Page 76
Parameter-Passing Mechanisms ����������������������������������������������������������������������������������������������������������������������� 401
Subprograms ����������������������������������������������������������������������������������������������������������������������������������������������������� 402
State Memory and the IS INITIAL Phrase ����������������������������������������������������������������������������������������������������������� 404
The CANCEL Verb ����������������������������������������������������������������������������������������������������������������������������������������������� 406
The IS GLOBAL Clause ��������������������������������������������������������������������������������������������������������������������������������������� 406
The IS COMMON PROGRAM Clause ������������������������������������������������������������������������������������������������������������������� 407
Example Programs and Their Subprograms ������������������������������������������������������������������������������������������������������ 408
The IS EXTERNAL Clause ����������������������������������������������������������������������������������������������������������������������������������� 422
Using IS EXTERNAL Data Items �������������������������������������������������������������������������������������������������������������������������� 423
xvii
■ Contents
The COPY Verb ���������������������������������������������������������������������������������������������������������������������������424
The COPY Metalanguage ����������������������������������������������������������������������������������������������������������������������������������� 425
How COPY Works ����������������������������������������������������������������������������������������������������������������������������������������������� 425
How the REPLACING Phrase Works�������������������������������������������������������������������������������������������������������������������� 426
COPY Examples �������������������������������������������������������������������������������������������������������������������������������������������������� 426
Summary �����������������������������������������������������������������������������������������������������������������������������������428
■Chapter 17: Dir
ect Access Files �������������������������������������������������������������������������������������435
Direct Access vs�Sequential Files ����������������������������������������������������������������������������������������������435
Organization of Relative Files ����������������������������������������������������������������������������������������������������436
Processing Relative Files ����������������������������������������������������������������������������������������������������������437
Reading a Relative File �������������������������������������������������������������������������������������������������������������������������������������� 437
Creating a Relative File from a Sequential File �������������������������������������������������������������������������������������������������� 439
Applying Transactions to a Relative File �������������������������������������������������������������������������������
������������������������������� 441
Relative Files: Syntax and Semantics ����������������������������������������������������������������������������������������444
Relative Files: SELECT and ASSIGN Clause �������������������������������������������������������������������������������������������������������� 444
Relative File Verbs ��������������������������������������������������������������������������������������������������������������������������������������������� 445
Organization of Indexed Files ����������������������������������������������������������������������������������������������������449
Processing Indexed Files �����������������������������������������������������������������������������������������������������������450
Reading an Indexed File ������������������������������������������������������������������������������������������������������������������������������������ 451
Creating an Indexed File from a Sequential File ������������������������������������������������������������������������������������������������ 455
Using Indexed Files in Combination ������������������������������������������������������������������������������������������������������������������� 456
Applying Transactions to an Indexed File ���������������������������������������������������������������������������������������������������������� 459
Indexed Files: Syntax and Semantics ����������������������������������������������������������������������������������������463
Indexed Files: SELECT and ASSIGN Clause �������������������������������������������������������������������������������������������������������� 463
The Key of Reference ���������������������������������������������������������������������������������������������������������������������������������������� 464
Indexed File Verbs ��������������������������������������������������������������������������������������������������������������������������������������������� 464
Comparison of COBOL File Organizations ����������������������������������������������������������������������������������466
Sequential File Organization ������������������������������������������������������������������������������������������������������������������������������ 466
Relative File Organization ���������������������������������������������������������������������������������������������������������������������������������� 467
Indexed File Organization ���������������������������������������������������������������������������������������������������������������������������������� 468
xviii
■ Contents
Summary �����������������������������������������������������������������������������������������������������������������������������������469
Introduction �������������������������������������������������������������������������������������������������������������������������������469
General Description ������������������������������������������������������������������������������������������������������������������������������������������� 470
Maintenance Procedure������������������������������������������������������������������������������������������������������������������������������������� 471
The Redundant Stock Report �����������������������������������������������������������������������������������������������������������������
������������� 471
Chapter 18: The COBOL Report Writer
■
���������������������������������������������������������������������������477
Report Writer �����������������������������������������������������������������������������������������������������������������������������477
Example Report: Solace Solar Solutions ������������������������������������������������������������������������������������������������������������ 477
How the Report Writer Works ���������������������������������������������������������������������������������������������������������������������������� 481
Writing a Report Program ���������������������������������������������������������������������������������������������������������������������������������� 482