Compaq COBOL AAQ2G1FTK - Manual (Page 16)

6–37 Extending a Sequential File . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 6–50
6–38 Rewriting Relative Records in Sequential Access Mode . . . . . . . . . . . . 6–51
6–39 Rewriting Relative Records in Random Access Mode . . . . . . . . . . . . . . 6–52
6–40 Deleting Relative Records in Sequential Access Mode . . . . . . . . . . . . . 6–53
6–41 Deleting Relative Records in Random Access Mode . . . . . . . . . . . . . . . 6–54
6–42 Updating an Indexed File Sequentially . . . . . . . . . . . . . . . . . . . . . . . . 6–56
6–43 Updating an Indexed File Randomly . . . . . . . . . . . . . . . . . . . . . . . . . . 6–57
7–1 Handling the AT END Condition . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 7–2
7–2 Handling the Invalid Key Condition . . . . . . . . . . . . . . . . . . . . . . . . . . 7–3
7–3 Defining a File Status for a File . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 7–4
7–4 Using the File Status Value in an Exception Handling Routine . . . . . 7–4
7–5 Referencing RMS-STS, RMS-STV, RMS-CURRENT-STS, and
RMS-CURRENT-STV Codes (OpenVMS)
. . . . . . . . . . . . . . . . . . . . . . 7–6
7–6 The Declaratives Skeleton . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 7–9
7–7 A Declarative USE Procedure Skeleton . . . . . . . . . . . . . . . . . . . . . . . . 7–9
7–8 Five Types of Declarative USE Procedures . . . . . . . . . . . . . . . . . . . . . 7–10
8–1 X/Open Standard Lock Modes and Opening Files . . . . . . . . . . . . . . . . 8–7
8–2 Program Segment for File Status Values . . . . . . . . . . . . . . . . . . . . . . . 8–13
8–3 Program Segment for RMS-STS Values (OpenVMS) . . . . . . . . . . . . . . 8–15
8–4 X/Open Standard Record Locking . . . . . . . . . . . . . . . . . . . . . . . . . . . . 8–18
8–5 Automatic Record Locking (Compaq Standard) . . . . . . . . . . . . . . . . . . 8–19
8–6 Sample Program Using Manual Record Locking (Compaq
Standard) . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
8–21
8–7 Program Segment for Record-Locking Exceptions . . . . . . . . . . . . . . . . 8–25
9–1 INPUT and OUTPUT PROCEDURE Phrases . . . . . . . . . . . . . . . . . . . 9–4
9–2 USING Phrase Replaces INPUT PROCEDURE Phrase . . . . . . . . . . . . 9–6
9–3 Overriding the COLLATING SEQUENCE IS Phrase . . . . . . . . . . . . . . 9–7
9–4 Using Two Sort Files . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 9–7
9–5 The Declarative USE AFTER STANDARD ERROR PROCEDURE . . 9–9
9–6 Using the MERGE Statement . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 9–10
9–7 Sorting a File with the USING and GIVING Phrases . . . . . . . . . . . . . 9–11
9–8 Using the USING and OUTPUT PROCEDURE Phrases . . . . . . . . . . . 9–12
9–9 Using the INPUT PROCEDURE and OUTPUT PROCEDURE
Phrases . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
9–14
9–10 Using the COLLATING SEQUENCE IS Phrase . . . . . . . . . . . . . . . . . 9–16
9–11 Creating a New Sort Key . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 9–17
9–12 Merging Files . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 9–19
10–1 Components of a Report . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 10–2
10–2 Checking for the Page-Overflow Condition . . . . . . . . . . . . . . . . . . . . . . 10–8
10–3 Page Advancing and Line Skipping . . . . . . . . . . . . . . . . . . . . . . . . . . . 10–9
10–4 Checking for End-of-Page on a 28-Line Logical Page . . . . . . . . . . . . . . 10–16
10–5 Programming a 20-Line Logical Page Defined by the LINAGE Clause
with Automatic Page Overflow . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
10–22
10–6 Sample Program EX1006 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 10–45
10–7 Sample Program EX1007 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 10–49
10–8 Sample Program EX1008 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 10–58
10–9 Sample Program EX1009 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 10–65
xvi