COBOL/400 Language Help

Format 1 (REWRITE)

Description
When the Format 1 REWRITE statement is processed, the system logically replaces a record retrieved by a READ statement. The last input/output statement for this file must have been a successfully processed READ statement without the NO LOCK phrase.

The operation of the REWRITE statement varies depending on the file organization and access mode:

->->--REWRITE record-name-1---*-------------------*----------->
                            *-FROM identifier-1-*
 
->----*--------------------------------*--------------------->
     *-FORMAT-*----*-*-identifier-2-*-*
              *-IS-* *-literal-1----*
 
->---*-----------------------------------------*------------->
    *-INVALID-*-----*--imperative-statement-1-*
              *-KEY-*
 
->---*--------------------------------------------*---------->
    *-NOT INVALID-*-----*-imperative-statement-2-*
                  *-KEY-*
 
->---*-------------*-----------------------------------------><-
    *-END-REWRITE-*
 


[ Top of Page | Previous Page | Next Page | Table of Contents ]