COBOL/400 Language Help

Format 2

Format 2 (INSPECT/REPLACING)
 
->->-INSPECT identifier-1 REPLACING---------------------------->
 
  *------------------------------------------------------*
  +                                *----------*          +
  V                                V          +          +
->-*-CHARACTERS BY-*-identifier-5-*-*----------*----------*---><-
  +               *-literal-3----* *-phrase-1-*          +
  +                                                      +
  +          *------------------------------------------*+
  +          +                                 *--------*+
  +          V                                 V        ++
  *-ALL-----**-identifier-3-*BY*-identifier-5-**--------**
  *-LEADING-**-literal-1----*  *-literal-3----**phrase-1*
  *-FIRST---*
 
 
where phrase-1 is:
 
  ->->-*-BEFORE-*---*---------*---*-identifier-4-*-------><-
     *-AFTER--*   *-INITIAL-*   *-literal-2----*


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