Editing Control flow (section)

== 6. Cross-Program Control Flow Summary ==

<pre>OS
 └─► primesmain  PROCEDURE DIVISION
       │
       ├─► CALL primesui  (start, log×n, stop)
       │      └── EXIT PROGRAM back to primesmain
       │
       └─► CALL primesgen  (once, with primes-session)
              │
              ├─► CALL primes  (connect)
              │      └── EXIT PROGRAM back to primesgen
              ├─► CALL primes  (cursor / next-prime / next-divider / write / disconnect)
              │      └── EXIT PROGRAM back to primesgen  [repeated in loop]
              ├─► CALL primesui  (log-message / write)
              │      └── EXIT PROGRAM back to primesgen  [repeated in loop]
              └── EXIT PROGRAM back to primesmain</pre>
All inter-program communication is by reference (shared data blocks). There are no GOTO statements in the current source. All branching is via PERFORM, EVALUATE, and IF/ELSE. No COPY-based GOTO or ALTER is used.
<hr/>
Terug naar: [[Primes_programs_specifications]] | [[Cobol and PostgreSQL]]