Master programming syntax, solve interactive challenges & run live code in Syntaxis Explore Arena →
menu_book Course Curriculum (COBOL) expand_more
Program Structure
IDENTIFICATION DIVISION PROGRAM-ID paragraph ENVIRONMENT DIVISION DATA DIVISION PROCEDURE DIVISION WORKING-STORAGE SECTION LOCAL-STORAGE SECTION LINKAGE SECTION Paragraphs Sections
Data Description
PIC X alphanumeric PIC 9 numeric Signed numeric pictures Decimal pictures VALUE clauses REDEFINES RENAMES level 66 Condition names level 88 Group items FILLER items
Statements
MOVE DISPLAY ACCEPT INITIALIZE COMPUTE ADD SUBTRACT MULTIPLY DIVIDE STRING
Control Flow
IF ELSE END-IF EVALUATE PERFORM paragraph PERFORM THRU PERFORM TIMES PERFORM UNTIL PERFORM VARYING CONTINUE GO TO EXIT paragraph
Tables and Strings
OCCURS tables Indexed tables Subscript access SEARCH SEARCH ALL INSPECT TALLYING INSPECT REPLACING UNSTRING Reference modification FUNCTION LENGTH
Files
SELECT file FD file description OPEN INPUT OPEN OUTPUT READ WRITE REWRITE DELETE records START indexed file CLOSE
Numeric and Dates
COMP storage COMP-3 packed decimal ROUNDED ON SIZE ERROR Intrinsic FUNCTION CURRENT-DATE FUNCTION NUMVAL FUNCTION INTEGER-OF-DATE FUNCTION DATE-OF-INTEGER Class tests NUMERIC Sign handling
Subprograms and Quality
CALL subprogram USING parameters RETURNING values BY REFERENCE BY CONTENT COPY copybooks REPLACE directive DECLARATIVES File status codes GnuCOBOL compile command
COBOL / Files

REWRITE

Learn REWRITE in COBOL through a focused explanation, a dedicated topic-specific example, an engineering boundary, and a mastery check.

12 min read • Intermediate

REWRITE is a focused COBOL lesson inside Files. The example uses the construct named in the lesson directly rather than reusing a generic placeholder.

Trace the example from its inputs through REWRITE and identify the behavior that would change if that construct were removed or replaced. Pay attention to the language-specific rules shown by the syntax, because neighboring lessons intentionally exercise different mechanisms.

Topic-specific example

cobol-0057-46b016474e.cbl
cobol Try It Live 
       SELECT SALES-FILE ASSIGN TO "sales.dat"
           ORGANIZATION IS LINE SEQUENTIAL.
       FD SALES-FILE.
       01 SALES-RECORD PIC X(80).
       IF WS-COUNT > 0 DISPLAY "POSITIVE" END-IF
       MULTIPLY 2 BY WS-COUNT
Edge case / engineering note

For REWRITE, test one realistic boundary: empty data, invalid input, unavailable resources, lifetime/cleanup, type constraints, or concurrency timing where applicable. A successful happy path is not enough to prove the construct is used correctly.

Content source & attribution
Original Syntaxis Content · Original Syntaxis Content

Lesson quizzes

REWRITE Mastery Check →
← PREVIOUS
WRITE
NEXT →
DELETE records